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):