例題
[P2252.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2252. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 WGRP. 000007 02 PIC S9(3). 000008 02 WOCC OCCURS 10 INDEXED BY IX1 000009 PIC 1(1) BIT. 000010 PROCEDURE DIVISION. 000011 END PROGRAM P2252.
P2252.cob 8: JMN2252I-S INDEXED BY指定のOCCURS句を持つ内部ブール項目には,SYNCHRONIZED句が必要です.SYNCHRONIZED句の指定があったものとみなします.
詳細な説明
内部ブール項目の,指標名を持つ繰り返しにおいては,SYNCHRONIZED句(SYNCHRONIZEDとSYNCは同義語です)を指定して,各表要素を固有の境界に合わせる必要があります.
翻訳を続行するためにSYNCHRONIZED句が指定されたものとみなして処理しますが,このときオブジェクトファイルや実行形式は生成されません.