diff --git a/models/exam-office/exam-labels.model b/models/exam-office/exam-labels.model
index be02e158d..a22a8ebc7 100644
--- a/models/exam-office/exam-labels.model
+++ b/models/exam-office/exam-labels.model
@@ -1,6 +1,6 @@
 ExamOfficeLabel
   user UserId
-  name Text
+  name ExamOfficeLabelName
   status MessageStatus
   priority Int          -- determines label ordering
   UniqueExamOfficeLabel user name
diff --git a/src/Model/Types.hs b/src/Model/Types.hs
index 5b5562675..4966c28b5 100644
--- a/src/Model/Types.hs
+++ b/src/Model/Types.hs
@@ -6,6 +6,7 @@ import Model.Types.Common as Types
 import Model.Types.Course as Types
 import Model.Types.DateTime as Types
 import Model.Types.Exam as Types
+import Model.Types.ExamOffice as Types
 import Model.Types.Health as Types
 import Model.Types.Mail as Types
 import Model.Types.Security as Types
diff --git a/src/Model/Types/ExamOffice.hs b/src/Model/Types/ExamOffice.hs
new file mode 100644
index 000000000..60dc51bbf
--- /dev/null
+++ b/src/Model/Types/ExamOffice.hs
@@ -0,0 +1,8 @@
+module Model.Types.ExamOffice
+  ( ExamOfficeLabelName
+  ) where
+
+import Import.NoModel
+
+
+type ExamOfficeLabelName = Text