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

Package: Integrated Billing

Routine: IBTRV


Information

IBTRV ;ALB/AAS - CLAIMS TRACKING REVIEWS (UR) ; 27-JUN-1993

Source Information

Source file <IBTRV.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Integrated Billing 6 PAT^IBCNSM  $$DAT1^IBOUTL  $$EXPAND^IBTRE  PRINT^IBTRE20  $$ROIEVT^IBTRR1  $$PT^IBTUTL1  
List Manager 3 EN^VALM  $$SETFLD^VALM1  CLEAN^VALM10  
VA FileMan 2 ^DIC  DT^DICRW  
Kernel 1 DISP^XQORM1  
Registration 1 (INP,KVAR,PID)^VADPT  

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

Package Total Caller Graph
Integrated Billing 22 IBT EDIT REVIEWS  IBT REVIEW EDITOR  IBT SPECIAL UNIT  IBTOBI  IBTONB  IBTOTR  IBTOVS  IBTRC  
IBTRC1  IBTRED2  IBTRV ADD NEXT REVIEW  IBTRV COMMUNICATIONS EDIT  IBTRV DIAGNOSIS  IBTRV PROCEDURE UPDATE  IBTRV PROVIDER UPDATE  IBTRV1  
IBTRV2  IBTRV3  IBTRV31  IBTRVD  IBTRVD0  IBTRVD1  
Utilization Management Rollup 3 IBQL356  IBQLD3  IBQLR3  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point for IBT REVIEW EDITOR from menu's
ENQ
HDR ; -- header code
INIT ; -- init variables and list array
BLD ; -- Build list of Reviews
SET(X) ; -- set arrays
HELP ; -- help code
EXIT ; -- exit code
TRAC ; -- Select tracking entry
TRACQ
DEFV(DFN) ; -- compute default visit for patient
DEFVQ
VNDT(X) ; -- compute vaindt for call to inp^vadtp
; -- Input x = internal entry of review
  • ICR #1327
    • Status: Active
    • Usage: Private
    TRTP(X) ; -- Compute Review type code
    ; Input x = internal entry of review
    ; output = code for review from 356.11
    IBUR(IBTRN) ; -- reason for review
    LIST(DFN,DFLT) ; list 1 screen of most recent CT entries

    External References

    Name Field # of Occurrence
    ^DIC TRAC+17
    DT^DICRW EN+2
    PAT^IBCNSM EN+5
    $$DAT1^IBOUTL HDR+4, BLD+15, BLD+21
    $$EXPAND^IBTRE HDR+4, BLD+18, IBUR+3
    PRINT^IBTRE20 LIST+9, LIST+11
    $$ROIEVT^IBTRR1 HDR+3
    $$PT^IBTUTL1 HDR+2
    INP^VADPT BLD+10, BLD+11
    KVAR^VADPT ENQ+3
    PID^VADPT HDR+1
    EN^VALM EN+8
    $$SETFLD^VALM1 BLD+14, BLD+15, BLD+17, BLD+18, BLD+19, BLD+20, BLD+21, BLD+22, BLD+23, BLD+24
    CLEAN^VALM10 EXIT+2
    DISP^XQORM1 HELP+1

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!
    • Line Location: HELP+1
    Function Call: WRITE
    • Prompt: !!,"Choose from:"
    • Line Location: LIST+3
    Function Call: WRITE
    • Prompt: !," There are no Claims Tracking entries for this patient."
    • Line Location: LIST+6
    Function Call: WRITE
    • Prompt: !," ..."
    • Line Location: LIST+7
    Function Call: WRITE
    • Prompt: !,?3,$P(IBX,U,1)
    • Line Location: LIST+9
    Function Call: WRITE
    • Prompt: !!,?3,$P(IBX,U,1)
    • Line Location: LIST+11
    Function Call: WRITE
    • Prompt: !
    • Line Location: LIST+12
    Routine Call
    • DIC
    • Line Location:
      • TRAC+17
    Routine Call
    • VALM
    • Line Location:
      • EN+8

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^IBT(356 - [#356] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DIC(45.7 - [#45.7] BLD+19
    ^DPT - [#2] DEFV+5
    ^IBE(356.11 - [#356.11] BLD+17, TRTP+3
    ^IBT(356 - [#356] INIT+3, DEFV+3, DEFV+5, DEFV+7, DEFV+8, DEFV+12, DEFV+13, IBUR+2, LIST+4, LIST+5
    , LIST+7, LIST+9, LIST+11
    ^IBT(356.1 - [#356.1] BLD+6, BLD+8, VNDT+3, TRTP+3
    ^TMP("IBTRV" INIT+2!, BLD+1!, SET+2*, SET+3*, EXIT+1!
    ^TMP("IBTRVDX" INIT+2!, BLD+1!, SET+4*, EXIT+1!

    Label References

    Name Line Occurrences
    $$DEFV TRAC+9
    $$IBUR BLD+3
    $$TRTP VNDT+3
    $$VNDT BLD+10
    BLD INIT+3
    DEFVQ DEFV+2, DEFV+3, DEFV+5, DEFV+10, DEFV+14
    ENQ EN+4, EN+5, EN+6
    LIST TRAC+10
    SET BLD+25
    TRAC EN+6
    TRACQ TRAC+2, TRAC+17

    Naked Globals

    Name Field # of Occurrence
    ^(0 DEFV+8, DEFV+13

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    DA INIT+2!
    DFLT LIST~, LIST+11
    DFN EN+3!, ENQ!, HDR+2, TRAC+2, TRAC+9, TRAC+10, DEFV~, DEFV+2, DEFV+3, DEFV+5
    , DEFV+7, DEFV+12, LIST~, LIST+1, LIST+4, LIST+7
    DIC TRAC+1~, TRAC+14*
    DIC("A" TRAC+12*
    DIC("B" TRAC+15*
    DIC("S" TRAC+13*
    DIC(0 TRAC+14*
    DIE INIT+2!
    DNM INIT+2!
    DQ INIT+2!
    DR INIT+2!
    DT EN+2
    I INIT+2!
    I1 ENQ!
    I3 ENQ!
    IBA DEFV+1~, DEFV+5*, LIST+1~
    IBA( LIST+5*, LIST+9
    IBA("" LIST+6
    IBADG ENQ+1!
    IBAMT ENQ+1!
    IBAPEAL ENQ+2!
    IBAPR ENQ+1!
    IBCDFN ENQ+2!
    IBCNT ENQ!, ENQ+2!, BLD+5*, BLD+12*, BLD+14, SET+3, SET+4, LIST+1~*, LIST+4, LIST+5*
    IBDA ENQ+1!
    IBDEN ENQ+2!
    IBDENIAL ENQ+2!
    IBDENT ENQ!
    IBDFLT TRAC+1~, TRAC+9*, TRAC+10, TRAC+15
    IBDGCR ENQ+1!
    IBDGCRU1 ENQ+1!
    IBDV ENQ+1!
    IBETYP ENQ+1!
    IBETYPD ENQ+1!
    IBFASTXT EN+3!, ENQ!
    IBI ENQ!, ENQ+1!, BLD+2~, BLD+5*, BLD+6*
    IBICD ENQ!, ENQ+1!
    IBJ DEFV+1~, DEFV+9*, DEFV+15
    IBLCNT ENQ+1!
    IBNEW ENQ!
    IBOE ENQ!
    IBPARNT ENQ+2!
    IBPEN ENQ+2!
    IBPENAL ENQ+2!
    IBSEL ENQ+1!
    IBT ENQ+1!
    IBTCOD ENQ+2!
    IBTEXT ENQ+1!
    IBTNOD ENQ+1!
    IBTRC EN+3!, ENQ!
    IBTRD EN+3!, ENQ!
    IBTRDD ENQ+2!
    IBTRN EN+3!, ENQ!, HDR+3, INIT+3, BLD+3, BLD+6, TRAC+18*, IBUR~, IBUR+2
    IBTRND ENQ!, HDR+4, INIT+3*, BLD+11, IBUR+1~, IBUR+2*, IBUR+3, IBUR+4
    IBTRPRF EN+7*, ENQ!
    IBTRSV ENQ+2!
    IBTRV EN+3!, ENQ!, BLD+2~, BLD+5*, BLD+6*, BLD+8, BLD+10, SET+4, EXIT+2!
    IBTRVD BLD+2~, BLD+8*, BLD+9, BLD+15, BLD+17, BLD+18, BLD+19, BLD+20, BLD+21
    IBTSAV ENQ+1!
    IBTYPE ENQ+2!
    IBUR BLD+2~, BLD+3*, BLD+4, BLD+24, IBUR+1~, IBUR+2*, IBUR+3*, IBUR+4*, IBUR+5
    IBX DEFV+1~, DEFV+7*, DEFV+8, DEFV+9, DEFV+12*, LIST+1~, LIST+9*, LIST+11*
    IBXR HDR+1~, HDR+3*
    IBY TRAC+17*, DEFV+1~, DEFV+7*, DEFV+8, DEFV+12*, DEFV+13, LIST+1~, LIST+4*, LIST+5, LIST+7
    , LIST+9*, LIST+11*
    J BLD+2~
    OFFSET ENQ!
    SDCNT ENQ!
    T ENQ!
    U INIT+1*, LIST+5, LIST+9, LIST+11
    VA ENQ!, ENQ+2!
    VA200 ENQ!
    VAERR ENQ!
    VAIN BLD+10~
    VAIN(4 BLD+11, BLD+22
    VAIN(5 BLD+23
    VAINDT ENQ!, ENQ+2!, BLD+10~*, BLD+11*
    VALMBCK ENQ!
    >> VALMBG INIT+1*
    >> VALMCNT INIT+1*, BLD+5*, SET+1*, SET+2, SET+3, SET+4
    VALMEVL EN+3!, ENQ!
    >> VALMHDR(1 HDR+2*, HDR+3*
    >> VALMHDR(2 HDR+4*
    VALMQUIT EN+3!, EN+4, EN+5, EN+6, ENQ!, TRAC+2*, TRAC+17*
    >> VALMSG BLD+4*
    VAUTD ENQ+1!
    X ENQ!, INIT+2!, BLD+13*, BLD+14*, BLD+15*, BLD+17*, BLD+18*, BLD+19*, BLD+20*, BLD+21*
    , BLD+22*, BLD+23*, BLD+24*, BLD+25, SET~, SET+2, HELP+1*, TRAC+1~, DEFV+1~*, DEFV+5*
    , DEFV+8*, DEFV+10, DEFV+13*, DEFV+14, DEFV+15*, DEFVQ, VNDT~, VNDT+3, TRTP~, TRTP+3
    XQORNOD INIT+2!
    XQORS EN+3!, ENQ!
    Y ENQ!, TRAC+1~, TRAC+17, TRAC+18, VNDT+2~*, VNDT+3*, VNDT+4
    Z1 ENQ!
    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