View previous topic :: View next topic
|
Author |
Message |
knickraj Warnings : 1 New User
Joined: 11 Jun 2007 Posts: 50 Location: Euro
|
|
|
|
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 |
|
|
Pandora-Box
Global Moderator
Joined: 07 Sep 2006 Posts: 1592 Location: Andromeda Galaxy
|
|
|
|
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 |
|
|
Skolusu
Senior Member
Joined: 07 Dec 2007 Posts: 2205 Location: San Jose
|
|
|
|
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 |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
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 |
|
|
Pandora-Box
Global Moderator
Joined: 07 Sep 2006 Posts: 1592 Location: Andromeda Galaxy
|
|
|
|
Thanks for correcting me Kolusu!
Apologies! |
|
Back to top |
|
|
knickraj Warnings : 1 New User
Joined: 11 Jun 2007 Posts: 50 Location: Euro
|
|
|
|
Thanks for your help it works. |
|
Back to top |
|
|
|