Index: vhTestFiles/IntegratieTests/Unishop.PurchaseOrderService001.Service.SFS/TestTAXLBX/Service/PostMessage001.txt
===================================================================
diff -u -r59202 -r61139
--- vhTestFiles/IntegratieTests/Unishop.PurchaseOrderService001.Service.SFS/TestTAXLBX/Service/PostMessage001.txt	(.../PostMessage001.txt)	(revision 59202)
+++ vhTestFiles/IntegratieTests/Unishop.PurchaseOrderService001.Service.SFS/TestTAXLBX/Service/PostMessage001.txt	(.../PostMessage001.txt)	(revision 61139)
@@ -22,7 +22,7 @@
   <CUSTOMER_ID>123456</CUSTOMER_ID>
   <CUSTOMER_NAME>Alpnach Norm - Schrankelemente AG (147432/123456/2402)</CUSTOMER_NAME>
   <PURCHASEPRICE munt="EUR">815.05</PURCHASEPRICE>
-  <SELLINGPRICE munt="CHF">1018.87</SELLINGPRICE>
+  <SELLINGPRICE munt="CHF">1226.55</SELLINGPRICE>
   <SELLINGPRICE_MARKUP>0</SELLINGPRICE_MARKUP>
   <TOTALQTY>11</TOTALQTY>
   <REMARK1></REMARK1>
@@ -32,7 +32,7 @@
     <LINE_NUMBER>1</LINE_NUMBER>
     <LINE_CUSTREF>LijnReferentie</LINE_CUSTREF>
     <QTY>6</QTY>
-    <SELLPRICE munt="CHF">105.62</SELLPRICE>
+    <SELLPRICE munt="CHF">127.15</SELLPRICE>
     <BUYPRICE munt="EUR">81.9</BUYPRICE>
     <DESIGNCODE_TXT>TA'OR BOX</DESIGNCODE_TXT>
     <DESIGN_TXT>Furnier Nussbaum Natur</DESIGN_TXT>
@@ -42,7 +42,7 @@
     <LINE_NUMBER>2</LINE_NUMBER>
     <LINE_CUSTREF>LijnReferentieLBX</LINE_CUSTREF>
     <QTY>5</QTY>
-    <SELLPRICE munt="CHF">77.03</SELLPRICE>
+    <SELLPRICE munt="CHF">92.73</SELLPRICE>
     <BUYPRICE munt="EUR">64.73</BUYPRICE>
     <DESIGNCODE_TXT>LEGRABOX pure</DESIGNCODE_TXT>
     <DESIGN_TXT>Oriongrau matt</DESIGN_TXT>
Index: APPS/EC/impl/KlantSessieDataBepaler.cls.xml
===================================================================
diff -u -r58412 -r61139
--- APPS/EC/impl/KlantSessieDataBepaler.cls.xml	(.../KlantSessieDataBepaler.cls.xml)	(revision 58412)
+++ APPS/EC/impl/KlantSessieDataBepaler.cls.xml	(.../KlantSessieDataBepaler.cls.xml)	(revision 61139)
@@ -35,7 +35,7 @@
 <Private>1</Private>
 <Implementation><![CDATA[
 	If (KlantSessieData.KlantID = ##class(DOM.PARTIJ.impl.LegacyPartijAPI).%New().VerwijderPrefixVanHandelKlantId(##class(DOM.VKP.enu.SfsKlant).Alpnach(), ##class(DOM.common.enu.Personality).SFS())) { 
-		Set KlantSessieData.Korting = 37.7
+		Set KlantSessieData.Korting = 25
 	}
 ]]></Implementation>
 </Method>
Index: vhTestFiles/IntegratieTests/Unishop.PurchaseOrderService001.Service.SFS/TestTAXLBX/XmlExport/Offerte.xml
===================================================================
diff -u -r59202 -r61139
--- vhTestFiles/IntegratieTests/Unishop.PurchaseOrderService001.Service.SFS/TestTAXLBX/XmlExport/Offerte.xml	(.../Offerte.xml)	(revision 59202)
+++ vhTestFiles/IntegratieTests/Unishop.PurchaseOrderService001.Service.SFS/TestTAXLBX/XmlExport/Offerte.xml	(.../Offerte.xml)	(revision 61139)
@@ -31,7 +31,7 @@
   <Winkelkar>
     <AantalProducten>11</AantalProducten>
     <AantalProductLijnen>2</AantalProductLijnen>
-    <TotaalPrijs>1018.87</TotaalPrijs>
+    <TotaalPrijs>1226.55</TotaalPrijs>
     <ApplicatieID>Uni_Webshop</ApplicatieID>
     <WinkelkarID>1</WinkelkarID>
     <Lijnen>
@@ -42,12 +42,12 @@
             <LijnID>1||3</LijnID>
             <AfbeeldingURL>http://res.vanhoecke.be/Images/GENERIEK/TAOR_BOX/TAOR_BOX_C.JPG</AfbeeldingURL>
             <Aantal>6</Aantal>
-            <EenheidPrijs>105.62</EenheidPrijs>
+            <EenheidPrijs>127.15</EenheidPrijs>
             <InfoDiverse>
               <InfoDiverseItem>Endkappe: Anthrazit</InfoDiverseItem>
               <InfoDiverseItem>Set Systemschrauben</InfoDiverseItem>
             </InfoDiverse>
-            <TotaalPrijs>633.72</TotaalPrijs>
+            <TotaalPrijs>762.9</TotaalPrijs>
             <ProjectReferentie>LijnReferentie</ProjectReferentie>
             <IngegevenKenmerken xsi:type="TAORKenmerken" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
               <VersieNr>0</VersieNr>
@@ -131,8 +131,8 @@
             <LijnID>1||5</LijnID>
             <AfbeeldingURL>http://res.vanhoecke.be/Images/GENERIEK/LEGRA_BOX/C_Legra.JPG</AfbeeldingURL>
             <Aantal>5</Aantal>
-            <EenheidPrijs>77.03</EenheidPrijs>
-            <TotaalPrijs>385.15</TotaalPrijs>
+            <EenheidPrijs>92.73</EenheidPrijs>
+            <TotaalPrijs>463.65</TotaalPrijs>
             <ProjectReferentie>LijnReferentieLBX</ProjectReferentie>
             <IngegevenKenmerken xsi:type="LBXKenmerken" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
               <Omschrijving></Omschrijving>
Index: vhUnitTest/APPS/EC/impl/KlantSessieDataBepaler/GeefKlantSessieData/Test.cls.xml
===================================================================
diff -u -r58412 -r61139
--- vhUnitTest/APPS/EC/impl/KlantSessieDataBepaler/GeefKlantSessieData/Test.cls.xml	(.../Test.cls.xml)	(revision 58412)
+++ vhUnitTest/APPS/EC/impl/KlantSessieDataBepaler/GeefKlantSessieData/Test.cls.xml	(.../Test.cls.xml)	(revision 61139)
@@ -29,7 +29,7 @@
 	
 	#dim VerwachtKlantSessieData As APPS.EC.dto.KlantSessieData  = ##class(vhTest.Utils.APPS.EC.dto.KlantSessieData).SFSKlantMetKorting()
 	set VerwachtKlantSessieData.KlantID = ##class(DOM.PARTIJ.impl.LegacyPartijAPI).%New().VerwijderPrefixVanHandelKlantId(##class(DOM.VKP.enu.SfsKlant).Alpnach(), ##class(DOM.common.enu.Personality).SFS())
-	set VerwachtKlantSessieData.Korting = 37.7
+	set VerwachtKlantSessieData.Korting = 25
 	
 	Do ..AssertKlantSessieData(EncryptedKlantSessieData,##class(APPS.EC.enu.WebShopVerwerker).SFS(),VerwachtKlantSessieData)
 ]]></Implementation>
Index: vhTestFiles/IntegratieTests/Unishop.PurchaseOrderService001.Service.SFS/TestTAXLBX/XmlExport/PostMessage001.txt
===================================================================
diff -u -r59202 -r61139
--- vhTestFiles/IntegratieTests/Unishop.PurchaseOrderService001.Service.SFS/TestTAXLBX/XmlExport/PostMessage001.txt	(.../PostMessage001.txt)	(revision 59202)
+++ vhTestFiles/IntegratieTests/Unishop.PurchaseOrderService001.Service.SFS/TestTAXLBX/XmlExport/PostMessage001.txt	(.../PostMessage001.txt)	(revision 61139)
@@ -22,7 +22,7 @@
   <CUSTOMER_ID>123456</CUSTOMER_ID>
   <CUSTOMER_NAME>Alpnach Norm - Schrankelemente AG (147432/123456/2402)</CUSTOMER_NAME>
   <PURCHASEPRICE munt="EUR">815.05</PURCHASEPRICE>
-  <SELLINGPRICE munt="CHF">1018.87</SELLINGPRICE>
+  <SELLINGPRICE munt="CHF">1226.55</SELLINGPRICE>
   <SELLINGPRICE_MARKUP>0</SELLINGPRICE_MARKUP>
   <TOTALQTY>11</TOTALQTY>
   <REMARK1></REMARK1>
@@ -32,7 +32,7 @@
     <LINE_NUMBER>1</LINE_NUMBER>
     <LINE_CUSTREF>LijnReferentie</LINE_CUSTREF>
     <QTY>6</QTY>
-    <SELLPRICE munt="CHF">105.62</SELLPRICE>
+    <SELLPRICE munt="CHF">127.15</SELLPRICE>
     <BUYPRICE munt="EUR">81.9</BUYPRICE>
     <DESIGNCODE_TXT>TA'OR BOX</DESIGNCODE_TXT>
     <DESIGN_TXT>Furnier Nussbaum Natur</DESIGN_TXT>
@@ -42,7 +42,7 @@
     <LINE_NUMBER>2</LINE_NUMBER>
     <LINE_CUSTREF>LijnReferentieLBX</LINE_CUSTREF>
     <QTY>5</QTY>
-    <SELLPRICE munt="CHF">77.03</SELLPRICE>
+    <SELLPRICE munt="CHF">92.73</SELLPRICE>
     <BUYPRICE munt="EUR">64.73</BUYPRICE>
     <DESIGNCODE_TXT>LEGRABOX pure</DESIGNCODE_TXT>
     <DESIGN_TXT>Oriongrau matt</DESIGN_TXT>
Index: vhTestFiles/IntegratieTests/Unishop.PurchaseOrderService001.Service.SFS/TestTAXLBX/Service/Offerte.xml
===================================================================
diff -u -r59202 -r61139
--- vhTestFiles/IntegratieTests/Unishop.PurchaseOrderService001.Service.SFS/TestTAXLBX/Service/Offerte.xml	(.../Offerte.xml)	(revision 59202)
+++ vhTestFiles/IntegratieTests/Unishop.PurchaseOrderService001.Service.SFS/TestTAXLBX/Service/Offerte.xml	(.../Offerte.xml)	(revision 61139)
@@ -31,7 +31,7 @@
   <Winkelkar>
     <AantalProducten>11</AantalProducten>
     <AantalProductLijnen>2</AantalProductLijnen>
-    <TotaalPrijs>1018.87</TotaalPrijs>
+    <TotaalPrijs>1226.55</TotaalPrijs>
     <ApplicatieID>Uni_Webshop</ApplicatieID>
     <WinkelkarID>1</WinkelkarID>
     <Lijnen>
@@ -42,12 +42,12 @@
             <LijnID>1||3</LijnID>
             <AfbeeldingURL>http://res.vanhoecke.be/Images/GENERIEK/TAOR_BOX/TAOR_BOX_C.JPG</AfbeeldingURL>
             <Aantal>6</Aantal>
-            <EenheidPrijs>105.62</EenheidPrijs>
+            <EenheidPrijs>127.15</EenheidPrijs>
             <InfoDiverse>
               <InfoDiverseItem>Endkappe: Anthrazit</InfoDiverseItem>
               <InfoDiverseItem>Set Systemschrauben</InfoDiverseItem>
             </InfoDiverse>
-            <TotaalPrijs>633.72</TotaalPrijs>
+            <TotaalPrijs>762.9</TotaalPrijs>
             <ProjectReferentie>LijnReferentie</ProjectReferentie>
             <IngegevenKenmerken xsi:type="TAORKenmerken" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
               <VersieNr>0</VersieNr>
@@ -131,8 +131,8 @@
             <LijnID>1||5</LijnID>
             <AfbeeldingURL>http://res.vanhoecke.be/Images/GENERIEK/LEGRA_BOX/C_Legra.JPG</AfbeeldingURL>
             <Aantal>5</Aantal>
-            <EenheidPrijs>77.03</EenheidPrijs>
-            <TotaalPrijs>385.15</TotaalPrijs>
+            <EenheidPrijs>92.73</EenheidPrijs>
+            <TotaalPrijs>463.65</TotaalPrijs>
             <ProjectReferentie>LijnReferentieLBX</ProjectReferentie>
             <IngegevenKenmerken xsi:type="LBXKenmerken" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
               <Omschrijving></Omschrijving>
Index: vhDeploy/Deploy20200610xAlpnachKortingNaar25.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20200610xAlpnachKortingNaar25.cls.xml	(revision 0)
+++ vhDeploy/Deploy20200610xAlpnachKortingNaar25.cls.xml	(revision 61139)
@@ -0,0 +1,40 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Deploy20200610xAlpnachKortingNaar25">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Update Kortingpercentage Alpnach (SFS)</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ..BewaarKortingMetVariant(##class(DOM.PM.enu.Variant).LegraboxPure())
+	Do ..BewaarKortingMetVariant(##class(DOM.PM.enu.Variant).Taorbox())
+	Do ..BewaarKortingMetVariant(##class(DOM.PM.enu.Variant).TandemboxAntaro())
+]]></Implementation>
+</Method>
+
+<Method name="BewaarKortingMetVariant">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Variant:DOM.PM.enu.Variant</FormalSpec>
+<Implementation><![CDATA[
+	#dim KortingService As DOM.VKP.KortingService = ##class(DOM.DomeinContext).Instance().GeefVerkoopPrijsAPI().GeefKortingService()	
+	Set KortingSpecificatie = ##class(DOM.VKP.dto.KortingSpecificaties).%New()
+	Set KortingSpecificatie.Aantal = 1
+	Set KortingSpecificatie.Familie = ##class(DOM.PM.enu.Familie).Lade()
+	Set KortingSpecificatie.Variant = Variant
+	Set KortingSpecificatie.PersonalityID = ##class(DOM.common.enu.Personality).SFS()
+	Set KortingSpecificatie.KlantID = "SFS_123456"
+	
+	#dim KortingPercentage As %String = 25 / 100
+	
+	Do KortingService.StelInKorting(KortingSpecificatie,KortingPercentage)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>