Index: vhUnitTest/WSimpl/Vhisie4/Auth/HandelAuthenticator/ContactGegevensRegistreerder/Registreer/Test.cls.xml
===================================================================
diff -u -r46868 -r47067
--- vhUnitTest/WSimpl/Vhisie4/Auth/HandelAuthenticator/ContactGegevensRegistreerder/Registreer/Test.cls.xml	(.../Test.cls.xml)	(revision 46868)
+++ vhUnitTest/WSimpl/Vhisie4/Auth/HandelAuthenticator/ContactGegevensRegistreerder/Registreer/Test.cls.xml	(.../Test.cls.xml)	(revision 47067)
@@ -29,9 +29,11 @@
 	
 	#dim KortingSpecLbx As DOM.VKP.dto.KortingSpecificaties = ##class(vhTest.Utils.DOM.VKP.dto.KortingSpecificaties).LbxKortingSpecSFS()
 	#dim KortingSpecTax As DOM.VKP.dto.KortingSpecificaties = ##class(vhTest.Utils.DOM.VKP.dto.KortingSpecificaties).TaxKortingSpecSFS()
+	#dim KortingSpecTbx As DOM.VKP.dto.KortingSpecificaties = ##class(vhTest.Utils.DOM.VKP.dto.KortingSpecificaties).TbxKortingSpecSFS()
 		
-	Do KortingServiceMock.VerwachtMethodCall("StelInKorting",..Matches.DataTransferObject(KortingSpecLbx),10).ExactAantalKeer(1)
-	Do KortingServiceMock.VerwachtMethodCall("StelInKorting",..Matches.DataTransferObject(KortingSpecTax),10).ExactAantalKeer(1)
+	Do KortingServiceMock.VerwachtMethodCall("StelInKorting",..Matches.DataTransferObject(KortingSpecLbx),.1).ExactAantalKeer(1)
+	Do KortingServiceMock.VerwachtMethodCall("StelInKorting",..Matches.DataTransferObject(KortingSpecTax),.1).ExactAantalKeer(1)
+	Do KortingServiceMock.VerwachtMethodCall("StelInKorting",..Matches.DataTransferObject(KortingSpecTbx),.1).ExactAantalKeer(1)
 	
 	#dim HandelKlantDataDummy As DOM.VKP.impl.HandelKlantData = ##class(vhTest.Utils.DOM.VKP.HandelKlantData).StandaardHandelKlantData()
 	Set KlantDataBepalerMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Auth.HandelAuthenticator.ContactGegevensRegistreerder.KlantDataBepaler).%New()
Index: vhTest/Utils/DOM/VKP/dto/KortingSpecificaties.cls.xml
===================================================================
diff -u -r46006 -r47067
--- vhTest/Utils/DOM/VKP/dto/KortingSpecificaties.cls.xml	(.../KortingSpecificaties.cls.xml)	(revision 46006)
+++ vhTest/Utils/DOM/VKP/dto/KortingSpecificaties.cls.xml	(.../KortingSpecificaties.cls.xml)	(revision 47067)
@@ -28,6 +28,19 @@
 	Quit KortingSpecificatie
 ]]></Implementation>
 </Method>
+
+<Method name="TbxKortingSpecSFS">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Set KortingSpecificatie = ##class(DOM.VKP.dto.KortingSpecificaties).%New()
+	Set KortingSpecificatie.Aantal = 1
+	Set KortingSpecificatie.Familie = ##class(DOM.PM.enu.Familie).Lade()
+	Set KortingSpecificatie.Variant = ##class(DOM.PM.enu.Variant).TandemboxAntaro()
+	Set KortingSpecificatie.PersonalityID = ##class(DOM.common.enu.Personality).SFS()
+	Set KortingSpecificatie.KlantID = "sfs_8974"
+	Quit KortingSpecificatie
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: WSimpl/Vhisie4/Auth/HandelAuthenticator/ContactGegevensRegistreerder.cls.xml
===================================================================
diff -u -r46643 -r47067
--- WSimpl/Vhisie4/Auth/HandelAuthenticator/ContactGegevensRegistreerder.cls.xml	(.../ContactGegevensRegistreerder.cls.xml)	(revision 46643)
+++ WSimpl/Vhisie4/Auth/HandelAuthenticator/ContactGegevensRegistreerder.cls.xml	(.../ContactGegevensRegistreerder.cls.xml)	(revision 47067)
@@ -126,6 +126,7 @@
 	Do ..KlantDataBewaarder.Bewaar(Personality, KlantData)
 	Do ..BewaarKorting(Personality, KlantData , ##class(DOM.PM.enu.Variant).LegraboxPure())
 	Do ..BewaarKorting(Personality, KlantData , ##class(DOM.PM.enu.Variant).Taorbox())
+	Do ..BewaarKorting(Personality, KlantData , ##class(DOM.PM.enu.Variant).TandemboxAntaro())
 ]]></Implementation>
 </Method>
 
@@ -139,7 +140,7 @@
 	Set KortingSpecificatie.Variant = Variant
 	Set KortingSpecificatie.PersonalityID = Personality.GeefID()
 	Set KortingSpecificatie.KlantID = KlantData.KlantId
-	Do ..KortingService.StelInKorting(KortingSpecificatie,+KlantData.KortingPercentage)
+	Do ..KortingService.StelInKorting(KortingSpecificatie,+(KlantData.KortingPercentage/100))
 ]]></Implementation>
 </Method>
 </Class>