Index: APPS/Halux/AAP/DnaCodeService.cls.xml
===================================================================
diff -u -r62410 -r63344
--- APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 62410)
+++ APPS/Halux/AAP/DnaCodeService.cls.xml	(.../DnaCodeService.cls.xml)	(revision 63344)
@@ -45,8 +45,13 @@
 <Private>1</Private>
 </Property>
 
+<Property name="IngegevenKenmerkenSpaceStepHelper">
+<Type>DOM.PM.Maatwerk.Calc.Common.impl.IngegevenKenmerkenSpaceStepHelper</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>DnaCodeRepository:DOM.Halux.AAP.DnaCodeRepository="",ProductTypeAPI:DOM.PM.impl.ProductTypeAPIimpl="",DnaCodeGenerator:APPS.Halux.AAP.DnaCodeGenerator="",ProjectSettingsApi:DOM.common.ProjectSettingsAPI="",ProductApi:DOM.PM.ProductAPI="",SequentieService:APPS.Halux.common.SequentieService="",Logger:vhLib.Logger="",ConfiguratorService:APPS.VKP.Maatwerk.impl.ConfiguratorService=""</FormalSpec>
+<FormalSpec>DnaCodeRepository:DOM.Halux.AAP.DnaCodeRepository="",ProductTypeAPI:DOM.PM.impl.ProductTypeAPIimpl="",DnaCodeGenerator:APPS.Halux.AAP.DnaCodeGenerator="",ProjectSettingsApi:DOM.common.ProjectSettingsAPI="",ProductApi:DOM.PM.ProductAPI="",SequentieService:APPS.Halux.common.SequentieService="",Logger:vhLib.Logger="",ConfiguratorService:APPS.VKP.Maatwerk.impl.ConfiguratorService="",IngegevenKenmerkenSpaceStepHelper:DOM.PM.Maatwerk.Calc.Common.impl.IngegevenKenmerkenSpaceStepHelper=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -61,6 +66,7 @@
 	Set ..SequentieService = $$$Inject(SequentieService, ##class(APPS.Halux.common.impl.SequentieService).%New())
 	Set ..Logger = $$$Inject(Logger, ##class(vhLib.Logger).%New())
 	Set ..ConfiguratorService = $$$Inject(ConfiguratorService,##class(APPS.VKP.Maatwerk.impl.ConfiguratorService).%New())
+	Set ..IngegevenKenmerkenSpaceStepHelper = $$$Inject(IngegevenKenmerkenSpaceStepHelper, ##class(DOM.PM.Maatwerk.Calc.Common.impl.IngegevenKenmerkenSpaceStepHelper).%New())
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -190,7 +196,11 @@
 	Set DnaCode.ToeleveringLijn = ToeleveringLijn.GeefID()
 	Set DnaCode.OrderId = ToeleveringLijn.GeefOrderID()
 	Set DnaCode.AanmaakTijdstip = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog()
-	If (..ProductApi.GeefProduct(ProductID).%Extends("DOM.PM.MaatwerkProduct")) {
+	#dim Product As DOM.PM.Product = ..ProductApi.GeefProduct(ProductID)
+	If (Product.%Extends("DOM.PM.MaatwerkProduct")) {
+		If ..IngegevenKenmerkenSpaceStepHelper.IsSpaceStep(Product.GeefIngegevenKenmerken()) {
+			Do ..MaakEnBewaarExtraDnaCodeVoorSpaceStep(ToeleveringLijn, Batch)
+		}
 		Set DnaCode.LadeCode = ..ProductApi.GeefProduct(ProductID).GeefDottedDossierCode()
 	}
 	If $IsObject(Batch) {
@@ -203,6 +213,33 @@
 ]]></Implementation>
 </Method>
 
+<Method name="MaakEnBewaarExtraDnaCodeVoorSpaceStep">
+<FormalSpec>ToeleveringLijn:DOM.AKP.ProductToeleveringLijn,Batch:APPS.Halux.common.impl.BatchImpl=""</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim ProductID As %String = ToeleveringLijn.GeefProductID()
+	#dim Toelevering As DOM.AKP.Toelevering= ToeleveringLijn.GeefToelevering()
+	Set DnaCode = ##class(DOM.Halux.AAP.DnaCode).%New()
+	Set DnaCode.ProductNummer = ##class(DOM.PM.Maatwerk.enu.GenerischProductID).LBXSSTV1()
+	Set DnaCode.DnaCode = ..DnaCodeGenerator.GenereerDnaCode("O")
+	Set DnaCode.Toelevering = Toelevering.GeefID()
+	Set DnaCode.KlantNummer = Toelevering.GeefKlantID()
+	Set DnaCode.ParentDnaCode = ""
+	Set DnaCode.Status = ##class(DOM.Halux.AAP.enu.DnaCodeStatus).Nieuw()
+	Set DnaCode.ToeleveringLijn = ToeleveringLijn.GeefID()
+	Set DnaCode.OrderId = ToeleveringLijn.GeefOrderID()
+	Set DnaCode.AanmaakTijdstip = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog()
+
+	If $IsObject(Batch) {
+		Set DnaCode.BatchId = Batch.GeefID()
+		Set DnaCode.IsWegwerpPallet = Batch.GeefIsWegwerpPallet(Toelevering.GeefID())
+		Set DnaCode.Status = ##class(DOM.Halux.AAP.enu.DnaCodeStatus).InBatch()
+		Set DnaCode.Lijn = Batch.GeefLijn()
+	}
+	Do ..DnaCodeRepository.Bewaar(DnaCode)
+]]></Implementation>
+</Method>
+
 <Method name="BepaalParentDnaCode">
 <FormalSpec>DnaCode:DOM.Halux.AAP.DnaCode,Batch:APPS.Halux.common.impl.BatchImpl=""</FormalSpec>
 <Private>1</Private>