IBM Extension
IBM Extension

プロシージャー・ポインター・データ項目

プロシージャー・ポインター・データ項目は、USAGE IS PROCEDURE-POINTER として明示的に定義されます。

プロシージャー・ポインター・データ項目を指定すると、EQUAL および NOT EQUAL だけが関係演算子として使用できます。 比較において使用される 2 つのアドレスがどちらも同じ保管場所にある場合、オペランドは等しくなります。

この比較条件は、IF、PERFORM、EVALUATE、および SEARCH 形式 1 のステートメントの中で認められています。 しかし、SEARCH 形式 2 (SEARCH ALL) ステートメントでは認められていません。 それは、プロシージャー・ポインター・データ項目に適用できる、意味のある配列がないからです。

構文図を読む構文図をスキップする
プロシージャー・ポインター比較 - 形式

>>-+-ID-1--+--+----+--+-----+--+-EQUAL--+----+-+--------->
   +-NULL--+  '-IS-'  '-NOT-'  |        '-TO-' |   
   '-NULLS-'                   '-=-------------'   

>--+-ID-2--+--------------------------------------------><
   +-NULL--+   
   '-NULLS-'   
ID-1、ID-2
USAGE IS PROCEDURE-POINTER として記述する必要があります (詳しくは PROCEDURE-POINTER 句を参照)。
NULL(S)
他のオペランドが USAGE IS PROCEDURE-POINTER として定義されている場合に限り使用されます。 NULL=NULL は使用できません。
End of IBM Extension
End of IBM Extension