Routine: ZIS4MSM Platform: MSM

Information

%ZIS4 ;SFISC/RWF,AC - DEVICE HANDLER SPOOL SPECIFIC CODE(MSM) ;30-OCT-1997 09:28

Source file <ZIS4MSM.m>

Name	Comments	DBIA/ICR reference
OPEN
OPN2
NOPEN
OP1
OPNERR
O
OPAR
O1
ZIO
SPOOL	;%ZDA=pointer to ^XMB(3.51, %ZFN=spool file name.
R
DOC
OK
N
SPL2
SPL3
SPL4
SPL5
CLOSE
CL2
HFS
REWMT(IO,IOPAR)	;Rewind Magtape
REWSDP(IO,IOPAR)	;Rewind Sequential Block Processor
REWHFS(IO,IOPAR)	;Rewind Host File.
REW1
REWERR	;Error encountered.

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+0
Function Call: WRITE	Prompt: *7," [BUSY] ... RETRY" Line Location: NOPEN+1
Function Call: WRITE	Prompt: !,?5,*7,"[File not Found]" Line Location: OPAR+8
Function Call: WRITE	Prompt: *5 Line Location: REWMT+2