例
000001 IDENTIFICATION DIVISION.
000002 CLASS-ID. C5705.
000003 ENVIRONMENT DIVISION.
000004 CONFIGURATION SECTION.
000005 IDENTIFICATION DIVISION.
000006 OBJECT.
000007 PROCEDURE DIVISION.
000008 IDENTIFICATION DIVISION.
000009 METHOD-ID. M1.
000010 DATA DIVISION.
000011 WORKING-STORAGE SECTION.
000012 01 WOBTDT OBJECT REFERENCE C5705.
000013 PROCEDURE DIVISION.
000014 INVOKE SELF "NEW" RETURNING WOBTDT.
000015 END METHOD M1.
000016 END OBJECT.
000017 END CLASS C5705.
P5705.cob (14) : JMN5705I-S 'NEW'メソッドを呼び出す場合，INVOKEの直後の一意名はクラス名，デリゲート名，または定義済みオブジェクト一意名SUPERのいずれかでなければなりません．INVOKE文を無効とします．
詳細な説明
NEWメソッド(コンストラクタ)を定義する場合，スタティックメソッドではなく，オブジェクトメソッドとして定義します．
しかし，通常のオブジェクトメソッドと異なり，呼び出すオブジェクトとしてクラス名等の型の名前を指定して呼出します．
例外として，NEWメソッドの定義中では定義済みオブジェクト一意名SUPERを指定して呼び出すこともできます．