Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

Entry Points

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

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
Info |  Source |  Entry Points |  Interaction Calls