Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ZOSVPC43

Package: Kernel

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
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All