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
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??