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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBECEA35

Package: Integrated Billing

Routine: IBECEA35


Information

IBECEA35 ;ALB/CPM - Cancel/Edit/Add... TRICARE Support ; 09-AUG-96

Source Information

Source file <IBECEA35.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Integrated Billing 7 $$CUS^IBACUS  ($$ADSEL,$$DIS)^IBECEA31  (AMT,FR)^IBECEAU2  ADD^IBECEAU3  PROC^IBECEAU4  $$DAT1^IBOUTL  AR^IBR  
VA FileMan 1 ^DIR  

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

Package Total Caller Graph
Integrated Billing 1 IBECEA3  

Entry Points

Name Comments DBIA/ICR reference
CUS ; Process all TRICARE copayment charges.
GO ; - bill the charge
CUSQ
DISP(DFN,INS) ; Display TRICARE beneficiary insurance information.
; Input: DFN -- Pointer to the patient in file #2
; INS -- Pointer to the patient policy in file #2.312
DISPQ

External References

Name Field # of Occurrence
^DIR CUS+26
$$CUS^IBACUS CUS+5
$$ADSEL^IBECEA31 CUS+15
$$DIS^IBECEA31 CUS+19
AMT^IBECEAU2 CUS+10, CUS+12, CUS+17
FR^IBECEAU2 CUS+12
ADD^IBECEAU3 GO+8
PROC^IBECEAU4 GO+4
$$DAT1^IBOUTL DISP+12, DISP+14
AR^IBR GO+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This transaction has been cancelled."
  • Line Location: CUS+26
Function Call: WRITE
  • Prompt: !,"Billing the TRICARE patient copayment charge..."
  • Line Location: GO+7
Function Call: WRITE
  • Prompt: "completed."
  • Line Location: GO+10
Function Call: WRITE
  • Prompt: *7,!!,"Please note that this patient does not have active TRICARE coverage!",!
  • Line Location: DISP+4
Function Call: WRITE
  • Prompt: !!," TRICARE coverage for ",$P($G(^DPT(DFN,0)),"^"),":"
  • Line Location: DISP+9
Function Call: WRITE
  • Prompt: !!," Insured Person: ",$E($P(IBINS,"^",17),1,20)
  • Line Location: DISP+10
Function Call: WRITE
  • Prompt: ?42,"Company: ",$P($G(^DIC(36,+IBINS,0)),"^")
  • Line Location: DISP+11
Function Call: WRITE
  • Prompt: !," Effective Date: ",$$DAT1^IBOUTL($P(IBINS,"^",8))
  • Line Location: DISP+12
Function Call: WRITE
  • Prompt: ?40,"Plan Name: ",$P(IBPLAN,"^",3)
  • Line Location: DISP+13
Function Call: WRITE
  • Prompt: !,"Expiration Date: ",$$DAT1^IBOUTL($P(IBINS,"^",4))
  • Line Location: DISP+14
Function Call: WRITE
  • Prompt: ?38,"Plan Number: ",$P(IBPLAN,"^",4),!
  • Line Location: DISP+15
Function Call: WRITE
  • Prompt: " Service Branch: ",$P($G(^DIC(23,+$P(IBINS3,"^",2),0)),"^")
  • Line Location: DISP+16
Function Call: WRITE
  • Prompt: ?37,"Service Rank: ",$P(IBINS3,"^",3)
  • Line Location: DISP+17
Routine Call
  • DIR
  • Line Location:
    • CUS+26

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(23 - [#23] DISP+16
^DIC(36 - [#36] DISP+11
^DPT - [#2] DISP+7, DISP+9
^IBA(355.3 - [#355.3] DISP+8
^IBE(350.1 - [#350.1] CUS+9

Label References

Name Line Occurrences
CUSQ GO+1, GO+4, GO+8
DISP CUS+6
DISPQ DISP+4
GO CUS+10, CUS+11, CUS+14

Naked Globals

Name Field # of Occurrence
^(3 DISP+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN CUS+5, CUS+6, CUS+15, DISP~, DISP+7, DISP+9
DIR CUS+26!
DIR("?" CUS+25*
DIR("A" CUS+24*
DIR(0 CUS+24*
>> DIRUT CUS+26
DT CUS+5, CUS+10, CUS+12, CUS+19
>> DUOUT CUS+26
>> IBATYP CUS+9
>> IBATYPN CUS+9*, CUS+10, CUS+11, CUS+14
>> IBCOMMIT GO+10*
IBCS CUS+2~, CUS+5*, CUS+6, CUSQ!
>> IBDESC CUS+10*, CUS+13*, CUS+15*
>> IBDG CUS+15*, CUS+16, CUS+18
>> IBEVDA CUS+13*, CUS+18*
>> IBEVDT CUS+13*, CUS+18*
>> IBFR CUS+10*, CUS+13, CUS+18*
IBINS CUS+2~, DISP+6~, DISP+7*, DISP+8, DISP+10, DISP+11, DISP+12, DISP+14
IBINS3 DISP+6~, DISP+7*, DISP+16, DISP+17
>> IBLIM CUS+12*
IBPLAN CUS+2~, DISP+6~, DISP+8*, DISP+13, DISP+15
IBS DISP+6~*, DISP+16*, DISP+17*, DISP+18
>> IBSL CUS+18*, CUS+19
>> IBTO CUS+13*, CUS+19*
>> IBUNIT CUS+9*
>> IBY CUS+12, CUS+17, CUS+21*, CUS+26*, GO+1, GO+4, GO+8
INS DISP~, DISP+4, DISP+7
X CUS+2~
>> Y CUS+26
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All