how to get rid of last 8 number of ps file

[Pumpkin]

hi,
some times,i found some ps dataset(LRECL=80,RECFM=FB), there are numbers in the last 8 byte,and can't be deleted by edit or by "num off" .
is there ways to get rid of it?
thanks!

[enrico-sorichetti]

if You can edit the file ...
c p'^' ' ' 73 80 all

73 80 is for a 80 bytes record, adjust accordingly for Your lrecl

if You cannot edit
use SORT

[enrico-sorichetti]

follow on
for sort use something along the lines of

Code: Select all

000015 //SYSIN     DD *
000016   SORT   FIELDS=COPY
000017   OUTFIL BUILD=(01,72,8X)
000018 //*


adjust the 72 according to Your lrecl

[NicC]

You could try NUM ON followed by UNNUM followed by NUM OFF

[Pumpkin]

thanks
it works!

[dick scherrer]

Well, good to hear it is working, but your reply would be more helpful to others if you posted "the solution" you used . . .

d

[steve-myers]

You could try NUM ON followed by UNNUM followed by NUM OFF

UNNUM in ISPF EDIT automatically does NUM OFF.

[Pumpkin]

i use UNNUM,
sometimes,use num off, it doesn't work.

[steve-myers]

i use UNNUM,
sometimes,use num off, it doesn't work.

NUM OFF does not remove existing numbers, but any new lines inserted into the dataset will not have line numbers.

[dick scherrer]

i use UNNUM,

Thank you for letting us know

d