MVS COBOL Sort Program

Successfully ported a working gnuCOBOL Sort program, that I probably ported from a DOS/VSE COBOL sort program I had written in the past, to MVS COBOL. At first, after fixing gnuCOBOL differences, I got “sort capacity exceeded” while trying to sort 50,000 records. I haven’t looked at why yet. Perhaps it is the 2314 DASD defined for sort work packs. Couldn’t even tell you the capacity or number of tracks/cylinders for that device off the top of my head. Anyway the goal was to successfully write/execute a MVS COBOL sort program so I just created and sorted 1000 records…and it worked! I guess I’ll have to talk to the Systems Programmer about the other problem : )

Sidenote: gnuCOBOL is pretty nice. In my 03/20/2019 post it sorted one million records by state and city and printed totals at a state control break in less than 3 seconds.