Alternative COBOL program