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

Package Total Call Graph
Integrated Billing 19 (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  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^DIE  $$GET1^DIQ  ^DIR  
Income Verification Match 1 $$UPDATE^IVMLINS4  

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

Package Total Caller Graph
Integrated Billing 3 IBCNBAA  IBCNBLA1  IBCNICB  

Entry Points

Name Comments DBIA/ICR reference
RELHLD(DFN) ;Check if need to release copay on hold
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
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)
ACCPTQ
CLEANUP ; general updates and checks done whenever insurance is added/edited and clean up buffer file
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
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

External References

Name Field # of Occurrence
$$FIND1^DIC CLEANUP+38
FILE^DIE PROCESS+37
$$GET1^DIQ PROCESS+28, PROCESS+29, CHKREL+18, CHKREL+19
^DIR CLEANUP+28
GRP^IBCNBCD CLEANUP+32
INS^IBCNBCD CLEANUP+31
POLICY^IBCNBCD CLEANUP+33
SBDISP^IBCNBCD4 CLEANUP+35
DELDATA^IBCNBED CLEANUP+41, REJPROC+8
STATUS^IBCNBEE CLEANUP+40, REJPROC+8
$$HOLD^IBCNBLL CLEANUP+22, CLEANUP+44, REJPROC+11
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+44, REJPROC+11
WAIT^IBCNBUH CLEANUP+31, CLEANUP+32, CLEANUP+33, CLEANUP+35
EBFILE^IBCNEHL1 PROCESS+45
GRPFILE^IBCNEHL1 PROCESS+45
UPDIREC^IBCNEHL3 CLEANUP+38
UPDPOL^IBCNICB PROCESS+48
ALL^IBCNS1 CHKREL+11
^IBCNSEVT CLEANUP+51
AFTER^IBCNSEVT CLEANUP+51
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

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+48
Function Call: WRITE
  • Prompt: !!,"Patient has no other active Insurance.",!,"All patient bills On Hold waiting for Insurance to be released."
  • Line Location: REJPROC+15
Routine Call
  • DIC
  • Line Location:
    • CLEANUP+38
Routine Call
  • DIE
  • Line Location:
    • PROCESS+37
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
^DIC(36 - [#36] 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+38, REJPROC+2, REJPROC+5, IVM+11, IVM+13, IVM+14
^IBCN(365 - [#365] PROCESS+45, CLEANUP+38
^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+44, REJPROC+11

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+44, REJPROC+2~*, REJPROC+4, REJPROC+11, 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
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+38, CLEANUP+40, CLEANUP+41, REJECT~
, REJPROC+2, REJPROC+5, REJPROC+8, IVM~, IVM+11, IVM+13, IVM+14
IBCAT RELHLD+1~, RELHLD+10*, RELHLD+11*, RELHLD+12, CHKREL~, CHKREL+22
IBCDFN PROCESS+3~*, CLEANUP+51*
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
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+40
IBNEWINS ACCEPT~, PROCESS+8, CLEANUP+40
IBNEWPOL ACCEPT~, PROCESS+3, PROCESS+14, PROCESS+48, CLEANUP+18, CLEANUP+40
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+38, CLEANUP+51
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+51
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+8, 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+51*
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~*
RESULT ACCEPT+7~, PROCESS+21, PROCESS+23, PROCESS+39, PROCESS+43, PROCESS+48, REJECT+6~, REJPROC+4*, REJPROC+7*
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*
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+38, REJPROC+5, IVM+11, IVM+14, RELHLD+6, RELHLD+7, RELHLD+8, RELHLD+9, CHKREL+16
, CHKREL+17
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