Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 28-05-2014
Avatar de duilioisola
[duilioisola] duilioisola is offline
Miembro Premium
 
Registrado: ago 2007
Ubicación: Barcelona, España
Posts: 1.806
Poder: 22
duilioisola Es un diamante en brutoduilioisola Es un diamante en brutoduilioisola Es un diamante en bruto
Revisa que el fichero generado también tenga como separador decimal el '.' (punto).
Si lo generas en un ordenador y lo lees en otro, esto podría traerte esa parte modificada.

El formato de la fecha también es importante. Dependiendo del separador, el orden de los elementos es diferente para Firebird (mm/dd/aaaa dd-mm-aaaa aaaa.mm.dd)

Verifica que el tipo de campo acepte el valor que le envías:
SMALLINT 0..65535
INTEGER 0..muuuucho
VARCHAR(x) x caracteres
CHAR(x) x caracteres

Lo dicho anteriormente:
Si hay comillas o comillas simples, puede que eso estropee el formato
Responder Con Cita
  #2  
Antiguo 31-05-2014
Avatar de jafera
jafera jafera is offline
Miembro
 
Registrado: may 2007
Ubicación: Llagostera (Girona)
Posts: 585
Poder: 20
jafera Va por buen camino
Hola de nuevo.

Sigo dándole vueltas al asunto.
He probado toda clase de valores en los campos y nada de nada, he probado a guardar el txt como ansi, como unicode, como utf-8 y tampoco.
He probado con otro proceso de importación con otro fichero txt completamente distinto dentro del mismo programa y me da el mismo error.
He quitado el componente que hace la importación (IBSQL), lo he vuelto a soltar dentro del form por si fuera un problema de version actualizada y tampoco funciona.
Estoy semi desesperado, en un XP a 32 bits con D6 funciona bien pero en un W7 a 64 bits con XE5 nada de nada.
Como comenté en un mensaje anterior el código de una versión a la otra es exactamente el mismo.
Porqué narices la compilación D6 funciona de fábula y la XE5 no?
Tendré que cambiar los componentes de acceso a datos?

Gracias por vuestro tiempo.

Saludos

Josep
Responder Con Cita
  #3  
Antiguo 31-05-2014
Avatar de Casimiro Noteví
Casimiro Noteví Casimiro Noteví is offline
Merodeador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.669
Poder: 10
Casimiro Noteví Tiene un aura espectacularCasimiro Noteví 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
  #4  
Antiguo 31-05-2014
Avatar de jafera
jafera jafera is offline
Miembro
 
Registrado: may 2007
Ubicación: Llagostera (Girona)
Posts: 585
Poder: 20
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
  #5  
Antiguo 31-05-2014
Avatar de Casimiro Noteví
Casimiro Noteví Casimiro Noteví is offline
Merodeador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.669
Poder: 10
Casimiro Noteví Tiene un aura espectacularCasimiro Noteví 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
  #6  
Antiguo 31-05-2014
Avatar de jafera
jafera jafera is offline
Miembro
 
Registrado: may 2007
Ubicación: Llagostera (Girona)
Posts: 585
Poder: 20
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
  #7  
Antiguo 31-05-2014
Avatar de Casimiro Noteví
Casimiro Noteví Casimiro Noteví is offline
Merodeador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.669
Poder: 10
Casimiro Noteví Tiene un aura espectacularCasimiro Noteví 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
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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 12:19:43.


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