superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
As an example, this will change the length of a dataset from 80 bytes to 100 bytes by adding 20 bytes of spaces to the end of each record:
| Code: |
//COPY EXEC PGM=SORT
//SORTIN DD DISP=SHR,DSN=old.dataset
//SORTOUT DD DSN=new.dataset,DISP=(,CATLG,DELETE),...
//SYSOUT DD SYSOUT=*
//SYSIN DD *
OPTION COPY
OUTREC FIELDS=(1,80,100:X)
/*
|
|
|
