Index: DOM/PM/OL/Gamma/impl/OrgaluxProductGamma.cls.xml
===================================================================
diff -u -r2934 -r2939
--- DOM/PM/OL/Gamma/impl/OrgaluxProductGamma.cls.xml	(.../OrgaluxProductGamma.cls.xml)	(revision 2934)
+++ DOM/PM/OL/Gamma/impl/OrgaluxProductGamma.cls.xml	(.../OrgaluxProductGamma.cls.xml)	(revision 2939)
@@ -1235,41 +1235,18 @@
 		set KenmerkUnID = $order(..arKenmerkUnIDs(KenmerkUnID)) quit:KenmerkUnID=""
    		set oKenmerkOrgalux = ##class(Prod.Kenmerk.Orgalux).%New(KenmerkUnID,..Context.Taal) 
 	   	set lbMaterialen = oKenmerkOrgalux.GetMaterialen()
-	   	if $listlength(lbMaterialen)	{
-	   	   for ctrMaterialen = 1 : 1 : $listlength(lbMaterialen) { 
-				set Materiaal = $listget(lbMaterialen,ctrMaterialen)
-				if '..PGLMaterialen.IsDefined(Materiaal) do AddToPGLMaterialen(Materiaal)
-				;do AddToPGLMaterialen(Materiaal)
-	   	   }
-	   	}
-	   	else { 
-	 		do AddToPGLMaterialen("onbepaald")			
-	   	}
+   	    for ctrMaterialen = 1 : 1 : $listlength(lbMaterialen) { 
+			 set Materiaal = $listget(lbMaterialen,ctrMaterialen)
+			 if (( Materiaal'="Antislipmatten") && (Materiaal '= "BOXSIDE") && ('..PGLMaterialen.IsDefined(Materiaal)))
+			 {
+				 if ('blnOnlyWoodLine) || (idxMateriaal["WOODLINE")
+				 {
+				 	set MateriaalOms = oKenmerkOrgalux.GetVertaaldeKenmerkWaarde($$$OLKenmMateriaal,Materiaal,..Context.Taal) , MateriaalOms = $select(MateriaalOms = "" : "onbepaald" , 1:MateriaalOms)
+				 	do ..PGLMaterialen.SetAt(MateriaalOms,Materiaal) 
+				 }
+			 }
+   	    }
 	}
-	
- 	set idxMateriaal = ""
-	for  {
-		set idxMateriaal = ..PGLMaterialen.Next(idxMateriaal) quit:idxMateriaal=""
- 		if (blnOnlyWoodLine) && ($$$Not(idxMateriaal["WOODLINE"))
- 		{
-	 		do ..PGLMaterialen.RemoveAt(idxMateriaal)
- 		}
- 		Else
- 		{
-			// Vertaling van het materiaal ophalen
-			set MateriaalOms = oKenmerkOrgalux.GetVertaaldeKenmerkWaarde($$$OLKenmMateriaal,idxMateriaal,..Context.Taal) , MateriaalOms = $select(MateriaalOms = "" : "onbepaald" , 1:MateriaalOms)
-			Do ..PGLMaterialen.SetAt(MateriaalOms,idxMateriaal)
- 		}
-	}
- 	
-AddToPGLMaterialen(Materiaal)
-	    set Materiaal = $get(Materiaal,"onbepaald")
-
-		if ( Materiaal'="Antislipmatten" ) && ( Materiaal '= "BOXSIDE") {
-			do:Materiaal'="onbepaald" ..PGLMaterialen.SetAt("",Materiaal) 
-		}
-
-		quit
 ]]></Implementation>
 </Method>