Routine: ZOSVPC43

Information

%ZOSV ;SFISC/AC - $View commands for MSM-PC/PLUS ;01/22/97 13:53 [ 04/02/2003 8:29 AM ]

Source Information

Source file <ZOSVPC43.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
Kernel	3	($$FMADD,$$HTFM)^XLFDT BYE^XUSCLEAN CLOSE^ZISPL1
MailMan	1	^XMB
Toolkit	1	DO^%XUCI
Uncategorized	1	$$ZH^%MSMOPS
VA Fileman	1	%XY^%RCR

Entry Points

Name	Comments	DBIA/ICR reference
UCICHECK(X)	;
RES
DEVOPN	;
SETTRM(X)	;Set specified terminators.
DVERR
LIMIT
OSTYPE()	;Return 1 = PC/PLUS, 2 = NT, 3 = UNIX
BADUCI
ORDER	;SAVE PART OF SYMBOL TABLE IN LOCATION SPECIFIED BY X
PRIORITY	;
VERSION(X)	;return OS version, X=1 - return OS
PRGMODE	;
LGR()
V2CL2
V3()	;returns 1=version 3, 0=version 4
V2CL1
NOLOG	;
DVOPN
SETENV	;Set enviroment
DEVOK	;
EC()
PRGMODEX
UCI	;
BAUD
AVJ()	;
JOBPAR	;
ZHDIF	;Display dif of two $$ZH^%MSMOPS's
T0	; start RT clock
T1	; store RT datum
SET	;SET SPECIAL VARIABLES
GETENV	;Get enviroment (UCI^VOL^NODE)
DOLRO	;SAVE ENTIRE SYMBOL TABLE IN LOCATION SPECIFIED BY X
SIGNOFF	;
PRIINQ()	;
SETNM(X)	;Set name, Fall into SETENV
LOGRSRC(OPT)	;record resource usage in ^XUCP
PARSIZ	;
PROGMODE()	;

External References

Name	Field # of Occurrence
$$ZH^%MSMOPS	LOGRSRC+3
%XY^%RCR	DOLRO+1, ORDER+2, ORDER+3
DO^%XUCI	PRGMODE+6
$$FMADD^XLFDT	LOGRSRC+4
$$HTFM^XLFDT	LOGRSRC+4
^XMB	PRGMODE+4, PRGMODE+4
BYE^XUSCLEAN	PRGMODE+4
CLOSE^ZISPL1	V2CL1+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: *7,"YOU HAVE NO PROGRAMMER ACCESS CODE!",! Line Location: PRGMODE+2
Function Call: READ	Prompt: "PAC: " Formatting: ! Timeout: 60 Variable: X Line Location: PRGMODE+3
Function Call: WRITE	Prompt: "??",*7 Line Location: PRGMODE+3
Function Call: WRITE	Prompt: !,"YOU ARE NOW IN PROGRAMMING MODE!",! Line Location: PRGMODEX+0
Function Call: READ	Timeout: 5 Variable: %X Line Location: V2CL1+0
Function Call: WRITE	Prompt: !?2,"CPU=",$J($P(%ZH1,U)-$P(%ZH0,U),6,2),?14,"ET=",$J($P(%ZH1,U,7)-$P(%ZH0,U,7),6,2),?25,"PRD=",$J($P(%ZH1,U,3)-$P(%ZH0,U,3),4),?35,"LRD=",$J($P(%ZH1,U,2)-$P(%ZH0,U,2),6),?47,"LWT=",$J($P(%ZH1,U,4)-$P(%ZH0,U,4),5) Line Location: ZHDIF+1
Function Call: WRITE	Prompt: ?58,"TI=",$J($P(%ZH1,U,5)-$P(%ZH0,U,5),4),?67,"TO=",$J($P(%ZH1,U,6)-$P(%ZH0,U,6),5) Line Location: ZHDIF+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS(1 - [#3.5]	BAUD, RES+1
^%ZISL(3.54 - [#3.54]	RES, RES+2, RES+4
^%ZOSF("EOFF"	PRGMODE+3
^%ZOSF("EON"	PRGMODE+3
^%ZOSF("MGR"	BAUD
^%ZOSF("UCI"	PRGMODE+6
^%ZOSF("VOL"	PRGMODE+1
^%ZOSF("ZD"	SET+1
^%ZRTL(3	T1+1, T1+2
^SYS(0	BAUD+1
^VA(200 - [#200]	PRGMODE+1
^XMB(3.51 - [#3.51]	LIMIT*
^XMBS(3.519 - [#3.519]	V2CL2, V2CL2+1, LIMIT*
^XTMP("XUCP"	LOGRSRC+4, LOGRSRC+5

Label References

Name	Line Occurrences
$$OSTYPE	T0+1, T1+1, LOGRSRC+1
$$V3	%ZOSV+4, AVJ+1, NOLOG+1, DEVOPN+4, DEVOK+9
$$VERSION	DEVOK+7, OSTYPE+1
BADUCI	UCICHECK+3
DVOPN	DEVOK+7, DEVOK+11
LIMIT	V2CL2
RES	DEVOK+3
V2CL2	V2CL1, V2CL1+1

Naked Globals

Name	Field # of Occurrence
^(	PRGMODE+1, BAUD+2, RES+4
^("TYPE"	RES+1
^(0	BAUD, RES+1, RES+2, RES+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	DOLRO+1, ORDER+1, ORDER+2, ORDER+3, ORDER+4!, DEVOPN+2~, DEVOPN+4, DEVOPN+5, DEVOPN+6, DEVOK+6~ , DEVOK+9, DEVOK+10, V2CL1, V2CL2, V2CL2+1, LIMIT, OSTYPE+1~, OSTYPE+2, LOGRSRC+3*, LOGRSRC+5
%1	DEVOPN+2~, DEVOPN+4, V2CL1, V2CL1+2!, V2CL2*
>> %2	V2CL1, V2CL1+1, V2CL2*, V2CL2+1
%D	PRIORITY+1~
%I	DEVOPN+2~, DEVOPN+6*
>> %O(	RES+1
%P	PRIORITY+1~*
%X	DOLRO+1, ORDER+2, ORDER+3, DEVOPN+2~, DEVOPN+6, V2CL1*, V2CL1+2!
%Y	DOLRO+1, ORDER+2, ORDER+3, V2CL1, V2CL1+1, V2CL1+2!
>> %Z1	V2CL2
>> %ZCR	V2CL1
>> %ZDA	LIMIT
>> %ZH0	ZHDIF+1, ZHDIF+2
>> %ZH1	ZHDIF+1, ZHDIF+2
>> %ZIS	DVOPN+4
>> %ZISCHK	DVOPN+4
%ZISD0	RES, RES+1, RES+2, RES+4, RES+5!
%ZISD1	RES+4*, RES+5!
>> %ZISLOCK	DVOPN+1, DVOPN+2, DVOPN+3, DVERR, DVERR+1
>> %ZISTO	DVOPN+2
>> %ZTIO	DVOPN
C	LOGRSRC+2~, LOGRSRC+3*, LOGRSRC+5
>> D0	BAUD
DT	SET+1*
DUZ	PRGMODE+1, PRGMODE+4
H	LOGRSRC+2~, LOGRSRC+3*, LOGRSRC+4, LOGRSRC+5
I	UCICHECK+1~, UCICHECK+3, UCICHECK+4, LOGRSRC+2~, LOGRSRC+4
IO(1	DVOPN+5*, V2CL1+2!
J	LOGRSRC+2~, LOGRSRC+4*
OPT	LOGRSRC~, LOGRSRC+5
U	PRGMODE+1, ZHDIF+1, ZHDIF+2, LOGRSRC+2~, LOGRSRC+3, LOGRSRC+4, LOGRSRC+5
X	JOBPAR+1, PRGMODE+3, PRGMODE+4!, UCICHECK~, UCICHECK+2, UCICHECK+3, BAUD, BAUD+1, BAUD+2, BAUD+3 , DOLRO+1, ORDER+2, ORDER+3, ORDER+4!, PRIORITY+1, PARSIZ+1, DEVOPN+6, DEVOK+3, DEVOK+4, DEVOK+5 , DEVOK+9, DEVOK+10, DVOPN+2, DVOPN+4, DVOPN+5, RES, RES+1, RES+3, SET+1, VERSION~ , VERSION+1, SETNM~, SETTRM~, SETTRM+1
>> X1	DEVOK+3, RES+2*, RES+3
XMB	PRGMODE+4*!
XMB(1	PRGMODE+4*
XMB(2	PRGMODE+4*
>> XQZ	PRGMODE+6*
XRT0	T0+1, T0+2, T1+1!, T1+2!
>> XRTL	T1+1, T1+2
>> XRTN	T1+2
>> XS	V2CL2, V2CL2+1, LIMIT
>> XUCI	PRGMODE+6*
>> XUSLNT	PRGMODE+6*
>> XUVOL	PRGMODE+1*
Y	JOBPAR+1, JOBPAR+2, PRGMODE+6, UCI+1, UCICHECK+1~, UCICHECK+2, BAUD, BAUD+1, DOLRO+1, ORDER+1 , ORDER+2, ORDER+3, ORDER+4!, NOLOG+1, DEVOPN+3, DEVOPN+6, DEVOK+3, DEVOK+4, DEVOK+5, DEVOK+9 , DEVOK+10, DEVOK+11, DEVOK+12, DVOPN, DVOPN+2, DVOPN+4, DVERR, DVERR+1, RES, RES+1* , RES+3, RES+4, SET+1, GETENV+1*
Y1	ORDER+1*, ORDER+3, ORDER+4!
ZOSFV	V2CL1+2!
ZOSVER	PRGMODE+5*, PRGMODE+6, PRGMODEX!
ZTPAC	PRGMODE+1*, PRGMODE+3, PRGMODE+4!

Marked Items

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

Customize PDF page

Package: Kernel

Routine: ZOSVPC43

Call Graph Total: 7