例題
[P2945.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2945. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 TBL. 000007 02 TBL1 OCCURS 10 INDEXED BY IX. 000008 03 T-NO PIC 9(1). 000009 SCREEN SECTION. 000010 01 SC1 PIC 9(1) FROM T-NO(IX + 1.2). 000011 PROCEDURE DIVISION. 000012 END PROGRAM P2945.
P2945.cob 10: JMN2945I-S 指標名に続く+または-の直後は整数でなければなりません．次の認識できる句，段落，節または部まで無効になります．
詳細な説明
演算子が+のときは，演算子の後ろに指定した整数の値を，指標名の値(出現番号に対応する値)に加えた値が添字の値になります．演算子が-のときは，演算子の後ろに指定した整数の値を，指標名の値から引いた値が添字の値になります．
