Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
SORT Performance tuning

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
shan

New User


Joined: 10 Aug 2006
Posts: 7

PostPosted: Tue Mar 30, 2010 11:16 pm    Post subject: SORT Performance tuning
Reply with quote

Could you please help me reduce the Wall Time and CPU Time for the SORT step?

i am splitting the input files into 4 files using include cond

Input file together contains 95 million records, it is running for 09 hours Wall time and 8 minutes CPU time.

Code:
//S10S    EXEC PGM=SORT,REGION=6M                                       
//SYSOUT   DD  SYSOUT=*                                                 
//SORTIN DD DSN=TST.REFG.ALL.HM82101.DDD361.M0110,                   
//      DISP=OLD,UNIT=(TAP1,2),VOL=(,RETAIN),DCB=BUFNO=80           
//            DD DSN=TST.REFG.HM82052.DDD361.M0110.ALL,                   
//      DISP=OLD,UNIT=(TAP1,2),VOL=(,RETAIN),DCB=BUFNO=80           
//SORTOF2 DD DSN=TST.REFG.ALL.HM82152.DDD361.M0110,
//            DISP=(,CATLG,DELETE),                                     
//            UNIT=TAP1,                                               
//            DCB=(RECFM=FB,LRECL=1589,BLKSIZE=0,BUFNO=80),         
//            LABEL=RETPD=45,VOL=(,RETAIN,,111)                         
//SORTOF3  DD DSN=TST.REFG.ALL.HM82153.DDD361.M0110,               
//            DISP=(,CATLG,DELETE),                                     
//            UNIT=TAP1,                                               
//            DCB=(RECFM=FB,LRECL=1589,BLKSIZE=0,BUFNO=80),         
//            LABEL=RETPD=45,VOL=(,RETAIN,,111)                         
//SORTOF4  DD DSN=TST.REFG.ALL.HM82154.DDD361.M0110,                 
//            DISP=(,CATLG,DELETE),                                     
//            UNIT=TAP1,                                               
//            DCB=(RECFM=FB,LRECL=1589,BLKSIZE=0,BUFNO=80),         
//            LABEL=RETPD=45,VOL=(,RETAIN,,111)                         
//SORTOF5  DD DSN=TST.REFG.ALL.HM82155.DDD361.M0110,                 
//            DISP=(,CATLG,DELETE),                                     
//            UNIT=TAP1,                                               
//            DCB=(RECFM=FB,LRECL=1589,BLKSIZE=0,BUFNO=80),         
//            LABEL=RETPD=45,VOL=(,RETAIN,,111)                         
//SYSIN  DD *                                                           
 SORT FIELDS=COPY                                           
 OUTFIL FILES=2,INCLUDE=(1,1,CH,EQ,C'C'),                   
                 OUTREC=(1:1,1,2:2,10,12:12,77,             
                        89:C'1',90:90,15,                   
                        105:45X,150:150,1440)               
 OUTFIL FILES=3,INCLUDE=(1,1,CH,EQ,C'C'),                   
                 OUTREC=(1:1,1,2:2,10,12:12,77,             
                        89:C'2',90:15X,105:105,             
                        15,120:30X,150:150,1440)           
 OUTFIL FILES=4,INCLUDE=(1,1,CH,EQ,C'C'),                   
                 OUTREC=(1:1,1,2:2,10,12:12,77,             
                        89:C'3',90:90,15,105:15X,           
                        120:120,15,135:15X,150:150,1440)   
 OUTFIL FILES=5,INCLUDE=(1,1,CH,EQ,C'C'),                   
                 OUTREC=(1:1,1,2:2,10,12:12,77,             
                        89:C'4',90:45X,135:135,             
                        15,150:150,1440)                   
//*     
Back to top
View user's profile Send private message

CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Tue Mar 30, 2010 11:29 pm    Post subject:
Reply with quote

Since you are including only the 1,1,CH,EQ,C'C', I assume that there are other records other than those in the input.
If so, move the include to the inrec and all the non 'C' records won't be processed at all.
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Tue Mar 30, 2010 11:33 pm    Post subject:
Reply with quote

shan,

Use the following JCL with modified control cards and removal of DCB parameters

Code:

//S10S    EXEC PGM=SORT,REGION=6M                                       
//SYSOUT  DD SYSOUT=*                                                 
//SORTIN  DD DSN=TST.REFG.ALL.HM82101.DDD361.M0110,                   
//           DISP=SHR
//        DD DSN=TST.REFG.HM82052.DDD361.M0110.ALL,                   
//           DISP=SHR
//SORTOF2 DD DSN=TST.REFG.ALL.HM82152.DDD361.M0110,
//           DISP=(,CATLG,DELETE),                                     
//           UNIT=TAP1,                                               
//           LABEL=RETPD=45,VOL=(,RETAIN,,111)                         
//SORTOF3  DD DSN=TST.REFG.ALL.HM82153.DDD361.M0110,               
//            DISP=(,CATLG,DELETE),                                     
//            UNIT=TAP1,                                               
//            LABEL=RETPD=45,VOL=(,RETAIN,,111)                         
//SORTOF4  DD DSN=TST.REFG.ALL.HM82154.DDD361.M0110,                 
//            DISP=(,CATLG,DELETE),                                     
//            UNIT=TAP1,                                               
//            LABEL=RETPD=45,VOL=(,RETAIN,,111)                         
//SORTOF5  DD DSN=TST.REFG.ALL.HM82155.DDD361.M0110,                 
//            DISP=(,CATLG,DELETE),                                     
//            UNIT=TAP1,                                               
//            LABEL=RETPD=45,VOL=(,RETAIN,,111)                         
//SYSIN  DD *                                                           
  OPTION COPY,SDB=YES
  INCLUDE COND=(1,1,CH,EQ,C'C')                     
  INREC BUILD=(1:1,88,X,90,1500)                     
  OUTFIL FILES=2,OVERLAY=(89:C'1',105:45X)           
  OUTFIL FILES=3,OVERLAY=(89:C'2',90:15X,120:30X)   
  OUTFIL FILES=4,OVERLAY=(89:C'3',105:15X,135:15X)   
  OUTFIL FILES=5,OVERLAY=(89:C'4',90:45X)           
//*
Back to top
View user's profile Send private message
shan

New User


Joined: 10 Aug 2006
Posts: 7

PostPosted: Wed Mar 31, 2010 1:50 am    Post subject:
Reply with quote

Thank u so much CICS Guy and Skolusu
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts sort records based on length exceeds ... maxsubrat DFSORT/ICETOOL 7 Wed Oct 04, 2017 4:48 pm
No new posts JOINKEYS Paired and Unpaired Sort MFwhiz DFSORT/ICETOOL 4 Fri Sep 29, 2017 1:48 am
No new posts Difference in SORT & ICETOOL Mohan Kothakota DFSORT/ICETOOL 5 Fri Sep 22, 2017 4:56 pm
No new posts OC4 in SORT Mohan Kothakota DFSORT/ICETOOL 2 Tue Sep 12, 2017 6:30 pm
No new posts SORT Trailer Count - LRECL Output co... amorante DFSORT/ICETOOL 5 Tue Aug 29, 2017 8:57 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us