Index: APPS/PM/Maatwerk/AfbeeldingService/impl/SSTImageCodeBepaler.cls.xml
===================================================================
diff -u -r61830 -r61898
--- APPS/PM/Maatwerk/AfbeeldingService/impl/SSTImageCodeBepaler.cls.xml	(.../SSTImageCodeBepaler.cls.xml)	(revision 61830)
+++ APPS/PM/Maatwerk/AfbeeldingService/impl/SSTImageCodeBepaler.cls.xml	(.../SSTImageCodeBepaler.cls.xml)	(revision 61898)
@@ -10,16 +10,6 @@
 	#dim AfbeeldingCode As %String
 	#dim SSTKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.SSTKenmerken = IngegevenKenmerken.GekoppeldeIngegevenKenmerken.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).SpaceStep())
 	
-	/*If $$$Not($IsObject(..SSTKenmerken)) {
-		Set GekoppeldeIKIt = ##class(TECH.ListIterator).%New(..IngegevenKenmerken.GekoppeldeIngegevenKenmerken)
-		While GekoppeldeIKIt.HasNext() {
-			#dim GKIK As DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken = GekoppeldeIKIt.Next()
-			If (GKIK.Key = ##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).SpaceStep()) {
-				Set ..SSTKenmerken = GKIK.IngegevenKenmerken
-			}		
-		}
-	}*/
-	
 	If SSTKenmerken.Uitvoering = ##class(DOM.PM.enu.SSTUitvoering).Volledig() {
 		Set AfbeeldingCode = "SST_Volledig"
 	}ElseIf SSTKenmerken.Uitvoering = ##class(DOM.PM.enu.SSTUitvoering).SokkelEnTablet() {
Index: vhUnitTest/APPS/PM/Maatwerk/AfbeeldingCodeBepaler/SST/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/PM/Maatwerk/AfbeeldingCodeBepaler/SST/Test.cls.xml	(revision 0)
+++ vhUnitTest/APPS/PM/Maatwerk/AfbeeldingCodeBepaler/SST/Test.cls.xml	(revision 61898)
@@ -0,0 +1,25 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.PM.Maatwerk.AfbeeldingCodeBepaler.SST.Test">
+<Super>vhUnitTest.APPS.PM.Maatwerk.AfbeeldingCodeBepaler.Base,DOM.PM.Maatwerk.LBX.impl.Base</Super>
+
+<Method name="OnBeforeOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ##super(aTestName)
+	
+	Set ..AfbeeldingCodeBepaler = ##class(APPS.PM.Maatwerk.impl.LBX.AfbeeldingCodeBepaler).%New()
+]]></Implementation>
+</Method>
+
+<Method name="Test: AfbeeldingCode voor MLade Met SpaceStep uitvoering volledig">
+<Implementation><![CDATA[
+	#dim LBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken).MLadeSST()
+
+	Do ..AssertAfbeeldingCode(LBXKenmerken, "SST_Volledig")
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>