Index: DOM/PM/Maatwerk/LBX/impl/KorttekstBepaler.cls.xml
===================================================================
diff -u -r62044 -r62071
--- DOM/PM/Maatwerk/LBX/impl/KorttekstBepaler.cls.xml	(.../KorttekstBepaler.cls.xml)	(revision 62044)
+++ DOM/PM/Maatwerk/LBX/impl/KorttekstBepaler.cls.xml	(.../KorttekstBepaler.cls.xml)	(revision 62071)
@@ -38,15 +38,21 @@
 <Private>1</Private>
 </Property>
 
+<Property name="IngegevenKenmerkenTypeAPI">
+<Type>DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>LadeInfoAPI:DOM.PM.Maatwerk.LadeInfoAPI="",KleurCodeBepaler:DOM.PM.ProductTekst.impl.KleurcodeBepaler=""</FormalSpec>
+<FormalSpec>LadeInfoAPI:DOM.PM.Maatwerk.LadeInfoAPI="",KleurCodeBepaler:DOM.PM.ProductTekst.impl.KleurcodeBepaler="",IngegevenKenmerkenTypeAPI:DOM.PM.Maatwerk.IngegevenKenmerkenTypeAPI=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..LadeInfoAPI = $$$Implementation(LadeInfoAPI, ##class(DOM.PM.Maatwerk.impl.LadeInfoAPI).%New())
 	Set ..KleurCodeBepaler = $$$Implementation(KleurCodeBepaler, ##class(DOM.PM.ProductTekst.impl.KleurcodeBepaler.LBX).%New())
+	Set ..IngegevenKenmerkenTypeAPI = $$$Implementation(IngegevenKenmerkenTypeAPI, ##class(DOM.DomeinContext).Instance().GeefIngegevenKenmerkenTypeAPI())
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -64,7 +70,7 @@
 	Set ..HalffabItemsBoom = HalffabItemsBoom
 	Set ..Lade = ..LadeInfoAPI.GeefLade(HalffabItemsBoom,IngegevenKenmerken)	
 	
-	If (IngegevenKenmerken.Klasse = ##class(DOM.PM.enu.LBXKlasse).SpaceStep())
+	If (..IsSpaceStep())
 	{
 		Set ..SSTKenmerken = ..IngegevenKenmerken.GekoppeldeIngegevenKenmerken.GetAt(##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).SpaceStep())
 		
@@ -224,6 +230,13 @@
 	Quit $Extract(##class(TECH.StringUtils).AddTrailingSpace(DimensieString, 8), 1, 8)
 ]]></Implementation>
 </Method>
+
+<Method name="IsSpaceStep">
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ..IngegevenKenmerkenTypeAPI.IsSpaceStep(..IngegevenKenmerken)
+]]></Implementation>
+</Method>
 </Class>