IBM OS/390 User Manual

Page of 673
 VSE DTFDA
MVS DCB DSORG=DA
 BLKSIZE = nnnn
BLKSIZE = nnnn
 DEVICE = nnnn
UNIT = (in DD statement)
 ERRBYTE = xxxxxxxx
(See description of SYNAD routine)
 IOAREA1 = xxxxxxxx
Area address (READ/WRITE macro)
 SEEKADR = xxxxxxxx
Not required (READ/WRITE macro)
 TYPEFLE = xxxxxx
OPEN macro option
 AFTER = YES
MACRF = (..WA..)
 DEVADDR = SYSnnn
UNIT = (in DD statement)
 ERREXT = YES
SYNAD = xxxxxxxx
 HOLD = YES
This function can be implemented by using
the ENQ/DEQ logic of MVS for a specific
resource or by requesting exclusive con-
trol of a data block thru MACRF = (..X..)
 IDLOC = xxxxxxxx
(See description of updating the file)
 KEYARG = xxxxxx
Keyaddress (READ/WRITE macro)
 KEYLEN = nnn
KEYLEN = nnn
 LABADDR = xxxxxxxx
EXLST = xxxxxxxx
 READID = YES
MACRF = (..RI..)
 READKEY = YES
MACRF = (..RK..)
 WRITEID= YES
MACRF = (..WI..)
 WRITEKY = YES
MACRF = (..WK..)
 RECFORM= xxxxxx
RECFM = xxx
 RECSIZE = (nn)
Length (READ/WRITE macro)
or DCB LRECL = nnnnn
 RELTYPE = xxx
OPTCD = (...,R...).No equivalent for DEC
 SEPASMB = YES
User must code the DCB
 SRCHM = YES
LIMCT= n,OPTCD = E
 TRLBL = YES
EXLST = xxxxxxxx
 VERIFY = YES
OPTCD = W
 XTNTXIT = xxxxxxxx
EXLST= xxxxxxxx
Figure 40. Comparison of DTFDA and DCB Macros
Error Bytes
The error bytes used in VSE to test for successful completion of an I/O operation
are equivalent to a two-byte exception code in MVS. The two-byte exception
code is placed in the DECB (DECB+1) of the corresponding READ/WRITE macro
after a WAIT or CHECK macro has been issued.
If you issue a WAIT macro (WAITF in VSE), test for successful I/O completion
provide the appropriate actions.
In MVS, if you issue the CHECK macro, the system performs the test. If an
unusual condition occurs, the system branches to your SYSNAD routine if you
have provided one, or it abnormally terminates the job step.
The information provided in the two bytes is different in VSE and MVS. Therefore
change any parts of your programs that refer to these error bytes. Figure 41 on
page 313 gives a comparison of the VSE and MVS exception codes.
312
VSE to OS/390 Migration Workbook