DATA DIVISION.
PROGRAM-ID. TES.
WORKING-STORAGE SECTION.
01 aaa PIC 9(5).
PROCEDURE DIVISION.
A0-MAIN.
MOVE 00001 TO aaa.
DISPLAY aaa.
STOP RUN.
ICAgICAgIERBVEEgRElWSVNJT04uCiAgICAgICBQUk9HUkFNLUlELiBURVMuCiAgICAgICBXT1JLSU5HLVNUT1JBR0UgU0VDVElPTi4KICAgICAgIDAxICBhYWEgUElDIDkoNSkuCiAgICAgICBQUk9DRURVUkUgRElWSVNJT04uCiAgICAgICBBMC1NQUlOLgogICAgICAgICAgIE1PVkUgMDAwMDEgVE8gYWFhLgoJICAgRElTUExBWSBhYWEuCgkgICBTVE9QIFJVTi4=
prog.cob:8: Warning: File not terminated by a newline
prog.cob:1: Error: syntax error, unexpected DATA, expecting PROGRAM_ID