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

Package: Kernel

Routine: ZTMKU


Information

ZTMKU ;SEA/RDS-Taskman: Option, ZTMWAIT/RUN/STOP ;01/05/09 16:07

Source Information

Source file <ZTMKU.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 (7,YMD)^%DTC  ^DIR  
Kernel 1 $$ASKSTOP^%ZTLOAD  

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Kernel 3 XUTM RUN  XUTM STOP  XUTM WAIT  
IHS V Files 200 Conversion 2 BVCONV  BVCONV1  
IHS VA %Utilities 1 ZIBENVCK  

Entry Points

Name Comments DBIA/ICR reference
UP(X) ;Convert to Uppercase
STOP ;Shut Down Task Managers
PURGE ;Purge the TASK list of running tasks.
NODES ;Return Task Manager Status Nodes
OPT(MD) ;Disable/Enable option prosessing
WS(MD,GR) ;Set/Clear Wait state
LIVE ;Return Whether A Task Manager Is Live
GROUP(CALL) ;Do CALL for each node, use NODE as the parameter
TABLE ;Display Task Manager Table
ZTM ;Return Number Of Live Task Managers
UPDATE ;Have Managers Do an parameter Update
SSUB(NODE) ;Stop sub-managers
SMAN(NODE) ;stop managers
T ;Print Informal-format Conversion Of $H-format Date ; Input: %ZTT, DT.
CLEAN ;Cleanup Status Node
QSUB
SS(MD,GR,NODE) ;Set/clear STOP nodes.
WAIT ;Put Task Managers In WAIT State
RUN ;Remove Task Managers From WAIT State
MENU ;
ASKACT ;Ask if active Tasks should be signaled to stop.
QUERY ;Query Status Of A Task Manager
STPACT ;Set the STOP flag for all ACTIVE Tasks.

External References

Name Field # of Occurrence
7^%DTC T+1
YMD^%DTC TABLE+3
$$ASKSTOP^%ZTLOAD STPACT+3
^DIR MENU+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"TaskMan removed from 'WAIT STATE'.",!
  • Line Location: RUN+1
Function Call: WRITE
  • Prompt: !,"Managers will update parameters.",!
  • Line Location: UPDATE+2
Function Call: WRITE
  • Prompt: !,"TaskMan now in 'WAIT STATE'",$C(7)
  • Line Location: WAIT+1
Function Call: READ
  • Prompt: "Are you sure you want to stop TaskMan? NO// "
  • Formatting: !!
  • Timeout: $S($D(DTIME)#2:DTIME,1:60)
  • Variable: ZTX
  • Line Location: STOP+2
Function Call: WRITE
  • Prompt: !,"Answer YES to shut down all Task Managers on current the volume set."
  • Line Location: STOP+2
Function Call: WRITE
  • Prompt: !,"TaskMan NOT shut down."
  • Line Location: STOP+3
Function Call: WRITE
  • Prompt: !,"Shutting down TaskMan."
  • Line Location: STOP+4
Function Call: READ
  • Prompt: "Should active jobs be signaled to stop? NO// "
  • Formatting: !!
  • Timeout: $G(DTIME,60)
  • Variable: ZTX
  • Line Location: ASKACT+2
Function Call: WRITE
  • Prompt: !,"Answer YES to set the STOP flag for active tasks.",!,"Tasks need to call $$S^%ZTLOAD to get the signal."
  • Line Location: ASKACT+2
Function Call: WRITE
  • Prompt: !,"Tasks NOT signaled to shut down."
  • Line Location: ASKACT+3
Function Call: WRITE
  • Prompt: !!,"Signaling active Tasks to STOP."
  • Line Location: ASKACT+4
Function Call: WRITE
  • Prompt: !,"Done."
  • Line Location: ASKACT+5
Function Call: WRITE
  • Prompt: !,"TASK: ",ZTI," Stop status: ",ZT2
  • Line Location: STPACT+3
Function Call: READ
  • Prompt: "Should active submanagers shut down after finishing their current tasks? NO// "
  • Formatting: !!
  • Timeout: $S($D(DTIME)#2:DTIME,1:60)
  • Variable: ZTX
  • Line Location: QSUB+1
Function Call: WRITE
  • Prompt: !,"Please answer YES or NO."
  • Line Location: QSUB+1
Function Call: WRITE
  • Prompt: !,"Okay!",!
  • Line Location: QSUB+2
Function Call: WRITE
  • Prompt: !,"JOB NUMBER",?15,"STATUS",?25,"DESCRIPTION",?55,"LAST UPDATED",?75,"LIVE"
  • Line Location: TABLE+1
Function Call: WRITE
  • Prompt: !,"----------",?15,"------",?25,"-----------",?55,"------------",?75,"----"
  • Line Location: TABLE+2
Function Call: WRITE
  • Prompt: !,%ZTY(%ZTI),?15,$P(%ZTY,U,2),?25,$P(%ZTY,U,3),?55
  • Line Location: TABLE+4
Function Call: WRITE
  • Prompt: ?75,$S(%ZTY:"YES",1:"NO")
  • Line Location: TABLE+4
Function Call: WRITE
  • Prompt: !?6,"Total:",$J(%ZTZ,3),!?6,"Live :",$J(%ZTZ1,3)
  • Line Location: TABLE+5
Function Call: WRITE
  • Prompt: !,"Done!",!
  • Line Location: CLEAN+1
Function Call: WRITE
  • Prompt: !,"Done!",!
  • Line Location: PURGE+3
Function Call: WRITE
  • Prompt: $S(DT=X:"TODAY",DT+1=X:"TOMORROW",1:$E(X,4,5)_"/"_$E(X,6,7)_"/"_$E(X,2,3))_" AT "
  • Line Location: T+1
Function Call: WRITE
  • Prompt: $E(%H+100,2,3)_":"_$E(X#60+100,2,3)
  • Line Location: T+1
Routine Call
  • DIR
  • Line Location:
    • MENU+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZTSCH("NO-OPTION" OPT+1*, OPT+2!
^%ZTSCH("RUN" LIVE+3
^%ZTSCH("STATUS" GROUP+3, QUERY+2, NODES+1, CLEAN+1!
^%ZTSCH("STOP" RUN+1!, SS+2*, SS+3!
^%ZTSCH("SUB" GROUP+5
^%ZTSCH("TASK" STPACT+3, PURGE+2!
^%ZTSCH("UPDATE" UPDATE+1!
^%ZTSCH("WAIT" WS+2*, WS+3!

Label References

Name Line Occurrences
$$UP STOP+2, ASKACT+2
@( GROUP+3, GROUP+5
ASKACT STOP+5
GROUP STOP+4, QSUB+2
LIVE TABLE+4, ZTM+2
NODES TABLE+3, ZTM+2
QSUB WAIT+2, STOP+5
QUERY TABLE+4, ZTM+2
RUN MENU+7
SS SSUB+1, SMAN+1
STOP MENU+7
STPACT ASKACT+5
T TABLE+4
TABLE MENU+2
UPDATE MENU+7
WAIT MENU+7
WS RUN+1, WAIT+1, SS+2

Naked Globals

Name Field # of Occurrence
^( GROUP+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% T+2!
%D T+2!
%H TABLE+3*, T+1*, T+2!
%M T+2!
%Y T+2!
%ZTI TABLE+4*, TABLE+6!, ZTM+1~, ZTM+2*
%ZTT TABLE+4*, TABLE+6!, T+1
%ZTX QUERY+1, QUERY+2, QUERY+3!, NODES+1*, NODES+2!, LIVE+1, LIVE+3, LIVE+4!, TABLE+4*, ZTM+2*
%ZTX1 LIVE+1*, LIVE+2, LIVE+4!
%ZTX2 LIVE+1*, LIVE+2, LIVE+4!
%ZTX3 LIVE+2*, LIVE+3, LIVE+4!
%ZTY QUERY+1*, QUERY+2*, NODES+1*, LIVE+1*, LIVE+3*, TABLE+3, TABLE+4, TABLE+6!, ZTM+2, ZTM+3*
%ZTY( NODES+1*, TABLE+4, ZTM+2
%ZTZ TABLE+3*, TABLE+4, TABLE+5, TABLE+6!, ZTM+1~, ZTM+2*
%ZTZ1 TABLE+3*, TABLE+4*, TABLE+5, ZTM+1~, ZTM+2*, ZTM+3
CALL GROUP~, GROUP+3, GROUP+5
DIR MENU+1~
DIR("A" MENU+3*, MENU+4*, MENU+5*, MENU+6*
DIR(0 MENU+3*
DT TABLE+3*, T+1
DTIME MENU+3*, STOP+2, ASKACT+2, QSUB+1
DTOUT MENU+1~
DUOUT MENU+1~
GR SS~, SS+1*, SS+2, SS+3, WS~, WS+1*, WS+2, WS+3
J STOP+1~, GROUP+1~, GROUP+3*
MD SS~, SS+2, SS+3, WS~, WS+2, WS+3, OPT~, OPT+1, OPT+2
ND STOP+1~, GROUP+1~, GROUP+3*, ASKACT+1~, QSUB~
NODE SSUB~, SSUB+1, SMAN~, SMAN+1, SS~, SS+2, SS+3, GROUP+1~, GROUP+3*, GROUP+5*
TSK PURGE+1~*, PURGE+2*
U LIVE+1*, TABLE+3*, TABLE+4
X TABLE+3, UP~, UP+1, T+1*, T+2!
>> Y MENU+7
ZT2 STPACT+1~, STPACT+3*
ZTI STPACT+1~, STPACT+2*, STPACT+3*
ZTX STOP+1~, STOP+2*, STOP+3, ASKACT+1~, ASKACT+2*, ASKACT+3, QSUB~, QSUB+1*, QSUB+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All