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*/
IFNOT Id_Null( vTimer ) THEN
Delete_Timer( vTimer );
END IF;
vTimer := Create_Timer('RELOG', 1500, Repeat ); /*Criando timer que irá disparar rotina de reconectar*/