MVSFORUMS.com

rajeshkoratti · Beginner Joined: 14 Feb 2006 Posts: 42 Topics: 22

Hi

I have a particular requirement to add keys at the start of each record in a packed file.

To explain it better.. i have a file which contains the IMS database unload. Now my database is structured at 3 level, parent - child1 - child2.

Now i need to extract the key from the parent and append it into the child1 and extract the key from the parent and child1 and append it into the child2 record.

in short my records in the file look like this.

parentkeyp11 data1data2dat3data4..
child01keyc11 data1data2data3data4..
child02keyc21 data1data2data3data4..
child02keyc22 data1data2data3data4..
child02keyc23 data1data2data3data4..
child02keyc24 data1data2data3data4..
child01keyc12 data1data2data3data4..
child02keyc21 data1data2data3data4..
child02keyc22 data1data2data3data4..

the output that i expect is
parentkeyp11 data1data2dat3data4..
parentkeyp11child01keyc11 data1data2data3data4..
parentkeyp11child01keyc11child02keyc21 data1data2data3data4..
parentkeyp11child01keyc11child02keyc22 data1data2data3data4..
parentkeyp11child01keyc11child02keyc23 data1data2data3data4..
parentkeyp11child01keyc11child02keyc24 data1data2data3data4..
parentkeyp11child01keyc12 data1data2data3data4..
parentkeyp11child01keyc12child02keyc21 data1data2data3data4..
parentkeyp11child01keyc12child02keyc22 data1data2data3data4..

next parent starts....

I know that DFSORT can be used in this scenario, but the problem im facing is that i have Syncsort in my shop and that too ver 1.2, So do i proceed with Syncsort or do i write a rexx program to accomplish this?

Since this is an IMS dump which i did using the BMC utility, so do i have any other ways in which i can parametrize the DFSRRC00 utilty and obtain the keys in each record?

PS : Im not sure if i have posted this int he right forum, since i was inclined to use sort fot this requirement im posting this here.
_________________
Thanks and Regards..
Rajesh

rajeshkoratti · Beginner Joined: 14 Feb 2006 Posts: 42 Topics: 22

Any replies ?????????
_________________
Thanks and Regards..
Rajesh

amargulies · Beginner Joined: 10 Jan 2007 Posts: 123 Topics: 0

rajeshkoratti,

This can be accomplished in SyncSort for z/OS 1.3 using WHEN=GROUP. This is a free upgrade from release 1.2. I would recommend contacting your system programmer to request the current version.
_________________
Alissa Margulies
SyncSort Mainframe Product Services
201-930-8260
zos_tech@syncsort.com