Index: vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/Test001Baliko.cls.xml
===================================================================
diff -u -r30377 -r30716
--- vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/Test001Baliko.cls.xml	(.../Test001Baliko.cls.xml)	(revision 30377)
+++ vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/Test001Baliko.cls.xml	(.../Test001Baliko.cls.xml)	(revision 30716)
@@ -1,38 +1,8 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="vhTest.Integratie.Productie.Planning.ActieveBatches.Taorbox.Aansturing.Test001Baliko">
-<Super>vhTest.Integratie.Productie.Planning.ActieveBatches.Taorbox.Aansturing.TestBase</Super>
+<Super>vhTest.Integratie.Productie.Planning.ActieveBatches.Taorbox.Aansturing.Test001Valigne</Super>
 
-<Method name="OnBeforeOneTest">
-<FormalSpec>aTestCase:%String</FormalSpec>
-<Implementation><![CDATA[
- 	do ##super(aTestCase)
-	set ..Configuratie.ResetBatch = $$$true
-	set ..Configuratie.KartonAansturing = $$$true
-]]></Implementation>
-</Method>
-
-<Method name="GeefProductenPerToeleveringArray">
-<ReturnType>vhTest.Integratie.Productie.Setup.ProductenPerToeleveringArray</ReturnType>
-<Implementation><![CDATA[
-	#define ToeleveringID 222222
-	#define Aantal 			  13
-			
-	#define Taorbox1     1141223
-	#define Taorbox2	 1066928
-	
-	set LegraboxenPerToeleveringArray = ##class(vhTest.Integratie.Productie.Setup.ProductenPerToeleveringArray).%New()
-	
-	set Legraboxen = ##class(vhTest.Integratie.Productie.Setup.ProductInfoLijst).%New()
-	
-	do Legraboxen.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New($$$Taorbox1,$$$Aantal) )  
-	do Legraboxen.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New($$$Taorbox2,$$$Aantal) )  
-	do LegraboxenPerToeleveringArray.SetAt(Legraboxen,$$$ToeleveringID)
-
-	quit LegraboxenPerToeleveringArray
-]]></Implementation>
-</Method>
-
 <Method name="GeefConcept">
 <Private>1</Private>
 <ReturnType>DOM.PM.enu.TAORConcept</ReturnType>
Index: vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/Test001Valigne.cls.xml
===================================================================
diff -u -r29059 -r30716
--- vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/Test001Valigne.cls.xml	(.../Test001Valigne.cls.xml)	(revision 29059)
+++ vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/Test001Valigne.cls.xml	(.../Test001Valigne.cls.xml)	(revision 30716)
@@ -1,8 +1,38 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="vhTest.Integratie.Productie.Planning.ActieveBatches.Taorbox.Aansturing.Test001Valigne">
-<Super>vhTest.Integratie.Productie.Planning.ActieveBatches.Taorbox.Aansturing.Test001</Super>
+<Super>vhTest.Integratie.Productie.Planning.ActieveBatches.Taorbox.Aansturing.TestBase</Super>
 
+<Method name="OnBeforeOneTest">
+<FormalSpec>aTestCase:%String</FormalSpec>
+<Implementation><![CDATA[
+ 	do ##super(aTestCase)
+	set ..Configuratie.ResetBatch = $$$true
+	set ..Configuratie.KartonAansturing = $$$true
+]]></Implementation>
+</Method>
+
+<Method name="GeefProductenPerToeleveringArray">
+<ReturnType>vhTest.Integratie.Productie.Setup.ProductenPerToeleveringArray</ReturnType>
+<Implementation><![CDATA[
+	#define ToeleveringID 222222
+	#define Aantal 			  13
+			
+	#define Taorbox1     1141223
+	#define Taorbox2	 1066928
+	
+	set LegraboxenPerToeleveringArray = ##class(vhTest.Integratie.Productie.Setup.ProductenPerToeleveringArray).%New()
+	
+	set Legraboxen = ##class(vhTest.Integratie.Productie.Setup.ProductInfoLijst).%New()
+	
+	do Legraboxen.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New($$$Taorbox1,$$$Aantal) )  
+	do Legraboxen.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New($$$Taorbox2,$$$Aantal) )  
+	do LegraboxenPerToeleveringArray.SetAt(Legraboxen,$$$ToeleveringID)
+
+	quit LegraboxenPerToeleveringArray
+]]></Implementation>
+</Method>
+
 <Method name="GeefConcept">
 <Private>1</Private>
 <ReturnType>DOM.PM.enu.TAORConcept</ReturnType>