Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 31-05-2014
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.091
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
¿Pero por qué no miras en qué linea se detiene?
Tienes muchas formas de hacerlo, por ejemplo, en el bucle puedes mostrar el valor de uno de los campos, código, nombre, etc. que te sirva para reconocer la línea.
También puedes escribir un contador y luego miras en el fichero de texto la línea a la que corresponde.
Etc...
Responder Con Cita
  #2  
Antiguo 31-05-2014
Avatar de jafera
jafera jafera is offline
Miembro
 
Registrado: may 2007
Ubicación: Llagostera (Girona)
Posts: 582
Poder: 18
jafera Va por buen camino
Gracias Antonio.

El problema es que no me importa ni una sola linea, eso es lo que me da quebraderos de cabeza.
Tal como comenté en un post anterior si cojo el valor de los campos y los meto a mano en la tabla mediante IBExpert no me da ningun error.
Si pongo una sola linea en el txt me dice que la ha importado pero en la tabla no se refleja nada.

Esto es lo que me pasa basicamente

Saludos

Josep
Responder Con Cita
  #3  
Antiguo 31-05-2014
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.091
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Ahora mismo no recuerdo, pero ¿esto es correcto?

Código Delphi [-]
WriteLn(E, SQLAcumulaID_REBUT.Value, ';', SQLAcumulaID_USUARI.Value, ';', DateToStr(SQLAcumulaDATA.Value), ';', 
                             SQLAcumulaTITOL.Value, ';', SQLAcumulaC_POSTAL.Value, ';', SQLAcumulaCODI_CLUB.Value, ';', 
                             SQLAcumulaARBITRES.Value, ';', FloatToStr(SQLAcumulaMATERIAL.Value), ';', SQLAcumulaI1.Value, ';',
...
...
etc.

Quiero decir que si ¿writeln admite valores separados por comas?
Responder Con Cita
  #4  
Antiguo 31-05-2014
Avatar de jafera
jafera jafera is offline
Miembro
 
Registrado: may 2007
Ubicación: Llagostera (Girona)
Posts: 582
Poder: 18
jafera Va por buen camino
Hola de nuevo.

El separador es el punto y coma.
Por lo menos defino el
Código Delphi [-]
F.ColDelimiter := ';';
en la importación.

Pero como ya comenté este código en D6 lleva cuatro años funcionando perfectamente en este proceso y algo similar en otros procesos

Josep
Responder Con Cita
  #5  
Antiguo 31-05-2014
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.091
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Por qué no pruebas a escribir cualquier cosa, para empezar. Por ejemplo,
Código Delphi [-]
writeln(E,"hola")
Y a partir de ahí vas viendo, según el resultado.
Responder Con Cita
  #6  
Antiguo 05-06-2014
Avatar de jafera
jafera jafera is offline
Miembro
 
Registrado: may 2007
Ubicación: Llagostera (Girona)
Posts: 582
Poder: 18
jafera Va por buen camino
He seguido haciendo pruebas.

He creado un fichero a mano con el orden de los campos dejando solo los campos enteros y los alfanumericos en blanco y el resultado es la imagen adjunta.

Creo que por lo que deduzco me interpreta toda la linea como una cadena.

No se que mas mirar.

Saludos

Josep
Imágenes Adjuntas
Tipo de Archivo: jpg Error-sql-303-1.jpg (39,8 KB, 9 visitas)
Responder Con Cita
  #7  
Antiguo 05-06-2014
Avatar de duilioisola
[duilioisola] duilioisola is offline
Miembro Premium
 
Registrado: ago 2007
Ubicación: Barcelona, España
Posts: 1.739
Poder: 20
duilioisola Es un diamante en brutoduilioisola Es un diamante en brutoduilioisola Es un diamante en bruto
Todo indica que está asumiendo que todo es una misma columna.

Te propongo una prueba mas:
Genera el fichero con la función TIBOutputDelimitedFile

De esta manera te asegurarías de que quien escribe el fichero y quien lo lee es el "mismo componente".
Una vez lo hayas exportado, compara los fichero para ver dónde está la diferencia.
Quizás espera un espacio entre campos o necesita que los strings estén entre comillas o alguna cosa de esas.

Ya nos informarás de si esto ha servido...
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
DELPHI6 Importar fichero codificado UTF-8 a Dbase Jose Manuel Varios 0 16-05-2011 18:46:14
Importar fichero XML cincosoft OOP 1 08-02-2009 10:29:58
Importar fichero .dat desde cobol julian_ch Varios 0 08-08-2005 17:43:17
Error al importar dll mguixot Varios 2 08-07-2005 15:47:26
importar fichero consumo telefonica tonid Varios 3 11-09-2003 09:49:28


La franja horaria es GMT +2. Ahora son las 16:47:06.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi