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

2.5.175 JMN3278I-S

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

埋め込みの説明

@1@ : データ名

例題

[C3278.cob]
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以外の表意定数であってはなりません.