引数の説明
エラーの原因となった文,句,指定を現す予約語. |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2764.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT SQFILE1 ASSIGN TO SYS001.
000007 DATA DIVISION.
000008 FILE SECTION.
000009 FD SQFILE1.
000010 01 SQF1REC.
000011 02 PIC X(80).
000012 WORKING-STORAGE SECTION.
000013 PROCEDURE DIVISION.
000014 WRITE SQF1REC POSITIONING 1
000015 END PROGRAM P2764.
P2764.cob (14) : JMN2764I-S このシステムでは,'POSITIONING'は使用できません.