Sub-Field: 9002188.03

Parent File	Name	Number	Package
FMS DEPARTMENT ACCOUNT(#9002188)	JOURNAL VOUCHER	9002188.03	Commitment Register

Parent File

Name

Number

Package

JOURNAL VOUCHER

9002188.03

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	JOURNAL VOUCHER	0;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<2) X` LAST EDITED: `APR 01, 1996` HELP-PROMPT: `Answer must be 2-10 characters in length.` DESCRIPTION: Enter the JOURNAL VOUCHER number. CROSS-REFERENCE: `9002188.03^B` 1)= S ^ACRLOCB(DA(1),"JV","B",$E(X,1,30),DA)="" 2)= K ^ACRLOCB(DA(1),"JV","B",$E(X,1,30),DA)
1	AMOUNT	0;2	NUMBER	INPUT TRANSFORM: `S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>999999)!(X<-999999) X` LAST EDITED: `APR 01, 1996` HELP-PROMPT: `Type a Dollar Amount between -999999 and 999999, 2 Decimal Digits` DESCRIPTION: Enter the amount of the JOURNAL VOUCHER.

JOURNAL VOUCHER

0;1

FREE TEXT

CROSS-REFERENCE: 9002188.03^B

1)= S ^ACRLOCB(DA(1),"JV","B",$E(X,1,30),DA)=""

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

AMOUNT

0;2

NUMBER

INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>999999)!(X<-999999) X
LAST EDITED: APR 01, 1996
HELP-PROMPT: Type a Dollar Amount between -999999 and 999999, 2 Decimal Digits

DESCRIPTION:

Enter the amount of the JOURNAL VOUCHER.