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>