Index: AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter.cls.xml
===================================================================
diff -u -r49906 -r49910
--- AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter.cls.xml	(.../CustomerInConverter.cls.xml)	(revision 49906)
+++ AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter.cls.xml	(.../CustomerInConverter.cls.xml)	(revision 49910)
@@ -74,9 +74,8 @@
 <FormalSpec>Cust:AXif.Dynamics.CustomerIn.MessageParts.AxdEntityCust,KlantId:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	
 	#dim KlantPartij As DOM.PARTIJ.Partij = ..PartijApi.GeefPartij(KlantId)
-	#Dim Klant as DOM.VKP.VanHoeckeKlant = ..VerkoopApi.GeefKlant(KlantId)	
+	#Dim Klant as DOM.VKP.VanHoeckeKlant = ..VerkoopApi.GeefKlant(KlantId)
 	
 	Do KlantPartij.ZetTaal(..AxToAdminUtils.ConvertLanguageId(Cust.LanguageId))
 	Do KlantPartij.ZetBTWNr(..GeefBTWNummer(Cust))
Index: AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml
===================================================================
diff -u -r49909 -r49910
--- AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml	(.../LeverAdresUtils.cls.xml)	(revision 49909)
+++ AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml	(.../LeverAdresUtils.cls.xml)	(revision 49910)
@@ -69,56 +69,26 @@
 <Method name="ZetLeverAdressen">
 <FormalSpec>Klant:DOM.VKP.VanHoeckeKlant,Cust:AXif.Dynamics.CustomerIn.MessageParts.AxdEntityCust</FormalSpec>
 <Implementation><![CDATA[
-	Set Timer=##class(TECH.Timing.Timer).%New("")
-	Do Timer.Start()
 	#dim LijstVanAxLocationIds As %ListOfDataTypes = ..GeefAxLocationIdsVanKlant(Klant)
-	Do ##class(Tools.Wlip).%New(127).String(Timer.Stop()\1)
-
 	Set PostalAddressIterator = ##class(TECH.ListIterator).%New(Cust.PostalAddress)
 	While PostalAddressIterator.HasNext() {
-	Do ##class(Tools.Wlip).%New(127).String((Timer.Stop()\1)_" while ")
 		#dim Address As AXif.Dynamics.CustomerIn.MessageParts.AxdEntityPostalAddress = PostalAddressIterator.Next()
-	Do ##class(Tools.Wlip).%New(127).String((Timer.Stop()\1)_" A ")
 		If ..RolesContains(Address.Role ,"Delivery" ) {
 			#dim Adres As DOM.VKP.LeverAdres = ..LeverAdresFactory.MaakLeverAdres()
-	
-	Do ##class(Tools.Wlip).%New(127).String((Timer.Stop()\1)_" B ")
-	
 			#dim BestaandLeverAdres As DOM.VKP.LeverAdres = $$$If(..LeveradresRepository.BestaatViaAXLeverAdresIdEnKlantNummer(Address.LocationId, ..LegacyPartijAPI.GeefKlantNummerVoorPartijID(Klant.GeefID())),..LeveradresRepository.GeefViaAXLeverAdresIdEnKlantNummer(Address.LocationId, ..LegacyPartijAPI.GeefKlantNummerVoorPartijID(Klant.GeefID())),Adres)
-	
-	Do ##class(Tools.Wlip).%New(127).String((Timer.Stop()\1)_" C ")
-	
 			Do ..AdresZetter.ZetAdres(Adres, Address, Cust, BestaandLeverAdres, $$$False)
-	
-	Do ##class(Tools.Wlip).%New(127).String((Timer.Stop()\1)_" D ")
-	
 			If $$$Not(..LeveradresRepository.BestaatViaAXLeverAdresIdEnKlantNummer(Address.LocationId, ..LegacyPartijAPI.GeefKlantNummerVoorPartijID(Klant.GeefID()))) {
-	
-	Do ##class(Tools.Wlip).%New(127).String((Timer.Stop()\1)_" E ")
-	
 				Do Klant.VoegToeLeverAdres(Adres)
-	
 			} Else {
-	
-	Do ##class(Tools.Wlip).%New(127).String((Timer.Stop()\1)_" F ")
-	
 				Do ..LeveradresRepository.Bewaar(Klant, Adres)
-	
-	Do ##class(Tools.Wlip).%New(127).String((Timer.Stop()\1)_" G ")
-	
 				Do ##class(TECH.ListUtils).RemoveItemFromList(Address.LocationId,LijstVanAxLocationIds)
-	
-	Do ##class(Tools.Wlip).%New(127).String((Timer.Stop()\1)_" H ")
-	
 			}
 		}
 	}
 	Set LijstVanAxLocationIdsIterator = ##class(TECH.ListIterator).%New(LijstVanAxLocationIds)
 	While LijstVanAxLocationIdsIterator.HasNext() {
-	Do ##class(Tools.Wlip).%New(127).String(Timer.Stop()\1)
 		Do ..LeveradresRepository.VerwijderViaAXLeverAdresId(LijstVanAxLocationIdsIterator.Next())
 	}
-	Do ##class(Tools.Wlip).%New(127).String(Timer.Stop()\1)
 ]]></Implementation>
 </Method>
 
Index: DOM/VKP/impl/LeverAdresRepository.cls.xml
===================================================================
diff -u -r49909 -r49910
--- DOM/VKP/impl/LeverAdresRepository.cls.xml	(.../LeverAdresRepository.cls.xml)	(revision 49909)
+++ DOM/VKP/impl/LeverAdresRepository.cls.xml	(.../LeverAdresRepository.cls.xml)	(revision 49910)
@@ -171,17 +171,11 @@
 <FormalSpec>AXLeverAdresId:%String,KlantNummer:%String</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
-	Do ##class(Tools.Wlip).%New(127).String("axleveradresid = "_AXLeverAdresId_"/"_KlantNummer_"/")
-	Set Timer=##class(TECH.Timing.Timer).%New("")
-	Do Timer.Start()
 	#dim Query As %String = "SELECT count(ID) from Derde_Klant.LevAdres where Klant = ? and AxLeveradresId = ?"
 	#dim Params As %List = $ListBuild(KlantNummer, AXLeverAdresId)
-	Do ##class(Tools.Wlip).%New(127).String(Timer.Stop()\1)
 	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetDynamicResultSet(Query, Params)
-	Do ##class(Tools.Wlip).%New(127).String(Timer.Stop()\1)
 	
 	Do ResultSet.Next()
-	Do ##class(Tools.Wlip).%New(127).String(Timer.Stop()\1)
 	Quit ResultSet.GetData(1)>0
 ]]></Implementation>
 </Method>
@@ -190,18 +184,12 @@
 <FormalSpec>AXLeverAdresId:%String,KlantNummer:%String</FormalSpec>
 <ReturnType>DOM.VKP.impl.LeverAdres</ReturnType>
 <Implementation><![CDATA[
-	Do ##class(Tools.Wlip).%New(127).String("axleveradresid = "_AXLeverAdresId)
-	Set Timer=##class(TECH.Timing.Timer).%New("")
-	Do Timer.Start()
 	#dim Query As %String = "SELECT ID from Derde_Klant.LevAdres where Klant = ? and AxLeveradresId = ?"
 	#dim Params As %List = $ListBuild(KlantNummer, AXLeverAdresId)
-	Do ##class(Tools.Wlip).%New(127).String(Timer.Stop()\1)
 	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetDynamicResultSet(Query, Params)
 	#dim LeverAdres As DOM.VKP.impl.LeverAdres
 	
-	Do ##class(Tools.Wlip).%New(127).String(Timer.Stop()\1)
 	Do ResultSet.Next()
-	Do ##class(Tools.Wlip).%New(127).String(Timer.Stop()\1)
 	Try {
 		Set LeverAdres = ..GeefViaKlantIdEnKlantAdresNr("K||"_$p(ResultSet.GetData(1),"||",1),##class(TECH.StringUtils).StripAllExceptNumeric($p(ResultSet.GetData(1),"||",2)))
 	} Catch {