Felipe Santos

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*/
    vTimer := Find_Timer( 'RELOG' );
    /*Caso exista algum timer com nome de RELOG, deleto o time para recriar o mesmo*/
    IF NOT Id_Null( vTimer ) THEN
      Delete_Timer( vTimer );
    END IF;
    vTimer := Create_Timer( 'RELOG', 1500, Repeat ); /*Criando timer que irá disparar rotina de reconectar*/
END IF;