IBM OS/390 User Manual

DEVADDR = SYSxxx

DDname (in DD statement)

IOAREA1 = xxxxxxxx

BUFNO = 1,MACRF =(..M..)

or

IOAREA1 = xxxxxxxx

BUFNO = 2 or more

1OAREA2 = xxxxxxxx
ASOCFLE = xxxxxxxx

UNIT=AFF=ddname (in DD statement)

BIKSIZE = nnn

BLKSIZE = nnn

CONTROL = YES

MACRF = (PC)

CTLCHR = YES

RECFM = (..A)

ASA

(...M)

DEVICE = nnnn

UNIT = (in DD statement ) (1)

ERROPT = xxxxxxxx

SYNAD = xxxxxxxx

FUNC = xxxx

DEVD=(..,..,..,FUNC = xxxxxx)

IOREG =(r)

MACRF= (..L..)

PRINTOV = YES

Use PRTOV

RECFORM = xxxxxx

RECFM = xxx

RECSIZE = (r)

LRECL = nn (2)

SEPASMB = YES

User must code the DCB

WORKA = YES

MACRF = (..M..)

 1. By specifying U N I T = you are using dedicated I/O. A preferable

alternative is to use SYSOUT=A.

 2. For output of undefined records, you must provide the length

of the records in a two-byte field (DCBLRECL) within the DCB.
LRECL must be provided for fixed-length and variable-length
records.

Figure 34. Comparison of the DTFPR and DCB Macros

In VSE and MVS, you process sequential tape files in the same way.

QSAM

INPUT

,REREAD

OUTPUT

,LEAVE

RDBACK

,DISP

INPUT

,REREAD

OUTPUT

,LEAVE

BSAM RDBACK ,DISP

INOUT
OUTIN

VSE

OPEN(R)

filename ,...

(rl)

MVS

OPEN

dcbaddress , (options) ....

(2-12) 

Chapter 13. A s s e m b l e r