If you write a simple edit macro with the commands
C P'.' ' ' 73 80 ALL
SAVE
END
you can specify this macro to automatically execute when you edit a member.
Then display the dataset in 3.4 and issue the line command E(*). If you
prefer, you can bring up the member list and issue the line command E for the
specific ones you want to process.
After you are done, remove the automatic execution of this macro before editing
any other data.
> -----Original Message-----
> From: IBM Mainframe Discussion List <[email protected]> On Behalf
> Of Sean Gleann
> Sent: Monday, June 25, 2018 2:53 AM
> To: [email protected]
> Subject: ICEGENER to the rescue again?
>
> I'm wondering if someone can point me in the right direction with a problem
> that I've had handed to me...
>
> I have a PDS of a reasonable number of FB80 members (>100). Some of the
> members have sequence numbers in character positions 73-80, some don't and
> some are 'partially' numbered, with gaps in the sequencing, depending on
> who last updated the specific member.
>
> I want to replace anything in cols 73-80 with 8 spaces, no matter what is
> there.
>
> I can think of numerous ways of doing something similar with a straight
> sequential dataset, but when it comes to an unknown number of members in a
> PDS, I get stumped.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
