引数の説明
一意名 |
例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3135. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT FILE-1 ASSIGN TO S-SYS001. 000007 DATA DIVISION. 000008 FILE SECTION. 000009 FD FILE-1. 000010 01 REC-1 PIC X(121). 000011 WORKING-STORAGE SECTION. 000012 77 LCD-1 PIC XX. 000013 PROCEDURE DIVISION. 000014 WRITE REC-1 AFTER ADVANCING LCD-1. 000015 STOP RUN.
C3135.cob (14) : JMN3135I-S WRITE文のADVANCING指定の作用対象'LCD-1'は,整数項目でなければなりません.1行送りとみなされます.