例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2836.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 WGRP CHARACTER TYPE PM-1.
000007 02 XITM PIC X(10).
000008 02 NITM PIC N(10).
000009 PROCEDURE DIVISION.
000010 END PROGRAM P2836.
P2836.cob (6) : JMN2836I-S CHARACTER TYPE句の呼び名は，未定義，多重定義または許されない機能名に対応づけられています．
詳細な説明
CHARACTER TYPE句に指定する呼び名は，環境部の特殊名段落で機能名と対応付けなくてはなりません．
MODE-1，MODE-2またはMODE-3を指定したCHARACTER TYPE句の呼び名は，以下の機能名のいずれかに対応づけます．
HSC，F0202，H0202，F0102，F0201
呼び名だけを指定したCHARACTER TYPE句の場合，その呼び名は，以下の文字列で始まる機能名に対応付けなければなりません．
GTA，GTB，GTC，GTD，GTX，GYA，GYB，GYC，GYD，GYX
TA，TB，TC，TD，TX，YA，YB，YC，YD，YX