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

Package: Integrated Billing

Routine: IBCECOB1


Information

IBCECOB1 ;ALB/CXW - IB COB MANAGEMENT SCREEN/REPORT ;14-JUN-99

Source Information

Source file <IBCECOB1.m>

Call Graph

Call Graph

Call Graph Total: 23

Package Total Call Graph
Integrated Billing 12 $$IBREG^IBCAPP  CAP^IBCAPP2  ($$WLRMVF,BLD)^IBCECOB1  SEL^IBCECOB2  $$COBN^IBCEF  $$LAST364^IBCEF4  $$MRACNT^IBCEMU1  ($$DENDUP,$$MSEDT,$$MSPRE)^IBCEMU4  
($$CALCPR,$$PREOBTOT)^IBCEU0  $$WNRBILL^IBEFUNC  $$TYPE^IBJTLA1  $$DAT1^IBOUTL  
VA FileMan 5 FIELD^DID  ^DIE  $$EXTERNAL^DILFD  $$GET1^DIQ  ^DIR  
Kernel 3 ENS^%ZISS  ($$FMDIFF,$$FMTE)^XLFDT  ($$LJ,$$RJ)^XLFSTR  
List Manager 2 ($$SETFLD,$$SETSTR)^VALM1  (CLEAN,CNTRL)^VALM10  
Accounts Receivable 1 ($$BN1,$$TPR)^PRCAFN  

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

Package Total Caller Graph
Integrated Billing 14 IBCAPR  IBCAPR2  IBCECOB  IBCECOB1  IBCECOB2  IBCECOB5  IBCECOB6  IBCECSA6  
IBCEM REMOVE FROM WORKLIST  IBCEMQC  IBCEMU2  IBCEU1  IBCNSBL2  IBJTBA1  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
HIS(IBIFN) ; COB history
WLRMV ; REMOVE FROM EOB WORK LIST
; IBDA(IBDA)=IBIFN^IB364^ien of 361.1^user selection seq^user name~duz#
ELIGX ;
PTRESPI(IBEOB) ; Function - Computes the Patient's Responsibility based on IBEOB
; of 361.1 for Claims/Bills with form type 3=UB
; Input IBEOB - a single EOB ien; Required
; Output - Function Returns IBPTRES - Patient Responsibility Amount for the EOB
NMAT ;No COB list
ELIG(IBEOB) ; Function to determine if an EOB entry is eligible for
; inclusion on the MRA or COB management worklist or not.
; IBEOB - ien into file 361.1 (required)
; Returns 1 if EOB should appear on the worklist
; Returns 0 if EOB should not appear on the worklist
; Returns -1 if EOB contains Message Storage Errors
FTYPE(Y) ;type classification
WLRMVF(IBIFN,METHOD,BKFL) ;
; BFKL = 1 means background process, remove NOT initiated by a user
BLD ; Build list entrypoint
SET(X,CNT,IBIFN,IBDA,IBQ,IB364,IBX,IB) ;set up list manager screen array
BLD1 ;
SCRN ;

External References

Name Field # of Occurrence
ENS^%ZISS SCRN+70
FIELD^DID WLRMVF+11
^DIE WLRMVF+21
$$EXTERNAL^DILFD BLD1+76, BLD1+84
$$GET1^DIQ SCRN+12, WLRMV+8, WLRMV+9, WLRMV+10, WLRMV+11
^DIR WLRMV+15
$$IBREG^IBCAPP WLRMVF+8
CAP^IBCAPP2 BLD+12
$$WLRMVF^IBCECOB1 WLRMV+18
BLD^IBCECOB1 WLRMV+19
SEL^IBCECOB2 WLRMV+3
$$COBN^IBCEF BLD1+44
$$LAST364^IBCEF4 BLD1+62
$$MRACNT^IBCEMU1 BLD1+88
$$DENDUP^IBCEMU4 BLD1+3
$$MSEDT^IBCEMU4 BLD1+67
$$MSPRE^IBCEMU4 BLD1+67
$$CALCPR^IBCEU0 PTRESPI+13, PTRESPI+18
$$PREOBTOT^IBCEU0 BLD1+67
$$WNRBILL^IBEFUNC BLD1+33
$$TYPE^IBJTLA1 SCRN+48
$$DAT1^IBOUTL SCRN+44, SCRN+54
$$BN1^PRCAFN SCRN+43
$$TPR^PRCAFN BLD1+64
$$SETFLD^VALM1 SCRN+41, SCRN+43, SCRN+44, SCRN+45, SCRN+46, SCRN+47, SCRN+48
$$SETSTR^VALM1 SCRN+57, SCRN+61, SCRN+64, SCRN+65, SCRN+66
CLEAN^VALM10 BLD+9
CNTRL^VALM10 SCRN+72, SCRN+74, SCRN+76
$$FMDIFF^XLFDT BLD1+59, BLD1+61
$$FMTE^XLFDT BLD1+84
$$LJ^XLFSTR SCRN+28
$$RJ^XLFSTR SCRN+46, SCRN+47

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBM(361.1 - [#361.1] EXTERNAL^DILFD
^DGCR(399 - [#399] Classic Fileman Calls,  FIELD^DID,  GET1^DIQ
^DG(40.8 - [#40.8] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] BLD1+8, BLD1+20, BLD1+55, BLD1+59, BLD1+69, BLD1+72, BLD1+73, HIS+3, SCRN+27, SCRN+43
, ELIG+13, WLRMVF+6
^DIC(36 - [#36] BLD1+26, BLD1+27, BLD1+33, BLD1+34, BLD1+51
^DPT - [#2] BLD1+72, SCRN+27
^IBA(364 - [#364] BLD1+62
^IBE(353 - [#353] FTYPE+1
^IBM(361.1 - [#361.1] BLD+16, BLD+17, BLD1+5, BLD1+65, HIS+2, HIS+3, PTRESPI+9, PTRESPI+12, PTRESPI+16, PTRESPI+17
, ELIG+9, ELIG+14
^TMP("IBBIL" BLD1+38, BLD1+39
^TMP("IBCECOB" BLD+8!, NMAT+2*, NMAT+3*, SET+2*, SET+3*, SET+4*
^TMP("IBCECOB1" BLD+8!, SET+4*
^TMP("IBCOBST" BLD+8!, BLD+20, BLD1+79, BLD1+83*, BLD1+84*, BLD1+92*, BLD1+93*, BLD1+94*, SCRN+10, SCRN+15
, SCRN+24, SCRN+26, SCRN+63
^TMP("IBCOBSTX" BLD+8!, BLD1+7, BLD1+85*
^VA(200 - [#200] BLD1+42

Label References

Name Line Occurrences
$$ELIG BLD1+2
$$HIS BLD1+83
BLD1 BLD+17
ELIGX ELIG+10, ELIG+11, ELIG+13, ELIG+14
NMAT BLD+20
SCRN BLD+23
SET SCRN+11, SCRN+12, SCRN+19, SCRN+20, SCRN+49, SCRN+55, SCRN+58, SCRN+67

Naked Globals

Name Field # of Occurrence
^("I1" BLD1+20
^("I2" BLD1+20
^("I3" BLD1+20
^("M" BLD1+20

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A HIS+1~, HIS+2*, HIS+3, HIS+5
B HIS+1~, HIS+2*, HIS+3
BKFL WLRMVF~, WLRMVF+8
CNT SET~, SET+3, SET+4
DA WLRMV+2~, WLRMVF+15*
DIE WLRMV+2~, WLRMVF+16*
DIR WLRMV+2~, WLRMV+15!
DIR("A" WLRMV+7*, WLRMV+8*, WLRMV+9*, WLRMV+10*, WLRMV+11*, WLRMV+12*, WLRMV+13*
DIR("B" WLRMV+14*
DIR(0 WLRMV+15*
DR WLRMV+2~, WLRMVF+17*, WLRMVF+18*, WLRMVF+19*, WLRMVF+20*
DT BLD1+59, BLD1+61
DTOUT WLRMV+2~, WLRMV+16
DUOUT WLRMV+2~, WLRMV+16
DUZ WLRMVF+4, WLRMVF+8
ELIG ELIG+7~, ELIG+8*, ELIG+14*, ELIG+16*, ELIGX+1
EOBADJ PTRESPI+5~, PTRESPI+12!*, PTRESPI+13, PTRESPI+17!*, PTRESPI+18
EOBTYPE BLD+6~
I BLD+2~, BLD1+23*, BLD1+25, BLD1+49*, BLD1+50
IB SCRN+1~, SCRN+26*, SCRN+29, SCRN+30, SCRN+35, SCRN+36, SCRN+37, SCRN+38, SCRN+44, SCRN+48
, SCRN+49, SCRN+57, SCRN+58, SCRN+67, SET~, SET+4
IB3611 BLD+2~, BLD1+5*, BLD1+6, BLD1+22, BLD1+76, BLD1+84, ELIG+7~, ELIG+9*, ELIG+10, ELIG+11
, ELIG+12
IB364 BLD+2~, BLD1+6*, BLD1+83, SCRN+30*, SCRN+49, SCRN+58, SCRN+67, SET~, SET+4
IBAMT BLD+2~, SCRN+38*, SCRN+47
IBAPY BLD+2~, BLD1+64*, BLD1+68, BLD1+83
IBB BLD+2~, BLD1+8*, BLD1+83
IBB364 BLD+2~, BLD1+62*
IBBIL HIS+1~, HIS+3*, HIS+4, HIS+5
IBBPY BLD+2~, BLD1+44*, BLD1+49, BLD1+54, BLD1+55, BLD1+83
IBC PTRESPI+5~, PTRESPI+16*, PTRESPI+17
IBCNT NMAT+1*, SCRN+1~, SCRN+3*, SCRN+11, SCRN+12, SCRN+19, SCRN+20, SCRN+39*, SCRN+41, SCRN+49
, SCRN+55, SCRN+58, SCRN+67
IBDA BLD+2~, BLD+17*, BLD1+2, BLD1+3, BLD1+5, BLD1+65, BLD1+83, BLD1+85, SCRN+1~, SCRN+29*
, SCRN+49, SCRN+58, SCRN+67, SET~, SET+4, WLRMV+2~, WLRMV+3, WLRMV+5*, WLRMV+6
IBDA( WLRMV+6
IBDA(0 WLRMV+5
IBDA1 BLD+2~
IBDAY BLD+2~, BLD1+59*, BLD1+61*, BLD1+62*, BLD1+76, BLD1+83
IBDENDUP BLD+3~, BLD1+3*, BLD1+4, BLD1+94
IBDIV BLD+3~, BLD1+18*, BLD1+79, BLD1+83, BLD1+84, BLD1+92, BLD1+93, BLD1+94, SCRN+1~, SCRN+9*
, SCRN+10*, SCRN+12, SCRN+15, SCRN+24, SCRN+26, SCRN+63
IBDT BLD+3~, BLD1+6*, BLD1+76, BLD1+83
IBDTN BLD+3~
IBDUZ WLRMVF+2~, WLRMVF+8*, WLRMVF+18
IBEOB PTRESPI~, PTRESPI+6*, PTRESPI+7, PTRESPI+9, PTRESPI+12, PTRESPI+16, PTRESPI+17, ELIG~, ELIG+8*, ELIG+9
, ELIG+14
IBEOBREV BLD+3~, BLD+14*, BLD+16*, BLD+17
IBEUT BLD+3~, BLD1+21*, BLD1+39, BLD1+41
IBEXPY BLD+3~, BLD1+65*, BLD1+68, BLD1+83
IBFND BLD+3~, BLD1+36*, BLD1+38, BLD1+39*, BLD1+41
IBFORM SCRN+1~, SCRN+35*, SCRN+48
IBHIS BLD+3~, BLD+10*, HIS+1~, HIS+2*, HIS+5*, HIS+6
IBIFN BLD+4~, BLD1+6*, BLD1+7, BLD1+8, BLD1+20, BLD1+33, BLD1+44, BLD1+55, BLD1+59, BLD1+62
, BLD1+64, BLD1+67, BLD1+69, BLD1+72, BLD1+73, BLD1+79, BLD1+83, BLD1+84, BLD1+85, BLD1+88
, BLD1+92, BLD1+93, BLD1+94, HIS~, HIS+2, HIS+3, SCRN+1~, SCRN+24*, SCRN+26, SCRN+27
, SCRN+43, SCRN+49, SCRN+58, SCRN+63, SCRN+67, SET~, SET+4, ELIG+7~, ELIG+12*, ELIG+13
, WLRMV+2~, WLRMV+6*, WLRMV+8, WLRMV+9, WLRMV+10, WLRMV+11, WLRMV+18, WLRMVF~, WLRMVF+5, WLRMVF+6
, WLRMVF+15
IBINS BLD+4~, BLD1+22*, BLD1+27*, BLD1+83
IBINS1 BLD+4~, BLD1+26*
IBINS2 BLD+4~, BLD1+32*, BLD1+33*, BLD1+34*, BLD1+76
IBK SCRN+1~, SCRN+63*, SCRN+64, SCRN+65, SCRN+66, SCRN+72, SCRN+74, SCRN+76
IBMRACNT BLD+4~, BLD1+88*, BLD1+92, BLD1+93
>> IBMRADUP BLD1+4
>> IBMRANOT BLD+12, BLD+16, BLD1+3, BLD1+88, BLD1+92, NMAT+3, SCRN+5, SCRN+61, ELIG+14
IBMUT BLD+4~, BLD1+21*, BLD1+39, BLD1+41, BLD1+42*, BLD1+43*, BLD1+76, BLD1+83
IBNBAL BLD+4~, BLD1+70*, BLD1+71, BLD1+83
IBNDI1 BLD+4~, BLD1+20*
IBNDI2 BLD+4~, BLD1+20*, BLD1+33
IBNDI3 BLD+5~, BLD1+20*, BLD1+34
IBNDM BLD+5~, BLD1+20*
IBNDS BLD+5~, BLD1+20*, BLD1+21
IBOAM BLD+5~, BLD1+69*, BLD1+70, BLD1+83
IBPAT SCRN+1~, SCRN+28*, SCRN+45
IBPTNM BLD+5~, BLD1+72*, BLD1+76
IBPTRES PTRESPI+5~, PTRESPI+6*, PTRESPI+7, PTRESPI+9, PTRESPI+13*, PTRESPI+18*, PTRESPI+19
IBPTRSP BLD+5~, BLD1+67*, BLD1+76, BLD1+83, SCRN+36*, SCRN+46
IBPY BLD+5~, BLD1+68*, BLD1+70
IBQ BLD+5~, BLD1+44*, BLD1+49, BLD1+51*, BLD1+55*, BLD1+71*, BLD1+83, SCRN+30*, SCRN+49, SCRN+58
, SCRN+67, SET~, SET+4
IBS1 SCRN+1~, SCRN+5*, SCRN+6*, SCRN+20, SCRN+55
IBSEQ BLD+5~, BLD1+22*, BLD1+25, BLD1+83
>> IBSRT BLD1+76, BLD1+77, SCRN+5, SCRN+6, SCRN+18, SCRN+53, SCRN+54
IBSRVC BLD+5~, BLD1+73*, BLD1+76, BLD1+83
IBST HIS+1~, HIS+3*, HIS+5
IBX SCRN+1~, SCRN+15*, SCRN+20, SCRN+24, SCRN+26, SCRN+49, SCRN+54, SCRN+58, SCRN+63, SCRN+67
, SET~, SET+4
>> IOINHI SCRN+70, SCRN+72, SCRN+74, SCRN+76
>> IOINORM SCRN+72, SCRN+74, SCRN+76
METHOD WLRMVF~, WLRMVF+14, WLRMVF+19
MSEFLG BLD+6~, BLD+10*, BLD1+2*, BLD1+79*, BLD1+83, SCRN+1~, SCRN+37*, SCRN+43
Q BLD1+24~, BLD1+25*, BLD1+26
SOC WLRMVF+2~, WLRMVF+12*, WLRMVF+13
SOC("POINTER" WLRMVF+12
SOCCNT WLRMVF+2~, WLRMVF+13*
SOCLIST WLRMVF+2~
SOCLIST( WLRMVF+13*, WLRMVF+14
STATUS WLRMVF+2~, WLRMVF+3*, WLRMVF+4, WLRMVF+5, WLRMVF+6, WLRMVF+14, WLRMVF+22*, WLRMVF+23
U BLD1+6, BLD1+21, BLD1+22, BLD1+26, BLD1+27, BLD1+32, BLD1+33, BLD1+34, BLD1+42, BLD1+51
, BLD1+55, BLD1+59, BLD1+62, BLD1+72, BLD1+73, BLD1+76, BLD1+79, BLD1+83, BLD1+92, BLD1+93
, BLD1+94, HIS+3, SCRN+27, SCRN+28, SCRN+29, SCRN+30, SCRN+35, SCRN+36, SCRN+37, SCRN+38
, SCRN+43, SCRN+44, SCRN+48, SCRN+57, SCRN+64, SCRN+65, SCRN+66, SCRN+72, SCRN+74, SCRN+76
, SET+4, FTYPE+1, ELIG+10, ELIG+11, ELIG+13, WLRMV+6
>> VALMBCK WLRMV+4*
>> VALMCNT BLD+10*, NMAT+1*, SCRN+72, SCRN+74, SCRN+76, SET+1*, SET+2, SET+3, SET+4
X SCRN+1~, SCRN+40*, SCRN+41*, SCRN+43*, SCRN+44*, SCRN+45*, SCRN+46*, SCRN+47*, SCRN+48*, SCRN+49
, SCRN+57*, SCRN+58, SCRN+61*, SCRN+64*, SCRN+65*, SCRN+66*, SCRN+67, SET~, SET+2, WLRMV+2~
, WLRMV+18*
Y FTYPE~, FTYPE+1, WLRMV+16
Z BLD+6~, BLD1+23*, BLD1+26, BLD1+27, BLD1+41*, BLD1+42, BLD1+50*, BLD1+51, BLD1+54*, BLD1+55
, SCRN+1~, SCRN+27*, SCRN+28, SCRN+54*, SCRN+55
Z0 BLD+6~, BLD1+76*, BLD1+77*, BLD1+79, BLD1+83, BLD1+84, BLD1+92, BLD1+93, BLD1+94
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All