Index: APPS/EC/Winkelkar/impl/LijnNaarDtoVisitor.cls.xml
===================================================================
diff -u -r39641 -r45805
--- APPS/EC/Winkelkar/impl/LijnNaarDtoVisitor.cls.xml	(.../LijnNaarDtoVisitor.cls.xml)	(revision 39641)
+++ APPS/EC/Winkelkar/impl/LijnNaarDtoVisitor.cls.xml	(.../LijnNaarDtoVisitor.cls.xml)	(revision 45805)
@@ -61,6 +61,7 @@
 
 <Method name="VerwerkProductLijn">
 <FormalSpec>ProductLijn:DOM.EC.Winkelkar.ProductLijn</FormalSpec>
+<ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	#Dim Lijn As APPS.EC.Winkelkar.dto.ProductLijn = ##class(APPS.EC.Winkelkar.dto.ProductLijn).%New()
 	Set Lijn.LijnID = ProductLijn.GeefID()
@@ -110,21 +111,15 @@
 <Method name="ZetCorrectePrijsOpLijn">
 <FormalSpec><![CDATA[&MaatwerkLijn:APPS.EC.Winkelkar.dto.MaatwerkLijn]]></FormalSpec>
 <Private>1</Private>
-<Implementation><![CDATA[
-	#Dim LijnPrijsBepaler As APPS.EC.Winkelkar.impl.LijnPrijsBepaler = ##class(APPS.EC.Winkelkar.impl.LijnPrijsBepaler).%New()
-	Do LijnPrijsBepaler.Process(.MaatwerkLijn, ..Winkelkar.Klant.ID)
+<Implementation><![CDATA[	Do ##class(APPS.EC.Winkelkar.impl.LijnPrijsBepaler).%New().Process(.MaatwerkLijn, ..Winkelkar.Klant.ID)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefIngegevenKenmerken">
 <FormalSpec>MaatwerkLijn:DOM.EC.Winkelkar.MaatwerkLijn</FormalSpec>
 <Private>1</Private>
 <ReturnType>APPS.PM.Maatwerk.dto.IngegevenKenmerken</ReturnType>
-<Implementation><![CDATA[
-	#Dim IngegevenKenmerkenConverter As APPS.PM.Maatwerk.impl.IngegevenKenmerkenConverter = ##class(APPS.PM.Maatwerk.impl.IngegevenKenmerkenConverter).%New()
-	#Dim IngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken = MaatwerkLijn.GeefIngegevenKenmerken()
-	
-	Quit IngegevenKenmerkenConverter.NaarDataTransferObject(IngegevenKenmerken)
+<Implementation><![CDATA[	Quit ##class(APPS.PM.Maatwerk.impl.IngegevenKenmerkenConverter).%New().NaarDataTransferObject(MaatwerkLijn.GeefIngegevenKenmerken())
 ]]></Implementation>
 </Method>