こんにちは。メインフレームの世界へようこそ。
Javaの`substring()`メソッドやCOBOLの`MOVE`による部分転送に慣れていると、PL/Iの`SUBSTR`関数に出会ったとき、少し「魔法」のように感じるかもしれませんね。
PL/Iは、1960年代に「科学技術計算のFORTRAN」と「事務処理のCOBOL」のいいとこ取りを目指して生まれた言語です。そのため、メモリ操作において非常に強力かつ、時に少しだけ危険な「特権」を持っています。今日は、その中でも特に強力な`SUBSTR`の左辺値としての振る舞いについて、現場の知見を交えて紐解いていきましょう。
—
1. SUBSTR関数は「切り出す」だけじゃない？
通常、`SUBSTR(文字列, 開始位置, 長さ)` と書けば、その名の通り文字列から一部分を「切り出す」関数として使いますよね。
1
DCL NAME CHAR(10) INIT(‘IBM-MAINFRAME’);
DCL PART CHAR(3);
/ NAMEの1文字目から3文字を切り出してPARTに代入 /
PART = SUBSTR(NAME, 1, 3);
ここまでは他の言語と変わりません。しかし、PL/Iの真骨頂は、この関数を代入文の「左側（左辺）」に置いたときに発揮されます。
左辺値としてのSUBSTR
PL/Iでは、`SUBSTR`を左側に置くと、それは「関数」ではなく「メモリ上の特定の場所（アドレス）を指し示すポインタのようなもの」として機能します。
1
/ NAMEの4文字目から3文字分を’XYZ’で上書きする /
SUBSTR(NAME, 4, 3) = ‘XYZ’;
このコードを実行すると、`NAME`の中身は `’IBMXYZFRAME’` に書き換わります。新しい変数を作って連結するような冗長な処理は不要です。メモリ上の実体を直接書き換える、これがPL/Iの流儀です。
—
2. なぜ「境界外アクセス」が怖いのか？
ここで初心者が一番ハマりやすいのが、「宣言した範囲を超えた書き換え」です。
PL/Iのコンパイラは、基本的にはプログラマの意図を尊重します。「あなたはここを書き換えたいと言ったんだね、分かった」というスタンスです。そのため、`DCL`で宣言したサイズを超えて`SUBSTR`で無理やり書き込もうとすると、隣接するメモリ領域を破壊してしまう恐れがあります。
例：やってはいけない境界越え
1
DCL BUFFER CHAR(5) INIT(‘ABCDE’);
/ 4文字目から5文字分を書き換える指示 /
/ 4文字目からスタートして5文字分は、BUFFERの範囲(1-5)を突き抜けてしまいます /
SUBSTR(BUFFER, 4, 5) = ‘12345’;
このようなコードを書くと、`BUFFER`の後ろに続く別の変数や、最悪の場合はシステム制御ブロックまで書き換えてしまい、プログラムが異常終了（ABEND）したり、原因不明のデータ化けを引き起こしたりします。
現場の教訓：
「PL/Iはメモリの番地を直接叩けるほど自由度が高い。だからこそ、代入する長さには常に最新の注意を払うこと。不安なら、事前に`LENGTH`関数でチェックを入れるのがプロの作法です。」
—
3. なぜこんな「危ない仕様」があるの？
「Javaのように安全に管理してくれればいいのに」と思われるかもしれません。しかし、これには理由があります。
メインフレームの基幹システムでは、1秒間に何万件というトランザクションを処理します。新しい領域をメモリ上に確保してコピーし直すコスト（オーバーヘッド）を極限まで減らすために、「今あるメモリの場所をそのまま書き換える」という手法が、パフォーマンスを劇的に向上させるのです。
この「ハードウェアに近い場所で、効率を最大化する」という考え方が、PL/Iが長年生き残ってきた理由でもあります。
—
まとめ：怖がらずに、でも慎重に
PL/Iの`SUBSTR`は、単なる文字列操作ツールではなく、「メモリを直接編集するカミソリのようなツール」だとイメージしてください。
1. 右辺なら： 文字列を抽出する安全な関数。
2. 左辺なら： メモリを直接書き換える強力な命令。
3. 注意点： 常に「宣言した領域内に収まっているか？」を意識すること。
最初は難しく感じるかもしれませんが、この「メモリのどこを触っているか」を意識できるようになると、あなたはもう立派なメインフレーム・アーキテクトの卵です。
もし実務のコードで不可解な挙動に出会ったら、まずは`DCL`のサイズと`SUBSTR`の長さが一致しているか、指差し確認してみてください。それだけで、ほとんどのトラブルは防げますよ。
それでは、次回の記事では「`DEFINED`属性を使ったメモリの重ね合わせ」という、さらにディープな世界をご案内します。お楽しみに！
