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

Package: Integrated Billing

Routine: IBOHPT1


Information

IBOHPT1 ;ALB/EMG - REPORT OF ON HOLD CHARGES FOR A PATIENT ;JULY 22 1997

Source Information

Source file <IBOHPT1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 3 C^%DTC  ^DIC  ^DIR  
Integrated Billing 2 REPORT^IBOHPT2  ($$FILE,$$SUBFILE)^IBRXUTL  

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

Package Total Caller Graph
Accounts Receivable 1 RCDPEWL2  
Integrated Billing 1 IB OUTPUT HELD CHARGES/PT  

Entry Points

Name Comments DBIA/ICR reference
MAIN ;
  • ICR #4048
    • Status: Active
    • Usage: Private
    QUEUED ; entry point if queued
    EXIT ;
    DEVICE ;
    CHRGS ; charges on hold
    BILLS ; find bills for charges on hold
    INP ; inpatient bills
    INPTCK ; does bill belong to charge? returns IBOK=0 if no
    CK1 ; for same patient?
    CK2 ; same type- inp or opt?
    CK3 ; overlap in date range?
    CK4 ; insurance bill?
    OPT ; outpatient bills
    RX ; rx refill bills

    External References

    Name Field # of Occurrence
    C^%DTC INP+4
    ^%ZIS DEVICE+4
    HOME^%ZIS DEVICE+5
    ^%ZISC EXIT+5
    ^%ZTLOAD DEVICE+5
    ^DIC MAIN+3
    ^DIR MAIN+7, MAIN+10, MAIN+16
    REPORT^IBOHPT2 QUEUED+3
    $$FILE^IBRXUTL RX+8
    $$SUBFILE^IBRXUTL RX+7

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!,*7,"*** Margin width of this output is 132 ***"
    • Line Location: DEVICE+2
    Function Call: WRITE
    • Prompt: !,"*** This output should be queued ***"
    • Line Location: DEVICE+3
    Function Call: WRITE
    • Prompt: !,$S($D(ZTSK):"REQUEST QUEUED TASK="_ZTSK,1:"REQUEST CANCELLED")
    • Line Location: DEVICE+5
    Routine Call
    • DIC
    • Line Location:
      • MAIN+3
    Routine Call
    • DIR
    • Line Location:
      • MAIN+7
      • MAIN+10
      • MAIN+16
    Routine Call
    • %ZIS
    • Line Location:
      • DEVICE+4
    Routine Call
    • %ZIS
    • Line Location:
      • DEVICE+5

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^DPT - [#2] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DGCR(399 - [#399] INP+5, INPTCK+2, OPT+2, OPT+3, OPT+5, RX+15
    ^IB - [#350] CHRGS+2, CHRGS+5, CHRGS+8, CHRGS+14, CHRGS+15, CHRGS+16, INP+3
    ^IB("APDT" CHRGS+6, CHRGS+7, CHRGS+10
    ^IB("C" CHRGS+2
    ^IBA(362.4 - [#362.4] RX+12, RX+13
    ^IBE(350.1 - [#350.1] CHRGS+3, CHRGS+9, BILLS+2
    ^TMP($J QUEUED+2!, EXIT+1!, CHRGS+17*, INP+7*, OPT+4, OPT+6*, RX+16*

    Label References

    Name Line Occurrences
    BILLS CHRGS+17
    CHRGS QUEUED+3
    CK4 OPT+5, RX+15
    DEVICE QUEUED+3
    EXIT MAIN+7, MAIN+10, MAIN+16, QUEUED+4
    INP BILLS+4
    INPTCK INP+6
    OPT BILLS+5
    RX BILLS+6

    Naked Globals

    Name Field # of Occurrence
    ^("U" INPTCK+2

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %ZIS DEVICE+4*
    A CHRGS+1~, CHRGS+9*, CHRGS+10, CHRGS+11
    B CHRGS+1~, CK2+1~*, CK2+2
    C CHRGS+1~, CHRGS+7*, CHRGS+10
    D CHRGS+1~, CHRGS+7*, CHRGS+8, CHRGS+10
    DATE CHRGS+1~, CHRGS+14*, CHRGS+15*, CHRGS+16*, CHRGS+17, INP+7, OPT+4, OPT+6, RX+16
    DFN MAIN+3*, EXIT+2!, CHRGS+2, CK1+1, OPT+2, OPT+3
    DIC MAIN+3*!
    DIC(0 MAIN+3*
    DIR MAIN+7!, MAIN+10!, MAIN+16!
    DIR("?" MAIN+6*, MAIN+9*, MAIN+13*, MAIN+14*, MAIN+15*
    DIR("A" MAIN+5*, MAIN+8*, MAIN+12*
    DIR("B" MAIN+12*
    DIR(0 MAIN+5*, MAIN+8*, MAIN+12*
    DIRUT MAIN+1~, MAIN+7, MAIN+10, MAIN+16
    DPTNOFZY MAIN+2~*
    DTOUT MAIN+1~
    DUOUT MAIN+1~
    E CHRGS+1~, CHRGS+8*, CHRGS+9
    F CK3+1~, CK3+2*, CK3+3
    IBATYPE BILLS+1~, BILLS+2*, BILLS+4, BILLS+5, CK2+2
    IBBILL INP+1~, INP+5*, INP+7, INPTCK+2, OPT+1~, OPT+2*, OPT+3*, OPT+4, OPT+5, OPT+6
    RX+11~*, RX+14*, RX+15, RX+16
    IBBILL0 INPTCK+1~, INPTCK+2*, CK1+1, CK2+1, CK4+1, OPT+1~, OPT+5*, RX+11~, RX+15*
    IBBILLU INPTCK+1~, INPTCK+2*, CK3+2
    IBCN EXIT+2!
    IBDT EXIT+2!
    IBEDT MAIN+10*, EXIT+2!, CHRGS+17
    IBEND EXIT+2!, INP+1~, INP+4*, INP+5
    IBEV INP+1~, INP+2*, INP+3*, INP+4, INP+5
    IBFILL RX+11~, RX+12*, RX+13
    IBFILL0 RX+11~, RX+13*, RX+14
    IBFR BILLS+1~, BILLS+3*, CK3+3, OPT+2
    IBIBRX MAIN+16*, EXIT+2!, CHRGS+3, RX+1
    IBIFN EXIT+2!
    IBII MAIN+1~
    IBN CHRGS+1~, CHRGS+2*, CHRGS+5, CHRGS+6, CHRGS+7, CHRGS+10
    IBND CHRGS+1~, CHRGS+2*, CHRGS+3, CHRGS+4, CHRGS+14, BILLS+2, BILLS+3, INP+2, RX+3, RX+5
    IBNX CHRGS+1~, CHRGS+10*, CHRGS+12*, CHRGS+13*, CHRGS+15, CHRGS+16, CHRGS+17, INP+7, OPT+4, OPT+6
    RX+16
    IBOK INP+1~, INP+7, INPTCK+3*, CK1+2*, CK1+3, CK2+3*, CK2+4, CK3+4*, CK3+5, CK4+2*
    OPT+1~, OPT+5, RX+11~, RX+15
    IBQUIT MAIN+1~*, QUEUED+3, DEVICE+4*, DEVICE+5*
    IBRDT EXIT+3!, RX+2*, RX+7*, RX+8*, RX+10, RX+13
    IBRF EXIT+3!, RX+2*, RX+5*, RX+7, RX+8
    IBRX EXIT+3!, RX+2*, RX+5*, RX+10, RX+12
    IBRXN EXIT+3!, RX+2*, RX+5*, RX+7, RX+8
    IBSDT MAIN+7*, EXIT+2!, CHRGS+17
    IBT BILLS+1~, INP+1~, INP+5*
    IBTO BILLS+1~, BILLS+3*, CK3+3, OPT+2
    IBV OPT+1~, OPT+2*, OPT+3
    IENS RX+2~
    IO DEVICE+6
    >> IO("Q" DEVICE+5
    ION DEVICE+5
    >> POP DEVICE+4
    T CK3+1~, CK3+2*, CK3+3
    U CHRGS+8, CHRGS+9
    X EXIT+2!, INP+1~, INP+4, OPT+1~, RX+11~
    X1 INP+1~, INP+4*
    X2 INP+1~, INP+4*
    Y MAIN+1~, MAIN+3, MAIN+7, MAIN+8, MAIN+10, MAIN+16
    >> ZTDESC DEVICE+5*
    ZTIO MAIN+1~, DEVICE+5*
    >> ZTQUEUED EXIT+4, DEVICE+1
    >> ZTREQ EXIT+4*
    >> ZTRTN DEVICE+5*
    >> ZTSAVE("DFN" DEVICE+5*
    >> ZTSAVE("IB*" DEVICE+5*
    ZTSK DEVICE+5!
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All