Filtro de fecha vencida

[leodelca23]

Gracias, no habia leido tu mensaje

[leodelca23]

Hola a todos probe con today y now y me dice que columna no se encuentra que puede ser? ahi esta el codigo gracias

procedure TFTodos.BFiltrarClick(Sender: TObject);

begin
IBQInformes.Close;
IBQInformes.Sql.Clear;
if Cbvencidos.Checked=true then
IBQInformes.SQL.Add('SELECT * FROM Telas INNER JOIN Descripcion '+
'ON Telas.Descripcion1 = Descripcion.Descripcion Where'+ 'Telas.FECHA_PROMETIDA > NOW');
IBQInformes.Open;
end;

[[Caral]]

Hola
sigo sin entender.
ahora veo dos tablas o me parece.
telas y descripcion
el campo telas.descripcion1 es diferente a descripcion.descripcion, por que el ligue para que se necesita si el campo fecha esta en telas?
Saludos.

[bitbow]

Código PHP:

procedure TFTodos.BFiltrarClick(Sender: TObject);
 
 begin
   IBQInformes.Close;
   IBQInformes.Sql.Clear;
   if Cbvencidos.Checked=true then
    begin
      IBQInformes.SQL.Add(' SELECT * FROM Telas INNER JOIN Descripcion ');
      IBQInformes.SQL.Add(' ON Telas.Descripcion1 = Descripcion.Descripcion ');
      IBQInformes.SQL.Add(' Where Telas.FECHA_PROMETIDA > '+ NOW);
      IBQInformes.Open;
    end;
 end; 


Asi es como le hago yo :

Código PHP:

procedure TFTodos.BFiltrarClick(Sender: TObject);
 
 begin
   IBQInformes.Close;
   IBQInformes.Sql.Clear;
   if Cbvencidos.Checked=true then
    begin
      IBQInformes.SQL.Add(' SELECT * FROM Telas INNER JOIN Descripcion ');
      IBQInformes.SQL.Add(' ON Telas.Descripcion1 = Descripcion.Descripcion ');
      IBQInformes.SQL.Add(' Where Telas.FECHA_PROMETIDA > "'+ DateToStr(Date) +'"');
      IBQInformes.Open;
    end;
 end; 


Debes concatenar tu consulta con el valor de Now, la verdad no he manejado Now y no se que tipo de datos devuelva si es Date , Time o combinado de cualquier forma debes de hacer la conversion del tipo de dato que te devuelva a String , para las fechas es DateToStr.

Por ahi en google anda un manual de las funciones de conversion , no recuerdo el enlace.

[bitbow]

Hola
sigo sin entender.
ahora veo dos tablas o me parece.
telas y descripcion
el campo telas.descripcion1 es diferente a descripcion.descripcion, por que el ligue para que se necesita si el campo fecha esta en telas?
Saludos.

Sinceramente he trabajado con Tablas y no es por hacerles el feo pero tienen sus limitaciones y con SQL tienes mucha potencia, hay veces en que no sera necesario utilizar query y sera mas facil usar Tablas eso que ni que, pero aqui siento que es mejor con Query almenos esa es mi humilde opinion.

[[Caral]]

Hola
Por favor corrigeme pero creo que funcionaria asi tambien:

Código Delphi [-]
procedure TFTodos.BFiltrarClick(Sender: TObject);
 
 begin
   IBQInformes.Close;
   IBQInformes.Sql.Clear;
   if Cbvencidos.Checked=true then
    begin
      IBQInformes.SQL.Add(' SELECT * FROM Telas INNER JOIN Descripcion ');
      IBQInformes.SQL.Add(' ON Telas.Descripcion1 = Descripcion.Descripcion ');
      IBQInformes.SQL.Add(' Where Telas.FECHA_PROMETIDA > "'+ DateToStr(Now) +'"');
      IBQInformes.Open;
    end;
 end;

Con relacion a lo otro totalmente de acuerdo con tigo, gracias por la acotacion.
Saludos

[bitbow]

No he tenido la oportunidad/necesidad de usar Now, Today de echo no se nada pero ahorita me documento , cada dia de aprenden algo nuevo.

Saludos.

[leodelca23]

Ahi funciono. Realmente son unos maestros todos. Se les agradece por todo realmente hay que tener paciencia para aguantar preguntas de alguien como yo. Le agradezco en el nobmre de todos los usuarios del club delphi ya que sin gente como ustedes nosotros nos suicidariamos. Muchas Gracias

Saludos

[leodelca23]

Perdonen pero no se que paso pero no me funciona ahora no se que habre hecho le voy a pasar las tablas para ver si hay algun error estas son las tablas

Código PHP:

CREATE TABLE TELAS (
  CLIENTE VARCHAR(30) NOT NULL,
  PO VARCHAR(20) NOT NULL,
  FECHA_EMISION TIMESTAMP NOT NULL,
  DESCRIPCION1 VARCHAR(55) NOT NULL,
  DESCRIPCION2 VARCHAR(55) NOT NULL,
  CANTIDADES_PEDIDAS INTEGER NOT NULL,
  CANTIDADES_HECHAS INTEGER NOT NULL,
  CANTIDADES_FALTANTES INTEGER NOT NULL,
  FECHA_PROMETIDA TIMESTAMP NOT NULL
);CREATE TABLE DESCRIPCION (
  DESCRIPCION VARCHAR(50),
  ESTILO VARCHAR(25),
  COLOR1 VARCHAR(25),
  COLOR2 VARCHAR(25),
  COLOR3 VARCHAR(25),
  COLOR4 VARCHAR(25),
  COLOR5 VARCHAR(25),
  FOLDLINE VARCHAR(25)
) 


no se cuando le cambio la fechas de timestamp a date me da error , si me pueden ayudar haciendo la comparacion con el timestamp realmente la hora no la hora no me interesa.

Saludos