The sequence numbers are removed in a separate step. ie CHANGE ALL P'=' ' ' 73 80
If you have ./ in cc1-2 do a CHANGE ALL on any that are not IEBUPDTE directives. Perhaps change ./ to .#. I use a combination of a program that updates member by member using an EDIT macro, that would be the final step to reverse the .# chars back to ./. On Fri, Jun 29, 2018 at 2:30 PM, Paul Gilmartin < [email protected]> wrote: > On Fri, 29 Jun 2018 13:23:23 +1000, Wayne Bickerdike wrote: > > >Not sure if Sean received my off-list REXX code. Here it is. No need for > >IEBPTPCH, just run against the PDS and it builds a sequential file with ./ > >headers. > > ... > > ROUT.1 = "./ ADD LEVEL=00,SOURCE=0,NAME="MEMBER > > "EXECIO * DISKW OUT (FINIS STEM ROUT." > > ... > > " REPRO INDATASET('"libparm"("MEMBER")' ) OUTFILE(OUT) " > > ... > I'm curious. > o What among the IEBUPDTE or REPRO control statements > removes the sequence numbers. Does IEBUPDTE ADD do this by > default if sequence numbers are not specifically requested by an > option? > o What happens if any record in any input member contains "./" in > columns 1-2? Could this cause IEBUPDTE to misbehave? The OP > did not guarantee this could not happen. > > > On Mon, 25 Jun 2018 10:52:56 +0100, Sean Gleann wrote: > > ... > >I want to replace anything in cols 73-80 with 8 spaces, no matter what is > >there. > > -- gil > > ---------------------------------------------------------------------- > 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
