Index: vhUnitTest/DOM/PM/impl/INKLangtekstCreator/Test.cls.xml
===================================================================
diff -u -r68077 -r68602
--- vhUnitTest/DOM/PM/impl/INKLangtekstCreator/Test.cls.xml	(.../Test.cls.xml)	(revision 68077)
+++ vhUnitTest/DOM/PM/impl/INKLangtekstCreator/Test.cls.xml	(.../Test.cls.xml)	(revision 68602)
@@ -34,6 +34,19 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: StandaardInkortingMetIdentiekeLengtes">
+<Implementation><![CDATA[
+	Set ..InkKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.INKKenmerken).StandaardInkortingMetIdentiekeLengtes()
+	
+	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst()
+	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "Verzagen van" _ $$$CRLF, 
+																					"ZR7.1080U  RELING  20ELN2" _ $$$CRLF,
+																					"op lengte 3x 240mm")
+	
+	Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst)
+]]></Implementation>
+</Method>
+
 <Method name="GeefLangtekst">
 <Private>1</Private>
 <ReturnType>TECH.String</ReturnType>