Reading

CALL EPREAD (LUNIT,MODE,NW*,*IREC*,IBUF*,IERR*)

Input parameters:

LUNIT

logical unit number

MODE

=j, j=1,2,3 : get next logical record data
j=1 : data transferred in packed form
j=2 : data unpacked as 16-bit bytes/word
j=3 : data unpacked as 32-bit bytes/word
\ =10+j, j=1,2,3 as above: get data of current logical record (only possible after a previous call with j=20).
\ =20 : get header of next logical record. The header will always be unpacked in units (16 or 32-bit words).
\ =30 : get next physical header.
The header will always be unpacked in units.

Input/Output buffer:

IBUF

user provided unit buffer. Must not be touched by user. Minimum size = (16*status word 1 - 1)/(bits/word) + 1

Output parameters:

NW

no. of words transferred into IREC.
For j=1 no. of units, for j=2 or j=3 no. of 16 or 32-bit words, i.e., number of machine words occupied in IREC

IREC

user provided area to store the header or data requested

IERR

error flag. See separate list.

• Remarks:
• Conditions for use:
• Conditions for use: