1. 導入：なぜアクセス方法が重要なのか
COBOLのプログラムで、大量のデータを配列（表）から読み書きする際、「なんとなく添字を使っている」という方は多いのではないでしょうか。実は、添字（Subscript）と指標（Index）の仕組みを理解して使い分けるだけで、プログラムの実行速度は劇的に向上します。特に数万件を超えるような大規模なデータ処理では、この小さな差が「処理時間」という大きな成果となって現れます。
2. 基礎知識：添字と指標の仕組み
COBOLにおける「表引き」には、大きく分けて2つの方法があります。
添字 (Subscript):
一般的な整数の数値項目です。例えば「TABLE-1(I)」と書いたとき、コンピュータは毎回「（I-1）× 要素のサイズ」という計算を行い、メモリ上のどこにあるかを探し出します。直感的ですが、ループ処理のたびに計算が発生するため、負荷がかかります。
指標 (Index):
表専用の特殊なメモリ領域です。指標は、あらかじめメモリの「相対アドレス」を保持しています。そのため、アクセス時に乗算を行う必要がなく、コンピュータにとって非常に効率の良い参照が可能です。
3. 実装/解決策：指標を活用するための手順
指標を使用するには、データ定義（WORKING-STORAGE SECTIONなど）で「INDEXED BY」句を使用して指標名を宣言する必要があります。添字とは異なり、指標の値は直接「MOVE」文で変更することはできません。値を操作する場合は「SET」文を使用するのがルールです。
4. サンプルプログラム
以下は、指標を使用した高速なデータアクセスの例です。
IDENTIFICATION DIVISION.
PROGRAM-ID. INDEX-SAMPLE.
DATA DIVISION.
WORKING-STORAGE SECTION.
- 指標（IDX）を定義します
01 TABLE-DATA.
05 ITEM-VAL PIC X(10) OCCURS 100 TIMES INDEXED BY IDX.
01 I PIC 9(3).
PROCEDURE DIVISION.
MAIN-PROCEDURE.
- SET文で指標を初期化（先頭へ）
SET IDX TO 1.
- 100件のデータを順次処理
PERFORM 100 TIMES
- 指標を用いた高速アクセス
DISPLAY “値は: ” ITEM-VAL(IDX)
- SET文で次の要素へ移動
SET IDX UP BY 1
END-PERFORM.
STOP RUN.
5. 応用・注意点：現場での鉄則
現場で活用する際のポイントを2点お伝えします。
・SET文を忘れない:
添字なら「ADD 1 TO I」と書けますが、指標に対しては必ず「SET IDX UP BY 1」や「SET IDX TO 1」を使ってください。うっかりMOVE文を使うと、コンパイルエラーや予期せぬ動作の原因になります。
・SEARCH文との組み合わせ:
指標の最大の強みは、COBOL標準の検索命令「SEARCH文」と組み合わせられる点です。SEARCH文は内部的にバイナリサーチ（二分探索）などの最適化が行われることが多いため、条件検索を行う際は、必ず指標（INDEXED BY）を定義しておくのが、ベテランの定石です。
小さな積み重ねですが、指標を使いこなすことは、COBOLエンジニアとしての「パフォーマンスに対する意識」を示す重要なスキルです。ぜひ次回の開発から意識してみてください。
コメント