Ok seems like the only thing I cannt do running in problem state is have the same ddname which to me is some what irrelevant it’s the dataset name that counts so when I reopen for write the abended dcb it has to be with a different ddname maybe use test unit retddn from SVC 99
> On Jul 5, 2026, at 1:41 PM, Joseph Reichman <[email protected]> wrote: > > I finally got it seems I can recover from put move not put locate as the > system buffer is gone > >>> On Jul 3, 2026, at 9:12 PM, Michael Stein <[email protected]> wrote: >>> >>> On Fri, Jul 03, 2026 at 09:16:42PM +0000, Joseph Reichman wrote: >>> Is there a way of determining the field at offset x’2A’ DCBMACR >>> seems to be overlaid after a B37 abend >> >>> There are a number of programs to monitor after doing a lot of research >>> cannt seem to find where or what control block it would be in >> >> DFSMS Macro Instructions for Data Sets >> Non-VSAM macro instructions >> Data control block—common fields >> >> If the DCB is open then some fields are different from before it was open. >> >> see: >> https://www.ibm.com/docs/en/zos/3.1.0?topic=blocks-data-control-blockcommon-fields >> >> 40(28) 8 DCBDDNAM Eight-byte name of the data definition >> statement >> that defines the data set associated >> with this DCB. (Before DCB is opened.) >> >> 40(28) 2 DCBTIOT (After DCB is opened.) Offset from the TIOT origin >> to the TIOELNGH field in the TIOT entry >> for the DD statement associated with this >> DCB. Unsigned. Maximum value is just below 64K. >> >> 42(2A) 2 DCBMACRF This field can only be referred to during >> and after OPEN. It is common to all uses >> of the DCB and is created by moving the >> DCBMACR field into this area. >> >> 45(2D) 3 DCBDEBA (After DCB is opened.) Address of field, DEBBASIC, >> in the associated DEB. >> >> ---------------------------------------------------------------------- >> For IBM-MAIN subscribe / signoff / archive access instructions, >> send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
