Sub-Field: 9002064.113

Parent File	Name	Number	Package
9002064.11	BLANKET/SPECIAL LOCAL PO	9002064.113	Contract Health Management Information System

Details

Field #	Name	Loc	Type	Details
.01	BLANKET/SPECIAL LOCAL PO	0;1	FREE TEXT	INPUT TRANSFORM: `S ACHSB=1 D POIT^ACHSCHF2` LAST EDITED: `NOV 06, 2009` HELP-PROMPT: `Answer must be 11 characters in length.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `9002064.113^B` 1)= S ^ACHSCHEF(DA(2),1,DA(1),3,"B",$E(X,1,30),DA)="" 2)= K ^ACHSCHEF(DA(2),1,DA(1),3,"B",$E(X,1,30),DA)
.02	OBLIGATED AMOUNT	0;2	NUMBER	INPUT TRANSFORM: `S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>500000)!(X<0) X` LAST EDITED: `NOV 06, 2009` HELP-PROMPT: `Type a Dollar Amount between 0 and 500000, 2 Decimal Digits` DESCRIPTION: Amount of the Blanket or Special Local PO that was paid for this patient.
.03	PAID AMOUNT	0;3	NUMBER	INPUT TRANSFORM: `S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>500000)!(X<0) X` LAST EDITED: `NOV 06, 2009` HELP-PROMPT: `Type a Dollar Amount between 0 and 500000, 2 Decimal Digits`
.04	PAID DATE	0;4	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 09, 2009` HELP-PROMPT: `Enter the date the Blanket was paid.`