From 5d6197282d3efe6b5614177f8e3a88a4487fc5fb Mon Sep 17 00:00:00 2001
From: fdbozzo <fdbozzo@.(none)>
Date: Fri, 7 Mar 2014 18:56:09 +0100
Subject: [PATCH] Changeset: 190 fdbozzo - 07/03/2014 18:52:38: - Arreglo bug
 vcx/scx: valor character con longitud >255 en propiedad de addobject, se
 regenera con tag <fb2p_value> incluido (Ryan Harris)

---
 foxbin2prg.prg | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/foxbin2prg.prg b/foxbin2prg.prg
index 24772af..c3fcf46 100644
--- a/foxbin2prg.prg
+++ b/foxbin2prg.prg
@@ -3979,10 +3979,10 @@ DEFINE CLASS c_conversor_prg_a_bin AS c_conversor_base
 						ENDIF
 
 						IF RIGHT(tcLine, 3) == ', ;'	&& VALOR INTERMEDIO CON ", ;"
-							.get_SeparatedPropAndValue( LEFT(tcLine, LEN(tcLine) - 3), @lcProp, @lcValue )
+							.get_SeparatedPropAndValue( LEFT(tcLine, LEN(tcLine) - 3), @lcProp, @lcValue, toClase, @taCodeLines, @tnCodeLines, @I )
 							toObjeto.add_Property( @lcProp, @lcValue )
 						ELSE	&& VALOR FINAL SIN ", ;" (JUSTO ANTES DEL <END OBJECT>)
-							.get_SeparatedPropAndValue( RTRIM(tcLine), @lcProp, @lcValue )
+							.get_SeparatedPropAndValue( RTRIM(tcLine), @lcProp, @lcValue, toClase, @taCodeLines, @tnCodeLines, @I )
 							toObjeto.add_Property( @lcProp, @lcValue )
 						ENDIF