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

2.3.196 JMN1319I-S

相対ファイル以外に,RELATIVE KEY句は指定できません.

例題

[C1319.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.     C1319.
000003 ENVIRONMENT     DIVISION.
000004 INPUT-OUTPUT    SECTION.
000005 FILE-CONTROL.
000006     SELECT INFILE ASSIGN TO SYS001
000007     RELATIVE KEY IS KEY1.
000008 DATA            DIVISION.
000009 FILE            SECTION.
000010 FD  INFILE.
000011 01  INREC.
000012   02  KEY1   PIC 9(4).
000013   02  BDDAT  PIC X(80).
000014 END PROGRAM C1319.

C1319.cob 7: JMN1319I-S 相対ファイル以外に,RELATIVE KEY句は指定できません.