+----------------------------------IBM 拡張----------------------------------+
BY VALUE 句は、別の BY VALUE または BY REFERENCE 句により指定 変更されるまで、その後に続くすべてのパラメーターに適用されます。
BY VALUE 句を使用して、内部浮動小数点または外部浮動小数点、日付、時刻、あるいはタイム・スタンプのデータ項目を渡すことができます。
+------------------------------End of IBM 拡張-------------------------------+