1. 導入：なぜEXP関数が必要なのか
COBOLといえば事務処理やデータ集計のイメージが強いですが、実は金融システムや統計処理において「複雑な計算」を求められる場面も少なくありません。特に、金利計算や確率モデルを扱う際、e（ネイピア数：約2.718）のn乗を計算する必要が出てきます。これを自力で計算しようとすると非常に複雑なループ処理が必要になりますが、COBOLの「組込関数」であるEXP関数を使えば、たった一行で正確に算出できます。
2. 基礎知識：EXP関数とは？
EXP関数は、数学でいうところの「eのn乗（指数関数）」を計算するための機能です。
ここでいう「e」とはネイピア数と呼ばれる定数で、複利計算などで重要な役割を果たします。
- 自然対数（LOG関数）の逆関数である：もしLOG関数で求めた数値を元に戻したいときは、このEXP関数を使います。
- 用途：銀行の利息計算（連続複利）、在庫予測のシミュレーション、統計学における分布計算など。
3. 実装・解決策
COBOLでEXP関数を使う際は、COMPUTE文と組み合わせて使用するのが最も一般的でスマートな書き方です。
構文は以下の通りです。
COMPUTE 変数名 = FUNCTION EXP(引数).
この「引数」の部分に、乗数となる値を指定するだけで、計算結果が変数に代入されます。
4. サンプルプログラム
以下のコードは、実際にEXP関数を使って値を計算し、画面に表示するサンプルです。そのままコンパイルして実行してみてください。
IDENTIFICATION DIVISION.
PROGRAM-ID. EXP-SAMPLE.
DATA DIVISION.
WORKING-STORAGE SECTION.
- 計算結果を格納する変数（小数点を扱うためCOMP-3またはDISPLAY形式の数字で定義）
01 WS-VAL PIC S9(03)V99 VALUE 2.0.
01 WS-RESULT PIC S9(05)V999.
PROCEDURE DIVISION.
> eの2乗を計算してWS-RESULTに格納
COMPUTE WS-RESULT = FUNCTION EXP(WS-VAL).
> 結果を出力（e^2 ≒ 7.389）
DISPLAY “e の ” WS-VAL ” 乗の結果は: ” WS-RESULT.
STOP RUN.
5. 応用・注意点
現場のベテランとして、いくつかのアドバイスを伝授します。
・桁落ちに注意：EXP関数は非常に大きな値になりやすいため、受け皿となる変数のPIC句（桁数）が不足すると、実行時エラーや数値の切り捨てが発生します。計算結果がどの程度の大きさになるか事前に見積もっておきましょう。
・精度の管理：COBOLの計算精度は環境設定に依存します。科学技術計算のような極めて高い精度が必要な場合は、計算結果を扱う変数をCOMP-2（浮動小数点数）で定義することを検討してください。
・負の値の扱い：EXP(-n)は、1 / e^n と同じ意味になります。非常に小さい値になるため、結果を保持する変数の小数点以下の桁数（V999など）を十分に確保してください。
この関数を使いこなせれば、複雑な計算処理も怖くありません。ぜひ業務で活用してください！
コメント