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

Package: Integrated Billing

Routine: IBECEA1


Information

IBECEA1 ;ALB/RLW - Cancel/Edit/Add... Action Entry Points ; Sep 30, 2020@15:16:44

Source Information

Source file <IBECEA1.m>

Call Graph

Call Graph

Call Graph Total: 18

Package Total Call Graph
Integrated Billing 12 ^IBAERR1  IVM^IBAMTV32  SERV^IBAUTL2  CLADD^IBAUTL3  $$COPAYCHK^IBAUTL8  $$PFSSWARN^IBBSHDWN  ARRAY^IBECEA0  ($$DUPCPYCHK,$$GETINFO,CPYDISPLAY)^IBECEA1  
^IBECEA3  UPDATE^IBECEA38  $$FNDVST^IBECEA4  ^IBR  
List Manager 2 ($$SETSTR,FULL)^VALM1  EN^VALM2  
VA FileMan 2 ($$GET1,Y)^DIQ  ^DIR  
Kernel 1 $$FMTE^XLFDT  
Uncategorized 1 ^@(  

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

Package Total Caller Graph
Integrated Billing 6 IBACM ADD CHARGE ONE  IBACM CANCEL CHARGE ONE  IBACM PASS CHARGE  IBACM UPDATE CHARGE ONE  IBECEA1  IBRREL  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
PASS ; 'Pass a Charge' Entry Action (added by Jim Moore 4/30/92)
MSG ; Display results message.
ADD ; 'Add a Charge' Entry Action
UPD ; 'Edit a Charge' Entry Action
CAN ; 'Cancel a Charge' Entry Action
CANQ
PAUSE ; Keep this around for awhile.
DUPCPYCHK(IBIENS) ;
; Input: IBIENS = A single charge IEN to release or a series of charge IENs separated by commas
; Output: 0: No Duplicate Copay exists for the patient/date
; #: IEN of the Duplicate Copay
; If the charge currently being released is a Copay charge, then check for duplicates
; All charges including ON HOLD Copay charges will be in the ACHDT x-ref
IBARY(IBIENS,IBARY) ; Process user selection and save in IBARY ordered by priority
; IBARY will only contain the Copay related charges that need to be checked for duplicates.
; Input: Y = A single charge IEN to release or a series of charge IENs separated by commas
; IBARY = Array name passed by reference for return array.
; Output: IBARY(Date of Interest, Priority Index, IEN in "#350)=""
GETINFO(IBIEN) ; Display Duplicate Copay info to the user.
; IBIEN = Existing Copay already charged for Patient/Date
CPYDISPLAY(IBIEN1,IBIEN2) ; Display Duplicate Copay info to the user.
; Input: IBIEN1 - IEN of 1st charge - Currently in IB
; IBIEN2 - IEN of 2nd charge - Could be in IB or AR

External References

Name Field # of Occurrence
^@( CAN+5
$$GET1^DIQ GETINFO+4, GETINFO+6, GETINFO+7, GETINFO+8, GETINFO+9, GETINFO+11, GETINFO+12, CPYDISPLAY+13
Y^DIQ PASS+42
^DIR MSG+3, PAUSE+1
^IBAERR1 MSG+2
IVM^IBAMTV32 PASS+64
SERV^IBAUTL2 PASS+60
CLADD^IBAUTL3 PASS+61
$$COPAYCHK^IBAUTL8 DUPCPYCHK+21
$$PFSSWARN^IBBSHDWN PASS+5, ADD+1, CAN+2
ARRAY^IBECEA0 CAN+6
$$DUPCPYCHK^IBECEA1 PASS+13
$$GETINFO^IBECEA1 CPYDISPLAY+9, CPYDISPLAY+10, CPYDISPLAY+17
CPYDISPLAY^IBECEA1 PASS+17
^IBECEA3 ADD+2
UPDATE^IBECEA38 PASS+53
$$FNDVST^IBECEA4 PASS+51
^IBR PASS+40
$$SETSTR^VALM1 PASS+43, PASS+44
FULL^VALM1 PASS+16
EN^VALM2 PASS+4, CAN+1
$$FMTE^XLFDT GETINFO+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $S(IBY>0:"done.",1:"error (see msg)")
  • Line Location: PASS+61
Function Call: WRITE
  • Prompt: !,"Passing billing data to the IVM package... "
  • Line Location: PASS+64
Function Call: WRITE
  • Prompt: "done."
  • Line Location: PASS+64
Function Call: WRITE
  • Prompt: !,"Charge #"_IBII_" "_IBMSG
  • Line Location: MSG+2
Function Call: WRITE
  • Prompt: !
  • Line Location: MSG+3
Function Call: WRITE
  • Prompt: !
  • Line Location: MSG+3
Function Call: WRITE
  • Prompt: !,"Rebuilding list of charges..."
  • Line Location: CAN+6
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+1
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+1
Function Call: WRITE
  • Prompt: !
  • Line Location: CPYDISPLAY+19
Function Call: WRITE
  • Prompt: !,"patient/date."
  • Line Location: CPYDISPLAY+23
Function Call: WRITE
  • Prompt: !,"Also check the following Outpatient Observation charge."
  • Line Location: CPYDISPLAY+25
Function Call: WRITE
  • Prompt: !!,"Date Charge Type Stop Charge"
  • Line Location: CPYDISPLAY+26
Function Call: WRITE
  • Prompt: !,"The first charge is currently On Hold, the second charge has already been"
  • Line Location: CPYDISPLAY+31
Function Call: WRITE
  • Prompt: !,"passed to AR:"
  • Line Location: CPYDISPLAY+32
Function Call: WRITE
  • Prompt: !,"Also check the following Outpatient Observation charge."
  • Line Location: CPYDISPLAY+34
Function Call: WRITE
  • Prompt: !!,"Date Charge Type Stop Charge Bill Transaction"
  • Line Location: CPYDISPLAY+35
Function Call: WRITE
  • Prompt: !,"================================================================================"
  • Line Location: CPYDISPLAY+38
Function Call: WRITE
  • Prompt: !,IBTEXT1
  • Line Location: CPYDISPLAY+39
Function Call: WRITE
  • Prompt: !,IBTEXT2
  • Line Location: CPYDISPLAY+40
Function Call: WRITE
  • Prompt: !,IBTEXT3
  • Line Location: CPYDISPLAY+41
Function Call: WRITE
  • Prompt: !!,"Please review these charges and determine what action(s) should be taken."
  • Line Location: CPYDISPLAY+43
Routine Call
  • DIR
  • Line Location:
    • MSG+3
    • PAUSE+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IB - [#350] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(350 PASS+42
^IB - [#350] PASS+26, PASS+31, PASS+32, PASS+41, PASS+57, IBARY+8
^IBE(350.1 - [#350.1] PASS+36, PASS+37, PASS+49, PASS+56
^IBE(350.21 - [#350.21] PASS+34
^IBE(351 - [#351] PASS+57
^TMP("IBACM" PASS+10, PASS+27, PASS+45*
^TMP("IBACMIDX" PASS+11, PASS+28

Label References

Name Line Occurrences
CANQ CAN+1
IBARY DUPCPYCHK+10
MSG PASS+26
PAUSE CPYDISPLAY+44

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C PASS+1~, PASS+42*
>> DFN PASS+57, DUPCPYCHK+21
DIR MSG+3!, PAUSE+1!
DIR(0 MSG+3*, PAUSE+1*
IBAFY PASS+1~
IBARTYP PASS+2~
IBARY DUPCPYCHK+6~, DUPCPYCHK+10, DUPCPYCHK+12, IBARY~
IBARY( DUPCPYCHK+15, DUPCPYCHK+17, DUPCPYCHK+19, IBARY+19*, IBARY+22*, IBARY+25*, IBARY+27*, IBARY+30*, IBARY+33*
IBAT IBARY+5~, IBARY+11*, IBARY+12, IBARY+16*, IBARY+19, IBARY+21, IBARY+24, IBARY+27, IBARY+29, IBARY+32
IBATYP PASS+1~, GETINFO+2~, GETINFO+4*, GETINFO+5*, GETINFO+15
IBAUPD UPD+1*, CAN+2, CAN+5, CAN+7!
IBBG CAN+6*, CAN+7!
IBBIL GETINFO+2~, GETINFO+7*, GETINFO+18
>> IBCLDT PASS+59*
IBCOMMIT CAN+4*, CAN+6, CAN+7!
IBCSTOP GETINFO+2~, GETINFO+9*, GETINFO+10*, GETINFO+16
IBDATA0 IBARY+5~, IBARY+8*, IBARY+9, IBARY+11, IBARY+14, IBARY+16
IBDATE GETINFO+2~, GETINFO+11*, GETINFO+12*, GETINFO+13*, GETINFO+14
IBDT DUPCPYCHK+6~, DUPCPYCHK+14*, DUPCPYCHK+15*, DUPCPYCHK+17, DUPCPYCHK+19, IBARY+5~, IBARY+14*, IBARY+16, IBARY+17, IBARY+19
, IBARY+22, IBARY+25, IBARY+27, IBARY+30, IBARY+33
IBDUPCPY PASS+8~*, PASS+9, PASS+13*, PASS+15, PASS+17, PASS+23, MSG+1, DUPCPYCHK+6~, DUPCPYCHK+8*, DUPCPYCHK+15
, DUPCPYCHK+17, DUPCPYCHK+19, DUPCPYCHK+21*, DUPCPYCHK+23, DUPCPYCHK+26
IBERROR PASS+1~, PASS+53
IBEXCOPAY PASS+2~
IBFLAG CPYDISPLAY+8~, CPYDISPLAY+14*, CPYDISPLAY+21, CPYDISPLAY+29
IBHLDR PASS+1~, PASS+38*, PASS+64
IBIEN DUPCPYCHK+6~, DUPCPYCHK+18*, DUPCPYCHK+19*, DUPCPYCHK+21, IBARY+5~, IBARY+7*, IBARY+8, IBARY+19, IBARY+22, IBARY+25
, IBARY+27, IBARY+30, IBARY+33, GETINFO~, GETINFO+4, GETINFO+6, GETINFO+7, GETINFO+8, GETINFO+9, GETINFO+11
, GETINFO+12
IBIEN1 CPYDISPLAY~, CPYDISPLAY+6, CPYDISPLAY+9
IBIEN2 CPYDISPLAY~, CPYDISPLAY+6, CPYDISPLAY+10, CPYDISPLAY+13, CPYDISPLAY+17
IBIENS DUPCPYCHK~, DUPCPYCHK+10, IBARY~, IBARY+7
IBII PASS+1~, PASS+9*, PASS+10, PASS+11, PASS+26*, PASS+27, PASS+28, PASS+45, MSG+2
IBIL PASS+2~
IBINDX IBARY+5~, IBARY+7*
IBLINE PASS+1~, PASS+10*, PASS+27*, PASS+43*, PASS+44*, PASS+45
IBMSG PASS+1~, PASS+31*, PASS+32*, PASS+33*, PASS+34*, PASS+35*, PASS+36*, PASS+37*, PASS+46*, MSG+2
IBN PASS+2~
IBNBR CAN+4*, CAN+5*, CAN+7!
IBND PASS+1~, PASS+32*, PASS+33, PASS+34, PASS+35, PASS+36, PASS+37, PASS+41*, PASS+42, PASS+44
, PASS+49, PASS+51, PASS+53, PASS+56, PASS+57, PASS+59, PASS+64
>> IBNOD(0 CAN+1
IBNOS PASS+1~, PASS+28*
IBNOS2 PASS+2~, PASS+11*, PASS+13, PASS+17, PASS+26, PASS+28*, PASS+31, PASS+32, PASS+41, PASS+57
IBPRTY DUPCPYCHK+6~, DUPCPYCHK+16*, DUPCPYCHK+17*, DUPCPYCHK+19
IBSEQNO PASS+2~, PASS+36*
IBSERV PASS+2~, PASS+60
IBSTAT PASS+1~, PASS+34*, PASS+38, PASS+42*, PASS+46
IBTCH GETINFO+2~, GETINFO+6*, GETINFO+17
IBTEXT GETINFO+2~, GETINFO+14*, GETINFO+15*, GETINFO+16*, GETINFO+17*, GETINFO+18*, GETINFO+19*, GETINFO+20
IBTEXT1 CPYDISPLAY+8~, CPYDISPLAY+9*, CPYDISPLAY+39
IBTEXT2 CPYDISPLAY+8~, CPYDISPLAY+10*, CPYDISPLAY+40
IBTEXT3 CPYDISPLAY+8~, CPYDISPLAY+11*, CPYDISPLAY+17*, CPYDISPLAY+22, CPYDISPLAY+24, CPYDISPLAY+30, CPYDISPLAY+33, CPYDISPLAY+41
IBTOTL PASS+2~
IBTRAN PASS+2~
IBTRANS CPYDISPLAY+8~, CPYDISPLAY+13*, CPYDISPLAY+14
IBTRN GETINFO+2~, GETINFO+8*, GETINFO+19
IBVSTIEN PASS+2~, PASS+51*, PASS+53
IBXA PASS+2~, PASS+56*, PASS+57
IBY PASS+1~, PASS+10*, PASS+27*, PASS+36*, PASS+40*, PASS+46, PASS+61, MSG+2
U PASS+49, PASS+51, PASS+53, IBARY+11, IBARY+14, IBARY+16, CPYDISPLAY+17
>> VALMBCK PASS+4*, PASS+5*, PASS+19*, ADD+1*, CAN+1*, CAN+2*, CAN+4*
>> VALMBG CAN+6*
>> VALMDDF("BILL#" PASS+44
>> VALMDDF("STATUS" PASS+43
>> VALMY PASS+5
>> VALMY( PASS+9, PASS+26, CAN+5
>> VALMY(0 CAN+1
>> XQORNOD(0 PASS+4
Y PASS+2~, PASS+40, PASS+42*, PASS+43
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