RTNCODE-SIZE

特殊レジスタRETURN-CODEのサイズとメモリ内の桁合わせを指定する。

構文:

>>-.---.--RTNCODE-SIZE--"integer"----------><
   +-/-+

パラメータ:

integer

以下のいずれか 2 PIC S9（4）COMP:サイズ2バイト、2バイト境界に合わせられる。 4 PIC S9（9）COMP:サイズ4バイト、4バイト境界に合わせられる。 8 PIC S9（18）COMP:サイズ8バイト、8バイト境界に合わせられる。

属性:

省略値:	RTNCODE-SIZE"4"
段階:	構文チェック
$SET:	初期

依存性:

XOPEN を設定すると、RTNCODE-SIZE"4" が設定される。

P64 を設定すると、RTNCODE-SIZE"8" が設定される。

説明:

呼び出されるプログラムの RETURN-CODE が、呼び出しプログラムの RETURN-CODE よりも桁数が小さい場合は、呼び出されたプログラムから戻る値が、呼び出しプログラムの RETURN-CODE の下位のバイトに設定され、その他のバイトの内容は不定になる。例えば、4バイトのRETURN-CODEのプログラムが2バイトのRETURN-CODEのプログラムを呼び出すと、呼び出されたプログラムが戻す値には、4バイトのRETURN-CODEの下位2バイトが設定され、上位2バイトの内容は不定である。

呼び出されるプログラムの RETURN-CODE が、呼び出しプログラムの RETURN-CODE よりも桁数が大きい場合は、呼び出されたプログラムから戻る値の下位のバイトが、呼び出しプログラムの RETURN-CODE に設定され、上位のバイトの内容は失われる。例えば、4バイトのRETURN-CODEのプログラムが8バイトのRETURN-CODEのプログラムを呼び出すと、呼び出されたプログラムが戻す値には、8バイトのRETURN-CODEのうち下位4バイトが設定され、上位4バイトの内容は失われる。

他参照:

関連項目