Index: APPS/VKP/Klantspecifiek/NewSobelwood/VullingCodeMapping.cls.xml
===================================================================
diff -u -r70197 -r71157
--- APPS/VKP/Klantspecifiek/NewSobelwood/VullingCodeMapping.cls.xml	(.../VullingCodeMapping.cls.xml)	(revision 70197)
+++ APPS/VKP/Klantspecifiek/NewSobelwood/VullingCodeMapping.cls.xml	(.../VullingCodeMapping.cls.xml)	(revision 71157)
@@ -26,7 +26,7 @@
 	Set ..GlasKleurMapping = ##class(%ArrayOfDataTypes).%New()
 	Do ..GlasKleurMapping.SetAt("ALVULXA","1013 BLANC PERLE")
 	Do ..GlasKleurMapping.SetAt("ALVULXO","1271 JAUNE OCRE")
-	Do ..GlasKleurMapping.SetAt("ALVULZB","1272 BEIGE SABLE")
+ ;	Do ..GlasKleurMapping.SetAt("ALVULZB","1272 BEIGE SABLE")
  ;	Do ..GlasKleurMapping.SetAt("ALVULXI","1398 BEIGE")
  ;	Do ..GlasKleurMapping.SetAt("ALVULXI","1398 SABLE")
 	Do ..GlasKleurMapping.SetAt("ALVULPW","1849 BEIGE CLAIR")
@@ -69,10 +69,12 @@
 	Do ..GlasKleurMapping.SetAt("ALVULOJ","8282 JAUNE OLIVE")
 	Do ..GlasKleurMapping.SetAt("ALVULXZ","9005 NOIR")               ; backward compatible (vanaf 18/03/2022); zal uitgefaseerd worden 
 	Do ..GlasKleurMapping.SetAt("ALVULXZ","DL 227 NOIR")
-	Do ..GlasKleurMapping.SetAt("ALVULXM","9006 GRIS METAL")
+	Do ..GlasKleurMapping.SetAt("ALVULXM","9006 GRIS METAL")         ; backward compatible (vanaf 23/06/2023); zal uitgefaseerd worden 
+	Do ..GlasKleurMapping.SetAt("ALVULXM","DL 199 GRIS METAL")
 	Do ..GlasKleurMapping.SetAt("ALVULXW","9010 BLANC")              ; backward compatible (vanaf 18/03/2022); zal uitgefaseerd worden 
 	Do ..GlasKleurMapping.SetAt("ALVULXW","DL 191 BLANC")
-	Do ..GlasKleurMapping.SetAt("ALVULDG","71357 GRIS FONCE")
+	Do ..GlasKleurMapping.SetAt("ALVULDG","71357 GRIS FONCE")        ; backward compatible (vanaf 23/06/2023); zal uitgefaseerd worden 
+	Do ..GlasKleurMapping.SetAt("ALVULDG","DL 228 GRIS FONCE")
  ;	Do ..GlasKleurMapping.SetAt("ALVULZG","900500 NOIR PAILLETE")
  ;	Do ..GlasKleurMapping.SetAt("ALVULZG","9005 GLITTER")
 	Do ..GlasKleurMapping.SetAt("ALVULFG","FG VERRE TRANSPARENT")