COBCH0552 Comment lines precede IDENTIFICATION DIVISION