Index: APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator.cls.xml
===================================================================
diff -u -r71441 -r71442
--- APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator.cls.xml	(.../ProductOptiesGenerator.cls.xml)	(revision 71441)
+++ APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/ProductOptiesGenerator.cls.xml	(.../ProductOptiesGenerator.cls.xml)	(revision 71442)
@@ -32,12 +32,11 @@
 <ReturnType>%ListOfObjects</ReturnType>
 <Implementation><![CDATA[
 	Set Opties = ##class(%ListOfObjects).%New()
-	#dim SequentieNummerBinnenToelevering As %Integer = UitvoeringInfo.SequentieNummerBinnenToelevering	
-	#dim SequentieNummerBinnenToeleveringGeformateerd = ..PrependNul(UitvoeringInfo.SequentieNummerBinnenToelevering)	
+	#dim SequentieNummerBinnenToelevering As %Integer = UitvoeringInfo.SequentieNummerBinnenToelevering
 	#dim Product As DOM.PM.MaatwerkProduct = ..ProductApi.GeefProduct(UitvoeringInfo.ProductID)	
 	
-	Do ##class(TECH.ListUtils).AppendList(Opties, ..GeefOptiesVoorDnaCodeEnPin(Toelevering.GeefID(), Product.GeefID(), UitvoeringInfo.SequentieNummer, SequentieNummerBinnenToeleveringGeformateerd))
-	Do ##class(TECH.ListUtils).AppendList(Opties, ..GeefOptiesVoorAxInventTransIdEnAxConfigId(Toelevering, Product, SequentieNummerBinnenToeleveringGeformateerd))
+	Do ##class(TECH.ListUtils).AppendList(Opties, ..GeefOptiesVoorDnaCodeEnPin(Toelevering.GeefID(), Product.GeefID(), UitvoeringInfo.SequentieNummer, SequentieNummerBinnenToelevering))
+	Do ##class(TECH.ListUtils).AppendList(Opties, ..GeefOptiesVoorAxInventTransIdEnAxConfigId(Toelevering, Product, SequentieNummerBinnenToelevering))
 		
 	Do Opties.Insert(..GeefOptieVoorLade(..PrependNul(SequentieNummerBinnenToelevering), "-" _ "Korttekst", Product.GeefKorttekst()))
 	Do Opties.Insert(..GeefOptieVoorLade(..PrependNul(SequentieNummerBinnenToelevering), "-" _ "Langtekst", Product.GeefLangtekst()))
Index: APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/SequentieOptiesGenerator.cls.xml
===================================================================
diff -u -r71427 -r71442
--- APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/SequentieOptiesGenerator.cls.xml	(.../SequentieOptiesGenerator.cls.xml)	(revision 71427)
+++ APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/SequentieOptiesGenerator.cls.xml	(.../SequentieOptiesGenerator.cls.xml)	(revision 71442)
@@ -9,7 +9,6 @@
 <Implementation><![CDATA[
 	Set Opties = ##class(%ListOfObjects).%New()
 	#dim SequentieNummerBinnenBatchGeformateerd = ..PrependNul(UitvoeringInfo.SequentieNummer)
-	#dim SequentieNummerBinnenToeleveringGeformateerd = ..PrependNul(UitvoeringInfo.SequentieNummerBinnenToelevering)
 	
 	Do Opties.Insert(..GeefOptieVoorLadeSequentieInfoBinnenToelevering(SequentieNummerBinnenBatchGeformateerd, UitvoeringInfo.SequentieNummerBinnenToelevering))
 	Do Opties.Insert(..GeefOptieVoorLadeSequentieBinnenBatch(SequentieNummerBinnenBatchGeformateerd))
Index: APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/KenmerkenOptiesGenerator.cls.xml
===================================================================
diff -u -r71441 -r71442
--- APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/KenmerkenOptiesGenerator.cls.xml	(.../KenmerkenOptiesGenerator.cls.xml)	(revision 71441)
+++ APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/KenmerkenOptiesGenerator.cls.xml	(.../KenmerkenOptiesGenerator.cls.xml)	(revision 71442)
@@ -57,28 +57,28 @@
 <ReturnType>%ListOfObjects</ReturnType>
 <Implementation><![CDATA[
 	Set Opties = ##class(%ListOfObjects).%New()
-	#dim SequentieNummerBinnenToeleveringGeformateerdGeformateerd = ..PrependNul(UitvoeringInfo.SequentieNummerBinnenToelevering)	
+	#dim SequentieNummerBinnenToelevering = UitvoeringInfo.SequentieNummerBinnenToelevering
 	#dim Product As DOM.PM.MaatwerkProduct = ..ProductApi.GeefProduct(UitvoeringInfo.ProductID)
 	#dim Ingegevenkenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = Product.GeefIngegevenKenmerken()
 	
-	Do ##class(TECH.ListUtils).AppendList(Opties, ..GeefOptieVoorLadesAlgemeneKenmerken(Product, Ingegevenkenmerken, SequentieNummerBinnenToeleveringGeformateerdGeformateerd))
-	Do ##class(TECH.ListUtils).AppendList(Opties, ..GeefOptieVoorLadesBijkomend(Product, Ingegevenkenmerken, SequentieNummerBinnenToeleveringGeformateerdGeformateerd))
+	Do ##class(TECH.ListUtils).AppendList(Opties, ..GeefOptieVoorLadesAlgemeneKenmerken(Product, Ingegevenkenmerken, SequentieNummerBinnenToelevering))
+	Do ##class(TECH.ListUtils).AppendList(Opties, ..GeefOptieVoorLadesBijkomend(Product, Ingegevenkenmerken, SequentieNummerBinnenToelevering))
 	
 	Quit Opties
 ]]></Implementation>
 </Method>
 
 <Method name="GeefOptieVoorLadesAlgemeneKenmerken">
-<FormalSpec>Product:DOM.PM.MaatwerkProduct,Ingegevenkenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,SequentieNummerBinnenToeleveringGeformateerdGeformateerd:%Integer</FormalSpec>
+<FormalSpec>Product:DOM.PM.MaatwerkProduct,Ingegevenkenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,SequentieNummerBinnenToelevering:%Integer</FormalSpec>
 <Private>1</Private>
 <ReturnType>%ListOfObjects</ReturnType>
 <Implementation><![CDATA[
 	Set LijstAlgemeneOpties = ##class(%ListOfObjects).%New()
 		
-	Do LijstAlgemeneOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToeleveringGeformateerdGeformateerd, "-AdminProductNummer", Product.GeefID()))
-	Do LijstAlgemeneOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToeleveringGeformateerdGeformateerd, "-Afbeeldingcode", ..AfbeeldingService.GeefImageCodeVoorIngegevenKenmerken(Ingegevenkenmerken)))
-	Do LijstAlgemeneOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToeleveringGeformateerdGeformateerd, "-Ladecode", Product.GeefLadeCode()))
-	Do ##class(TECH.ListUtils).AppendList(LijstAlgemeneOpties, ..GeefOptiesIngegegevenKenmerken(Ingegevenkenmerken, SequentieNummerBinnenToeleveringGeformateerdGeformateerd))
+	Do LijstAlgemeneOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-AdminProductNummer", Product.GeefID()))
+	Do LijstAlgemeneOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-Afbeeldingcode", ..AfbeeldingService.GeefImageCodeVoorIngegevenKenmerken(Ingegevenkenmerken)))
+	Do LijstAlgemeneOpties.Insert(..GeefOptieVoorLade(SequentieNummerBinnenToelevering, "-Ladecode", Product.GeefLadeCode()))
+	Do ##class(TECH.ListUtils).AppendList(LijstAlgemeneOpties, ..GeefOptiesIngegegevenKenmerken(Ingegevenkenmerken, SequentieNummerBinnenToelevering))
 	
 	Quit LijstAlgemeneOpties
 ]]></Implementation>
Index: APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/RollenEnStuklijstOptiesGenerator.cls.xml
===================================================================
diff -u -r71439 -r71442
--- APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/RollenEnStuklijstOptiesGenerator.cls.xml	(.../RollenEnStuklijstOptiesGenerator.cls.xml)	(revision 71439)
+++ APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator/RollenEnStuklijstOptiesGenerator.cls.xml	(.../RollenEnStuklijstOptiesGenerator.cls.xml)	(revision 71442)
@@ -27,7 +27,7 @@
 <ReturnType>%ListOfObjects</ReturnType>
 <Implementation><![CDATA[
 	Set Opties = ##class(%ListOfObjects).%New()
-	#dim SequentieNummerBinnenToeleveringGeformateerd = ..PrependNul(UitvoeringInfo.SequentieNummerBinnenToelevering)
+	#dim SequentieNummerBinnenToelevering = UitvoeringInfo.SequentieNummerBinnenToelevering
 	
 	#dim Product As DOM.PM.MaatwerkProduct = ..ProductApi.GeefProduct(UitvoeringInfo.ProductID)	
 	#dim HalffabItemsBoom As DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom = Product.GeefHalffabItemsBoom()
@@ -37,8 +37,8 @@
 	While (HalffabItemsIterator.HasNext()) {
 		#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = HalffabItemsIterator.Next()
 		If $$$Not(HalffabItem.%Extends("DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem")) {
-			Do Opties.Insert(..GeefOptieVoorLadeVoorRol(HalffabItem, SequentieNummerBinnenToeleveringGeformateerd))
-			Do Opties.Insert(..GeefOptieVoorLadeVoorStuklijst(HalffabItem, SequentieNummerBinnenToeleveringGeformateerd, $Increment(Index)))
+			Do Opties.Insert(..GeefOptieVoorLadeVoorRol(HalffabItem, SequentieNummerBinnenToelevering))
+			Do Opties.Insert(..GeefOptieVoorLadeVoorStuklijst(HalffabItem, SequentieNummerBinnenToelevering, $Increment(Index)))
 		}
 	}
 	
Index: APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator.cls.xml
===================================================================
diff -u -r71439 -r71442
--- APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator.cls.xml	(.../OptieGenerator.cls.xml)	(revision 71439)
+++ APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective/OptieGenerator.cls.xml	(.../OptieGenerator.cls.xml)	(revision 71442)
@@ -29,7 +29,7 @@
 <FormalSpec>SequentieNummer:%String,Naam:%String,Waarde:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>APPS.Halux.PPS.Document.impl.LBX.BatchNaarObjective.dto.BatchNaarObjectiveOptions</ReturnType>
-<Implementation><![CDATA[	Quit ..GeefOptie("LADE " _ SequentieNummer, SequentieNummer _ Naam, Waarde)
+<Implementation><![CDATA[	Quit ..GeefOptie("LADE " _ ..PrependNul(SequentieNummer), ..PrependNul(SequentieNummer) _ Naam, Waarde)
 ]]></Implementation>
 </Method>