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

2.4.536 JMN2912I-S

START文の@1@指定は,インデックスつき編成ファイル以外に指定できません.

埋め込みの説明

@1@ : USING.

例題

[P2912.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2912.
000003 ENVIRONMENT    DIVISION.
000004 INPUT-OUTPUT    SECTION.
000005 FILE-CONTROL.
000006     SELECT IXFILE1 ASSIGN TO SYS001
000007       ORGANIZATION   IS INDEXED
000008       RECORD KEY     IS WRKY1.
000009 DATA           DIVISION.
000010 FILE            SECTION.
000011 FD IXFILE1.
000012 01 IXF1REC.
000013   02 WRKY1     PIC X(2).
000014   02           PIC X(80).
000015 WORKING-STORAGE SECTION.
000016 01 WDAT        PIC X(2).
000017 PROCEDURE      DIVISION.
000018     START IXFILE1
000019        USING KEY EQUAL WRKY1
000020 END PROGRAM    P2912.

P2912.cob 19: JMN2912I-S START文のUSING指定は,インデックスつき編成ファイル以外に指定できません.

詳細な説明

インデックスつき編成ファイル(ASSIGN句のファイル識別名がI-名前)は,OSIV系システムの固有機能です.