メインフレームの闇を照らす：PL/I `FIXED BINARY` 精度設計と `LIMITS` オプションの深淵
古参のメインフレーム・エンジニア諸君、日々お疲れ様である。
「なぜか本番で計算結果が合わない」「テスト環境では動いたのにバッチでアベンドする」。そんな夜、君たちが真っ先に疑うべきは、実はソースコードのロジックではなく、コンパイラが裏でこっそり決めている「数値の器のサイズ」かもしれない。
今日はPL/Iの根幹でありながら、意外と軽視されがちな `FIXED BINARY` の精度制御、そしてコンパイルオプション `LIMITS(FIXEDBIN)` の恐ろしさについて、現場の知見を交えて語ろうと思う。
—
1. FIXED BINARYの「デフォルト」という罠
PL/Iにおいて `DCL VAR FIXED BIN(15);` と書けば、それは半語（2バイト）の整数だと誰しもが知っている。しかし、単に `DCL VAR FIXED BIN;` と宣言した場合、その精度はどうなるか？
答えは、「コンパイルオプション（あるいはデフォルト設定）に依存する」だ。
これが厄介なのは、プロジェクトによってデフォルトの精度設定（例えば15ビットか31ビットか）が異なり、過去の資産を別の環境へ移行した瞬間に、今まで動いていた算術演算がオーバーフローを起こしたり、逆に予期せぬ桁落ちが発生したりする点にある。
なぜ `LIMITS(FIXEDBIN)` を意識すべきなのか
IBMコンパイラには `LIMITS(FIXEDBIN(15|31))` というオプションがある。これを安易に触ると、システム全体で定義済みの `FIXED BIN` 変数の振る舞いが一変する。
- 15を指定した場合: 最大値は32,767。計算途中でこれを超えると、容赦なく `FIXEDOVERFLOW` が発生する。
- 31を指定した場合: 最大値は約21億。現代のシステムならこちらが標準だが、レガシーなソースコードが「15ビットであることを前提に」書かれている場合、思わぬアベンドのトリガーになる。
—
2. 実践：安全なコーディングとONユニット制御
現場でトラブルを防ぐ鉄則は、「暗黙のデフォルトに頼らない」ことだ。変数の宣言には必ず精度を指定し、万が一のオーバーフローには `ONユニット` で備える。これが、バッチ改修で修羅場をくぐり抜けてきた先人の知恵である。
以下に、VSAMファイルを読み込み、計算結果を検証する基本的な構造を示す。
/i
/ —————————————————————— /
/ PROCEDURE: CALC_SAMPLE /
/ 目的: VSAM読み込みと精度の高い算術演算 /
/ —————————————————————— /
CALC_SAMPLE: PROCEDURE OPTIONS(MAIN);
/ 明示的な精度指定により、コンパイラ依存を排除する /
DCL WORK_VAL FIXED BIN(31) INIT(0);
DCL COUNTER FIXED BIN(15) INIT(0);
/ オーバーフロー発生時のハンドリング /
ON FIXEDOVERFLOW BEGIN;
PUT SKIP LIST(‘警告: 計算結果が許容範囲を超えました。’);
/ 必要に応じてダンプ出力や異常終了処理へ /
SIGNAL ERROR;
END;
/ サンプル処理: VSAM読み込みのループ想定 /
DO WHILE (EOF_FLAG = ‘0’);
CALL READ_VSAM_FILE;
/ BUILTIN関数による計算制御 /
WORK_VAL = WORK_VAL + INPUT_DATA;
COUNTER = COUNTER + 1;
/ 明示的な切り捨てや丸めはここで制御 /
/ TRUNC関数等を組み合わせるのが定石 /
END;
END CALC_SAMPLE;
—
3. 現場で役立つデバッグのコツ
もし君が担当しているバッチが、ある日突然 `SOC7` ではなく、計算系の異常で止まったら、以下の手順で切り分けてみてほしい。
1. コンパイルリストの確認:
リストの先頭に出力されるコンパイルオプションを確認せよ。`LIMITS` がどう指定されているか。それが設計書と整合しているか。
2. 中間変数の精度合わせ:
`FIXED BIN(15)` と `FIXED BIN(31)` の変数を演算する場合、PL/Iは高い方の精度へ自動的に引き上げる。この「暗黙の型変換」がメモリ消費や演算速度にどう影響するか、性能要件が厳しいバッチでは意識する必要がある。
3. ON条件の有効活用:
`ON FIXEDOVERFLOW` を適切に配置するだけで、どこで計算が破綻したかの追跡が格段に楽になる。面倒がらずに実装すること。
—
最後に：アーキテクトからの助言
「古い言語だから」と言ってPL/Iを侮ってはいけない。この言語は、ハードウェアの特性を極限まで引き出せるよう設計された、非常に論理的で強力なツールだ。
精度指定を疎かにすることは、エンジニアとしての「品質への責任」を放棄することと同義である。次にソースコードを開くとき、ぜひ自分の定義した変数が「何ビットの器」を持っているのか、一度立ち止まって確認してほしい。
その小さなこだわりが、深夜の緊急呼び出しを回避する唯一の道になるのだから。
何か具体的に「この計算ロジックで迷っている」という箇所があれば、いつでも持ち込んでくれ。一緒にコードを読み解こう。
