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

2.8.127 JMN9931I-E

(@1@)OSIVシステムでは,START文のこの比較演算子はサポートしていません.

埋め込みの説明

@1@ : GSS,GSW

例題

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

P9931.cob 18: JMN9931I-E (GSS)OSIVシステムでは,START文のこの比較演算子はサポートしていません.