Index: vhUnitTest/APPS/PM/Maatwerk/End2End/LBX/TestReferentieLadesVoorDotNet.cls.xml
===================================================================
diff -u -r64557 -r65910
--- vhUnitTest/APPS/PM/Maatwerk/End2End/LBX/TestReferentieLadesVoorDotNet.cls.xml	(.../TestReferentieLadesVoorDotNet.cls.xml)	(revision 64557)
+++ vhUnitTest/APPS/PM/Maatwerk/End2End/LBX/TestReferentieLadesVoorDotNet.cls.xml	(.../TestReferentieLadesVoorDotNet.cls.xml)	(revision 65910)
@@ -145,6 +145,15 @@
 ]]></Implementation>
 </Method>
 
+<Method name="TestStandaardLadeMetSstUitvoeringSokkelEnTablet">
+<Implementation><![CDATA[
+	#dim LbxKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..GeefLbxKenmerkenOvereenkomstigMetDotNet(##class(DOM.PM.enu.LBXVerpakkingType).V1())
+	Do LbxKenmerken.GekoppeldeIngegevenKenmerken.SetAt(..GeefSstKenmerkenOvereenkomstigMetDotNet(),##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).SpaceStep())
+	
+	Do ..AssertBestanden(LbxKenmerken)
+]]></Implementation>
+</Method>
+
 <Method name="GeefLbxKenmerkenOvereenkomstigMetDotNet">
 <FormalSpec>VerpakkingType:DOM.PM.enu.LBXVerpakkingType="V1"</FormalSpec>
 <Private>1</Private>
@@ -221,6 +230,31 @@
 	Quit MATKenmerken
 ]]></Implementation>
 </Method>
+
+<Method name="GeefSstKenmerkenOvereenkomstigMetDotNet">
+<FormalSpec>Breedte:%Decimal,Diepte:%Decimal</FormalSpec>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.Common.impl.SSTKenmerken</ReturnType>
+<Implementation><![CDATA[
+	Set SSTKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.SSTKenmerken).%New()
+	Set SSTKenmerken.Bewegingstechnologie = ##class(DOM.PM.enu.SSTBewegingstechnologie).Blumotion()
+	Set SSTKenmerken.Breedte = 800
+	Set SSTKenmerken.Diepte = ##class(DOM.PM.enu.SSTDiepte).SpaceStepDiepte505()
+	Set SSTKenmerken.Hoogte = 180
+	Set SSTKenmerken.Kleur = ##class(DOM.PM.enu.SSTKleur).Oriongrijs()
+	Set SSTKenmerken.Uitvoering = ##class(DOM.PM.enu.SSTUitvoering).SokkelEnTablet()
+	Set SSTKenmerken.StekkerServodrive = $$$False
+	Set SSTKenmerken.StekkerType = ##class(DOM.PM.enu.SSTStekkerType).EU()	
+	
+	Set SSTKenmerken.ExplicietGekozenKenmerken = ##class(%ListOfDataTypes).%New()
+	Set SSTKenmerken.NietMeeleveren = ##class(%ListOfDataTypes).%New()
+	Set SSTKenmerken.Onderdelen = ##class(%ListOfDataTypes).%New()
+	Set SSTKenmerken.ProductieWijze = ""
+	Set SSTKenmerken.VersieNr = 0
+	
+	Quit SSTKenmerken
+]]></Implementation>
+</Method>
 </Class>