IBM Extension
IBM Extension

形式 5 - ポインター・データ項目

形式 5 の SET ステートメントが実行されると、 受け入れフィールド の現行値が送り出しフィールドに含まれるアドレス値によって置き換えら れます。

構文図を読む構文図をスキップする
SET ステートメント - 形式 5

        .------------------------------.   
        V                              |   
>>-SET----+-ID-4---------------------+-+------------------------>
          '-ADDRESS OF--ID-5---------'     

>--TO--+-ID-6---------------------+----------------------------><
       +-ADDRESS OF--ID-7---------+   
       +-NULL---------------------+   
       '-NULLS--------------------'   

ID-4
受け入れフィールド。

これは、USAGE IS POINTER として記述されていなければなりません。

ADDRESS OF ID-5
受け入れフィールド。

これは ADDRESS OF 特殊レジスターです。

リンケージ・セクションで定義されたレベル 01 またはレベル 77 の項目でなければなりません。 TO 句で指定されたオペランドの値に設定されます。 添え字付けまたは参照変更することはできません。

ID-6
送り出しフィールド。

これは、USAGE IS POINTER として記述されていなければなりません。

プログラム自体の作業用ストレージ・セクション、ローカル・ストレージ・セクションまたはファイル・セクション内のアドレスが入っていてはなりません。

ADDRESS OF ID-7
送り出しフィールド。

データ部のセクションのレベル 66 または 88 以外の項目でなければなりません。

ADDRESS OF ID-7 には、ID の内容ではなく、そのアドレスが入ります。 ID-7 は、添え字付けまたは参照変更 (あるいはその両方) が可能です。

NULL、NULLS
送り出しフィールド。

受け入れフィールドを、無効なアドレスの値を含むように設定します。

End of IBM Extension
End of IBM Extension