Type Text8102 and class DataArithmL added

src/exe/co_convert/src/cnv_wbltoh.cpp

@@ -1050,6 +1050,7 @@ int CnvWblToH::check_typename( char *type_volume, char *type_name)
 	"pwr_tString1",
 	"pwr_tText256",
 	"pwr_tText1024",
+	"pwr_tText8192",
 	"pwr_tURL",
 	"pwr_tOpSysEnum",
 	"pwr_tPrivMask",

src/exp/inc/src/pwr.h

@@ -451,6 +451,10 @@ typedef char		pwr_tText256	[256];			//!< 256 byte text type.
   @aref text1024 Text1024
 */
 typedef char		pwr_tText1024	[1024];			//!< 1024 byte text type.
+/*_*
+  @aref text8192 Text8192
+*/
+typedef char		pwr_tText8192	[8192];			//!< 8192 byte text type.
 /*_*
   @aref url URL
 */

wb/exp/wb/src/pwr_wb_palette.cnf

@@ -672,6 +672,7 @@ palette PlcEditorPalette
     class Curve
     class DArithm
     class DataArithm
+    class DataArithmL
     class Demux
     class Div
     class Equal

wb/lib/wb/src/wb_gcg.cpp

@@ -12466,11 +12466,21 @@ int	gcg_comp_m42( gcg_ctx gcgctx, vldh_t_node node)
 	int			error_line_size = sizeof(error_line);
 	char			pointer_name[80];
 	int			codesize;
+	int			buff_size;
 
 #define DATAA_BUFF_SIZE 16000
+#define DATAA_BUFF_SIZEL 48000
 
 	ldhses = (node->hn.wind)->hw.ldhses; 
 
+	switch ( node->ln.cid) {
+	case pwr_cClass_dataarithml:
+	  buff_size = DATAA_BUFF_SIZEL;
+	  break;
+	default:
+	  buff_size = DATAA_BUFF_SIZE;
+	}
+
 	/* Get c-expression stored in devbody */
 	sts = ldh_GetObjectPar( ldhses,
 			node->ln.oid, 
@@ -12486,12 +12496,12 @@ int	gcg_comp_m42( gcg_ctx gcgctx, vldh_t_node node)
 	sprintf( pointer_name, "%c%s", GCG_PREFIX_REF,
 			vldh_IdToStr(0, node->ln.oid));
 
-	newstr = (char *)calloc( 1, DATAA_BUFF_SIZE);
+	newstr = (char *)calloc( 1, buff_size);
 	if ( !newstr) 
 	  return FOE__NOMEMORY;
 
 	sts = dataarithm_convert( expression, newstr, pointer_name, 
-		DATAA_BUFF_SIZE, error_line, &error_line_size, &error_num,
+		buff_size, error_line, &error_line_size, &error_num,
 		&codesize);
 	if (EVEN(sts))
 	{

wb/lib/wb/src/wb_gre.cpp

@@ -63,7 +63,7 @@
 #include "wb_tra.h"
 
 
-#define ANNOT_LEN_MAX 	1024
+#define ANNOT_LEN_MAX 	8192
 #define ANNOT_NR_MAX 	8
 
 

wb/lib/wb/src/wb_wattnav.cpp

@@ -1074,7 +1074,7 @@ int WAttNav::set_attr_value( brow_tObject node, char *name, char *value_str)
 {
   WItem		*base_item;
   int		sts;
-  char 		buff[1024];
+  char 		buff[8192];
   int		size;
 
   // Check that object still exist

wb/lib/wb/src/wb_wnav.cpp

@@ -301,7 +301,7 @@ void  wnav_attrvalue_to_string( ldh_tSesContext ldhses, int type_id, void *value
   pwr_tObjid		objid;
   pwr_sAttrRef		*attrref;
   int			sts;
-  static char		str[2048];
+  static char		str[8192];
 
   switch ( type_id ) {
   case pwr_eType_Boolean: {