COBOL, das COBOLCGegenstand-AdaptercFunktionen Juni 1999 Abbildet 1-49 1 1,20,7 OBJNEW Zusammenfassung Verursacht einen Gegenstandhinweis. OBJNEW(IN < PIC X > Bediener-Name, IN < PIC X > Schnittstelle-Name, ......, IN < PIC X > Gegenstand-Bezeichner, AUS Zeiger Gegenstand-Hinweis) Beschreibung Die Hilfsfunktion OBJNEW verursacht einen einzigartigen Gegenstandhinweis. Sie ist spezifisch entworfen für Gebrauch durch das dynamische COBOLDIAGRAMM. Der "Bediener-Name" ist ein Raum beendeter Bedienerbezeichner, der auf spezifiziert wird COAINIT-Funktion. Der "Schnittstelle-Name" ist ein Raum beendetes Feld, das den Schnittstellennamen enthält. Der "Gegenstand-Bezeichner" ist ein Raum beendeter Bezeichner für den Gegenstand, der verursacht wird (zum Beispiel, Kontonummer für einen Kontogegenstand, der durch ein Konto verursacht wird Fabrikgegenstand). Beispiel COPIES BEISPIEL. COPIES CORBA. ... Obj-Hinweis 01 ZEIGER. Gegenstand-Bezeichner 01 ABBILDUNG X(25). Bediener-Name 01 ABBILDUNG X(12) WERT "BEDIENER". Schnittstelle-Name 02 ABBILDUNG X(12) WERT "BEISPIEL". PROZEDURTEIL. .... VERSCHIEBEN Sie "< einzigartigen Wert > AUF Gegenstand-Bezeichner BENENNEN SIE "VERWENDENDES OBJNEW" Bediener-Name Schnittstelle-Name Gegenstand-Bezeichner Gegenstand-Hinweis