[Edwardfeliz]

Empezado por ecfisa

Hola Edwardfeliz.


Ahora si está mas claro...

Código Delphi [-]
procedure FaltanNDias(const Dias: string; Qry: TADOQuery; ME: TMemo);
begin
  with Qry do
  begin
    Close;
    SQL.Clear;
    SQL.Add('SELECT ORDERNO, SALEDATE FROM ORDERS');
    SQL.Add('WHERE SALEDATE >= DATE() AND SALEDATE <= DATE() + :DIAS');
    Parameters.ParamByName('DIAS').Value := Dias;
    Open;
    while not Eof do
    begin
      ME.Lines.Add(Format('%s - %s',[FieldByName('ORDERNO').AsString,
        FieldByName('SALEDATE').AsString]));
      Next;
    end;
  end;
end;

Saludos

Perfecto Con ese mismo hice unas modificacionsitas e hice el de los artículos a reordenar también.

Saludos!