例題
[P2144.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2144. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SQFILE1 ASSIGN TO SYS001 000007 PADDING CHARACTER IS WPD. 000008 I-O-CONTROL. 000009 DATA DIVISION. 000010 FILE SECTION. 000011 FD SQFILE1. 000012 01 SQF1REC. 000013 02 PIC X(80). 000014 WORKING-STORAGE SECTION. 000015 01 WPD PIC 9(1). 000016 PROCEDURE DIVISION. 000017 END PROGRAM P2144.
P2144.cob 7: JMN2144I-S PADDING CHARACTER句のデータ名は,英数字または集団項目でなければなりません.
詳細な説明
このコンパイラでは,PADDING CHARACTER句は注釈とみなされます.