Sub-Field: 90056.0208

Parent File	Name	Number	Package
90056.0205	ADJUSTMENTS	90056.0208	IHS Accounts Receivable

Details

Field #	Name	Loc	Type	Details
.01	ADJUSTMENT	0;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `MAR 22, 2000` HELP-PROMPT: `Type a Number between 0 and 9999, 0 Decimal Digits` CROSS-REFERENCE: `90056.0208^B` 1)= S ^BAREDI("I",DUZ(2),DA(2),30,DA(1),30,"B",$E(X,1,30),DA)="" 2)= K ^BAREDI("I",DUZ(2),DA(2),30,DA(1),30,"B",$E(X,1,30),DA)
.02	AMOUNT	0;2	NUMBER	INPUT TRANSFORM: `S:X["$" X=$P(X,"$",2) K:X'?."-".N.1".".2N!(X>9999999)!(X<-999999) X` LAST EDITED: `MAR 07, 2000` HELP-PROMPT: `Type a Dollar Amount between -999999 and 9999999, 2 Decimal Digits`
.03	REASON	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAR 07, 2000` HELP-PROMPT: `Answer must be 1-30 characters in length.`
.04	A/R CATEGORY	0;4	POINTER TO A/R TABLE TYPE/IHS FILE (#90052.01)	A/R TABLE TYPE/IHS(#90052.01) LAST EDITED: `APR 10, 2000`
.05	A/R REASON	0;5	POINTER TO A/R TABLE ENTRY/IHS FILE (#90052.02)	A/R TABLE ENTRY/IHS(#90052.02) LAST EDITED: `MAR 07, 2000`
.06	DATE OF TRANSACTION REVERSED	0;6	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:X<1 X` LAST EDITED: `NOV 26, 2007` HELP-PROMPT: `THE DATE OF THE ORIGINAL PAYMENT BEING REVERSED`