Supongo que no funciona significa que te da un error, posiblemente en el ExecSQL, por estas líneas:
Cita:
Empezado por alcides
qry_catalogo.SQL.add('update Tbl_Catalogo');
qry_catalogo.SQL.Add('set balance := ppVariable.Value');
qry_catalogo.SQL.add('Where Cuenta = Detalle.Cuenta');
|
Lo que le llegará al motor es: "update Tbl_Catalogo set balance := ppVariable.Value Where Cuenta = Detalle.Cuenta" y el motor no tiene idea de que es ppVariable.Value y Detalle.Cuenta. Donde ppVariable.Value es un control de tu formulario y Detalle.Cuenta no se si te refieres a un campo de otra tabla o a que?
Fíjate de armar algo con este formato:
Código Delphi
[-]
DataSet.Sql := 'UPDATE TABLA ' + ;
'SET CAMPO = :Param0 ' +
'WHERE ID = :Param1';
DataSet.Params[0].Value := MiValor;
DataSet.Params[1].Value := MiId;
DataSet.ExecuteSql;
http://www.clubdelphi.com/foros/show...ht=shared+pool