IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Building a sort card dynamically using syncsort
IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
rajatbagga

Active User


Joined: 11 Mar 2007
Posts: 199
Location: india
PostPosted: Fri Apr 04, 2008 5:12 am
 Reply with quote
Hello,

I am trying to build the below sort card dynamically:

Code:
OPTION COPY
INCLUDE COND=(1,1,BI,EQ,X''00'')
OUTFIL FNAMES=OUT,REPEAT=some number (dynamically populated)


And i am using below JCL for doing this:

Code:
//K0101@AZ JOB (7TZDSV,RAJAT),'RAJAT',CLASS=S,TIME=1440,   
//         MSGCLASS=F,NOTIFY=&SYSUID                       
//S2    EXEC  PGM=ICETOOL                                 
//TOOLMSG DD SYSOUT=*                                     
//DFSMSG  DD SYSOUT=*                                     
//T3      DD DSN=Y01317.MODIF.T33,DISP=SHR                 
//CTL3CNTL DD DSN=Y01317.MODIF.CTL3CNTL,UNIT=SYSDA,       
//            DISP=(NEW,CATLG),                           
//            SPACE=(TRK,(1,1))                           
//TOOLIN DD *                                             
  COPY FROM(T3) TO(CTL3CNTL) USING(CTL2)                   
/*                                                         
//CTL2CNTL DD *                                           
  INREC BUILD=(C' OPTION COPY',                           
       C'  INCLUDE COND=(1,1,BI,EQ,X''00'')',             
       C'  OUTFIL FNAMES=OUT,REPEAT=',                     
       +99,SUB,1,2,ZD,EDIT=(TT),80:X)   
/*   


The OUTPUT i am getting is in ONE line:

Code:
OPTION COPY  INCLUDE COND=(1,1,BI,EQ,X'00')  OUTFIL FNAMES=OUT,REPEAT= some number


I want to split this line as shown above(TOP) into three lines how can I do that.

Thanks,
Rajat
Back to top
View user's profile Send private message
sril.krishy

Active User


Joined: 30 Jul 2005
Posts: 183
Location: hyderabad
PostPosted: Fri Apr 04, 2008 12:20 pm
 Reply with quote
rajatbagga,
Not sure whether we can use INREC and BUILD with '/' option.Alissa can throw some light on this.

But here is the other way of doing this.

Just change the card like this,

Code:

OUTFIL FNAMES=CTL3CNTL,                           
OUTREC=(C' OPTION COPY',80:X,/,                   
     C'  INCLUDE COND=(1,1,BI,EQ,X''00'')',80:X,/,
     C'  OUTFIL FNAMES=OUT,REPEAT=',             
     +99,SUB,1,2,ZD,EDIT=(TT),80:X)               


Output :
Code:


OPTION COPY                     
 INCLUDE COND=(1,1,BI,EQ,X'00')
 OUTFIL FNAMES=OUT,REPEAT=some number
OPTION COPY                     
 INCLUDE COND=(1,1,BI,EQ,X'00')
 OUTFIL FNAMES=OUT,REPEAT=some number   
OPTION COPY                     
 INCLUDE COND=(1,1,BI,EQ,X'00')
 OUTFIL FNAMES=OUT,REPEAT=some number   
OPTION COPY                     
 INCLUDE COND=(1,1,BI,EQ,X'00')
 OUTFIL FNAMES=OUT,REPEAT=some number       



Also,I think you need to modify the card to have diffrent file names for the OUT files under OUTFIL FNAMES parm.The current card you used is
poinging to same OUT file.


Thanks
Krishy
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 

Similar Topics
Topic Forum Replies
No new posts Need to set RC4 through JCL SORT DFSORT/ICETOOL 5
No new posts How to split large record length file... DFSORT/ICETOOL 10
No new posts Compare only first records of the fil... SYNCSORT 7
No new posts JCL sort card - get first day and las... JCL & VSAM 9
No new posts Sort First/last record of a subset th... DFSORT/ICETOOL 7
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us