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

2.4.398 JMN2654I-S

USE LABEL文に指定できるファイル'@1@'は順ファイル,直接編成ファイルおよび相対編成ファイルでなければなりません. '@1@'を無効とします.

埋め込みの説明

@1@ : エラーの原因となったファイル名.

例題

[P2654.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2654.
000003 ENVIRONMENT    DIVISION.
000004 INPUT-OUTPUT    SECTION.
000005 FILE-CONTROL.
000006     SELECT IXFILE1 ASSIGN TO SYS001
000007       ORGANIZATION IS INDEXED
000008       RECORD KEY RKEY.
000009 I-O-CONTROL.
000010 DATA           DIVISION.
000011 FILE            SECTION.
000012 FD IXFILE1 LABEL RECORD STANDARD.
000013 01 IXF1REC.
000014   02 RKEY      PIC X(8).
000015   02           PIC X(72).
000016 01 LREC        PIC X(80).
000017 WORKING-STORAGE SECTION.
000018 PROCEDURE      DIVISION.
000019 DECLARATIVES.
000020 ER1 SECTION.
000021     USE AFTER STANDARD ENDING FILE
000022         LABEL PROCEDURE ON IXFILE1.
000023 END DECLARATIVES.
000024 END PROGRAM    P2654.

P2654.cob 22: JMN2654I-S USE LABEL文に指定できるファイル'IXFILE1'は順ファイル,直接編成ファイルおよび相対編成ファイルでなければなりません.'IXFILE1'を無効とします.

詳細な説明

USE LABEL文は,OSIV系システムの固有機能です.