Index: Prod/GAData/Item.cls.xml
===================================================================
diff -u -r39152 -r57530
--- Prod/GAData/Item.cls.xml	(.../Item.cls.xml)	(revision 39152)
+++ Prod/GAData/Item.cls.xml	(.../Item.cls.xml)	(revision 57530)
@@ -463,7 +463,7 @@
 	Set tmpLB=""
 	Set PKey=""
 	For  Set MParam=..MetaItem.Parameters.GetNext(.PKey) Quit:(PKey="")  Do:(MParam.KolomNr>0)
-	. Set $LI(tmpLB,MParam.KolomNr)=$LB(PKey,..Parameters.GetAt(PKey))
+	. Set $LI(tmpLB,MParam.KolomNr)=$LB(PKey,$E(..Parameters.GetAt(PKey),1,4000))
 	Do WL^vhDBG("DItem params: "_$$LCVT^vhLib(tmpLB))
 	Quit
 ]]></Implementation>