The compiler would have rejected that, if I remember correctly. I'm not in the field of cobol myself, I learned it briefly in college ages ago.
Which part do you think would be rejected? This code is an example from the z/OS COBOL documentation--I'm quite sure it works.
Which part do you think would be rejected? This code is an example from the z/OS COBOL documentation--I'm quite sure it works.