Index: APPS/Halux/Planning/Resource/impl/ConvertASM.cls.xml
===================================================================
diff -u -r57446 -r62511
--- APPS/Halux/Planning/Resource/impl/ConvertASM.cls.xml	(.../ConvertASM.cls.xml)	(revision 57446)
+++ APPS/Halux/Planning/Resource/impl/ConvertASM.cls.xml	(.../ConvertASM.cls.xml)	(revision 62511)
@@ -26,10 +26,33 @@
 <Implementation><![CDATA[
 	Set SnijCode=..GeefMatAantalKeerSnijden()
 	Set:SnijCode="" SnijCode="STOCK"
+	
+	Set NaarCode=..GeefNaarSleutel()
+	
+	Set Selector="SN:"_SnijCode_";NAAR:"_NaarCode
 
-	Do ..CreateOneResource("MAT","Mat","Klantorder",$S(..MatCode="CV":"VILT",1:"ASM"),"SN:"_SnijCode,,1)
+	Do ..CreateOneResource("MAT","Mat","Klantorder","ASM",Selector,,1)
 ]]></Implementation>
 </Method>
+
+<Method name="GeefNaarSleutel">
+<Implementation><![CDATA[
+	Set LeverenAan=..GeefLeverenAan()
+	If LeverenAan="OL" 
+	{ 
+		Set Naar="ORGALUX"
+	}
+	ElseIf LeverenAan="KLANT"
+	{
+		Set Naar="KLANT"
+	}
+	Else
+	{
+		Set Naar="ORGALUX"
+	}
+	Quit Naar
+]]></Implementation>
+</Method>
 </Class>