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

2.4.378 JMN2607I-S

同時に実行を要求される@1@指定の@2@文を,複数指定することはできません.

埋め込みの説明

@1@ : エラーの原因となった語.

@2@ : USE ERROR,USE LABELまたはUSE BEFORE REPORTING.

例題

[P2607.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2607.
000003 ENVIRONMENT    DIVISION.
000004 INPUT-OUTPUT    SECTION.
000005 FILE-CONTROL.
000006     SELECT SQFILE1 ASSIGN TO SYS001.
000007     SELECT REPFILE ASSIGN TO SYS002.
000008 I-O-CONTROL.
000009 DATA           DIVISION.
000010 FILE            SECTION.
000011 FD SQFILE1.
000012 01 SQF1REC      PIC X(80).
000013 FD REPFILE
000014      REPORT IS REP1.
000015 WORKING-STORAGE SECTION.
000016 01 WFS1        PIC X(2).
000017 REPORT          SECTION.
000018 RD REP1 PAGE 66.
000019 01 DE-REC TYPE DE.
000020   02 LINE PLUS 1.
000021     03 COLUMN 1 PIC X(80) SOURCE SQF1REC.
000022 PROCEDURE      DIVISION.
000023 DECLARATIVES.
000024 FILE-ERROR-1 SECTION.
000025     USE BEFORE REPORTING DE-REC.
000026     DISPLAY "ERROR PROC-1".
000027 FILE-ERROR-2 SECTION.
000028     USE BEFORE REPORTING DE-REC.
000029     DISPLAY "ERROR PROC-2".
000030 END DECLARATIVES.
000031 END PROGRAM    P2607.

P2607.cob 28: JMN2607I-S 同時に実行を要求されるDE-REC指定のUSE BEFORE REPORTING文を,複数指定することはできません.

詳細な説明

USE文では,対象が所定の状態(入出力誤り発生・作成表示の直前など)になったときに実行するUSE手続きを指定します.同じ対象に対して,複数の異なるUSE手続きを同時に実行することはできません.