Exportar registros
Ante todo permíteme saludarte, apreciado amigo, no tengo mucha experiencia con foxpro pero necesito exportar los registros de unos archivos .dbf a un archivo .txt y estoy utilizando la instrucción "copy to", pero esta instrucción no exporta los campos memo, y evidentemente necesito exportarlos también, estoy usando foxpro 2.5, y agradecería enormemente me aclararas la manera de exportar estos campos también con el resto.
Muchas gracias de antemano por toda la colaboración.
Rogers Arismendi
Venezuela
Muchas gracias de antemano por toda la colaboración.
Rogers Arismendi
Venezuela
1 Respuesta
Respuesta de falvarez
1
Rogers:
Los campos MEMO no se pueden exportar mediante el uso de comandos...
Lo único que puedes hacer es escribir un código parecido a este:
SELECT CLIENTES
Go top
SCATTER MEMVAR MEMO && Leo las variables de memoria de la tabla.
SET MEMOWIDTH TO 40 && Establezco el ancho de línea a imprimir en 40 caracteres.
_LINEAS=MEMLINES(M.CLI_OBSERV) && Obtengo la cantidad de lineas del campo memo CLI_OBSERV de longitud 40.
IF _LINEAS>0
SET PRINTER TO C:\EXPORT.TXT
SET DEVICE TO PRINT
FOR I=1 TO _LINEAS
@I,0 SAY MLINE(M.CLI_OBSERV,I)
ENDFOR
SET DEVICE TO SCREEN
SET PRINTER TO
Endif
Espero haberte sido de ayuda.
Saludos.
Fernando ALVAREZ
La Pampa - Argentina
BOCA JUNIORS Pentacampeón Copa Libertadores de America.!
Los campos MEMO no se pueden exportar mediante el uso de comandos...
Lo único que puedes hacer es escribir un código parecido a este:
SELECT CLIENTES
Go top
SCATTER MEMVAR MEMO && Leo las variables de memoria de la tabla.
SET MEMOWIDTH TO 40 && Establezco el ancho de línea a imprimir en 40 caracteres.
_LINEAS=MEMLINES(M.CLI_OBSERV) && Obtengo la cantidad de lineas del campo memo CLI_OBSERV de longitud 40.
IF _LINEAS>0
SET PRINTER TO C:\EXPORT.TXT
SET DEVICE TO PRINT
FOR I=1 TO _LINEAS
@I,0 SAY MLINE(M.CLI_OBSERV,I)
ENDFOR
SET DEVICE TO SCREEN
SET PRINTER TO
Endif
Espero haberte sido de ayuda.
Saludos.
Fernando ALVAREZ
La Pampa - Argentina
BOCA JUNIORS Pentacampeón Copa Libertadores de America.!
Muchas Gracias amigo, le verdad es que esta respuesta me es extermadamente útil tu explicación, solo me queda combinarla para logara la exportación completa de los datos. De todas formas espero me ayudes si se me presentan incionvenientes
