I need to copy data from 3rd position till the end of a FB file (Lrecl 31002) to VB file(Lrecl 30140). However the job was not successful. So Ii tried copying it to a FB file only.
The jcl is:
//JS001 EXEC PGM=SYNCSORT
//SORTIN DD DSN=S51.SAMPLE.QUERY.OUT16,DISP=SHR
//SORTOUT DD DSN=Sortout file name,
// DISP=(,CATLG,DELETE),
// UNIT=SYSDA,
// DATACLAS=STANDARD
//SYSOUT DD *
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(1:3,30140)
//SORTIN DD DSN=S51.SAMPLE.QUERY.OUT16,DISP=SHR
//SORTOUT DD DSN=Sortout file name,
// DISP=(,CATLG,DELETE),
// UNIT=SYSDA,
// DATACLAS=STANDARD
//SYSOUT DD *
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(1:3,30140)
Can someone pls help me in copying the data.If the conversion to VB happens in the same job, it will be great.
Thank You,
Regards,
Kimir.
