Page 1 of 1
diferencia entre harbour y xharbour II
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
Posted:
Fri Jun 20, 2014 11:02 pm
by surGom
Probando encontré un comportamiento desigual con los campos memo
Imagen en harbour
![Image](http://sim1.subirimagenes.net/img/2014/06/21//140621125254264845.jpg)
Imagen en xharbour (correcta)
![Image](http://sim1.subirimagenes.net/img/2014/06/21//140621125256264846.jpg)
el código es el siguiente
- Code: Select all Expand view
aPedido:observa1 := oPmemo1:observa
etc etc
REDEFINE GET oGet[ 9 ] VAR aPedido:observa1 MEMO id 109 of odlgped UPDATE
odlgped:bStart := {|| oGet[ 9 ]:SetSel( 0, 0 ) }
Alguna idea o sugerencia
Gracias
Re: diferencia entre harbour y xharbour II
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
Posted:
Sat Jun 21, 2014 5:17 am
by Antonio Linares
Luis,
Para mi es una diferencia en como xharbour 2 y Harbour 3.2 alamacenan los campos memo.
Si pudieses salvarlos desde tu aplicación con xHarbour 2 a un fichero ascii, por ejemplo, y luego leerlos desde Harbour desde ese fichero externo y volver a guardarlos como memo, de esa manera se corregiría.
Seguro habrá otras formas, pero basicamente consistirían en los mismo (a mi entender), salvarlos a algo que no sea memo, y luego con Harbour leerlos y volver a almacenarlos como memo. Pienso que un fichero ascii podría ser lo más sencillo. Entre registro y registro, sitúa algún caracter (ó caracteres) que te sirvan para delimitar cada uno, incluso podrias anotar el número de registro tambien para luego asegurarte que se leen y se almacenan nuevamente en el orden correcto.
Re: diferencia entre harbour y xharbour II
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
Posted:
Sat Jun 21, 2014 10:25 am
by surGom
Gracias Antonio los voy a cambiar e informo
Luis
Re: diferencia entre harbour y xharbour II
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
Posted:
Sat Jun 21, 2014 2:24 pm
by surGom
Bueno aparentemente se arreglo fácil lo que hice fue
- Code: Select all Expand view
aPedido:observa := StrTran(oPmemo:observa,"?","")
Espero sirva en mi caso los campos memos es para guardar detalles intrínsecos con la mercadería que se entrega y no hay "?" en estos casos.
Ya había hecho de borrar los "?" manualmente en un pedido y luego guardarlo. Al reabrir el pedido me lo mostraba correctamente. Por eso el intento de utilizar strtran
Luis
Re: diferencia entre harbour y xharbour II
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
Posted:
Sat Jun 21, 2014 2:41 pm
by surGom
Me parece que no es una forma de guardar distinto los datos de los compiladores, porque tengo otra bases de datos (guardo separado los memos de la base principal en todos los casos) ejemplo clientes.dbf y datocliente.dbf (codigo,memo), y en ellas estan bien .
¿Es posible que en pedidos dejan espacios vacíos antes de escribir algo y eso se rellene con "?" ?
Luis
Re: diferencia entre harbour y xharbour II SOLUCIONADO
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
Posted:
Sat Jun 21, 2014 10:37 pm
by surGom
SOLUCIONADO pero no entendido por mi, paso a explicarles
Seguí tratando de ver el comportamiento de los campos memos. Trate de abrir los mismos desde dbwide, y me decía que estaban las dbf en cuestión corruptas, el programa las abría. Entonces hice desde el programa que esta en xharbour un copy to
Ejemplo
copy to pedmemo to tempe y luego las renombre
Antes de hacer el copy to
la base dbf vieja y la nueva 297455 bytes
pero
la fpt vieja tenía 6081453 y la nueva 1992053 bytes
indudablemente había problemas en pedmemo.fpt, hice lo mismo con todos los que uso ya que estaban igual.
Ahora el programa hecho en harbour lee bien los campos memo.
En xharbour me leía bien antes y ahora.
¿Es posible que en xharbour los vaya degradando con el uso? Y no nos damos cuenta ya que igual los abre y los lee correctamente cosa que harbour no lo tolera.
Bueno eso escapa a mis conocimientos pero por ahí andaba Garay.
Luis
Re: diferencia entre harbour y xharbour II
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
Posted:
Sat Jun 21, 2014 11:58 pm
by Antonio Linares
Luis,
Excelente
![Smile :-)](./images/smilies/icon_smile.gif)
Me alegro que lo hayas solucionado. Ya verás como cada vez te sientes más a gusto con Harbour.