引数の説明
エラーの原因となった文,句,指定を現す予約語. |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2772.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT SQFILE1 ASSIGN TO SYS001.
000007 I-O-CONTROL.
000008 DATA DIVISION.
000009 FILE SECTION.
000010 FD SQFILE1
000011 RECORDING MODE IS V
000012 BLOCK CONTAINS 80 CHARACTERS.
000013 01 SQF1REC.
000014 02 PIC X(80).
000015 WORKING-STORAGE SECTION.
000016 01 WFS1 PIC X(2).
000017 PROCEDURE DIVISION.
000018 END PROGRAM P2772.
P2772.cob (10) : JMN2772I-I このシステムでは,'BLOCK CONTAINS'は注釈扱いです.