Index: APPS/EC/Winkelkar/WinkelkarService.cls.xml
===================================================================
diff -u -r1718 -r2011
--- APPS/EC/Winkelkar/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 1718)
+++ APPS/EC/Winkelkar/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 2011)
@@ -76,6 +76,25 @@
 ]]></Implementation>
 </Method>
 
+<Method name="MaakLeegWinkelkar">
+<FormalSpec>Applicatie:APPS.common.dto.Applicatie,WinkelkarID:%String</FormalSpec>
+<ReturnType>APPS.EC.Winkelkar.dto.Winkelkar</ReturnType>
+<Implementation><![CDATA[
+	Set WinkelkarImpl = ..OpenWinkelkar(Applicatie, WinkelkarID)
+	
+	Do WinkelkarImpl.VerwijderAlleInhoud()
+	
+	Set Status = WinkelkarImpl.%Save()
+	
+	If ($$$ISERR(Status))
+	{
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.StatusException).%New(##class(TECH.enu.ExceptionCode).SaveFailed(),"De winkelkar kon niet worden leeggemaakt omdat ze niet kon worden opgeslagen",Status))
+	}
+	
+	Quit ..GeefWinkelkar(Applicatie, WinkelkarID)
+]]></Implementation>
+</Method>
+
 <Method name="VoegToeMaatwerk">
 <FormalSpec>Applicatie:APPS.common.dto.Applicatie,WinkelkarID:%String,GroepNaam:%String,IngegevenKenmerken:APPS.PM.Maatwerk.dto.IngegevenKenmerken,Aantal:%String</FormalSpec>
 <ReturnType>APPS.EC.Winkelkar.dto.Winkelkar</ReturnType>