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
 

 

Copy multiple file into one file

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
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    Post subject: Copy multiple file into one file
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

Moderator


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

PostPosted: Wed Jan 18, 2012 9:19 pm    Post subject:
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    Post subject: Reply to: Copy multiple file into one file
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 Moderator


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

PostPosted: Wed Jan 18, 2012 11:17 pm    Post subject:
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

Moderator


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

PostPosted: Wed Jan 18, 2012 11:52 pm    Post subject:
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    Post subject:
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    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 SORTJOIN - Copy Matched and Unmatched... Steve Ironmonger DFSORT/ICETOOL 5 Tue Jan 17, 2017 4:26 pm
No new posts HALDB data refresh/copy from producti... vineetanand2007 IMS DB/DC 0 Mon Jan 02, 2017 11:16 am
No new posts Copy RECFM =VB TO FB file with RECL =... sahil41352 DFSORT/ICETOOL 3 Wed Dec 28, 2016 11:29 pm
No new posts syncsort: copy lines after the keyword shreya19 SYNCSORT 7 Fri Dec 02, 2016 9:47 am
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm


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