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: %ZTLOAD2

Package: Kernel

Routine: %ZTLOAD2


Information

%ZTLOAD2 ;SEA/RDS-TaskMan: Queue, Part 2 ;12/10/08 07:23

Source Information

Source file <ZTLOAD2.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 4 ($$FMTE,$$FMTH,$$HTFM)^%ZTLOAD7  $$H3^%ZTM  DQ^%ZTM4  (,NEXT)^XQ92  
VA Fileman 1 ^%DT  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Kernel 2 %ZTLOAD  %ZTLOAD1  

Entry Points

Name Comments DBIA/ICR reference
OPTION ;GET--get option data
RESTRCT ;GET--flag tasks with output restricted from certain times; check.
BADDEV(MSG) ;GET--Reject task because of device issue.
SPOOL ;DEVICE--for predefined ZTIO spool device, pick up IO("DOC") if missing
REJECT(MSG) ;GET--reject bad task
AKS() ;Locked before called
ASK ;GET--ask for start time
EXIT ;Report back to app.
ZTKIL ;GET--convert forget time
ASKSTOP ;e.f. Called from ASKSTOP^%ZTLOAD

External References

Name Field # of Occurrence
^%DT ASK+3, ASK+12
$$FMTE^%ZTLOAD7 ASK+9
$$FMTH^%ZTLOAD7 ASK+4, ASK+13, ZTKIL+1
$$HTFM^%ZTLOAD7 RESTRCT+5
$$H3^%ZTM AKS+7
DQ^%ZTM4 AKS+9
^XQ92 RESTRCT+5, ASK+12
NEXT^XQ92 ASK+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"QUEUE INFORMATION MISSING - NOT QUEUED",!,MSG
  • Line Location: REJECT+1
Function Call: WRITE
  • Prompt: !,"Queueing not allowed to device -- NOT QUEUED",!,MSG
  • Line Location: BADDEV+1
Function Call: WRITE
  • Prompt: !,"Sorry--that time is restricted!",!,$C(7)
  • Line Location: RESTRCT+5
Function Call: WRITE
  • Prompt: !,"Output is never allowed from this option!",$C(7),$C(7)
  • Line Location: ASK+8
Function Call: WRITE
  • Prompt: !,"Output from this option is restricted during certain times."
  • Line Location: ASK+11
Function Call: WRITE
  • Prompt: !!,"That is a restricted time!",!,$C(7)
  • Line Location: ASK+12

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZTSCH( AKS+8!
^%ZTSK - [#14.4] ASKSTOP+3, ASKSTOP+5, AKS+2, AKS+4*, AKS+9
^DIC(19 - [#19] OPTION+3

Label References

Name Line Occurrences
$$AKS ASKSTOP+4
EXIT REJECT+2

Naked Globals

Name Field # of Occurrence
^( AKS+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ASKSTOP+2~, ASKSTOP+4*, ASKSTOP+6
%DT ASK+1~, ASK+3*, ASK+6*, ASK+9*, ASK+14!
%DT("A" ASK+6*
%DT("B" ASK+6*, ASK+9*
%DT(0 ASK+6*
%T ASK+14!
%ZTIO AKS+1~, AKS+9*
>> %ZTLOAD("ERROR" EXIT+1*
DUZ AKS+4
IO("DOC" SPOOL+1, SPOOL+2, SPOOL+4, SPOOL+6
MSG REJECT~, REJECT+1, BADDEV~, BADDEV+1, EXIT+1
U OPTION+3, AKS+4, AKS+7
>> X RESTRCT+5*, ASK+3*, ASK+7, ASK+8, ASK+9, ASK+12*
X5 ASK+14!
>> XQNOGO ASK+11
>> XQY ASK+8, OPTION+1
Y ASK+1~, ASK+4, ASK+8*, ASK+12*, ASK+13
ZT ASK+12*, ASK+14!
ZT1 AKS+1~
ZT2 AKS+1~
>> ZTA1 OPTION+2*
>> ZTA4 OPTION+1*, OPTION+2, OPTION+3
>> ZTA5 OPTION+3*
ZTDTH RESTRCT+3, RESTRCT+4, RESTRCT+5*, ASK+2, ASK+3, ASK+4*, ASK+6*, ASK+13*, AKS+1~, AKS+7*
, AKS+8
>> ZTIO SPOOL+2, SPOOL+3, SPOOL+4*, SPOOL+5, SPOOL+6*
>> ZTKIL ZTKIL+1*
>> ZTNAME AKS+4
>> ZTNOGO RESTRCT+2*, ASK+7, ASK+11, ASK+12
>> ZTQUEUED REJECT+1, BADDEV+1, RESTRCT+1, ASK+2
>> ZTSAVE("XQY" OPTION+1
>> ZTSK ASKSTOP+2*, ASKSTOP+3, ASKSTOP+5, AKS+2, AKS+4, AKS+8, AKS+9
>> ZTSK( AKS+2*, AKS+5, AKS+6
>> ZTSK(0 AKS+2*, AKS+3, AKS+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All