18.08.2013 Views

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

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

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

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

SIR$–Symbolic Input/Output Routine<br />

Return Images in All CCSs<br />

Symbolic images in the 22 "other" CCSs cannot be translated by SIR$ into Fieldata or<br />

ASCII, so these images cannot be passed to the calling program using the GETSR$ or<br />

GETAS$ entry points.<br />

If bit 2 of A4 is set and the GETNM$ entry point is called to read a symbolic image, SIR$<br />

passes images in Fieldata, ASCII, ASCII-like CCSs, and the 22 "other" legal CCSs to the<br />

calling program without translation. SIR$ stores the CCS identifier of the image in S6 of<br />

A0.<br />

If bit 2 of A4 is clear or if the OPNSR$ initialization entry point is called, SIR$ does not<br />

pass images in the 22 “other” CCSs to the calling program, but instead returns an error.<br />

This ensures that only Fieldata, ASCII, and ASCII-like images are passed to a calling<br />

program, unless the program has explicitly set bit 2 in A4 to indicate that it can handle<br />

images in the 22 “other ” CCSs.<br />

23.2.3. GETAS$–Get Symbolic Image in ASCII<br />

The GETAS$ entry point is called to obtain the next input image from the source input or<br />

the runstream and to pass the image to the calling program in ASCII. Input images in<br />

Fieldata are translated to the ASCII_ISO CCS and passed to the calling program. Input<br />

images in ASCII and ASCII-like CCSs are passed without change to the calling program.<br />

An exception is that when the P option is either specified or assumed, requesting<br />

Fieldata source output, lowercase alphabetics are changed to uppercase alphabetics<br />

when the image is passed to the calling program. Input images in the 22 “other” CCSs<br />

are not passed to the calling program, but instead result in an error return.<br />

Calling Sequence<br />

L A0,(buffer-length,buffer-addr)<br />

LMJ X11,GETAS$<br />

error return<br />

end-of-file return<br />

normal return<br />

where:<br />

buffer-length<br />

The length in words of the buffer into which the symbolic input images are read.<br />

buffer-addr<br />

The address of the buffer into which symbolic input images are read.<br />

7833 1733–004 23–13

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!