Usar Varios IBQuery en un IBDatabase

[angel.sosa]

OK, ya entendido. Muchisimas Gracias por la ayuda.

[angel.sosa]

solo me resta ingresar 2 parametros fecha. que tengo en un Par de DateTimePiker los cuales pretendo ingresar dentro de un IBQuery3,
el problema es que el sql solo me reconoce el formato dd.mm.yyyy con el Edit2.Text y al querer sustituilo por el DataTimePiker.
me marca error "Token UKNOWn" pues al parecer mi version de DELphi solo me reconoce que le pase la fecha con punto ejemplo 23.11.2012 me manda error cuando entra 23/11/2012 pues el datatimepiker solo me arroja la fecha al leerlo con las "/"

este codigo pedazo de codigo es cuando uso el Text y si funciona.

Código Delphi [-]
IBQuery1.SQL.Add('on VE.cliente_id = cli.cliente_id  AND VE.fecha >='+Char(39)+Edit2.Text+Char(39));

lo pretendo sustituir con este codigo del DataTimePiker pero es cuando me marca el error.
el codigo es:

Código Delphi [-]
IBQuery1.SQL.Add('on VE.cliente_id = cli.cliente_id  AND VE.fecha >='+Char(39)+quotedstr(FormatDateTime('DDMMYYYY',DateTimePicker1.Date))+Char(39));

[Casimiro Notevi]

Te aconsejo que uses parámetros, así nunca tendrás problemas de ese tipo, según tu ejemplo:

Código Delphi [-]
query.sql.text:='select ...... on ve.cliente_id=cli.cliente_id and ve.fecha >= :lafecha';
query.parambyname('lafecha').asdatetime := datetimepicker1.date;
query.open;

[angel.sosa]

no puede adecuar tu respuesta Casimiro, pero tomando tu sugerencia, busque como resolverlo.
en realidad no pude hacer uso del método que la consulta es sumamente larga y mejor sustituí, las "." por "/". pues se me facilito de esta forma porque mi cosulta es bastante larga.

Código Delphi [-]
IBQuery1.SQL.Add('select LC.nombre_cliente, ...............................
IBQuery1.SQL.Add('ON CLI.cliente_id = C.cliente_id ');
IBQuery1.SQL.Add('inner join doctos_ve VE ');
IBQuery1.SQL.Add('on VE.cliente_id = cli.cliente_id  AND VE.fecha >='+Char(39)+(StringReplace(DateToStr(DateTimePicker1.Date),'/','.',[rfReplaceAll]))+Char(39)+' ');
IBQuery1.SQL.Add(' inner join condiciones_pago CPG ');
IBQuery1.SQL.Add('ON CPG.cond_pago_id = VE.cond_pago_id ');
IBQuery1.SQL.Add('inner JOIN vendedores ven ');
................................

perdon por no dar la solucion antes. andaba terminando el proyectito

[ecfisa]

Empezado por angel.sosa

no puede adecuar tu respuesta Casimiro...

Hola Angel.

Me alegra que hayas podido resolverlo y gracias por ponernos la solución.

Pero creo mas adecuado el modo que te sugirió Casimiro:

Código Delphi [-]
  with IBQuery1 do
  begin
    Close;
    SQL.Clear;
    SQL.Add('select LC.nombre_cliente, ...');
    SQL.Add('ON CLI.cliente_id = C.cliente_id ');
    SQL.Add('inner join doctos_ve VE ');
    SQL.Add('on VE.cliente_id = cli.cliente_id  AND VE.fecha >= :PFECHA');
    SQL.Add('inner join condiciones_pago CPG ');
    SQL.Add('ON CPG.cond_pago_id = VE.cond_pago_id ');
    SQL.Add('inner JOIN vendedores ven ');
    ParamByName('PFECHA').AsDate := DateTimePicker1.Date;
    Open;
  end;

Es mucho más seguro, entendible y menos propenso a equivocos.

Saludos.

[[Delphius]]

Empezado por ecfisa

Hola.

Y aunque lo creo innecesario, tambien podes:

IBDatabase1 <--+- IBTransaction1 <-- IBQuery1
               |
               +- IBTransaction2 <-- IBQuery2
               |
               +- IBTransaction3 <-- IBQuery3
               ...

Saludos.

Pues yo diría que esta opción es quizá más sana y segura para evitar conflictos sobre las transacciones. Por ejemplo, como cuando se tiene el error de que ya existe una transacción abierta.
Con esta forma uno puede dejar abierto varias transacciones individualmente en cuanto necesite. No está demás aclarar que tampoco es para dejarlas activas todo el tiempo, pero con esta manera si uno se es ordenado puede controlar mejor cada transacción posible de hacer en el sistema y tomar las acciones para el caso.
Pregunta: ¿Cómo le haces para detectar y discrimar cual de los tantos Datasets ligado a una única transacción es quien está en funciones y acaparando el uso de dicha transacción?

Saludos,

[Casimiro Notevi]

Empezado por Delphius

Pregunta: ¿Cómo le haces para detectar y discrimar cual de los tantos Datasets ligado a una única transacción es quien está en funciones y acaparando el uso de dicha transacción?

Código SQL [-]
ibquery3.transaction.commit;