GARANTIR DESCONTO

Fórum Tratamento Exceção #271019

04/03/2005

0

Pessoal


Como faço usar uam estrutura Try-except quando salvo registros em uma tabela. Ex:

try
CdsItemOsOr.Edit;
CdsItemOsOr.Append;

CdsItemOsOr.FieldByName(´QUAPRO_ITEM_OS_OR´).asInteger :=
StrToInt(Cells[3,x]);

CdsItemOsOr.FieldByName(´VALUNIT_ITEM_OS_OR´).Value :=
sValor;

CdsItemOsOr.Post;
CdsItemOsOr.ApplyUpdates(-1);

Except

Qual classe de exceção poderia colocar após o except ???

Estou usando o Interbase 6.0

Rogério


Rogeranalista

Rogeranalista

Responder

Posts

04/03/2005

Gandalf.nho

Para tratar as exceções no ClientDataSet ao postar alterações no banco, use o evento OnReconcileError para isso


Responder

Gostei + 0

26/07/2005

Lorde_morte.

Para tratar as exceções no ClientDataSet ao postar alterações no banco, use o evento [b:89e84e26e0]OnReconcileError[/b:89e84e26e0] para isso


Onde voce ficou sabendo desse tipo de erro?

Formato do try:
try
{ calculation statements }
except
on <[b:89e84e26e0][color=red:89e84e26e0]type of exception[/color:89e84e26e0][/b:89e84e26e0]> do <statement>;
end;

Onde eu consigo uma lista explicativa dos tipos de erros do try?

Desde ja obrigado.

t+


Responder

Gostei + 0

26/07/2005

Tuskinhu

eu uso sempre dessa forma:

    try
      with AusenciaQry do
      begin
        Close;
        SQL.Clear;
        SQL.Text := SQL_DELETE;
        ParamByName(´Seq´).AsInteger := Codigo;
        ExecSQL;
        Close;
      end;  // TpAusQry
    except
      on E:Exception do
      begin
        MsgError(´Erro na execução da exclusão no Banco de Dados.´ + #13 +
                 ´Lembrando: Para excluir um tipo de ausência é imprescindível que não´ + 13 +
                 ´haja mais nenhum funcionário alocado a ela.´ + 13 +
                 ´SQL: ´ + AusenciaQry.SQL.Text + 1313 +
                 ´Erro interno/compilador:´ + E.Message);
      end;
    end;   // try..except



Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar