Routine: XOBUZAP

Information

XOBUZAP ;; mjk/alb - Terminate Jobs Utility ; 08/4/2005 13:00

Source Information

Source file <XOBUZAP.m>

Caller Graph

Legends:

Package Component Superscript legend

action

^A

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

^O

limited protocol

^LP

run routine

^RR

broker

^B

edit

^E

server

^Se

print

^P

screenman

^SM

inquire

^I

Caller Graph Total: 1

Package	Total	Caller Graph
Kernel	1	^ORD(101

Entry Points

Name	Comments	DBIA/ICR reference
EN(XOBSEL)	; -- Interactive and main entry point for XOBU TERMINATE JOBS tool
ENQ	;
ZAP(XOBSEL)	; -- Non-interactive entry point for XOBU TERMINATE JOBS tool ; API terminates all jobs that job selection criteria ; ; Input: XOBSEL array that specifies selection criteria (See above EN tag for information)
ZAPQ	;
HDR	; -- header code
INIT	; -- init variables and list array
BUILD	; -- build list based on job selection criteria (XOBSEL)
BUILDQ	;
KILL	; -- kill off list location
HELP	; -- help code
EXIT	; -- exit code
EXPND	; -- expand code
MSG	; -- set default message
CPMSG()	; -- connection proxy user message
REFRESH	; -- refresh display ; -- Protocol: XOBU TERMINATE JOBS REFRESH
SS	; -- display M os system status ; -- Protocol: XOBU TERMINATE SYSTEM STATUS
TERMALL	; -- terminate all pid/job ; -- Protocol: XOBU TERMINATE ALL JOBS
TERMALLQ	;
TERMPID	; -- terminate pid/job ; -- Protocol: XOBU TERMINATE A JOB
TERMONE(XOBPID,XOBI)	; -- zap one pid and update display
ASK(PROMPT)	; -- ask if user is sure
RESULT(RESULT)	; -- return result text ; -- Note: Code number conversions found in RESJOB routine in %SYS namespace
VERSEL(XOBSEL)	; -- every job selection criteria
VERSELQ	;
GETJOBS(XOBJOBS)	; -- build XOBJOBS()=pid information
CHECK(XOBSEL,XOBPID,XOBNS)	; -- check job info against selection criteria ; -- use if 1) in correct namespace [XOBNS], ; 2) in correct routine [XOBSEL("ROUTINE")] and ; 3) in correct process state [XOBSEL("STATE")]
JOBINFO(XOBPID,XOBJINFO,XOBSEL)	; -- get PID info ; -- In future (Cache v5+) use instance proprties of %SYSTEM.Process
TERMJOB(XOBPID)	; -- terminate pid/job ; -- In future (Cache v5+) use instance method %SYSTEM.Process.Terminate()
BOXVOL()	; -- cpu volume pair
CURNS()	; -- get current namespace
MUMPS()	; -- get MUMPS implementation
CACHE()	; -- is this a Cache implementation

Customize PDF page

Package: Foundations