Update un campo sumando existencia (Inventario)

[[enecumene]]

uffff!!!!, ya he ultilizado el 100% de mi pequeña cabecita y no he logrado el objetivo, pues seguire descansando y tomando mi cervecita.

Saludos.

[[Caral]]

Hola
Intenta esta tonteria:

Código Delphi [-]
ZSumaInventario.Close;
ZSumaInventario.SQL.Clear;
ZSumaInventario.SQL.Add('update articulos set cantidad = :inv where ref = :cod');
ZSumaInventario.ParamByName('cod').Value := ZTemp.Fields[1].Value;
ZSumaInventario.ParamByName('inv').Value := strtoint(ZInventario.Fields[3].Value) + strtoint(ZTemp.Fields[3].Value);
ZSumaInventario.ExecSQL;

Saludos

[[enecumene]]

Hola Caral, el mismo error.

Saludos.

[[Caral]]

Hola
Me deja mal este error, no logro verlo, si puede poner el programa, me gustaria probarlo.
Saludos

[[enecumene]]

Vale, el programa esta a medias vere como lo posteo, dame unos minutos.

Saludos.

[[enecumene]]

A ver si funciona el link:

Almacen.rar

Saludos.

[[Caral]]

Ya lo tengo, lo voy a revisra
Ya lo comentamos, un minuto