Sub-Field: 358.31

Parent File	Name	Number	Package
IMP/EXP SELECTION(#358.3)	SUBCOLUMN VALUE	358.31	Automated Information Collection System

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	SUBCOLUMN NUMBER	0;1	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>6)!(X<1)!(X?.E1"."1N.N)!($D(^IBE(358.3,DA(1),1,"B",X))) X` LAST EDITED: `APR 02, 1993` HELP-PROMPT: `Which subcolumn is the value for?` DESCRIPTION: The order that the subcolumn should appear on the form. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `358.31^B` 1)= S ^IBE(358.3,DA(1),1,"B",$E(X,1,30),DA)="" 2)= K ^IBE(358.3,DA(1),1,"B",$E(X,1,30),DA)
.02	SUBCOLUMN VALUE	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>150!($L(X)<1) X` LAST EDITED: `APR 01, 1993` HELP-PROMPT: `What value should go in the subcolumn?` DESCRIPTION: The text that should appear in the subcolumn.

SUBCOLUMN NUMBER

0;1

NUMBER

************************REQUIRED FIELD************************

INPUT TRANSFORM: K:+X'=X!(X>6)!(X<1)!(X?.E1"."1N.N)!($D(^IBE(358.3,DA(1),1,"B",X))) X
LAST EDITED: APR 02, 1993
HELP-PROMPT: Which subcolumn is the value for?

DESCRIPTION:

The order that the subcolumn should appear on the form.

CROSS-REFERENCE: 358.31^B

1)= S ^IBE(358.3,DA(1),1,"B",$E(X,1,30),DA)=""

2)= K ^IBE(358.3,DA(1),1,"B",$E(X,1,30),DA)

SUBCOLUMN VALUE

0;2

FREE TEXT

DESCRIPTION:

The text that should appear in the subcolumn.