Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups 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 How to change 'K' or 'M' use Sort vice_versa DFSORT/ICETOOL 5 Thu May 18, 2017 7:11 am
No new posts Adding big TEXT lines to each record ... bshkris SYNCSORT 4 Sat May 06, 2017 1:40 am
This topic is locked: you cannot edit posts or make replies. SORT trick needed bshkris SYNCSORT 6 Tue May 02, 2017 4:35 am
No new posts SORT JSON type of data maxsubrat DFSORT/ICETOOL 8 Wed Apr 19, 2017 6:01 pm
No new posts Sort Large record length cmsmoon DFSORT/ICETOOL 14 Tue Apr 11, 2017 5:49 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us