Index: vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderListBased/Base.cls.xml
===================================================================
diff -u -r32582 -r32583
--- vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderListBased/Base.cls.xml	(.../Base.cls.xml)	(revision 32582)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderListBased/Base.cls.xml	(.../Base.cls.xml)	(revision 32583)
@@ -117,6 +117,15 @@
 <FormalSpec>QueueID:%Integer,ToeleveringID:%String,ProductID:%String,TotaalAantal:%Integer,TLUNr:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
+	Do ..VoegToeData(QueueID, ToeleveringID, ProductID, TotaalAantal, TLUNr)
+	Do ..MockToelevering(ToeleveringID, TotaalAantal, TLUNr)
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeData">
+<FormalSpec>QueueID:%Integer,ToeleveringID:%String,ProductID:%String,TotaalAantal:%Integer,TLUNr:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
 	#dim Counter As %Integer 
 	
 	For Counter = 1 : 1 : TotaalAantal {
@@ -132,7 +141,13 @@
 		
 		Do ..SequenceData.Insert(ProductieSequentieItem)
 	}
-	
+]]></Implementation>
+</Method>
+
+<Method name="MockToelevering">
+<FormalSpec>ToeleveringID:%String,TotaalAantal:%Integer,TLUNr:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
 	Set ^TO("IU", ToeleveringID, TLUNr) = ""
 	
 	#dim ToeleveringAPI As DOM.AKP.ToeleveringAPI = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI()