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

Package: Record Tracking

Routine: RTL1


Information

RTL1 ;TROY ISC/MJK-Routine to Print Labels ; 5/1/87 11:55 AM ; 4/10/03 3:28pm

Source Information

Source file <RTL1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 2 (,HOME)^%ZIS  ^%ZTLOAD  
VA FileMan 2 ^%DT  NOW^%DTC  
Record Tracking 1 CLOSE^RTUTL  

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

Package Total Caller Graph
Record Tracking 9 RTDPA1  RTL  RTL2  RTP32  RTQ  RTQ41  RTSM1  RTSYS  
RTT4  

Entry Points

Name Comments DBIA/ICR reference
Q
CHKDEV ; check that device can be queued to
ZIS
FMT
EXIT
RD
PRT
RTQ
REC
ER
TYPE
DQ

External References

Name Field # of Occurrence
^%DT DQ+2
NOW^%DTC TYPE, TYPE+1
^%ZIS ZIS
HOME^%ZIS Q+8
^%ZTLOAD Q+7
CLOSE^RTUTL RD+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @RTON,X,@RTOFF
  • Line Location: PRT+7
Function Call: READ
  • Timeout: 0
  • Variable: ZQ
  • Line Location: RD+0
Function Call: WRITE
  • Prompt: !!,*7,"You can not queue to a virtual terminal, try again."
  • Line Location: ER+0
Function Call: WRITE
  • Prompt: !!,*7,"You cannot queue to this device, try again."
  • Line Location: CHKDEV+9
Routine Call
  • %ZIS
  • Line Location:
    • Q+8
Routine Call
  • %ZIS
  • Line Location:
    • ZIS

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS(1 - [#3.5] Q, CHKDEV+3, CHKDEV+6
^%ZIS(2 - [#3.2] PRT+7, CHKDEV+7
^%ZOSF("UCI" Q+2
^DIC(194.4 - [#194.4] FMT, PRT, PRT+1, PRT+2, PRT+3, EXIT
^DIC(194.5 - [#194.5] PRT+1, PRT+2, EXIT
^DIC(195.2 - [#195.2] FMT
^DPT - [#2] Q+5
^RT - [#190] RTQ, REC, TYPE, TYPE+1
^RTV(190.1 - [#190.1] RTQ, TYPE+1
^RTV(195.9 - [#195.9] TYPE+1, TYPE+2

Label References

Name Line Occurrences
CHKDEV Q
ER Q
EXIT PRT+2
FMT REC+1, EXIT+1
PRT EXIT+1, DQ+2
Q REC+1, Q
TYPE PRT+2
ZIS Q

Naked Globals

Name Field # of Occurrence
^( PRT+1, PRT+2, EXIT, Q
^("BAR0" PRT+7
^("BAR1" PRT+7
^("CL" TYPE, TYPE+1
^("E" PRT+2
^(0 RTQ, REC, FMT, PRT, PRT+1, PRT+2, EXIT, TYPE*, TYPE+1*, TYPE+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % TYPE, TYPE+1
>> %DT DQ+2*
%ZIS ZIS*!
%ZIS("A" ZIS*
DT DQ+2*
DUZ(0 Q+2
>> I DQ+1*
IO DQ
IO("Q" ZIS!
IO(0 DQ*
IOF PRT+3
ION RD, TYPE+1, Q
IOST(0 PRT+7
>> POP Q
>> RT REC
RT0 PRT+2, EXIT+1, RD+1!, TYPE*, TYPE+1*, TYPE+2*, TYPE+3*
>> RTA Q*, CHKDEV+3, CHKDEV+6
RTBAR PRT!, EXIT+1, TYPE+1*
RTBC PRT!, PRT+1*, PRT+2*, PRT+7
>> RTBKGRD Q, Q+9
RTCL RD+1!, TYPE*, TYPE+1*
RTDEV CHKDEV+1~, CHKDEV+3*, CHKDEV+4, CHKDEV+5
>> RTE Q+5
RTERR Q~, CHKDEV+2*, CHKDEV+4*, CHKDEV+5*, CHKDEV+8*, CHKDEV+9
>> RTEST PRT+1, PRT+2
RTFMT REC+1!, FMT*, PRT, PRT+1, PRT+2, PRT+3, EXIT, EXIT+1, RD+1!, Q+1
RTHG Q+5*!
RTI PRT+1*, PRT+2*, PRT+3*, EXIT*, RD+1!
RTIFN RTQ*, REC*, REC+1!, EXIT+1*, RD+1!, TYPE, TYPE+1, TYPE+2, Q+1
RTII PRT+3*, RD+1!
>> RTION Q*, Q+5*, Q+6, ER+1*, CHKDEV+9*
>> RTIRE Q+9
>> RTJ PRT+2*
RTMES RTQ*, REC*, REC+1!, Q+9
RTNUM RTQ*, REC*, REC+1!, PRT+3, RD+1!, Q+1
RTOFF PRT+7*!
RTON PRT+7*!
RTQ RTQ, PRT!, EXIT+1, RD+1!, TYPE+1*
RTSUB CHKDEV+1~, CHKDEV+6*, CHKDEV+7*, CHKDEV+8
>> RTTASK RD+1, Q+5
RTVAL Q+1*, Q+9!, DQ+1
RTVAR Q+1*, Q+9!, DQ+1
RTW Q+1*, Q+9!
T RTQ*, REC*, REC+1!, FMT, PRT*, EXIT+1*, RD+1!, TYPE, TYPE+1, TYPE+2
U DQ+2*, CHKDEV+4, CHKDEV+5, CHKDEV+7
>> X RTQ*, REC*, FMT, PRT+7*, EXIT+1*, DQ+2*
>> Y Q+2, DQ+2
ZQ RD*, RD+1!
>> ZTDESC Q+4*
>> ZTDTH Q+2*
>> ZTIO Q+6*
>> ZTRTN Q+2*
>> ZTSAVE("DUZ(0)" Q+2*
>> ZTSAVE("RTVAL" Q+2*
>> ZTSAVE("RTVAR" Q+2*
ZTSK Q+9!
>> ZTUCI Q+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All