FlugverkehrcSteuerung V1.0 Mai 2000 A-5 COseq-get_objs_by_name(in ObjTag tagpattern) raises(BadTag); }; Schnittstelle COadminSubscriber: BasicPublisher::Subscriber { leeres obj des obj_created(in COpublisher, im Umbau ObjTag); }; Schnittstelle RPfactory { Create_rp(RealPublisher in COpublisher2 Co, im Umbau ObjTag im COadminControl-calling_ad im RPID-rpid) raises(NoResources); leeres delete_objs_by_name(in ObjTag tagpattern); Erhöhungen (BadTag, NoMatch); }; Schnittstelle COadminControl { Ausnahme BadID{ }; langes rpid des leeren reset_rp(in, in RealPublisher rp) raises(BadID); langes rpid) raises(BadID) des leeren rp_deleted(in; }; # Pragmaversion COpublisher 1,0 # Pragmaversion COpublisher2 1,0 # Pragmaversion COsubscriber 1,0 # Pragmaversion RealPublisher 1,0 # Pragmaversion COadmin 1,0 # Pragmaversion COadminPublisher 1,0 # Pragmaversion COadminSubscriber 1,0 # Pragmaversion RPfactory 1,0 # Pragmaversion COadminControl 1,0 }; # endif