Sub-Field: 392.91

Parent File	Name	Number	Package
BT PATIENT ALTERNATE INCOME(#392.9)	ALTERNATE INCOME	392.91	Beneficiary Travel

Details

Field #	Name	Loc	Type	Details
.01	ALTERNATE INCOME DATE	0;1	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EST" D ^%DT S X=Y K:X<1 X S:$D(X) DINUM=X` LAST EDITED: `AUG 02, 2012` HELP-PROMPT: `Enter Date within last 30 days.` DESCRIPTION: `Date Alternate Income starts to be valid.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `392.91^B` `1)= S ^DGBT(392.9,DA(1),1,"B",$E(X,1,30),DA)=""` `2)= K ^DGBT(392.9,DA(1),1,"B",$E(X,1,30),DA)`
1	ALTERNATE INCOME	0;2	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>100000)!(X<1)!(X?.E1"."3.N) X` LAST EDITED: `AUG 08, 2012` HELP-PROMPT: `Type a dollar amount between 1 and 100000, 2 decimal digits.` DESCRIPTION: `Dollar Amount of Alternate Income entered in case of POW or Hardship.`
2	ALTERNATE INCOME REASON	0;3	SET	**********************REQUIRED FIELD********************** 'P' FOR POW; 'H' FOR HARDSHIP; LAST EDITED: `AUG 08, 2012` HELP-PROMPT: `Choose the reason for alternate income.` DESCRIPTION: `This is the reason for alternate income.`
3	ALTERNATE INCOME EXPIRATION	0;4	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `AUG 06, 2012` HELP-PROMPT: `Enter Date Alternate Income Expires.` DESCRIPTION: `Expiration Date of Alternate Income. The last day the Alternate Income is valid for.`