汎用機COBOLのメモリ管理について

質問

汎用機COBOLのオンラインＰＧですが、明細データをＤＢから読み込んで、配列に入れていますが、９９％は３００件以下です。１％は３００件以上ですが、その場合１０００件以上になります。そこで、通常は３００の配列で処理をし、３００件を超えたら１１００の配列で処理をする様にして、メモリの使用を抑えようとしています。この場合、可変長配列を使用すれば、何の問題も無いのですが、自分が配属された時には、２つの固定長配列のＣＯＰＹ句を使用して、目的を達成しようとしていました。方法は、
(1)配列３００のＣＯＰＹ句をワークエリアに、配列１１００のＣＯＰＹ句をリンケージエリアに配置する。リンケージエリアにＣＯＰＹ句を配置する理由は、何もしなければ、メモリを消費しないからです。
(2)配列３００のワークエリアを初期化して、そのアドレスをリンケージエリアの配列１１００にセットする。この時点では、ワークエリアとリンケージエリアで配列３００分のメモリアドレスを共有する。
(3)共通サブルーチンに(2)のアドレスを渡し、明細を取り込む。１１００を超えた場合は、アドレスを取り直して、返却する。
(4)メインＰＧ側で、返却されたアドレスをリンケージエリアの配列１１００のエリアにセットし直す。
(5)判定や計算をする場合は、リンケージエリアの配列１１００の項目名を使用する。
以上が、大まかな処理の流れです。
そこで、疑問なのが明細が３００件未満の場合です。使用しているメモリの場所は、ワークエリアの配列３００とリンケージエリアの配列１１００とは、同じワークエリアのメモリアドレスになるので、どちらのＣＯＰＹ句で処理しても、同じ結果になります。この時、配列３００分のメモリしか使用していない事になっていますが、判定や計算には配列１１００の項目名を使用しています。そこで疑問なのは、アドレスセットだけなら問題無いにしても、配列１１００の項目を処理に使用した時点で、配列１１００分のメモリが確保されてしまうのではないかという事です。つまり、節約しているつもりが、配列１４００分のメモリを浪費しているのではないかという疑問です。配列３００の場合と配列１１００の場合とで、ＰＧを完全に二重化すれば問題は無いとおもいますが、メーカーの担当エンジニアは問題無いと言っているのですが、誤解が有るような気がしてなりません。どなたか、解る方がいらっしゃいましたら、ご教示頂けると幸いです。どうぞよろしくお願い致します。

回答No.5

maiko04

メインのリンケージエリアは実メモリーではありません。
サブプログラムにあるデータエリアを指しています。

＞３００件以内の場合で～
３００件以内の場合はサブを呼びませんからサブの１１００のメモリーは
ありません。
１１００番目の項目はプログラム内か、はたまた別のプログラム内かの
アドレスを指しています。

＞記憶保護例外等の異常終了はしません
これはコンパイラーやOSが判定していなければ起こりえません。
０番目であってもアクセスはできます。
読み込みに問題は出ません。
書き換えてみてください。どこかがおかしくなりますからｗ。（超危険）

補足

度々の回答、ありがとうございます。
通常、リンケージエリアはサブＰＧ側に設定されると思いますが、今回の場合、親ＰＧ側にリンケージエリアが設定されていますので、サブＰＧは無関係なのではないかと思います。オンラインＰＧなので、オンラインＰＧ間でデータの受渡をするＳＰＡの領域がリンクの相手先と考えられます。アドレスを設定しない状態で、いきなりデータの転送をしても何の問題も起きていません。普通に書込みと読出しができています。なので、書込みをした時点で、おそらくＳＰＡにメモリが取られているのではないかと思いますが、ＩＦ文とか計算処理による参照のみとかの場合は、ちょっと判りませんが、そこの所の確認ができればと思っています。