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

Package: Integrated Billing

Routine: IBCRU7


Information

IBCRU7 ;LL/ELZ - TRANSFER PRICING CHARGE MASTER UTILITIES ; 20-AUG-1999

Source Information

Source file <IBCRU7.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Integrated Billing 2 ($$EMUTL,$$EXPAND)^IBCRU1  $$RGEXT^IBCRU4  

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

Package Total Caller Graph
Integrated Billing 2 IBATCM  IBCRETP  

Entry Points

Name Comments DBIA/ICR reference
DISPCS(IBCSFN) ; display charge set data ** copy of same entry from IBCRU5 with items left off
DISPCSL(IBCSFN) ; display one line of charge set data ** copy of same entry from IBCRU5 with items left off
TPCS(BR,RG) ; finds charge set for billing rate and region
; region in transfer pricing is an institution, not a division
; if RG not passed, looks up national default

External References

Name Field # of Occurrence
$$EMUTL^IBCRU1 DISPCS+6
$$EXPAND^IBCRU1 DISPCS+5, DISPCS+9
$$RGEXT^IBCRU4 DISPCS+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,?4,"Charge Set: ",?19,$E($P(IBCS0,U,1),1,30)
  • Line Location: DISPCS+4
Function Call: WRITE
  • Prompt: ?49,"Charge Type: ",?65,$$EXPAND^IBCRU1(363.1,.04,+$P(IBCS0,U,4))
  • Line Location: DISPCS+5
Function Call: WRITE
  • Prompt: !,?4,"Billing Event: ",?19,$E($$EMUTL^IBCRU1($P(IBCS0,U,3),1),1,28)
  • Line Location: DISPCS+6
Function Call: WRITE
  • Prompt: !,?4,"Billing Rate: ",?19,$E($P(IBBR0,U,1),1,28)
  • Line Location: DISPCS+7
Function Call: WRITE
  • Prompt: !,?4,"Region: ",?19,$P(IBX,U,1)
  • Line Location: DISPCS+8
Function Call: WRITE
  • Prompt: !,?4,"All items billable to the ",$P(IBBR0,U,2)," Billing Rate must be ",$$EXPAND^IBCRU1(363.3,.04,+$P(IBBR0,U,4)),"s.",!!
  • Line Location: DISPCS+9
Function Call: WRITE
  • Prompt: !,?4,"The ",$P(IBBR0,U,2)," Billing Rate charges are calculated, there are no Charge Items.",!!
  • Line Location: DISPCS+10
Function Call: WRITE
  • Prompt: !!,?4,"Set: ",$E($P(IBCS0,U,1),1,30)
  • Line Location: DISPCSL+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399.2 - [#399.2] DISPCS+2
^IBE(363.1 - [#363.1] TPCS+11, DISPCS+2, DISPCSL+2
^IBE(363.3 - [#363.3] TPCS+7, DISPCS+2
^IBE(363.31 - [#363.31] TPCS+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BR TPCS~, TPCS+6, TPCS+7
BRIFN TPCS+4~, TPCS+7*, TPCS+11
CSIFN TPCS+4~, TPCS+11*
IBBR0 DISPCS+1~, DISPCS+2*, DISPCS+7, DISPCS+9, DISPCS+10
IBCS0 DISPCS+1~, DISPCS+2*, DISPCS+4, DISPCS+5, DISPCS+6, DISPCS+8, DISPCSL+1~, DISPCSL+2*, DISPCSL+3
IBCSFN DISPCS~, DISPCS+1*, DISPCS+2, DISPCSL~, DISPCSL+1, DISPCSL+2
IBRVCD DISPCS+1~, DISPCS+2*
IBX DISPCS+1~, DISPCS+8*
RG TPCS~, TPCS+9*, TPCS+11
U TPCS+11, DISPCS+2, DISPCS+4, DISPCS+5, DISPCS+6, DISPCS+7, DISPCS+8, DISPCS+9, DISPCS+10, DISPCSL+3
X TPCS+4~, TPCS+11*, TPCS+12
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Local Variables |  All