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