Routine: DINVONT

Entry Points

Name	Comments	DBIA/ICR reference
UCICHECK(X)	;Check if valid UCI
RES
SETTRM(X)	;Turn on specified terminators.
JOBX
VERSION(X)	;return OS version, X=1 - return OS
OPNERR
ORDER	;SAVE PART OF SYMBOL TABLE IN LOCATION SPECIFIED BY X
NOLOG	;
NJ
PRGMODE	;
LGR()
NOPN1
DEVOPN	;List of Devices opened
SETENV	;Set environment
DEVOK	;
EC()
HFSREW(IO,IOPAR)	;Rewind Host File.
UCI	;Current UCI
AVJ()	;# available jobs
NOPN	;
JOBPAR	;See if X points to a valid Job. Return its UCI.
T0	; start RT clock
T1	; store RT datum
HFSRWERR	;Error encountered
GETENV	;Get environment (UCI^VOL^NODE)
DOLRO	;SAVE ENTIRE SYMBOL TABLE IN LOCATION SPECIFIED BY X
PRIINQ()	;
SETNM(X)	;Set name, Fall into SETENV
LGRX
ACTJ()	;# Active jobs
LOGRSRC(OPT)	;record resource usage in ^XTMP("KMPR"
PARSIZ	;
PROGMODE()	;Check if in PROG mode

Name	Line Occurrences
Function Call: WRITE	Prompt: "??",*7 Line Location: PRGMODE+2

Name	Line Occurrences (* Changed, ! Killed)
^$JOB(	JOBPAR+2
^%ZIS(1 - [#3.5]	RES+1
^%ZISL(3.54 - [#3.54]	RES, RES+2, RES+4
^%ZOSF("EOFF"	PRGMODE+2
^%ZOSF("EON"	PRGMODE+2
^%ZOSF("UCI"	GETENV+1
^%ZOSF("VOL"	UCI+1, JOBPAR+2, PRGMODE+1, GETENV+1
^%ZRTL(3	T1+1*
^VA(200 - [#200]	PRGMODE+1

Name	Field # of Occurrence
%	ACTJ+1~, UCICHECK+1~, UCICHECK+2, DOLRO+1, ORDER+1, ORDER+2, ORDER+3, ORDER+4!, DEVOPN+3~, NOPN+2
>> %O(	RES+1
>> %X	DOLRO+1, ORDER+2, ORDER+3*
>> %Y	DOLRO+1, ORDER+2, ORDER+3*
>> %ZIS	DEVOK+4
>> %ZISCHK	DEVOK+4
%ZISD0	RES, RES+1, RES+2, RES+4, RES+5!
%ZISD1	RES+4*, RES+5!
>> %ZISTO	DEVOK+3
DUZ	PRGMODE+1, PRGMODE+3
IO	HFSREW~, HFSREW+2
IO(1	DEVOK+5*
IOPAR	HFSREW~, HFSREW+2
OPT	LOGRSRC~, LOGRSRC+1
U	PRGMODE+1
X	UCICHECK~, UCICHECK+2, JOBPAR+2, PRGMODE+2, PRGMODE+3!, DOLRO+1, ORDER+2, ORDER+3, ORDER+4!, PARSIZ+1 , DEVOPN+2*, DEVOK+1, DEVOK+3, DEVOK+4, DEVOK+5, NOPN1, RES, RES+1, RES+3, VERSION~ , VERSION+1, SETNM~, SETTRM~, SETTRM+1
>> X1	DEVOK+1, RES+2, RES+3
XMB	PRGMODE+3*!
XMB(1	PRGMODE+3*
XMB(2	PRGMODE+3*
>> XQZ	PRGMODE+4*
XRT0	T0+1*, T1+1!
>> XRTL	T1+1
>> XRTN	T1+1
>> XUCI	PRGMODE+4*
>> XUSLNT	PRGMODE+4*
>> XUVOL	PRGMODE+1*
Y	ACTJ+1~, ACTJ+2, UCI+1, UCICHECK+1~, UCICHECK+2, UCICHECK+3, JOBPAR+1, JOBPAR+2, NOLOG+1, PRGMODE+4 , DOLRO+1, ORDER+1, ORDER+2, ORDER+3, ORDER+4!, DEVOPN+3, DEVOK+1, DEVOK+3, DEVOK+4, NOPN1 , OPNERR, RES, RES+1, RES+3, RES+4, GETENV+1
Y1	ORDER+1*, ORDER+3, ORDER+4!
ZJ	JOBPAR+1~, NOPN+1~, NOPN+2, NOPN1
ZTPAC	PRGMODE+1*, PRGMODE+2, PRGMODE+3!
maxpid	AVJ+3~*, AVJ+4
v	AVJ+2~*

Name	Field # of Occurrence
$T(^XMB	PRGMODE+3