USAGE DISPLAY 添字の最適化例

次は、USAGE DISPLAY 添字を使用するコード例です。

  ...
 01 array   pic x occurs 20.
 01 array-index pic 9(5) value 2.
  ...
     move "a" to array(array-index).
  ...

BOUNDOPT を使用しないでプログラムをコンパイルすると、array-index の 5 桁すべてを使用して添字が評価されます。 BOUNDOPT を指定すると、20 の要素を持つ表のすべての要素の呼び出しに 2 桁しか必要ないため、array-index の下位 2 桁のみが使用されます。