Sub-Field: 9002199.2311

Parent File	Name	Number	Package
9002199.231	ACCOUNTING POINT	9002199.2311	Commitment Register

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	ACCOUNTING POINT	0;1	POINTER TO ACCOUNTING POINT FILE (#9999999.69)	ACCOUNTING POINT(#9999999.69) INPUT TRANSFORM: `S:$D(X) DINUM=X Q` LAST EDITED: `OCT 01, 1996` HELP-PROMPT: `Enter the accounting point.` DESCRIPTION: Enter the accounting point. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9002199.2311^B` 1)= S ^ACRSYS(DA(2),30,DA(1),1,"B",$E(X,1,30),DA)="" 2)= K ^ACRSYS(DA(2),30,DA(1),1,"B",$E(X,1,30),DA)
1	SEQUENCE NUMBER	0;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `OCT 01, 1996` HELP-PROMPT: `Type a Number between 1 and 999999, 0 Decimal Digits` DESCRIPTION: Enter the sequence number.

ACCOUNTING POINT

0;1

POINTER TO ACCOUNTING POINT FILE (#9999999.69)

CROSS-REFERENCE: 9002199.2311^B

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

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

SEQUENCE NUMBER

0;2

NUMBER