MVSFORUMS.com

madhuroyus

I have two files file1 and file2. I wanted to take few bytes from file1 and few bytes from file2 and write in to fileout.

Like:

file1
------

Multi talented Guy
New Versus Old
Macnaus Gold

file2:
-------
Old is Gold
New is platinum
Devine leads to God

Note: Input is taken 4 bytes from 3rd byte in file1 and 2 bytes from 5th byte in file2 and written to fileout.

FileOut:
--------
lti is
w Ve is
cnaune

Can some one help me on this problem by using ICETOOL and DFSORT/SYNCSORT.

kolusu · Posted: Mon Jan 09, 2006 8:05 am Post subject:

madhuroyus,

What is the key for merging? 1st record of file1 must be attaced to 1st record of file2 and so on ..?

Please post DCB properties of both the files and rules for merging them.

Thanks

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

Frank Yaeger · Posted: Mon Jan 09, 2006 11:09 am Post subject:

See the "Join fields from two files record-by-record" Smart DFSORT Trick at:

http://www.ibm.com/servers/storage/support/software/sort/mvs/tricks/
_________________
Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

madhuroyus · Posted: Tue Jan 10, 2006 1:27 am Post subject:

Hi Kolusu,

First record of the first file must be attached with the first record of the second file.

All files are FB.

Thanks for your response.

Madhu.
_________________
Self confidence is something that says U will do it, when the rest of the world has exactly opposite view.

kolusu · Posted: Tue Jan 10, 2006 5:10 am Post subject:

madhuroyus,

Frank's Link will get you the desired results.

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

madhuroyus · Posted: Tue Jan 10, 2006 5:18 am Post subject:

Hi Frank Yaeger,

I used the following jcl.

kolusu · Posted: Tue Jan 10, 2006 5:51 am Post subject:

madhuroyus · Posted: Tue Jan 10, 2006 6:19 am Post subject:

Hi Kolusu,

I understood the following code.
//CTL3CNTL DD *
OUTFIL FNAMES=OUT,OUTREC=(2,1,4,1,8,1,10,1)
/*

I tried to understand the below code but I am not.
" SPLICE FROM(TMP1) TO(OUT) ON(11,8,PD) WITH(6,5) USING(CTL3)"

Can you please explain me how it works.

Thanks
Madhu.
_________________
Self confidence is something that says U will do it, when the rest of the world has exactly opposite view.

madhuroyus · Posted: Tue Jan 10, 2006 6:24 am Post subject:

Hi Kolusu,

I understood it now after some experiments I did.

Thanks a ton.
And Frank's to you also.

Thanks
Madhu.
_________________
Self confidence is something that says U will do it, when the rest of the world has exactly opposite view.

Frank Yaeger · Posted: Tue Jan 10, 2006 11:20 am Post subject:

Madhu,

I just got in and saw your post. I'm glad you were able to figure it out yourself.

For complete information on how the SPLICE operator of DFSORT's ICETOOL works, see:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CA10/6.13?DT=20050222160456

The doc uses lots of examples.
_________________
Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

madhuroyus · Posted: Thu Jan 12, 2006 3:06 am Post subject:

Hi Frank,

I gone thru the link you provided and it is so help full for me.

I am thank full to you.

Thanks
Madhu
_________________
Self confidence is something that says U will do it, when the rest of the world has exactly opposite view.