例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P5760. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 REPOSITORY. 000006 CLASS SYSSTR AS "System.String". 000007 DATA DIVISION. 000008 WORKING-STORAGE SECTION. 000009 01 WSTR OBJECT REFERENCE SYSSTR. 000010 PROCEDURE DIVISION. 000011 SET WSTR TO WSTR :: "NEW" 000012 END PROGRAM P5760.
P5760.cob (11) : JMN5760I-S 行内呼出し中で'NEW'メソッドの呼出しに用いる一意名は,クラス名でなければなりません.行内呼出しは無効になります.
詳細な説明
呼び出すメソッド名が"NEW"のとき,行内呼出しの呼出し演算子(::)の左側の要素はクラス名でなければなりません.