diff --git a/test/Database/Fill.hs b/test/Database/Fill.hs
index 1a3bd069c..4ed996c40 100644
--- a/test/Database/Fill.hs
+++ b/test/Database/Fill.hs
@@ -488,6 +488,22 @@ fillDb = do
     void . insert' $ UserSchool uid ifi False
   for_ [gkleen, tinaTester] $ \uid ->
     void . insert' $ UserSchool uid mi False
+
+  let
+    examLabels = Map.fromList
+      [ ( sbarth
+        , [ ("In Bearbeitung"      , Success   , 4)
+          , ("Sonderfall"          , Warning   , 1)
+          , ("Zu überprüfen"       , Error     , 1)
+          , ("Weiterzuleiten"      , Info      , 3)
+          , ("Nicht zu bearbeiten" , Nonactive , -1)
+          ]
+        )
+      ]
+  for_ (Map.toList examLabels) $ \(examOfficeLabelUser, labels) ->
+    for_ labels $ \(examOfficeLabelName, examOfficeLabelStatus, examOfficeLabelPriority) ->
+      void $ insert' ExamOfficeLabel{..}
+
   let
     sdBsc = StudyDegreeKey' 82
     sdMst = StudyDegreeKey' 88