des exceptions d?une procédure stocké

Question

Salut


 

   

 
je cherche comment je peux g&#233;rer des exceptions d&#146;une proc&#233;dure stock&#233; qui ajoute des nouveau enregistrement


 

les photos  des message d'erreurs 
 
 
 
 
  le code  pour delphi
  with ModuleTables.ADOajoutTGChapitres do
  begin
  parameters.parambyname('@nouvCode').value := DBEGCCode.Text;
  parameters.parambyname('@nouvLibFrancais').value := DBEGCLibFrancais.Text;
  parameters.parambyname('@nouvLibArabe').value := DBMGCLibArab.Text;
  parameters.parambyname('@nouvSecBudget').value := StrToInt(DBRGGCSectionBudget.Value);
  execproc;
  cleftgchapitres :=  parameters.parambyname('@cleftgchapitres').value;
  end;
  merci d'avence, j'attend votre aide

MimiGMT · Answer

Bonjour en delphi, d&#233;j&#224; il faut traiter les exceptions :
   try
      Database.StartTransaction;
      execproc;
  Except
        on E: Exception do
              begin
                Database.Rollback;
                Raise;
                Exit;
              end;
            on E:EDatabaseError do
              begin
                  tu traites les messages d'erreurs qui sont issus de SQL Server
                  Rollback;
                  Exit;
              end;
          End;

En ce qui concerne le sql, si tu ne  veux pas avoir des messages r&#233;barbatifs il faut les traiter dans ta proc

If exists   (select    'X' from nomtable where champs1 = @champs1)
   begin
         raiserror 50000 'Cet enregistrement existe d&#233;j&#224;.'
         return
   end

J'esp&#232;re t'avoir &#233;t&#233; utile 
Bonne journ&#233;e

Des exceptions d?une procédure stocké

1 réponse

Votre réponse

Discussions similaires