campo fecha y hora en IBSQL

[StartKill]

Saldos foro,

Trabajo con delphi 7.0, con interbase 7.1 y con componentes IBX.

Tengo una actualizacion de una tabla con al siguiente estructura:

CREATE TABLE CD_ABONOS (
    FCOD_CONTR      CHAR(11) NOT NULL,
    FCOD_PRE        CHAR(10) NOT NULL,
    FFECHA  DATE,
    FHORA   TIME
);

Para insertar un registro estoy utilizando el componente IBSQL asi:

...
xFecha:=datetostr(date());
xHora:=timetostr(time());
ibsql1.close;
ibsql1.clear;
ibsql1.sql.add('insert into CD_ABONO '+
                 '(FCOD_CONTR, FCOD_PRE, FFECHA, FTIME)'+
                 ' values ('+
                 chr(39)+xcod_contr+chr(39)+',  '+
                 chr(39)+xcod_pre+chr(39)+',  '
                 chr(39)+xfecha+chr(39)+',  '
                 chr(39)+xtime+chr(39)+')'
IBSql1.ExecQuery;

y me salta un error...

conversion error from string "10:227:27 a.m."

He cambiado el formato de hora en el panel de control de windows.. y he tenido exito , pero sucede que hay otro sistema paralelo al mio que no trabaja con la nueva configuracion de formato hora del panel de control del windows ... y en estos momentos estoy pensando??? y la fecha la estará guardando bien?.

Bueno amigos espero consejos, opiniones, regalos...

Your friend

StartKill
Lima-Perú

[Nuria]

Hola StartKill!

Has probado de esta manera:

Código Delphi [-]
ibsql1.close;
ibsql1.clear;
ibsql1.sql.add('insert into CD_ABONO '+
                 '(FCOD_CONTR, FCOD_PRE, FFECHA, FTIME)'+
                 ' values (:COD,:PRE,:FEC,:TIM)';
ibsql1.ParambyName('COD').AsString := x_cod_contr;
ibsql1.ParambyName('PRE').AsString := xcod_pre;
ibsql1.ParambyName('FEC').AsDate := date();
ibsql1.ParambyName('TIM').AsTime := time();
IBSql1.ExecQuery;

En vez de convertir un Time a String. Directamente por medio de los parámetros, le pasas un tipo time. Igual de esta manera no te salta el error y te convierte bien el tipo time. Es sólo una suposición, no lo he probado.

Espero que te sirva.

Un saludo!

[StartKill]

Holas Nuria,

Recibe saludos de tu hermano pais Perú, departamento de Lima ,

Te comento que probé tu código con excelentes resultados, cambie varios formatos en el panel de control tanto fecha y hora... y perfecto.

Por Nuria:
En vez de convertir un Time a String. Directamente por medio de los parámetros, le pasas un tipo time.

Es lógico, tenes razon..., muchas gracias.

Your friend

StartKill
Lima-Perú

[mongiel]

Como creaste los parametros ya que no lo he podido crear, de antemano gracias por tu apoyo.

[Casimiro Noteví]

Empezado por mongiel

.

Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo?, gracias por tu colaboración