2-62 PL-/icSprache, die Spezifikation, v1.0 Abbildet September 2002 2 WENN CHECK_ERRORS('STRGET ') ^ = COMPLETION_STATUS_YES DANN ZURÜCKGEHEN; ANRUF GRIDI(OPERATION); 2,16,23 PODSRVR Zusammenfassung PODSRVR(CHAR(*), /* IN: Bedienernamen*/ ÖRTLICH FESTGELEGTES BIN(31)); IN: Bedienernamenslängen*/ // stellt den Bediener POA her Beschreibung Das PODSRVR Dienstprogramm stellt den Bediener her POA, der auf dem gelieferten Bedienernamen, über basiert: PortableServer::POA_ver-mypoa = root_poa > create_POA("server_name", poa_manager, politische Linien); Beispiel DCL SERVER_NAME CHAR(4) INIT('grid '); DCL SERVER_NAME_LEN ÖRTLICH FESTGELEGTES BIN(31) INIT(4); ... ANRUF PODSRVR(SERVER_NAME, server_name_len); 2,16,24 PODSTAT Zusammenfassung PODSTAT(PTR)-;/* IN: Statusdesc-Zeiger*/ // Registerstatusangabenblock Beschreibung PODSTAT wird verwendet, einen gelieferten Statusangabenblock zur HÜLSE zu registrieren. Der Status von jeder möglicher HÜLSE-Anruf ist vorhanden. Dieser Anruf sollte gebildet werden bevor jeder möglicher andere HÜLSE-Anruf. Anmerkung daß es die Adresse des Statusblockes ist, der zu PODSTAT geführt wird . Obgleich PODSTAT ist ein wahlweise freigestellter Anruf, es sollte immer seien in jedem Programm umfaßt Sie. Keine Statusangaben sind wenn PODSTAT vorhanden wird nicht benannt. Auch wenn Ausnahme tritt und PODSTAT auf ist nicht, das Programm beendet es sei denn benannt worden POD_STATUS_INFORMATION ist Ablage zugewiesen worden (dieses stellt das sicher COMPLETION_STATUS entspricht immer 0 d.h. okay) oder wenn keine Anrufe zu CHECK_ERROS seien Sie gebildet. Verwenden Sie PODINFO den gespeicherten Zeiger zu zurückbekommen POD_STATUS_INFORMATION Datenstruktur und diese Informationen zugänglich machen.