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 |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: IBCNRDV

Package: Integrated Billing

Routine: IBCNRDV


Information

IBCNRDV ;OAKFO/ELZ - INSURANCE INFORMATION EXCHANGE VIA RDV ;27-MAR-03

Source Information

Source file <IBCNRDV.m>

Call Graph

Call Graph

Call Graph Total: 17

Package Total Call Graph
Integrated Billing 6 ($$DFN,$$ICN,$$TFL)^IBARXMU  $$ADDSTF^IBCNBES  EN^IBCNRDV1  ALL^IBCNS1  ADM^IBTUTL  SCH^IBTUTL2  
VA FileMan 4 (,$$FIND1)^DIC  (FILE,YN)^DICN  ^DIE  $$GET1^DIQ  
Kernel 3 ^%ZTLOAD  ($$DT,$$FMADD,$$FMDIFF,$$NOW)^XLFDT  $$IEN^XUAF4  
RPC Broker 2 (EN1,RPCCHK)^XWB2HL7  (CLEAR,RTNDATA)^XWBDRPC  
Registration 2 DEM^VADPT  $$SITE^VASITE  

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

Package Total Caller Graph
Integrated Billing 6 IBCN INSURANCE QUERY  IBCN INSURANCE QUERY TASK  IBCN REMOTE INSURANCE QUERY  IBCNIUH1  IBTRKR  IBTRKR2  

Entry Points

Name Comments DBIA/ICR reference
OPT ; Menu option entry point. This is used to select a patient to request
; information about from the remote treating facilities.
AGAIN
BACKGND ; background/tasked entry point
; IBTYPE is being used as a flag to indicate this is running in background
  • ICR #4288
    • Status: Active
    • Usage: Private
  • ICR #7473
    • Status: Active
    • Usage: Private
    VCHECK(IBB) ; Check to make sure the record is not duplicate and passes validity check.
    VCHECKX ;
    INDEX(DFN) ;
    RPC(IBD,IBICN) ; RPC entry for looking up insurance info
    MAP ; this is a mapping of data returned from ALL^IBCNS1 to the buffer file
    ; format is: node number | piece | extract node | extract piece
    ; | 355.33 field number | format out code (if any)
    ; | format in code (if any)
    ; the extract nodes will be sequential to match buffer file DD
    SEND(IBH,IBX,IBICN,IBRPC) ; called to send off queries
    CHECK(IBR,IBH) ; called to check the return status of an RPC
    RETURN(IBR,IBH) ; called to get the return data and clear the broker
    TASK ; queue off task job
    TRKR(DFN,IBSAVEI,IBSAVEJ,IBDUZ) ; claims tracking entry
    ADM(DFN,IBSAVE1,IBSAVE2,IBSAVE3,IBSAVE4) ; admit event entry
    FILE(IBX) ; updates data into the log file
    VALID(IBARY) ; Check for invalid entries in the incoming data
    VALIDQ ;
    DUP(IBARY) ; Check for duplicate in the incoming data
    EXCTOP ;Plan Types to Exclude

    External References

    Name Field # of Occurrence
    ^%ZTLOAD TASK+2
    ^DIC AGAIN
    $$FIND1^DIC VALID+22
    FILE^DICN FILE+4
    YN^DICN BACKGND+14
    ^DIE FILE+7
    $$GET1^DIQ BACKGND+5, INDEX+7, INDEX+8, INDEX+9, INDEX+10, INDEX+11, INDEX+19
    $$DFN^IBARXMU RPC+2
    $$ICN^IBARXMU BACKGND+17
    $$TFL^IBARXMU BACKGND+8, TRKR+3
    $$ADDSTF^IBCNBES BACKGND+76
    EN^IBCNRDV1 BACKGND+82
    ALL^IBCNS1 INDEX+15, RPC+3
    ADM^IBTUTL BACKGND+78
    SCH^IBTUTL2 BACKGND+78
    DEM^VADPT BACKGND+13
    $$SITE^VASITE TRKR+5
    $$DT^XLFDT FILE+3
    $$FMADD^XLFDT BACKGND+85, TASK+2
    $$FMDIFF^XLFDT VALID+7, VALID+11, VALID+13, VALID+18
    $$NOW^XLFDT TASK+2
    $$IEN^XUAF4 BACKGND+69
    EN1^XWB2HL7 SEND+1
    RPCCHK^XWB2HL7 CHECK+1
    CLEAR^XWBDRPC RETURN+2
    RTNDATA^XWBDRPC RETURN+2

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!,"This patient has no remote treating facilities to query."
    • Line Location: BACKGND+9
    Function Call: WRITE
    • Prompt: !!,"The patient ",VADM(1)," has the following ",IBT," remote facilitie(s)",!
    • Line Location: BACKGND+13
    Function Call: WRITE
    • Prompt: !?10,$P(IBT(IBX),"^",2)
    • Line Location: BACKGND+13
    Function Call: WRITE
    • Prompt: !!,"No ICN for this patient"
    • Line Location: BACKGND+17
    Function Call: WRITE
    • Prompt: !!,"Unable to perform any remote queries.",!
    • Line Location: BACKGND+26
    Routine Call
    • DIC
    • Line Location:
      • AGAIN
    Routine Call
    • DIC
    • Line Location:
      • VALID+22
    Routine Call
    • DIE
    • Line Location:
      • FILE+7

    Used in RPC

    RPC Name Call Tags
    IBCN INSURANCE QUERY RPC
    IBCN INSURANCE QUERY TASK RPC

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^DPT - [#2] Classic Fileman Calls
    ^IBE(350.9 - [#350.9] GET1^DIQ
    ^IBE(355.1 - [#355.1] FIND1^DIC
    ^IBA(355.33 - [#355.33] GET1^DIQ
    ^IBA(355.34 - [#355.34] Classic Fileman Calls
    ^DIC(36 - [#36] GET1^DIQ

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^IBA(355.33 - [#355.33] INDEX+5
    ^IBA(355.34 - [#355.34] FILE+3, FILE+4, FILE+5, FILE+6, FILE+8
    ^IBE(355.12 - [#355.12] BACKGND+70
    ^IBT(356 - [#356] BACKGND+85*, TRKR+2
    ^TMP("IBCNRDV" VCHECK+16*, INDEX+1!, INDEX+12*, INDEX+24*, DUP+7
    ^TMP($J BACKGND+74, BACKGND+75*, BACKGND+82, BACKGND+88!

    Label References

    Name Line Occurrences
    $$DUP VCHECK+4
    $$VALID VCHECK+6
    AGAIN BACKGND+9, BACKGND+14, BACKGND+17, BACKGND+26
    CHECK BACKGND+37
    FILE BACKGND+46, BACKGND+49
    INDEX BACKGND+31
    RETURN BACKGND+40
    SEND BACKGND+22
    TASK TRKR+6, ADM+1
    VALIDQ VALID+7, VALID+8, VALID+17, VALID+18, VALID+24
    VCHECK BACKGND+71
    VCHECKX VCHECK+4, VCHECK+6, VCHECK+8

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % OPT+3~, BACKGND+14*
    %Y OPT+3~
    CTR OPT+3~, BACKGND+74*, BACKGND+75
    DA FILE+2~, FILE+3*, FILE+4!*, FILE+5, FILE+6, FILE+8
    DATA VALID+3~, VALID+22*
    DFN OPT+3~, AGAIN*, BACKGND+8, BACKGND+17, BACKGND+31, BACKGND+76, BACKGND+78, BACKGND+85, INDEX~, INDEX+5
    , INDEX+15, RPC+1~, RPC+2*, RPC+3, TRKR~, TRKR+2, TRKR+3, ADM~
    DIC OPT+3~, AGAIN*, FILE+2~, FILE+4*
    DIC(0 AGAIN*, FILE+4*
    DIE FILE+2~, FILE+6*
    DO OPT+3~, FILE+2~
    DR FILE+2~, FILE+7*
    DT BACKGND+85, VALID+7, VALID+11, VALID+13, VALID+18, VALID+27
    DTOUT OPT+3~
    DUOUT OPT+3~
    DUZ TRKR+5~*
    DUZ(2 TRKR+5*
    EXCLUDE VALID+3~, VALID+21*, VALID+22*, VALID+24
    IB1 OPT+3~, BACKGND+78*
    IBARY VALID~, VALIDQ+1!, DUP~
    IBARY( VALID+6, VALID+10, VALID+11, VALID+13, VALID+16, VALID+23, VALID+27*, VALID+28*, VALID+29*, VALID+30*
    , DUP+2, DUP+3, DUP+4, DUP+5, DUP+6
    IBB OPT+3~, BACKGND+71, BACKGND+75, BACKGND+76*, BACKGND+79!, VCHECK~, VCHECK+4, VCHECK+6
    IBB( BACKGND+62*, BACKGND+67, BACKGND+69*, BACKGND+70*, BACKGND+76, VCHECK+11, VCHECK+12, VCHECK+13, VCHECK+14, VCHECK+15
    IBBUFDA INDEX+2~, INDEX+4*, INDEX+5*, INDEX+7, INDEX+8, INDEX+9, INDEX+10, INDEX+11
    IBD OPT+3~, RPC~
    IBD( RPC+22*
    IBD(0 RPC+2*, RPC+4*, RPC+7*
    IBDOB VCHECK+10~, VCHECK+15*, VCHECK+16, INDEX+6~, INDEX+11*, INDEX+12, INDEX+17~, INDEX+23*, INDEX+24, DUP+1~
    , DUP+6*, DUP+7
    IBDUZ TRKR~, TRKR+5
    IBEFFDT VALID+3~, VALID+16*, VALID+17, VALID+18
    IBEXPDT VALID+3~, VALID+6*, VALID+7, VALID+8
    IBFASTXT OPT+3~
    IBGRP VCHECK+10~, VCHECK+12*, VCHECK+16, INDEX+6~, INDEX+8*, INDEX+12, INDEX+17~, INDEX+20*, INDEX+24, DUP+1~
    , DUP+3*, DUP+7
    IBH OPT+3~, BACKGND+22, SEND~, SEND+1, CHECK~, CHECK+1, RETURN~, RETURN+2
    IBH(0 BACKGND+23
    IBI OPT+3~, RPC+1~, RPC+19*, RPC+20, RPC+22
    IBICN OPT+3~, BACKGND+17*, BACKGND+18, BACKGND+22, RPC~, RPC+2, SEND~, SEND+1
    IBIEN INDEX+2~, INDEX+16*, INDEX+18, INDEX+20, INDEX+21, INDEX+22, INDEX+23
    IBINS INDEX+14!, INDEX+25!
    IBINS( INDEX+16, INDEX+18, INDEX+20, INDEX+21, INDEX+22, INDEX+23
    IBINS(0 INDEX+16
    IBINSIEN INDEX+17~, INDEX+18*, INDEX+19
    IBINSNM VCHECK+10~, VCHECK+11*, VCHECK+16, INDEX+6~, INDEX+7*, INDEX+12, INDEX+17~, INDEX+19*, INDEX+24, DUP+1~
    , DUP+2*, DUP+7
    IBL OPT+3~, BACKGND+52*, RPC+19*
    IBM FILE+2~, FILE+3*, FILE+4
    IBNAME VCHECK+10~, VCHECK+14*, VCHECK+16, INDEX+6~, INDEX+10*, INDEX+12, INDEX+17~, INDEX+22*, INDEX+24, DUP+1~
    , DUP+5*, DUP+7
    IBOK BACKGND+68~*, BACKGND+71, VCHECK+4*, VCHECK+6*
    IBP BACKGND+34*, BACKGND+56, BACKGND+59, BACKGND+62, RPC+1~, RPC+18*, RPC+20, RPC+21, RPC+22
    IBR OPT+3~, BACKGND+37, BACKGND+39!, BACKGND+40, BACKGND+43, CHECK~, CHECK+1, RETURN~, RETURN+2
    IBR( BACKGND+51, BACKGND+56
    IBR(0 BACKGND+37, BACKGND+38, BACKGND+43, BACKGND+49
    IBR(1 BACKGND+43
    IBRPC SEND~, SEND+1
    IBRZ OPT+3~, BACKGND+43*, BACKGND+46
    IBSAVE1 BACKGND+78, ADM~
    IBSAVE2 BACKGND+78, ADM~
    IBSAVE3 BACKGND+78, ADM~
    IBSAVE4 BACKGND+78, ADM~
    IBSAVEI BACKGND+78, TRKR~
    IBSAVEJ BACKGND+78, TRKR~
    IBSUBID VCHECK+10~, VCHECK+13*, VCHECK+16, INDEX+6~, INDEX+9*, INDEX+12, INDEX+17~, INDEX+21*, INDEX+24, DUP+1~
    , DUP+4*, DUP+7
    IBT OPT+3~, BACKGND+8!*, BACKGND+9, BACKGND+10, BACKGND+13, BACKGND+26, BACKGND+27, BACKGND+34, BACKGND+52*, BACKGND+56
    , BACKGND+59, BACKGND+62, RPC+1~, RPC+19*, RPC+20, RPC+21, RPC+22, TRKR+1~, TRKR+3
    IBT( BACKGND+13, BACKGND+21, BACKGND+34, BACKGND+37, BACKGND+38, BACKGND+40, BACKGND+46!, BACKGND+49, BACKGND+69
    IBTOP VALID+3~, VALID+23*, VALID+24
    IBTYPE OPT+3~, BACKGND+5, BACKGND+9, BACKGND+13, BACKGND+14, BACKGND+17, BACKGND+22, BACKGND+26, BACKGND+31, BACKGND+37
    , BACKGND+38, BACKGND+46, BACKGND+49, BACKGND+73, BACKGND+78, BACKGND+82, VCHECK+4, VCHECK+8, TRKR+1~, TRKR+4*
    , ADM+1~*
    IBWAIT OPT+3~, BACKGND+37*
    IBX OPT+3~, BACKGND+13*, BACKGND+21*, BACKGND+22, BACKGND+34*, BACKGND+37, BACKGND+38, BACKGND+40, BACKGND+46, BACKGND+49
    , BACKGND+69, RPC+1~, SEND~, SEND+1, FILE~, FILE+7
    IBY OPT+3~, BACKGND+51*, BACKGND+56, BACKGND+66, RPC+1~, RPC+4
    IBY( RPC+19, RPC+20
    IBY(0 RPC+7
    IBZ OPT+3~, BACKGND+56*, BACKGND+62, RPC+1~, RPC+20*, RPC+22, RETURN+1~, RETURN+2, FILE+2~, FILE+6*
    , FILE+7
    LN VALID+3~, VALID+22*
    TAG VALID+3~, VALID+22*
    U BACKGND+38, BACKGND+46, BACKGND+49, INDEX+18, INDEX+20, INDEX+21, INDEX+22, INDEX+23, VALID+24
    VADM OPT+3~
    VADM(1 BACKGND+13
    VALID VALID+3~, VALID+4*, VALID+7*, VALID+8, VALID+11*, VALID+13*, VALID+17*, VALID+18*, VALID+24*, VALIDQ+1
    , VALIDQ+2
    X OPT+3~, FILE+2~, FILE+4*
    Y OPT+3~, AGAIN, FILE+2~, FILE+4
    ZTDESC TASK+1~, TASK+2*
    ZTDTH TASK+1~, TASK+2*
    ZTIO TASK+1~, TASK+2*
    ZTRTN TASK+1~, TASK+2*
    ZTSAVE TASK+1~
    ZTSAVE("DFN" TASK+2*
    ZTSAVE("IBSAVE*" TASK+2*
    ZTSAVE("IBTYPE" TASK+2*
    ZTSK TASK+1~

    Marked Items

    Name Field # of Occurrence
    $T(@TAG VALID+22
    $T(MAP+IBL BACKGND+52, RPC+19
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All