Index: vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/Test001Valigne.cls.xml
===================================================================
diff -u -r55392 -r58691
--- vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/Test001Valigne.cls.xml	(.../Test001Valigne.cls.xml)	(revision 55392)
+++ vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/Test001Valigne.cls.xml	(.../Test001Valigne.cls.xml)	(revision 58691)
@@ -28,7 +28,7 @@
 	set Laden = ##class(vhTest.Integratie.Productie.Setup.ProductInfoLijst).%New()
 	
 	do Laden.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New($$$Taorbox1,$$$Aantal) )  
-	do Laden.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New($$$Taorbox2,$$$Aantal) )  
+	do Laden.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefTaxBinnenladeMetTipon()),$$$Aantal) )
 	do LadenPerToeleveringArray.SetAt(Laden, $$$ToeleveringID)
 
 	quit LadenPerToeleveringArray
@@ -41,6 +41,37 @@
 <Implementation><![CDATA[	quit ##class(DOM.PM.enu.TAORConcept).Valinge()
 ]]></Implementation>
 </Method>
+
+<Method name="GeefTaxBinnenladeMetTipon">
+<Description>
+Komt overeen met ProductId = 1066928 : TA4M/Z  CVI500x408   NENE </Description>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken</ReturnType>
+<Implementation><![CDATA[
+	#dim TAORKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).StandaardMLadeVerpaktIn(##class(DOM.PM.enu.TAORVerpakkingType).V1())
+	
+	// Binnenlade maken
+	Set TAORKenmerken.IsBinnenlade = $$$True
+	Set TAORKenmerken.FrontEindkapKleur = ##class(DOM.PM.enu.TAORFrontEindkapKleur).AluminiumLook()
+	;Set TAORKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Drevel()
+	
+	// Andere properties aanpassen
+	Set TAORKenmerken.BodemKleur = ..Enum.BodemKleur.NatuurEikenhout
+	Set TAORKenmerken.CorpusBinnenbreedte = 433
+	Set TAORKenmerken.GeleiderTechnologie = ..Enum.GeleiderTechnologie.TIPON
+	Set TAORKenmerken.KantenbandKleur = ..Enum.LadeKleur.NatuurEikenhout
+	Set TAORKenmerken.LadeKleur = ..Enum.LadeKleur.NatuurEikenhout
+	Set TAORKenmerken.LadeBinnenKleur = ..Enum.LadeKleur.NatuurEikenhout
+	Set TAORKenmerken.LadeDiepte = ..Enum.LadeDiepte.LadeDiepte500
+	Set TAORKenmerken.HeeftOpvullijstRechts  = $$$True
+	Set TAORKenmerken.OpvullijstKleur = ..Enum.OpvullijstKleur.PlatinaZilverGrijs
+	
+	Set TAORKenmerken.GUIKenmerken.WandDikte = ""
+	Set TAORKenmerken.GUIKenmerken.IsBinnenbreedte = $$$True
+	
+	Quit TAORKenmerken
+]]></Implementation>
+</Method>
 </Class>