例
000001 IDENTIFICATION DIVISION.
000002 CLASS-ID. C1794.
000003**
000004 OBJECT. IMPLEMENTS .
000005 PROCEDURE DIVISION.
000006 END OBJECT.
000007 END CLASS C1794.
C1794.cob (4) : JMN1794I-S IMPLEMENTS句にはインタフェース名を指定しなければなりません.