XOBUZAP0 ;; mjk/alb - Terminate Jobs Utility ; 08/4/2005 13:00
Source file <XOBUZAP0.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
GETREF(SUB,XOBJOB) | ; -- get ^XTMP reference of $JOB or passed in job #
|
|
KILL(XOBREF) | ; -- kill @ ref
|
|
SETVI(XOBREF,XOBDUZ,XOBIP,XOBDESC) | ; -- Set VistA Info node
|
|
GETDUZ(XOBREF) | ; -- Get DUZ from VistA Info node
|
|
GETIP(XOBREF) | ; -- Get Client IP from VistA Info node
|
|
GETSTATE(CODE) | ; -- get state
|
|
STATE | ; -- get process STATE text
|