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

Package: Integrated Billing

Routine: IBOMTC


Information

IBOMTC ;ALB/CPM-BILLING ACTIVITY LIST ; 09-JAN-92

Source Information

Source file <IBOMTC.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 2 (,HOME)^%ZIS  ^%ZTLOAD  
VA FileMan 2 ^%DT  ^DIR  
Integrated Billing 1 ^IBOMTC1  
Registration 1 KVAR^VADPT  

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 IB MT BILLING REPORT  

Entry Points

Name Comments DBIA/ICR reference
BDT
EDT
END

External References

Name Field # of Occurrence
^%DT BDTEDT+1
^%ZIS EDT+6
HOME^%ZIS IBOMTC+7, EDT+12
^%ZTLOAD EDT+11
^DIR IBOMTC+9
^IBOMTC1 EDT+18
KVAR^VADPT END+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"The Start Date cannot be earlier than 10/1/90.",!
  • Line Location: BDT+1
Function Call: READ
  • Formatting: !
  • Prompt: "Go to DATE: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: EDT+0
Function Call: WRITE
  • Prompt: *7," ??",!,"ENDING DATE must follow BEGINNING DATE."
  • Line Location: EDT+2
Function Call: WRITE
  • Prompt: !!,$S($D(ZTSK):"This job has been queued. The task number is "_ZTSK_".",1:"Unable to queue this job.")
  • Line Location: EDT+11
Routine Call
  • DIR
  • Line Location:
    • IBOMTC+9
Routine Call
  • %ZIS
  • Line Location:
    • EDT+6
Routine Call
  • %ZIS
  • Line Location:
    • IBOMTC+7
    • EDT+12

Label References

Name Line Occurrences
BDT BDT+1, EDT+2
EDT EDT+1
END IBOMTC+9, BDTEDT+1, EDT+6, EDT+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT BDT*!, EDT*, END!
%DT("A" BDT*
%DT("B" IBOMTC+9*
>> %ZIS EDT+6*
DIR IBOMTC+9!
DIR("A" IBOMTC+9*
DIR("B" IBOMTC+9*
DIR(0 IBOMTC+9*
>> DIRUT IBOMTC+9
DTIME IBOMTC+7*, EDT
IBBDT IBOMTC+9*, BDT*, BDT+1, EDTEDT+2, END!
IBDESC EDT+4*, EDT+8, END!
IBEDT EDT+1*, END!
IBPURPHT IBOMTC+9*, BDT+1, EDT+10, END!
IBX END!
IO EDT+14
IO("Q" EDT+7, EDT+12!
POP EDT+6, END!
X EDT*, EDT+1, END!
Y IBOMTC+9, BDTEDT+1, EDT+2, END!
ZTDESC EDT+8*, EDT+12!
>> ZTRTN EDT+8*
>> ZTSAVE("IBBDT" EDT+9*
>> ZTSAVE("IBDESC" EDT+9*
>> ZTSAVE("IBEDT" EDT+9*
>> ZTSAVE("IBPURPHT" EDT+10*
ZTSK EDT+11, EDT+12!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All