Index: vhUnitTest/APPS/EC/Winkelkar/impl/LijnPrijsBepaler/Process/TestNormaleModus.cls.xml
===================================================================
diff -u -r32715 -r32718
--- vhUnitTest/APPS/EC/Winkelkar/impl/LijnPrijsBepaler/Process/TestNormaleModus.cls.xml	(.../TestNormaleModus.cls.xml)	(revision 32715)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/LijnPrijsBepaler/Process/TestNormaleModus.cls.xml	(.../TestNormaleModus.cls.xml)	(revision 32718)
@@ -33,6 +33,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="TestVHKlantBlumPortugal">
+<Implementation><![CDATA[
+	#dim KlantID As DOM.VKP.KlantID = ##class(DOM.VKP.enu.Klant).BlumPortugal()
+	Do ..ZetWebshopSessie(##class(APPS.EC.enu.WebshopModus).Normaal())
+	Do ..AssertMaatwerkLijnPrijs(KlantID,"")
+]]></Implementation>
+</Method>
+
 <Method name="GeefPersonalityID">
 <Private>1</Private>
 <ReturnType>DOM.common.enu.Personality</ReturnType>
Index: APPS/EC/Winkelkar/impl/AdviesPrijsInstellenOpWinkelkar.cls.xml
===================================================================
diff -u -r32717 -r32718
--- APPS/EC/Winkelkar/impl/AdviesPrijsInstellenOpWinkelkar.cls.xml	(.../AdviesPrijsInstellenOpWinkelkar.cls.xml)	(revision 32717)
+++ APPS/EC/Winkelkar/impl/AdviesPrijsInstellenOpWinkelkar.cls.xml	(.../AdviesPrijsInstellenOpWinkelkar.cls.xml)	(revision 32718)
@@ -70,6 +70,8 @@
 	
 	If KlantIDVoorPrijsBerekening = ##class(DOM.VKP.enu.Klant).Hein(){
 		Set EenheidAdviesPrijs = VerkoopPrijsInfo.GeefVerkoopPrijs() * 2.95
+	}ElseIf KlantIDVoorPrijsBerekening = ##class(DOM.VKP.enu.Klant).BlumPortugal() {
+		Set EenheidAdviesPrijs = VerkoopPrijsInfo.GeefLijstPrijs() * 1.09
 	}Else{
 		Set EenheidAdviesPrijs = VerkoopPrijsInfo.GeefLijstPrijs()
 	}
Index: vhUnitTest/APPS/EC/Winkelkar/impl/LijnPrijsBepaler/Process/TestAdviesPrijsModus.cls.xml
===================================================================
diff -u -r32715 -r32718
--- vhUnitTest/APPS/EC/Winkelkar/impl/LijnPrijsBepaler/Process/TestAdviesPrijsModus.cls.xml	(.../TestAdviesPrijsModus.cls.xml)	(revision 32715)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/LijnPrijsBepaler/Process/TestAdviesPrijsModus.cls.xml	(.../TestAdviesPrijsModus.cls.xml)	(revision 32718)
@@ -29,6 +29,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="TestVHKlantBlumPortugal">
+<Implementation><![CDATA[
+	#dim KlantID As DOM.VKP.KlantID = ##class(DOM.VKP.enu.Klant).BlumPortugal()
+	#dim VerwachteEenheidPrijs As %Numeric = 96.88   ; LijstPrijs * BlumPT factor = 96,8792 (afgerond) 
+	Do ..AssertAdviesPrijs(KlantID,VerwachteEenheidPrijs)
+]]></Implementation>
+</Method>
+
 <Method name="AssertAdviesPrijs">
 <FormalSpec>KlantID:DOM.VKP.KlantID,VerwachteEenheidPrijs:%Numeric</FormalSpec>
 <Private>1</Private>