Sub-Field: 9002196.2001

Parent File	Name	Number	Package
FMS DOCUMENT(#9002196)	INVOICE INFORMATION	9002196.2001	Commitment Register

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	ADDITIONAL INVOICE NO.	0;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>15!($L(X)<3) X` LAST EDITED: `JUN 09, 1997` HELP-PROMPT: `Answer must be 3-15 characters in length.` DESCRIPTION: Enter the invoice number for this invoice. CROSS-REFERENCE: `9002196.2001^B` 1)= S ^ACRDOC(DA(1),20,"B",$E(X,1,30),DA)="" 2)= K ^ACRDOC(DA(1),20,"B",$E(X,1,30),DA) CROSS-REFERENCE: `9002196^L2` 1)= S ^ACRDOC("L2",$E(X,1,30),DA(1),DA)="" 2)= K ^ACRDOC("L2",$E(X,1,30),DA(1),DA)
.02	DATE INVOICE RECEIVED	0;2	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `APR 01, 1996` HELP-PROMPT: `Enter the date the invoice was received.` DESCRIPTION: Enter the date this invoice was received.
.03	DATE OF THE INVOICE	0;3	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `APR 01, 1996` HELP-PROMPT: `Enter the date indicated on the invoice.` DESCRIPTION: Enter the date of the invoice as indicated on the invoice.

ADDITIONAL INVOICE NO.

0;1

FREE TEXT

DESCRIPTION:

Enter the invoice number for this invoice.

CROSS-REFERENCE: 9002196.2001^B

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

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

CROSS-REFERENCE: 9002196^L2

1)= S ^ACRDOC("L2",$E(X,1,30),DA(1),DA)=""

2)= K ^ACRDOC("L2",$E(X,1,30),DA(1),DA)

DATE INVOICE RECEIVED

0;2

DATE

DESCRIPTION:

Enter the date this invoice was received.

DATE OF THE INVOICE

0;3

DATE

DESCRIPTION:

Enter the date of the invoice as indicated on the invoice.