Comparing Signed Packed decimal and packed decimal

Virendra Shambharkar · New User Joined: 26 Aug 2015 Posts: 55 Location: India

Hi,

We are trying to compare same field having same values across 2 different files as follows

1. File 1- defined as 4/P ( COMP-3 PIC 9(7))
2. File 2 - defined as 4/PS ( COMP-3 PIC S9(7))

but we are getting incorrect results while comparing. Can you please advise what should be a correct sort card for comparing this.

Thanks,
Virendra

expat · Posted: Wed Nov 14, 2018 12:32 pm

Unfortunately, psychic day was Monday this week .............. so

Define "incorrect results"

What sort card have YOU tried, please post your code, the expected results and the actual results.
And ... Don't forget to use the code tags

Don't forget any of the other base information needed, the release level of your sort product, the RECFM & LRECL of your input / output datasets, field positions, lengths and data formats.
What exactly should happen for a field match and what happens for a mismatch.

Without any useful information, or in this case - any information - how can you possibly expect any useful information back

sergeyken · Posted: Thu Nov 15, 2018 6:46 pm

1) COMP-3 in IBM COBOL is always compiled to machine-supported signed decimal packed.
2) if you need any meaninful advice, then please, provide any meaningful info: what exactly you tried to do, and what exactly is incorrect??