例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2944.
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.
000011 PROCEDURE DIVISION.
000012 END PROGRAM P2944.
P2944.cob (11) : JMN2944I-S 添字付けまたは部分参照の右括弧が指定されていません.次の認識できる句,段落,節または部まで無効になります.