(SYSLIB) Programming Reference Manual - Public Support Login ...

SIR$–Symbolic Input/Output Routine
A4
A5
The current line number of the symbolic input file or element. Register A4 is zero for
new images read from the runstream. The line number for each image is the same
for all passes.
An actual or generated CTS line number.
23.2.5. GETNM$–Get Symbolic Image Without Translation
GETNM$ obtains a symbolic input image and returns it to the calling program with no
translation. If symbolic output is specified, SIR$ writes the image to the output file or
element.
Calling Sequence
L A0,(buffer-length,buffer-addr)
LMJ X11,GETNM$
error return
end-of-file return
normal return
where:
buffer-length
The length in words of the buffer into which the symbolic input images are read.
buffer-addr
The address of the buffer into which the symbolic input images are read.
Returns
The GETNM$ entry point is called to obtain the next input image from the source input
or the runstream and to pass the image to the calling program without translation. Input
images in Fieldata, ASCII, and the 39 ASCII-like CCSs are passed without change to the
calling program. An exception is that when the image to be returned is ASCII or
ASCII-like and when the P option is either specified or assumed, requesting Fieldata
source output, lowercase alphabetics are changed to uppercase alphabetics when the
image is passed to the calling program. If SIR$ was initialized with INISR$ and A4 bit 2
was set, input images in the 22 “other” CCSs are passed to the calling program. If SIR$
was initialized with OPNSR$ or if SIR$ was initialized with INISR$ but A4 bit 2 was clear,
input images in the 22 “other” CCSs are not passed to the calling program, but instead
result in an error return.
23–18 7833 1733–004