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

Package: Integrated Billing

Routine: IBCNICB


Information

IBCNICB ;ALB/SBW - Update utilities for the ICB interface ;1 SEP 2009

Source Information

Source file <IBCNICB.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Integrated Billing 4 (PROCESS,REJPROC)^IBCNBAR  $$EXACTM^IBCNICB2  ($$SUBS,DBU,DEL)^IBCNSJ  ($$IR,BU)^IBCNSJ21  
VA FileMan 3 (,FILE,UPDATE,WP)^DIE  $$EXTERNAL^DILFD  $$GET1^DIQ  
Kernel 1 $$NOW^XLFDT  

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

Package Total Caller Graph
Integrated Billing 1 IBCNBAR  

Entry Points

Name Comments DBIA/ICR reference
ACCEPAPI(RESULT,IBBUFDA,DFN,IBINSDA,IBGRPDA,IBPOLDA,IBMVINS,IBMVGRP,IBMVPOL,IBNEWINS,IBNEWGRP,IBNEWPOL,IVMREPTR,IBELIG) ;
REJECAPI(RESULT,IBBUFDA,IVMREPTR) ;
UPDTICB(RESULT,DFN,IBPOLDA,IBGRPDA,IBPOLCOM,IBPOLBIL,IBPLAN,IBELEC,IBGPCOM,IBFTF,IBFTFVAL) ;
PPCOMM(DFN,IBPOLDA,IBPOLCOM,RESULT) ; ib*2*528 record patient policy comments
; Input:
; DFN = patient IEN
; IBPOLDA = ien of selected INSURANCE POLICY at ^DPT("_DFN_",.312,
; IBPOLCOM = patient policy COMMENT data
ADCOM(DFN,IBPOLDA,IBPOLCOM,RESULT) ; add new entry to the COMMENT - SUBSCRIBER POLICY multiple
; Input:
; DFN = patient IEN
; IBPOLDA = ien of INSURANCE POLICY at ^DPT("_DFN_",.312,
; IBPOLCOM = patient policy COMMENT data
; DUZ = user IEN - system wide variable
EDCOM(IBPOLDA,IBPOLCOM,IBDT) ; edit the existing entry at 2.312,1.18 multiple
; input - IBPOLDA = ien of INSURANCE POLICY at ^DPT("_DFN_",.312,
; IBDT = date/time that comment was made
UPDPOL(RESULT,IBBUFDA,DFN,IBINSDA,IBGRPDA,IBPOLDA) ;update a new group into
CLEANUP ;This logic will delete obsolete Individual Plans, Repoint Insurance
DELBU ;Delete Benefits Used

External References

Name Field # of Occurrence
^DIE EDCOM+12
FILE^DIE UPDTICB+52, UPDTICB+75, UPDPOL+45, CLEANUP+18
UPDATE^DIE ADCOM+22
WP^DIE UPDTICB+78
$$EXTERNAL^DILFD UPDTICB+50, UPDTICB+66, UPDTICB+68
$$GET1^DIQ REJECAPI+24, UPDTICB+69, EDCOM+9
PROCESS^IBCNBAR ACCEPAPI+89
REJPROC^IBCNBAR REJECAPI+25
$$EXACTM^IBCNICB2 ACCEPAPI+74
$$SUBS^IBCNSJ ACCEPAPI+87, CLEANUP+8
DBU^IBCNSJ DELBU+9
DEL^IBCNSJ CLEANUP+8
$$IR^IBCNSJ21 CLEANUP+12
BU^IBCNSJ21 DELBU+4
$$NOW^XLFDT ADCOM+17, EDCOM+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
2.312 EXTERNAL^DILFD
^VA(200 - [#200] GET1^DIQ
^IBE(355.13 - [#355.13] GET1^DIQ
^IBA(355.3 - [#355.3] EXTERNAL^DILFD,  WP^DIE
^IBA(355.33 - [#355.33] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(36 - [#36] ACCEPAPI+63, UPDPOL+28
^DPT - [#2] ACCEPAPI+77, UPDTICB+46, UPDTICB+47, UPDTICB+54, PPCOMM+13, PPCOMM+14, ADCOM+11, ADCOM+29, EDCOM+5, EDCOM+10
, UPDPOL+18, UPDPOL+22, UPDPOL+34, UPDPOL+48, CLEANUP+3
^IBA(355.3 - [#355.3] ACCEPAPI+65, ACCEPAPI+79, ACCEPAPI+81, UPDTICB+62, UPDTICB+63, UPDTICB+79, UPDPOL+27, UPDPOL+29, UPDPOL+30, CLEANUP+5
^IBA(355.33 - [#355.33] ACCEPAPI+50, ACCEPAPI+87, UPDPOL+42, UPDPOL+44
^IBT(356.2 - [#356.2] CLEANUP+14, CLEANUP+15
^XUSEC("IB GROUP PLAN EDIT" ACCEPAPI+70
^XUSEC("IB INSURANCE COMPANY EDIT" ACCEPAPI+68

Label References

Name Line Occurrences
ADCOM PPCOMM+17, PPCOMM+23
CLEANUP UPDPOL+32
DELBU CLEANUP+20
PPCOMM UPDTICB+53

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EDCOM+3~, EDCOM+5*, EDCOM+10
DA(1 EDCOM+7*
DA(2 EDCOM+7*
DFN ACCEPAPI~, ACCEPAPI+57, ACCEPAPI+77, ACCEPAPI+81, UPDTICB~, UPDTICB+44, UPDTICB+46, UPDTICB+47, UPDTICB+48, UPDTICB+53
, UPDTICB+54, PPCOMM~, PPCOMM+13, PPCOMM+14, PPCOMM+17, PPCOMM+23, ADCOM~, ADCOM+11, ADCOM+16, ADCOM+29
, EDCOM+5, EDCOM+6, EDCOM+7, EDCOM+10, UPDPOL~, UPDPOL+16, UPDPOL+18, UPDPOL+22, UPDPOL+34, UPDPOL+37
, UPDPOL+48, CLEANUP+3, CLEANUP+8, CLEANUP+12, CLEANUP+14
DIE EDCOM+3~, EDCOM+6*
DIERR ADCOM+13~, ADCOM+25
DR EDCOM+3~, EDCOM+10*, EDCOM+11*
DUZ ACCEPAPI+68, ACCEPAPI+70, ADCOM+18, EDCOM+5, EDCOM+9
FDA ADCOM+13~
FDA( ADCOM+17*, ADCOM+18*, ADCOM+19*
IBARR CLEANUP+2~
IBARR( CLEANUP+8
IBBU DELBU+1~
IBBU( DELBU+9
IBBU(0 DELBU+6
IBBUFDA ACCEPAPI~, ACCEPAPI+50, ACCEPAPI+52, ACCEPAPI+74, ACCEPAPI+87, REJECAPI~, REJECAPI+22, REJECAPI+24, UPDPOL~, UPDPOL+15
, UPDPOL+42, UPDPOL+44
>> IBCDA PPCOMM+14*
IBCDFN DELBU+1~, DELBU+2*
IBDAT DELBU+7~, DELBU+8*, DELBU+9*
IBDT PPCOMM+9~, PPCOMM+13*, PPCOMM+14, EDCOM~, EDCOM+5
IBELEC UPDTICB~, UPDTICB+59, UPDTICB+66*, UPDTICB+72
IBELIG ACCEPAPI~, ACCEPAPI+48*
IBERR UPDPOL+36~, UPDPOL+46, UPDPOL+47
IBFDA UPDTICB+43~, UPDTICB+52, UPDTICB+60~, UPDTICB+75
IBFDA( UPDTICB+51*, UPDTICB+71*, UPDTICB+72*, UPDTICB+73*, UPDTICB+74*
IBFIELDS UPDPOL+36~, UPDPOL+40, CLEANUP+2~
IBFIELDS( UPDPOL+38*, UPDPOL+39*, UPDPOL+42*, UPDPOL+44*, CLEANUP+17*
IBFTF UPDTICB~, UPDTICB+59, UPDTICB+67, UPDTICB+68*, UPDTICB+69*, UPDTICB+73
IBFTFVAL UPDTICB~, UPDTICB+59, UPDTICB+67*, UPDTICB+69*, UPDTICB+74
IBGPCOM UPDTICB~, UPDTICB+59
IBGPCOM("" UPDTICB+78
IBGRPDA ACCEPAPI~, ACCEPAPI+58*, ACCEPAPI+65, ACCEPAPI+79, ACCEPAPI+81, ACCEPAPI+87, UPDTICB~, UPDTICB+61, UPDTICB+62, UPDTICB+63
, UPDTICB+64, UPDTICB+78, UPDTICB+79, UPDPOL~, UPDPOL+19, UPDPOL+23, UPDPOL+24, UPDPOL+27, UPDPOL+29, UPDPOL+30
, UPDPOL+39
IBIENS UPDTICB+43~, UPDTICB+48*, UPDTICB+51, UPDTICB+60~, UPDTICB+64*, UPDTICB+71, UPDTICB+72, UPDTICB+73, UPDTICB+74
IBINSDA ACCEPAPI~, ACCEPAPI+58*, ACCEPAPI+63, ACCEPAPI+74, ACCEPAPI+79, ACCEPAPI+87, UPDPOL~, UPDPOL+23, UPDPOL+24, UPDPOL+28
, UPDPOL+29, UPDPOL+30, UPDPOL+38, CLEANUP+10, CLEANUP+16, CLEANUP+17
IBIP CLEANUP+2~, CLEANUP+5*, CLEANUP+8
IBMVGRP ACCEPAPI~, ACCEPAPI+59*
IBMVINS ACCEPAPI~, ACCEPAPI+59*
IBMVPOL ACCEPAPI~, ACCEPAPI+59*
IBNEWGRP ACCEPAPI~, ACCEPAPI+60*, ACCEPAPI+70, ACCEPAPI+74
IBNEWINS ACCEPAPI~, ACCEPAPI+60*, ACCEPAPI+68, ACCEPAPI+74
IBNEWPOL ACCEPAPI~, ACCEPAPI+60*
IBNM EDCOM+3~, EDCOM+9*, EDCOM+10
IBOLDGRP CLEANUP+2~, CLEANUP+4*, CLEANUP+8, DELBU+2
IBOLDINS CLEANUP+2~, CLEANUP+4*, CLEANUP+8, CLEANUP+10
IBPAT UPDPOL+14~, UPDPOL+22*, UPDPOL+23, UPDPOL+24, UPDPOL+30, CLEANUP+2~, CLEANUP+3*, CLEANUP+4, CLEANUP+5
IBPLAN UPDTICB~, UPDTICB+59, UPDTICB+71, DELBU+1~, DELBU+2*
IBPOLBIL UPDTICB~, UPDTICB+42, UPDTICB+50*, UPDTICB+51
IBPOLCOM UPDTICB~, UPDTICB+42, UPDTICB+53, PPCOMM~, PPCOMM+17, PPCOMM+20, PPCOMM+23, ADCOM~, ADCOM+19, EDCOM~
, EDCOM+10
IBPOLDA ACCEPAPI~, ACCEPAPI+58*, ACCEPAPI+77, UPDTICB~, UPDTICB+45, UPDTICB+46, UPDTICB+47, UPDTICB+48, UPDTICB+53, UPDTICB+54
, PPCOMM~, PPCOMM+13, PPCOMM+14, PPCOMM+17, PPCOMM+23, ADCOM~, ADCOM+11, ADCOM+16, ADCOM+29, EDCOM~
, EDCOM+5, EDCOM+6, EDCOM+7, EDCOM+10, UPDPOL~, UPDPOL+17, UPDPOL+18, UPDPOL+22, UPDPOL+34, UPDPOL+37
, UPDPOL+48, CLEANUP+3, CLEANUP+8, CLEANUP+12, CLEANUP+16, DELBU+2
IBSUPRES ACCEPAPI+47~, ACCEPAPI+50*, REJECAPI+19~, REJECAPI+21*
IBT CLEANUP+2~, CLEANUP+13*, CLEANUP+14*, CLEANUP+15, CLEANUP+17
IBTNODE0 CLEANUP+2~, CLEANUP+15*, CLEANUP+16
IBTNODE1 CLEANUP+2~, CLEANUP+15*, CLEANUP+16
IBUFSTAT ACCEPAPI+47~, ACCEPAPI+50*, ACCEPAPI+54, ACCEPAPI+56
IBVCOM PPCOMM+9~, PPCOMM+10*, PPCOMM+14*, PPCOMM+17, PPCOMM+20
IBX ACCEPAPI+47~, ACCEPAPI+81*, ACCEPAPI+87
IBXIFN UPDPOL+36~, UPDPOL+37*, UPDPOL+38, UPDPOL+39, UPDPOL+42, UPDPOL+44
IENS ADCOM+13~, ADCOM+16*, ADCOM+17, ADCOM+18, ADCOM+19
IVMREPTR ACCEPAPI~, REJECAPI~
RESULT ACCEPAPI~, REJECAPI~, REJECAPI+22*, REJECAPI+23*, UPDTICB~, UPDTICB+53, UPDTICB+80*, PPCOMM~, PPCOMM+17, PPCOMM+23
, ADCOM~, UPDPOL~
RESULT(0 ACCEPAPI+52*, ACCEPAPI+53*, ACCEPAPI+55*, ACCEPAPI+57*, ACCEPAPI+62*, ACCEPAPI+64*, ACCEPAPI+67*, ACCEPAPI+69*, ACCEPAPI+71*, ACCEPAPI+76*
, ACCEPAPI+78*, ACCEPAPI+80*, ACCEPAPI+86*, UPDTICB+46*
RESULT(1 UPDTICB+44*, UPDTICB+45*, UPDTICB+47*, UPDTICB+50*, UPDTICB+52*, UPDTICB+80, ADCOM+11*, ADCOM+25*, ADCOM+26*
RESULT(2 UPDTICB+61*, UPDTICB+62*, UPDTICB+63*, UPDTICB+66*, UPDTICB+67*, UPDTICB+68*, UPDTICB+69*, UPDTICB+75*, UPDTICB+78*, UPDTICB+80
RESULT(4 UPDPOL+15*, UPDPOL+16*, UPDPOL+17*, UPDPOL+18*, UPDPOL+19*, UPDPOL+23*, UPDPOL+24*, UPDPOL+27*, UPDPOL+28*, UPDPOL+29*
, UPDPOL+30*, UPDPOL+34*, UPDPOL+46*, UPDPOL+47*
U ACCEPAPI+50, ACCEPAPI+81, ACCEPAPI+87, UPDPOL+23, UPDPOL+24, UPDPOL+29, UPDPOL+30, UPDPOL+42, CLEANUP+4, CLEANUP+5
, CLEANUP+16
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All