LDAP+Auth+Oracle

Код авторизации через LDAP средствами Oracle.

Procedure AuthorizationLdap(iemail varchar2, ipassword varchar2) is  
LDAP_HOST CONSTANT VARCHAR2(20) := '127.0.0.1';
LDAP_PORT CONSTANT VARCHAR2(20) := '389';
LDAP_USER VARCHAR2(20);  --'email@dc.local';
LDAP_PSWD VARCHAR2(50);
begin
  LDAP_USER:= iemail||'@domenname.local';
  LDAP_PSWD:= ipassword;
  l_session := dbms_ldap.init(LDAP_HOST, LDAP_PORT);
  begin
    l_dummy := dbms_ldap.simple_bind_s(l_session, LDAP_USER, LDAP_PSWD);
  exception when others then
    Raise_Application_Error(-20000, 'Ошибка авторизации! Проверьте правильность Логина или Пароля!');
  end; end;

Вот и все.