abstract class %ZAPM.ext.Task
Utilities for group work with taskes different Namespaces
do ##class(%ZAPM.ext.Task).tasklist()
do ##class(%ZAPM.ext.Task).taskStopAll(2)
parameter SettingsGN = "^%ZAPM.ext.Task";
parameter TIMEOUTSTOP = 60;
How long to wait for the product to stop before being stopped again by force (seconds)
classmethod CreateTaskPurge(Name As %String = "", ns=$Namespace, days=90)
Create a task to clean productions messages
w ##class(%ZAPM.ext.Task).CreateTaskPurge("Cleaning production messages "_$Namespace,$Namespace,7) }
classmethod CreateTasksPurgeMess(days=90)
as %Status
Creating tasks message cleaning
d ##class(%ZAPM.ext.Task).CreateTasksPurgeMess(30)
classmethod task(extcmd)
as %Status
classmethod taskSave()
as %Status
classmethod taskSuspend(set="")
as %Status
classmethod tasklist()
as %Status
do ##class(%ZAPM.ext.Task).tasklist()
classmethod taskset(id, set)
as %Status
write ##class(%ZAPM.ext.Task).taskset(id,set)