例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2920.
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 WELM PIC N(10)
000011 CHARACTER TYPE PM1 OR
000012 PM2.
000013 PROCEDURE DIVISION.
000014 END PROGRAM P2920.
P2920.cob (11) : JMN2920I-S OR指定のCHARACTER TYPE句は基本項目に指定できません．
詳細な説明
OR指定付きのCHARACTER TYPE句は，集団項目にだけ指定することができます．