STANDARD DATA DICTIONARY #354.2 -- EXEMPTION REASON FILE                                                          6/27/25    PAGE 1
STORED IN ^IBE(354.2,  (13 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                     (VERSION 2.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
Warning:  DO NOT EDIT ENTRIES IN THIS FILE without instructions from your ISC.  
 
This file contains the reasons for exemptions to a particular billing process.  Initially it will contain reasons only for the
Pharmacy Copay Income exemption process.  This may be expanded in a later release to allow other exemptions to other processes. 
The current software expects certain entries in this file to exist.  Changing the data in this file can have major impact on the
Pharmacy Copay process.  It should not be edited except on instruction from your ISC.  Generally instructions to modify this file
will be released through the National Patch Module on FORUM.  
 
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 (#.03), STATUS (#.04), CODE (#.05), ACTIVE (#.1)

POINTED TO BY: COPAY EXEMPTION REASON field (#.05) of the BILLING PATIENT File (#354) 
               EXEMPTION REASON field (#.05) of the BILLING EXEMPTIONS File (#354.1) 
               

CROSS
REFERENCED BY: ACTIVE(AA), CODE(ACODE), STATUS(AS), NAME(B), CODE(C)



354.2,.01     NAME                   0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
              LAST EDITED:      DEC 08, 1992 
              HELP-PROMPT:      Answer must be 3-30 characters in length. 
              DESCRIPTION:      This is the name of the exemption reason.  Do not edit this field.  
                                 
                                This field can be printed as the short name of the exemption reason.  

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


354.2,.02     LONG NAME              0;2 FREE TEXT

              DESCRIPTION   
              INPUT TRANSFORM:  K:$L(X)>80!($L(X)<3) X
              LAST EDITED:      DEC 08, 1992 
              HELP-PROMPT:      Enter the long description of this exemption reason.  Answer must be 3-80 characters in length. 
              DESCRIPTION:      Enter a long description to explain this exemption reason.  This field will generally be displayed
                                to users along with the Exemption Status to explain the status of an exemption.  


354.2,.03     TYPE                   0;3 SET

                                '1' FOR COPAY INCOME EXEMPTION; 
              LAST EDITED:      DEC 08, 1992 
              DESCRIPTION:      This is the type of exemption this reason is for.  When creating an exemption of Pharmacy Copay
                                based on Income, only the type COPAY INCOME EXEMPTION reason can be selected.  
                                 
                                In a future release additional types of exemptions may be created.  Do not modify this field.  


354.2,.04     STATUS                 0;4 SET

                                '0' FOR NON-EXEMPT; 
                                '1' FOR EXEMPT; 
              LAST EDITED:      DEC 08, 1992 
              DESCRIPTION:      This is the status of this type of record.  Whether it is an exempt or non-exempt reason.  This
                                status will be automatically stored in the Billing Exemptions file.  

              CROSS-REFERENCE:  354.2^AS 
                                1)= S ^IBE(354.2,"AS",$E(X,1,30),DA)=""
                                2)= K ^IBE(354.2,"AS",$E(X,1,30),DA)
                                Cross-reference of Status.  



354.2,.05     CODE                   0;5 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      JAN 15, 1993 
              HELP-PROMPT:      Type a Number between 1 and 9999, 0 Decimal Digits 
              DESCRIPTION:      This is the internal code used to look up entries by the billing system.  This should not be
                                altered except by the developing ISC.  

              TECHNICAL DESCR:  The data in this field is returned as the third piece from the call to RXST^IBARXEU and
                                RXEXMT^IBARXEU0.  Programmers can determine certain attributes from the code.  Codes of 2 digits
                                are reserved for exemption reasons that can automatically be determined by the system but not based
                                on income.  Codes of 3 digits are reserved for exemptions based on income.  Codes of 4 digits are
                                reserved for exemptions that only can be manually entered that would generally over-ride all other 
                                determinations.  
                                 

              WRITE AUTHORITY:  ^
                                UNEDITABLE
              CROSS-REFERENCE:  354.2^ACODE 
                                1)= S ^IBE(354.2,"ACODE",$E(X,1,30),DA)=""
                                2)= K ^IBE(354.2,"ACODE",$E(X,1,30),DA)
                                3)= DO NOT DELETE
                                Cross-reference of code field.  To be used in routines to look up correct entry.  The internal
                                codes will be used in routines to locate the correct entry.  


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


354.2,.1      ACTIVE                 10;1 SET

                                '1' FOR ACTIVE; 
                                '0' FOR INACTIVE; 
              LAST EDITED:      NOV 10, 1992 
              DESCRIPTION:
                                Enter whether or not this Billing Exemption Reason can currently be used or not.  

              CROSS-REFERENCE:  354.2^AA 
                                1)= S ^IBE(354.2,"AA",$E(X,1,30),DA)=""
                                2)= K ^IBE(354.2,"AA",$E(X,1,30),DA)
                                Cross-reference of Active records.  




INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):