Index: APPS/Halux/PPS/Activiteit/impl/MVX/BatchNaarObjective.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Activiteit/impl/MVX/BatchNaarObjective.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Activiteit/impl/MVX/BatchNaarObjective.cls.xml	(revision 71927)
@@ -0,0 +1,70 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Activiteit.impl.MVX.BatchNaarObjective">
+<Super>APPS.Halux.PPS.Activiteit.VHossProductieSequentieAwareActiviteit</Super>
+
+<Parameter name="InformatieID">
+<Default>MVXBatchNaarObjective</Default>
+</Parameter>
+
+<Parameter name="Code">
+<Type>%String</Type>
+<Default>MVXBatchNaarObjective</Default>
+</Parameter>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Merivobox batch naar objective</Default>
+</Parameter>
+
+<Method name="MaakActiviteit">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>ActiviteitGroepID:%String</FormalSpec>
+<ReturnType>APPS.Halux.PPS.Activiteit.Activiteit</ReturnType>
+<Implementation><![CDATA[
+	#dim Activiteit As APPS.Halux.PPS.Activiteit.impl.MVX.BatchNaarObjective = ##super(ActiviteitGroepID)
+	Quit Activiteit
+]]></Implementation>
+</Method>
+
+<Method name="Init">
+<Private>1</Private>
+<Implementation><![CDATA[	Do ..VoegToeUitvoeringInfoLijstVerwerkerKlasseNaam(##class(APPS.Halux.PPS.Document.impl.MVX.BatchNaarObjective).%ClassName(1), ..#InformatieID)
+]]></Implementation>
+</Method>
+
+<Method name="MaakUitvoeringsInfo">
+<ReturnType>APPS.Halux.PPS.Activiteit.impl.common.dto.BatchNaarObjectiveUitvoeringInfo</ReturnType>
+<Implementation><![CDATA[	Quit ##class(APPS.Halux.PPS.Activiteit.impl.common.dto.BatchNaarObjectiveUitvoeringInfo).%New()
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkProductieSequentieItem">
+<FormalSpec>UitvoeringInfo:APPS.Halux.PPS.Activiteit.impl.common.dto.BatchNaarObjectiveUitvoeringInfo,Item:APPS.Halux.common.ProductieSequentieItem</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	Set UitvoeringInfo.SequentieNummerLade = Item.ToeleveringSequentieNummer
+	
+	Quit ..#Bewaren
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkVHOSSProductieSequentieItem">
+<FormalSpec>UitvoeringInfo:APPS.Halux.PPS.Activiteit.impl.common.dto.BatchNaarObjectiveUitvoeringInfo,Item:APPS.Halux.common.VHOSSProductieSequentieItem</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	Set UitvoeringInfo.SequentieNummerLade = Item.SequentieNummer
+	
+	Quit ..#Bewaren
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+</Storage>
+</Class>
+
+
+</Export>
Index: APPS/Halux/common/impl/ProductieSequentie/Merivobox.cls.xml
===================================================================
diff -u -r63749 -r71927
--- APPS/Halux/common/impl/ProductieSequentie/Merivobox.cls.xml	(.../Merivobox.cls.xml)	(revision 63749)
+++ APPS/Halux/common/impl/ProductieSequentie/Merivobox.cls.xml	(.../Merivobox.cls.xml)	(revision 71927)
@@ -50,7 +50,8 @@
 		Set Item.SequentieNummer = $Increment(SequentieNummer)
 		Set Item.GroepSequentieNummer = Item.SequentieNummer
 		Set Item.ToeleveringSequentieNummer = ..FrequentieTabel.Verhoog(Item.ToeleveringID)
-			
+		
+		Do ##class(APPS.Halux.AAP.DnaCodeService).%New().VulInSequentieId(Item.SequentieNummer, Item.BatchID, Item.ToeleveringID, Item.ToeleveringLijnID)
 		Do GesorteerdeProductieSequentieItems.Insert(Item)
 	}
 	
Index: APPS/Halux/PPS/Document/impl/MVX/BatchNaarObjective.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Document/impl/MVX/BatchNaarObjective.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Document/impl/MVX/BatchNaarObjective.cls.xml	(revision 71927)
@@ -0,0 +1,25 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Document.impl.MVX.BatchNaarObjective">
+<Super>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective</Super>
+
+<Method name="GeefBatchNaarObjectiveDataGenerator">
+<Private>1</Private>
+<ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.BatchNaarObjectiveDataGenerator</ReturnType>
+<Implementation><![CDATA[	Quit ##class(APPS.Halux.PPS.Document.impl.MVX.BatchNaarObjective.BatchNaarObjectiveDataGeneratorMvx).%New()
+]]></Implementation>
+</Method>
+
+<Method name="BevatVhossVerpakking">
+<FormalSpec>ProductId:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	#dim Verpakking As DOM.PM.enu.MVXVerpakkingType = ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI().GeefMerivoboxProduct(ProductId).GeefVerpakking()
+	Quit (Verpakking = ##class(DOM.PM.enu.MVXVerpakkingType).VHoss())
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/Document/impl/MVX/BatchNaarObjective/BatchNaarObjectiveDataGeneratorMvx.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Document/impl/MVX/BatchNaarObjective/BatchNaarObjectiveDataGeneratorMvx.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Document/impl/MVX/BatchNaarObjective/BatchNaarObjectiveDataGeneratorMvx.cls.xml	(revision 71927)
@@ -0,0 +1,34 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Document.impl.MVX.BatchNaarObjective.BatchNaarObjectiveDataGeneratorMvx">
+<Super>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.BatchNaarObjectiveDataGenerator</Super>
+
+<Property name="AlgemeneKenmerkenOptiesGenerator">
+<Type>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.OptieGenerator.AlgemeneKenmerkenOptiesGenerator</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Do ##super()
+	
+	Set ..AlgemeneKenmerkenOptiesGenerator = ##class(APPS.Halux.PPS.Document.impl.MVX.BatchNaarObjective.OptieGenerator.AlgemeneKenmerkenOptiesGeneratorMvx).%New()
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GenereerAlgemeneKenmerkenOpties">
+<FormalSpec>Toelevering:DOM.AKP.Toelevering,UitvoeringInfo:APPS.Halux.PPS.Activiteit.impl.common.dto.BatchNaarObjectiveUitvoeringInfo</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[	Quit ..AlgemeneKenmerkenOptiesGenerator.GenereerOptiesVoorLade(Toelevering, UitvoeringInfo)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/Document/impl/MVX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorMvx.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Document/impl/MVX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorMvx.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Document/impl/MVX/BatchNaarObjective/OptieGenerator/AlgemeneKenmerkenOptiesGeneratorMvx.cls.xml	(revision 71927)
@@ -0,0 +1,87 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Document.impl.MVX.BatchNaarObjective.OptieGenerator.AlgemeneKenmerkenOptiesGeneratorMvx">
+<Super>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.OptieGenerator.AlgemeneKenmerkenOptiesGenerator</Super>
+
+<Method name="%OnNew">
+<FormalSpec>ProductApi:DOM.PM.ProductAPI="",AfbeeldingService:APPS.PM.Maatwerk.impl.AfbeeldingService="",IngegevenKenmerkenTypeApi:DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Do ##super(ProductApi, AfbeeldingService, IngegevenKenmerkenTypeApi)
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefOptieVoorBodemHoogte">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Product:DOM.PM.MaatwerkProduct,SequentieNummerLade:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions</ReturnType>
+<Implementation><![CDATA[
+	#dim BodemHoogte As %Integer = ""
+	
+	Quit ..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Bodemhoogte", BodemHoogte)
+]]></Implementation>
+</Method>
+
+<Method name="GeefOptieVoorBodemBreedte">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Product:DOM.PM.MaatwerkProduct,SequentieNummerLade:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions</ReturnType>
+<Implementation><![CDATA[
+	#dim BodemBreedte As %Decimal = ""
+		
+	Quit ..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Bodembreedte", BodemBreedte)
+]]></Implementation>
+</Method>
+
+<Method name="GeefOptieVoorRugBreedte">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Product:DOM.PM.MaatwerkProduct,SequentieNummerLade:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions</ReturnType>
+<Implementation><![CDATA[
+	#dim RugBreedte As %String = ""
+	
+	Quit ..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Rugbreedte", RugBreedte)
+]]></Implementation>
+</Method>
+
+<Method name="GeefOptieVoorRugHoogteInMm">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Product:DOM.PM.MaatwerkProduct,SequentieNummerLade:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions</ReturnType>
+<Implementation><![CDATA[
+	#dim RugHoogteInMm As %String = ""
+	
+	Quit ..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Rughoogteinmm", RugHoogteInMm)
+]]></Implementation>
+</Method>
+
+<Method name="GeefOptieStalenRugBreedte">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Product:DOM.PM.MaatwerkProduct,SequentieNummerLade:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions</ReturnType>
+<Implementation><![CDATA[
+	#dim StalenRugBreedte As %String = ""
+	
+	Quit ..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Stalenrugbreedte", StalenRugBreedte)
+]]></Implementation>
+</Method>
+
+<Method name="GeefOptiePlaatmateriaalKleuren">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Product:DOM.PM.MaatwerkProduct,SequentieNummerLade:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveOptions</ReturnType>
+<Implementation><![CDATA[
+	#dim PlaatmateriaalKleuren As %String = ""
+	
+	Quit ..GeefOptieVoorLade(SequentieNummerLade, "-" _ "Plaatmateriaalkleuren", PlaatmateriaalKleuren)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>