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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBCECSA6

Package: Integrated Billing

Routine: IBCECSA6


Information

IBCECSA6 ;ALB/CXW/PJH - VIEW EOB SCREEN ;01-OCT-1999

Source Information

Source file <IBCECSA6.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Integrated Billing 5 $$PTRESPI^IBCECOB1  ($$CARC,MIN,REMARK)^IBCECSA5  (ARCP,INSINF,LLVLA,RDATA)^IBCECSA7  ($$FT,$$INPAT)^IBCEF  $$DAT1^IBOUTL  
List Manager 3 $$SETSTR^VALM1  CNTRL^VALM10  EN^VALM2  
Kernel 1 $$RJ^XLFSTR  
VA FileMan 1 ($$EXTERNAL,$$VFILE)^DILFD  

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 14 IBCAPR  IBCAPR2  IBCECOB5  IBCECSA5  IBCECSA7  IBCEM CSA EOB CLAIM  IBCEM CSA EOB CLAIM ADJ  IBCEM CSA EOB GEN  
IBCEM CSA EOB LINE ADJ  IBCEM CSA EOB MEDICARE  IBCEM CSA EOB OUTPATIENT  IBCEM CSA EOB PAY  IBCEM CSA EOB REVIEW  IBJTBA1  
Accounts Receivable 3 RCDPEDS  RCDPEWL0  RCDPEWL2  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
BLD ;build EOB data display
GETEOB(IBCNT,IBSRC,IBFULL,IBJTIBLN) ; Get EOB data in display format
; IBCNT = the ien of the entry in file 361.1
; IBSRC = 1 if called from AR, 0 if List Manager format needed
; = 2 if called from AR and header data is desired
; If IBSRC > 0 ^TMP("PRCA_EOB",$J,IBCNT,n)=line n's text is ret'd
; IBFULL = 1 if no check should be made to eliminate a fld whose value=0
; IBJTIBLN = line number to start VALMCNT with (optional)
; used by IBJTBA1
  • ICR #4044
    • Status: Active
    • Usage: Private
    SEL(IB,ONE) ;
    ACT ; Reposition display using actions
    SET(IBSRC,X,CNT,IBCNT) ;set list manager arrays
    GEN ;
    PAY ;
    CLVL ;
    MOUT ;
    CLVLA ;
    A10(X) ; returns a dollar amount right justified to 10 characters
    P10(X) ; returns a % right just 10
    ; X is a decimal between 0-1
    PPR ;Display Payer Policy References
    AUDIT ;Display details of any EEOB MOVE/COPY

    External References

    Name Field # of Occurrence
    $$EXTERNAL^DILFD GEN+15, GEN+18, GEN+22, GEN+27, GEN+30, CLVLA+10, AUDIT+7, AUDIT+8, AUDIT+10, AUDIT+11
    AUDIT+36
    $$VFILE^DILFD CLVLA+16, CLVLA+17, CLVLA+19
    $$PTRESPI^IBCECOB1 CLVL+13
    $$CARC^IBCECSA5 CLVLA+20
    MIN^IBCECSA5 GETEOB+19
    REMARK^IBCECSA5 MOUT+4, MOUT+14
    ARCP^IBCECSA7 GETEOB+19
    INSINF^IBCECSA7 GEN+38
    LLVLA^IBCECSA7 GETEOB+19
    RDATA^IBCECSA7 GETEOB+19
    $$FT^IBCEF CLVL+13
    $$INPAT^IBCEF MOUT+3
    $$DAT1^IBOUTL GEN+10, GEN+13, GEN+34, GEN+44
    $$SETSTR^VALM1 GEN+4, GEN+9, GEN+10, GEN+13, GEN+15, GEN+18, GEN+20, GEN+22, GEN+25, GEN+27
    GEN+30, GEN+34, GEN+35, GEN+44, GEN+47, GEN+49, GEN+53, GEN+54, PAY+3, PAY+11
    PAY+13, PAY+15, PAY+24, PAY+30, PAY+34, PAY+36, PAY+43, PAY+45, CLVL+2, CLVL+8
    CLVL+10, CLVL+12, CLVL+13, CLVL+16, CLVL+17, CLVL+18, CLVL+19, CLVL+20, CLVL+21, CLVL+22
    CLVL+23, CLVL+24, MOUT+7, MOUT+8, MOUT+10, MOUT+12, CLVLA+2, CLVLA+16, CLVLA+17, CLVLA+21
    CLVLA+23, CLVLA+24, PPR+20, PPR+22, PPR+25, AUDIT+14, AUDIT+17, AUDIT+19, AUDIT+21, AUDIT+23
    AUDIT+26, AUDIT+29, AUDIT+40
    CNTRL^VALM10 GEN+7, PAY+6, CLVL+5, CLVLA+5
    EN^VALM2 SEL+2
    $$RJ^XLFSTR CLVL+23, CLVL+24, A10+1, P10+2

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^RC(345 - [#345] VFILE^DILFD
    ^IBM(361.1 - [#361.1] EXTERNAL^DILFD
    361.11 EXTERNAL^DILFD
    361.1101 EXTERNAL^DILFD
    361.11016 EXTERNAL^DILFD

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DIC(36 - [#36] PAY+11
    ^IBM(361.1 - [#361.1] GETEOB+14, GEN+3, GEN+32, GEN+43, GEN+52, GEN+53, GEN+54, PAY+20, PAY+41, CLVL+7
    CLVL+8, CLVL+9, CLVL+13, CLVL+20, CLVL+21, MOUT+2, MOUT+4, CLVLA+7, CLVLA+8, CLVLA+9
    CLVLA+12, CLVLA+13, PPR+5, PPR+8, PPR+11, PPR+12, AUDIT+4, AUDIT+6, AUDIT+34, AUDIT+35
    ^RCY(344.4 - [#344.4] PAY+22, PAY+33
    ^TMP("IBCECSD" SEL+4, ACT+2, SET+6*, SET+7*, SET+8*, GEN+8*, PAY+7*, CLVL+6*, CLVLA+6*
    ^TMP("PRCA_EOB" GETEOB+15!, SET+4*
    ^VA(200 - [#200] GEN+20, GEN+35

    Label References

    Name Line Occurrences
    $$A10 CLVL+8, CLVL+10, CLVL+12, CLVL+13, CLVL+16, CLVL+17, CLVL+18, CLVL+19, CLVL+20, CLVL+21
    CLVL+22, MOUT+8, MOUT+10, MOUT+12, CLVLA+23
    $$P10 MOUT+7
    AUDIT PAY+49
    BLD ACT+1
    CLVL GETEOB+19
    CLVLA GETEOB+19
    GEN GETEOB+19
    GETEOB BLD+1
    MOUT GETEOB+19
    PAY GETEOB+19
    PPR PAY+39
    SEL ACT+1
    SET GEN+5, GEN+11, GEN+16, GEN+19, GEN+23, GEN+28, GEN+31, GEN+36, GEN+45, GEN+48
    GEN+50, GEN+55, GEN+56, PAY+4, PAY+12, PAY+14, PAY+16, PAY+25, PAY+31, PAY+35
    PAY+37, PAY+44, PAY+46, PAY+47, CLVL+3, CLVL+7, CLVL+11, CLVL+14, CLVL+17, CLVL+18
    CLVL+19, CLVL+20, CLVL+21, CLVL+22, CLVL+23, CLVL+25, CLVL+26, MOUT+4, MOUT+5, MOUT+9
    MOUT+11, MOUT+13, MOUT+15, CLVLA+3, CLVLA+11, CLVLA+18, CLVLA+21, CLVLA+25, CLVLA+27, PPR+21
    PPR+23, PPR+26, AUDIT+15, AUDIT+16, AUDIT+18, AUDIT+20, AUDIT+22, AUDIT+24, AUDIT+27, AUDIT+30
    AUDIT+41, AUDIT+42

    Naked Globals

    Name Field # of Occurrence
    ^( GEN+3

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    CNT GETEOB+9~, GETEOB+12*, SET~, SET+7, SET+8, GEN+5, GEN+11, GEN+16, GEN+19, GEN+23
    GEN+28, GEN+31, GEN+36, GEN+38, GEN+45, GEN+48, GEN+50, GEN+55, GEN+56, PAY+4
    PAY+12, PAY+14, PAY+16, PAY+25, PAY+31, PAY+35, PAY+37, PAY+44, PAY+46, PAY+47
    CLVL+3, CLVL+7, CLVL+11, CLVL+14, CLVL+17, CLVL+18, CLVL+19, CLVL+20, CLVL+21, CLVL+22
    CLVL+23, CLVL+25, CLVL+26, MOUT+4, MOUT+5, MOUT+9, MOUT+11, MOUT+13, MOUT+15, CLVLA+3
    CLVLA+11, CLVLA+18, CLVLA+21, CLVLA+25, CLVLA+27, PPR+21, PPR+23, PPR+26, AUDIT+15, AUDIT+16
    AUDIT+18, AUDIT+20, AUDIT+22, AUDIT+24, AUDIT+27, AUDIT+30, AUDIT+41, AUDIT+42
    FIRST101 AUDIT+2~, AUDIT+3*, AUDIT+13, AUDIT+14*
    GR CLVLA+1~, CLVLA+8*, CLVLA+9, CLVLA+10, CLVLA+14
    I PAY+18~, PAY+27*, PAY+28, CLVLA+1~, CLVLA+21*, PPR+2~, PPR+24*
    IB SEL~, SEL+4*, GEN+4*, GEN+5, GEN+9*, GEN+10*, GEN+11, GEN+13*, GEN+15*, GEN+16
    GEN+18*, GEN+19, GEN+20*, GEN+22*, GEN+23, GEN+25*, GEN+27*, GEN+28, GEN+30*, GEN+31
    GEN+34*, GEN+35*, GEN+36, GEN+44*, GEN+45, GEN+47*, GEN+48, GEN+49*, GEN+50, GEN+53*
    GEN+54*, GEN+55, PAY+3*, PAY+4, PAY+11*, PAY+12, PAY+13*, PAY+14, PAY+15*, PAY+16
    PAY+24*, PAY+25, PAY+30*, PAY+31, PAY+34*, PAY+35, PAY+36*, PAY+37, PAY+43*, PAY+44
    PAY+45*, PAY+46, CLVL+2*, CLVL+3, CLVL+8*, CLVL+10*, CLVL+11, CLVL+12*, CLVL+13*, CLVL+14
    CLVL+15*, CLVL+16*, CLVL+17*, CLVL+18*, CLVL+19*, CLVL+20*, CLVL+21*, CLVL+22*, CLVL+23*, CLVL+24*
    CLVL+25, MOUT+7*, MOUT+8*, MOUT+9, MOUT+10*, MOUT+11, MOUT+12*, MOUT+13, CLVLA+2*, CLVLA+3
    CLVLA+16*, CLVLA+17*, CLVLA+18, CLVLA+21*, CLVLA+23*, CLVLA+24*, CLVLA+25, PPR+20*, PPR+21, PPR+22*
    PPR+23, PPR+25*, PPR+26, AUDIT+14*, AUDIT+15, AUDIT+17*, AUDIT+18, AUDIT+19*, AUDIT+20, AUDIT+21*
    AUDIT+22, AUDIT+23*, AUDIT+24, AUDIT+26*, AUDIT+27, AUDIT+29*, AUDIT+30, AUDIT+40*, AUDIT+41
    IB101 AUDIT+5~, AUDIT+6*, AUDIT+7, AUDIT+8, AUDIT+9, AUDIT+10, AUDIT+11
    >> IBACT ACT+2
    IBARR PPR+2~
    IBARR( PPR+13*, PPR+16
    IBCARC CLVLA+1~
    IBCARC( CLVLA+21
    IBCNT BLD+1, GETEOB~, GETEOB+14, GETEOB+15, ACT+1, SET~, SET+4, SET+8, GEN+3, GEN+5
    GEN+11, GEN+16, GEN+19, GEN+23, GEN+28, GEN+31, GEN+32, GEN+36, GEN+38, GEN+43
    GEN+45, GEN+48, GEN+50, GEN+52, GEN+53, GEN+54, GEN+55, GEN+56, PAY+4, PAY+12
    PAY+14, PAY+16, PAY+20, PAY+25, PAY+31, PAY+35, PAY+37, PAY+41, PAY+44, PAY+46
    PAY+47, CLVL+3, CLVL+7, CLVL+8, CLVL+9, CLVL+11, CLVL+13, CLVL+14, CLVL+17, CLVL+18
    CLVL+19, CLVL+20, CLVL+21, CLVL+22, CLVL+23, CLVL+25, CLVL+26, MOUT+2, MOUT+4, MOUT+5
    MOUT+9, MOUT+11, MOUT+13, MOUT+15, CLVLA+3, CLVLA+7, CLVLA+8, CLVLA+9, CLVLA+11, CLVLA+12
    CLVLA+13, CLVLA+18, CLVLA+21, CLVLA+25, CLVLA+27, PPR+5, PPR+8, PPR+11, PPR+12, PPR+21
    PPR+23, PPR+26, AUDIT+4, AUDIT+6, AUDIT+15, AUDIT+16, AUDIT+18, AUDIT+20, AUDIT+22, AUDIT+24
    AUDIT+27, AUDIT+30, AUDIT+34, AUDIT+35, AUDIT+41, AUDIT+42
    IBCON PAY+18~, PAY+28*, PAY+30
    IBCONTXT PAY+18~, PAY+29*, PAY+30
    IBCTYP PAY+18~, PAY+28*, PAY+29
    IBDA SEL+1~, SEL+3*, SEL+4
    IBDATE AUDIT+5~, AUDIT+7*, AUDIT+17
    IBDIR AUDIT+5~, AUDIT+11*, AUDIT+12*, AUDIT+17, AUDIT+19, AUDIT+21
    IBDISP PPR+2~, PPR+17*, PPR+22, PPR+24
    IBFLG CLVLA+1~, CLVLA+7*, CLVLA+10*, CLVLA+27
    IBFULL GETEOB~, GETEOB+10*, GEN+33, GEN+52, CLVL+16, CLVL+17, CLVL+18, CLVL+19, CLVL+20, CLVL+21
    CLVL+22, CLVL+23, CLVL+24, MOUT+7, MOUT+8, MOUT+10, MOUT+12
    IBJTIBLN GETEOB~, GETEOB+13
    IBJUST AUDIT+5~, AUDIT+9*, AUDIT+23
    IBJUST1 AUDIT+5~, AUDIT+9*, AUDIT+25, AUDIT+26
    IBN CLVLA+1~, CLVLA+20*, CLVLA+21
    >> IBONE SEL+5*, ACT+1
    IBORIG AUDIT+5~, AUDIT+10*, AUDIT+28, AUDIT+29
    IBOSN GEN+42~, GEN+46*, GEN+47
    IBOSN1 GEN+42~, GEN+46*, GEN+48, GEN+49
    IBOTH AUDIT+32~, AUDIT+35*, AUDIT+36*, AUDIT+37
    IBPAYNAM PAY+18~, PAY+21*, PAY+22*, PAY+23, PAY+24
    IBPCNT PPR+2~, PPR+15*, PPR+16, PPR+17*, PPR+19
    IBPY PPR+2~, PPR+12*, PPR+13, PPR+15*, PPR+16*, PPR+17
    IBREC GETEOB+9~, GETEOB+14*, GEN+10, GEN+13, GEN+14, GEN+17, GEN+20, GEN+21, GEN+25, GEN+26
    GEN+29, GEN+38, PAY+11, PAY+13, PAY+15, PAY+42, PAY+43, CLVL+13, CLVL+22, CLVL+23
    CLVL+24, MOUT+3, CLVLA+1~, CLVLA+8*, CLVLA+10*, CLVLA+11, CLVLA+13*, CLVLA+16, CLVLA+23, CLVLA+24
    IBREC1 GEN+2~, GEN+32*, GEN+33, GEN+34, GEN+35, PAY+2~, CLVL+1~, CLVL+9*, CLVL+10, CLVL+12
    CLVL+13, CLVL+16, CLVL+17, CLVL+18, CLVL+19, MOUT+1~, MOUT+2*, MOUT+3, MOUT+4, MOUT+7
    MOUT+8, MOUT+10, MOUT+12
    IBREC25 PAY+18~, PAY+20*, PAY+21, PAY+26, PAY+28
    IBREC50 GEN+42~, GEN+43*, GEN+44
    IBREC51 GEN+42~, GEN+43*, GEN+46, PAY+40~, PAY+41*, PAY+42, PAY+45
    IBREM GETEOB+9~
    IBRL CLVL+1~, CLVL+15*, CLVL+16*, CLVL+17*, CLVL+18*, CLVL+19*, CLVL+20*, CLVL+21*, CLVL+22*, CLVL+23*
    CLVL+24*, CLVL+25, MOUT+1~, MOUT+6*, MOUT+7*, MOUT+8*, MOUT+9, MOUT+10*, MOUT+11, MOUT+12*
    MOUT+13
    IBSPL GEN+2~, GEN+3*, GEN+9
    IBSRC GETEOB~, GETEOB+10*, GETEOB+11, GETEOB+15, GETEOB+18, SET~, SET+1*, SET+3, GEN+1*, GEN+5
    GEN+6, GEN+11, GEN+12, GEN+13, GEN+16, GEN+19, GEN+23, GEN+24, GEN+28, GEN+31
    GEN+36, GEN+41, GEN+45, GEN+48, GEN+50, GEN+55, GEN+56, PAY+1*, PAY+4, PAY+5
    PAY+12, PAY+14, PAY+16, PAY+25, PAY+31, PAY+35, PAY+37, PAY+44, PAY+46, PAY+47
    CLVL+2*, CLVL+3, CLVL+4, CLVL+7, CLVL+11, CLVL+13, CLVL+14, CLVL+17, CLVL+18, CLVL+19
    CLVL+20, CLVL+21, CLVL+22, CLVL+23, CLVL+25, CLVL+26, MOUT+2*, MOUT+3, MOUT+4, MOUT+5
    MOUT+9, MOUT+11, MOUT+13, MOUT+15, CLVLA+2*, CLVLA+3, CLVLA+4, CLVLA+11, CLVLA+18, CLVLA+21
    CLVLA+25, CLVLA+27, PPR+21, PPR+23, PPR+26, AUDIT+15, AUDIT+16, AUDIT+18, AUDIT+20, AUDIT+22
    AUDIT+24, AUDIT+27, AUDIT+30, AUDIT+41, AUDIT+42
    IBTMP GEN+2~, GEN+14*, GEN+15, GEN+17*, GEN+18, GEN+21*, GEN+22, GEN+26*, GEN+27, GEN+29*
    GEN+30, PAY+2~, CLVL+1~
    IBTXT PPR+2~, PPR+24*, PPR+25
    IBTYP GETEOB+9~, GETEOB+14*, GEN+9
    IBUSER AUDIT+5~, AUDIT+8*, AUDIT+19
    IBWEB PAY+18~, PAY+33*, PAY+34, PAY+35, PAY+36
    IBWEB3 PAY+18~
    IBX PPR+2~, PPR+3*, PPR+5*, PPR+8, PPR+11, PPR+12
    IBX2 PPR+2~, PPR+7*, PPR+8*, PPR+11, PPR+12
    IBX3 PPR+2~, PPR+10*, PPR+11*, PPR+12
    IEN101 AUDIT+2~, AUDIT+3*, AUDIT+4*, AUDIT+6, AUDIT+34, AUDIT+35
    >> IORVOFF GEN+7, PAY+6, CLVL+5, CLVLA+5
    >> IORVON GEN+7, PAY+6, CLVL+5, CLVLA+5
    ONE SEL~, SEL+2
    OTEXT AUDIT+32~, AUDIT+33*, AUDIT+37*, AUDIT+38*, AUDIT+39, AUDIT+40
    >> RCSCR PAY+22, PAY+32, PAY+33
    RSN CLVLA+1~, CLVLA+13*, CLVLA+14, CLVLA+16, CLVLA+17, CLVLA+20
    SUB AUDIT+32~, AUDIT+33*, AUDIT+34*, AUDIT+35
    U GETEOB+14, SEL+4, SET+8, GEN+10, GEN+13, GEN+14, GEN+17, GEN+20, GEN+21, GEN+25
    GEN+26, GEN+29, GEN+33, GEN+34, GEN+35, GEN+44, GEN+46, GEN+52, GEN+53, GEN+54
    PAY+11, PAY+13, PAY+15, PAY+21, PAY+22, PAY+26, PAY+28, PAY+33, PAY+42, PAY+43
    PAY+45, CLVL+8, CLVL+10, CLVL+12, CLVL+13, CLVL+16, CLVL+17, CLVL+18, CLVL+19, CLVL+20
    CLVL+21, CLVL+22, CLVL+23, CLVL+24, MOUT+7, MOUT+8, MOUT+10, MOUT+12, CLVLA+8, CLVLA+9
    CLVLA+13, CLVLA+16, CLVLA+23, CLVLA+24, PPR+12, AUDIT+7, AUDIT+8, AUDIT+9, AUDIT+10, AUDIT+11
    AUDIT+35
    >> VALMBCK ACT+3*
    VALMBG GETEOB+11~, GETEOB+12*, ACT+2*
    VALMCNT GETEOB+11~, GETEOB+12*, GETEOB+13*, SET+1*, SET+4, SET+6, SET+7, SET+8, GEN+7, GEN+8
    PAY+6, PAY+7, CLVL+5, CLVL+6, CLVLA+5, CLVLA+6
    >> VALMHDR(4 GETEOB+18*
    >> VALMY( SEL+3
    X SET~, SET+4, SET+6, A10~, A10+1, P10~, P10+2
    >> XQORNOD(0 SEL+2
    >> Y CLVLA+7*, CLVLA+8, CLVLA+9, CLVLA+12, CLVLA+13
    Z CLVLA+1~, CLVLA+12*, CLVLA+13
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All