new grant cleanup sproc

src/Sql/dbo/Stored Procedures/Grant_DeleteExpired.sql

@@ -0,0 +1,19 @@
+CREATE PROCEDURE [dbo].[Grant_DeleteExpired]
+AS
+BEGIN
+    SET NOCOUNT ON
+
+    DECLARE @BatchSize INT = 100
+    DECLARE @Now DATETIME2(7) = GETUTCDATE()
+
+    WHILE @BatchSize > 0
+    BEGIN
+        DELETE TOP(@BatchSize)
+        FROM
+            [dbo].[Grant]
+        WHERE
+            [ExpirationDate] < @Now
+
+        SET @BatchSize = @@ROWCOUNT
+    END
+END

src/Sql/dbo/Tables/Grant.sql

@@ -14,3 +14,7 @@ GO
 CREATE NONCLUSTERED INDEX [IX_Grant_SubjectId_ClientId_Type]
     ON [dbo].[Grant]([SubjectId] ASC, [ClientId] ASC, [Type] ASC);
 
+GO
+CREATE NONCLUSTERED INDEX [IX_Grant_ExpirationDate]
+    ON [dbo].[Grant]([ExpirationDate] ASC);
+