Help in sort compare for Packed decimal

cvishu · Active User Joined: 31 Jul 2007 Posts: 136 Location: india

how to compare two comp3 field with dif length

Eg 9(5)v(3) and 9(4)v(4)

if the data is 90.000 and 9.0000 its coming as matchd record for comparison in sort using Include cond(1,5,pd,eq,6,5,pd)

senjay · Active User Joined: 10 May 2007 Posts: 147 Location: India

Hi,

I can think of two step solution.

a) Bring both 9(5)v(3) and 9(4)v(4) to readable format of same length using the required EDIT MASK pattern of DFSORT. For ex, If your file LRECL is 80, Keep these readable format values from 81st position.
b) Then have your comparison based on these two values. While writing it in the output file, OUTREC to your original file length, which is 80 in this ex.

May be someone else or Frank can provide a simpler solution.

cvishu · Active User Joined: 31 Jul 2007 Posts: 136 Location: india

thanks senjay, i tried the same..was hoping to get a simpler solution here

dick scherrer · Posted: Fri May 22, 2009 9:38 pm

Hello,

Both fields have exactly the same value. . .

Keep in mind that the decimal points are implied, not actual. There is no "scaling" in a packed-decimal field - it is just some digits and a sign.

"Extra" work is needed to compare them.

Frank Yaeger · Posted: Fri May 22, 2009 10:03 pm

cvishu · Active User Joined: 31 Jul 2007 Posts: 136 Location: india

i want 01234.123 to compare equal to 1234.1231,, in Jcl can u help Frank?

cvishu · Active User Joined: 31 Jul 2007 Posts: 136 Location: india

also will inrec execue befor/after include?

Frank Yaeger · Posted: Sun May 24, 2009 6:01 am

Looking at my question again and your answer, I guess I wasn't clear enough. I still don't know if you want to truncate the last digit of the 4 decimal place number or round it up/down. So let me try again - answer all questions below:

1) Do you want 01234.123 to compare equal to 1234.1231?
2) Do you want 01234.123 to compare equal to 1234.1235?
3) Do you want 01234.123 to compare equal to 1234.1239?
4) Do you want 01234.124 to compare equal to 1234.1235?
5) Do you want 01234.124 to compare equal to 1234.1239?

Also, what is the RECFM and LRECL of your input file?

cvishu · Active User Joined: 31 Jul 2007 Posts: 136 Location: india

frank i get u,.. i want to round off the second number and then compare..not truncate and compare..so 01234.124 shul not be = 1234.1235 and 01234.123 shuld be equal to 1234.1231.. also both the variable that i have are comp3 with sign

ur help is greatly appreciated

Frank Yaeger · Posted: Mon May 25, 2009 6:28 am

You didn't answer all of my questions as I asked you to. I don't know what you mean by "round off". Do you want 0.5 to be rounded up or down?

Again:

1) Do you want 01234.123 to compare equal to 1234.1231?
2) Do you want 01234.123 to compare equal to 1234.1235?
3) Do you want 01234.123 to compare equal to 1234.1239?
4) Do you want 01234.124 to compare equal to 1234.1235?
5) Do you want 01234.124 to compare equal to 1234.1239?

And since you say your values can be positive or negative:

6) Do you want -01234.123 to compare equal to -1234.1235?
7) Do you want -01234.124 to compare equal to -1234.1235?

Please answer all 7 questions so there won't be any ambiguity.

cvishu · Active User Joined: 31 Jul 2007 Posts: 136 Location: india

Ok , i meant rounded up ie 0.56 is considered as 0.6

1) Do you want 01234.123 to compare equal to 1234.1231? EQUAL
2) Do you want 01234.123 to compare equal to 1234.1235? NOT EQUAL
3) Do you want 01234.123 to compare equal to 1234.1239? NOT EQUAL
4) Do you want 01234.124 to compare equal to 1234.1235? EQUAL
5) Do you want 01234.124 to compare equal to 1234.1239? EQUAL

And since you say your values can be positive or negative:

6) Do you want -01234.123 to compare equal to -1234.1235? NOT EQUAL
7) Do you want -01234.124 to compare equal to -1234.1235? EQUAL

Frank Yaeger · Posted: Tue May 26, 2009 10:56 pm

You can use a DFSORT job like the following to do what you asked for. You never mentioned the RECFM and LRECL of your input file, so I assumed it's RECFM=FB and LRECL=80. The job can be changed appropriately for other attributes.

cvishu · Active User Joined: 31 Jul 2007 Posts: 136 Location: india

thnks frank