ページの先頭行へ戻る
NetCOBOL V11.0 メッセージ集
FUJITSU Software

2.5.86 JMN3117I-S

LINAGE句指定のあるファイル@1@は,OPEN文のEXTEND指定に記述できません.

埋め込みの説明

@1@ : ファイル名

例題

[C3117.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.  C3117.
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 LINAGE IS 50 LINES.
000010    01 REC-1 PIC X(80).
000011 PROCEDURE  DIVISION.
000012     OPEN EXTEND FILE-1.
000013     STOP RUN.

C3117.cob 12: JMN3117I-S LINAGE句指定のあるファイル'FILE-1'は,OPEN文のEXTEND指定に記述できません.