IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search Log in to check your private messages Log in
 

Sort to merge multiple rows to single row


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
purushottam

New User


Joined: 26 Feb 2007
Posts: 37
Location: pune

PostPosted: Thu May 23, 2013 4:48 pm
Reply with quote

Hi,

I have an input file with LRECL 38 and the contents as below:

Input:
0101491706051105OTE0000000000000000100
0101491706051105OTE0000000000000000200
0101491706051105OTE0001020000000000300
0101491706051105OTE0000000000000000400

Key is from position (1,13)
It is a Fixed Block file. I need the output as displayed below. I tried to used the SPLICE for the same but since my input can have variable number of key occurances (from 1-20)

Output:
0101491706051105OTE00000000000000001000101491706051105OTE00000000000000002000101491706051105OTE00010200000000003000101491706051105OTE0000000000000000400
Back to top
View user's profile Send private message
Pandora-Box

Moderator


Joined: 07 Sep 2006
Posts: 1566
Location: Andromeda Galaxy

PostPosted: Thu May 23, 2013 5:31 pm
Reply with quote

So you need the data in LRECL of 152 for every four records?

Which version of DFSORT are you using?
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7312
Location: Inside the Matrix

PostPosted: Thu May 23, 2013 6:27 pm
Reply with quote

And is the output to be fixed-length, or variable?
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Thu May 23, 2013 10:53 pm
Reply with quote

purushottam,

Look up SPLICE with INREC IFTHEN and code it for your max occurrence which in your case is 20.
Back to top
View user's profile Send private message
Pandora-Box

Moderator


Joined: 07 Sep 2006
Posts: 1566
Location: Andromeda Galaxy

PostPosted: Fri May 24, 2013 12:33 am
Reply with quote

Kolusu,

Why RESIZE is not a better option this case?
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Fri May 24, 2013 3:02 am
Reply with quote

Pandora-Box wrote:
Kolusu,

Why RESIZE is not a better option this case?



You need to read the requirement once again.

purushottam wrote:
Key is from position (1,13)
It is a Fixed Block file. I need the output as displayed below. I tried to used the SPLICE for the same but since my input can have variable number of key occurances (from 1-20)


OP has a multiple keys in his file and for each key can be variable with max of 20 records per key.

ex:
Code:

----+----1----+----2----+----
KEY01        DATA RECORD-01 
KEY01        DATA RECORD-02 
KEY01        DATA RECORD-03 
KEY01        DATA RECORD-04 
KEY01        DATA RECORD-05 
                             
KEY02        DATA RECORD-AA 
KEY02        DATA RECORD-BB 
                             
KEY03        DATA RECORD-CC 
KEY03        DATA RECORD-DD 
KEY03        DATA RECORD-EE 


OP wants to club 5 records of KEY01 as a single record, 2 records of Key02 as a single record and 3 records of Key03 as a single record. RESIZE works with fixed number of records for each key. So you need to use splice
Back to top
View user's profile Send private message
Pandora-Box

Moderator


Joined: 07 Sep 2006
Posts: 1566
Location: Andromeda Galaxy

PostPosted: Fri May 24, 2013 7:41 pm
Reply with quote

Thanks for the insight Kolusu icon_smile.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 

Search our Forum:

Similar Topics
Topic Forum Replies
No new posts COBOL VS SORT Utility for file format... COBOL Programming 6
No new posts Need to split single line into two li... DFSORT/ICETOOL 7
No new posts Copying data from prev record using SORT SYNCSORT 19
No new posts NOT ABLE TO FIND DB2 ROWS DB2 2
No new posts Combining more 4 files with sorted or... DFSORT/ICETOOL 3

Back to Top