IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Sort - sequence number by key


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

New User


Joined: 01 Aug 2014
Posts: 1
Location: Hyderabad

PostPosted: Fri Aug 01, 2014 4:13 pm
Reply with quote

Please do not tag onto a four year old topic. Start a new one.
This has been split away from the original topic


How do I get sequence numbers within a group key

Input:

aaaaaaa
bbbbbbb
bbbbbbb
cccccccc
ddddddd
ddddddd
ddddddd
ddddddd
eeeeeee
eeeeeee
eeeeeee

Output: (Seq no should start from '1' when key changes)

aaaaaaa 0001
bbbbbbb 0001
bbbbbbb 0002
cccccccc 0001
ddddddd 0001
ddddddd 0002
ddddddd 0003
ddddddd 0004
eeeeeee 0001
eeeeeee 0002
eeeeeee 0003
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Fri Aug 01, 2014 4:29 pm
Reply with quote

1) As stated above - start a new topic.

2) Please use the SEARCH facility as this has been covered many times in the past for differing reasons.

3) Learn to use the code tags
Code:
[code]Your stuff goes here[/code]
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


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

PostPosted: Fri Aug 01, 2014 4:41 pm
Reply with quote

You go to the manual. You look in the index. You follow the references. You look to see that what you find does what you want. You code it and test it.

You will find it also possible with WHEN=GROUP, but since you only want plain sequence numbers within a key, it will be more efficient the other way.
Back to top
View user's profile Send private message
magesh23586

Active User


Joined: 06 Jul 2009
Posts: 213
Location: Chennai

PostPosted: Fri Aug 01, 2014 5:29 pm
Reply with quote

Try this untested.

Code:

OPTION COPY                                     
OUTREC FIELDS=(1,8,SEQNUM,4,ZD,RESTART=(1,7))   



Hope this helps..
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


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

PostPosted: Fri Aug 01, 2014 6:41 pm
Reply with quote

magesh23586,

That's roughly what I was getting at.

I am going to start a "Fields Box". This is like a "Swear Box". Every time someone uses INREC FIELDS, OUTREC FIELDS or OUTFIL OUTREC, they have to contribute a small amount of currency to the "Fields Box".

Also, clearer (to me) to use OVERLAY to append data to a record:

Code:
 OPTION COPY                                     
 INREC OVERLAY=(9:SEQNUM,4,ZD,RESTART=(1,7))
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

 


Similar Topics
Topic Forum Replies
No new posts Need to set RC4 through JCL SORT DFSORT/ICETOOL 5
No new posts How to split large record length file... DFSORT/ICETOOL 10
No new posts Pulling a fixed number of records fro... DB2 2
No new posts Substring number between 2 characters... DFSORT/ICETOOL 2
No new posts JCL sort card - get first day and las... JCL & VSAM 9
Search our Forums:

Back to Top