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

Package: Integrated Billing

Routine: IBATO1


Information

IBATO1 ;LL/ELZ - TRANSFER PRICING REPORTS CONT. ; 18-DEC-98

Source Information

Source file <IBATO1.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Integrated Billing 3 $$DRGTD^IBACSV  HEAD^IBATO  ($$COPAY,$$EX,$$PIN,$$PROC)^IBATUTL  
VA FileMan 2 COMMA^%DTC  ^DIR  
Scheduling 1 (GETGEN,PARSE)^SDOE  

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

Package Total Caller Graph
Integrated Billing 2 IBATO  ^IBAT(351.62  

Entry Points

Name Comments DBIA/ICR reference
PAGE() ; performs page reads and returns 1 if quiting is needed
NUM(X,X2,X3) ; calls to format numbers
UNIT(IBA,IBD,IBO) ; sets IBD subscripted with units for IBA
TYPE(IBA,IBO) ; sets IBO with descriptive trans type for IBA
DES(IBA,IBD,IBO) ; sets IBD subscripted with description for IBA
PRICE(IBA,IBD,IBO) ; sets IBD subscripted with price for IBA
QTY(IBA,IBD,IBO) ; sets IBD subscripted with quantity for IBA
COPAY(IBA) ; compute copay for iba and return
VAR(IBA) ; set up required variables
PRT(IBIEN) ; main entry for report printing
EXPRT(IBIEN) ; main entry for excel printing
STRIP(A,B) ; strips off junk from numbers
EXSING(IBF) ; print single valued data first
PRTH ; header
PRTG(X,Y,Z,C) ; general printing stuff
SEL(B) ; selection of which fields B = default
; sets up variables IBFIELD and IBMUL
; returns max length of output
AGAIN
DISP ; displays fields for selection

External References

Name Field # of Occurrence
COMMA^%DTC NUM+1
^DIR PAGE+2, AGAIN+2
$$DRGTD^IBACSV DES+3
HEAD^IBATO PRTH+2
$$COPAY^IBATUTL COPAY+2
$$EX^IBATUTL UNIT+3, UNIT+5, DES+5
$$PIN^IBATUTL DES+7
$$PROC^IBATUTL UNIT+10, DES+11
GETGEN^SDOE TYPE+7
PARSE^SDOE TYPE+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PRT+7
Function Call: WRITE
  • Prompt: IBXDATA,?IBC
  • Line Location: PRT+13
Function Call: WRITE
  • Prompt: ?IBM
  • Line Location: PRT+22
Function Call: WRITE
  • Prompt: !?5
  • Line Location: PRT+27
Function Call: WRITE
  • Prompt: IBXDATA(IBF,IBO,IBF1),?IBC
  • Line Location: PRT+28
Function Call: WRITE
  • Prompt: !
  • Line Location: EXPRT+8
Function Call: WRITE
  • Prompt: $$STRIP(IBXDATA(IBF,IBO,IBF1),IBF2),"|"
  • Line Location: EXPRT+20
Function Call: WRITE
  • Prompt: !
  • Line Location: EXPRT+21
Function Call: WRITE
  • Prompt: $$STRIP(IBXDATA,IBF1(0)),"|"
  • Line Location: EXSING+4
Function Call: WRITE
  • Prompt: !
  • Line Location: PRTH+3
Function Call: WRITE
  • Prompt: $P(IBF1(0),"^"),?IBC
  • Line Location: PRTH+6
Function Call: WRITE
  • Prompt: $P(IBF1(0),"^"),?IBC
  • Line Location: PRTH+11
Function Call: WRITE
  • Prompt: !
  • Line Location: PRTH+13
Function Call: WRITE
  • Prompt: "-"
  • Line Location: PRTH+13
Function Call: WRITE
  • Prompt: !?5
  • Line Location: PRTG+3
Function Call: WRITE
  • Prompt: *7,"??"
  • Line Location: AGAIN+8
Function Call: WRITE
  • Prompt: @IOF,!,"Select the fields you would like printed on this report, in the order you",!,"want them printed. Fields with an asterisk (*) are fields that are multiples.",!
  • Line Location: DISP+8
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+9
Function Call: WRITE
  • Prompt: ?IBI,$P(IBL(IBX,IBI),"^",4),?IBI+4,$S($P(IBL(IBX,IBI),"^",3):"*",1:""),$P(IBL(IBX,IBI),"^")
  • Line Location: DISP+9
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+11
Routine Call
  • DIR
  • Line Location:
    • PAGE+2
    • AGAIN+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBAT(351.61 - [#351.61] UNIT+8, UNIT+9, TYPE+2, DES+8, DES+9, DES+10, PRICE+8, PRICE+9, QTY+8, QTY+9
, COPAY+3, VAR+2
^IBAT(351.62 - [#351.62] PRT+12, PRT+19, PRT+24, PRT+25, PRT+31, EXPRT+8, EXPRT+13, EXPRT+18, EXPRT+19, EXPRT+24
, EXSING+3, AGAIN+8, AGAIN+9, AGAIN+12, DISP+5

Label References

Name Line Occurrences
$$NUM PRICE+3, PRICE+5, PRICE+7, PRICE+10, QTY+3, QTY+5, QTY+7, QTY+10, COPAY+5
$$STRIP EXPRT+20, EXSING+4
AGAIN AGAIN+8
EXSING EXPRT+8, EXPRT+16
PRTG PRT+11, EXSING+2, PRTH+5, PRTH+10
PRTH PRT+6
VAR PRT+4, EXPRT+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A STRIP~, STRIP+1
B STRIP~, STRIP+1, SEL~, AGAIN, AGAIN+5
C PRTG~, PRTG+3*
DFN PRT+2~, PRT+5*, EXPRT+2~, EXPRT+5*
DIR PAGE+1~, SEL+4~
DIR("?" AGAIN+1*
DIR("A" AGAIN*
DIR(0 PAGE+2*, AGAIN*
DIROUT PAGE+1~, SEL+4~, AGAIN+2
DIRUT PAGE+1~, PAGE+3, SEL+4~
DTOUT PAGE+1~, SEL+4~, AGAIN+2
DUOUT PAGE+1~, SEL+4~, AGAIN+2
IBA UNIT~, UNIT+8, TYPE~, TYPE+2, DES~, DES+9, PRICE~, PRICE+8, QTY~, QTY+8
, COPAY~, VAR~, VAR+2
IBA( VAR+2*
IBA(0 UNIT+2, UNIT+4, UNIT+5, UNIT+6, TYPE+2*, TYPE+3, TYPE+7, DES+2, DES+3, DES+4
, DES+6, DES+7, PRICE+2, PRICE+4, PRICE+6, QTY+2, QTY+4, QTY+6, COPAY+2, COPAY+3
IBA(1 UNIT+3, DES+3, PRICE+3, QTY+3
IBA(4 DES+5, PRICE+5, PRICE+7, QTY+5
IBB UNIT+1~*, UNIT+3, UNIT+5, UNIT+7, UNIT+10, TYPE+1~, TYPE+3*, TYPE+4, TYPE+5, TYPE+6
, DES+1~*, DES+3, DES+5, DES+7, DES+11, PRICE+1~*, PRICE+3, PRICE+5, PRICE+7, PRICE+10
, QTY+1~*, QTY+3, QTY+5, QTY+7, QTY+10
IBC TYPE+1~, TYPE+8, COPAY+1~, COPAY+3*, COPAY+4, PRT+2~, PRT+7*, PRT+11, PRT+13, PRT+16
, PRT+22*, PRT+26*, PRT+27*, PRT+28, EXSING+2, PRTH+1*, PRTH+5, PRTH+6, PRTH+10, PRTH+11
, PRTH+13*
IBC(0 TYPE+8
IBCOPAY COPAY+1~, COPAY+2*, COPAY+3, COPAY+4*, COPAY+5
IBD UNIT~, TYPE+1~, DES~, PRICE~, QTY~
IBD( UNIT+10*, TYPE+9, DES+11*, PRICE+10*, QTY+10*
IBD(1 UNIT+3*, UNIT+5*, UNIT+7*, DES+3*, DES+5*, DES+7*, PRICE+3*, PRICE+5*, PRICE+7*, QTY+3*
, QTY+5*, QTY+7*
IBDATE DES+1~, DES+8*, DES+11
IBF PRT+2~, PRT+10*, PRT+11, PRT+17*, PRT+18, PRT+22*, PRT+23, PRT+28, EXPRT+2~, EXPRT+11*
, EXPRT+12, EXPRT+16*, EXPRT+17, EXPRT+20, EXSING~, EXSING+1*, EXSING+2, PRTH+4*, PRTH+5, PRTH+9*
, PRTH+10
IBF1 PRT+2~, PRT+11, PRT+12, PRT+18*, PRT+19, PRT+23*, PRT+24, PRT+28, EXPRT+2~, EXPRT+12*
, EXPRT+13, EXPRT+17*, EXPRT+18, EXPRT+20, EXSING+2, EXSING+3, PRTH+5, PRTH+10
IBF1(0 EXSING+4, PRTH+6, PRTH+11
IBF2 PRT+2~, PRT+24*, PRT+25*, PRT+26, PRT+27, EXPRT+2~, EXPRT+18*, EXPRT+19*, EXPRT+20
>> IBFIELD PRT+11, EXSING+2, PRTH+5, AGAIN+14
>> IBFIELD( PRT+10, EXSING+1, PRTH+4
IBI DISP+2~, DISP+5*, DISP+9*
IBIEN UNIT+9, DES+8, DES+10, PRICE+9, QTY+9, PRT~, PRT+4, EXPRT~, EXPRT+4
IBIEN(0 PRT+5, PRT+6, EXPRT+5, PRTH+2
IBL DISP+2~, DISP+5*
IBL( DISP+5*, DISP+9
>> IBLAST PRT+6*
IBM PRT+2~, PRT+16*, PRT+22, SEL+4~, SEL+5*
>> IBMUL EXPRT+8, PRTH+10, AGAIN+14
>> IBMUL( PRT+17, PRT+18, EXPRT+11, EXPRT+12, PRTH+9
IBO UNIT~, UNIT+3, UNIT+5, UNIT+7, UNIT+10, TYPE~, TYPE+4*, TYPE+5*, TYPE+6*, TYPE+9*
, DES~, DES+3, DES+5, DES+7, DES+11, PRICE~, PRICE+3, PRICE+5, PRICE+7, PRICE+10
, QTY~, QTY+3, QTY+5, QTY+7, QTY+10, PRT+2~, PRT+23*, PRT+28, EXPRT+2~, EXPRT+17*
, EXPRT+20
>> IBPAGE PRT+6
>> IBQUIT PRT+6, PRTH+2
IBR SEL+4~, SEL+5*, AGAIN+12*
IBT COPAY+1~, COPAY+3*
IBX UNIT+1~, UNIT+8*, UNIT+9, UNIT+10, DES+1~, DES+9*, DES+10, DES+11, PRICE+1~, PRICE+8*
, PRICE+9, PRICE+10, QTY+1~, QTY+8*, QTY+9, QTY+10, VAR+1~, VAR+2*, DISP+2~, DISP+5*
, DISP+9*
IBX(0 UNIT+9*, UNIT+10, DES+10*, DES+11, PRICE+9*, PRICE+10, QTY+9*, QTY+10
IBXDATA PRT+2~, PRT+13, EXPRT+2~, EXSING+4
IBXDATA( PRT+22, PRT+23, PRT+28, EXPRT+16, EXPRT+17, EXPRT+20
IOF DISP+8
IOM PRT+27, PRTH+13, PRTG+3
IOSL PRT+6
U UNIT+10, DES+3, DES+7, DES+8, DES+11
VA PRT+2~, EXPRT+2~
VAERR PRT+2~, EXPRT+2~
W SEL+4~, AGAIN+12*
X PAGE+1~, NUM~, NUM+2, PRTG~, SEL+4~, AGAIN+9*, AGAIN+12*
X( PRTG+1, PRTG+2
X2 NUM~
X3 NUM~
Y PAGE+1~, PRTG~, PRTG+1, PRTG+2, SEL+4~, AGAIN+5*, AGAIN+8, AGAIN+9*, AGAIN+12
Z PRTG~, PRTG+1*, PRTG+2, SEL+4~, AGAIN+12*
Z(0 PRTG+2*, PRTG+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All