Index: vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/SequentieOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml
===================================================================
diff -u -r71704 -r71767
--- vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/SequentieOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml	(.../Test.cls.xml)	(revision 71704)
+++ vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/SequentieOptiesGenerator/GenereerOptiesVoorLade/Test.cls.xml	(.../Test.cls.xml)	(revision 71767)
@@ -18,13 +18,13 @@
 	Do $$$AssertEquals(Resultaat.Size, 2)
 	
 	#dim OptieSequentieBinnenToelevering As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions = Resultaat.GetAt(1)	
-	Do $$$AssertEquals(OptieSequentieBinnenToelevering.Omschrijving, "LADE 00" _ SequentieNummer)
-	Do $$$AssertEquals(OptieSequentieBinnenToelevering.Naam, "00" _ SequentieNummer _ "-SEQ")
+	Do $$$AssertEquals(OptieSequentieBinnenToelevering.Omschrijving, "LADE 00" _ SequentieNummerBinnenToelevering)
+	Do $$$AssertEquals(OptieSequentieBinnenToelevering.Naam, "00" _ SequentieNummerBinnenToelevering _ "-SEQ")
 	Do $$$AssertEquals(OptieSequentieBinnenToelevering.Waarde, SequentieNummerBinnenToelevering)
 	
 	#dim OptieSequentieBinnenBatch As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions = Resultaat.GetAt(2)
-	Do $$$AssertEquals(OptieSequentieBinnenBatch.Omschrijving, "LADE 00" _ SequentieNummer)
-	Do $$$AssertEquals(OptieSequentieBinnenBatch.Naam, "00" _ SequentieNummer _ "-SEQbinnenbatch")
+	Do $$$AssertEquals(OptieSequentieBinnenBatch.Omschrijving, "LADE 00" _ SequentieNummerBinnenToelevering)
+	Do $$$AssertEquals(OptieSequentieBinnenBatch.Naam, "00" _ SequentieNummerBinnenToelevering _ "-SEQbinnenbatch")
 	Do $$$AssertEquals(OptieSequentieBinnenBatch.Waarde, SequentieNummer)
 ]]></Implementation>
 </Method>
Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/SequentieOptiesGenerator.cls.xml
===================================================================
diff -u -r71704 -r71767
--- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/SequentieOptiesGenerator.cls.xml	(.../SequentieOptiesGenerator.cls.xml)	(revision 71704)
+++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/OptieGenerator/SequentieOptiesGenerator.cls.xml	(.../SequentieOptiesGenerator.cls.xml)	(revision 71767)
@@ -10,30 +10,30 @@
 	Set Opties = ##class(%ListOfObjects).%New()
 	#dim SequentieNummerBinnenBatchGeformateerd = ..PrependNul(UitvoeringInfo.SequentieNummer)
 	
-	Do Opties.Insert(..GeefOptieVoorLadeSequentieInfoBinnenToelevering(SequentieNummerBinnenBatchGeformateerd, UitvoeringInfo.SequentieNummerBinnenToelevering))
-	Do Opties.Insert(..GeefOptieVoorLadeSequentieBinnenBatch(UitvoeringInfo.SequentieNummer))
+	Do Opties.Insert(..GeefOptieVoorLadeSequentieInfoBinnenToelevering(UitvoeringInfo.SequentieNummerBinnenToelevering))
+	Do Opties.Insert(..GeefOptieVoorLadeSequentieBinnenBatch(UitvoeringInfo.SequentieNummerBinnenToelevering, UitvoeringInfo.SequentieNummer))
 	
 	Quit Opties
 ]]></Implementation>
 </Method>
 
 <Method name="GeefOptieVoorLadeSequentieInfoBinnenToelevering">
-<FormalSpec>SequentieNummerBinnenBatchGeformateerd:%String,SequentieNummerBinnenToelevering:%Integer</FormalSpec>
+<FormalSpec>SequentieNummerBinnenToelevering:%Integer</FormalSpec>
 <Private>1</Private>
 <ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions</ReturnType>
 <Implementation><![CDATA[
 	#dim Naam As %String = "-SEQ"
-	Quit ..GeefOptieVoorLade(SequentieNummerBinnenBatchGeformateerd, Naam, SequentieNummerBinnenToelevering)
+	Quit ..GeefOptieVoorLade(..PrependNul(SequentieNummerBinnenToelevering), Naam, SequentieNummerBinnenToelevering)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefOptieVoorLadeSequentieBinnenBatch">
-<FormalSpec>SSequentieNummerBinnenBatchGeformateerd:%String</FormalSpec>
+<FormalSpec>SequentieNummerBinnenToelevering:%Integer,SequentieNummerBinnenBatchGeformateerd:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions</ReturnType>
 <Implementation><![CDATA[
 	#dim Naam = "-SEQbinnenbatch"
-	Quit ..GeefOptieVoorLade(SSequentieNummerBinnenBatchGeformateerd, Naam, SSequentieNummerBinnenBatchGeformateerd)
+	Quit ..GeefOptieVoorLade(..PrependNul(SequentieNummerBinnenToelevering), Naam, SequentieNummerBinnenBatchGeformateerd)
 ]]></Implementation>
 </Method>
 </Class>