Working cobol application