Sub-Field: 9002037.14

Information

Parent File	Name	Number	Package
9002037.01	DIRECT ISSUE CANS	9002037.14	Supply

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	DIRECT ISSUE CANS	0;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<7)!'(X?1"J".6AN) X` LAST EDITED: `FEB 09, 1998` HELP-PROMPT: `Answer must be 7 characters in length.` CROSS-REFERENCE: `9002037.14^B` 1)= S ^ASUMC(DA(2),1,DA(1),4,"B",$E(X,1,30),DA)="" 2)= K ^ASUMC(DA(2),1,DA(1),4,"B",$E(X,1,30),DA)
1	ACCOUNT VALUE	1;0	POINTER Multiple #9002037.141	9002037.141

DIRECT ISSUE CANS

0;1

FREE TEXT

CROSS-REFERENCE: 9002037.14^B

1)= S ^ASUMC(DA(2),1,DA(1),4,"B",$E(X,1,30),DA)=""

2)= K ^ASUMC(DA(2),1,DA(1),4,"B",$E(X,1,30),DA)

1 ACCOUNT VALUE 1;0 POINTER Multiple #9002037.141 9002037.141