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.

PREPRM, PREPRO, PREPF$, and POSTPR$<br />

PREPRM dynamically attaches internal filenames to the filenames specified in the first<br />

two fields as follows: SI$$ is attached to field-1 and SO$$ is attached to field-2.<br />

field-1 (SI) is expected to contain the symbolic input to the processor. PREPRM checks<br />

that the element specified is typed as symbolic (element type 01).<br />

field-2 (SO) is typically used for the updated symbolic output element if corrections have<br />

been applied to the input symbolic element in field-1 (SI). This would apply if the routine<br />

SIR$ will be used. However, field-2 (SO) may be used for other types of output<br />

elements.<br />

The mnemonics SI, RO, and SO appear in error messages output by PREPRO and<br />

PREPRM. They refer to the first three fields on the processor call statement as follows:<br />

SI field-1<br />

RO field-2<br />

SO field-2 if PREPRM is used; field-3 if PREPRO is used<br />

14.1.1. PREPRO–Preprocessor Routine<br />

PREPRO reads the processor call statement in internal format (INFOR) (see Section 12),<br />

standardizes its form in PARTBL (see Figure 14-1), and dynamically assigns the<br />

necessary files. PREPRO obtains the “next write location” for program files and, for<br />

tape files, verifies that the source input element exists.<br />

Initial Conditions<br />

The processor must call PREPRO before it executes any read command such as<br />

ER SYMB$ (READ$ function), ER AREAD$, or ER READ$.<br />

The parameter table PARTBL must be externally defined and at least 40 words long. It<br />

also should be zero-filled.<br />

Calling Sequence<br />

LMJ X11,PREPRO$<br />

error return<br />

normal return<br />

Error Return<br />

The error return is taken under the following conditions:<br />

I/O error occurs (A0 = 0)<br />

error when reading INFOR (A0 ≠ 0)<br />

tape positioned improperly (A0 ≠ 0)<br />

file does not exist (A0 ≠ 0)<br />

file is not a program file (A0 ≠ 0)<br />

14–2 7833 1733–004

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

Saved successfully!

Ooh no, something went wrong!