例題
[P2227.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2227. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 WGRP. 000007 02 WDPEND PIC S9(4) BINARY. 000008 02 WNC CHARACTER TYPE MODE-1. 000009 03 PIC N(10) 000010 PRINTING POSITION 10. 000011 02 WOCC OCCURS 10 DEPENDING ON WDPEND. 000012 03 PIC N(10). 000013 PROCEDURE DIVISION. 000014 END PROGRAM P2227.
P2227.cob 6: JMN2127I-S CHARACTER TYPE句が指定された項目を含むレコード記述中に,OCCURS DEPENDING ON句を持つ項目を含むことはできません.
P2227.cob 6: JMN2227I-S PRINTING POSITION句は,OCCURS DEPENDING ON句を含むレコード記述中に指定できません.