Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref

Author Message
shreevamsi

Active User

Joined: 23 Feb 2006
Posts: 305

 Posted: Fri May 25, 2007 5:07 pm    Post subject: Compare a COMP-3 Value in a sort HI, I was struck up while comparing a comp-3 value from the input file and based on that value, i should write it in one of the output file. I have a comp-3 value @ 19th position of declaretion S9(9)v99. Now i need to check the value. If the value is less that 1000,000, i should be writing to one output file. Else into another. could anybody help me with the sort card?? ~Vamsi

Frank Yaeger

DFSORT Moderator

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

 Posted: Sun May 27, 2007 12:42 am    Post subject: S9(9)v99 COMP-3 is a 6-byte PD value with two decimal places (implied). Externally an example of the value might be +123456789.01 or -123456789.01. You say you want to compare it to 1000,000. It's not clear exactly what constant you mean by that. Do you mean +001000000.00 or something else?
shreevamsi

Active User

Joined: 23 Feb 2006
Posts: 305

 Posted: Mon May 28, 2007 6:06 pm    Post subject: Re: Compare a COMP-3 Value in a sort Hi Frank, I am expecting a positive value. +001000000.00. But what if the value is a negative which is less than -10000. Can't we compare the value including the sign?
Frank Yaeger

DFSORT Moderator

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

Posted: Mon May 28, 2007 9:59 pm    Post subject:

 Quote: If the value is less that 1000,000, i should be writing to one output file. Else into another

Here's a DFSORT job to do that:

 Code: //S1    EXEC  PGM=ICEMAN //SYSOUT    DD  SYSOUT=* //SORTIN DD DSN=...  input file //OUT1 DD DSN=...  output file1 (< +001000000.00) //OUT2 DD DSN=...  output file2 (>= +001000000.00) //SYSIN    DD    *   OPTION COPY   OUTFIL FNAMES=OUT1,INCLUDE=(19,6,PD,LT,+00100000000)   OUTFIL FNAMES=OUT2,SAVE /*

 Quote: But what if the value is a negative which is less than -10000. Can't we compare the value including the sign?

PD values are signed. You can use a negative constant in the INCLUDE statement (-n).

If you're not familiar with DFSORT and DFSORT's ICETOOL, I'd suggest reading through "z/OS DFSORT: Getting Started". It's an excellent tutorial, with lots of examples, that will show you how to use DFSORT, DFSORT's ICETOOL and DFSORT Symbols. You can access it online, along with all of the other DFSORT books, from:

www.ibm.com/servers/storage/support/software/sort/mvs/srtmpub.html
 All times are GMT + 6 Hours
 Page 1 of 1

Search our Forum:

 Topic Author Forum Replies Posted Similar Topics sort records based on length exceeds ... maxsubrat DFSORT/ICETOOL 7 Wed Oct 04, 2017 4:48 pm JOINKEYS Paired and Unpaired Sort MFwhiz DFSORT/ICETOOL 4 Fri Sep 29, 2017 1:48 am File Aid tool to compare numeric data balaji81_k Compuware & Other Tools 2 Tue Sep 26, 2017 3:35 am Compare yesterday's date to the one o... migusd SYNCSORT 11 Fri Sep 22, 2017 11:35 pm Difference in SORT & ICETOOL Mohan Kothakota DFSORT/ICETOOL 5 Fri Sep 22, 2017 4:56 pm

 © 2003-2017 IBM MAINFRAME Software Support Division
 Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us