SQL-Ereignisse (EULANDA SQL-API) #

Problemstellung #

Über Trigger lassen sich eine Vielzahl von SQL-Ereignissen abfangen und gesondert behandeln. Es ist möglich besondere Prüfungen beim Speichern einer Adresse durchzuführen oder Änderungen an Daten zu protokollieren. Trigger arbeiten stets auf Tabellenebene. Dadurch ist das mögliche Einsatzgebiet auf diejenigen Ereignisse beschränkt, die primär eine Tabelle betreffen resp. das Anlegen, Ändern und Löschen eines oder mehrerer Datensätze. Komplexe Vorgänge - wie beispielsweise das Umwandeln eines Auftrags in einen Lieferschein - lassen sich nur schwer greifen. Um bei dem Beispiel zu bleiben: Beim Umwandeln eines Auftrags in einen Lieferschein werden etliche Einzelaktionen innerhalb einer Transaktion durchgeführt.

• Anlegen des Lieferscheinkopfes
• Anlegen der Positionen oder Teilpositionen
• ggf. Prüfung des Kreditlimits
• Setzen des Auftragsstatus
• Füllen der Umsetzungsmatrix zwischen Auftragspositionen und Lieferscheinpositionen
• ggf. Anlegen von Titeln, die im Auftrag verwendet werden
• etc..

Diese Auflistung ist beispielhaft und nicht vollständig. Die durchzuführenden Aktionen variieren von einer EULANDA®-Version zur nächsten. Sicherlich könnte man einen Trigger schreiben, der beim Ändern des Auftragsstatus eine benutzerdefinierte Aktionen durchführt. Aber man kann nicht sicherstellen, dass zu diesem Zeitpunkt bereits alle anderen Aktionen durchgeführt worden sind. Man kann beispielsweise nicht sicher sein, dass alle Lieferscheinpositionen angelegt sind. Um dieser Limitierung des Trigger-Konzeptes zu begegnen führt EULANDA® eine neue Klasse von Ereignissen auf Server-Ebene ein. Im Nachfolgenden finden Sie eine Liste der verfügbaren Ereignisse.

Serverseitige Ereignisse #

Unterstützte Ereignisse in Ihrer Version #

Die grundlegenden Ereignisse wurden erst in EULANDA 2007 eingeführt. Um eine Liste der von Ihrer Datenbank unterstützten Ereignisse zu erhalten führen Sie folgenden Befehl aus:

IF OBJECT_ID('cnEventType') IS NULL
  RAISERROR('In dieser Eulanda-Version werden noch keine SQL-Ereignisse unterstützt',16,1)
ELSE SELECT id,Name FROM cnEventType ORDER BY id

Asynchrone/verzögerte Ausführung #

Ab Version 7.0.19 ist auch eine asynchrone Aufrufen der Ereignisprozedur möglich. Der ursprüngliche Vorgang, der das Ereignis auslöst wird hierbei zunächst abgearbeitet. Die Prozedur wird dann nach einer vorgegebenen Zeitspanne aufgerufen. Hierzu muss in der Tabelle cnEventSubscriber in der Spalte AsyncDeferredSeconds ein Wert größer oder gleich 0 eingetragen werden. Dieser gibt die Wartezeit in Sekunden an, die mindestens gewartet wird, bis die Prozedur ausgeführt wird.

Die verzögerte Ausführung setzt voraus, dass die Prozedur cn_Queue_HandleCnEvents regelmäßig - z.B. alle 5 Minuten - aufgerufen wird. Dies kann bei der Standard Edition des SQL-Server über den SQL-Server Agent erfolgen. Bei Einsatz der Express Edition kann dies über die Windows Aufgabenplanung erreicht werden.

Die die Prozedur nicht mehr in derselben Transaktion des ursprünglichen Vorgangs ausgeführt wird kann dieser selbstredend nicht mehr abgebrochen werden. Eine Rückgabe eines Wertes ungleich Null wird entsprechend ignoriert bzw. kann in zukünftigen Versionen auch als Fehler gewertet werden. Die Asynchrone Ausführung ist beispielsweise für zeitaufwändige Prozesse gedacht, die die ursprüngliche Abarbeitung (Buchen des Lieferscheins etc.) nicht unnötig verzögern sollen. Des Weiteren ist es empfehlenswert zu prüfen, ob das übergebene Objekt noch existiert und dem gewünschten Status entspricht. Denn es kann durchaus vorkommen, dass zum Beispiel ein Lieferschein zwischenzeitlich bereits in eine Rechnung umgewandelt oder wieder storniert wurde.

Prozedur Prototyp #

Die Behandlung eines solchen Ereignisses wird als Prozedur implementiert. Dabei muss die Prozedur streng nach folgendem Schema aufgebaut sein:

CREATE PROC cn_user_evtXXX
  @SubsId int,
  @ObjType char(4),
  @ObjId int
AS

SET NOCOUNT ON

  RAISERROR('Fehlermeldung',16,1)
  RETURN -1

  RETURN 0

Beispiel #

Über nachfolgenden SQL-Code wird eine Preisprüfung implementiert, die bei Unterschreitung des Einkaufspreises das Buchen des Auftrags verhindert

CREATE PROC cn_user_evtAfBuchen_EkPruefung
  @SubsId int,
  @ObjType char(4),
  @ObjId int
AS

SET NOCOUNT ON

DECLARE @Pos int
SELECT TOP 1 @Pos = afp.PosNummer 
FROM dbo.AuftragPos afp
WHERE afp.KopfId = @ObjId AND afp.Basis > afp.VkRab

IF @@ROWCOUNT > 0
BEGIN
RAISERROR('Der Einkaufspreis wurde in Position %d unterschritten',16,1,@Pos)
RETURN -1
END ELSE RETURN 0

GO

INSERT cnEventSubscriber (EventId, Vendor, ProcName)
VALUES(10000, 'USER', 'cn_user_evtAfBuchen_EkPruefung')