On 2021-01-11 8:06 PM, Sean Gleann wrote:
Can anyone point me at some sort of solution that I might adapt, please?
Perhaps there is something on the CBT tape that might help...
I am sure the original problem has been resolved by now, but for
completeness I will mention a couple of things which I did not see
previously mentioned - apologies if they were.
If you want to use CBT tape utilities, I'd recommend OFFLOAD and
PDSLOAD. OFFLOAD the the PDS to a sequential data set and then:
Option 1: edit the sequential data set and in the edit session issue
RENUM followed by UNNUM, and then reload the members using PDSLOAD.
Use TSO EDIT (work file) or REVIEW's Edit (data space) if the the data
is too large for an ISPF Edit session.
Don't want to use Edit?
Option 2: After the initial OFFLOAD, use PDSLOAD (or even IEBUPDTE if
you don't care about ISPF statistics) to reload the member to a PDS
which has LRECL=72. Then OFFLOAD again to an LRECL=80 sequential data
set and reload by PDSLOAD/IEBUPDTE to a PDS with LRECL=80.
BUT, I think the obvious solution is to
1. Create a new PDS with similar space but with LRECL=72.
2. Use ISPF option 3.3 to copy all of the members to the new PDS.
3. Prepare your permanent result LRECL=80 PDS (make a new one or empty
and compress the old one).
4. Use ISPF option 3.3 to copy all of the members from the LRECL=72 PDS
back to the LRECL=80 PDS.
Cheers,
Greg
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
