Public Class MyGenericEventHandler Public Event FormularVertragelement_Closed(ByVal Vertragspartnernr As Integer, ByVal Vertragselementnr As Integer) Public Event FormularVertragspartner_Closed(ByVal Vertragspartnernr As Integer) Public Event FormularPendenz_Closed() Public Event Pendenz_Deleted() Public Event FormularKuendigungsfrist_Closed() Public Event Kuendigungsfrist_Deleted() Public Event FormularKontakte_Closed() Public Event Kontakt_Deleted() Public Event FormularDokument_Closed() Public Event Dokument_Deleted() Public Event FormularServices_Closed() Public Event Service_Deleted() Public Event FormularEreignis_Closed() Public Event Ereignis_Deleted() Public Event FormularAktivitaet_Cloesd() Public Event Aktivitaet_Deleted() Public Event FormularReferenzvertrag_Closed() Public Event Referenzvertrag_Deleted() Public Event Update_Uebersicht() Public Event LeistungSelektiert(ByVal Vertragsleistungsnr As Integer, ByVal Servicekatalognr As Integer) Public Event KeineLeistungSelektiert(ByVal Vertragsleistungsnr As Integer) Public Event FormularVertragsapplikation_Closed() Public Event Vertragsapplikation_Deleted() Public Event Set_ToolTip(ByVal formname As String, ByVal ctlname As String) Public Event FormularReleaseLogbuchClosed() Public Event FormularApplikationVersionClosed() Public Event FormualrIKVTestClosed() Public Event ServerInventarChanged(ByVal ApplicationNr As Integer) #Region "Vertragselement" ''' ''' Event Formular "Vertragselement" Closed absetzen ''' ''' ''' ''' ''' Public Function Vertragselement_Closed(ByVal Vertragspartnernr As Integer, ByVal Vertragselementnr As Integer) RaiseEvent FormularVertragelement_Closed(Vertragspartnernr, Vertragselementnr) RaiseEvent Update_Uebersicht() End Function #End Region #Region "Vertragspartner" ''' ''' Event Formular Vertragsparter Closed absetzen ''' ''' ''' ''' Public Function Vertragspartner_Closed(ByVal Vertragspartnernr As Integer) RaiseEvent FormularVertragspartner_Closed(Vertragspartnernr) RaiseEvent Update_Uebersicht() End Function #End Region #Region "Pendenzen" ''' ''' Event Formular Pendenz Closed absetzen ''' ''' ''' ''' Public Function Pendenz_Closed() RaiseEvent FormularPendenz_Closed() RaiseEvent Update_Uebersicht() End Function ''' ''' Event Pendent Deleted absetzen ''' ''' ''' ''' Public Function Pendenz_Geloescht() RaiseEvent Pendenz_Deleted() RaiseEvent Update_Uebersicht() End Function #End Region #Region "Kuendigungsfrist" ''' ''' Event Formular Kontakte Closed absetzen ''' ''' ''' ''' Public Function Kuendigungsfrist_Closed() RaiseEvent FormularKuendigungsfrist_Closed() RaiseEvent Update_Uebersicht() End Function Public Function Kuendigungsfrist_Geloescht() RaiseEvent Kuendigungsfrist_Deleted() RaiseEvent Update_Uebersicht() End Function ''' ''' Event Formular Kuendigungsfrist Closed absetzen ''' ''' ''' ''' Public Function Kontakte_Closed() RaiseEvent FormularKontakte_Closed() RaiseEvent Update_Uebersicht() End Function Public Function Kontakte_Geloescht() RaiseEvent Kontakt_Deleted() RaiseEvent Update_Uebersicht() End Function ''' ''' Event Formular Dokumente Closed absetzen ''' ''' ''' ''' Public Function Dokumente_Closed() RaiseEvent FormularDokument_Closed() RaiseEvent Update_Uebersicht() End Function Public Function Dokumente_Geloscht() RaiseEvent Dokument_Deleted() RaiseEvent Update_Uebersicht() End Function ''' ''' Event Formular Services Closed absetzen ''' ''' ''' ''' Public Function Services_Closed() RaiseEvent FormularServices_Closed() RaiseEvent Update_Uebersicht() End Function Public Function Service_Geloescht() RaiseEvent Service_Deleted() RaiseEvent Update_Uebersicht() End Function ''' ''' Event Formular Ereignis Closed absetzen ''' ''' ''' ''' Public Function Ereignis_Closed() RaiseEvent FormularEreignis_Closed() RaiseEvent Update_Uebersicht() End Function Public Function Ereignis_Geloescht() RaiseEvent Ereignis_Deleted() RaiseEvent Update_Uebersicht() End Function ''' ''' Event Formular Aktivitaet Closed absetzen ''' ''' ''' ''' Public Function Aktivitaet_Closed() RaiseEvent FormularAktivitaet_Cloesd() RaiseEvent Update_Uebersicht() End Function Public Function Aktivitaet_Geloescht() RaiseEvent Aktivitaet_Deleted() RaiseEvent Update_Uebersicht() End Function ''' ''' Event Formular Refernzvertrag Closed absetzen ''' ''' ''' ''' Public Function Refernzvertrag_Closed() RaiseEvent FormularReferenzvertrag_Closed() RaiseEvent Update_Uebersicht() End Function Public Function Refernzvertrag_Geloescht() RaiseEvent Referenzvertrag_Deleted() RaiseEvent Update_Uebersicht() End Function #End Region #Region "Servicekatalog" Public Function Leistung_Selektiert(ByVal Vertragsleistungsnr As Integer, ByVal Servicekatalognr As Integer) RaiseEvent LeistungSelektiert(Vertragsleistungsnr, Servicekatalognr) RaiseEvent Update_Uebersicht() End Function Public Function Keine_Leistung_Selektiert(ByVal Vertragsleistungsnr As Integer) RaiseEvent KeineLeistungSelektiert(Vertragsleistungsnr) End Function #End Region #Region "Pendenzen" ''' ''' Event Formular Pendenz Closed absetzen ''' ''' ''' ''' Public Function Vertragsapplikation_Closed() RaiseEvent FormularVertragsapplikation_Closed() RaiseEvent Update_Uebersicht() End Function ''' ''' Event Pendent Deleted absetzen ''' ''' ''' ''' Public Function Vertragsapplikation_Geloescht() RaiseEvent Vertragsapplikation_Deleted() RaiseEvent Update_Uebersicht() End Function #End Region Public Function Edit_Tooltip(ByVal formname As String, ByVal ctlname As String) RaiseEvent Set_ToolTip(formname, ctlname) End Function #Region "ReleaseLogbuch" Public Function ReleaseLobuchClosed() RaiseEvent FormularReleaseLogbuchClosed() End Function #End Region #Region "IKV_Tests" Public Function IKVDetailsClosed() RaiseEvent FormualrIKVTestClosed() End Function #End Region #Region "ApplikationVersion" Public Function ApplikationVersionClosed() RaiseEvent FormularApplikationVersionClosed() End Function #End Region #Region "Serverinventar" Public Function Fire_ServerInventar_Changed(ByVal Applicationnr As Integer) RaiseEvent ServerInventarChanged(Applicationnr) End Function #End Region End Class