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

SIR$–Symbolic Input/Output Routine
23.3. External Labels
SIR$ contains a number of data areas that the calling program may access.
• SIRIB$
The start of the 1,792-word input buffer.
• SIROB$
The start of the 1,792-word output buffer.
• SIRP2$
Set to one in CLOSR$ to identify a second pass call to OPNSR$, INISR$,
GETAS$, and GETNM$.
• SIRSDFIFCT$
The start of the SDFI file control table.
• SIRSDFOFCT$
The start of the SDFO file control table.
The calling program may not use the SIRIB$ or SIROB$ buffers between calls to
OPNSR$ or INISR$ and CLOSR$.
23.4. SIR$–Multipass Capability
SIR$ allows many passes to be made over the input element if a scratch file or output
element is available in PARTBL+14,15. (For exceptions, see INISR$, 23.2.2.) For
reusable processors, SIR$ must be told when to initialize itself to process the element
designated on the next processor call statement that INFOR CLIST reads. The calling
program must store zero into the externally defined cell SIRP2$ in SIR$. No other action
is required.
23.5. Compressed Symbolic Elements
To minimize the number of cards required to contain a symbolic element, the FURPUR
processor can compress strings of blanks in symbolic images before punching the
element. SIR$ expands the compressed images on input.
A compressed symbolic image card deck is produced when the appropriate options are
used on the FURPUR @PCH control statement. (See the ECL and FURPUR Reference
Manual.) SIR$ converts compressed card image decks to SDF images upon initial input
when the I and G or J options are specified on the processor call statement (see G.1).
The first card punched is an @ELT or @PDP control statement with the appropriate
options. Following the control statement are the cards that contain compressed
symbolic images.
The compressed image consists of a stream of characters in the following format:
23–20 7833 1733–004