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  | All
Print Page as PDF
Routine: ZIS4GTM

Package: Kernel

Routine: ZIS4GTM Platform: GT.M


Information

%ZIS4 ;ISF/RWF,DW - DEVICE HANDLER SPECIFIC CODE (GT.M for Unix/VMS) ;05/29/2008

Source Information

Source file <ZIS4GTM.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 6 YN^%ZIS1  OXECUTE^%ZIS6  HFS^%ZISF  $$EC^%ZOSV  (CLOSE,FILE,NEWDOC)^ZISPL1  X10^ZISX  

Entry Points

Name Comments DBIA/ICR reference
OPEN ;From %ZIS3 for TRM
OPN2 ;
NOPEN
OP1
OPNERR ;Open Error
O ;From %ZIS6 for all types.
OPAR
O1
ZIO
TCPIP ;For TCP/IP devices, should use ^%ZISTCP
SPOOL ;%ZDA=pointer to ^XMB(3.51, %ZFN=spool file name.
R
DOC
OK
N
SPL2 ;Open for write
SPL3 ;Open for Read
SPL4
CLOSE ;Close out the spool
SPLEX
CL2
HFS
REWMT(IO,IOPAR) ;Rewind Magtape
REWSDP(IO,IOPAR) ;Rewind SDP
REWHFS(IO,IOPAR) ;Rewind Host File.
REW1
REWERR ;Error encountered

External References

Name Field # of Occurrence
YN^%ZIS1 NOPEN+1
OXECUTE^%ZIS6 OPAR+1, OPAR+12
HFS^%ZISF HFS
$$EC^%ZOSV OPNERR+1
CLOSE^ZISPL1 SPLEX
FILE^ZISPL1 CLOSE+3
NEWDOC^ZISPL1 R
X10^ZISX O+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,*7," Routing to device "_$P(^%ZIS(1,%E,0),"^",1)_$S($D(^(1)):" "_$P(^(1),"^",1)_" ",1:"")
  • Line Location: OPN2+1
Function Call: WRITE
  • Prompt: *7," [BUSY]"
  • Line Location: NOPEN+1
Function Call: WRITE
  • Prompt: " ... RETRY"
  • Line Location: NOPEN+1
Function Call: WRITE
  • Prompt: !,?5,*7,"[File Not Found]"
  • Line Location: OPAR+6
Function Call: WRITE
  • Prompt: !,"%A=",%A
  • Line Location: TCPIP+4
Function Call: READ
  • Variable: %X#255
  • Timeout: 5
  • Line Location: CLOSE+6
Function Call: WRITE
  • Prompt: *5
  • Line Location: REWMT+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS(1 - [#3.5] OPN2+1, DOC+1
^%ZIS(2 - [#3.2] O+2
^%ZOSF("TRAP" REWMT+1, REW1
^XMB(3.51 - [#3.51] R+3*, CL2*
^XMBS(3.519 - [#3.519] CL2*, CL2+1*, CL2+2*
^XTV(8989.3 - [#8989.3] CLOSE+5
^XUTL("XQ" DOC*, DOC+1*

Label References

Name Line Occurrences
CL2 CLOSE+6
DOC R+2
N SPOOL+1, SPOOL+2, RR+3
NOPEN OPEN+2
O1 OPAR+5
OK R+1, R+2
OP1 OPEN+2
OPEN NOPEN+1
OPN2 OPEN+1
REW1 REWSDP+1
SPL2 R+3
SPL3 CLOSE+4
SPL4 SPL2+1, SPL3+1
TCPIP OPAR+1
ZIO O+1

Naked Globals

Name Field # of Occurrence
^("SPL" DOC+1
^(1 OPN2+1, DOC+1
^(10 O+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% NOPEN+1*, OPAR+3~*, OPAR+4, ZIO~*, ZIO+1, ZIO+2*, ZIO+3*, ZIO+5*, ZIO+7, CLOSE+1~
CLOSE+5*, CLOSE+6, CL2*, CL2+1, CL2+2
%( OPAR+3*
%1 ZIO~*, ZIO+2*, ZIO+5*, ZIO+6*, ZIO+7, CLOSE+1~, SPLEX!
>> %2 CLOSE+6*, CL2+1, CL2+2
>> %A OPAR+2*, OPAR+4*, O1+2, TCPIP+3*, TCPIP+5
>> %A1 OPAR+10*
>> %E OPN2+1
>> %IS NOPENO+1
>> %IS("HFSIO" OPAR
>> %IS("IOPAR" OPAR
%S TCPIP+1~, TCPIP+6*
%X CLOSE+1~, CLOSE+6*, SPLEX!
%Y CLOSE+1~, CLOSE+4*, SPLEX!
%Z1 CLOSE+1~, CLOSE+5*, CLOSE+6, CL2
>> %ZCR CLOSE+4*
%ZDA R+1*, R+3, DOC, OK!, N!, CLOSE+1~, CLOSE+3, CL2
%ZFN R+1*, R+2, R+3*, DOC, OK!, N!, SPL2+1, SPL3+1, SPL4*, CLOSE+1~
CLOSE+4*, CLOSE+6, SPLEX!
>> %ZISB R+2
>> %ZISHG NOPEN
>> %ZISHP OPN2+1, NOPEN
>> %ZISIOS DOC+1
>> %ZISLOCK OP1+1, O1+1
>> %ZISOPAR OPAR*, OPAR+2, TCPIP+3
>> %ZISTO OPAR+2, TCPIP+2*
>> %ZISUPAR OPAR+10
%ZS CLOSE+1~, CLOSE+4
>> %ZTYPE OPAROPAR+1, OPAR+6, OPAR+9
>> %ZY R*, R+1, R+2
>> %ZY(0 R+1
>> DELETE SPLEX
DUZ SPOOL+2
IO OPEN+1, OPEN+2, OP1+2, OPAR*, OPAR+3, OPAR+9, OPAR+10, O1+2, TCPIP+6, R+3
, DOC*, CLOSE+2, REWMT~, REWMT+2, REWSDP~, REWHFS~, REW1+1
IO("DOC" R+1*, N!
IO("ERROR" OPNERR+1*, OPAR+6, O1+3*
IO("IP" ZIO+7*
IO("LASTERR" OPNERR+1*
IO("Q" R+1
IO("S" O+2
IO("SPOOL" DOC*
IO("ZIO" ZIO+7*
IO(0 O+2
IO(1 OPEN+1, OPEN+2, OP1+2*, O1+2*, SPL2+1*, SPL3+1*, CLOSE+2!, SPLEX!
IOF DOC*
>> IOP OPN2+1, NOPEN+1, OPAROPAR+6, OPAR+7, SPOOL+1, SPOOL+2, SPL4
IOPAR REWMT~, REWSDP~, REWHFS~
>> POP OPEN+2*, NOPEN*, NOPEN+2*, OP1+1*, OP1+2*, OPNERR+1*, OPAR+1, OPAR+5, O1+1*, O1+2*
TCPIP+5*, N*
U NOPEN+1*, R+1, R+3
>> X REWMT+1*, REW1*
XS CLOSE+1~, CL2CL2+1, CL2+2
>> ZISDA SPOOL+1
ZISPLAD DOC+1*, CLOSE+3!
>> ZISPLQ SPL3+1*
>> ZTQUEUED SPL4
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All