Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn.cls.xml
===================================================================
diff -u -r49486 -r52094
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn.cls.xml	(.../BewaarMaatwerkLijn.cls.xml)	(revision 49486)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn.cls.xml	(.../BewaarMaatwerkLijn.cls.xml)	(revision 52094)
@@ -57,29 +57,27 @@
 		}
 
 		#dim EconMaatwerkLijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = ..EconConfiguratieConverter.Convert(BewaarMaatwerkLijnRequest.EconConfiguratie)
+		#dim MaatwerkLijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = ..WinkelkarService.VoegToeMaatwerk(WinkelkarId, EconMaatwerkLijn.GroepNaam, EconMaatwerkLijn.IngegevenKenmerken, EconMaatwerkLijn.Aantal, EconMaatwerkLijn.ProjectReferentie, BewaarMaatwerkLijnRequest.LijnID)	
 		
-		#dim MaatwerkLijn As APPS.EC.Winkelkar.dto.MaatwerkLijn = ..WinkelkarService.VoegToeMaatwerk(WinkelkarId, EconMaatwerkLijn.GroepNaam, EconMaatwerkLijn.IngegevenKenmerken, EconMaatwerkLijn.Aantal, EconMaatwerkLijn.ProjectReferentie, BewaarMaatwerkLijnRequest.LijnID)
-			
-		Set Resultaat = ##class(WS.Vhisie4.Winkelkar.BewaarMaatwerkLijnResponse).%New()
-		Set Resultaat.EenheidPrijs = MaatwerkLijn.EenheidPrijs
-		Set Resultaat.VerkoopPrijs = MaatwerkLijn.EenheidPrijs
-		Set Resultaat.AankoopPrijs = MaatwerkLijn.AankoopPrijs
-		Set Resultaat.LijstPrijs = MaatwerkLijn.LijstPrijs
-		Set Resultaat.TotaalPrijs = MaatwerkLijn.TotaalPrijs
-		Set Resultaat.PrijzenGeldigTotEnMet = Offerte.GeefPrijzenGeldigTotEnMetDatum()
-		Set Resultaat.UnishopKenmerken = MaatwerkLijn.IngegevenKenmerken
-		
-		Set Resultaat.LijnId = BewaarMaatwerkLijnRequest.LijnID
-		Set Resultaat.WinkelkarId = BewaarMaatwerkLijnRequest.WinkelkarID
-		Set Resultaat.KlantId = BewaarMaatwerkLijnRequest.Header.KlantId
+		#dim Response As WS.Vhisie4.Winkelkar.BewaarMaatwerkLijnResponse = ##class(WS.Vhisie4.Winkelkar.BewaarMaatwerkLijnResponse).%New()
+		Set Response.EenheidPrijs = MaatwerkLijn.EenheidPrijs
+		Set Response.VerkoopPrijs = MaatwerkLijn.EenheidPrijs
+		Set Response.AankoopPrijs = MaatwerkLijn.AankoopPrijs
+		Set Response.LijstPrijs = MaatwerkLijn.LijstPrijs
+		Set Response.TotaalPrijs = MaatwerkLijn.TotaalPrijs
+		Set Response.PrijzenGeldigTotEnMet = Offerte.GeefPrijzenGeldigTotEnMetDatum()
+		Set Response.UnishopKenmerken = MaatwerkLijn.IngegevenKenmerken
+		Set Response.LijnId = BewaarMaatwerkLijnRequest.LijnID
+		Set Response.WinkelkarId = BewaarMaatwerkLijnRequest.WinkelkarID
+		Set Response.KlantId = BewaarMaatwerkLijnRequest.Header.KlantId
 	} Catch {
 		Lock -^Vhisie4.Winkelkar(BewaarMaatwerkLijnRequest.WinkelkarID,BewaarMaatwerkLijnRequest.LijnID)
 		Do ##class(TECH.ExceptionHandler).Rethrow()
 	}
 	
 	Lock -^Vhisie4.Winkelkar(BewaarMaatwerkLijnRequest.WinkelkarID,BewaarMaatwerkLijnRequest.LijnID)
 	
-	Quit Resultaat
+	Quit Response
 ]]></Implementation>
 </Method>