Hola, tengo un problema con la consulta sql.
El codigo de la consulta es el siguiente:
Código Delphi
[-]
procedure TfrmSelectProd.SQLVenta(numero: String);
var
consulta: string;
begin
consulta:='Select CveProd, Descripcion, CantVta, PrecioV, Sum(CantVta*PrecioV) From producto, venta Where Venta.CveProd=producto.CveProd and venta.NoVenta=';
consulta:=consulta+(numero)+' Group By CveProd, Descripcion, CantVta, PrecioV';
with QyVenta do
begin
Close;
SQL.Clear;
SQL.Add(consulta);
Open;
end;
end;
El contenido de la consulta la visualizo en un dbgrid, pero al mandar llamar el procedimiento con el parametro SQLVenta(NoVta); NoVta es una variable string que contiene el numero de venta, me causa error, dice que CveProd es redundante..