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

Package: Kernel

Routine: ZTMON


Information

ZTMON ;SEA/RDS-TaskMan: Option, ZTMON, Part 1 (Main Loop) ;3/21/07 14:36

Source Information

Source file <ZTMON.m>

Entry Points

Name Comments DBIA/ICR reference
ENV ;Main Entry Point For Taskman Status Monitor
EN(MODE) ;
MON
EN2 ;A shorter monitor
RUN ;Evaluate RUN-Node
STATUS ;Evaluate Status List
SCHQ ;Evaluate Schedule List
DIFF(N,O,T) ;Diff in sec.
STIME(%H) ;Status time

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: @IOF,!!,"Checking Taskman."
  • Line Location: RUN+1
Function Call: WRITE
  • Prompt: ?20,"Current $H=",ZTH," (",$$HTE^%ZTLOAD7(ZTH),")"
  • Line Location: RUN+5
Function Call: WRITE
  • Prompt: !,?22,"RUN NODE=",$S(ZTR]"":ZTR,1:"<Undefined>")
  • Line Location: RUN+6
Function Call: WRITE
  • Prompt: " (",$$HTE^%ZTLOAD7(ZTR),")"
  • Line Location: RUN+6
Function Call: WRITE
  • Prompt: !,"Taskman is ",$S(ZTY:"current.",ZTR]"":"late by "_(ZTD-15)_" seconds."_$C(7),1:"")
  • Line Location: RUN+7
Function Call: WRITE
  • Prompt: "."
  • Line Location: RUN+8
Function Call: WRITE
  • Prompt: !,"Checking the Status List:",!," Node",?14,"weight status",?34,"time",?44," $J"
  • Line Location: STATUS+5
Function Call: WRITE
  • Prompt: !?1,ZT
  • Line Location: STATUS+9
Function Call: WRITE
  • Prompt: ?15,$S($D(ZTC("L",ZT)):$J($P(ZTC("L",ZT),U,2),3),1:""),?22,$P(%,U,2),?31,$$STIME($P(%,U))
  • Line Location: STATUS+9
Function Call: WRITE
  • Prompt: ?15,$S($D(ZTC("L",ZT)):$J($P(ZTC("L",ZT),U,2),3),1:""),?22,$P(%,U,2),?31,$$STIME($P(%,U))
  • Line Location: STATUS+9
Function Call: WRITE
  • Prompt: !?5,"The Status List is ",$S(ZTY:"temporarily ",1:""),"empty."
  • Line Location: STATUS+11
Function Call: WRITE
  • Prompt: !!,"Checking the Schedule List:"
  • Line Location: SCHQ+2
Function Call: WRITE
  • Prompt: !?5,"Taskman has ",$S('ZTC:"no",1:ZTC)," task",$S(ZTC'=1:"s",1:"")," scheduled."
  • Line Location: SCHQ+7
Function Call: WRITE
  • Prompt: *7
  • Condition for execution: ZTCO>10
  • Line Location: SCHQ+9
Function Call: WRITE
  • Prompt: " First task is ",ZTL," seconds late."
  • Line Location: SCHQ+10
Info |  Source |  Entry Points |  Interaction Calls