Sub-Field: 9002039.201

Parent File	Name	Number	Package
ASUTBL REQUSITIONER(#9002039.2)	COMMON ACCOUNTING NUMBER	9002039.201	Supply

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	COMMON ACCOUNTING NUMBER	0;1	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>7!($L(X)<7)!'(X?1AN.2N.4AN) X` LAST EDITED: `APR 25, 2000` HELP-PROMPT: `Answer must be 'J' (IHS), followed by the 2-digit Area Code and 4 characters, numbers or combination of both.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9002039.201^B` 1)= S ^ASUL(20,DA(1),2,"B",$E(X,1,30),DA)="" 2)= K ^ASUL(20,DA(1),2,"B",$E(X,1,30),DA) CROSS-REFERENCE: `9002039.2^G` 1)= S ^ASUL(20,"G",$E(X,1,30),DA(1),DA)="" 2)= K ^ASUL(20,"G",$E(X,1,30),DA(1),DA)
.02	SUB-SUB ACTIVITY	0;2	POINTER TO ASUTBL SUB-SUB ACTIVITY FILE (#9002039.17)	**********************REQUIRED FIELD********************** ASUTBL SUB-SUB ACTIVITY(#9002039.17) LAST EDITED: `APR 12, 1994` HELP-PROMPT: `Enter valid Sub-Sub Activity from table 17` CROSS-REFERENCE: `9002039.201^C` 1)= S ^ASUL(20,DA(1),2,"C",$E(X,1,30),DA)="" 2)= K ^ASUL(20,DA(1),2,"C",$E(X,1,30),DA) CROSS-REFERENCE: `9002039.2^F` 1)= S ^ASUL(20,"F",$E(X,1,30),DA(1),DA)="" 2)= K ^ASUL(20,"F",$E(X,1,30),DA(1),DA)

COMMON ACCOUNTING NUMBER

0;1

FREE TEXT

INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>7!($L(X)<7)!'(X?1AN.2N.4AN) X
LAST EDITED: APR 25, 2000
HELP-PROMPT: Answer must be 'J' (IHS), followed by the 2-digit Area Code and 4 characters, numbers or combination of both.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

CROSS-REFERENCE: 9002039.201^B

1)= S ^ASUL(20,DA(1),2,"B",$E(X,1,30),DA)=""

2)= K ^ASUL(20,DA(1),2,"B",$E(X,1,30),DA)

CROSS-REFERENCE: 9002039.2^G

1)= S ^ASUL(20,"G",$E(X,1,30),DA(1),DA)=""

2)= K ^ASUL(20,"G",$E(X,1,30),DA(1),DA)

SUB-SUB ACTIVITY

0;2

POINTER TO ASUTBL SUB-SUB ACTIVITY FILE (#9002039.17)

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

CROSS-REFERENCE: 9002039.201^C

1)= S ^ASUL(20,DA(1),2,"C",$E(X,1,30),DA)=""

2)= K ^ASUL(20,DA(1),2,"C",$E(X,1,30),DA)

CROSS-REFERENCE: 9002039.2^F

1)= S ^ASUL(20,"F",$E(X,1,30),DA(1),DA)=""

2)= K ^ASUL(20,"F",$E(X,1,30),DA(1),DA)