STANDARD DATA DICTIONARY #354.3 -- BILLING THRESHOLDS FILE                                                        6/27/25    PAGE 1
STORED IN ^IBE(354.3,  (30 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                     (VERSION 2.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains the threshold amounts for the Medication Copayment Income Exemption.  The Medication Copayment Income Exemption
legislation was effective on 30-Oct-92.  The thresholds are normally effective on December 1.  To simplify implementation VACO has
determined that the threshold effective 1-Dec-92 would be used for the period from 30-Oct-92 to 1-Dec-92.  
 
The Medication Copayment Income Exemption from 1992 thru 11/30/96 was based on veterans making less than the VBA rate for pension
plus Aid and Attendence.  
 
With the filing of the 1996 thresholds,  the directive was changed to reflect that the Medication Copayment Income Exemption was to
be based on veterans making less than the VBA rate for Basic Pension.  This is the directive that is still in effect for current
rates.  
 
 
 
 
Per VHA Directive 10-93-142, this file definition should not be modified.  


              DD ACCESS: @
              RD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @
IDENTIFIED BY: TYPE (#.02)[R], BASE RATE FOR VETERAN (#.03)[R], BASE RATE WITH 1 DEPENDENT (#.04)[R], 
               ADDITIONAL DEPENDENT AMOUNT (#.12)[R]

CROSS
REFERENCED BY: TYPE(AC), DATE(AIVDT), TYPE(AIVDT1), DATE(B)



354.3,.01     DATE                   0;1 DATE (Required)

              INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      DEC 11, 1992 
              DESCRIPTION:
                                This is the effective date of this threshold.  

              CROSS-REFERENCE:  354.3^B 
                                1)= S ^IBE(354.3,"B",$E(X,1,30),DA)=""
                                2)= K ^IBE(354.3,"B",$E(X,1,30),DA)

              CROSS-REFERENCE:  354.3^AIVDT^MUMPS 
                                1)= I $P(^IBE(354.3,DA,0),"^",2) S ^IBE(354.3,"AIVDT",$P(^(0),"^",2),-X,DA)=""
                                2)= K ^IBE(354.3,"AIVDT",+$P(^IBE(354.3,DA,0),"^",2),-X,DA)
                                Inverse date cross reference to rapidly retrieve the proper threshold prior to date x.  



354.3,.02     TYPE                   0;2 SET (Required)

                                '1' FOR BASIC PENSION; 
                                '2' FOR PENSION PLUS A&A; 
              LAST EDITED:      APR 11, 2000 
              DESCRIPTION:      These are the types of Thresholds that this entry is for.  
                                 
                                The Medication Copayment exemption based on income uses the Basic Pension entry from 1996 to the
                                present and uses Pension plus A&A threshold for years prior to 1996.. 

              CROSS-REFERENCE:  354.3^AC 
                                1)= S ^IBE(354.3,"AC",$E(X,1,30),DA)=""
                                2)= K ^IBE(354.3,"AC",$E(X,1,30),DA)

              CROSS-REFERENCE:  354.3^AIVDT1^MUMPS 
                                1)= I +^IBE(354.3,DA,0) S ^IBE(354.3,"AIVDT",X,-$P(^(0),"^"),DA)=""
                                2)= K ^IBE(354.3,"AIVDT",X,-$P(^IBE(354.3,DA,0),"^"),DA)
                                3)= DON'T DELETE
                                Inverse date cross reference used to quickly retrieve threshold immediately prior to date x.  



354.3,.03     BASE RATE FOR VETERAN  0;3 NUMBER (Required)

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
              LAST EDITED:      APR 05, 1993 
              HELP-PROMPT:      Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits 
              DESCRIPTION:
                                This is the rate for a single veteran.  


354.3,.04     BASE RATE WITH 1 DEPENDENT 0;4 NUMBER (Required)

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
              LAST EDITED:      APR 05, 1993 
              HELP-PROMPT:      Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits 
              DESCRIPTION:
                                This is the amount for the Veteran with 1 Dependent.  


354.3,.05     BASE RATE WITH 2 DEPENDENTS 0;5 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
              HELP-PROMPT:      Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits 
              DESCRIPTION:      This is the amount for the Veteran with 2 Dependents.  If this rate is the same as the rate for
                                Veteran with 1 dependent plus an additional dependent amount, it can be left null and computed.  


354.3,.06     BASE RATE WITH 3 DEPENDENTS 0;6 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
              HELP-PROMPT:      Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits 
              DESCRIPTION:      This is the amount for the Veteran with 3 Dependents.  If this rate is the same as the rate for
                                Veteran with 1 dependent plus an additional dependent amount for each dependent, it can be left
                                null and computed.  


354.3,.07     BASE RATE WITH 4 DEPENDENTS 0;7 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
              HELP-PROMPT:      Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits 
              DESCRIPTION:      This is the amount for the Veteran with 4 Dependents.  If this rate is the same as the rate for
                                Veteran with 1 dependent plus an additional dependent amount for each dependent, it can be left
                                null and computed.  


354.3,.08     BASE RATE WITH 5 DEPENDENTS 0;8 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
              LAST EDITED:      JAN 20, 1993 
              HELP-PROMPT:      Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits 
              DESCRIPTION:      This is the amount for the Veteran with 5 Dependents.  If this rate is the same as the rate for
                                Veteran with 1 dependent plus an additional dependent amount for each dependent, it can be left
                                null and computed.  


354.3,.09     BASE RATE WITH 6 DEPENDENTS 0;9 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
              HELP-PROMPT:      Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits 
              DESCRIPTION:      This is the amount for the Veteran with 6 Dependents.  If this rate is the same as the rate for
                                Veteran with 1 dependent plus an additional dependent amount for each dependent, it can be left
                                null and computed.  


354.3,.1      BASE RATE WITH 7 DEPENDENTS 0;10 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
              LAST EDITED:      JAN 20, 1993 
              HELP-PROMPT:      Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits 
              DESCRIPTION:      This is the amount for the Veteran with 7 Dependents.  If this rate is the same as the rate for
                                Veteran with 1 dependent plus an additional dependent amount for each dependent, it can be left
                                null and computed.  


354.3,.11     BASE RATE WITH 8 DEPENDENTS 0;11 NUMBER

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
              HELP-PROMPT:      Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits 
              DESCRIPTION:      This is the amount for the Veteran with 8 Dependents.  If this rate is the same as the rate for
                                Veteran with 1 dependent plus an additional dependent amount for each dependent, it can be left
                                null and computed.  


354.3,.12     ADDITIONAL DEPENDENT AMOUNT 0;12 NUMBER (Required)

              INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
              LAST EDITED:      APR 05, 1993 
              HELP-PROMPT:      Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits 
              DESCRIPTION:
                                This is the rate for each additional dependent.  

              TECHNICAL DESCR:  Calculation of the threshold amount will be based on the number of dependents a veteran has.  First
                                the base rate will be determined.  Second, look at the rate for the veteran with the correct number 
                                of dependents.  Third, if the entry for the veteran and the number of dependents is null, then the
                                threshold will be the base rate plus the rate for each additional dependent times the number of 
                                dependents.  



INPUT TEMPLATE(S):
IB ENTER THRESHOLD            APR 11, 2000@09:55  USER #0    

PRINT TEMPLATE(S):
IB PRINT THRESHOLD            JAN 20, 1993@10:40  USER #1453                                                BILLING THRESHOLDS LIST

SORT TEMPLATE(S):
IB PRINT THRESHOLD            MAY 06, 1993@09:33  USER #1453 
SORT BY: TYPE;S1//
  WITHIN TYPE, SORT BY: DATE//    (User is asked range)


FORM(S)/BLOCK(S):