Ayuda con APPEND FROM

[acuellar]

Hola amigos

Quiero cargar un archivo TXT a una base delimitado por pipe |
y no logro hacerlo.

lo hago asi:

Code: Select all  Expand view

USE OPERAVTA ALIAS Trial NEW EXCLUSIVE
APPEND FROM "TB.TXT" DELIMITED WITH "|"
 

carga mal.

Gracias por la ayuda

Saludos,

Adhemar

[karinha]

Format: TYPE SDF | DELIMITED [WITH <delimiter>|BLANK]

If the desired FROM <file> is not a database, the TYPE clause
may be used to specify SDF or DELIMITED <file> formats. The
default extension for these formats is "TXT".

An SDF file is an ASCII text file in which the records have a
fixed length and end with a carriage return and line feed.

A DELIMITED file is an ASCII text file in which each record ends
with a carriage return and line feed. Fields are normally sepa-
rated by commas, and character fields are additionally delimited
by double quotation marks. However, the DELIMITED WITH BLANK
option may be used to indicate that fields are separated by
spaces rather than commas; and, the DELIMITED WITH <delimiter>
option may be used to indicate that character fields are de-
limited by a character other than a double quotation mark.

[acuellar]

Gracias Joao

Pero no logro hacerlo funcionar.

Algun Ejemplo

Saludos,

Adhemar

[karinha]

Desculpe, no comprendo perfecto, desejas eliminar el caracter: "|" ? Se si, CHR(13)+chr(10)

Si no, haces la pregunta en: http://www.fivewin.com.br

Salud2

[Daniel Garcia-Gil]

Adhemar

Podrias colocar el TXT o uno similar....

Gracias

[acuellar]

Ahi va

240|Room Serv. Alimentos|911.00|
241|Room Serv. Bebidas|71.00|
242|Room Serv. Varios|12.00|
244|Room Serv.Descuentos|-130.80|

Estructura de la base
COD C 4
DESCRIP C 30
MONTO N 10 2

La primer columna la pasa bien.

Gracias Daniel

Saludos,

Adhemar

[acuellar]

Amigos,

Parece que no han tenido esta necesidad. No puedo hacerlo cargar bien.

Si no se puede con el APPEND
Se me ocurre leer el archivo de texto y sacar por parte y grabar en la base

Necesito ayuda.

Saludos,

Adhemar

[Daniel Garcia-Gil]

Adhemar

solo funciona si esta separado por comas ",", de esa forma no es neceario usar WITH "|"

Ejemplo para probar

Code: Select all  Expand view

#include "fivewin.ch"

REQUEST DBFCDX

function main()

   CreaDbf()
   append from "text.txt" delimited
   dbgotop()
   Browse()
   
return  nil

function CreaDbf()

   if ! File( "data.dbf" )
   
      DbCreate('data', {{'cod'     , 'C',   4,   0}  ,;
                        {'DESCRIP' , 'C',  30,   0} ,;
                        {'monto'   , 'N',  10,   2} }, 'DBFCDX')
   else
      use data alias data new via "dbfcdx"
      zap
   endif
                         
return nil
 

Text file

Code: Select all  Expand view

240,Room Serv. Alimentos,911.00
241,Room Serv. Bebidas,71.00
242,Room Serv. Varios,12.00
244,Room Serv.Descuentos,-130.80
 

Adhemar te doy una sugerencia muy util, para los proximos post que solicites ayudas ante un problema que consigas, intenta ofrecernos un ejemplo que podamor construir y que podamos reproducir el error que obtienes, sera mas facil ayudarte...
yo en lo particular dejo de ultimo los post que ofrecen informacion limitada o por minimo un ejemplo
te recomiendo leas este post:http://forums.fivetechsupport.com/viewtopic.php?p=103821#p103821

[acuellar]

Gracias Daniel

Separado por coma funciona.

El problema es cuando el monto es mayor a 999.00 viene con la con la , de miles. Ej: 1,324.23
y el archivo TXT lo crea otro sistema.

Saludos,

Adhemar

[Marcelo Via Giglio]

Adhemar,

aumenta un campo a tu tabla

COD C 4
DESCRIP C 30
MONTO N 10 2
BLANCO C 10

haber que pasa, nos dices

saludos

Marcelo

[acuellar]

Gracias Marcelo
No funciona

Como remplazar todas las "," por "" en un archivo de texto

Saludos,

Adhemar

[acuellar]

Lo logre con STRTRAN(tFile,",","")

Gracias

Saludos,

Adhemar