Sub-Field: 9002037.13

Information

Parent File	Name	Number	Package
9002037.01	STOCK ISSUE CANS	9002037.13	Supply

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	COMMON ACCOUNTING NUMBER	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.13^B` 1)= S ^ASUMC(DA(2),1,DA(1),3,"B",$E(X,1,30),DA)="" 2)= K ^ASUMC(DA(2),1,DA(1),3,"B",$E(X,1,30),DA)
1	ACCOUNT VALUE	1;0	POINTER Multiple #9002037.131	9002037.131

COMMON ACCOUNTING NUMBER

0;1

FREE TEXT

CROSS-REFERENCE: 9002037.13^B

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

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

1 ACCOUNT VALUE 1;0 POINTER Multiple #9002037.131 9002037.131