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

Package: Kernel

Routine: ZISETUPD


Information

ZISETUPD ;SF/GFT,AC - INITIALIZE DEVICE FILE FOR DSM;4/20/88 8:26 PM ;4/9/92 14:19

Source Information

Source file <ZISETUPD.m>

Entry Points

Name Comments DBIA/ICR reference
QUES
C
EXIT
CHK
ADD
ADD1
SETCNTR
FLST
HLP ;HELP FOR PREFIX QUESTION

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"THIS ROUTINE INITIALIZES THE DEVICE FILE WITH CURRENT PORT NUMBERS",!
  • Line Location: ZISETUPD+2
Function Call: READ
  • Prompt: "OK? "
  • Variable: X
  • Timeout: 9999,!!
  • Line Location: ZISETUPD+3
Function Call: READ
  • Variable: %ZISV1
  • Timeout: $S($D(DTIME):DTIME,1:300)
  • Line Location: QUES+0
Function Call: WRITE
  • Prompt: !!,"ALL SETUP"
  • Line Location: C+1
Function Call: WRITE
  • Prompt: !,"There must be a prefix for a new device"
  • Line Location: HLP+1
Function Call: WRITE
  • Prompt: !,"becuase the Device Name and the $I cannot"
  • Line Location: HLP+2
Function Call: WRITE
  • Prompt: !,"be the same."
  • Line Location: HLP+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS( ZISETUPD+4, C+1
^%ZIS("C" C!*
^%ZIS(1 - [#3.5] ZISETUPD+5*, CHK, ADD*, ADD1*, SETCNTR*, FLSTFLST+1
^%ZOSF("MGR" ZISETUPD+6
^%ZOSF("VOL" ZISETUPD+6
^SYS( QUES+1
^SYS(0 QUES+1

Label References

Name Line Occurrences
ADD ADD
ADD1 ADD1
CHK QUES+1, QUES+2
EXIT ZISETUPD+3, QUES
FLST ZISETUPD+6
HLP QUES
QUES QUES
SETCNTR ADD

Naked Globals

Name Field # of Occurrence
^("TYPE" ADD*, ADD1*
^("VOL" ZISETUPD+6
^(0 ZISETUPD+6, ADD1*, SETCNTR*, FLST

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZISV ZISETUPD+6*, QUES, EXIT!, CHKADDSETCNTR
%ZISV1 QUES*, EXIT!, ADD
A EXIT!, FLST*, FLST+1*, FLST+2
DTIME QUES
I QUES+1*, QUES+2*, EXIT!, CHKADDADD1SETCNTRFLST+1*
LST EXIT!, ADD*, ADD1*, SETCNTRFLST+2*
M ZISETUPD+6*, QUES+1, EXIT!
NM EXIT!, CHK*, ADDADD1
T ZISETUPD+6*, EXIT!, ADD*, ADD1*, SETCNTR
X ZISETUPD+3*, EXIT!, FLST*, FLST+1
Z EXIT!
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All