引数の説明
一意名 |
例
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行送りとみなされます.