例題
[P2926.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2926. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 SPECIAL-NAMES. 000006 PRINTING MODE PM1 FOR MOCS 000007 PRINTING MODE PM2 FOR SOCS. 000008 DATA DIVISION. 000009 WORKING-STORAGE SECTION. 000010 01 WGRP CHARACTER TYPE PM1 PM2 000011 DEPENDING ON WMODE. 000012 02 WDX PIC X(10). 000013 02 WDN PIC N(10). 000014 01 WMODE PIC S9(4). 000015 PROCEDURE DIVISION. 000016 END PROGRAM P2926.
P2926.cob 10: JMN2926I-S 複数の印字モード名を指定する場合，すべての印字モード名のFOR指定は同一でなければなりません．
詳細な説明
CHARACTER TYPE句で複数の印字モード名を指定する場合，すべての印字モード名のFOR指定(環境部の特殊名段落のPRINTING MODE句のFOR MOCS/FOR SOCS/FOR ALLの指定)は同一でなければなりません．
