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

2.5.121 JMN3169I-S

相対ファイルに対するSTART文のKEY指定には,RELATIVE KEY句で指定した項目以外は記述できません.

例題

[C3169.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.  C3169.
000003 ENVIRONMENT  DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006     SELECT FILE-1 ASSIGN TO SYS001
000007     ORGANIZATION IS RELATIVE
000008     ACCESS MODE IS SEQUENTIAL
000009     RELATIVE KEY IS REL-KEY.
000010 DATA  DIVISION.
000011 FILE SECTION.
000012   FD FILE-1.
000013    01 REC-1 PIC X(80).
000014 WORKING-STORAGE SECTION.
000015    77 REL-KEY  PIC 99.
000016    77 KEY-DATA PIC XX.
000017 PROCEDURE  DIVISION.
000018     START FILE-1 KEY IS = KEY-DATA.
000019     STOP RUN.

C3169.cob 18: JMN3169I-S 相対ファイルに対するSTART文のKEY指定には,RELATIVE KEY句で指定した項目以外は記述できません.