Sub-Field: 9002196.801

Parent File	Name	Number	Package
FMS DOCUMENT(#9002196)	PROPERTY VOUCHER NO.	9002196.801	Commitment Register

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	PROPERTY VOUCHER NO.	0;1	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>14!($L(X)<14)!'(X?3N1"-"2N1"-"2N1"-"4N) X` LAST EDITED: `APR 01, 1996` HELP-PROMPT: `Answer must be 14 characters in length.` DESCRIPTION: `The PROPERTY VOUCHER NO. is assigned by the system and should not be edited directly. The first 3 characters are the LOCATION CODE, the next 2 are the FISCAL YEAR, the next 2 are the CALENDAR MONTH and the last 4 the` VOUCHER SERIAL NO. CROSS-REFERENCE: `9002196.801^B` 1)= S ^ACRDOC(DA(1),8,"B",$E(X,1,30),DA)="" 2)= K ^ACRDOC(DA(1),8,"B",$E(X,1,30),DA) CROSS-REFERENCE: `9002196^PVN` 1)= S ^ACRDOC("PVN",$E(X,1,30),DA(1),DA)="" 2)= K ^ACRDOC("PVN",$E(X,1,30),DA(1),DA)
.02	VOUCHER	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>3!($L(X)<3) X` LAST EDITED: `APR 01, 1996` HELP-PROMPT: `Answer must be 3 characters in length.` DESCRIPTION: This is an incidental field.

PROPERTY VOUCHER NO.

0;1

FREE TEXT

INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>14!($L(X)<14)!'(X?3N1"-"2N1"-"2N1"-"4N) X
LAST EDITED: APR 01, 1996
HELP-PROMPT: Answer must be 14 characters in length.
DESCRIPTION: The PROPERTY VOUCHER NO. is assigned by the system and should not be edited directly. The first 3 characters are the LOCATION CODE, the next 2 are the FISCAL YEAR, the next 2 are the CALENDAR MONTH and the last 4 the
```
VOUCHER SERIAL NO.
```

CROSS-REFERENCE: 9002196.801^B

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

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

CROSS-REFERENCE: 9002196^PVN

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

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

VOUCHER

0;2

FREE TEXT