Im Artikel “Entity Framework: Gespeicherte Prozeduren” haben wir gezeigt, wie Sie gespeicherte Prozeduren für die Entitäten einer Anwendung anlegen und diese beim Ändern, Anlegen oder Löschen von Entitäten nutzen. Damit diese gespeicherten Prozeduren auch einen Mehrwert haben, zeigen wir im vorliegenden Artikel, wie Sie die gespeicherten Prozeduren so erweitern, dass Sie etwa vor dem Ändern eines Datensatzes eine Kopie dieses Datensatzes in einer für diesen Zweck vorgesehenen Tabelle anlegen, um später die Änderungen reproduzieren und wiederherstellen zu können.<\/b><\/p>\nVoraussetzung<\/h2>\n
Wir starten in diesem Artikel mit dem Beispielprojekt, das wir im Beitrag Entity Framework: Gespeicherte Prozeduren erstellt haben. Dieses enthält bereits die Entitäten unserer Bestellverwaltung und die Migrationsklassen, mit denen wir die Datenbank auf Basis der Entitäten erstellen und über die Seed-Methode mit Daten füllen können. Die Aufgabe ist nun, erstens eine Tabelle namens KundenArchiv zu erstellen, in der wir die alten Kundendaten speichern können. Dabei wollen wir den verwendeten Primärschlüsselwert des Datensatzes sichern sowie das Datum der Änderung. Danach wollen wir die gespeicherte Prozedur dbo.Kunden_Update so anpassen, dass vor dem Durchführen der Änderungen am Datensatz die alte Version des Datensatzes in der Tabelle dbo.Kunden_Update gespeichert wird. Außerdem soll auch die Tabelle zum Archivieren der Daten per Update-Database erstellt werden, sodass wir entsprechenden Code in einer Migrationsklasse anlegen müssen.<\/p>\n
Wir wollen die gespeicherten Prozedur dbo.Kunden_Update so anpassen, dass diese in einer noch zu erstellenden Tabelle namens KundenArchiv die Version der Datensätze der Tabelle Kunden vor der Änderung speichert. Dazu benötigen wir zunächst eine solche Tabelle. Diese legen wir mit dem folgenden Skript an, das wir in einem neuen Abfragefenster für die aktuelle Datenbank ausführen. Das Abfragefenster öffnen wir, indem wir im SQL Server-Objekt-Explorer mit der rechten Maustaste auf den Eintrag für die Datenbank klicken und den Eintrag New Query… (deutsch Neue Abfrage…) betätigen. Da wir nur wenige Änderungen gegenüber der Originaltabelle Kunden durchführen wollen, können wir den Code zur Erstellung der Tabelle Kunden als Vorlage verwenden. Diesen erhalten Sie, indem Sie mit der rechten Maustaste auf die Tabelle Kunden klicken und aus dem Kontextmenü den Eintrag Skripterstellung als…|CREATE in|Neues Abfragefenster auswählen. Hier ändern Sie den Tabellennamen Kunden überall in KundenArchiv. Außerdem fügen wir das Feld GeaendertAm hinzu, welches das Änderungsdatum speichern soll. Das zweite neue Feld heißt OriginalID und soll die ID des Datensatzes enthalten, der geändert wurde:<\/p>\n
CREATE TABLE [dbo].[KundenArchiv] (\r\n [ID] INT IDENTITY (1, 1) NOT NULL,\r\n [OriginalID] INT NOT NULL,\r\n [Firma] NVARCHAR (255) NULL,\r\n [Vorname] NVARCHAR (255) NOT NULL,\r\n [Nachname] NVARCHAR (255) NOT NULL,\r\n [AnredeID] INT NOT NULL,\r\n [Strasse] NVARCHAR (255) NOT NULL,\r\n [PLZ] NVARCHAR (255) NOT NULL,\r\n [Ort] NVARCHAR (255) NOT NULL,\r\n [Land] NVARCHAR (255) NOT NULL,\r\n [EMail] NVARCHAR (255) NOT NULL,\r\n [GeaendertAm] DATETIME NOT NULL\r\n);\r\nGO\r\nCREATE NONCLUSTERED INDEX [IX_AnredeID]\r\n ON [dbo].[KundenArchiv]([AnredeID] ASC);\r\nGO\r\nALTER TABLE [dbo].[KundenArchiv]\r\n ADD CONSTRAINT [PK_dbo.KundenArchiv] PRIMARY KEY CLUSTERED ([ID] ASC);\r\nGO\r\nALTER TABLE [dbo].[KundenArchiv]\r\n ADD CONSTRAINT [FK_dbo.KundenArchiv_dbo.Anreden_AnredeID] FOREIGN KEY ([AnredeID]) REFERENCES [dbo].[Anreden] ([ID]) ON DELETE CASCADE;<\/pre>\nFühren Sie dieses Skript aus, indem Sie auf die Starten-Schaltfläche oben im Skriptfenster klicken (nicht zu verwechseln mit der Starten-Schaltfläche für das Projekt in der Symbolleiste von Visual Studio). Nach der Aktualisierung des Elements Tabellen im SQL Server-Objekt-Explorer erscheint dort die neue Tabelle KundenArchiv.<\/p>\n
Gespeicherte Prozedur “Kunden_Update” anpassen<\/h2>\n
Nun müssen wir die gespeicherte Prozedur dbo.Kunden_Update so anpassen, dass nicht nur die Änderungen am aktuellen Datensatz gespeichert werden, sondern zuvor noch die aktuelle Version des Datensatzes in der Tabelle KundenArchiv archiviert wird. Diese Änderung könnten Sie zur Migration namens StoredProcedures hinzufügen, sofern Sie diese noch nicht ausgeführt haben. Allerdings können wir auch eine neue Migration anlegen und dort unseren Code einfügen. Dazu geben Sie einfach den folgenden Befehl in die Paketmanager-Konsole ein:<\/p>\n
add-migration AlterStoredProcedure<\/pre>\nEs erscheint eine leere Klasse. Diese hat wieder zwei Methoden – die Up- und die Down-Methode. Nochmal zur Verdeutlichung: Wenn Sie in der Paketmanager-Konsole Update-Database aufrufen, werden alle Up-Methoden der vorhandenen Migrationsklassen aufgerufen, die noch nicht ausgeführt wurden. Deshalb fügen wir den Aufruf der Methode AlterStoredProcedure, die zum Ändern einer gespeicherten Prozedur zum Einsatz kommt, für die Up-Methode ein:<\/p>\n
Public <\/span>Partial Class AlterStoredProcedure\r\n Inherits DbMigration\r\n Public <\/span>Overrides Sub Up()\r\n AlterStoredProcedure(\r\n \"dbo.Kunde_Update\",\r\n Function(p) New<\/span> With<\/span>\r\n {\r\n .ID = p.Int(), .Firma = p.String(maxLength:=255), .Vorname = p.String(maxLength:=255),\r\n .Nachname = p.String(maxLength:=255), .AnredeID = p.Int(), .Strasse = p.String(maxLength:=255),\r\n .PLZ = p.String(maxLength:=255), .Ort = p.String(maxLength:=255), .Land = p.String(maxLength:=255),\r\n .EMail = p.String(maxLength:=255)\r\n },\r\n body:=\"INSERT [dbo].[KundenArchiv]([OriginalID], [Firma], [Vorname], [Nachname], [AnredeID], [Strasse], \" \r\n & \"[PLZ], [Ort], [Land], [EMail], [GeaendertAm])\" & vbCrLf<\/span> &\r\n \"SELECT ID, Firma, Vorname, Nachname, AnredeID, Strasse, PLZ, Ort, Land, EMail, \" \r\n & \"GETDATE() AS GeaendertAm FROM Kunden WHERE ID = @ID;\" & vbCrLf<\/span> &\r\n \"UPDATE [dbo].[Kunden]\" & vbCrLf<\/span> &\r\n \"SET [Firma] = @Firma, [Vorname] = @Vorname, [Nachname] = @Nachname, [AnredeID] = @AnredeID, \" &\r\n \"[Strasse] = @Strasse, [PLZ] = @PLZ, [Ort] = @Ort, [Land] = @Land, [EMail] = @EMail\" & vbCrLf<\/span> &\r\n \"WHERE ([ID] = @ID);\"\r\n )\r\n End Sub<\/pre>\nMöchten Sie weiterlesen? Dann lösen Sie Ihr Ticket!<\/span>
\nHier geht es zur Bestellung des Jahresabonnements des Magazins Visual Basic Entwickler<\/strong>:<\/span>
\nZur Bestellung ...<\/a><\/span>
\nDanach greifen Sie sofort auf alle rund 200 Artikel<\/strong> unseres Angebots zu - auch auf diesen hier!<\/span>
\nOder haben Sie bereits Zugangsdaten? Dann loggen Sie sich gleich hier ein:<\/span><\/p>\n<\/div>\n\n\t\n\t