Sort group of records

aakar · New User Joined: 08 Apr 2008 Posts: 36 Location: mumbai

I have a requirement wherein i have a variable block file, which has first three bytes indicating record type. The record type HED has a field at 20th poistion.Each HED is associated with few other types of records like ABC, DEF etc.These other records do not have this key.

HED.........data.........002(key)............
ABC.........data.........
DEF.........data.........
HED.........data.........001............
ABC.........data.........
DEF.........data.........
HED.........data.........003............
ABC.........data.........
DEF.........data.........
HED.........data.........001............
ABC.........data.........
DEF.........data.........

Desired output sorted on the key in HED :
HED.........data.........001............
ABC.........data.........
DEF.........data.........
HED.........data.........001............
ABC.........data.........
DEF.........data.........
HED.........data.........002............
ABC.........data.........
DEF.........data.........
HED.........data.........003............
ABC.........data.........
DEF.........data.........

Is anything possible with SORT/DFSORT??

Frank Yaeger · Posted: Sat Jan 31, 2009 9:28 pm

You can do this using the method shown in the "Sort groups of records" Smart DFSORT Trick at:

www.ibm.com/systems/support/storage/software/sort/mvs/tricks/

If you need more help with this, tell me the RECFM and LRECL of your input file and the length and format of the key.

aakar · New User Joined: 08 Apr 2008 Posts: 36 Location: mumbai

Thanks frank for the reply, but we are restricted from using ICEMAN, and so can we do it through simple "Sort"

Terry Heinze · Posted: Mon Feb 02, 2009 11:00 am

If your shop has DFSORT, SORT=ICEMAN. If your shop has Syncsort, SORT=SYNCSORT.

Anuj Dhawan · Posted: Mon Feb 02, 2009 2:04 pm

Hello,

ICEMAN would invoke the SORT product installed at your site - in your JCL use PGM=SORT in place of PGM=ICEMAN, job should go fine. By the way who makes these stupid restrictions,

Frank Yaeger · Posted: Mon Feb 02, 2009 10:19 pm

byearun · New User Joined: 25 Jul 2005 Posts: 17

Hi, When I used WHEN=GROUP, it is failing with syntax error. if i remove those conditions, it is working, but i didn't get the expected result. can someone help on this??

Anuj Dhawan · Posted: Wed Feb 11, 2009 5:57 pm

Hi,

1. Are you a DFSORT user or a SyncSort?
2. If SyncSort, question is out of scope.
3. If DFSORT, you need to have PTF UK90013 for z/OS DFSORT V1R5 (July, 2008) which provides important enhancements to DFSORT and DFSORT's ICETOOL to use group operations (WHEN=GROUP) among others.

You give us nothing to work on, something is "not working" does not convey anything - you should have posted the complete diagnostic information & what do you expect in output, what input is used with thier LRECL/RECFM, positions of "keys" and rules.

dick scherrer · Posted: Wed Feb 11, 2009 9:33 pm

Hello,

Frank Yaeger · Posted: Wed Feb 11, 2009 11:10 pm

byearun,

If you are using DFSORT, see the following for information on how to determine your level:

ibmmainframes.com/viewtopic.php?t=33389

If you don't have PTF UK90013, ask your System Programmer to install it (it's free).

byearun · New User Joined: 25 Jul 2005 Posts: 17

It seems the above mentioned package was not installed in our system. We have asked to install the same. Anyways thanks to Anuj, Dick and Frank.