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: %ZIS2

Package: Kernel

Routine: %ZIS2


Information

%ZIS2 ;SFISC/AC,RWF -- DEVICE HANDLER (CHECKS) ;11/08/2011

Source Information

Source file <ZIS2.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 4 (,ST)^%ZIS3  $$LNPRTSUB^%ZISUTL  GETENV^%ZOSV  $$QEXIST^ZISPQ  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Kernel 1 %ZIS1  

Entry Points

Name Comments DBIA/ICR reference
TMPVAR
PQ ;Check (if not queueing to secondary system) that print queue is established and available
SLAVE
PTIME
QUECHK() ;Return 1 if OK
T2
DUZ
L2 ;Entry point from %ZIS1, %E holds the IEN value
T ;
OOS
SEC ;Do Security check
VTRM
IOPAR(%DA,%N) ;Return I/O parameter
CHECK ;Get IO check for secondary $I
OTHCPU(%1) ;%1 should be either DEVICE or HUNT GROUP
OCPU

External References

Name Field # of Occurrence
^%ZIS3 T2+4
ST^%ZIS3 TMPVAR+18
$$LNPRTSUB^%ZISUTL TMPVAR+15
GETENV^%ZOSV OTHCPU+4
$$QEXIST^ZISPQ PQ+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7," [Out of Service]"
  • Line Location: OOS+2
Function Call: WRITE
  • Prompt: *7," [Access Prohibited]"
  • Line Location: SEC+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS(1 - [#3.5] CHECK+2, TMPVAR+5, TMPVAR+7, TMPVAR+10, IOPAR+1
^%ZIS(2 - [#3.2] TMPVAR+16
^XTV(8989.3 - [#8989.3] PQ+1
^XUTL("XQ" TMPVAR+7, TMPVAR+12, TMPVAR+13, TMPVAR+14

Label References

Name Line Occurrences
$$IOPAR TMPVAR+1, TMPVAR+2
$$QUECHK CHECK+5
OTHCPU OCPU
SEC DUZ
T CHECK+6, SLAVE, PQ+1, OOS, PTIME

Naked Globals

Name Field # of Occurrence
^("IOST(0)" TMPVAR+7
^("TIME" CHECK+4
^("TYPE" CHECK+4
^("XY" TMPVAR+16
^(90 CHECK+4
^(95 CHECK+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % TMPVAR+15*
%1 OTHCPU~, OTHCPU+5, OTHCPU+11, OTHCPU+12, OTHCPU+14
%2 OTHCPU+1~, OTHCPU+2*, OTHCPU+3, OTHCPU+9, OTHCPU+14
>> %A VTRM, VTRM+1, PTIME+2*, PTIME+4, TMPVAR+10*, TMPVAR+13*, TMPVAR+15*, TMPVAR+16, SEC+1*
%C PTIME+3~, PTIME+4*, PTIME+5
%DA IOPAR~, IOPAR+1
>> %E CHECK+2, PQ+1, TMPVAR, TMPVAR+1, TMPVAR+2, TMPVAR+10, TMPVAR+11, OTHCPU+6
%H VTRM, VTRM+1, PTIME+3~, PTIME+4*, PTIME+5, TMPVAR, TMPVAR+6*, TMPVAR+7, TMPVAR+11
%L PTIME+3~, PTIME+4*, PTIME+5
%N IOPAR~, IOPAR+1
>> %X SEC+1*
>> %Z CHECK+2*, CHECK+3, SLAVE, TMPVAR+5, TMPVAR+6, QUECHK+1, OTHCPU+3, OTHCPU+4, OTHCPU+6
>> %Z1 CHECK+6
%Z2 CHECK+1~, CHECK+2*, CHECK+3
>> %Z90 CHECK+4*, OOS+2
>> %Z91 TMPVAR+13*, TMPVAR+14*, TMPVAR+15*, TMPVAR+16*, TMPVAR+18
>> %Z95 CHECK+4*, SEC+1
%ZFQ CHECK+1~, QUECHK+1*, QUECHK+3, QUECHK+4, QUECHK+9
>> %ZIS PQ+1, TMPVAR+5, TMPVAR+6, TMPVAR+18, T2, QUECHK+3, QUECHK+4, QUECHK+9*, OTHCPU+12, OTHCPU+13
>> %ZIS( IOPAR+1
>> %ZIS("PRI" CHECK+2, CHECK+3
>> %ZISB PQ+1, PTIME+2, QUECHK+3*, OTHCPU+7, OTHCPU+12*, OTHCPU+13
%ZISCPU CHECK+1!, OTHCPU+9*, OTHCPU+10*
>> %ZISHG OTHCPU+6*
>> %ZISHG(0 OTHCPU+6*, OTHCPU+11!, OTHCPU+13
%ZISHP L2+1!, VTRM, OOS+2, PTIME+2, SEC+2
%ZISHPOP L2+1!
>> %ZISI TMPVAR+14*
>> %ZISIOS TMPVAR*
%ZISMSG OTHCPU+1~*, OTHCPU+14*
>> %ZISOPAR TMPVAR+1*
>> %ZISRL CHECK+6*
>> %ZISTO TMPVAR+2*
>> %ZISTP TMPVAR+10*, TMPVAR+13*, TMPVAR+18
>> %ZISUPAR TMPVAR+2*
>> %ZISV OTHCPU+3
>> %ZTIME CHECK+4*, PTIME+2, TMPVAR+2
>> %ZTYPE CHECK+4*, CHECK+6, VTRM, VTRM+1, PQ+1, TMPVAR+11, T2+4, OTHCPU+13
DT OOS+2
>> DTOUT L2+1
>> DUOUT L2+1
DUZ(0 SEC+1
IO CHECK+3*, VTRM+1*, PTIME, TMPVAR*, TMPVAR+5*, TMPVAR+6, TMPVAR+8, T2*, OTHCPU+8*, OTHCPU+12*
IO("Q" VTRM, VTRM+1, SLAVE, QUECHK+3*, QUECHK+9, QUECHK+11!, OTHCPU+12*
IO("S" TMPVAR!*, TMPVAR+4, TMPVAR+6*, TMPVAR+7*
IO(0 TMPVAR+6*
>> IOP VTRM, SLAVE, PQ+3, OOS+2, PTIME+2, QUECHK+5, QUECHK+10, QUECHK+11, OTHCPU+14, SEC+2
>> POP CHECK+2*, VTRM*, SLAVE*, PQ+2*, OOS, OOS+2*, PTIME, PTIME+2, PTIME+5*, DUZ
, TMPVAR+4, TMPVAR+8*, T2, T2+6*, QUECHK+6*, QUECHK+11*, OTHCPU+7*, OTHCPU+13*, OTHCPU+14*, SEC+1*
, SEC+2
>> USIO TMPVAR+18*
X OTHCPU+1~, OTHCPU+3*, OTHCPU+4*, OTHCPU+5, OTHCPU+9, OTHCPU+10, OTHCPU+14
>> XQNOGO QUECHK+3
Y OTHCPU+1~, OTHCPU+3*, OTHCPU+4*, OTHCPU+5
>> ZTQUEUED QUECHK+3, QUECHK+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All