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

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

INFOR$–Internal Format Table Interface Routines<br />

The element E3 is assumed to be in the same file as element E2. If the SELT$ routine is<br />

called to transfer the third field into the ELT$ table, then CFN is set to 2. Because there<br />

is no file name and no leading period in the second field, it is assumed that E2 is in file<br />

TPF$. Since TPF$ is an assumed file and not explicitly included on the processor call<br />

line, the field FNL is set to zero. In the following example:<br />

@PROCESSOR F.E1,.E2,.E3<br />

field two contains a leading period. The element E3 is still assumed to be in the same<br />

file as E2. By the same convention, element E2 is assumed to be in the same file as<br />

element E1. In this case, when SELT$ is called to transfer the third field of the<br />

processor call line, CFN is set to 1, FNL is set to 1, and the field FNAME in ELT$ is set to<br />

the Fieldata character string F.<br />

A leading asterisk sets the implied qualifier flag (IQF) to nonzero and the file qualifier<br />

length (FQL) to zero.<br />

SELT$ handles element cycles from the processor call line as follows:<br />

• If the element cycle field is not specified, the element cycle signal character (ECC)<br />

equals a Fieldata minus sign (-), and the Binary Element Cycle (BEC) equals zero.<br />

• When the element cycle field is specified, the numeric portion of the cycle is<br />

converted to binary and the result is placed in BEC.<br />

• If the cycle is neither numeric nor signed numeric or is greater than 63, the field ECC<br />

contains the Fieldata image E, which indicates an error. Normally, ECC contains 0,<br />

Fieldata +, or Fieldata - when the first character of the cycle is numeric, +, or -,<br />

respectively.<br />

No-find Return<br />

When a no-find return occurs, register A0 contains the address of the control word in the<br />

INFOR table that stopped the search. If this word is zero, the rest of the INFOR table is<br />

empty.<br />

12.3.4. DUSE$–Assign a USE Name to the File in ELT$<br />

The DUSE$ routine dynamically attaches an internal name to the file currently in the<br />

ELT$ table.<br />

The DUSE$ routine is called by the MASM procedure I$NFOR. This procedure can be<br />

used to generate the calling sequence for the relocatable version of the DUSE$ routine,<br />

the common bank version of the routine, or the common bank version of the routine<br />

using the Auto Switch calling sequence. Section 3 describes the advantages and<br />

disadvantages of using the different types of calls.<br />

Calling Format<br />

I$NFOR[,t] ‘DUSE$’[,use-name] [packet]<br />

return<br />

7833 1733–004 12–11

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

Saved successfully!

Ooh no, something went wrong!