Advertisement
Guest User

Felipe Santos

a guest
Aug 3rd, 2009
343
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. BEGIN
  2.   Logon( :BlLogin.Usuario, :BlLogin.Senha || '@' || :BlLogin.Banco, FALSE );
  3.   IF vConectado IS NULL THEN
  4.     IF Form_Failure THEN
  5.       vConectado := FALSE;
  6.     ELSE
  7.       vConectado := TRUE;
  8.     END IF;
  9.   END IF;
  10. END;
Advertisement
RAW Paste Data Copied
Advertisement