STANDARD DATA DICTIONARY #43.1 -- MAS EVENT RATES FILE 3/24/25 PAGE 1 STORED IN ^DG(43.1, (3 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.3) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This file contains specific outpatient and inpatient event rates which are set to specific dollar amounts which are used by the Beneficiary Travel Module. DD ACCESS: @ RD ACCESS: d WR ACCESS: D DEL ACCESS: D LAYGO ACCESS: D CROSS REFERENCED BY: DATE(B) 43.1,.01 DATE 0;1 DATE (Required) INPUT TRANSFORM: S %DT="ETX" D ^%DT S X=Y K:Y<1 X I $D(X) S DINUM=9999999.9999-X DESCRIPTION: Date the listed outpatient and inpatient rates are effective. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 43.1^B 1)= S ^DG(43.1,"B",$E(X,1,30),DA)="" 2)= K ^DG(43.1,"B",$E(X,1,30),DA) 43.1,10.01 OPT FEE MT;1 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999)!(X<0) X HELP-PROMPT: Type a Dollar Amount between 0 and 9999, 2 Decimal Digits DESCRIPTION: Charge for an outpatient visit at a VA facility. 43.1,10.02 MEDICINE (1-DAY) MT;2 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999)!(X<0) X HELP-PROMPT: Type a Dollar Amount between 0 and 9999, 2 Decimal Digits DESCRIPTION: Charge for a one-day stay on a Medicine ward at a VA facility. 43.1,10.03 SURGERY (1-DAY) MT;3 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999)!(X<0) X HELP-PROMPT: Type a Dollar Amount between 0 and 9999, 2 Decimal Digits DESCRIPTION: Charge for a one-day stay on a Surgical ward at a VA facility. 43.1,10.04 SPINAL CORD INJURY (1-DAY) MT;4 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999)!(X<0) X HELP-PROMPT: Type a Dollar Amount between 0 and 9999, 2 Decimal Digits DESCRIPTION: Charge for a one-day stay on a Spinal Cord Injury ward at a VA facility. 43.1,10.05 PSYCHIATRY (1-DAY) MT;5 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999)!(X<0) X HELP-PROMPT: Type a Dollar Amount between 0 and 9999, 2 Decimal Digits DESCRIPTION: Charge for a one-day stay on a Psychiatry ward at a VA facility. 43.1,10.06 VA NHCU (1-DAY) MT;6 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999)!(X<0) X HELP-PROMPT: Type a Dollar Amount between 0 and 9999, 2 Decimal Digits DESCRIPTION: Charge for a one-day stay in a VA Nursing Home Care Unit. 43.1,10.07 INTERMEDIATE CARE (1-DAY) MT;7 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999)!(X<0) X HELP-PROMPT: Type a Dollar Amount between 0 and 9999, 2 Decimal Digits DESCRIPTION: Charge for a one-day stay on an Intermediate Care ward at a VA facility. 43.1,10.08 REHAB. MEDICINE (1-DAY) MT;8 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999)!(X<0) X HELP-PROMPT: Type a Dollar Amount between 0 and 9999, 2 Decimal Digits DESCRIPTION: Charge for a one-day stay on a Rehabilitation Medicine ward at a VA facility. 43.1,10.09 BLIND REHAB (1-DAY) MT;9 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999)!(X<0) X HELP-PROMPT: Type a Dollar Amount between 0 and 9999, 2 Decimal Digits DESCRIPTION: Charge for a one-day stay on a Blind Rehabilitation ward at a VA facility. 43.1,10.1 NEUROLOGY (1-DAY) MT;10 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999)!(X<0) X HELP-PROMPT: Type a Dollar Amount between 0 and 9999, 2 Decimal Digits DESCRIPTION: Charge for a one-day stay on a Neurology ward at a VA facility. 43.1,10.11 ALCOHOL/DRUG TREATMENT (1-DAY) MT;11 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999)!(X<0) X HELP-PROMPT: Type a Dollar Amount between 0 and 9999, 2 Decimal Digits DESCRIPTION: Charge for a one-day stay on an Alcohol and Drug Treatment ward at a VA facility. 43.1,20.01 $ PER WWU PT;1 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99)!(X<0) X HELP-PROMPT: Type a Dollar Amount between 0 and 99, 2 Decimal Digits DESCRIPTION: Dollar amount per Weighted Work Unit. 43.1,20.02 COST FOR 1-DAY LOS PT;2 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999)!(X<0) X HELP-PROMPT: Type a Dollar Amount between 0 and 999999, 2 Decimal Digits DESCRIPTION: Charge/cost for a one-day length of stay in a VA facility. 43.1,20.03 CENSUS PER DIEM COST PT;3 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999)!(X<0) X HELP-PROMPT: Type a Dollar Amount between 0 and 999999, 2 Decimal Digits DESCRIPTION: The value assigned to per diem cost for census patients. 43.1,20.04 HIGH OUTLIER COST PER DAY PT;4 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999)!(X<0) X HELP-PROMPT: Type a Dollar Amount between 0 and 999999, 2 Decimal Digits DESCRIPTION: Value assigned to a high outlier or hospital stay beyond the expected number of days for a specific condition based on national statistics for a period of one day. 43.1,30.01 DEDUCTIBLE/VISIT BT;1 NUMBER (Required) INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99)!(X<0) X LAST EDITED: JUL 11, 1989 HELP-PROMPT: Type a Dollar Amount between 0 and 99, 2 Decimal Digits DESCRIPTION: Dollar amount deductible allowed for each outpatient visit at a VA facility. 43.1,30.02 DEDUCTIBLE/MONTH BT;2 NUMBER (Required) INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99)!(X<0) X LAST EDITED: MAY 11, 1989 HELP-PROMPT: Type a Dollar Amount between 0 and 99, 2 Decimal Digits DESCRIPTION: Dollar amount deductible allowed for outpatient visits per month at a 43.1,30.03 MILEAGE RATE BT;3 NUMBER (Required) INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".3N!(X>1)!(X<0) X LAST EDITED: JAN 15, 2008 HELP-PROMPT: Type a Dollar Amount between 0 and 1, 3 Decimal Digits DESCRIPTION: Mileage rate (dollar amount) allowed per mile for eligible veterans to travel to and/or from a VA hospital for scheduled clinic visits and scheduled hospital admissions or discharges to home. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 43.1,30.04 FISCAL SYMBOLS BT;4 FREE TEXT INPUT TRANSFORM: K:$L(X)>40!($L(X)<1) X LAST EDITED: FEB 23, 1989 HELP-PROMPT: Answer must be 1-40 characters in length. DESCRIPTION: Fiscal appropriation numbers assigned to travel vouchers given to eligible veterans for payment of travel expenses to and from a VA facility. 43.1,30.05 C&P REVIEW VISIT MILEAGE RATE BT;5 NUMBER (Required) INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".3N!(X>1)!(X<0) X LAST EDITED: JAN 15, 2008 HELP-PROMPT: Type a Dollar Amount between 0 and 1, 3 Decimal Digits DESCRIPTION: Compensation and Pension review visit mileage rate allowed for eligible veterans. The mileage rate for a C&P visit as opposed to a regularly scheduled outpatient visit can be a higher rate as the DVB requests the exam and not the patient. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 43.1,100 MONETARY AWARD(S) MA;0 POINTER Multiple #43.12 (Add New Entry without Asking) DESCRIPTION: Monetary awards granted eligible veterans by the Department of Veterans Benefits for non service connected disabilities (VA Pension). 43.12,.01 MONETARY AWARD(S) 0;1 POINTER TO MAS AWARD FILE (#43.11) INPUT TRANSFORM: I $D(X) S DINUM=X LAST EDITED: JAN 14, 1989 DESCRIPTION: Monetary awards granted eligible veterans by the Department of Veterans Benefits for non service connected disabilities (VA Pension). NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 43.12^B 1)= S ^DG(43.1,DA(1),"MA","B",$E(X,1,30),DA)="" 2)= K ^DG(43.1,DA(1),"MA","B",$E(X,1,30),DA) 43.12,2 BASIC AMOUNT-NO DEPENDENT 0;2 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99000)!(X<0) X LAST EDITED: FEB 23, 1989 HELP-PROMPT: Type a Dollar Amount between 0 and 99000, 2 Decimal Digits DESCRIPTION: Basic dollar amount allowed eligible veterans for an NSC VA Pension. 43.12,3 ONE DEPENDENT AMOUNT 0;3 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99000)!(X<0) X LAST EDITED: FEB 23, 1989 HELP-PROMPT: Type a Dollar Amount between 0 and 99000, 2 Decimal Digits DESCRIPTION: Dollar amount allowed eligible veterans for an NSC VA Pension with one dependent. 43.12,4 TWO DEPENDENT AMOUNT 0;4 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99000)!(X<0) X LAST EDITED: FEB 23, 1989 HELP-PROMPT: Type a Dollar Amount between 0 and 99000, 2 Decimal Digits DESCRIPTION: Dollar amount allowed eligible veterans for an NSC VA Pension with two dependents. 43.12,5 THREE DEPENDENT AMOUNT 0;5 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99000)!(X<0) X LAST EDITED: FEB 23, 1989 HELP-PROMPT: Type a Dollar Amount between 0 and 99000, 2 Decimal Digits DESCRIPTION: Dollar amount allowed eligible veterans for an NSC VA Pension with three dependents. 43.12,6 FOUR DEPENDENT AMOUNT 0;6 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99000)!(X<0) X LAST EDITED: FEB 23, 1989 HELP-PROMPT: Type a Dollar Amount between 0 and 99000, 2 Decimal Digits DESCRIPTION: Dollar amount allowed eligible veterans for an NSC VA Pension with four dependents. 43.12,7 FIVE DEPENDENT AMOUNT 0;7 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99000)!(X<0) X LAST EDITED: FEB 23, 1989 HELP-PROMPT: Type a Dollar Amount between 0 and 99000, 2 Decimal Digits DESCRIPTION: Dollar amount allowed eligible veterans for an NSC VA Pension with five dependents. 43.12,8 EACH ADDITIONAL DEPENDENT AMT 0;8 NUMBER INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99000)!(X<0) X LAST EDITED: FEB 23, 1989 HELP-PROMPT: Type a Dollar Amount between 0 and 99000, 2 Decimal Digits DESCRIPTION: Dollar amount allowed eligible veterans for an NSC VA Pension with any number of dependents over five. FILES POINTED TO FIELDS MAS AWARD (#43.11) MONETARY AWARD(S):MONETARY AWARD(S) (#.01) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):