1. 導入
メインフレーム開発の現場において、プログラムの実行結果をログとして出力したり、読みやすい形式で帳票を作成したりする際、最も手軽で強力な手段が「STREAM I/O」です。RECORD I/Oがレコード単位の物理的な操作を重視するのに対し、STREAM I/Oはデータを「連続した文字のストリーム」として扱います。本稿では、PL/IにおけるSTREAM I/Oの基本から、現場でありがちなレイアウト崩れを防ぐためのTipsを解説します。
2. 基礎知識
STREAM I/Oは、GETステートメント（入力）とPUTステートメント（出力）を使用してデータの読み書きを行います。
最大の特徴は、データ型と文字列の「自動変換」です。例えば、数値型の変数をそのままPUTすれば、自動的に文字列に変換されて出力されます。また、出力形式として「LIST」「DATA」「EDIT」の3種類が用意されており、これらを使い分けることで、デバッグ用の簡易出力から、厳密な桁管理が必要な帳票まで対応可能です。
3. 実装/解決策
現場で最も注意すべきは「EDIT形式」の使用です。LIST形式は簡易的で便利ですが、項目間のスペースが可変であるため、帳票出力には不向きです。特定の桁に値を固定したい場合は、必ずEDIT形式で「フォーマット項目」を指定してください。
また、自動変換に頼りすぎると、意図しないパディング（空白埋め）や変換エラーが発生します。数値の桁数が想定を超える可能性がある場合は、あらかじめ「PICTURE句」を使用して編集定義を行うのが定石です。
4. サンプルプログラム
以下は、売上合計を固定桁数で整形して出力するサンプルです。COPY&PASTEして、環境に合わせてSYSPRINT等のDD定義を確認してください。
/ STREAM I/O サンプルプログラム /
TEST: PROCEDURE OPTIONS(MAIN);
DCL TOTAL_AMT FIXED DEC(9,2) INIT(12345.67);
DCL MSG_LABEL CHAR(10) INIT(‘合計金額:’);
/ LIST形式: 簡易出力（デバッグ向け） /
PUT FILE(SYSPRINT) LIST(‘DEBUG:’, TOTAL_AMT);
/ EDIT形式: 帳票レイアウトを固定する手法 /
/ F(10,2)は全体10桁、小数点以下2桁を意味する /
/ X(2)は2桁の空白を挿入 /
PUT FILE(SYSPRINT) EDIT(MSG_LABEL, TOTAL_AMT)(A, X(2), F(10,2));
END TEST;
5. 応用・注意点
注意点1：暗黙の変換によるパフォーマンス低下
大量のデータを処理するループ内でSTREAM I/Oを多用すると、型変換のオーバーヘッドが蓄積します。バッチ処理のメインロジックではRECORD I/Oを使用し、STREAM I/Oはあくまでログや帳票出力のみに限定するのが、メインフレーム技術者としての「作法」です。
注意点2：桁溢れへの対策
EDIT形式でフォーマット指定を行う際、数値が指定した桁数（例: F(5,0)など）を超えると、PL/Iは「アスタリスク()」を出力してエラーを通知します。運用監視ログでアスタリスクが並ぶ事態を防ぐため、出力対象の変数は最大値を見越した定義を心がけてください。
STREAM I/Oを正しく使いこなすことで、コードの可読性が向上し、保守性の高いレポート出力が可能になります。ぜひ日々の開発で活用してください。
コメント