Index: WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumNaarAXKenmerkenConverter.cls.xml
===================================================================
diff -u -r69441 -r69450
--- WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumNaarAXKenmerkenConverter.cls.xml	(.../BlumNaarAXKenmerkenConverter.cls.xml)	(revision 69441)
+++ WSimpl/Vhisie4/OPC/OPCService/OPCKenmerkenConverter/BlumNaarAXKenmerkenConverter.cls.xml	(.../BlumNaarAXKenmerkenConverter.cls.xml)	(revision 69450)
@@ -66,6 +66,41 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ConverteerBlumInkortingenAxKenmerk">
+<FormalSpec>BlumInkortingenLijst:%ListOfObjects</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[
+	Set AxStuklijstKenmerken = ##class(%ListOfObjects).%New()
+	#dim BlumInkorting As WS.Vhisie4.OPC.dto.InkortKenmerk
+	#dim BlumInkortingIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(BlumInkortingenLijst)
+	#dim InkortingLijst As %String = ""
+	#dim Index As %Integer = 1
+	
+	While (BlumInkortingIterator.HasNext()) {		
+		Set BlumInkorting = BlumInkortingIterator.Next()
+		
+		If (($Length(InkortingLijst) + $Length(BlumInkorting.Name _";"_BlumInkorting.Value _";"_BlumInkorting.Unit_";")) > 100)
+		{
+			#dim AxKenmerk As WS.Vhisie4.OPC.dto.Kenmerk = ..GeefAxKenmerk(..#KenmerkBomNaamPrefix _ ".Inkortinglijst" _ Index, InkortingLijst)
+			Do AxStuklijstKenmerken.Insert(AxKenmerk)
+			
+			Set Index = Index + 1
+			Set InkortingLijst = BlumInkorting.Name _";"_BlumInkorting.Value _";"_BlumInkorting.Unit_";"
+			
+		} Else {
+			Set InkortingLijst = InkortingLijst_BlumInkorting.Name _";"_BlumInkorting.Value _";"_BlumInkorting.Unit_";"
+		}
+	}
+	
+	If ($$$HasLength(InkortingLijst)) {
+		Set AxKenmerk = ..GeefAxKenmerk(..#KenmerkBomNaamPrefix _ ".Inkortinglijst" _ Index, InkortingLijst)		
+		Do AxStuklijstKenmerken.Insert(AxKenmerk)
+	}
+	
+	Quit AxStuklijstKenmerken
+]]></Implementation>
+</Method>
+
 <Method name="GeefKenmerk">
 <FormalSpec>KenmerkNaam:%String,KenmerkValue:%String</FormalSpec>
 <ReturnType>WS.Vhisie4.OPC.dto.Kenmerk</ReturnType>