例
000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C5759. 000003* 000004 IDENTIFICATION DIVISION. 000005 OBJECT. 000006 PROCEDURE DIVISION. 000007* 000008 IDENTIFICATION DIVISION. 000009 METHOD-ID. M5759. 000010 PROCEDURE DIVISION. 000011 INVOKE SUPER "NEW" 000012 END METHOD M5759. 000013 END OBJECT. 000014 END CLASS C5759.
C5759.cob (11) : JMN5759I-S 定義済みオブジェクト一意名SUPERによる親クラスの'NEW'メソッドの呼出しは,'NEW'メソッドの手続き内にしか記述できません.INVOKE文を無効とします.
詳細な説明
COBOLソース内でのメソッド"NEW"の宣言/参照は,コンストラクタの宣言/参照と同義です.