Index: /trunk/ippToPsps/perl/pspsSchema2xml.pl
===================================================================
--- /trunk/ippToPsps/perl/pspsSchema2xml.pl	(revision 31107)
+++ /trunk/ippToPsps/perl/pspsSchema2xml.pl	(revision 31108)
@@ -388,5 +388,5 @@
     elsif ($type eq "TFLOAT") {$votType = "float";}
     elsif ($type eq "TDOUBLE") {$votType = "double";}
-    elsif ($type eq "TSTRING") {$votType = "char"; $arraySize = 24;}
+    elsif ($type eq "TSTRING") {$votType = "char"; $arraySize = 100;}
 
     $votWriter->startTag('FIELD',