例
000001 IDENTIFICATION DIVISION.
000002 CLASS-ID. C1806.
000003 OBJECT.
000004 PROCEDURE DIVISION.
000005 METHOD-ID. GET PROPERTY P1806 AS NC"ＡＡＡＡ１ＢＢＢＢ２
000006- "ＣＣＣＣ３ＤＤＤＤ４
000007- "ＥＥＥＥ５ＦＦＦＦ６
000008- "ＧＧＧＧ７ＨＨＨＨ８
000009- "ＩＩＩＩ９ＪＪＪＪ０
000010- "ＫＫＫＫ１ＬＬＬＬ２
000011- "ＭＭＭＭ３ＮＮＮＮ４
000012- "ＯＯＯＯ５ＰＰＰＰ".
000013 DATA DIVISION.
000014 LINKAGE SECTION.
000015 01 PRM USAGE BINARY-LONG.
000016 PROCEDURE DIVISION RETURNING PRM.
000017 END METHOD.
000018 END OBJECT.
000019 END CLASS C1806.
000020
C1806.cob (5) : JMN1806I-S 外部名が最大長を超えています．先頭から最大長までを外部名とみなします．
詳細な説明
プロパティメソッドに指定された外部名には，コンパイラがプレフィクス(get_，set_)を付加します．そのため，プレフィクスを含めて160バイト内で記述してください．