Index: AXimpl/Dynamics/SalesPriceOut/impl/SalesPriceService.cls.xml
===================================================================
diff -u -r49181 -r49371
--- AXimpl/Dynamics/SalesPriceOut/impl/SalesPriceService.cls.xml	(.../SalesPriceService.cls.xml)	(revision 49181)
+++ AXimpl/Dynamics/SalesPriceOut/impl/SalesPriceService.cls.xml	(.../SalesPriceService.cls.xml)	(revision 49371)
@@ -40,7 +40,7 @@
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..Location = ##class(TECH.Config.ConfigMgr).Instance().GetString("VHIP907SalesPriceServiceUrl")
-	Set ..Timeout = 180
+	Set ..Timeout = 180	
 	Set ..HttpUsername = "VHEPN\AIF_User"
 	Set ..HttpPassword = "Cr&at!on_ofB4tch3s"
 	
@@ -56,7 +56,24 @@
 <WebMethod>1</WebMethod>
 <SoapBindingStyle>document</SoapBindingStyle>
 <SoapBodyUse>literal</SoapBodyUse>
-<Implementation><![CDATA[	Quit ..WebMethod("getPrice","ADUSalesPriceServiceGetPriceRequest").Invoke($this,"http://tempuri.org/ADUSalesPriceService/getPrice",.SalesPriceInput)
+<Implementation><![CDATA[
+	#dim StartTijdSeconden As %Integer = $Piece($H,",",2)
+	#dim Resultaat As AXif.Dynamics.SalesPriceIn.MessageParts.ADUSalesPriceHeaderOutputDC = ..WebMethod("getPrice","ADUSalesPriceServiceGetPriceRequest").Invoke($this,"http://tempuri.org/ADUSalesPriceService/getPrice",.SalesPriceInput)
+	Set HuidigeTijdSeconden = $Piece($H,",",2)
+	If ((HuidigeTijdSeconden-StartTijdSeconden) > 1) 
+	{
+		Try {
+			#dim SalesPriceInputLijn As AXif.Dynamics.SalesPriceOut.MessageParts.ADUSalesPriceLineInputDC = SalesPriceInput.Lines.GetAt(1)
+			Do ##class(vhLib.Logger).%New("SalesPriceService").Debug("getPrice traag",
+				"CustAccount='"_SalesPriceInput.CustAccount
+				_"'; Snelheid=" _ (HuidigeTijdSeconden-StartTijdSeconden) 
+				_ "sec; ItemId='" _ SalesPriceInputLijn.ItemId _ "'; MessageId='" _ SalesPriceInput.MessageId _ "'")
+			
+		} Catch {
+			Do ##class(vhLib.Logger).%New().LogExceptie(##class(TECH.ExceptionHandler).Catch())
+		}
+	}
+	Quit Resultaat
 ]]></Implementation>
 </Method>
 </Class>