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 Profile Log in to check your private messages Log in
 
Concatenate Different LRECL's

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

New User


Joined: 08 Apr 2007
Posts: 1
Location: chennai

PostPosted: Wed Oct 07, 2009 4:56 pm    Post subject: Concatenate Different LRECL's
Reply with quote

Hi,

I tried the same JCL to concatenate dataset with diff LRECL. But this JCL is not working.

Code:
             
//S1    EXEC  PGM=ICETOOL                                               
//TOOLMSG DD SYSOUT=*                                                   
//DFSMSG DD SYSOUT=*                                                   
//IN1 DD DSN=PIPSTR2T.PAYCOMP.SUPER.FILE.PARA,DISP=SHR
//***(LRECL71)                 
//IN2 DD DSN=PIPSTR2D.TRAILER.COUNT.D0907,DISP=SHR
//****(LRECL78)                     
//T1 DD DSN=&&T1,UNIT=SYSDA,SPACE=(CYL,(300,150),RLSE),DISP=(MOD,PASS) 
//OUT DD DSN=PIPSTR2D.TRAILER.COUNT.OU3,DISP=(,CATLG,),                 
//    SPACE=(CYL,(500,500),RLSE)
//TOOLIN DD *                                                           
 COPY FROM(IN1) TO(T1) USING(CTL1)                                     
 COPY FROM(IN2) TO(T1)                                                 
 SORT FROM(T1) TO(OUT) USING(CTL2)                                     
/*                                                                     
//CTL1CNTL DD *                                                         
  INREC OVERLAY=(78:X)                                                 
/*                                                                     
//CTL2CNTL DD *                                                         
  SORT FIELDS=COPY                                                     
/*


Error Msg in spool:

COPY FROM(IN1) TO(T1) USING(CTL1)
ICE606I 0 DFSORT CALL 0001 FOR COPY FROM IN1 TO T1 USING CTL1CNTL TERMINATED

ICE602I 0 OPERATION RETURN CODE: 16

Please let me know what need to do here.

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

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8151
Location: East Dubuque, Illinois, USA

PostPosted: Wed Oct 07, 2009 5:23 pm    Post subject:
Reply with quote

There is a link to the manuals at the top of the page. It does not take long to go into the JCL Language Reference manual and do a search on concatenation to find
Quote:
12.1.6.6 Logical Record Lengths for Concatenated Data Sets

Concatenated data sets with format-V records can have different logical record lengths as long as the data set with the largest logical record length appears first in the concatenation. (Note that you can state a value equal to the largest logical record length for LRECL on the first DD statement, regardless of what the actual logical record length of this data set is.)
You do not say if your records are variable length (which is a requirement to concatenate different length records) or fixed length (which is not allowed and requires you to change your approach).
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Wed Oct 07, 2009 8:38 pm    Post subject:
Reply with quote

Suresh,

For VB files, DFSORT does NOT require that the data set with the largest LRECL be specified first in the concatenation.

For FB files, DFSORT requires that all of the concatenated data sets have the same LRECL.

Actually, I got RC=0 running your job with either FB or VB data sets, so there's something you're not showing.

What is the RECFM of the input data sets?

Show the complete set of DFSMSGS messages you received.
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 Trailer Count - LRECL Output co... amorante DFSORT/ICETOOL 5 Tue Aug 29, 2017 8:57 pm
No new posts WER247A incompatible lrecl Danielle.Filteau SYNCSORT 8 Tue May 02, 2017 4:04 am
No new posts Changing of LRECL of a file abdulrafi DFSORT/ICETOOL 2 Fri Mar 24, 2017 3:25 pm
No new posts PL/I: opening file w/ dynamically det... Sam Dodgers PL/I & Assembler 6 Wed Jul 27, 2016 4:05 pm
No new posts SORT Format should be RECFM=VB,LRECL=350 senthamizh SYNCSORT 8 Fri Jan 15, 2016 8:20 pm

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