FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour APPEND FROM DELIMITED
Posts: 610
Joined: Wed Oct 19, 2005 08:20 PM
APPEND FROM DELIMITED
Posted: Tue Nov 19, 2013 07:33 PM
Estoy tratando de importar datos de un fichero txt en el que los datos están delimitado con un * pero no logro importar más que el primer dato. Seguramente estaré haciendo algo mal. ¿Alguna sugerencia? Este es el código:
Code (fw): Select all Collapse
Local cNombreFi:="prueba.txt"
Local aDbf:={}
//
  AADD(aDbf,{"TIPO","C",1,0})
  AADD(aDbf,{"DNI","C",10,0})
  AADD(aDbf,{"NOMBRE","C",10,0})
  AADD(aDbf,{"APE1","C",10,0})
  AADD(aDbf,{"APE2","C",10,0})
  AADD(aDbf,{"DOMICILIO","C",41,0})
  AADD(aDbf,{"CPOSTAL","C",5,0})
  AADD(aDbf,{"NPROVIN","C",2,0})
  AADD(aDbf,{"NLOCA","C",3,0})
  AADD(aDbf,{"TELEFONO","C",9,0})
  //
  DBCREATE("PRUEBA",aDbf)
  //
  DbUseArea(.T.,,"PRUEBA")
  //
  APPEND FROM (cNombreFi) DELIMITED WITH ("*")
  //
Un saludo,

Manuel



xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
Posts: 1515
Joined: Thu Oct 30, 2008 02:37 PM
Re: APPEND FROM DELIMITED
Posted: Tue Nov 19, 2013 07:45 PM

Manuel,

No se cual pueda ser tu problema.
Desaconsejo utilizar el APPEND FROM DELIMITED por el delimitador.
Imaginate que tienes un asterisco en el telefono o en la direccion: pues ya la tenemos liada.

Asi que te aconsejo hacer una lectura con el lector de archivos txt que tiene fw, transformarla en un array de tokens e ir comprobando que cada token tiene la longitud (nº de columnas) esperadas, sino significara que el caracter delimitador esta siendo usado en algun campo. Ademas, el hacerlo asi, el tener una rutina para esto, te dara mas control y podras por ejemplo hacer conversiones en el momento de la conversion o podras grabar en campos distintos al mero orden.

Un saludo

Posts: 610
Joined: Wed Oct 19, 2005 08:20 PM
Re: APPEND FROM DELIMITED
Posted: Wed Nov 20, 2013 09:55 AM

hmpaquito, muchas gracias por el consejo.

Un saludo,

Manuel



xH 1.2.3, FWH 23.07 32 bits, BC++ 7.4, xVerce CW 1.0, PellesC
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: APPEND FROM DELIMITED
Posted: Wed Nov 20, 2013 07:49 PM

Manuel,
Si aún no lo has solucionado, ¿podríamos ver, al menos, las primeras 10 líneas del .txt?
Saludos.

Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql

Continue the discussion