Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/MatValidator.cls.xml
===================================================================
diff -u -r35908 -r35909
--- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/MatValidator.cls.xml	(.../MatValidator.cls.xml)	(revision 35908)
+++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/MatValidator.cls.xml	(.../MatValidator.cls.xml)	(revision 35909)
@@ -23,6 +23,7 @@
 <Implementation><![CDATA[
 	Quit:(..Product.HeeftMat = "" && (..Product.MatKleur = "")) $$$True
 	Quit:$$$Not(..Product.MatMateriaal=##class(DOM.PM.enu.MATMateriaal).Antislip()) $$$False
+	Quit:$$$Not(##class(TECH.StringUtils).Equals(..Product.MatKleur,"S","ANTR")) $$$False
 	Quit $$$Not((..Product.HeeftMat && (..Product.MatKleur = "")) || ($$$Not(..Product.HeeftMat) && $$$Not(..Product.MatKleur = "")))
 ]]></Implementation>
 </Method>
Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/MatValidator/Test.cls.xml
===================================================================
diff -u -r35908 -r35909
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/MatValidator/Test.cls.xml	(.../Test.cls.xml)	(revision 35908)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/MatValidator/Test.cls.xml	(.../Test.cls.xml)	(revision 35909)
@@ -8,7 +8,7 @@
 	#dim Product As APPS.EDI.common.dto.v001.LadeTBX = ##class(APPS.EDI.common.dto.v001.LadeTBX).%New()
 	Set Product.HeeftMat = $$$True
 	Set Product.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).Antislip()
-	Set Product.MatKleur = ##class(DOM.PM.enu.TBXAntislipmat).Grijs()
+	Set Product.MatKleur = ##class(DOM.PM.enu.MATKleur).Antraciet()
 	
 	Set Validator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.MatValidator).%New(Product)
 	
@@ -31,7 +31,7 @@
 <Implementation><![CDATA[
 	#dim Product As APPS.EDI.common.dto.v001.LadeTBX = ##class(APPS.EDI.common.dto.v001.LadeTBX).%New()
 	Set Product.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).Antislip()
-	Set Product.MatKleur = ##class(DOM.PM.enu.TBXAntislipmat).Grijs()
+	Set Product.MatKleur = ##class(DOM.PM.enu.MATKleur).Antraciet()
 	
 	Set Validator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.MatValidator).%New(Product)
 	
@@ -61,6 +61,19 @@
 	Do $$$AssertFalse(Validator.IsValid())
 ]]></Implementation>
 </Method>
+
+<Method name="Test: Materiaalkleur verschillend van Antraciet of ZwartAntislip -&gt; invalid">
+<Implementation><![CDATA[
+	#dim Product As APPS.EDI.common.dto.v001.LadeTBX = ##class(APPS.EDI.common.dto.v001.LadeTBX).%New()
+	Set Product.HeeftMat = $$$True
+	Set Product.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).AntislipFiber()
+	Set Product.MatKleur = ##class(DOM.PM.enu.TBXAntislipmat).Grijs()
+	
+	Set Validator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.MatValidator).%New(Product)
+	
+	Do $$$AssertFalse(Validator.IsValid())
+]]></Implementation>
+</Method>
 </Class>