導入：なぜ「実行時の代入コスト」を気にする必要があるのか
メインフレームでのオンライン処理やバッチ処理において、パフォーマンスは常に最優先事項です。特に、プログラム起動時に毎回同じ初期値を設定する処理を、実行可能な命令として記述していませんか？もしそうなら、それは無駄なCPUリソースを消費しているかもしれません。今回は、プログラムの「ロード時」に値を確定させることで、実行時の代入コストをゼロにする「STATIC属性とINITIAL属性の組み合わせ」について解説します。
基礎知識：STATICとINITIALの役割
まず、PL/Iなどのメインフレーム言語における「記憶域クラス」の基礎を押さえましょう。
STATIC（静的記憶域）は、プログラムの実行開始から終了まで、その変数がメモリ上の固定アドレスに配置され続けることを意味します。通常の自動変数（AUTOMATIC）がサブプログラムの呼び出しごとに生成・破棄されるのと対照的です。
INITIAL（初期値）属性は、変数が確保された瞬間に値をセットする指示です。これらを組み合わせることで、コンパイラは実行形式（ロードモジュール）のデータセクションに最初から値を埋め込みます。つまり、プログラムがメモリにロードされた時点で値が確定しており、プログラム実行後に「代入処理」を行う必要が一切ないのです。
実装と解決策
この手法は、読み取り専用のマスタデータや、変換テーブル、フラグの初期化に最適です。特に、何千回とループする処理の中で「毎回初期化される必要のない配列」などに適用すると、目に見えてパフォーマンスが向上します。
サンプルプログラム
以下は、PL/Iでの実装例です。そのままコピーして、コンパイル後のロードモジュール構造を確認してみてください。
/ 処理開始時に毎回代入するのではなく、ロード時に値が確定する定義 /
DCL 1 TABLE_DATA STATIC,
3 ITEM_CODE(3) CHAR(4) INIT(‘A001’, ‘B002’, ‘C003’),
3 ITEM_VAL(3) FIXED BIN(15) INIT(100, 200, 300);
/ このように記述することで、実行時の代入命令を省略可能です /
/ 以下の処理は、すでにロード時になされているため不要です /
/
DO I = 1 TO 3;
ITEM_CODE(I) = … ;
END;
/
応用・注意点：現場で陥りやすい罠
この手法には、一つだけ大きな注意点があります。それは「STATIC属性の変数は、プログラム終了まで値が保持され続ける（前回の値を引き継ぐ）」という点です。
もし、プログラムを同一タスク内で再呼び出し（再入）する場合、前回の処理で値が書き換わっていると、次回の開始時に予期せぬ値が入っていることになります。読み取り専用のマスタデータとして使う分には安全ですが、状態を持つ変数として使う場合は、必ず初期化のタイミングに注意してください。
現代的な開発環境では、こうした定数はJSONやYAMLといった外部定義ファイルに切り出すのが主流です。しかし、メインフレームの世界では、ソースコード内に埋め込むこの手法が最も高速かつ安定して動作します。保守性とパフォーマンスのバランスを考慮し、ぜひ適材適所で活用してください。
コメント