IDENTIFICATION DIVISION.
PROGRAM-ID. SAMPLE.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
77 m PIC Z9 .
PROCEDURE DIVISION.
ACCEPT m
DISPLAY m
DISPLAY m
STOP RUN.
CUlERU5USUZJQ0FUSU9OIERJVklTSU9OLgoJUFJPR1JBTS1JRC4gU0FNUExFLgoKCUVOVklST05NRU5UIERJVklTSU9OLgoKCURBVEEgRElWSVNJT04uCglXT1JLSU5HLVNUT1JBR0UgU0VDVElPTi4KCTc3IG0gUElDIFo5IC4KCglQUk9DRURVUkUgRElWSVNJT04uCgkJQUNDRVBUIG0KCQkKCQlESVNQTEFZIG0KCQlESVNQTEFZIG0KCgkJU1RPUCBSVU4u
prog.cbl: 16: error: syntax error, on or before '.'
prog.cbl: 16: error: unknown or wrong statement, on or before '.'