STANDARD DATA DICTIONARY #392.9 -- BT PATIENT ALTERNATE INCOME FILE 3/24/25 PAGE 1 STORED IN ^DGBT(392.9, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 1.0) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This file contains alternate income data for patients. DD ACCESS: @ RD ACCESS: @ WR ACCESS: @ DEL ACCESS: @ LAYGO ACCESS: @ AUDIT ACCESS: @ CROSS REFERENCED BY: BT PATIENT(B) 392.9,.01 BT PATIENT 0;1 POINTER TO PATIENT FILE (#2) (Required) INPUT TRANSFORM: S DINUM=X LAST EDITED: AUG 08, 2012 HELP-PROMPT: Select the patient. DESCRIPTION: This is the Beneficiary Travel Patient associated with Alternate Income. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 392.9^B 1)= S ^DGBT(392.9,"B",$E(X,1,30),DA)="" 2)= K ^DGBT(392.9,"B",$E(X,1,30),DA) 392.9,1 ALTERNATE INCOME 1;0 DATE Multiple #392.91 (Add New Entry without Asking) DESCRIPTION: This is a multiple containing alternate income date, alternate income amount, alternate income reason, and alternate income expiration date. 392.91,.01 ALTERNATE INCOME DATE 0;1 DATE (Required) 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) 392.91,1 ALTERNATE INCOME 0;2 NUMBER (Required) ALTERNATE INCOME AMOUNT 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. 392.91,2 ALTERNATE INCOME REASON 0;3 SET (Required) '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. 392.91,3 ALTERNATE INCOME EXPIRATION 0;4 DATE (Required) 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. FILES POINTED TO FIELDS PATIENT (#2) BT PATIENT (#.01) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):