例題
[P2143.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2143. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SQFILE1 ASSIGN TO SYS001. 000007 SELECT SQFILE2 ASSIGN TO SYS001 000008 PADDING CHARACTER IS WPD. 000009 I-O-CONTROL. 000010 DATA DIVISION. 000011 FILE SECTION. 000012 FD SQFILE1. 000013 01 SQF1REC. 000014 02 WPD PIC X(1). 000015 02 PIC X(80). 000016 FD SQFILE2. 000017 01 SQF2REC. 000018 02 PIC X(80). 000019 WORKING-STORAGE SECTION. 000020 PROCEDURE DIVISION. 000021 END PROGRAM P2143.
P2143.cob 8: JMN2143I-S PADDING CHARACTER句のデータ名は，ファイル節および報告書節で定義してはなりません．
詳細な説明
このコンパイラでは，PADDING CHARACTER句は注釈とみなされます．
