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

Package Total Call Graph
Integrated Billing 5 ($$DFN,$$ICN,$$TFL)^IBARXMU  $$ADDSTF^IBCNBES  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

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

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
TASK ; queue off task job
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
FILE(IBX) ; updates data into the log file
EXCTOP ;Plan Types to Exclude
VCHECKX ;
RPC(IBD,IBICN) ; RPC entry for looking up insurance info
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
    DUP(IBARY) ; Check for duplicate in the incoming data
    VALIDQ ;
    TRKR(DFN,IBSAVEI,IBSAVEJ,IBDUZ) ; claims tracking entry
    VCHECK(IBB) ; Check to make sure the record is not duplicate and passes validity check.
    CHECK(IBR,IBH) ; called to check the return status of an RPC
    SEND(IBH,IBX,IBICN,IBRPC) ; called to send off queries
    VALID(IBARY) ; Check for invalid entries in the incoming data
    ADM(DFN,IBSAVE1,IBSAVE2,IBSAVE3,IBSAVE4) ; admit event entry
    RETURN(IBR,IBH) ; called to get the return data and clear the broker
    INDEX(DFN) ;

    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+68
    ALL^IBCNS1 INDEX+15, RPC+3
    ADM^IBTUTL BACKGND+69
    SCH^IBTUTL2 BACKGND+69
    DEM^VADPT BACKGND+9
    $$SITE^VASITE TRKR+5
    $$DT^XLFDT FILE+3
    $$FMADD^XLFDT BACKGND+74, 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
    • DIE
    • Line Location:
      • FILE+7
    Routine Call
    • DIC
    • Line Location:
      • VALID+22
    Routine Call
    • DIC
    • Line Location:
      • AGAIN

    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+74*, TRKR+2
    ^TMP("IBCNRDV" BACKGND+77!, VCHECK+13*, INDEX+1!, INDEX+12*, INDEX+24*, DUP+7

    Label References

    Name Line Occurrences
    $$DUP VCHECK+3
    $$VALID VCHECK+5
    AGAIN BACKGND+5, BACKGND+10, BACKGND+13, BACKGND+22
    CHECK BACKGND+32
    FILE BACKGND+41, BACKGND+44
    INDEX BACKGND+26
    RETURN BACKGND+35
    SEND BACKGND+18
    TASK TRKR+6, ADM+1
    VALIDQ VALID+7, VALID+8, VALID+17, VALID+18, VALID+24
    VCHECK BACKGND+67
    VCHECKX VCHECK+3, VCHECK+5

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % OPT+2~, BACKGND+10*
    %Y OPT+2~
    DA FILE+2~, FILE+3*, FILE+4!*, FILE+5, FILE+6, FILE+8
    DATA VALID+3~, VALID+22*
    DFN OPT+2~, AGAIN*, BACKGND+4, BACKGND+13, BACKGND+26, BACKGND+68, BACKGND+69, BACKGND+74, INDEX~, INDEX+5
    , INDEX+15, RPC+1~, RPC+2*, RPC+3, TRKR~, TRKR+2, TRKR+3, ADM~
    DIC OPT+2~, AGAIN*, FILE+2~, FILE+4*
    DIC(0 AGAIN*, FILE+4*
    DIE FILE+2~, FILE+6*
    DO OPT+2~, FILE+2~
    DR FILE+2~, FILE+7*
    DT BACKGND+74, VALID+7, VALID+11, VALID+13, VALID+18, VALID+27
    DTOUT OPT+2~
    DUOUT OPT+2~
    DUZ TRKR+5~*
    DUZ(2 TRKR+5*
    EXCLUDE VALID+3~, VALID+21*, VALID+22*, VALID+24
    IB1 OPT+2~, BACKGND+69*
    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+2~, BACKGND+67, BACKGND+68*, BACKGND+70, BACKGND+71!, VCHECK~, VCHECK+3, VCHECK+5
    IBB( BACKGND+56*, BACKGND+63, BACKGND+65*, BACKGND+66*, BACKGND+68, BACKGND+69, BACKGND+70, VCHECK+8, VCHECK+9, VCHECK+10
    , VCHECK+11, VCHECK+12
    IBBUFDA INDEX+2~, INDEX+4*, INDEX+5*, INDEX+7, INDEX+8, INDEX+9, INDEX+10, INDEX+11
    IBD OPT+2~, RPC~
    IBD( RPC+22*
    IBD(0 RPC+2*, RPC+4*, RPC+7*
    IBDOB VCHECK+7~, VCHECK+12*, VCHECK+13, 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
    IBGRP VCHECK+7~, VCHECK+9*, VCHECK+13, INDEX+6~, INDEX+8*, INDEX+12, INDEX+17~, INDEX+20*, INDEX+24, DUP+1~
    , DUP+3*, DUP+7
    IBH OPT+2~, BACKGND+18, SEND~, SEND+1, CHECK~, CHECK+1, RETURN~, RETURN+2
    IBH(0 BACKGND+19
    IBI OPT+2~, RPC+1~, RPC+19*, RPC+20, RPC+22
    IBICN OPT+2~, 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+7~, VCHECK+8*, VCHECK+13, INDEX+6~, INDEX+7*, INDEX+12, INDEX+17~, INDEX+19*, INDEX+24, DUP+1~
    , DUP+2*, DUP+7
    IBL OPT+2~, BACKGND+47*, RPC+19*
    IBM FILE+2~, FILE+3*, FILE+4
    IBNAME VCHECK+7~, VCHECK+11*, VCHECK+13, INDEX+6~, INDEX+10*, INDEX+12, INDEX+17~, INDEX+22*, INDEX+24, DUP+1~
    , DUP+5*, DUP+7
    IBOK BACKGND+64~*, BACKGND+67, VCHECK+3*, VCHECK+5*
    IBP BACKGND+29*, BACKGND+50, BACKGND+53, BACKGND+56, RPC+1~, RPC+18*, RPC+20, RPC+21, RPC+22
    IBR OPT+2~, BACKGND+32, BACKGND+34!, BACKGND+35, BACKGND+38, CHECK~, CHECK+1, RETURN~, RETURN+2
    IBR( BACKGND+46, BACKGND+50
    IBR(0 BACKGND+32, BACKGND+33, BACKGND+38, BACKGND+44
    IBR(1 BACKGND+38
    IBRPC SEND~, SEND+1
    IBRZ OPT+2~, BACKGND+38*, BACKGND+41
    IBSAVE1 BACKGND+69, ADM~
    IBSAVE2 BACKGND+69, ADM~
    IBSAVE3 BACKGND+69, ADM~
    IBSAVE4 BACKGND+69, ADM~
    IBSAVEI BACKGND+69, TRKR~
    IBSAVEJ BACKGND+69, TRKR~
    IBSUBID VCHECK+7~, VCHECK+10*, VCHECK+13, INDEX+6~, INDEX+9*, INDEX+12, INDEX+17~, INDEX+21*, INDEX+24, DUP+1~
    , DUP+4*, DUP+7
    IBT OPT+2~, BACKGND+4!*, BACKGND+5, BACKGND+6, BACKGND+9, BACKGND+22, BACKGND+23, BACKGND+29, BACKGND+47*, BACKGND+50
    , BACKGND+53, BACKGND+56, RPC+1~, RPC+19*, RPC+20, RPC+21, RPC+22, TRKR+1~, TRKR+3
    IBT( BACKGND+9, BACKGND+17, BACKGND+29, BACKGND+32, BACKGND+33, BACKGND+35, BACKGND+41!, BACKGND+44, BACKGND+65
    IBTOP VALID+3~, VALID+23*, VALID+24
    IBTYPE OPT+2~, BACKGND+5, BACKGND+9, BACKGND+10, BACKGND+13, BACKGND+18, BACKGND+22, BACKGND+32, BACKGND+33, BACKGND+41
    , BACKGND+44, BACKGND+69, BACKGND+70, TRKR+1~, TRKR+4*, ADM+1~*
    IBWAIT OPT+2~, BACKGND+32*
    IBX OPT+2~, BACKGND+9*, BACKGND+17*, BACKGND+18, BACKGND+29*, BACKGND+32, BACKGND+33, BACKGND+35, BACKGND+41, BACKGND+44
    , BACKGND+65, RPC+1~, SEND~, SEND+1, FILE~, FILE+7
    IBY OPT+2~, BACKGND+46*, BACKGND+50, BACKGND+62, RPC+1~, RPC+4
    IBY( RPC+19, RPC+20
    IBY(0 RPC+7
    IBZ OPT+2~, BACKGND+50*, BACKGND+56, 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+33, BACKGND+41, BACKGND+44, INDEX+18, INDEX+20, INDEX+21, INDEX+22, INDEX+23, VALID+24
    VADM OPT+2~
    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+2~, FILE+2~, FILE+4*
    Y OPT+2~, 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+47, 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