COBCH0578 PROGRAM-ID specified as literal