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
 
What is the usage of the statement "statrec=syncsort&qu

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
kbmkris

Active User


Joined: 24 Jun 2006
Posts: 101

PostPosted: Fri Oct 27, 2006 5:00 pm    Post subject: What is the usage of the statement "statrec=syncsort&qu
Reply with quote

what is the usage of the statement "statrec=syncsort" in the sort program?

Thanks
Bala
Back to top
View user's profile Send private message

guptae

Moderator


Joined: 14 Oct 2005
Posts: 1187
Location: Bangalore,India

PostPosted: Fri Oct 27, 2006 5:06 pm    Post subject:
Reply with quote

Hi Bala,

Would u please more information on that I have never seen statrec in sort.

Please paste ur jcl
Back to top
View user's profile Send private message
kbmkris

Active User


Joined: 24 Jun 2006
Posts: 101

PostPosted: Fri Oct 27, 2006 5:12 pm    Post subject:
Reply with quote

Hi guptae,

see the jcl below, the dataset specified in the sortparm contains just one line "statrec=syncsort". i have commented out the line and ran the program, it's running fine. i want to know why they have included this statement.

Code:
//STEP1    EXEC PGM=SORT                                     
//SORTPARM DD DSN=HOES.PARMLIB(HOIS005),DISP=SHR           
//SORTIN   DD DSN=TST.LEXD.MM27051,DISP=SHR                   
//SORTOF1  DD DSN=TST.K4CCBK1.MM31751,DISP=(,CATLG,DELETE), 
//            UNIT=SYSDA,SPACE=(27998,(300,30),RLSE),       
//            DCB=(RECFM=FB,LRECL=69,BLKSIZE=0)             
//SORTOF2  DD DSN=TST.K4CCBK1.MM31752,DISP=(,CATLG,DELETE), 
//            UNIT=SYSDA,SPACE=(27998,(300,30),RLSE),       
//            DCB=(RECFM=FB,LRECL=69,BLKSIZE=0)             
//SORTOF3  DD DSN=TST.K4CCBK1.MM31753,DISP=(,CATLG,DELETE), 
//            UNIT=SYSDA,SPACE=(27998,(300,30),RLSE),       
//            DCB=(RECFM=FB,LRECL=69,BLKSIZE=0)             
//SORTOF4  DD DSN=TST.K4CCBK1.MM31754,DISP=(,CATLG,DELETE), 
//            UNIT=SYSDA,SPACE=(27998,(300,30),RLSE),       
//            DCB=(RECFM=FB,LRECL=69,BLKSIZE=0)             
//SORTOF5  DD DSN=TST.K4CCBK1.MM31755,DISP=(,CATLG,DELETE), 
//            UNIT=SYSDA,SPACE=(27998,(300,30),RLSE),       
//            DCB=(RECFM=FB,LRECL=69,BLKSIZE=0)             
//SORTOF6  DD DSN=TST.K4CCBK1.MM31756,DISP=(,CATLG,DELETE), 
//            UNIT=SYSDA,SPACE=(27998,(300,30),RLSE),       
//            DCB=(RECFM=FB,LRECL=69,BLKSIZE=0)             
//SYSOUT   DD SYSOUT=*                                       
//SYSIN    DD *                                             
 SORT FIELDS=COPY                                           
  OUTFIL FILES=1,INCLUDE=(1,4,CH,EQ,C'0609')   
  OUTFIL FILES=2,INCLUDE=(1,4,CH,EQ,C'0608')   
  OUTFIL FILES=3,INCLUDE=(1,4,CH,EQ,C'0607')   
  OUTFIL FILES=4,INCLUDE=(1,4,CH,EQ,C'0606')   
  OUTFIL FILES=5,INCLUDE=(1,4,CH,EQ,C'0605')   
  OUTFIL FILES=6,INCLUDE=(1,4,CH,EQ,C'0604')   
 /*                                           
 //                                           

Thanks,
bala
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Split 1 file into 10 output Files - S... Prasanth Kumar SYNCSORT 5 Sat Sep 16, 2017 12:02 am
This topic is locked: you cannot edit posts or make replies. Extract all "IF" Statements... Adarsh Damodaran CLIST & REXX 1 Wed Sep 06, 2017 9:28 am
No new posts WER268A OUTREC STATEMENT : SYNTAX E... frozenblood87 SYNCSORT 12 Sat Aug 26, 2017 9:45 pm
No new posts Suppress value reported by BREAK in D... Learncoholic DFSORT/ICETOOL 3 Wed Aug 16, 2017 6:03 pm
No new posts ON 2 AND EVERY 1 - Statement ??? UmeySan COBOL Programming 2 Tue Jul 25, 2017 1:20 pm

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