Index: vhUnitTest/APPS/EC/Transport/Hein/impl/VerkoopprijsBerekenaar/BerekenVerkoopPrijs/Test.cls.xml
===================================================================
diff -u -r41691 -r52976
--- vhUnitTest/APPS/EC/Transport/Hein/impl/VerkoopprijsBerekenaar/BerekenVerkoopPrijs/Test.cls.xml	(.../Test.cls.xml)	(revision 41691)
+++ vhUnitTest/APPS/EC/Transport/Hein/impl/VerkoopprijsBerekenaar/BerekenVerkoopPrijs/Test.cls.xml	(.../Test.cls.xml)	(revision 52976)
@@ -15,12 +15,13 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: BerekenVerkoopprijs voor Hein geeft 40 euro voor 1 pallet DHL Freight">
+<Method name="Test: BerekenVerkoopprijs voor Hein geeft 40 euro voor 1 pallet DHL Freight en meer dan 3 laden ">
 <Implementation><![CDATA[
 	#dim OfferteItem As APPS.TRANSP.OfferteService.dto.OfferteItem
 	Set OfferteItem = ##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteItem).GeefOfferteItem()
 	Set OfferteItem.Code = ##class(APPS.TRANSP.enu.ServiceCode).DHLFreight()
 	Set OfferteItem.AantalPalletten = 1
+	Set OfferteItem.AantalLades = 4
 	Set OfferteItem.Kostprijs = 10.00
 	Set VerkoopprijsBerekenaar = ##class(APPS.EC.Transport.Hein.impl.VerkoopprijsBerekenaar).%New()
 	Do $$$AssertEquals(VerkoopprijsBerekenaar.BerekenVerkoopPrijs(OfferteItem), 40.00)
@@ -49,6 +50,19 @@
 	Do $$$AssertEquals(VerkoopprijsBerekenaar.BerekenVerkoopPrijs(OfferteItem), 10.00)
 ]]></Implementation>
 </Method>
+
+<Method name="Test: BerekenVerkoopprijs voor Hein voor winkelkar tot 3 laden geeft 10 euro">
+<Implementation><![CDATA[
+	#dim OfferteItem As APPS.TRANSP.OfferteService.dto.OfferteItem
+	Set OfferteItem = ##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteItem).GeefOfferteItem()
+	Set OfferteItem.Code = ##class(APPS.TRANSP.enu.ServiceCode).DHLFreight()
+	Set OfferteItem.AantalPalletten = 1
+	Set OfferteItem.AantalLades = 1
+	Set OfferteItem.Kostprijs = 20.00
+	Set VerkoopprijsBerekenaar = ##class(APPS.EC.Transport.Hein.impl.VerkoopprijsBerekenaar).%New()
+	Do $$$AssertEquals(VerkoopprijsBerekenaar.BerekenVerkoopPrijs(OfferteItem), 10.00)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: APPS/EC/Transport/Hein/impl/VerkoopprijsBerekenaar.cls.xml
===================================================================
diff -u -r41345 -r52976
--- APPS/EC/Transport/Hein/impl/VerkoopprijsBerekenaar.cls.xml	(.../VerkoopprijsBerekenaar.cls.xml)	(revision 41345)
+++ APPS/EC/Transport/Hein/impl/VerkoopprijsBerekenaar.cls.xml	(.../VerkoopprijsBerekenaar.cls.xml)	(revision 52976)
@@ -7,6 +7,7 @@
 <FormalSpec>OfferteItem:APPS.TRANSP.OfferteService.dto.OfferteItem</FormalSpec>
 <ReturnType>TECH.Decimal</ReturnType>
 <Implementation><![CDATA[
+	Quit:((OfferteItem.AantalLades < 4) && (OfferteItem.AantalPalletten = 1)) 10
 	Quit:OfferteItem.Code=##class(APPS.TRANSP.enu.ServiceCode).DHLFreight() (40.00 * OfferteItem.AantalPalletten)
 	Quit OfferteItem.Kostprijs
 ]]></Implementation>