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

Sum the data with decimal using SORT


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

New User


Joined: 19 Apr 2007
Posts: 68
Location: India

PostPosted: Tue Jul 22, 2008 10:20 am
Reply with quote

Hi,

Please someone throw light on this
I have a inputfile in the below format

Input file

AA0001.75
AA0000.25
AA0000.15
BB0000.50
BB0000.75
CC0000.25

Output file

AA0002.15
BB0001.25
CC0000.25

I have to sumup the data of AA in 1 record, BB in 1 record and CC in 1 record.

Regards,
Mouli
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Tue Jul 22, 2008 9:09 pm
Reply with quote

Hello,

You can use the technique described in the "Sum a number with a decimal point" Smart DFSORT Trick at:

www.ibm.com/servers/storage/support/software/sort/mvs/tricks/
Back to top
View user's profile Send private message
sudhakar84

New User


Joined: 20 Jun 2008
Posts: 25
Location: chennai

PostPosted: Tue Jul 22, 2008 10:21 pm
Reply with quote

have u tried giving PD instead of ZD
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Tue Jul 22, 2008 11:03 pm
Reply with quote

Quote:
have u tried giving PD instead of ZD


Have you? If you did, you'd have found out that it results in an S0C7 abend.

Why would you possibly think that PD would work for a value of the form 'dddd.dd'? That is NOT a PD value (or even a ZD value). A positive 7-byte PD value looks like this in hex:

Code:

dddddddddddddC 


'dddd.dd' looks like this in hex:

Code:

FdFdFdFd4BFdFd


Do those look the same to you?

The internal representation of a PD value cannot have a decimal point. (The decimal point can be implied and added for external display.)

Dick has given a link to the correct Smart DFSORT Trick to handle this situation.

Posting misinformation without testing your "theory" really doesn't help anyone. We have two DFSORT developers answering questions in this Forum (myself and Kolusu) so we really don't need your "help".
Back to top
View user's profile Send private message
cvadlamudi

New User


Joined: 19 Apr 2007
Posts: 68
Location: India

PostPosted: Fri Jul 25, 2008 10:16 am
Reply with quote

Thanks a lot dick, it works fine for me.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Fri Jul 25, 2008 7:19 pm
Reply with quote

Good to hear it is working - thank you for letting us know icon_smile.gif

d
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 How to save SYSLOG as text data via P... All Other Mainframe Topics 4
No new posts Store the data for fixed length COBOL Programming 1
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 Extracting Variable decimal numbers f... DFSORT/ICETOOL 17
Search our Forums:

Back to Top