Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBARXEU1

Package: Integrated Billing

Routine: IBARXEU1


Information

IBARXEU1 ;AAS/ALB - RX EXEMPTION UTILITY ROUTINE (CONT.) ; 3/27/07 3:10pm

Source Information

Source file <IBARXEU1.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Integrated Billing 3 $$VFAOK^IBARXEU  ($$LST,$$PLUS)^IBARXEU0  $$MTCOMP^IBARXEU5  
Registration 1 ($$AUTOINFO,$$LST)^DGMTCOU1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 18

Package Total Caller Graph
Integrated Billing 9 IBAMTED1  IBAMTED2  IBARXEPS  IBARXEPV  IBARXET  IBARXEU0  IBARXEU5  IBARXEX  
IBARXEX1  
Registration 3 DGMTCOU1  DGMTR1  DGMTSCU2  
Beneficiary Travel 2 DGBTALTI  DGBTE1  
Enrollment Application System 2 EASECMT  EASECSCC  
Income Verification Match 2 IVMCME5  IVMCMF3  

Entry Points

Name Comments DBIA/ICR reference
STATUS(DFN,IBDT) ; -- Determine medication copayment exemption status
; -- requests data from MAS
STATUSQ
AUTOST(DFN,IBDT) ; -- Determine automatically exempt patients.
; input : dfn = patient file pointer
; ibdt = internal form of effective date
AUTOSTQ
INCST(DFN,IBDT) ; -- return medication copayment exemption reason/date
; -- ask mas for income data
INCSTQ
INCDT(IBDATA) ; -- calcualtes copay exemption status based on income
; and net worth
; input := zeroth node from 408.31
; output := 1 = exempt ^date of test^ exemption reason
; 2 = non-exempt^...
; 3 = pending adjudication (if active)^...
NO ; -- not enough information
INCDTQ
THRES(DATE,TYPE,DEPEND) ; -- return threshold amount
  • ICR #1046
    • Status: Active
    • Usage: Controlled Subscription
    THRESQ
    NETW() ; -- use networth in determining copay exemptions - specs keep changing
    ; returns 1 if should use networth in exemption determination
    ; returns 0 if should not use networth in exemption

    External References

    Name Field # of Occurrence
    $$AUTOINFO^DGMTCOU1 AUTOST+17
    $$LST^DGMTCOU1 INCST+6, INCST+14
    $$VFAOK^IBARXEU INCST+9
    $$LST^IBARXEU0 INCST+9
    $$PLUS^IBARXEU0 INCST+9, THRES+19
    $$MTCOMP^IBARXEU5 INCST+19

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DGMT(408.31 - [#408.31] INCST+6, INCST+15, INCST+17
    ^IBA(354 - [#354] INCST+17
    ^IBE(354.2 - [#354.2] AUTOSTQ+1, INCST+9, INCDTQ
    ^IBE(354.3 - [#354.3] THRES+14

    Label References

    Name Line Occurrences
    $$AUTOST STATUS+7
    $$INCDT INCST+19, INCST+20
    $$INCST STATUS+9
    $$NETW INCST+19, INCST+20, INCDT+28, NO+3, NO+4
    $$THRES INCDT+22, INCDT+31
    AUTOSTQ AUTOST+17
    INCSTQ INCST+9, INCST+11
    NO INCDT+14, INCDT+26, INCDT+28
    STATUSQ STATUS+8
    THRESQ THRES+15

    Naked Globals

    Name Field # of Occurrence
    ^( THRES+14

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    CLN INCST+5~, INCST+14*, INCST+15*, INCST+17
    CONV INCST+5~, INCST+11, INCST+14*, INCST+15, INCST+17*
    DATE THRES~, THRES+10*, THRES+14, THRES+19
    DEPEND THRES~, THRES+16*, THRES+22, THRES+23
    DFN STATUS~, STATUS+7, STATUS+9, AUTOST~, AUTOST+17, INCST~, INCST+6, INCST+9, INCST+14, INCST+17
    , INCDT+8~*
    DGMT INCST+5~, INCST+14*, INCST+15, INCST+17
    DT STATUS+6, AUTOST+9
    I AUTOST+7~, AUTOST+18*
    IBDATA INCST+5~, INCST+6*, INCST+9, INCST+11, INCST+19, INCST+20, INCDT~, INCDT+8, INCDT+14, INCDT+16
    , INCDT+17, INCDT+18, INCDTQ
    IBDEPEN INCDT+7~, INCDT+18*, INCDT+22
    IBDT STATUS~, STATUS+6*, STATUS+7, STATUS+9, AUTOST~, AUTOST+9*, AUTOSTQ+1, INCST~, INCST+6, INCST+9
    , INCST+14, INCDT+7~, INCDT+16*, INCDT+22, INCDT+31
    IBEXMT AUTOST+7~, AUTOST+8*, AUTOST+17*, AUTOST+18
    IBEXREA AUTOST+7~, AUTOST+8*, AUTOST+18*, AUTOST+23*, AUTOSTQ, AUTOSTQ+1, INCDT+7~, INCDT+9*, INCDT+14*, INCDT+25*
    , INCDT+26*, INCDT+33*, NO+1*, NO+3, NO+4, INCDTQ
    IBINCOM INCDT+7~, INCDT+17*, INCDT+26, INCDT+33
    IBLEVEL INCDT+7~, INCDT+22*, INCDT+23, INCDT+26, THRES+11~, THRES+12*, THRES+22*, THRES+23*, THRESQ
    IBNETW INCDT+7~, INCDT+18*, INCDT+33
    IBPRIOR INCDT+23*, THRES+11~, THRES+19*, THRESQ
    IBTABLE INCDT+7~, THRES+11~, THRES+14*, THRES+15, THRES+19, THRES+22, THRES+23, THRESQ
    IBTHRES INCDT+7~, INCDT+31*, INCDT+33
    TYPE THRES~, THRES+14, THRES+16
    U INCST+11
    X STATUS+5~, STATUS+7*, STATUS+8, STATUS+9*, STATUSQ, INCST+5~, INCST+9*, INCST+17*, INCST+19*, INCST+20*
    , INCSTQ, INCDT+7~, INCDT+14*
    Y STATUS+5~, NO+3*, NO+4*, INCDTQ
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All