Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  Found Entries |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^IBE(354.2

Package: Integrated Billing

Global: ^IBE(354.2


Information

FileMan FileNo FileMan Filename Package
354.2 EXEMPTION REASON Integrated Billing

Description

Directly Accessed By Routines, Total: 24

Package Total Routines
Integrated Billing 24 IB BILLING PAT W/INCOME    IB BILLING PATIENT BY REASON    IB20P385    IB20P449    IBARXEB    IBAUTL6    ^IBA(354    IB20P275
IBAERR2    IBAMTED1    IBAMTED2    IBARXEI    IBARXEL1    IBARXEP    IBARXEPL    IBARXEPS
IBARXEPV    IBARXEU    IBARXEU0    IBARXEU1    IBARXEU5    IBARXEX    IBARXEX1    ^IBE(354.2

Accessed By FileMan Db Calls, Total: 5

Package Total Routines
Integrated Billing 3 IB20P275    IB20P385    IB20P449    
Accounts Receivable 2 PRCAAPR1    RCDPAPLM    

Pointed To By FileMan Files, Total: 2

Package Total FileMan Files
Integrated Billing 2 BILLING PATIENT(#354)[.05]    BILLING EXEMPTIONS(#354.1)[.05]    

Fields, Total: 6

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • 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)
.02 LONG NAME 0;2 FREE TEXT

  • 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.
.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.
.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.
.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)
.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.

Found Entries, Total: 12

NAME: CATASTROPHICALLY DISABLED    NAME: FORMER POW    NAME: HARDSHIP    NAME: IN RECEIPT OF A&A    NAME: IN RECEIPT OF HB    NAME: IN RECEIPT OF PENSION    NAME: INCOME>PENSION    NAME: INCOME<PENSION    
NAME: NO INCOME DATA    NAME: NON-VETERAN    NAME: SC>50    NAME: UNEMPLOYABLE VETERAN    

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBE(354.2 - [#354.2] .01(XREF 1S), .01(XREF 1K), .04(XREF 1S), .04(XREF 1K), .05(XREF 1S), .05(XREF 1K), .05(XREF 2S), .05(XREF 2K), .1(XREF 1S), .1(XREF 1K)

Naked Globals

Name Field # of Occurrence
^(0 ID.05+1
^(10 ID.1+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA .01(XREF 1S), .01(XREF 1K), .04(XREF 1S), .04(XREF 1K), .05(XREF 1S), .05(XREF 1K), .05(XREF 2S), .05(XREF 2K), .1(XREF 1S), .1(XREF 1K)
>> DIC ID.03+1, ID.04+1, ID.1+1
U ID.05+1
X .01+1!, .01(XREF 1S), .01(XREF 1K), .02+1!, .04(XREF 1S), .04(XREF 1K), .05+1!, .05(XREF 1S), .05(XREF 1K), .05(XREF 2S)
.05(XREF 2K), .1(XREF 1S), .1(XREF 1K)
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  Found Entries |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All