I use a PDSTOSAM REXX program. It writes all the members to a flat file
with a ./ ADD IEBUPDTE header at the start of each member.

Use ISPF edit against the entire file and add the updated members back.

As previously stated "C ALL P'='  '  ' 73 80" will remove any sequence
numbers.

If interested, I'll post the REXX code and JCL...

On Tue, Jun 26, 2018 at 9:22 AM, Steve Smith <[email protected]> wrote:

> Which of course, only works if NUM is off.
>
> If unnum doesn't always work, I don't think there's a general 1-line
> solution.
>
> Renum works on any member, so I can't see much room for a sensible reason
> for unnum to be so delicate about it.
>
> sas
>
> On Mon, Jun 25, 2018 at 6:23 PM, Mike Schwab <[email protected]>
> wrote:
>
> > Which is why we suggested C ALL P'.' ' ' 73 80.
> > Change All characters to blanks in columns 73 to 80.
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>



-- 
Wayne V. Bickerdike

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to