引数の説明
定義済み一意名SELF,定義済み一意名SUPER,定義済み一意名EXCEPTION-OBJECT,クラス名,メソッドのインライン呼出しまたはASオブジェクト指定子付きの一意名. |
例
000001 IDENTIFICATION DIVISION.
000002 CLASS-ID. C5509.
000003 ENVIRONMENT DIVISION.
000004 CONFIGURATION SECTION.
000005 IDENTIFICATION DIVISION.
000006 OBJECT.
000007 PROCEDURE DIVISION.
000008 IDENTIFICATION DIVISION.
000009 METHOD-ID. M5509.
000010 DATA DIVISION.
000011 LINKAGE SECTION.
000012 01 LK1 PIC X(2).
000013 PROCEDURE DIVISION RETURNING LK1.
000014 SET SELF TO NULL.
000015 MOVE SPACE TO SELF :: "M5509"
000016 END METHOD M5509.
000017 END OBJECT.
000018 END CLASS C5509.
C5509.cob (14) : JMN5509I-S 受取り側項目に定義済みオブジェクト一意名SELFは指定できません.
C5509.cob (15) : JMN5509I-S 受取り側項目にメソッドの行内呼出しは指定できません.