PHSYS - Wiki

EmTransacao é utilizado para verificar se uma transação está ativa antes de executar comandos no banco de dados.

Sintaxe

EmTransacao

Exemplo

begin
  if ScriptServer then
    raise Exception.Create('Está no Servidor');
  // Inicia a transação, garantindo que EmTransacao fique true
  if not EmTransacao then
  begin
    IniciarTransacao; // Supondo que essa seja a função que inicia uma transação
    raise Exception.Create('Transação iniciada.');
  end;
  if EmTransacao then
    raise Exception.Create('Em transação')
  else
    raise Exception.Create('Não está transacionando');
    raise Exception.Create('Está no Cliente');  
end;