Share Pastebin
Guest
Public paste!

Felipe Santos

By: a guest | Aug 3rd, 2009 | Syntax: SQL | Size: 0.50 KB | Hits: 124 | Expires: Never
Copy text to clipboard
  1. IF DBMS_ERROR_CODE IN (-03114,-03113,-00028,-01012,-01041) THEN /*Faixa de erros que se referem a perda de conexão, caso alguém saiba mais alguns, pode me enviar que faço inclusão aqui*/
  2.     vTimer := Find_Timer( 'RELOG' );
  3.     /*Caso exista algum timer com nome de RELOG, deleto o time para recriar o mesmo*/
  4.     IF NOT Id_Null( vTimer ) THEN
  5.       Delete_Timer( vTimer );
  6.     END IF;
  7.     vTimer := Create_Timer( 'RELOG', 1500, Repeat ); /*Criando timer que irá disparar rotina de reconectar*/
  8. END IF;