Index: WSimpl/Vhisie4/Winkelkar/WinkelkarLijnConverter.cls.xml
===================================================================
diff -u -r40995 -r52106
--- WSimpl/Vhisie4/Winkelkar/WinkelkarLijnConverter.cls.xml	(.../WinkelkarLijnConverter.cls.xml)	(revision 40995)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarLijnConverter.cls.xml	(.../WinkelkarLijnConverter.cls.xml)	(revision 52106)
@@ -20,8 +20,9 @@
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	set ..EconConfiguratieConverter = $$$Inject(EconConfiguratieConverter,##class(WSimpl.Vhisie4.Winkelkar.EconConfiguratieConverter).%New())
-	set ..EconConverter = ##class(ECONimpl.PM.Maatwerk.AppsConverter).%New()
+	Set ..EconConfiguratieConverter = $$$Inject(EconConfiguratieConverter,##class(WSimpl.Vhisie4.Winkelkar.EconConfiguratieConverter).%New())
+	Set ..EconConverter = ##class(ECONimpl.PM.Maatwerk.AppsConverter).%New()
+	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -30,8 +31,9 @@
 <FormalSpec>WinkelkarLijn:WS.Vhisie4.Winkelkar.dto.WinkelkarLijn</FormalSpec>
 <ReturnType>APPS.EC.Winkelkar.dto.Lijn</ReturnType>
 <Implementation><![CDATA[
-	quit:WinkelkarLijn.%Extends("WS.Vhisie4.Winkelkar.dto.MaatwerkLijn") ..MaatwerkLijnNaarApps(WinkelkarLijn)
-	quit:WinkelkarLijn.%Extends("WS.Vhisie4.Winkelkar.dto.ProductLijn") ..ProductLijnNaarApps(WinkelkarLijn)
+	Quit:WinkelkarLijn.%Extends("WS.Vhisie4.Winkelkar.dto.MaatwerkLijn") ..MaatwerkLijnNaarApps(WinkelkarLijn)
+	Quit:WinkelkarLijn.%Extends("WS.Vhisie4.Winkelkar.dto.ProductLijn") ..ProductLijnNaarApps(WinkelkarLijn)
+	
 	Do ##class(TECH.ExceptionHandler).Throw( ##class(TECH.Exceptions.GeneralErrorException).%New( "Verkeerd type lijn : '" _ $classname(WinkelkarLijn) _ "'." ) )
 ]]></Implementation>
 </Method>
@@ -40,8 +42,9 @@
 <FormalSpec>WinkelkarLijn:APPS.EC.Winkelkar.dto.Lijn</FormalSpec>
 <ReturnType>WS.Vhisie4.Winkelkar.dto.WinkelkarLijn</ReturnType>
 <Implementation><![CDATA[
-	quit:WinkelkarLijn.%Extends("APPS.EC.Winkelkar.dto.MaatwerkLijn") ..MaatwerkLijnNaarVhisie4(WinkelkarLijn)
-	quit:WinkelkarLijn.%Extends("APPS.EC.Winkelkar.dto.ProductLijn") ..ProductLijnNaarVhisie4(WinkelkarLijn)
+	Quit:WinkelkarLijn.%Extends("APPS.EC.Winkelkar.dto.MaatwerkLijn") ..MaatwerkLijnNaarVhisie4(WinkelkarLijn)
+	Quit:WinkelkarLijn.%Extends("APPS.EC.Winkelkar.dto.ProductLijn") ..ProductLijnNaarVhisie4(WinkelkarLijn)
+	
 	Do ##class(TECH.ExceptionHandler).Throw( ##class(TECH.Exceptions.GeneralErrorException).%New( "Verkeerd type lijn : '" _ $classname(WinkelkarLijn) _ "'." ) )
 ]]></Implementation>
 </Method>
@@ -52,10 +55,12 @@
 <ReturnType>APPS.EC.Winkelkar.dto.MaatwerkLijn</ReturnType>
 <Implementation><![CDATA[
 	#dim AppsMaatwerkLijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = ..EconConfiguratieConverter.Convert(Vhisie4MaatwerkLijn.EconConfiguratie)
-	set AppsMaatwerkLijn.TotaalPrijs = Vhisie4MaatwerkLijn.TotaalPrijs
-	set AppsMaatwerkLijn.EenheidPrijs = Vhisie4MaatwerkLijn.EenheidPrijs
-	set AppsMaatwerkLijn.ExterneId = Vhisie4MaatwerkLijn.Id
-	quit AppsMaatwerkLijn
+	
+	Set AppsMaatwerkLijn.TotaalPrijs = Vhisie4MaatwerkLijn.TotaalPrijs
+	Set AppsMaatwerkLijn.EenheidPrijs = Vhisie4MaatwerkLijn.EenheidPrijs
+	Set AppsMaatwerkLijn.ExterneId = Vhisie4MaatwerkLijn.Id
+	
+	Quit AppsMaatwerkLijn
 ]]></Implementation>
 </Method>
 
@@ -64,15 +69,17 @@
 <Private>1</Private>
 <ReturnType>WS.Vhisie4.Winkelkar.dto.MaatwerkLijn</ReturnType>
 <Implementation><![CDATA[
-	set Vhisie4MaatwerkLijn = ##class(WS.Vhisie4.Winkelkar.dto.MaatwerkLijn).%New()
-	set Vhisie4MaatwerkLijn.EconConfiguratie = ..EconConverter.ConverteerAppsNaarEcon(AppsMaatwerkLijn.IngegevenKenmerken).ToArray()
+	#dim Vhisie4MaatwerkLijn As WS.Vhisie4.Winkelkar.dto.MaatwerkLijn = ##class(WS.Vhisie4.Winkelkar.dto.MaatwerkLijn).%New()
+	
+	Set Vhisie4MaatwerkLijn.EconConfiguratie = ..EconConverter.ConverteerAppsNaarEcon(AppsMaatwerkLijn.IngegevenKenmerken).ToArray()
+	Set Vhisie4MaatwerkLijn.TotaalPrijs = AppsMaatwerkLijn.TotaalPrijs
+	Set Vhisie4MaatwerkLijn.EenheidPrijs = AppsMaatwerkLijn.EenheidPrijs
+	Set Vhisie4MaatwerkLijn.Id = AppsMaatwerkLijn.ExterneId
+	
 	Do Vhisie4MaatwerkLijn.EconConfiguratie.SetAt(AppsMaatwerkLijn.Aantal,"Data.Lijn.Aantal")
 	Do Vhisie4MaatwerkLijn.EconConfiguratie.SetAt(AppsMaatwerkLijn.ProjectReferentie,"Data.Lijn.Referentie")
 	
-	set Vhisie4MaatwerkLijn.TotaalPrijs = AppsMaatwerkLijn.TotaalPrijs
-	set Vhisie4MaatwerkLijn.EenheidPrijs = AppsMaatwerkLijn.EenheidPrijs
-	set Vhisie4MaatwerkLijn.Id = AppsMaatwerkLijn.ExterneId
-	quit Vhisie4MaatwerkLijn
+	Quit Vhisie4MaatwerkLijn
 ]]></Implementation>
 </Method>
 
@@ -81,7 +88,7 @@
 <Private>1</Private>
 <ReturnType>APPS.EC.Winkelkar.dto.ProductLijn</ReturnType>
 <Implementation><![CDATA[
-	Set AppsProductLijn = ##class(APPS.EC.Winkelkar.dto.ProductLijn).%New()
+	#dim AppsProductLijn As APPS.EC.Winkelkar.dto.ProductLijn = ##class(APPS.EC.Winkelkar.dto.ProductLijn).%New()
 	
 	Set AppsProductLijn.Aantal = Vhisie4ProductLijn.Aantal
 	Set AppsProductLijn.TotaalPrijs = Vhisie4ProductLijn.TotaalPrijs
@@ -97,7 +104,7 @@
 <Private>1</Private>
 <ReturnType>WS.Vhisie4.Winkelkar.dto.ProductLijn</ReturnType>
 <Implementation><![CDATA[
-	Set Vhisie4ProductLijn = ##class(WS.Vhisie4.Winkelkar.dto.ProductLijn).%New()
+	#dim Vhisie4ProductLijn As WS.Vhisie4.Winkelkar.dto.ProductLijn = ##class(WS.Vhisie4.Winkelkar.dto.ProductLijn).%New()
 	
 	Set Vhisie4ProductLijn.Aantal = AppsProductLijn.Aantal
 	Set Vhisie4ProductLijn.TotaalPrijs = AppsProductLijn.TotaalPrijs