Fórum Como executar Store Procedure que não retorna Valores #46341

Uso Delphi 7 + DbExpress + FB 1.5

Como faço para executar uma Store procedure que não retorna valor, ela somente efetua uns Updates em umas tabelas

Estou fazendo assim, a primeira parte dá certo, mas segunda não

ith dm2 do
Begin

try

CDT_ZCli.Active:=false;
SQL_ZCli.Close;
SQL_Zcli.CommandText:=´SELECT * FROM SOMA_CLI ORDER BY VNOME´;
SQL_ZCli.Open;
CDT_zCli.Active:=true;
label1.Caption:=inttostr(cdt_zcli.RecordCount);
CDT_zCli.First;
Dbgrid1.Refresh;
finally
//Garantimos que o cursor volte ao normal após a operação.
for_AtualizaCli.Cursor := crDefault;
end;
/// ATÉ AQUI DÁ CERTO

//******* ESTA PARTE PARA BAIXO DA ERRO
//******* USO SQLDataset do DbExpress
sql_SPRec.Close;
sql_SPRec.CommandText:=´EXECUTE PROCEDURE UPDATE_CLICOD´;
sql_sprec.ExecSQL;
//CDT_SPRec.Active:=true;}
end;
end;

end.