例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2924.
000003 ENVIRONMENT DIVISION.
000004 CONFIGURATION SECTION.
000005 SPECIAL-NAMES.
000006 PRINTING MODE PM1 FOR SOCS.
000007 DATA DIVISION.
000008 WORKING-STORAGE SECTION.
000009 01 WDX PIC N(10)
000010 CHARACTER TYPE PM1.
000011 PROCEDURE DIVISION.
000012 END PROGRAM P2924.
P2924.cob (10) : JMN2924I-S FOR SOCS指定の印字モード名は,集団項目,英字,英数字,英数字編集,外部10進,外部ブール,外部浮動および数字編集項目にだけ指定できます.