Asi lo pense usando dos Query's,
la cuestion es que necesito posicionarme en una fila
usando el nombre del articulo, entonces restare al stock
la cantidad que sea requerida.
por supuesto, no Funciona como cosa extraña,
Casimiro, ya comenzare a revisar la seccion SQL de tu libro
a ver con que me encuentro alli, pues estoy usando solo el manual de SQL
Código Delphi
[-]procedure TForm1.BDespacharClick(Sender: TObject);
Var
Codigo :Integer;
Total, Cantidad, Articulo :String;
begin
DataSourceBD.Enabled:= False;
ZQueryBD.Sql.Clear;
ZQueryBD.Close;
ZQueryBD.SQL.Add('SELECT Articulo, Cantidad From FacturaTemp ');
ZQueryBD.Open;
ZQueryBD.First; While Not(ZQueryBD.Eof) do begin
Articulo:= ZQueryBD.Fields[0].AsString;
Cantidad:= ZQueryBD.Fields[1].AsString;
ZQuery1.Close;
ZQuery1.SQL.Text:= 'Update Inventario Set Stock = Stock - '+Cantidad+' Where Articulo = '+Articulo;
ZQuery1.ExecSQL;
ZQueryBD.Next; end;
...Continua