Advertisement
Guest User

Felipe Santos

a guest
Aug 3rd, 2009
345
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. IF DBMS_ERROR_CODE IN (-03114,-03113,-00028,-01012,-01041) THEN /*Faixa de erros que se referem a perda de conexo, caso algum saiba mais alguns, pode me enviar que fao incluso 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;
Advertisement
RAW Paste Data Copied
Advertisement