NetCOBOL for .NET V8.0 メッセージ集

2.4.164 JMN3278I-S

SEARCH ALL文のキー項目@1@または比較する対象のいずれかがP付き整数項目の場合，もう一方の作用対象は，英字，英数字，英数字編集，数字編集，文字定数およびZERO以外の表意定数であってはなりません．

引数の説明

@1@:

データ名

例

      000001 IDENTIFICATION  DIVISION.
      000002 PROGRAM-ID.  C3278.
      000003 ENVIRONMENT  DIVISION.
      000004 DATA  DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006 01   TBL.
      000007   02 X OCCURS 5 TIMES ASCENDING KEY IS A
      000008                INDEXED BY IX1.
      000009     03 A         PIC 9P.
      000010 PROCEDURE  DIVISION.
      000011     SEARCH ALL X
      000012     WHEN A(IX1) = "10"
      000013       CONTINUE
      000014     END-SEARCH.
      000015 END PROGRAM  C3278.
    

C3278.cob (12) : JMN3278I-S SEARCH ALL文のキー項目'A'または比較する対象のいずれかがP付き整数項目の場合，もう一方の作用対象は，英字，英数字，英数字編集，数字編集，文字定数およびZERO以外の表意定数であってはなりません．