View previous topic :: View next topic
|
Author |
Message |
Sandy-is-here
New User
Joined: 16 Mar 2006 Posts: 6 Location: Bangalore
|
|
|
|
Hi All,
I want to know, is it possible to copy/merg the data of three different record length files into one. For eg, I have file1 with 80 fixed block record length, file2 with 100 fixed block record length and file3 with 150 fixed block record length. How do I copy data from file1, file2 and file3 into file4 of 150 fixed block record length, in a single step ??
Is there any utility which supports this ??
Thanks,
Sandy-is-here |
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
You can use a DFSORT/ICETOOL job like the following to do what you asked for:
Code: |
//S1 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN1 DD DSN=... input file (FB/80)
//IN2 DD DSN=... input file (FB/100)
//IN3 DD DSN=... input file (FB/150)
//** USE MOD FOR OUT
//OUT DD DISP=(MOD,CATLG),DSN=... output file (FB/150)
//TOOLIN DD *
COPY FROM(IN1) TO(OUT) USING(CTL1)
COPY FROM(IN2) TO(OUT) USING(CTL2)
COPY FROM(IN3) TO(OUT)
/*
//CTL1CNTL DD *
OUTREC FIELDS=(1,80,150:X)
/*
//CTL2CNTL DD *
OUTREC FIELDS=(1,100,150:X)
/*
|
If you're not familiar with DFSORT and DFSORT's ICETOOL, I'd suggest reading through "z/OS DFSORT: Getting Started". It's an excellent tutorial, with lots of examples, that will show you how to use DFSORT, DFSORT's ICETOOL and DFSORT Symbols. You can access it online, along with all of the other DFSORT books, from:
Use [URL] BBCode for External Links |
|
Back to top |
|
|
Sandy-is-here
New User
Joined: 16 Mar 2006 Posts: 6 Location: Bangalore
|
|
|
|
Thanks a lot Frank !! |
|
Back to top |
|
|
|