Mudanças entre as edições de "Procedimento CancelarTransacao"

(Exemplos)
(Exemplos)
Linha 6: Linha 6:
 
   begin
 
   begin
 
       try
 
       try
        if not (0 = 1) then
+
        IniciarTransacao;
            ErroValidacao('Zero não é igual a um');   
+
 
 +
        if not (0 = 1) then
 +
          ErroValidacao('Zero não é igual a um');   
 +
 
 +
        ConfirmarTransacao;
 
       except
 
       except
 
           E: Exception do
 
           E: Exception do

Edição das 14h19min de 3 de março de 2025

O procedimento CancelarTransacao realiza o cancelamento da transação impedindo que a execução continue.

Sintaxe

procedure CancelarTransacao;

Exemplos

 begin
     try
       IniciarTransacao;
       if not (0 = 1) then
         ErroValidacao('Zero não é igual a um');  
       ConfirmarTransacao;
     except
         E: Exception do
         begin
             CancelarTransacao;
             raise Exception.Create(E.Message);
         end;
     end;
 end.