Como executar Store Procedure que não retorna Valores
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.
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.
Emery
Curtidas 0
Respostas
Afarias
26/08/2004
1- use um SQLQuery
2- tome o cuidado de abrir a transação antes de executar o procedimento e comitar a transação após.
T+
2- tome o cuidado de abrir a transação antes de executar o procedimento e comitar a transação após.
T+
GOSTEI 0
Emery
26/08/2004
Qual a diferença, sempre usei o SQLDATASET(DBExpress) para fazer as minhas Operações em banco de Dados. Inclusive para chamar procedures.
Nilson
Nilson
GOSTEI 0
Afarias
26/08/2004
Um DataSet como o próprio nome diz deve representar um conjunto de dados.
T+
T+
GOSTEI 0