|
View previous topic :: View next topic
|
| Author |
Message |
ksank01
New User
Joined: 23 Jun 2009
Posts: 1
Location: India
|
|
|
|
Hi,
I need to get the count of records with a particular key.
Input file
AAAOO XHJXK
AAAOO DHUDJ
AAAPP KJHKJ
BBBOO ASLKO
BBBPP ASKJAD
BBBPP GHLKDJF
Output required is
AAAOO 2
AAAPP 1
BBBOO 1
BBBPP 2
Can this be done using a SORT? |
|
| Back to top |
|
 |
Arun Raj
Moderator
Joined: 17 Oct 2006
Posts: 2481
Location: @my desk
|
|
|
|
| Quote: |
| Can this be done using a SORT? |
Hello,
If you're looking for a SORT solution, it should be posted in the JCL(If you have SyncSort) or DFSORT forum based on the product you have. Keep this in mind next time when you start a new topic.
I think this topic has been discussed before many times. Try SEARCHing the forum for working examples. |
|
| Back to top |
|
|
venkatesh83be
New User
Joined: 10 Aug 2009
Posts: 12
Location: Chennai
|
|
|
|
HI ksank01,
Did you get a solution for ur query... |
|
| Back to top |
|
|
venkatesh83be
New User
Joined: 10 Aug 2009
Posts: 12
Location: Chennai
|
|
|
|
Hi ksank01,
You can achieve this in 2 SORT steps as in attached doc.. |
|
| Back to top |
|
|
Escapa
Senior Member
Joined: 16 Feb 2007
Posts: 1399
Location: IL, USA
|
|
|
|
Hi venkatesh83be,
Its very simple to copy-paste your code here instead of taking print screen and attaching as document.
Copy paste with using code tag makes is readable.
Please see the way output is required and also it does not required two steps to do so..
Hi ksank01,
Solution for such requirement is already posted on this forum so many times.
below step will give you desired result.
| Code: |
//S1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD *
AAAOO XHJXK
AAAOO DHUDJ
AAAPP KJHKJ
BBBOO ASLKO
BBBPP ASKJAD
BBBPP GHLKDJF
/*
//SORTOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=(1,5,CH,A)
OUTFIL REMOVECC,NODETAIL,
SECTIONS=(1,5,TRAILER3=(1,5,COUNT=(M10,LENGTH=2)))
/*
|
|
|
| Back to top |
|
|
Arun Raj
Moderator
Joined: 17 Oct 2006
Posts: 2481
Location: @my desk
|
|
|
|
| Quote: |
| it does not required two steps to do so |
venkatesh83be,
And the code posted will NOT give the desired results if the count exceeds single digit. |
|
| Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
venkatesh83be
Please do not post attachments as not everyone is permitted to download / open them. |
|
| Back to top |
|
|
venkatesh83be
New User
Joined: 10 Aug 2009
Posts: 12
Location: Chennai
|
|
|
|
Hi friends,
Hmm sure, will post hereafter based on your comments... |
|
| Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
If you have DFSORT, try this
| Code: |
//ICETOOL1 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//INFILE DD DSN=Your input dataset,DISP=SHR
//OUFILE DD SYSOUT=*
//TOOLIN DD *
OCCURS FROM(INFILE) LIST(OUFILE) NOHEADER ON(Start,Length,Format) ON(VALCNT)
/* |
|
|
| Back to top |
|
|
|
|
