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 |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^IBA(354

Package: Integrated Billing

Global: ^IBA(354


Information

FileMan FileNo FileMan Filename Package
354 BILLING PATIENT Integrated Billing

Description

Directly Accessed By Routines, Total: 39

Package Total Routines
Integrated Billing 35 IB BILLING PAT W/INCOME    IB BILLING PATIENT BY REASON    IB EXEMPT PATIENTS    IB20P385    IBAMTED1    IBAMTV4    IBARXEC    IBARXEI
IBARXEL    IBARXEX1    IBAUTL6    IBAUTL7    IBCNS3    ^IBA(354    IBAMTED2    IBARXEP
IBARXEPL    IBARXEPS    IBARXEPV    IBARXEU    IBARXEU0    IBARXEU1    IBARXEU5    IBARXEX
IBCNEQU    IBCNS    IBCNSBL    IBCNSM    IBCNSM2    IBCOIVM1    IBCOMC1    IBCOMN1
IBPEX    IBXEXS    ^IBA(354.1    
Registration 2 DG53632P    DGRTRIG    
Fee Basis 1 FBPCR    

Accessed By FileMan Db Calls, Total: 11

Package Total Routines
Integrated Billing 10 IB20P385    IBARXEP    IBARXEPL    IBARXEPS    IBARXEPV    IBAUTL6    IBAUTL7    IBCNSBL
IBCNSM2    IBXEXS    
Registration 1 DG53632P    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Integrated Billing 1 BILLING EXEMPTIONS(#354.1)[.02]    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Integrated Billing 1 EXEMPTION REASON(#354.2)[.05]    
Registration 1 PATIENT(#2)[.01]    

Fields, Total: 6

Field # Name Loc Type Details
.01 PATIENT NAME 0;1 POINTER TO PATIENT FILE (#2)
************************REQUIRED FIELD************************
PATIENT(#2)

  • INPUT TRANSFORM:  S DINUM=X
  • LAST EDITED:  JAN 21, 1993
  • HELP-PROMPT:  Enter the name of the patient as it appears in the patient file or enter the SSN or last four.
  • DESCRIPTION:  
    This is the name of the patient as it appears in the patient file.
  • TECHNICAL DESCR:  
    This field is the pointer to the PATIENT file.  It will use the same internal entry number in this file as in the PATIENT file.
  • DELETE TEST:  1,0)= I 1 W !,"Deleting entries not allowed"
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  354^B
    1)= S ^IBA(354,"B",$E(X,1,30),DA)=""
    2)= K ^IBA(354,"B",$E(X,1,30),DA)
.03 COPAY EXEMPTION STATUS DATE 0;3 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X K:X'=$P(^IBA(354,DA,0),U,3) X
  • LAST EDITED:  FEB 10, 1993
  • HELP-PROMPT:  Enter the date of the current income exemption.
  • DESCRIPTION:  DO NOT EDIT THIS FIELD. It is maintained by the Copay Exemption Software.
    This is the date that this patients Medication Copay Income Exemption Status was last updated.  If this date is not in the current calendar year this patient will be flagged as needing to have his status updated.
  • TECHNICAL DESCR:  This field will be updated by the Copay Exemption software every time a new current exemption is added. It should not be edited.
    Programmers must 4 slash stuff data into this field to bypass the input transform.
    WRITE AUTHORITY:  ^
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
    TRIGGERED by the COPAY INCOME EXEMPTION STATUS field of the BILLING PATIENT File
  • CROSS-REFERENCE:  354^AD
    1)= S ^IBA(354,"AD",$E(X,1,30),DA)=""
    2)= K ^IBA(354,"AD",$E(X,1,30),DA)
.04 COPAY INCOME EXEMPTION STATUS 0;4 SET
************************REQUIRED FIELD************************
  • '1' FOR EXEMPT;
  • '0' FOR NON-EXEMPT;

  • LAST EDITED:  SEP 13, 2005
  • HELP-PROMPT:  Enter whether this patient is currently exempt from pharmacy copay due to the income exemption.
  • DESCRIPTION:  DO NOT EDIT THIS FIELD. It is maintained by the Copay Exemption Software.
    This is the patients current Medication Copay Income Exemption Status.  It is updated whenever an entry in the Billing Exemptions file is made.
    If a patient's income is less than the pension level, effective 10/29/92 the patient is exempt from paying the Medication Copayment.  If a patient is receiving a VA Pension, or is receiving Aid and Attendence or House
    Bound benefits, or his income for the previous year is less than the pension level, he is exempt.
  • TECHNICAL DESCR:  This field will be updated by the Copay Exemption software every time a new current exemption is added. It should not be edited.
    Programmers must 4 slash stuff data into this field to bypass the input transform.
  • SCREEN:  S DIC("S")="I $P(^IBA(354,DA,0),U,4)=Y!($G(IBJOB)>10)"
  • EXPLANATION:  This field can only be edited/updated by the Copay Exemption software.
    WRITE AUTHORITY:  ^
  • CROSS-REFERENCE:  354^AEX
    1)= S ^IBA(354,"AEX",$E(X,1,30),DA)=""
    2)= K ^IBA(354,"AEX",$E(X,1,30),DA)
    This is a regular cross-reference of the Pharmacy Copay Income Exemption Status of patients for their most recent status.
  • CROSS-REFERENCE:  ^^TRIGGER^354^.03
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBA(354,D0,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y S X=DIV S X=DT S DIH=$G(^IBA(354,DIV(0),0)),DIV=X S $P(^(0),U,3)=DIV,DIH=354,DIG=.03 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBA(354,D0,0)):^(0),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y S X="" S DIH=$G(^IBA(354,DIV(0),0)),DIV=X S $P(^(0),U,3)=DIV,DIH=354,DIG=.03 D ^DICR
    CREATE VALUE)= S X=DT
    DELETE VALUE)= @
    FIELD)= #.03
  • CROSS-REFERENCE:  354^AENR04^MUMPS
    1)= D E354^DGRTRIG(DA)
    2)= D E354^DGRTRIG(DA)
    3)=  DO NOT DELETE
    This cross-reference is used to notify HEC of changes that may affect enrollment.
.05 COPAY EXEMPTION REASON 0;5 POINTER TO EXEMPTION REASON FILE (#354.2)
************************REQUIRED FIELD************************
EXEMPTION REASON(#354.2)

  • INPUT TRANSFORM:  S DIC("S")="I Y=$P(^IBA(354,DA,0),U,5)!($G(IBJOB)>10)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  FEB 10, 1993
  • DESCRIPTION:  DO NOT EDIT THIS FIELD. It is maintained by the Copay Exemption Software.
    This is the exemption reason for the current copay exemption.  It will be entered by the system.
  • TECHNICAL DESCR:  This field will be updated by the Copay Exemption software every time a new current exemption is added. It should not be edited.
    Programmers must 4 slash stuff data into this field to bypass the input transform.
  • SCREEN:  S DIC("S")="I Y=$P(^IBA(354,DA,0),U,5)!($G(IBJOB)>10)"
  • EXPLANATION:  This field can only be edited/updated by the Copay Exemption software.
    WRITE AUTHORITY:  ^
  • CROSS-REFERENCE:  354^AC
    1)= S ^IBA(354,"AC",$E(X,1,30),DA)=""
    2)= K ^IBA(354,"AC",$E(X,1,30),DA)
50 EVER HAD IVM INSURANCE? IVM;1 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  APR 21, 1994
  • HELP-PROMPT:  If patient has ever had insurance identified by IVM, type "YES"; otherwise, "NO".
  • DESCRIPTION:  
    This field flags patients who have ever had at least one insurance policy that was identified by the IVM Center.
  • CROSS-REFERENCE:  354^AIVM^MUMPS
    1)= I X=1 S ^IBA(354,"AIVM",DA)=""
    2)= K ^IBA(354,"AIVM",DA)
    This cross-reference flags patients who have (or have ever had) insurance identified by IVM.
60 NO COVERAGE VERIFICATION DATE 60;1 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 08, 1998
  • HELP-PROMPT:  Enter the date verification was made that the patient has no insurance coverage.
  • DESCRIPTION:  
    This field contains the date that verification was made that this patient does not have any type of insurance coverage.   When a policy is entered for a patient, this field will be deleted.
  • CROSS-REFERENCE:  354^AVDT
    1)= S ^IBA(354,"AVDT",$E(X,1,30),DA)=""
    2)= K ^IBA(354,"AVDT",$E(X,1,30),DA)
    3)= Do not delete.
    This cross-reference is used to list the date patients were verified that they have no insurance coverage.

ICR, Total: 2

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #5296
  • INSURANCE CAPTURE BUFFER
  • ICR #6115
  • VA Point of Service
  • COPAY INCOME EXEMPTION (.04).
    Access: Read w/Fileman

    External References

    Name Field # of Occurrence
    ^%DT .03+1, 60+1
    E354^DGRTRIG .04(XREF 3S), .04(XREF 3K)
    ^DIC .05+1
    ^DICR .04(XREF 2S), .04(XREF 2K)
    Y^DIQ ID.05+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD(354.2 ID.05+1
    ^IBA(354 - [#354] .01(XREF 1S), .01(XREF 1K), .03+1, .03(XREF 1S), .03(XREF 1K), .04(XREF 1S), .04(XREF 1K), .04(XREF 2S), .04(XREF 2K), .05(XREF 1S)
    .05(XREF 1K), 50(XREF 1S), 50(XREF 1K), 60(XREF 1S), 60(XREF 1K)
    ^IBE(354.2 - [#354.2] ID.05+1

    Naked Globals

    Name Field # of Occurrence
    ^(0 ID.05+1, .04(XREF 2S), .04(XREF 2K)

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT .03+1*, 60+1*
    %I ID.05+1*!
    >> C ID.05+1*
    >> D0 .04(XREF 2S), .04(XREF 2K)
    >> DA .01(XREF 1S), .01(XREF 1K), .03+1, .03(XREF 1S), .03(XREF 1K), .04(XREF 1S), .04(XREF 1K), .04(XREF 2S), .04(XREF 2K), .04(XREF 3S)
    .04(XREF 3K), .05(XREF 1S), .05(XREF 1K), 50(XREF 1S), 50(XREF 1K), 60(XREF 1S), 60(XREF 1K)
    DIC ID.04+1, ID.05+1, .05+1!*
    DIC("S" .04SCR+1*, .05+1*, .05SCR+1*
    >> DIE .05+1
    >> DIG .04(XREF 2S), .04(XREF 2K)
    >> DIH .04(XREF 2S), .04(XREF 2K)
    >> DINUM .01+1*
    >> DIU .04(XREF 2S), .04(XREF 2K)
    DIV .04(XREF 2S), .04(XREF 2K)
    DIV(0 .04(XREF 2S), .04(XREF 2K)
    DT .04(XREF 2S)
    U ID.05+1, .03+1, .04(XREF 2S), .04(XREF 2K)
    X .01+1, .01(XREF 1S), .01(XREF 1K), .03+1*!, .03(XREF 1S), .03(XREF 1K), .04(XREF 1S), .04(XREF 1K), .04(XREF 2S), .04(XREF 2K)
    , .05+1*!, .05(XREF 1S), .05(XREF 1K), 50(XREF 1S), 60+1*!, 60(XREF 1S), 60(XREF 1K)
    Y ID.05+1*, .03+1, .04(XREF 2S), .04(XREF 2K), .05+1, 60+1
    Y(1 .04(XREF 2S), .04(XREF 2K)
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All