Index: vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/ControleerWinkelkar/TBX/TestHandelSFS.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/ControleerWinkelkar/TBX/TestHandelSFS.cls.xml	(revision 0)
+++ vhUnitTest/APPS/EC/Winkelkar/WinkelkarControleur/ControleerWinkelkar/TBX/TestHandelSFS.cls.xml	(revision 39659)
@@ -0,0 +1,33 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.EC.Winkelkar.WinkelkarControleur.ControleerWinkelkar.TBX.TestHandelSFS">
+<Super>vhUnitTest.APPS.EC.Winkelkar.WinkelkarControleur.ControleerWinkelkar.Base</Super>
+
+<Method name="GeefPersonalityID">
+<Private>1</Private>
+<ReturnType>DOM.common.enu.Personality</ReturnType>
+<Implementation><![CDATA[	Quit ##class(DOM.common.enu.Personality).SFS()
+]]></Implementation>
+</Method>
+
+<Method name="GeefKlantInstellingenService">
+<Private>1</Private>
+<Implementation><![CDATA[	Quit ##class(APPS.EC.impl.KlantInstellingenServiceSFS).%New()
+]]></Implementation>
+</Method>
+
+<Method name="GeefKenmerken">
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken</ReturnType>
+<Implementation><![CDATA[	Quit ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken).StandaardLadeVerpaktIn(##class(DOM.PM.enu.TBXVerpakking).ProboxMetOnderdelen())
+]]></Implementation>
+</Method>
+
+<Method name="Test: Probox met aantal 4 -&gt; geen exceptie verwacht">
+<Implementation><![CDATA[	Do ..ControleerWinkelkar("", 4)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml
===================================================================
diff -u -r39252 -r39659
--- vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml	(.../TBXKenmerken.cls.xml)	(revision 39252)
+++ vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerken.cls.xml	(.../TBXKenmerken.cls.xml)	(revision 39659)
@@ -174,6 +174,19 @@
 	Quit TbxKenmerken
 ]]></Implementation>
 </Method>
+
+<Method name="StandaardLadeVerpaktIn">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Verpakking:DOM.PM.enu.TBXVerpakkingType</FormalSpec>
+<ReturnType>DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken</ReturnType>
+<Implementation><![CDATA[
+	#dim TBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerken = ..StandaardLade()
+	
+	Set TBXKenmerken.VerpakkingType = Verpakking
+
+	Quit TBXKenmerken
+]]></Implementation>
+</Method>
 </Class>