Got an iPhone or iPad? We have a brand new Pastebin App for both devices, and it's totally free! Click here to download the new Pastebin App for iOS.
Guest

Felipe Santos

By: a guest on Aug 3rd, 2009  |  syntax: SQL  |  size: 0.50 KB  |  hits: 129  |  expires: Never
download  |  raw  |  embed  |  report abuse
Copied
  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;