Ver Mensaje Individual
  #3  
Antiguo 25-09-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola Marcos.

Hice una tabla resumida para la prueba:
Código SQL [-]
CREATE TABLE ALBARANES (
    ID_ALBARANES  INTEGER,
    CODCLIENT     CHAR(5),
    ACTIVO        CHAR(1),
    FACTURAR      CHAR(1),
    FECHA         DATE
);

Ingresé los siguientes datos:
Código:
ID_ALBARANES	CODCLIENT   ACTIVO  FACTURAR  FECHA
1	        00001	    S	    S	      01/09/2011
2		00002	    S	    S	      02/09/2011
3		00003	    S	    S	      03/09/2011
4		00004	    S	    S	      04/09/2011
Puse un IBQuery, un DataSource y un DBGrid. No pareciera ser cosa de los parámetros, usando este código funciona bién:
Código Delphi [-]
  with IBQuery1 do
  begin
    Close;
    SQL.Clear;
    SQL.Add('SELECT * FROM ALBARANES');
    SQL.Add('WHERE CODCLIENT = :CODCLI');
    SQL.Add('AND ACTIVO = :ACTIVO ');
    SQL.Add('AND FACTURAR = :FACTURA ');
    SQL.Add('AND FECHA <= :FECHA ');
    SQL.Add('ORDER BY FECHA');
    ParamByName('CODCLI').AsString:= '00004';
    ParamByName('ACTIVO').AsString:= 'S';
    ParamByName('FACTURA').AsString:= 'S';
    ParamByName('FECHA').AsString:= '04/09/2011';
    Open;
  end;

DBGrid:
Código:
4		00004	    S	    S	      04/09/2011
Un saludo.

Edito: Reacomodé las lineas del where para que se entienda mejor
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 25-09-2011 a las 21:26:06. Razón: Reacomodar lineas de código.
Responder Con Cita