[open-cobol-list] Sort Failure with Records larger than 2023 bytes

[Franklin Ankum]

I found out that when using the Cobol "SORT" Statement with Sort Records lager than 2023 Bytes that the result is not Sorted.

 

When in my example Program the Sort Record has a size of 2024 Bytes (1994 bytes data + 30 bytes Key) i even get a segmentaion fault.

When i change the data size to 1995 bytes or more the Records are not sorted at all.

 

I not sure but i think that the "DB_PUT" in libcob/fileio.c is not being used correctly. Actually the key + data is being given to the API as a key.

 

Regards

Franklin Ankum          

 

sorttest.cbl
Description: Binary data