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

Package: Kernel

Routine: ZIS4ONT Platform: Cache


Information

%ZIS4 ;SFISC/RWF,AC - DEVICE HANDLER SPOOL SPECIFIC CODE (Cache) ;06/16/14 13:23

Source Information

Source file <ZIS4ONT.m>

Entry Points

Name Comments DBIA/ICR reference
OPEN ;Called for TRM devices
OPN2 ;
NOPEN ;
OP1
OPNERR
O ;Gets called for all devices
OPAR
O1
ZIO
SPOOL ;%ZDA=pointer to ^XMB(3.51, %ZFN=spool file Num/Name.
R
DOC
OK
NO
SPL2 ;Open for output
SPL3 ;Open to read
SPL4
CLOSE ;Handle Close and copy to Global
ADD(L)
LIMIT
CLVMS ;Close for Cache VMS & Linux
SPLEX
HFS
REWMT(IO2,IOPAR) ;Rewind Magtape
REWSDP(IO2,IOPAR) ;Rewind SDP
REWHFS(IO2,IOPAR) ;Rewind Host File.
REW1 ;ZIS set % to the current $I so need to update % if = IO
REWERR ;Error encountered

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(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: $C(7)_" [BUSY]"
  • Line Location: NOPEN+2
Function Call: WRITE
  • Prompt: " ... RETRY"
  • Line Location: NOPEN+2
Function Call: READ
  • Variable: %X#255
  • Timeout: 5
  • Line Location: CLVMS+8
Function Call: WRITE
  • Prompt: *5
  • Line Location: REWMT+2
Info |  Source |  Entry Points |  Interaction Calls