My application handles large files both VSAM and flat files and basically its a reporting application.
After analysing jobs in the application, we identified some steps where its consuming lot of time and description of steps as below:
//S300 EXEC PGM=SORT
//TOMDS1 OUTPUT CLASS=&STND
//OUTTOM OUTPUT CLASS=T,DEST=R0
//SYSOUT DD SYSOUT=(,),
// OUTPUT=(*.TOMDS1,*.OUTTOM)
//SORTIN DD DSN= FLATFILE1,
// DISP=SHR,BUFNO=60
//SORTOUT DD DSN=FLATFILE2,
// DISP=(NEW,CATLG,DELETE),
// UNIT=CART,LABEL=EXPDT=99000,VOL=(,RETAIN,,99),
// DCB=PRD.T.LRECL115
//*
//SYSIN DD *
//SORT FIELDS=(101,09,CH,A,
// 32,04,PD,A,
// 15,02,PD,A,
// 17,04,PD,A)
//
//TOMDS1 OUTPUT CLASS=&STND
//OUTTOM OUTPUT CLASS=T,DEST=R0
//SYSOUT DD SYSOUT=(,),
// OUTPUT=(*.TOMDS1,*.OUTTOM)
//SORTIN DD DSN= FLATFILE1,
// DISP=SHR,BUFNO=60
//SORTOUT DD DSN=FLATFILE2,
// DISP=(NEW,CATLG,DELETE),
// UNIT=CART,LABEL=EXPDT=99000,VOL=(,RETAIN,,99),
// DCB=PRD.T.LRECL115
//*
//SYSIN DD *
//SORT FIELDS=(101,09,CH,A,
// 32,04,PD,A,
// 15,02,PD,A,
// 17,04,PD,A)
//
In this case, flat file1 contains records of approxmately 26063674 and i feel that because of large input data, it takes lot of time to run.
Please can you suggest me the best way and any ideas to reduce run time. I thought of one idea where I can INREC field option that will reduce run time. And let me know your ideas pls.
Thankyou very much for your kind help.
Prasadg