PL/Iの深淵：ENDFILE制御と現代的マイグレーションへの警鐘
メインフレームのコンソールで「S0C7」の文字を見たとき、その背後に潜むデータの断片に思いを馳せたことはあるだろうか。PL/Iは、C言語のような柔軟性と、COBOLの堅牢なデータ処理能力を併せ持つ、実に野心的な言語だ。
今日は、多くのエンジニアが「なんとなく」で実装し、マイグレーション時に頭を抱える原因となる`ON ENDFILE`ユニットと、その制御フローの魔術について深く掘り下げてみたい。
1. 予約語なき自由と、それがもたらす罠
PL/Iの特筆すべき点は、厳密な意味での「予約語」が存在しないことだ。`IF`や`THEN`さえも、文脈によって変数名として定義できてしまう。この自由度は強力だが、大規模改修の現場では諸刃の剣となる。
特に、JavaやC#への移行を検討する際、この「文脈依存の解釈」を機械的に変換しようとするツールは、ほぼ確実に沈没する。変数名とキーワードの衝突を許容するPL/Iのコンパイラ挙動を理解せずして、ロジックの移植は不可能だ。
2. ON ENDFILE：制御フローの制御
ファイル終端（EOF）の検知は、現代の言語ではイテレータや例外処理で行うのが一般的だが、PL/Iの`ON ENDFILE`は一種の「状態監視エージェント」に近い。
/i
/ ファイル読み込み終了の制御例 /
ON ENDFILE(SYSIN_FILE) BEGIN;
PUT SKIP LIST(‘データ終了を確認。後処理を開始します。’);
/ 擬似的な異常終了シミュレーション：デバッグ時に有用 /
/ SIGNAL ENDFILE(SYSIN_FILE); /
EOF_FLG = ‘1’B; / 状態フラグを立てて戻る /
END;
READ FILE(SYSIN_FILE) INTO(INPUT_RECORD);
DO WHILE(EOF_FLG = ‘0’B);
/ 実際のビジネスロジック処理 /
CALL PROCESS_DATA(INPUT_RECORD);
READ FILE(SYSIN_FILE) INTO(INPUT_RECORD);
END;
ここで重要なのは、`ON`ユニットが実行された後、制御がどこに戻るかだ。`SIGNAL`文で意図的にこのユニットをトリガーする場合、それは単なる例外処理ではなく、特定の「状態」を強制的に作り出す高度な制御フローとして機能する。
3. アベンド（ABEND）とデータ型の罠
基幹システムにおける最大の敵は、`S0C7`（データ例外）だ。特にパックデシマル（PIC S9(7)V99 COMP-3など）の内部表現において、符号（Sign）の部分が破壊されているケースは後を絶たない。
Javaに移行する際、`BigDecimal`への変換でこの「符号反転」や「無効な数値」をどうハンドリングするか。PL/I側で`ON CONVERSION`ユニットを適切に配置し、変換エラーを握りつぶすのではなく、例外ログとして出力する実装を今のうちに整えておくことが、移行プロジェクトを成功させるための唯一の近道だ。
現場の知恵：ポインタ操作によるメモリ破壊の追跡
PL/Iで`BASED`変数とポインタ（`PTR`）を多用しているコードは、メモリダンプの解析難易度を極限まで高める。
/i
DCL BUFFER CHAR(100) BASED(P);
DCL P PTR;
/
- ポインタPが指す先のメモリを動的に操作するが、
- 境界チェックが甘いと即座にストレージ保護例外(S0C4)を引き起こす。
- 移行前には必ず、ポインタ演算を行っている箇所を全数リストアップし、
- 単なるメモリコピーではなく、構造体としての型安全性を確保したコードへの
- リファクタリングを推奨する。
/
4. マイグレーションを成功させるために
レガシー移行を担当するアーキテクト諸氏に伝えたい。PL/IからJava/C#へ移行する際、最もコストがかかるのは「言語機能の差異」ではない。「PL/Iが暗黙的に行っていた膨大なエラー回避ロジック」の再構築だ。
- CICS環境との親和性: `EXEC CICS`コマンドが含まれる場合、非同期処理の挙動が大きく変わる。
- DB2埋め込みSQL: カーソルのクローズ処理と`ON ENDFILE`の整合性は、移行先でも厳密にエミュレートする必要がある。
PL/Iのコードは、時に難解で無骨だ。しかし、そこに刻まれた「データ整合性への執念」は、現代のフレームワークよりも遥かに強固である。移行は「古いものを捨てること」ではなく、「その堅牢な思想を、新しいアーキテクチャの上で再構築すること」であると忘れてはならない。
—
執筆後記:
もし皆さんの現場で、原因不明のバグがパックデシマルの符号に起因しているなら、一度コンパイラオプションの`LIMIT`や`CHECK`設定を疑ってみてほしい。最適化オプションが原因で、境界外アクセスがサイレントに無視されている可能性もある。PL/Iは、愛を持って接すれば、必ず答えを返してくれる言語だ。
