_________________ 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
Joined: 20 Oct 2006 Posts: 1411 Topics: 26 Location: germany
Posted: Wed Jan 10, 2007 7:26 pm Post subject:
Frank will probably drop by and provide an answer.
what you want to do is:
sort each subset (2 records) without changing the basic sequence of the complete file?
will there always be a even number of records?
my instinct is to say 'no to a solution with a utility'; REXX/ezytrieve would be very quick and easy to write. COBOL,PL/I or asm would be a longer solution only because of development time. _________________ Dick Brenholtz
American living in Varel, Germany
Frank, thannk you so very much.
Unfortunately I cam't test it at this moment, however tomorrow at the same time I will let you know the outcome of my test.
Once again, your help is greatly appreciated.
Frank already suggested the ICEMAN, and I have a solution with a Cobol program, however wanted to do it quicker, with lesser steps. I will test Franks JCL tomorrow and will let you know.
To answer your questions: Yes, records are always even.
Joined: 02 Dec 2002 Posts: 1618 Topics: 31 Location: San Jose
Posted: Wed Jan 10, 2007 7:46 pm Post subject:
Note that the DFSORT solution I gave works regardless of whether the number of records is even or odd. _________________ 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
Joined: 20 Oct 2006 Posts: 1411 Topics: 26 Location: germany
Posted: Wed Jan 10, 2007 8:30 pm Post subject:
Frank,
The DFSORT Team is producing one very nice, amazing, product.
As a user, I thank the team for the effort. _________________ Dick Brenholtz
American living in Varel, Germany
Joined: 02 Dec 2002 Posts: 1618 Topics: 31 Location: San Jose
Posted: Thu Jan 11, 2007 12:18 pm Post subject:
Dick,
Thanks for the kind words. 8) _________________ 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
Frank,
I tried the JCL, the job completed with RC=0, however the output file was the same as input. The swithch didn't appear. Maybe some parameters should be changed, according to my specific file. I only changed the positioning of the characters "YY".
Thank you once again for your help.
Joined: 02 Dec 2002 Posts: 1618 Topics: 31 Location: San Jose
Posted: Thu Jan 11, 2007 8:26 pm Post subject:
I tried to use the information you gave me on your specific file. My solution depends on the 'YY' indicator being in positions 79-80 including the RDW since that's what I assume you had from reading your post. If you have the indicator somewhere else, then the job would need to be adjusted accordingly. Don't forget to include the 4-byte RDW when determining the starting position.
To see if the indicator is actually in 79-80 or 83-84, you can run this DFSORT job:
You can use this job to see if the indicator is somewhere else you think it is.
Once you have the correct starting position (p), I believe the only thing that needs to be adjusted is 88,2,CH,EQ,C'YY' (88 = 79 + 9) - you need p + 9 there. I can help you more with this tomorrow if you need me to. _________________ 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
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum