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