+----------------------------------IBM 拡張----------------------------------+
SET ステートメントの形式 6 が実行されると、受け入れフィールドの現 行値が送り出しフィールドに含まれるアドレス値によって置き換えられます。
SET ステートメント - 形式 6 .------------------------------------------. V | >>-SET----プロシージャー・ポインター・データ項目-1-+------------> >--TO--+-プロシージャー・ポインター・データ項目-2--------------------+->< +-ENTRY--+-ID-1-----------------------------+--| LIBRARY 句 |-+ | '-+------------------+--リテラル-1-' | | '-| リンケージ句 |-' | +-NULL--------------------------------------------------------+ '-NULLS-------------------------------------------------------' リンケージ句: |--+------------------------------------------+-----------------| +-LINKAGE--+------+--+----+--+-環境名-1--+-+ | '-TYPE-' '-IS-' +-PROGRAM---+ | | '-PROCEDURE-' | +-PROGRAM----------------------------------+ '-PROCEDURE--------------------------------' LIBRARY 句: |--+---------------------------------+--------------------------| '-+----+--LIBRARY--+-ID-2-------+-' '-IN-' '-リテラル-2-'
USAGE IS PROCEDURE-POINTER として記述されていなければなりません。
LINKAGE TYPE 句は、プロシージャー・ポインター・データ項目が設定されるプログラムのタイプを指定するために使用されます。 個別にコンパイルされたプログラム・オブジェクト (*PGM) のアドレスまたはプログラム内のプロシージャーに設定できます。
IN LIBRARY 句は、i5/OS プログラム・オブジェクトにプロシージャー・ポインター・データ項目を設定する場合のみ有効です。 つまり、プログラムのリンケージは、SET ステートメントで暗黙または明示的に指定されなければなりません。
ID-2 およびリテラル-2 は *MONOPRC コンパイラー・オプションの影響を受けず、また、i5/OS 拡張名を含むことができます。
+------------------------------End of IBM 拡張-------------------------------+