COBOL, das Den Spezifischen COBOLCBediener Der Art Abbildet Juni 1999 Abbildet 1-65 1 * (VEPV IST Ein ZEIGER Zum EPV) 01 Portableserver-servantbase-vepv IST TYPEDEF-ZEIGER. 01 Portableserver-servantbase IST TYPEDEF. 03 PRIVAT VERBRAUCHCZeiger. 03 VEPV SCHREIBEN Sie Portableserver-servantbase-vepv. Das erste Mitglied ist ein Zeiger diese Punkte zum Datenbesonderen zu jeder ORB-Implementierung. Dieses Mitglied, das ORB-Implementierungen Probedienstetdaten führen läßt, ist undurchlässig zu den Anwendungen. Das zweite Mitglied ist ein Zeiger zu einem Zeiger zu einem PortableServer- ServantBase-epv. Der Grund für das doppelte Niveau des Umwegs ist daß Bedienstete für abgeleitete Kategorien enthalten mehrfache EPV-Zeiger, einen für jede niedrige Schnittstelle sowie ein für die Schnittstelle selbst. (dieses wird weiter im folgenden Abschnitt erklärt). Der Name von das zweite Mitglied, "vepv," wird standardisiert, um beweglichen Zugang durch ihn zu erlauben. 1,25,5 SchnittstellencSkelette Alle COBOLSKELETTE für IDL-Schnittstellen haben im Wesentlichen die gleiche Struktur wie ServantBase, mit der Ausnahme daß das zweite Mitglied hat eine Art, die Zugang erlaubt zu allem EPVs für den Bediensteten, einschließlich deren für niedrige Schnittstellen sowie für die die meisten abgeleitete Schnittstelle. Z.B. betrachten Sie die folgende IDL-Schnittstelle: // IDL Schnittstelle Gegen { langes add(in lang val); }; Das Bedienstetskelett, das durch den IDL-Compiler für diese Schnittstelle erzeugt wird, erscheint wie folgt (die Art des zweiten Mitgliedes wird weiter unten) definiert: Poa-Kostenzähler 01 IST TYPEDEF. 03 PRIVAT VERBRAUCHCZeiger. 03 VEPV SCHREIBEN Sie Poa-Kostenzähler-vepv. Wie mit PortableServer-ServantBase, wird der Name des zweiten Mitgliedes standardisiert "zum vepv" für Beweglichkeit. Das EPV, das für das Skelett erzeugt wird, ist eine interessantere Spitze. Für die Gegenschnittstelle oben definiert, erscheint sie, wie folgt: Poa-Kostenzähler-epv 01 IST TYPEDEF. 03 PRIVAT VERBRAUCHCZeiger. 03 FÜGEN Sie hinzu VERBRAUCH-Verfahren-Zeiger. Da alle Bediensteten effektiv von PortableServer-ServantBase abgeleitet werden, kompletter Satz Eingänge muß EPVs für beide mit einschließen PortableServer-ServantBase und für Kostenzähler selbst: