Index: KPRIJS.mac.rou
===================================================================
diff -u -r50904 -r50958
--- KPRIJS.mac.rou	(.../KPRIJS.mac.rou)	(revision 50904)
+++ KPRIJS.mac.rou	(.../KPRIJS.mac.rou)	(revision 50958)
@@ -104,7 +104,7 @@
 		Set InclBTW=$LI(lb,5)
 	} Else {
 		Try {
-			New SalesPriceService, Result
+			New SalesPriceService, Result, ResultLine
 			
 			#dim SalesPriceService As AXimpl.Admin.VKP.SalesPriceService = ##class(AXimpl.Admin.VKP.SalesPriceService).%New()
 			#dim Result As AXif.Dynamics.SalesPriceIn.MessageParts.ADUSalesPriceHeaderOutputDC = SalesPriceService.GeefPrijs(KLNr, PRNr, $select($Get(SimPPL):SimPPL, 1:""), .Aantal)
@@ -117,6 +117,8 @@
 			
 			Set ^AXPrijsCache(KLNr,PRNr,+CachePPL,$S($G(Aantal):Aantal,1:"*"))=$LB($$GeefMinuten($H),VkpEURAX,LijstEURAX,PriceUnit,InclBTW)
 		} Catch {
+			New Exception
+			
 			Set (VkpEURAX,LijstEURAX)=99999
 			Set PriceUnit=1
 			Set InclBTW = $$$False 
Index: vhTest/Fake/AXimpl/Admin/VKP/SalesPriceService.cls.xml
===================================================================
diff -u -r50904 -r50958
--- vhTest/Fake/AXimpl/Admin/VKP/SalesPriceService.cls.xml	(.../SalesPriceService.cls.xml)	(revision 50904)
+++ vhTest/Fake/AXimpl/Admin/VKP/SalesPriceService.cls.xml	(.../SalesPriceService.cls.xml)	(revision 50958)
@@ -8,70 +8,18 @@
 <Super>AXimpl.Admin.VKP.SalesPriceService</Super>
 
 <Method name="GeefPrijs">
-<FormalSpec>KlantNummer:%String,ProductNummer:%String,CifPpl:%String</FormalSpec>
+<FormalSpec>KlantNummer:%String,ProductNummer:%String,CifPpl:%String,Aantal:%String=1,TransDate:%Date=""</FormalSpec>
 <ReturnType>AXif.Dynamics.SalesPriceIn.MessageParts.ADUSalesPriceHeaderOutputDC</ReturnType>
 <Implementation><![CDATA[	Quit ""
 ]]></Implementation>
 </Method>
 
-<Method name="GeefPrijsOld">
-<FormalSpec>KlantNummer:%String,ProductNummer:%String,CifPPL:%String,Aantal:%String,TransDate:%Date</FormalSpec>
-<ReturnType>AXif.Dynamics.SalesPriceIn.MessageParts.ADUSalesPriceHeaderOutputDC</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
-</Method>
-
 <Method name="GeefPrijsVoorProducten">
-<FormalSpec>KlantNummer:%String,ProductData:%ListOfDataTypes</FormalSpec>
+<FormalSpec>KlantNummer:%String,ProductDataLijst:%ListOfDataTypes</FormalSpec>
 <ReturnType>AXif.Dynamics.SalesPriceIn.MessageParts.ADUSalesPriceHeaderOutputDC</ReturnType>
 <Implementation><![CDATA[	Quit ""
 ]]></Implementation>
 </Method>
-
-<Method name="GeefRequestIterator">
-<Implementation><![CDATA[]]></Implementation>
-</Method>
-
-<Method name="GeefResultaat">
-<FormalSpec>Reference:%String</FormalSpec>
-<ReturnType>AXif.Dynamics.SalesPriceIn.MessageParts.ADUSalesPriceLineOutputDC</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
-</Method>
-
-<Method name="GeefResultaatIterator">
-<Implementation><![CDATA[]]></Implementation>
-</Method>
-
-<Method name="Initialisatie">
-<FormalSpec>KlantNummer:%String</FormalSpec>
-<Implementation><![CDATA[]]></Implementation>
-</Method>
-
-<Method name="ModifyPrijsGeg">
-<FormalSpec>KlantNummer:%String,ProductNummer:%String,PrijsRec:%String</FormalSpec>
-<Implementation><![CDATA[]]></Implementation>
-</Method>
-
-<Method name="PrijzenInclBTW">
-<FormalSpec>KLNr:%String</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
-</Method>
-
-<Method name="VoegToeProduct">
-<FormalSpec>ProductNummer:%String,CifPPL:%String="",Aantal:%String=1,TransDate:%Date</FormalSpec>
-<ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
-</Method>
-
-<Method name="VoerUit">
-<ReturnType>AXif.Dynamics.SalesPriceIn.MessageParts.ADUSalesPriceHeaderOutputDC</ReturnType>
-<Implementation><![CDATA[	Quit ""
-]]></Implementation>
-</Method>
 </Class>