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

Package Total Caller Graph
Integrated Billing 5 IBCN INSURANCE QUERY  IBCN INSURANCE QUERY TASK  IBCN REMOTE INSURANCE QUERY  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
    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+10
    ^DIE FILE+7
    $$GET1^DIQ INDEX+7, INDEX+8, INDEX+9, INDEX+10, INDEX+11, INDEX+19
    $$DFN^IBARXMU RPC+2
    $$ICN^IBARXMU BACKGND+13
    $$TFL^IBARXMU BACKGND+4, TRKR+3
    $$ADDSTF^IBCNBES BACKGND+72
    EN^IBCNRDV1 BACKGND+78
    ALL^IBCNS1 INDEX+15, RPC+3
    ADM^IBTUTL BACKGND+74
    SCH^IBTUTL2 BACKGND+74
    DEM^VADPT BACKGND+9
    $$SITE^VASITE TRKR+5
    $$DT^XLFDT FILE+3
    $$FMADD^XLFDT BACKGND+81, TASK+2
    $$FMDIFF^XLFDT VALID+7, VALID+11, VALID+13, VALID+18
    $$NOW^XLFDT TASK+2
    $$IEN^XUAF4 BACKGND+65
    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+5
    Function Call: WRITE
    • Prompt: !!,"The patient ",VADM(1)," has the following ",IBT," remote facilitie(s)",!
    • Line Location: BACKGND+9
    Function Call: WRITE
    • Prompt: !?10,$P(IBT(IBX),"^",2)
    • Line Location: BACKGND+9
    Function Call: WRITE
    • Prompt: !!,"No ICN for this patient"
    • Line Location: BACKGND+13
    Function Call: WRITE
    • Prompt: !!,"Unable to perform any remote queries.",!
    • Line Location: BACKGND+22
    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(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+66
    ^IBT(356 - [#356] BACKGND+81*, TRKR+2
    ^TMP("IBCNRDV" VCHECK+16*, INDEX+1!, INDEX+12*, INDEX+24*, DUP+7
    ^TMP($J BACKGND+70, BACKGND+71*, BACKGND+78, BACKGND+84!

    Label References

    Name Line Occurrences
    $$DUP VCHECK+4
    $$VALID VCHECK+6
    AGAIN BACKGND+5, BACKGND+10, BACKGND+13, BACKGND+22
    CHECK BACKGND+33
    FILE BACKGND+42, BACKGND+45
    INDEX BACKGND+27
    RETURN BACKGND+36
    SEND BACKGND+18
    TASK TRKR+6, ADM+1
    VALIDQ VALID+7, VALID+8, VALID+17, VALID+18, VALID+24
    VCHECK BACKGND+67
    VCHECKX VCHECK+4, VCHECK+6, VCHECK+8

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % OPT+3~, BACKGND+10*
    %Y OPT+3~
    CTR OPT+3~, BACKGND+70*, BACKGND+71
    DA FILE+2~, FILE+3*, FILE+4!*, FILE+5, FILE+6, FILE+8
    DATA VALID+3~, VALID+22*
    DFN OPT+3~, AGAIN*, BACKGND+4, BACKGND+13, BACKGND+27, BACKGND+72, BACKGND+74, BACKGND+81, 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+81, 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+74*
    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+67, BACKGND+71, BACKGND+72*, BACKGND+75!, VCHECK~, VCHECK+4, VCHECK+6
    IBB( BACKGND+58*, BACKGND+63, BACKGND+65*, BACKGND+66*, BACKGND+72, 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+18, SEND~, SEND+1, CHECK~, CHECK+1, RETURN~, RETURN+2
    IBH(0 BACKGND+19
    IBI OPT+3~, RPC+1~, RPC+19*, RPC+20, RPC+22
    IBICN OPT+3~, BACKGND+13*, BACKGND+14, BACKGND+18, 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+48*, 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+64~*, BACKGND+67, VCHECK+4*, VCHECK+6*
    IBP BACKGND+30*, BACKGND+52, BACKGND+55, BACKGND+58, RPC+1~, RPC+18*, RPC+20, RPC+21, RPC+22
    IBR OPT+3~, BACKGND+33, BACKGND+35!, BACKGND+36, BACKGND+39, CHECK~, CHECK+1, RETURN~, RETURN+2
    IBR( BACKGND+47, BACKGND+52
    IBR(0 BACKGND+33, BACKGND+34, BACKGND+39, BACKGND+45
    IBR(1 BACKGND+39
    IBRPC SEND~, SEND+1
    IBRZ OPT+3~, BACKGND+39*, BACKGND+42
    IBSAVE1 BACKGND+74, ADM~
    IBSAVE2 BACKGND+74, ADM~
    IBSAVE3 BACKGND+74, ADM~
    IBSAVE4 BACKGND+74, ADM~
    IBSAVEI BACKGND+74, TRKR~
    IBSAVEJ BACKGND+74, 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+4!*, BACKGND+5, BACKGND+6, BACKGND+9, BACKGND+22, BACKGND+23, BACKGND+30, BACKGND+48*, BACKGND+52
    BACKGND+55, BACKGND+58, RPC+1~, RPC+19*, RPC+20, RPC+21, RPC+22, TRKR+1~, TRKR+3
    IBT( BACKGND+9, BACKGND+17, BACKGND+30, BACKGND+33, BACKGND+34, BACKGND+36, BACKGND+42!, BACKGND+45, BACKGND+65
    IBTOP VALID+3~, VALID+23*, VALID+24
    IBTYPE OPT+3~, BACKGND+5, BACKGND+9, BACKGND+10, BACKGND+13, BACKGND+18, BACKGND+22, BACKGND+27, BACKGND+33, BACKGND+34
    BACKGND+42, BACKGND+45, BACKGND+69, BACKGND+74, BACKGND+78, VCHECK+4, VCHECK+8, TRKR+1~, TRKR+4*, ADM+1~*
    IBWAIT OPT+3~, BACKGND+33*
    IBX OPT+3~, BACKGND+9*, BACKGND+17*, BACKGND+18, BACKGND+30*, BACKGND+33, BACKGND+34, BACKGND+36, BACKGND+42, BACKGND+45
    BACKGND+65, RPC+1~, SEND~, SEND+1, FILE~, FILE+7
    IBY OPT+3~, BACKGND+47*, BACKGND+52, BACKGND+62, RPC+1~, RPC+4
    IBY( RPC+19, RPC+20
    IBY(0 RPC+7
    IBZ OPT+3~, BACKGND+52*, BACKGND+58, 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+34, BACKGND+42, BACKGND+45, INDEX+18, INDEX+20, INDEX+21, INDEX+22, INDEX+23, VALID+24
    VADM OPT+3~
    VADM(1 BACKGND+9
    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+48, 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