restar entre 2 tablas de mysql y mostrar en reporte

[[Caral]]

Hola
Tienes un boton en el que aplicas el update del dataset.
No se que componente usas para conectarte pero digamos que es un query normal.
Coloca un query (del componente que uses) lo conectas a la bd y pones este codigo en el boton del update.

Primero cuentas o sumas el dato del campo cantidad de la tabla entradas, lo guardas en una variable:
Despues generas el update de la tabla productos del campo existencias.

Código Delphi [-]
var dato: real;
begin
// guardas los datos, esto ya lo estas haciendo en ese boton
clientdataset1.ApplyUpdates(0);
showmessage('grabado con exito ');

//Sumo el campo cantidad, segun el codigo del producto
Query1.slq.text.= 'Select sum(cantidad) as cantidad from Entradas where codigo = :cod';
Query1.Params[0].Value:=  form5.codigo.Text;
Query1.Open;
dato:= FloatToStr(Query1.Fields[0].Text);
Query1.Close;

// genero el update de la tabla productos al campo existencias, segun el codigo del producto
Query1.SQL.Text := 'Update Productos set Existencias = Existencias + :Nuevodato Where Codigo = :cod';
Query1.Params[0].Value:= dato;
Query1.Params[1].Value:=  form5.codigo.Text;
Query1.ExecSQL;

showmessage('existencia actualizada ');
end;

Espero que lo entiendas.
Saludos