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: ZISETVXD

Package: Kernel

Routine: ZISETVXD


Information

ZISETVXD ;SF/AC,ALB/PKE - INITIALIZE DEVICE FILE ;4/9/92 14:18

Source Information

Source file <ZISETVXD.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
QUES
END
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: ZISETVXD+2
Function Call: READ
  • Prompt: "OK? "
  • Variable: X
  • Timeout: $S($D(DTIME):DTIME,1:9999),!!
  • Line Location: EN+1
Function Call: READ
  • Variable: %ZISV1
  • Timeout: $S($D(DTIME):DTIME,1:300)
  • Line Location: QUES+0
Function Call: WRITE
  • Prompt: "$ SHO DEV",!
  • Line Location: QUES+2
Function Call: WRITE
  • Prompt: !,I
  • Line Location: END+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: !,"because the Device Name and the $I cannot"
  • Line Location: HLP+2
Function Call: WRITE
  • Prompt: !,"be the same. This is being for the Single"
  • Line Location: HLP+3
Function Call: WRITE
  • Prompt: !,"Device File.",!
  • Line Location: HLP+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS( EN+2, END+1
^%ZIS("C" C!*
^%ZIS(1 - [#3.5] EN+3*, CHK, ADD*, ADD1*, SETCNTR*, FLST, FLST+1
^%ZOSF("MGR" EN+4
^%ZOSF("VOL" EN+4

Label References

Name Line Occurrences
ADD ADD
ADD1 ADD1
CHK END
EXIT EN+1, QUES
FLST EN+4
HLP QUES
QUES QUES
SETCNTR ADD

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%SPAWN QUES+4*, EXIT!
%ZISV EN+4*, QUES, EXIT!, CHK, ADD, SETCNTR
%ZISV1 QUES*, EXIT!, ADD
A EXIT!, FLST*, FLST+1*, FLST+2
DTIME EN+1, QUES, QUES+7
I END*, EXIT!, CHK, ADD, ADD1, SETCNTR, FLST+1*
IO QUES+1*, QUES+2, QUES+6*, QUES+7, END
L EXIT!
LST EXIT!, ADD*, ADD1*, SETCNTR, FLST+2*
M EN+4*, EXIT!
NM EXIT!, CHK*, ADD, ADD1
T EN+4*, EXIT!, ADD*, ADD1*, SETCNTR
X EN+1*, END*, EXIT!, FLST*, FLST+1
X( QUES+7*, END
Z QUES+7*, END*, EXIT!
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All