IBM has announced Enterprise COBOL 5.1, which will generate object code according to the architecture level you specify.
See http://www-01.ibm.com/common/ssi/ShowDoc.wss?docURL=/common/ssi/rep_ca/9/877 /ENUSZP13-0179/index.html <http://www-01.ibm.com/common/ssi/ShowDoc.wss?docURL=/common/ssi/rep_ca/9/87 7/ENUSZP13-0179/index.html&lang=en&request_locale=en> &lang=en&request_locale=en David de Jongh
