サブルーチン名	実行可能ファイルの例	表示可能ファイルの例
W3SOURCE-TO-XARRAY	E3NAT2XA	E3NAT2XA

説明

指定されたライブラリから Natural ソースを単一の X-array に読み込みます。

パラメータ

1 W3LIBRARY    (A8) DYNAMIC BY VALUE   /* i /o : Natural Library ID
1 W3SOURCE     (A8) DYNAMIC BY VALUE   /* i /m : Source Name
1 W3OUTSRC-XA  (A/1:*) DYNAMIC         /*  o/o : Response Array
1 W3RESPONSE   (I4)                    /*  o/o : Response

呼び出し方法

PERFORM W3SOURCE-TO-XARRAY W3LIBRARY W3SOURCE W3OUTSRC-XA(*) W3RESPONSE