in cobol aphanumeric compare for var1 and var2

p_gandhi · Posted: Thu May 03, 2007 10:40 pm

Hi,
I need some help regarding alphanumeric comparison

If var1 = var2 (where var1 = ABCD, var2 = abcd)

when it's compare this value it's not supposed to be equal because one has caps and other is lower case.
What should I need to code in COBOL so It's compare like this

Thanks

Paresh Gandhi

dick scherrer · Posted: Thu May 03, 2007 10:47 pm

Hello,

You question is not clear - as posted the 2 will compare not equal (provided at execute time one is upper and the other lower case - they have different hex values). Is that not what you want?

p_gandhi · Posted: Fri May 04, 2007 6:45 pm

Let me give you some more detail so you guys can help me

I am working on one flat file where there are duplicates records are.
Now I have to remove those duplicates with this conditions

if var1 = PIC S9(13)V USAGE COMP-3. 1var
var2 = PIC S9(4) USAGE COMP. 2var
var3 = PIC X(30). 3var

now from the same file I have to find duplicates and remove it with this 3 keys, my yesterday's question was when I compare the var3 to var3 and if value are 'ABCD' and 'abcd' it's not have to match it has to count as a different record and not to raise the flag for the duplicates.

Thanks

William Thompson · Posted: Fri May 04, 2007 8:04 pm

ABCD is not the same as abcd, they are not equal.

dick scherrer · Posted: Fri May 04, 2007 8:14 pm

Hello,

From this

ashwinreddy · Posted: Fri May 04, 2007 8:59 pm

Hi,

Check if you have used FUNCTION UPPER-CASE before comparision.

Only above case the two values may be equal. Else it is not possible. Remember Cobol is case sensitive, i think you know it.

Cheers
Ashwin

dick scherrer · Posted: Tue May 08, 2007 3:16 am

Hello p_gandhi,

Do you now have a solution for your question?