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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: %ZIS6

Package: Kernel

Routine: %ZIS6


Information

%ZIS6 ;SFISC/AC - DEVICE HANDLER -- RESOURCES ;10/14/2011

Source Information

Source file <ZIS6.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 6 (SBR,YN)^%ZIS1  (DEVOK,MARGN,Q,SETPAR)^%ZIS3  (O,SPOOL)^%ZIS4  HFS^%ZISF  OPEN^ZISPQ  %Y^ZISX  

Caller Graph

Caller Graph Total: 15

Package Total Caller Graph
Kernel 15 ZIS4  ZIS4DTM  ZIS4GTM  ZIS4MSM  ZIS4MSQ  ZIS4ONT  ZIS4VXD  ZISFGTM  
ZISFMSM  ZISFONT  ZISFVXD  ZOSVGTM  ZOSVGUX  ZOSVONT  ZOSVVXD  

Entry Points

Name Comments DBIA/ICR reference
BAR ;Bar Code
RES ;Resources
HFS ;Host File Server type
CHAN ;Network Channel type devices -- DecNet or TCP/IP devices.
HG ;Was Hunt Group
PQ ;Print Queue type
MSG1
QLTY
RES2
RES1 ;Allocate a resource slot, Release in %ZISC.
IMPC ;Imaging Work Station
2 ;Do Execute code
SPL ;Spool type
RESX
RADD(X) ;Add Resource
OXECUTE ;Open Execute
R1 ;Grab a slot
Q
SAY(%SAY) ;
ANSBAK ;Answer Back
OTH ;Other Device type
QUIT
SDP ;Sequential disk processor type
AMTREW ;Mag Tape Rewind
OH ;Open Home
MT
ASKPAR ;Ask Parameters
RESOK ;DEVOK check for RES devices, for all OS's.

External References

Name Field # of Occurrence
SBR^%ZIS1 ASKPAR+1
YN^%ZIS1 AMTREW+1
DEVOK^%ZIS3 RES+2
MARGN^%ZIS3 SPL+1, MT, SDP+1, HFS+1, PQ+1, CHAN+2, OTH+1
Q^%ZIS3 Q, PQ+2
SETPAR^%ZIS3 ASKPAR+1, ASKPAR+3
O^%ZIS4 MT, SDP+1, HFS+1, CHAN+2, OTH+1
SPOOL^%ZIS4 SPL+1
HFS^%ZISF HFS+1
OPEN^ZISPQ PQ+1
%Y^ZISX 2+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @%Y
  • Line Location: ANSBAK+4
Function Call: WRITE
  • Prompt: @%Y
  • Line Location: ANSBAK+7
Function Call: WRITE
  • Prompt: @%Y
  • Line Location: QLTY+1
Function Call: WRITE
  • Prompt: %SAY
  • Line Location: SAY+1
Function Call: WRITE
  • Prompt: " ADDRESS/PARAMETERS: "
  • Line Location: ASKPAR+1
Function Call: WRITE
  • Prompt: %ZISOPAR_"// "
  • Condition for execution: %ZISOPAR]""
  • Line Location: ASKPAR+1
Function Call: WRITE
  • Prompt: " REWIND"
  • Line Location: AMTREW+1
Function Call: WRITE
  • Prompt: !?5,"Enter the desired parameters needed to open the selected device.",!?25
  • Line Location: MSG1+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS(1 - [#3.5] 2+1, RESOK+3, ASKPAR+1
^%ZIS(2 - [#3.2] OXECUTE+1, ANSBAK+1, ANSBAK+4, ANSBAK+6, QLTY+1
^%ZISL(3.54 - [#3.54] RES1+2, RES1+4, RES2, RES2+2*, R1+1, R1+2, R1+4*, R1+5*, RESX, RADD+2
, RADD+3, RADD+4*, RESOK+2, RESOK+4, RESOK+6
^%ZOSF("MAGTAPE" ANSBAK+2

Label References

Name Line Occurrences
$$RADD RES1+3
2 OXECUTE+1, ANSBAK+1
AMTREW MT, AMTREW+1
ASKPAR MT, SDP+1, CHAN+2, OTH+1, ASKPAR+1
MSG1 ASKPAR+1
OH 2+1
Q SPL+2, MT+1, SDP+2, HFS+2, RES+1, RES+2, RES+3, CHAN+3, OTH+2
QLTY ANSBAK+5
QUIT ANSBAK+1, ANSBAK+3
RES1 RES+3
RES2 R1+3
RESX RES1+4, RES2+1
SAY ANSBAK+1

Naked Globals

Name Field # of Occurrence
^( ANSBAK+6, RESOK+6
^("TYPE" 2+1, RESOK+3
^(0 RESOK+3, RESOK+6
^(102 ANSBAK+1
^(12.2 QLTY+1
^(2 OXECUTE+1
^(7 ANSBAK+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % AMTREW+1*, AMTREW+2
%1 RADD+1~, RADD+2*, RADD+4
%2 RADD+1~, RADD+2*, RADD+3*, RADD+4, RADD+5
%E SPL+1~, ASKPAR+1
>> %H 2+1
%MT ANSBAK+2!
%MT("REW" ANSBAK+2
%SAY SAY~, SAY+1
>> %X ANSBAK+5*, ANSBAK+6, QLTY*, QLTY+1, 2+2*, ASKPAR+1
>> %Y OXECUTE+1*, ANSBAK+1*, ANSBAK+4*, ANSBAK+5*, ANSBAK+6*, ANSBAK+7, QLTY*, QLTY+1*, 2+1
%Z SPL+1~
>> %ZIS QUIT, 2+1, SAY+1, SPL+1, MT, SDP+1, HFS+1, RES+1, RES+2, CHAN+2
, OTH+1
>> %ZISB ANSBAK+1, MT, SDP+1, HFS+1, RES+3, CHAN+2, OTH+1, ASKPAR+2, AMTREW+1
%ZISD0 RES1+1~, RES1+2*, RES1+3*, RES1+4, RES2, RES2+2, R1+1, R1+2, R1+4, R1+5
, RESX, RESOK+1~, RESOK+2*, RESOK+3*, RESOK+4, RESOK+6
%ZISD1 RESOK+1~, RESOK+6*
%ZISDTIM AMTREW+1*!
>> %ZISIOST(0 OXECUTE+1, ANSBAK+1, ANSBAK+4, ANSBAK+6, QLTY+1
>> %ZISMTR ANSBAK+2, AMTREW+2*
>> %ZISOPAR ASKPAR+1*
>> %ZISRL R1+2, RADD+4
>> %ZISV R1+4
>> %ZTYPE ASKPAR+2, AMTREW+1
A RES1+1~, R1+1*, R1+5*
>> DTOUT ASKPAR+1
>> DUOUT ASKPAR+1
IO ANSBAK+1, ANSBAK+2, 2+2, SAY+1, RES1+2, RES1+3, R1+1, R1+3, RES+2, CHAN+1
, ASKPAR+2
IO("P" ANSBAK+3, ANSBAK+4, ANSBAK+5, QLTY
IO(0 ANSBAK+2, QUIT, OH+1, OH+3, SAY+1, CHAN+1*
IO(1 ANSBAK+1!, OH+1, OH+3*, R1+1*, R1+3!, RES+2, ASKPAR+2!
>> IOP ANSBAK+1, RES1+4, RES2+1, SPL+1, MT, SDP+1, HFS+1, RES+1, CHAN+2, OTH+1
, ASKPAR+1, AMTREW+1
L RES1+1~, R1+2*, R1+4, R1+5
>> POP ANSBAK+1*, 2+1, RES1+4*, RES2+1*, MT, SDP+1, HFS+1, RES+1*, RES+2*, CHAN+2
, OTH+1, ASKPAR+1*, ASKPAR+2, ASKPAR+3, AMTREW+1*
U R1+5, RADD+2, RADD+4, AMTREW+1*
X RES1+1~, RES2*, RES2+1, RES2+2*, RADD~, RADD+4, RESOK+2, RESOK+3, RESOK+5, RES+1~
, RES+2*
X1 RESOK+4*, RESOK+5, RES+1~, RES+2*
>> Y RESOK+2*, RESOK+3*, RESOK+5*, RESOK+6*, RES+2
>> ZTSK R1+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All