IDENTIFICATION DIVISION.
PROGRAM_ID "XX".
ENVIRONMENT DIVISION
WORKING-STORAGE SECTION.
01 A PIC X.
01 B PIC X.
PROCEDURE DIVISION.
A05 SECTION
A05-000.
MOVE A TO B
STOP RUN.
ICAgICAgIElERU5USUZJQ0FUSU9OIERJVklTSU9OLgogICAgICAgUFJPR1JBTV9JRCAiWFgiLgogICAgICAgRU5WSVJPTk1FTlQgRElWSVNJT04KICAgICAgIFdPUktJTkctU1RPUkFHRSBTRUNUSU9OLgogICAgICAgMDEgQSBQSUMgWC4KICAgICAgIDAxIEIgUElDIFguCiAgICAgICBQUk9DRURVUkUgRElWSVNJT04uCiAgICAgICBBMDUgU0VDVElPTgogICAgICAgQTA1LTAwMC4KICAgICAgICAgICBNT1ZFIEEgVE8gQgogICAgICAgICAgIFNUT1AgUlVOLgogICAgICAgICAgIA==
prog.cob:11: Warning: File not terminated by a newline
prog.cob:2: Error: syntax error, unexpected WORD, expecting PROGRAM_ID