Index: DOM/PM/impl/DataM/DataMProduct.cls.xml
===================================================================
diff -u -r45935 -r45941
--- DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 45935)
+++ DOM/PM/impl/DataM/DataMProduct.cls.xml	(.../DataMProduct.cls.xml)	(revision 45941)
@@ -704,6 +704,7 @@
 <Implementation><![CDATA[
 	Set Messages = ##class(%ListOfDataTypes).%New()
 	
+	Do:'$Length(..GeefKorttekst()) Messages.Insert("IdentNr is vereist.")
 	Do:'$Length(..GeefKorttekst()) Messages.Insert("Korttekst is vereist.")
 	Do:'$Length(..GeefLeverancierID()) Messages.Insert("LeverancierId is vereist.")
 	Do:'$Length(..GeefHoofdGroep()) Messages.Insert("Hoofdgroep is vereist.")