【入門編】FIXED BINARYの精度指定とコンパイラオプション – PL/Iの基本構文とデータ制御実践ガイド

メインフレームの世界へようこそ。JavaやCOBOLというモダンで堅実な言語を渡り歩いてきたあなたにとって、PL/Iは少し「掴みどころのない自由奔放な天才」のように見えるかもしれません。

今日は、そんなPL/Iの中でも、特に基幹システムの計算精度を左右する「FIXED BINARYの精度とLIMITSオプション」という、深淵かつ実用的なトピックを紐解いていきましょう。

—

Javaの`int`やCOBOLの`COMP-4`にあたるのが、PL/Iの`FIXED BINARY`です。これは「2進数で整数を扱うよ」という宣言です。

しかし、PL/Iは非常に柔軟（あるいは甘やかしてくれる）な言語なので、単に `DCL X FIXED BINARY;` とだけ書くと、コンパイラが「よし、ここは適当に扱っておくね」と気を利かせてしまいます。この「適当」が、実は後で大きな落とし穴になるのです。

PL/Iでは、`FIXED BINARY(p)` のように精度 `p` を指定できます。

この境界線を知らずに宣言すると、意図しないところでオーバーフローが起きたり、逆にCPUの処理効率が悪くなったりします。「PL/Iの計算精度は、メモリの無駄遣いと演算速度のトレードオフを握っている」と考えてください。

—

ここで登場するのがコンパイラオプションの `LIMITS(FIXEDBIN)` です。これは、「プログラム内で宣言されていないFIXED BINARYの精度をどう扱うか」を決定する、いわばプログラムの「安全装置」の設定です。

古いプログラムをマイグレーションする際、デフォルトの精度設定が現在の環境とズレていると、演算結果が微妙に変わる（あるいは例外が発生する）という「悪夢」を見ることになります。

LIMITS(FIXEDBIN(15, 31)): 一般的に推奨される設定です。「精度指定がないなら、15ビットか31ビットのどちらかを適切に選ぶよ」という、コンパイラの「忖度」を制御する設定です。

—

では、実際にどのように宣言するのがプロフェッショナルの作法なのか、例を見てみましょう。

/i
/ — プログラムの基本構造 — /
TEST_PROG: PACKAGE;

/ メインプロシージャの宣言 /
MAIN_PROC: PROCEDURE OPTIONS(MAIN);

/ 15ビット精度（効率重視） /
DCL COUNTER FIXED BINARY(15);

/ 31ビット精度（大きな金額や件数など） /
DCL TOTAL_AMOUNT FIXED BINARY(31);

COUNTER = 100;
TOTAL_AMOUNT = 2000000;

PUT SKIP LIST(‘計算を開始します…’);

/ 演算処理 /
TOTAL_AMOUNT = TOTAL_AMOUNT + COUNTER;

PUT SKIP LIST(‘結果:’, TOTAL_AMOUNT);

END MAIN_PROC;

END TEST_PROG;

—

「FIXED BINARY(31)と指定すれば良いのか？」と聞かれれば、基本的にはYesです。しかし、基幹システムでは、かつてのメインフレームが「いかに少ないメモリで高速に動くか」を競っていた時代の名残がコードのあちこちに散らばっています。

もし、修正対象のソースコードで精度が省略されていたら、まずはコンパイラオプションの `LIMITS` を確認してください。それが、「謎のバグ」を紐解く一番の近道です。

PL/Iは厳格に見えて、実は書き手の意図を汲み取ろうとする健気な言語です。精度を明示的に書くことは、コンパイラへの「命令」であると同時に、次にこのコードを読む未来の自分（あるいは同僚）への「誠実なメッセージ」でもあります。

一つずつ、ゆっくり紐解いていきましょう。メインフレームの世界で、あなたの新しいキャリアが輝くことを応援しています！