2-30 PL-/icSprache, die Spezifikation, v1.0 Abbildet September 2002 2 /* procs im von links nach rechts verlaufenden Auftrag von Erbschaft*/ Anruf POS_SERVANTBASE_INIT(poa_counter_ptr); /* führen Sie jetzt poa_counterinitialisierungsdurch */ ... ENDE POA_COUNTER_INIT; POA_COUNTER_FINI: PROC(POA_COUNTER); dclpoa_counter-PTRBYADDR; /* führen Sie zuerst poa_counterreinigungdurch */ ... /* benennen Sie dann sofortig niedriges Schnittstellenfiniprocs*/ /* im recht-zu-linken Auftrag von Erbschaft*/ Anruf POS_SERVANTBASE_FINI(poa_counter); ENDE POA_COUNTER_FINI; Die Verfahrensnamen werden wie folgt definiert. Der Schnittstellenname ist vorgesetztes POA _ und angefügt mit _ INIT für das Initialisierungsverfahren und _ FINI für die Vollendung Verfahren. Die Adresse eines Bediensteten wird zum Initialisierungsverfahren geführt bevor der Bedienstete darf, mit dem POA in jeder Hinsicht aktiviert zu werden oder registriert zu werden. Die Resultate des Nicht könnens einen Bediensteten über die passende Initialisierung richtig initialisieren Verfahren, bevor sie sie registriert oder erlaubt, daß sie aktiviert wird, sind Implementierung spezifisch. 2,13,6 AnwendungscBedienstete Es wird erwartet, daß Anwendungen ihre eigenen Bedienstetstrukturen verursachen sollten damit sie kann ihre eigenen Bedienstet-spezifischen Datenmitglieder Speichergegenstandzustand hinzufügen. Für Kostenzähler das Beispiel, das oben, ein Anwendungsbediensteter gezeigt wurde, würde vermutlich Daten haben Mitglied pflegte, den Gegenwert zu speichern: appservant gegründet des dcl 1, Unterseite 3 type(poa_counter), ctrvalue 3 örtlich festgelegtes bin(31); Die Anwendung konnte die folgende Implementierung des Counter::add enthalten Betrieb: SRVADD: PROC(APPSRV, inlong, outlong); %include SRVTYPE; dclappsrv mögen appservant byvalue; dclinlong reparierte bin(31) byvalue;