Index: cspBasis/KadQuotation.cls.xml
===================================================================
diff -u -r1074 -r2149
--- cspBasis/KadQuotation.cls.xml	(.../KadQuotation.cls.xml)	(revision 1074)
+++ cspBasis/KadQuotation.cls.xml	(.../KadQuotation.cls.xml)	(revision 2149)
@@ -142,6 +142,7 @@
  Set KLNr=KlantID
  Set Korting=+$P(sData, "\", 5)
  Set KadObj=..BuildKadObj(.ProfType,.Hoogte,.Breedte,.Beslag,.QtyBeslag,.QtyGlasBoor,.QtyProf1,.QtyProf2,.QtyProf3,.QtyProf4,.Vulling,.VullingExtra)
+ Do KadObj.SetKlantSpecifiekeDefaults(KLNr)
  Set Prijs=..CalcPrijsOnly(KadObj,Aantal,MuntCode,Korting,KLNr)
    Do WL^vhDBG("CalcPrijsViaSoap finished. Returns Prijs="_Prijs)
  Quit Prijs