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

Package: Integrated Billing

Routine: IBCEOB21


Information

IBCEOB21 ;ALB/TMP - EOB MAINTENANCE ACTIONS ;18-FEB-99

Source Information

Source file <IBCEOB21.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Integrated Billing 4 $$COBN^IBCEF  $$LAST364^IBCEF4  ($$MRACNT,$$SEL)^IBCEMU1  ($$BILL,BLD)^IBCEOB2  
VA FileMan 4 FILE^DICN  ^DIE  ^DIK  ^DIR  
List Manager 3 EN^VALM  (FULL,PAUSE)^VALM1  EN^VALM2  
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: 6

Package Total Caller Graph
Integrated Billing 5 IBCE EOB CHANGE BILL  IBCE EOB VIEW  IBCE MANUAL EOB ADD  IBCE MANUAL EOB DELETE  IBCE MANUAL EOB EDIT  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EDIT ; Edit a previously entered manual EOB
EDITQ
DELETE ; Delete a previously entered manual EOB
DELQ
NEW ; Add a manual EOB for the current COB sequence for the claim
NEWQ
VIEW ; View an MRA
VLOOP ; Multiple MRA's on file. Allow user to select the MRA to view
VIEWQ ;
AMTCHG(DA) ; Function to determine if amt on EOB can be modified
; DA = ien of EOB entry (file 361.1)
; Function returns 1 if OK to change, 0 if the next bill in COB
; sequence has already been sent or the bill has been closed.
AMTQ
SEL(IBDA,ONE) ; Select entry(s) from list
; IBDA = array returned if selections made
; ONE = if set to 1, only one selection can be made at a time
CHANGE ; Select another bill to display

External References

Name Field # of Occurrence
FILE^DICN NEW+9
^DIE EDIT+18, NEW+12
^DIK DELETE+20, NEW+22
^DIR DELETE+17, NEW+17
$$COBN^IBCEF EDIT+12, DELETE+12, NEW+8, AMTCHG+8
$$LAST364^IBCEF4 NEW+6
$$MRACNT^IBCEMU1 VIEW+16
$$SEL^IBCEMU1 VLOOP+2
$$BILL^IBCEOB2 CHANGE+5
BLD^IBCEOB2 EDIT+20, DELETE+23, NEW+25
EN^VALM VIEW+16, VLOOP+5
FULL^VALM1 EDIT+3, DELETE+3, NEW+3, VIEW+3, VIEW+10, VLOOP+1, CHANGE+2
PAUSE^VALM1 EDIT+10, EDIT+14, EDIT+22, DELETE+10, DELETE+14, DELETE+25, NEWQ, VIEW+12
EN^VALM2 SEL+5
$$NOW^XLFDT NEW+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,*7,"Cannot edit an EOB that was not entered manually!!"
  • Line Location: EDIT+9
Function Call: WRITE
  • Prompt: !,*7,"Can only edit an EOB for the current insurance sequence"
  • Line Location: EDIT+13
Function Call: WRITE
  • Prompt: !,*7,"Cannot delete an EOB that was not entered manually!!"
  • Line Location: DELETE+9
Function Call: WRITE
  • Prompt: !,*7,"Cannot only edit an EOB for the current insurance sequence"
  • Line Location: DELETE+13
Function Call: WRITE
  • Prompt: !!,IBE,!
  • Line Location: DELETE+16
Function Call: WRITE
  • Prompt: !!,"EOB Deleted!!",!
  • Line Location: DELETE+21
Function Call: WRITE
  • Prompt: !
  • Line Location: NEW+12
Function Call: WRITE
  • Prompt: !
  • Line Location: NEW+17
Function Call: WRITE
  • Prompt: !
  • Line Location: NEW+17
Function Call: WRITE
  • Prompt: !,"EOB added",!
  • Line Location: NEW+19
Function Call: WRITE
  • Prompt: !!,"EOB Date/Time needed, not entered"
  • Line Location: NEW+23
Function Call: WRITE
  • Prompt: !,"No EOB added!!",!
  • Line Location: NEW+24
Function Call: WRITE
  • Prompt: !!?5,"There is no electronic EOB for this claim."
  • Line Location: VIEW+11
Routine Call
  • DIE
  • Line Location:
    • EDIT+18
    • NEW+12
Routine Call
  • DIR
  • Line Location:
    • DELETE+17
    • NEW+17
Routine Call
  • VALM
  • Line Location:
    • VIEW+16
    • VLOOP+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBM(361.1 - [#361.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] AMTCHG+6, AMTCHG+10, AMTCHG+12
^IBM(361.1 - [#361.1] EDIT+7, DELETE+7, NEW+13, NEW+15, AMTCHG+6
^TMP("IBCECOB" SEL+6

Label References

Name Line Occurrences
$$AMTCHG EDIT+17
$$SEL EDIT+4, DELETE+4
AMTQ AMTCHG+7, AMTCHG+9, AMTCHG+11, AMTCHG+12
DELQ DELETE+5, DELETE+8, DELETE+12, DELETE+18
EDITQ EDIT+5, EDIT+8, EDIT+12
NEWQ NEW+10
SEL VIEW+4
VIEWQ VIEW+5, VIEW+6, VIEW+9, VIEW+16, VLOOP+3
VLOOP VLOOP+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EDIT+1~, EDIT+16*, EDIT+17, DELETE+1~, DELETE+20*, NEW+11*, NEW+13, NEW+15, NEW+21, AMTCHG~
, AMTCHG+6
DD NEW+1~, NEW+5!, NEW+9!
DIC NEW+1~, NEW+7*, NEW+9!
DIC("DR" NEW+8*
DIC(0 NEW+7*
DIE EDIT+1~, EDIT+16*, NEW+1~, NEW+11*, NEW+12!
DIK DELETE+1~, DELETE+20*, NEW+22*
DIR DELETE+1~, DELETE+17!, NEW+17!
DIR("A" DELETE+17*, NEW+16*
DIR("B" DELETE+17*, NEW+16*
DIR(0 DELETE+17*, NEW+16*
DLAYGO NEW+1~, NEW+7*, NEW+9!
DO NEW+1~, NEW+5!, NEW+9!
DR EDIT+1~, EDIT+17*, NEW+11*
DUZ EDIT+17, NEW+8
IB0 EDIT+1~, EDIT+7*, EDIT+8, EDIT+12, DELETE+1~, DELETE+7*, DELETE+8, DELETE+12, AMTCHG+4~, AMTCHG+6*
, AMTCHG+7
IB364 NEW+1~, NEW+6*, NEW+8
IBCOBN AMTCHG+4~, AMTCHG+8*, AMTCHG+9, AMTCHG+10
IBDA EDIT+1~, EDIT+4*, EDIT+5, EDIT+7, EDIT+16, DELETE+1~, DELETE+4*, DELETE+5, DELETE+7, DELETE+20
, VIEW+1~, VIEW+4, SEL~, SEL+4!, SEL+6*
IBDA( VIEW+6, VIEW+9, SEL+6*
IBDA(0 VIEW+5
IBE DELETE+1~, DELETE+4, DELETE+16
IBEOB NEW+1~, NEW+13*, NEW+14, NEW+18*, NEW+20
IBEOBIFN VIEW+1~, VIEW+9*, VLOOP+2*, VLOOP+3
IBIFN EDIT+12, DELETE+12, NEW+6, NEW+7, NEW+8, VIEW+1~, VIEW+6*, VIEW+16, VLOOP+2, VLOOP+4
, VLOOP+6*, AMTCHG+4~, AMTCHG+6*, AMTCHG+8, AMTCHG+10, CHANGE+4, CHANGE+5*, CHANGE+6*
IBIFN1 CHANGE+1~, CHANGE+4*, CHANGE+6
IBIFNSAV VIEW+1~, VLOOP+4*, VLOOP+6
>> IBMRANOT VIEW+9, VIEW+16
IBNB AMTCHG+4~, AMTCHG+10*, AMTCHG+11, AMTCHG+12
IBNULL CHANGE+1~, CHANGE+5, CHANGE+6
IBOK NEW+1~, NEW+13*, NEW+18*, NEW+19, NEW+23, AMTCHG+4~, AMTCHG+5*, AMTCHG+7*, AMTCHG+13*, AMTQ
IBSEL VIEW+1~, VIEW+5*, VIEW+6, VIEW+9
ONE SEL~, SEL+5
U EDIT+8, EDIT+12, DELETE+8, DELETE+12, NEW+13, NEW+15, VIEW+6, VIEW+9, AMTCHG+7, AMTCHG+10
, AMTCHG+12, SEL+6
>> VALMBCK EDITQ*, DELQ*, NEWQ+1*, VIEWQ+1*, CHANGE+7*
VALMQUIT CHANGE+3!, CHANGE+5, CHANGE+6!, CHANGE+7
VALMY SEL+3~
VALMY( SEL+6
X EDIT+1~, DELETE+1~, NEW+1~, NEW+7*
>> XQORNOD(0 SEL+5
Y EDIT+1~, DELETE+1~, DELETE+18, NEW+1~, NEW+10, NEW+11, NEW+18
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