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

Reply via email to