Index: vhTest/Utils/APPS/EC/dto/KlantSessieData.cls.xml
===================================================================
diff -u -r33011 -r45892
--- vhTest/Utils/APPS/EC/dto/KlantSessieData.cls.xml	(.../KlantSessieData.cls.xml)	(revision 33011)
+++ vhTest/Utils/APPS/EC/dto/KlantSessieData.cls.xml	(.../KlantSessieData.cls.xml)	(revision 45892)
@@ -11,6 +11,21 @@
 ]]></Implementation>
 </Method>
 
+<Method name="SFSKlantSchreinereiAnton">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.EC.dto.KlantSessieData</ReturnType>
+<Implementation><![CDATA[
+	set KlantSessieData = ##class(APPS.EC.dto.KlantSessieData).%New()
+	set KlantSessieData.Email = "anton@aus-tirol.ch"
+	set KlantSessieData.GebruikerID = "SFS-Dummy"
+	set KlantSessieData.KlantID = 999999
+	set KlantSessieData.KlantNaam = "Schreinerei Anton"
+	set KlantSessieData.Korting = 0
+	set KlantSessieData.Taal = "F"
+	quit KlantSessieData
+]]></Implementation>
+</Method>
+
 <Method name="GeefDataOptSFSKlantAlpnachMetZomaarGekozenKorting">
 <Description>
 Decrypted : F\83723\UT_alp_UT_nach\\11.1\SFS-Dummy
@@ -19,6 +34,21 @@
 <Implementation><![CDATA[	Quit "_efvzk4XRWdJit_RGEwU9speq34K6O_wH12HUjdjEcM/NLo4dXxVi3otbKf_Gel0"
 ]]></Implementation>
 </Method>
+
+<Method name="SFSKlantAlpnachMetZomaarGekozenKorting">
+<ClassMethod>1</ClassMethod>
+<ReturnType>APPS.EC.dto.KlantSessieData</ReturnType>
+<Implementation><![CDATA[
+	set KlantSessieData = ##class(APPS.EC.dto.KlantSessieData).%New()
+	set KlantSessieData.Email = ""
+	set KlantSessieData.GebruikerID = "SFS-Dummy"
+	set KlantSessieData.KlantID = 83723
+	set KlantSessieData.KlantNaam = "UT_alp_UT_nach"
+	set KlantSessieData.Korting = 34.2
+	set KlantSessieData.Taal = "F"
+	Quit KlantSessieData
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/APPS/EC/impl/KlantSessieDataBepaler/GeefKlantSessieData/Test.cls.xml
===================================================================
diff -u -r33011 -r45892
--- vhUnitTest/APPS/EC/impl/KlantSessieDataBepaler/GeefKlantSessieData/Test.cls.xml	(.../Test.cls.xml)	(revision 33011)
+++ vhUnitTest/APPS/EC/impl/KlantSessieDataBepaler/GeefKlantSessieData/Test.cls.xml	(.../Test.cls.xml)	(revision 45892)
@@ -5,29 +5,24 @@
 
 <Method name="TestSFSKlantSchreinereiAnton">
 <Implementation><![CDATA[
-	#dim DataOpt As %String = ##class(vhTest.Utils.APPS.EC.dto.KlantSessieData).GeefDataOptSFSKlantSchreinereiAnton()
-		
-	Do ..AssertKlantSessieData(DataOpt,##class(APPS.EC.enu.WebShopVerwerker).SFS(), "999999", 0)
+	#dim EncryptedKlantSessieData As %String = ##class(vhTest.Utils.APPS.EC.dto.KlantSessieData).GeefDataOptSFSKlantSchreinereiAnton()
+	Do ..AssertKlantSessieData(EncryptedKlantSessieData,##class(APPS.EC.enu.WebShopVerwerker).SFS(), ##class(vhTest.Utils.APPS.EC.dto.KlantSessieData).SFSKlantSchreinereiAnton())
 ]]></Implementation>
 </Method>
 
 <Method name="TestSFSKlantAlpnach : KortingSteedsGewijzigdNaarVastgelegdeWaarde">
 <Implementation><![CDATA[
-	#dim DataOpt As %String = ##class(vhTest.Utils.APPS.EC.dto.KlantSessieData).GeefDataOptSFSKlantAlpnachMetZomaarGekozenKorting()
-	
-	Do ..AssertKlantSessieData(DataOpt,##class(APPS.EC.enu.WebShopVerwerker).SFS(), "83723", 34.2)
+	#dim EncryptedKlantSessieData As %String = ##class(vhTest.Utils.APPS.EC.dto.KlantSessieData).GeefDataOptSFSKlantAlpnachMetZomaarGekozenKorting()
+	Do ..AssertKlantSessieData(EncryptedKlantSessieData,##class(APPS.EC.enu.WebShopVerwerker).SFS(), ##class(vhTest.Utils.APPS.EC.dto.KlantSessieData).SFSKlantAlpnachMetZomaarGekozenKorting())
 ]]></Implementation>
 </Method>
 
 <Method name="AssertKlantSessieData">
-<FormalSpec>EncryptedKlantSessieData:%String,DomeinVerwerker:APPS.EC.enu.WebShopVerwerker,VerwachteKlantID:%String,VerwachteKorting:%Numeric</FormalSpec>
+<FormalSpec>EncryptedKlantSessieData:%String,DomeinVerwerker:APPS.EC.enu.WebShopVerwerker,VerwachteKlantSessieData:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	Set KlantSessieDataBepaler = ##class(APPS.EC.impl.KlantSessieDataBepaler).%New()
-	#dim KlantSessieData As APPS.EC.dto.KlantSessieData = KlantSessieDataBepaler.GeefKlantSessieData(EncryptedKlantSessieData,DomeinVerwerker)
-
-	Do $$$AssertEquals(KlantSessieData.KlantID,VerwachteKlantID)
-	Do $$$AssertEquals(KlantSessieData.Korting,VerwachteKorting)
+	Do $$$AssertObject(KlantSessieDataBepaler.GeefKlantSessieData(EncryptedKlantSessieData,DomeinVerwerker),VerwachteKlantSessieData)
 ]]></Implementation>
 </Method>
 </Class>