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

Copy multiple file into one file


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
knickraj
Warnings : 1

New User


Joined: 11 Jun 2007
Posts: 50
Location: Euro

PostPosted: Wed Jan 18, 2012 8:29 pm
Reply with quote

Hi,

I would like to copy the content of 6 files(FB) , with different LRECL into a single file (FB) , is it possible in one sort step.

thanks
Back to top
View user's profile Send private message
Pandora-Box

Global Moderator


Joined: 07 Sep 2006
Posts: 1592
Location: Andromeda Galaxy

PostPosted: Wed Jan 18, 2012 9:19 pm
Reply with quote

Yes assuming 300 is the longest length 80 is the least you need to concatenate file with 300 lrecl followed by 80

Guess There are some post's discussed already
Back to top
View user's profile Send private message
Skolusu

Senior Member


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

PostPosted: Wed Jan 18, 2012 11:11 pm
Reply with quote

knickraj,

You canNOT concatenate different lrecl FB files. You need to process each one at a time. You can use a single ICETOOL step with DISP=MOD on the output dataset and copy all the files with a COPY operator.


premkrishnan wrote:
Yes assuming 300 is the longest length 80 is the least you need to concatenate file with 300 lrecl followed by 80

Guess There are some post's discussed already


Did you read Op's Post clearly ? He mentioned his input files all RECFM=FB files. AFAIK none of the sort products support the concatenation of different LRECL FB files.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


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

PostPosted: Wed Jan 18, 2012 11:17 pm
Reply with quote

Knickraj,

Here's an example of using ICETOOL to copy five FB input files with various LRECLs to a MOD output file with FB/200 (-> 200 is the largest input LRECL).

Code:

//S1    EXEC  PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN1 DD DSN=...  input file1 (FB/100)
//IN2 DD DSN=...  input file2 (FB/80)
//IN3 DD DSN=...  input file3 (FB/200)
//IN4 DD DSN=...  input file4 (FB/150)
//IN5 DD DSN=...  input file5 (FB/60)
//OUT DD DISP=MOD,DSN=...   MOD output file (FB/200)
//TOOLIN DD *
 COPY FROM(IN1) TO(OUT) USING(CTL1)
 COPY FROM(IN2) TO(OUT) USING(CTL1)
 COPY FROM(IN3) TO(OUT)
 COPY FROM(IN4) TO(OUT) USING(CTL1)
 COPY FROM(IN5) TO(OUT) USING(CTL1)
/*
//CTL1CNTL DD *
  INREC OVERLAY=(200:X)
/*
Back to top
View user's profile Send private message
Pandora-Box

Global Moderator


Joined: 07 Sep 2006
Posts: 1592
Location: Andromeda Galaxy

PostPosted: Wed Jan 18, 2012 11:52 pm
Reply with quote

Thanks for correcting me Kolusu!

Apologies!
Back to top
View user's profile Send private message
knickraj
Warnings : 1

New User


Joined: 11 Jun 2007
Posts: 50
Location: Euro

PostPosted: Thu Jan 19, 2012 3:17 pm
Reply with quote

Thanks for your help it works.
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 -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts How to split large record length file... DFSORT/ICETOOL 9
No new posts INCLUDE OMIT COND for Multiple values... DFSORT/ICETOOL 5
No new posts Extracting Variable decimal numbers f... DFSORT/ICETOOL 17
No new posts SFTP Issue - destination file record ... All Other Mainframe Topics 2
No new posts Access to non cataloged VSAM file JCL & VSAM 18
Search our Forums:

Back to Top