IBM OS/390 User Manual

Page of 673
VSE DTFCD
MVS DCB DSORG=PS
 DEVADDR = SYSxxx
DDname (in DD statement)
 IOAREA1 = xxxxxxxx
BUFNO = 1
or
 IOAREA1 = xxxxxxxx
BUFNO = 2 or more
 IOAREA2 = xxxxxxxx
 ASOCFLE = xxxxxxxx
UNIT=AFF=ddname (in DD statement)
 BLKSIZE = nnn
BLKSIZE = nn
 CONTROL = YES
MACRF = (..C..) for input only
 CTLCHR = YES
RECFM = (...M)
ASA
(...A)
 SSELECT = n
DEVD = ..,..,STACK=1
 DEVICE = nnnn
UNIT = nnnn (in DD statement)
 EOFADDR = xxxxxxxx
EODAD = xxxxxxxx
 EAROPI = xxxxxxxx
SYNAD = xxxxxxxx
 FUNC = xxx
DEVD = (..,..,..,FUNC=xxxxxxxx)
 IOREG =(r)
MACRF -(...L..)
 MODE = E O
DEVD = (..,MODE=E O
C R
C R
 RECFORM = xxxxxx
RECFM = xxx
 RECSIZE = (r)
LRECL = nn
 SEPASMB = YES
User must code the DCB
 TYPEFLE = INPUT
MACRF = (G..)
OUTPUT
(P..)
CMBND
 WORKA = YES
MACRF = (...M..)
Figure 31. Comparison of the DTFCD and DCB Macros
OPEN
CARD
VSE
GET
CARD,WORK
.
CLOSE CARD
CARD
DTFCD DEVADDR=SYSIPT,IOAREA1=CARDIN1,
C
IOAREA2=CARDIN2,EOFADDR=END,
C
WORKA=YES
CDMOD WORKA=YES
OPEN
CARD
MVS
GET
CARD,WORK
.
CLOSE CARD
CARD
DCB
DSORG=PS,MACRF=(GM),
C
DDNAME=SYSIPT,EODAD=END,
C
RECFM=FB,LRECL=80
Figure 32. Card File Macros i n VSE and MVS
Chapter 13. A s s e m b l e r
295