Index: vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/WijzigMaatwerklijn/Test.cls.xml
===================================================================
diff -u -r31461 -r33645
--- vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/WijzigMaatwerklijn/Test.cls.xml	(.../Test.cls.xml)	(revision 31461)
+++ vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/WijzigMaatwerklijn/Test.cls.xml	(.../Test.cls.xml)	(revision 33645)
@@ -64,11 +64,9 @@
 <Implementation><![CDATA[
 	do ##super(aTestName)
 	
-	#dim WinkelkarPrijsUpdater As APPS.EC.impl.WinkelkarPrijsUpdater = ##class(APPS.EC.impl.WinkelkarPrijsUpdater).%New()
-	
 	set ..MaatwerkLijnInputValidatorMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService.MaatwerklijnInputValidator).%New()
 	set ..MagMaatwerkLijnGewijzigdWordenBepalerMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService.MagMaatwerklijnGewijzigdWorden).%New()
-	set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(..MagMaatwerkLijnGewijzigdWordenBepalerMock, WinkelkarPrijsUpdater, ..MaatwerkLijnInputValidatorMock)
+	set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(..MagMaatwerkLijnGewijzigdWordenBepalerMock, ..MaatwerkLijnInputValidatorMock)
 	set ..CommonAPI = ##class(vhUnitTest.APPS.EC.Winkelkar.WinkelkarService.WijzigMaatwerklijn.CommonAPIMock).MockInstance()
 	set ..TAORKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardLade()
 	set ..WinkelkarID = ..MaakWinkelkarEnGeefID()
Index: APPS/EC/Winkelkar/impl/ExterneWinkelkarService.cls.xml
===================================================================
diff -u -r33332 -r33645
--- APPS/EC/Winkelkar/impl/ExterneWinkelkarService.cls.xml	(.../ExterneWinkelkarService.cls.xml)	(revision 33332)
+++ APPS/EC/Winkelkar/impl/ExterneWinkelkarService.cls.xml	(.../ExterneWinkelkarService.cls.xml)	(revision 33645)
@@ -9,13 +9,13 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>MagMaatwerklijnGewijzigdWordenBepaler:APPS.EC.Winkelkar.impl.WinkelkarService.MagMaatwerklijnGewijzigdWorden="",WinkelkarPrijsUpdater:APPS.EC.impl.WinkelkarPrijsUpdater="",MaatwerklijnInputValidator:APPS.EC.Winkelkar.impl.WinkelkarService.MaatwerklijnInputValidator="",BestelService:DOM.VKP.Maatwerk.BestelService=""</FormalSpec>
+<FormalSpec>MagMaatwerklijnGewijzigdWordenBepaler:APPS.EC.Winkelkar.impl.WinkelkarService.MagMaatwerklijnGewijzigdWorden="",MaatwerklijnInputValidator:APPS.EC.Winkelkar.impl.WinkelkarService.MaatwerklijnInputValidator="",BestelService:DOM.VKP.Maatwerk.BestelService=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Do ##super(MagMaatwerklijnGewijzigdWordenBepaler, WinkelkarPrijsUpdater, MaatwerklijnInputValidator, BestelService)
+	Do ##super(MagMaatwerklijnGewijzigdWordenBepaler, MaatwerklijnInputValidator, BestelService)
 
 	Set ..KenmerkenAanpasser = ##class(APPS.EC.Winkelkar.impl.ExterneWinkelkarService.KenmerkenAanpasser).%New()
 
Index: vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/WijzigLijnAantal/Test.cls.xml
===================================================================
diff -u -r30406 -r33645
--- vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/WijzigLijnAantal/Test.cls.xml	(.../Test.cls.xml)	(revision 30406)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/WijzigLijnAantal/Test.cls.xml	(.../Test.cls.xml)	(revision 33645)
@@ -20,7 +20,7 @@
 
 	set ..IngegevenKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardBinnenlade()
 	set ..BestelService = ##class(vhTest.Mock.DOM.VKP.Maatwerk.BestelService).%New()
-	set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,,, ..BestelService)
+	set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New(,, ..BestelService)
 	
 	do ..MaakWinkelkar()
 ]]></Implementation>
Index: APPS/EC/Winkelkar/MaatwerkLijnBuilder.cls.xml
===================================================================
diff -u
--- APPS/EC/Winkelkar/MaatwerkLijnBuilder.cls.xml	(revision 0)
+++ APPS/EC/Winkelkar/MaatwerkLijnBuilder.cls.xml	(revision 33645)
@@ -0,0 +1,73 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.EC.Winkelkar.MaatwerkLijnBuilder">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="WinkelkarPrijsUpdater">
+<Type>APPS.EC.impl.WinkelkarPrijsUpdater</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>WinkelkarPrijsUpdater:APPS.EC.impl.WinkelkarPrijsUpdater</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..WinkelkarPrijsUpdater = $$$Implementation(WinkelkarPrijsUpdater, ##class(APPS.EC.impl.WinkelkarPrijsUpdater).%New())
+	quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="MaakMaatwerkLijn">
+<FormalSpec>IngegevenKenmerken:APPS.PM.Maatwerk.dto.IngegevenKenmerken,Aantal:%String,Winkelkar:DOM.EC.Winkelkar.Winkelkar,ProjectReferentie:%String</FormalSpec>
+<ReturnType>DOM.EC.Winkelkar.MaatwerkLijn</ReturnType>
+<Implementation><![CDATA[
+	#dim Lijn As DOM.EC.Winkelkar.MaatwerkLijn = ##class(DOM.EC.Winkelkar.MaatwerkLijn).%New()
+	
+	Do ..ZetMaatwerkLijnIngegevenKenmerken(Lijn, IngegevenKenmerken, Winkelkar)
+	Do ..ZetMaatwerkLijnAantalEnPrijs(Lijn, Aantal, Winkelkar)
+	Do Lijn.ZetProjectReferentie(ProjectReferentie)
+	
+	Quit Lijn
+]]></Implementation>
+</Method>
+
+<Method name="ZetMaatwerkLijnIngegevenKenmerken">
+<FormalSpec>Lijn:DOM.EC.Winkelkar.MaatwerkLijn,IngegevenKenmerkenDto:APPS.PM.Maatwerk.dto.IngegevenKenmerken,Winkelkar:DOM.EC.Winkelkar.Winkelkar</FormalSpec>
+<Implementation><![CDATA[
+	if Winkelkar.GeefApplicatieType() = ##class(APPS.common.enu.ApplicatieType).Extern() {
+		if ( IngegevenKenmerkenDto.GeefFamilie() = ##class(DOM.PM.enu.Familie).Lade() ) && ( IngegevenKenmerkenDto.GeefVariant() = ##class(DOM.PM.enu.Variant).LegraboxPure()) && ( IngegevenKenmerkenDto.Klasse = ##class(DOM.PM.enu.LBXKlasse).Lade() ) {
+			if $$$Not(IngegevenKenmerkenDto.LadeHoogte = IngegevenKenmerkenDto.RugHoogte) {
+			  	do ##class(vhLib.Logger).%New().InfoMail("Data Correctie","Rughoogte '"_IngegevenKenmerkenDto.RugHoogte_"' gelijkgesteld aan LadeHoogte '"_IngegevenKenmerkenDto.LadeHoogte_"'")
+			  	set IngegevenKenmerkenDto.RugHoogte = IngegevenKenmerkenDto.LadeHoogte
+			}
+		}
+	}
+	
+	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = ..MaakIngegevenKenmerkenDomeinObjectVanDto(IngegevenKenmerkenDto)
+	Do Lijn.ZetIngegevenKenmerken(IngegevenKenmerken)
+]]></Implementation>
+</Method>
+
+<Method name="ZetMaatwerkLijnAantalEnPrijs">
+<FormalSpec>Lijn:DOM.EC.Winkelkar.MaatwerkLijn,Aantal:%String,Winkelkar:DOM.EC.Winkelkar.Winkelkar</FormalSpec>
+<Implementation><![CDATA[
+	do Lijn.ZetAantal(Aantal)
+	Do ..WinkelkarPrijsUpdater.HerberekenLijn(Winkelkar,Lijn)
+]]></Implementation>
+</Method>
+
+<Method name="MaakIngegevenKenmerkenDomeinObjectVanDto">
+<FormalSpec>IngegevenKenmerkenDto:APPS.PM.Maatwerk.dto.IngegevenKenmerken</FormalSpec>
+<ReturnType>DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</ReturnType>
+<Implementation><![CDATA[
+	Set IngegevenKenmerkenConverter = ##class(APPS.PM.Maatwerk.impl.IngegevenKenmerkenConverter).%New()
+	Quit IngegevenKenmerkenConverter.NaarObject(IngegevenKenmerkenDto)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/VroegsteAfhaalDatum/Test.cls.xml
===================================================================
diff -u -r33584 -r33645
--- vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/VroegsteAfhaalDatum/Test.cls.xml	(.../Test.cls.xml)	(revision 33584)
+++ vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/VroegsteAfhaalDatum/Test.cls.xml	(.../Test.cls.xml)	(revision 33645)
@@ -8,7 +8,7 @@
 <Method name="Test : VroegsteAfhaalDatum geeft een datum terug">
 <Implementation><![CDATA[
 	#dim VroegsteLeverDatumBepalerSpy As vhTest.Spy.APPS.EC.impl.VroegsteLeverdatumBepaler = ##Class(vhTest.Spy.APPS.EC.impl.VroegsteLeverdatumBepaler).%New()
-	#dim WinkelKarService As vhUnitTest.APPS.EC.Winkelkar.WinkelkarService.SubClass = ##class(vhUnitTest.APPS.EC.Winkelkar.WinkelkarService.SubClass).%New("","","","",VroegsteLeverDatumBepalerSpy)
+	#dim WinkelKarService As vhUnitTest.APPS.EC.Winkelkar.WinkelkarService.SubClass = ##class(vhUnitTest.APPS.EC.Winkelkar.WinkelkarService.SubClass).%New("","","",VroegsteLeverDatumBepalerSpy)
 	#dim VroegsteAfhaalDatum As %Date = WinkelKarService.GeefVroegsteAfhaalDatum("DummyWinkelKarID")
 
 	Do $$$AssertEquals(VroegsteAfhaalDatum,VroegsteLeverDatumBepalerSpy.VroegsteAfhaaldatum)
@@ -18,7 +18,7 @@
 <Method name="Test : VroegsteAfhaalDatum gebruikt verzendwijze afhalen">
 <Implementation><![CDATA[
 	#dim VroegsteLeverDatumBepalerSpy As vhTest.Spy.APPS.EC.impl.VroegsteLeverdatumBepaler = ##Class(vhTest.Spy.APPS.EC.impl.VroegsteLeverdatumBepaler).%New()
-	#dim WinkelKarService As vhUnitTest.APPS.EC.Winkelkar.WinkelkarService.SubClass = ##class(vhUnitTest.APPS.EC.Winkelkar.WinkelkarService.SubClass).%New("","","","",VroegsteLeverDatumBepalerSpy)
+	#dim WinkelKarService As vhUnitTest.APPS.EC.Winkelkar.WinkelkarService.SubClass = ##class(vhUnitTest.APPS.EC.Winkelkar.WinkelkarService.SubClass).%New("","","",VroegsteLeverDatumBepalerSpy)
 	#dim VroegsteAfhaalDatum As %Date = WinkelKarService.GeefVroegsteAfhaalDatum("DummyWinkelKarID")
 
 	Do $$$AssertTrue(VroegsteLeverDatumBepalerSpy.Verzendwijze.IsAfhaling())
Index: APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml
===================================================================
diff -u -r33580 -r33645
--- APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 33580)
+++ APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 33645)
@@ -10,11 +10,6 @@
 <Private>1</Private>
 </Property>
 
-<Property name="WinkelkarPrijsUpdater">
-<Type>APPS.EC.impl.WinkelkarPrijsUpdater</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="MaatwerklijnInputValidator">
 <Type>APPS.EC.Winkelkar.impl.WinkelkarService.MaatwerklijnInputValidator</Type>
 <Private>1</Private>
@@ -30,18 +25,25 @@
 <Private>1</Private>
 </Property>
 
+<Property name="MaatwerkLijnBuilder">
+<Type>APPS.EC.Winkelkar.MaatwerkLijnBuilder</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>MagMaatwerklijnGewijzigdWordenBepaler:APPS.EC.Winkelkar.impl.WinkelkarService.MagMaatwerklijnGewijzigdWorden,WinkelkarPrijsUpdater:APPS.EC.impl.WinkelkarPrijsUpdater,MaatwerklijnInputValidator:APPS.EC.Winkelkar.impl.WinkelkarService.MaatwerklijnInputValidator,BestelService:DOM.VKP.Maatwerk.BestelService,VroegsteLeverdatumBepaler:APPS.EC.impl.VroegsteLeverdatumBepaler</FormalSpec>
+<FormalSpec>MagMaatwerklijnGewijzigdWordenBepaler:APPS.EC.Winkelkar.impl.WinkelkarService.MagMaatwerklijnGewijzigdWorden,MaatwerklijnInputValidator:APPS.EC.Winkelkar.impl.WinkelkarService.MaatwerklijnInputValidator,BestelService:DOM.VKP.Maatwerk.BestelService,VroegsteLeverdatumBepaler:APPS.EC.impl.VroegsteLeverdatumBepaler</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..MagMaatwerklijnGewijzigdWordenBepaler = $$$Implementation(MagMaatwerklijnGewijzigdWordenBepaler,##class(APPS.EC.Winkelkar.impl.WinkelkarService.MagMaatwerklijnGewijzigdWorden).%New($this))
-	Set ..WinkelkarPrijsUpdater = $$$Implementation(WinkelkarPrijsUpdater, ##class(APPS.EC.impl.WinkelkarPrijsUpdater).%New())
 	Set ..MaatwerklijnInputValidator = $$$Implementation(MaatwerklijnInputValidator, ##class(APPS.EC.Winkelkar.impl.WinkelkarService.MaatwerklijnInputValidator).%New())
 	set ..BestelService = $$$Implementation(BestelService, ##class(DOM.VKP.Maatwerk.impl.BestelService).%New())
 	Set ..VroegsteLeverdatumBepaler = $$$Implementation(VroegsteLeverdatumBepaler, ##Class(APPS.EC.impl.VroegsteLeverdatumBepaler).%New())
+	
+	Set ..MaatwerkLijnBuilder = ##class(APPS.EC.Winkelkar.MaatwerkLijnBuilder).%New()
+	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -142,7 +144,7 @@
 <Implementation><![CDATA[
 	#dim Winkelkar As DOM.EC.Winkelkar.Winkelkar = ..OpenWinkelkar(WinkelkarID)
 	#dim AdminTekstUtils As APPS.common.AdminTekstUtils = ##class(APPS.ApplicatieContext).Instance().GeefCommonAPI().GeefAdminTekstUtils()
-	#dim MaatwerkLijn As DOM.EC.Winkelkar.MaatwerkLijn = ..MaakMaatwerkLijn(IngegevenKenmerken, Aantal, Winkelkar, AdminTekstUtils.MaakTekstAdminVriendelijk(ProjectReferentie))
+	#dim MaatwerkLijn As DOM.EC.Winkelkar.MaatwerkLijn = ..MaatwerkLijnBuilder.MaakMaatwerkLijn(IngegevenKenmerken, Aantal, Winkelkar, AdminTekstUtils.MaakTekstAdminVriendelijk(ProjectReferentie))
 	
 	Do ..VoegToeAanGroep(Winkelkar, GroepNaam, MaatwerkLijn)
 	Do MaatwerkLijn.Save()
@@ -181,21 +183,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="MaakMaatwerkLijn">
-<FormalSpec>IngegevenKenmerken:APPS.PM.Maatwerk.dto.IngegevenKenmerken,Aantal:%String,Winkelkar:DOM.EC.Winkelkar.Winkelkar,ProjectReferentie:%String</FormalSpec>
-<Private>1</Private>
-<ReturnType>DOM.EC.Winkelkar.MaatwerkLijn</ReturnType>
-<Implementation><![CDATA[
-	#dim Lijn As DOM.EC.Winkelkar.MaatwerkLijn = ##class(DOM.EC.Winkelkar.MaatwerkLijn).%New()
-	
-	Do ..ZetMaatwerkLijnIngegevenKenmerken(Lijn, IngegevenKenmerken, Winkelkar)
-	Do ..ZetMaatwerkLijnAantalEnPrijs(Lijn, Aantal, Winkelkar)
-	Do Lijn.ZetProjectReferentie(ProjectReferentie)
-	
-	Quit Lijn
-]]></Implementation>
-</Method>
-
 <Method name="OpenWinkelkar">
 <FormalSpec>WinkelkarID:%String</FormalSpec>
 <ReturnType>DOM.EC.Winkelkar.Winkelkar</ReturnType>
@@ -308,7 +295,7 @@
 		do ##class(TECH.ExceptionHandler).Catch(..E.InvalidInputException).Rethrow(..E.InvalidUserInputException, "Het opgegeven aantal '" _ Aantal _ "' is geen geldige bestelhoeveelheid.")
 	}
 
-	Do ..ZetMaatwerkLijnAantalEnPrijs(Lijn, Aantal, Winkelkar)
+	Do ..MaatwerkLijnBuilder.ZetMaatwerkLijnAantalEnPrijs(Lijn, Aantal, Winkelkar)
 	Do Lijn.Save()
 	Do Winkelkar.Save()
 ]]></Implementation>
@@ -343,8 +330,8 @@
 	#dim IngegevenKenmerkenStream As %Stream = KenmerkenNaarDtoVisitor.GeefIngegevenKenmerken(Lijn.GeefIngegevenKenmerken()).ToStream()
 	#dim OorspronkelijkAantalVanLijn As %Integer = Lijn.GeefAantal()
 	
-	Do ..ZetMaatwerkLijnIngegevenKenmerken(Lijn, IngegevenKenmerken, Winkelkar)
-	Do ..ZetMaatwerkLijnAantalEnPrijs(Lijn, Aantal, Winkelkar)
+	Do ..MaatwerkLijnBuilder.ZetMaatwerkLijnIngegevenKenmerken(Lijn, IngegevenKenmerken, Winkelkar)
+	Do ..MaatwerkLijnBuilder.ZetMaatwerkLijnAantalEnPrijs(Lijn, Aantal, Winkelkar)
 	If ProjectReferentie '= "" {
 		Do Lijn.ZetProjectReferentie(ProjectReferentie)
 	}
@@ -463,57 +450,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="ZetMaatwerkLijnIngegevenKenmerken">
-<FormalSpec>Lijn:DOM.EC.Winkelkar.MaatwerkLijn,IngegevenKenmerkenDto:APPS.PM.Maatwerk.dto.IngegevenKenmerken,Winkelkar:DOM.EC.Winkelkar.Winkelkar</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	/* Dirty hack : intracto doet blijkbaar nog wat verkeerd met wijziging van de LadeHoogte -> RugHoogte volgt niet */
-
-	if Winkelkar.GeefApplicatieType() = ##class(APPS.common.enu.ApplicatieType).Extern() {
-		if ( IngegevenKenmerkenDto.GeefFamilie() = ##class(DOM.PM.enu.Familie).Lade() ) && ( IngegevenKenmerkenDto.GeefVariant() = ##class(DOM.PM.enu.Variant).LegraboxPure()) && ( IngegevenKenmerkenDto.Klasse = ##class(DOM.PM.enu.LBXKlasse).Lade() ) {
-			if $$$Not(IngegevenKenmerkenDto.LadeHoogte = IngegevenKenmerkenDto.RugHoogte) {
-			  	do ##class(vhLib.Logger).%New().InfoMail("Data Correctie","Rughoogte '"_IngegevenKenmerkenDto.RugHoogte_"' gelijkgesteld aan LadeHoogte '"_IngegevenKenmerkenDto.LadeHoogte_"'")
-			  	set IngegevenKenmerkenDto.RugHoogte = IngegevenKenmerkenDto.LadeHoogte
-			}
-		}
-	}
-	
-	Do ..ControleerIKVolgensKenmerkMogelijkheden(IngegevenKenmerkenDto, Winkelkar)
-	
-	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = ..MaakIngegevenKenmerkenDomeinObjectVanDto(IngegevenKenmerkenDto)
-	Do Lijn.ZetIngegevenKenmerken(IngegevenKenmerken)
-]]></Implementation>
-</Method>
-
-<Method name="ControleerIKVolgensKenmerkMogelijkheden">
-<FormalSpec>IngegevenKenmerkenDto:APPS.PM.Maatwerk.dto.IngegevenKenmerken,Winkelkar:DOM.EC.Winkelkar.Winkelkar</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-
-	// !!!  Deze controle voorlopig nog niet uitvoeren !!! 
-	// Aparte story om de controles te vervolledigen en duidelijk te rapporteren 
-
-	Quit   
-	
- /*
-	#dim ConfiguratorService As APPS.EC.impl.ConfiguratorService.ConfiguratorServiceTemplate = ..GeefConfiguratorService(Winkelkar)
-	#dim Personality As DOM.common.Personality = Winkelkar.GeefPersonality()
-	#dim KlantIDVoorKenmerkkMogelijkheden As DOM.common.PartijID = ##class(APPS.EC.Winkelkar.WinkelkarService.impl.KlantBepaler).%New().GeefKlantID(Personality,Winkelkar.GeefKlantID())
-	#dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(KlantIDVoorKenmerkkMogelijkheden)
-	
-	Try {
-		Set IKVolgensKenmerkMogelijkhedenControleur=##class(APPS.PM.Maatwerk.impl.IngegevenKenmerkenVolgensKenmerkMogelijkhedenControleur).%New(ConfiguratorService)
-		Do IKVolgensKenmerkMogelijkhedenControleur.Controleer(IngegevenKenmerkenDto,Klant,Personality)
-	}
-	Catch {
-		// Alleen de InvalidInputException opvangen. 
-		#dim Exceptie As TECH.IException = ##class(TECH.ExceptionHandler).Catch(##class(TECH.Exceptions.InvalidInputException).%ClassName(1))
-		Do ##class(vhLib.Logger).%New("APPS.EC.Winkelkar.WinkelkarService").WarningMail("ControleerIKVolgensKenmerkMogelijkheden","Details over conflict tussen IK en kenmerkmogelijkheden : "_Exceptie.ToString())
-	}
- */
-]]></Implementation>
-</Method>
-
 <Method name="GeefConfiguratorService">
 <FormalSpec>Winkelkar:DOM.EC.Winkelkar.Winkelkar</FormalSpec>
 <Private>1</Private>
@@ -524,31 +460,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="ZetMaatwerkLijnAantalEnPrijs">
-<FormalSpec>Lijn:DOM.EC.Winkelkar.MaatwerkLijn,Aantal:%String,Winkelkar:DOM.EC.Winkelkar.Winkelkar</FormalSpec>
-<Private>1</Private>
-<Implementation><![CDATA[
-	do Lijn.ZetAantal(Aantal)
-	do ..BerekenMaatwerkLijnPrijs(Lijn, Winkelkar)
-]]></Implementation>
-</Method>
-
-<Method name="BerekenMaatwerkLijnPrijs">
-<FormalSpec>Lijn:DOM.EC.Winkelkar.MaatwerkLijn,Winkelkar:DOM.EC.Winkelkar.Winkelkar</FormalSpec>
-<Implementation><![CDATA[	Do ..WinkelkarPrijsUpdater.HerberekenLijn(Winkelkar,Lijn)
-]]></Implementation>
-</Method>
-
-<Method name="MaakIngegevenKenmerkenDomeinObjectVanDto">
-<FormalSpec>IngegevenKenmerkenDto:APPS.PM.Maatwerk.dto.IngegevenKenmerken</FormalSpec>
-<Private>1</Private>
-<ReturnType>DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</ReturnType>
-<Implementation><![CDATA[
-	Set IngegevenKenmerkenConverter = ##class(APPS.PM.Maatwerk.impl.IngegevenKenmerkenConverter).%New()
-	Quit IngegevenKenmerkenConverter.NaarObject(IngegevenKenmerkenDto)
-]]></Implementation>
-</Method>
-
 <Method name="VerplaatsLijnNaarGroepIndienNodig">
 <FormalSpec>Winkelkar:DOM.EC.Winkelkar.Winkelkar,Lijn:DOM.EC.Winkelkar.Lijn,GroepNaam:%String</FormalSpec>
 <Private>1</Private>
@@ -610,14 +521,14 @@
 	
 	If $L(LijnIDIndienBestaandeLijn) {
 		Set Lijn = WinkelkarImpl.GeefLijn(LijnIDIndienBestaandeLijn)
-		Do ..ZetMaatwerkLijnIngegevenKenmerken(Lijn, Kenmerken, WinkelkarImpl)
+		Do ..MaatwerkLijnBuilder.ZetMaatwerkLijnIngegevenKenmerken(Lijn, Kenmerken, WinkelkarImpl)
 		Do Lijn.ZetEenheidPrijsNettoExclBTW("")
 		Do Lijn.ZetTotaalPrijs("")
 		Do Lijn.ZetEindklantEenheidPrijsNettoExclBTW("")
 		Do Lijn.ZetEindklantTotaalPrijs("")
 		Do ..VerplaatsLijnNaarGroepIndienNodig(WinkelkarImpl, Lijn, GroepNaam)		
 	} Else {
-		#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = ..MaakIngegevenKenmerkenDomeinObjectVanDto(Kenmerken)
+		#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = ..MaatwerkLijnBuilder.MaakIngegevenKenmerkenDomeinObjectVanDto(Kenmerken)
 		Set Lijn = ##class(DOM.EC.Winkelkar.MaatwerkLijn).%New()
 		Do Lijn.ZetIngegevenKenmerken(IngegevenKenmerken)
 		Set Lijn.Groep = GroepNaam