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 |  Local Variables  | All
Print Page as PDF
Routine: IBCNBAR

Package: Integrated Billing

Routine: IBCNBAR


Information

IBCNBAR ;ALB/ARH-Ins Buffer: process Accept and Reject ;15 Jan 2009

Source Information

Source file <IBCNBAR.m>

Call Graph

Call Graph

Call Graph Total: 27

Package Total Call Graph
Integrated Billing 21 (GRP,INS,POLICY)^IBCNBCD  SBDISP^IBCNBCD4  DELDATA^IBCNBED  STATUS^IBCNBEE  $$HOLD^IBCNBLL  (GRP,INS,PAT,POLICY,SUB)^IBCNBMI  ($$NEWGRP,$$NEWINS,$$NEWPOL)^IBCNBMN  $$BUFFER^IBCNBU1  
WAIT^IBCNBUH  (EBFILE,GRPFILE)^IBCNEHL1  UPDIREC^IBCNEHL3  MSG003^IBCNEMS1  ($$MGRP,MSG)^IBCNEUT5  UPDPOL^IBCNICB  ALL^IBCNS1  (,AFTER,BEFORE)^IBCNSEVT  
COVERED^IBCNSM31  ($$DUPCO,$$DUPPOL)^IBCNSOK1  $$PLCOV^IBCNSU3  POL^IBCNSU41  ($$PTHLD,RELEASE)^IBOHCR  
VA FileMan 4 $$FIND1^DIC  (FILE,UPDATE)^DIE  $$GET1^DIQ  ^DIR  
Income Verification Match 1 $$UPDATE^IVMLINS4  
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: 3

Package Total Caller Graph
Integrated Billing 3 IBCNBAA  IBCNBLA1  IBCNICB  

Entry Points

Name Comments DBIA/ICR reference
ACCEPT(IBBUFDA,DFN,IBINSDA,IBGRPDA,IBPOLDA,IBMVINS,IBMVGRP,IBMVPOL,IBMVSUB,IBNEWINS,IBNEWGRP,IBNEWPOL,IBELIG,IBSEL,IBRIEN,IBSIEN,IBFNAM,IBVAL,IBHOLD,IBXHOLD) ; move buffer data into Insurance files then cleanup
; 1) data moved into insurance files, new records created if needed or edit existing ones
; 2) complete some general functions that are executed whenever insurance is entered/edited
; 3) allow user to view buffer entry and new/updated insurance records
; 4) buffer ins/group/policy data deleted
; 5) buffer entry status updated
PROCESS ; process all changes selected by user, add/edit insurance files based
; on buffer data. Entry point for ACCEPAPI^IBCNICB (patch 413)
CLEANUP ; general updates and checks done whenever insurance is added/edited and clean up buffer file
ACCPTQ
REJECT(IBBUFDA) ; process a buffer entry reject
; 1) update/notify IVM
; 2) buffer ins/group/policy data deleted
; 3) buffer entry status updated
; 4) if patient has no other active insurance then release any patient bills On Hold
REJPROC ;Entry point for REJECAPI^IBCNICB (Patch 413)
IVM(AR,IBBUFDA,IVMREPTR,IBSUPRES) ; IVM must be notified whenever a buffer entry
; that originated in IVM is accepted or rejected. This lets IVM clean up
; its files since IVM also has a buffer type file of insurance uploaded
; from the IVM center.
; If rejected and Interactive Reads not suppressed, IVM then ask the
; user for a reason it was rejected
; input: AR = 1 if accepted, 0 if rejected
; IBBUFDA = Internal Entry Number to 355.33 file
; IVMREPTR = Internal Entry Number to 301.91 file (Optional)
; IBSUPRES = If equals 1, suppress writes and interactive reads
RELHLD(DFN) ;Check if need to release copay on hold
CHKREL(DFN,IBINDT,IBN,IBCAT) ; -- release copay
; --Input DFN = patient
; IBINDT = date to check
; IBN = ien of copay on hold
; IBCAT = category of hold
; will determine if hold should be released
TRACK ;Build CREATION TO PROCESSING TRACKING File (#355.36)

External References

Name Field # of Occurrence
$$FIND1^DIC CLEANUP+41
FILE^DIE PROCESS+37
UPDATE^DIE TRACK+24
$$GET1^DIQ PROCESS+28, PROCESS+29, CHKREL+18, CHKREL+19, TRACK+4, TRACK+5, TRACK+6, TRACK+11, TRACK+12, TRACK+14
^DIR CLEANUP+28
GRP^IBCNBCD CLEANUP+32
INS^IBCNBCD CLEANUP+31
POLICY^IBCNBCD CLEANUP+33
SBDISP^IBCNBCD4 CLEANUP+35
DELDATA^IBCNBED CLEANUP+44, REJPROC+11
STATUS^IBCNBEE CLEANUP+43, REJPROC+11
$$HOLD^IBCNBLL CLEANUP+22, CLEANUP+47, REJPROC+14
GRP^IBCNBMI PROCESS+23
INS^IBCNBMI PROCESS+21
PAT^IBCNBMI CLEANUP+5
POLICY^IBCNBMI PROCESS+39
SUB^IBCNBMI PROCESS+43
$$NEWGRP^IBCNBMN PROCESS+11
$$NEWINS^IBCNBMN PROCESS+8
$$NEWPOL^IBCNBMN PROCESS+14
$$BUFFER^IBCNBU1 CLEANUP+47, REJPROC+14
WAIT^IBCNBUH CLEANUP+31, CLEANUP+32, CLEANUP+33, CLEANUP+35
EBFILE^IBCNEHL1 PROCESS+45
GRPFILE^IBCNEHL1 PROCESS+45
UPDIREC^IBCNEHL3 CLEANUP+41
MSG003^IBCNEMS1 TRACK+27
$$MGRP^IBCNEUT5 TRACK+28
MSG^IBCNEUT5 TRACK+28
UPDPOL^IBCNICB PROCESS+48
ALL^IBCNS1 CHKREL+11
^IBCNSEVT CLEANUP+54
AFTER^IBCNSEVT CLEANUP+54
BEFORE^IBCNSEVT PROCESS+3
COVERED^IBCNSM31 CLEANUP+7
$$DUPCO^IBCNSOK1 CLEANUP+10
$$DUPPOL^IBCNSOK1 CLEANUP+14
$$PLCOV^IBCNSU3 CHKREL+22
POL^IBCNSU41 CLEANUP+6
$$PTHLD^IBOHCR CLEANUP+18
RELEASE^IBOHCR CHKREL+13, CHKREL+24, CHKREL+26, CHKREL+28
$$UPDATE^IVMLINS4 IVM+16
$$NOW^XLFDT TRACK+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: CLEANUP+28
Function Call: WRITE
  • Prompt: !!
  • Line Location: CLEANUP+30
Function Call: WRITE
  • Prompt: !!,"Patient has no other active Insurance.",!,"All patient bills On Hold waiting for Insurance to be released."
  • Line Location: CLEANUP+51
Function Call: WRITE
  • Prompt: !!,"Patient has no other active Insurance.",!,"All patient bills On Hold waiting for Insurance to be released."
  • Line Location: REJPROC+18
Routine Call
  • DIC
  • Line Location:
    • CLEANUP+41
Routine Call
  • DIE
  • Line Location:
    • PROCESS+37
Routine Call
  • DIE
  • Line Location:
    • TRACK+24
Routine Call
  • DIR
  • Line Location:
    • CLEANUP+28

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBE(355.12 - [#355.12] FIND1^DIC
^IBA(355.3 - [#355.3] GET1^DIQ
^IBA(355.33 - [#355.33] GET1^DIQ
^DIC(36 - [#36] GET1^DIQ
^IBCN(365 - [#365] GET1^DIQ
^IBCN(365.1 - [#365.1] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IB - [#350] RELHLD+5
^IB("AH" RELHLD+4
^IBA(355.33 - [#355.33] CLEANUP+1, CLEANUP+41, REJPROC+2, REJPROC+5, IVM+11, IVM+13, IVM+14
^IBCN(365 - [#365] PROCESS+45, CLEANUP+41, TRACK+3
^IBCN(365.1 - [#365.1] TRACK+9
^IBE(350.1 - [#350.1] RELHLD+9
^IBE(355.31 - [#355.31] RELHLD+11

Label References

Name Line Occurrences
ACCPTQ PROCESS+8, PROCESS+11, PROCESS+14
CHKREL RELHLD+12
IVM CLEANUP+8, REJPROC+5
RELHLD CLEANUP+47, REJPROC+14
TRACK CLEANUP+38, REJPROC+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANYINS CHKREL+7~, CHKREL+12*, CHKREL+13
AR IVM~, IVM+16
CHKCOV CHKREL+7~
CNT CHKREL+7~, CHKREL+8*, CHKREL+19*, CHKREL+24, CHKREL+26
COV CHKREL+7~, CHKREL+8*, CHKREL+18*, CHKREL+21
DFN ACCEPT~, PROCESS+36, PROCESS+43, PROCESS+45, PROCESS+48, CLEANUP+5, CLEANUP+6, CLEANUP+7, CLEANUP+10, CLEANUP+18
CLEANUP+22, CLEANUP+34, CLEANUP+35, CLEANUP+47, REJPROC+2~*, REJPROC+4, REJPROC+14, IVM+11~, IVM+13*, IVM+16
, RELHLD~, RELHLD+4, RELHLD+12, CHKREL~, CHKREL+11
DIR PROCESS+5~
DIR("A" CLEANUP+28*
DIR(0 CLEANUP+28*
DT RELHLD+9, CHKREL+9
ERROR TRACK+1~, TRACK+26, TRACK+27
FDA TRACK+1~
FDA( TRACK+16*, TRACK+17*, TRACK+18*, TRACK+19*, TRACK+20*, TRACK+21*, TRACK+22*, TRACK+23*
IBAT RELHLD+1~, RELHLD+9*, RELHLD+10
IBBUFDA ACCEPT~, PROCESS+8, PROCESS+11, PROCESS+14, PROCESS+21, PROCESS+23, PROCESS+39, PROCESS+43, PROCESS+45, PROCESS+48
CLEANUP+1, CLEANUP+8, CLEANUP+31, CLEANUP+32, CLEANUP+33, CLEANUP+35, CLEANUP+41, CLEANUP+43, CLEANUP+44, REJECT~
REJPROC+2, REJPROC+5, REJPROC+11, IVM~, IVM+11, IVM+13, IVM+14, TRACK+3, TRACK+9, TRACK+14
TRACK+22, TRACK+27
IBCAT RELHLD+1~, RELHLD+10*, RELHLD+11*, RELHLD+12, CHKREL~, CHKREL+22
IBCDFN PROCESS+3~*, CLEANUP+54*
IBCOV CHKREL+7~, CHKREL+8*, CHKREL+22*, CHKREL+26, CHKREL+28
IBDD CHKREL+7~
IBDD( CHKREL+14, CHKREL+15
IBDD(0 CHKREL+12
IBELIG ACCEPT~, PROCESS+45
IBFLDS PROCESS+27~
IBFLDS( PROCESS+35*, PROCESS+36*
IBFNAM ACCEPT~, PROCESS+43, CLEANUP+35
IBFR RELHLD+1~, RELHLD+7*, RELHLD+9
IBGRPDA ACCEPT~, PROCESS+11*, PROCESS+14, PROCESS+22, PROCESS+23, PROCESS+28, PROCESS+29, PROCESS+35, PROCESS+36, PROCESS+39
PROCESS+43, PROCESS+48, CLEANUP+14, CLEANUP+32
IBGRPH PROCESS+5~*, PROCESS+11*, PROCESS+38
IBHOLD ACCEPT~, PROCESS+43, CLEANUP+35
IBINDT CHKREL~, CHKREL+9*, CHKREL+10*, CHKREL+11, CHKREL+22
IBINSDA ACCEPT~, PROCESS+8*, PROCESS+11, PROCESS+14, PROCESS+21, PROCESS+22, PROCESS+39, PROCESS+43, PROCESS+48, CLEANUP+10
CLEANUP+31
IBINSH PROCESS+5~*, PROCESS+8*, PROCESS+21
IBISGRP PROCESS+27~, PROCESS+28*, PROCESS+31, PROCESS+33, PROCESS+35, PROCESS+36
IBMSG TRACK+1~, TRACK+27
IBMVGRP ACCEPT~, PROCESS+22, PROCESS+23
IBMVINS ACCEPT~, PROCESS+17, PROCESS+18, PROCESS+21
IBMVPOL ACCEPT~, PROCESS+39, PROCESS+48
IBMVSUB ACCEPT~, PROCESS+43
IBN RELHLD+1~, RELHLD+3*, RELHLD+4*, RELHLD+5, RELHLD+12, CHKREL~, CHKREL+13, CHKREL+24, CHKREL+26, CHKREL+28
IBNEW PROCESS+3~*
IBNEWGRP ACCEPT~, PROCESS+11, CLEANUP+43
IBNEWINS ACCEPT~, PROCESS+8, CLEANUP+43
IBNEWPOL ACCEPT~, PROCESS+3, PROCESS+14, PROCESS+48, CLEANUP+18, CLEANUP+43
IBPAT PROCESS+27~, PROCESS+29*, PROCESS+31, PROCESS+33
IBPOLDA ACCEPT~, PROCESS+3, PROCESS+14*, PROCESS+39, PROCESS+43, PROCESS+45, PROCESS+48, CLEANUP+5, CLEANUP+10, CLEANUP+33
CLEANUP+34, CLEANUP+35, CLEANUP+41, CLEANUP+54
IBPOLH PROCESS+5~*, PROCESS+14*, PROCESS+39
IBRIEN ACCEPT~, PROCESS+43, CLEANUP+35
IBSEL ACCEPT~, PROCESS+43, CLEANUP+35
IBSIEN ACCEPT~, CLEANUP+34*, CLEANUP+35
IBSOURCE CLEANUP+1~*, CLEANUP+8, CLEANUP+54
IBSUBH PROCESS+5~*, PROCESS+14*, PROCESS+43
IBSUPRES ACCEPT+7~, ACCEPT+9*, PROCESS+5, PROCESS+18, PROCESS+21, PROCESS+26, PROCESS+38, PROCESS+39, PROCESS+43, PROCESS+45
PROCESS+48, CLEANUP+5, CLEANUP+8, CLEANUP+10, CLEANUP+14, CLEANUP+18, CLEANUP+19, CLEANUP+23, CLEANUP+27, REJECT+6~
, REJECT+8*, REJPROC+5, REJPROC+11, IVM~, IVM+16, RELHLD+2
IBTALK RELHLD+1~, RELHLD+2*
IBVAL ACCEPT~, PROCESS+43, CLEANUP+35
IBVDT RELHLD+1~, RELHLD+9*, RELHLD+12
IBX PROCESS+5~, CLEANUP+10*, CLEANUP+11, CLEANUP+14*, CLEANUP+15, IVM+11~, IVM+14*, IVM+16, RELHLD+1~, RELHLD+5*
, RELHLD+6, RELHLD+7, RELHLD+8
IBXHOLD ACCEPT~, PROCESS+43, CLEANUP+35
IBY IVM+11~, IVM+16*
INS CHKREL+7~, CHKREL+17*, CHKREL+18, CHKREL+19
IVMINSUP PROCESS+3~, CLEANUP+54*
IVMREPTR CLEANUP+8, REJPROC+5, IVM~, IVM+16
PLAN CHKREL+7~, CHKREL+16*, CHKREL+22
PLNTYP CHKREL+7~
POLCY CHKREL+7~, CHKREL+8*, CHKREL+14*, CHKREL+15
RELHLD CLEANUP+2~*, REJECT+6~, REJECT+8*, REJPROC+3~*
RESP TRACK+1~, TRACK+3*, TRACK+4, TRACK+7, TRACK+21, TRACK+27
RESULT ACCEPT+7~, PROCESS+21, PROCESS+23, PROCESS+39, PROCESS+43, PROCESS+48, REJECT+6~, REJPROC+4*, REJPROC+10*
RESULT(0 PROCESS+7*, PROCESS+10*, PROCESS+13*, PROCESS+17*, PROCESS+20*, PROCESS+42*, CLEANUP+11*, CLEANUP+15*, CLEANUP+20*, CLEANUP+24*
RESULT(1 PROCESS+8*
RESULT(2 PROCESS+11*
RESULT(3 PROCESS+14*
RIEN PROCESS+3~, PROCESS+45*
SOI TRACK+1~, TRACK+6*, TRACK+12*, TRACK+14*, TRACK+18
TQN TRACK+1~, TRACK+4*, TRACK+5, TRACK+6, TRACK+9*, TRACK+10, TRACK+11, TRACK+12, TRACK+20, TRACK+27
TRICHP CHKREL+7~, CHKREL+8*, CHKREL+20*, CHKREL+24, CHKREL+26, CHKREL+28
TYPNAM CHKREL+7~, CHKREL+19*, CHKREL+20, CHKREL+21
U CLEANUP+1, CLEANUP+41, REJPROC+5, IVM+11, IVM+14, RELHLD+6, RELHLD+7, RELHLD+8, RELHLD+9, CHKREL+16
, CHKREL+17, TRACK+17
WE TRACK+1~, TRACK+2*, TRACK+5*, TRACK+11*, TRACK+13*, TRACK+15, TRACK+17, TRACK+23
X PROCESS+5~, CHKREL+7~, CHKREL+15*, CHKREL+16, CHKREL+17
X3 RELHLD+1~, RELHLD+8*, RELHLD+9
X5 RELHLD+1~, RELHLD+6*
Y PROCESS+5~, CLEANUP+29
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 |  Local Variables  | All