Index: AX/Uitgaand/PM/Product/impl/ProductDixfConverter.cls.xml
===================================================================
diff -u -r48224 -r48578
--- AX/Uitgaand/PM/Product/impl/ProductDixfConverter.cls.xml	(.../ProductDixfConverter.cls.xml)	(revision 48224)
+++ AX/Uitgaand/PM/Product/impl/ProductDixfConverter.cls.xml	(.../ProductDixfConverter.cls.xml)	(revision 48578)
@@ -108,7 +108,9 @@
 	#dim EcoResProductTranslationDescription As %String = Product.Tekst.GetOmschrijving("N"," ")
 	
 	If $$$Not(Product.Tekst.GeefKleurOmschrijving() = "") {
-		Set EcoResProductTranslationDescription = EcoResProductTranslationDescription_", kleur: "_##class(TECH.StringUtils).ToLower(Product.Tekst.GeefKleurOmschrijving())
+		#dim Kleur As %String = ##class(TECH.StringUtils).ToLower(Product.Tekst.GeefKleurOmschrijving())
+		Set Kleur = $$$If(Kleur?1"r"1.4N.E,"R"_$Extract(Kleur,2,*),Kleur)
+		Set EcoResProductTranslationDescription = EcoResProductTranslationDescription_", kleur: "_Kleur
 	}
 	
 	Quit $Translate(EcoResProductTranslationDescription,";",",")