APPS.WF_OID dependencies on DBMS_LDAP

Line 13: FUNCTION get_oid_session return dbms_ldap.session is

9: --
10: -- End of Package Globals
11: --
12: -------------------------------------------------------------------------------
13: FUNCTION get_oid_session return dbms_ldap.session is
14:
15: retval pls_integer;
16: my_host varchar2(256);
17: my_port varchar2(256);

Line 20: my_session dbms_ldap.session;

16: my_host varchar2(256);
17: my_port varchar2(256);
18: my_user varchar2(256);
19: my_pwd varchar2(256);
20: my_session dbms_ldap.session;
21:
22: begin
23: retval := -1;
24:

Line 25: dbms_ldap.use_exception := TRUE;

21:
22: begin
23: retval := -1;
24:
25: dbms_ldap.use_exception := TRUE;
26:
27: my_host := fnd_preference.get('#INTERNAL', 'LDAP_SYNCH', 'HOST');
28: my_port := fnd_preference.get('#INTERNAL', 'LDAP_SYNCH', 'PORT');
29: my_user := fnd_preference.get('#INTERNAL', 'LDAP_SYNCH', 'USERNAME');

Line 31: my_session := DBMS_LDAP.init(my_host, my_port);

27: my_host := fnd_preference.get('#INTERNAL', 'LDAP_SYNCH', 'HOST');
28: my_port := fnd_preference.get('#INTERNAL', 'LDAP_SYNCH', 'PORT');
29: my_user := fnd_preference.get('#INTERNAL', 'LDAP_SYNCH', 'USERNAME');
30: my_pwd := fnd_preference.eget('#INTERNAL','LDAP_SYNCH', 'EPWD', 'LDAP_PWD');
31: my_session := DBMS_LDAP.init(my_host, my_port);
32:
33: retval := dbms_ldap.simple_bind_s(my_session, my_user, my_pwd);
34:
35: return my_session;

Line 33: retval := dbms_ldap.simple_bind_s(my_session, my_user, my_pwd);

29: my_user := fnd_preference.get('#INTERNAL', 'LDAP_SYNCH', 'USERNAME');
30: my_pwd := fnd_preference.eget('#INTERNAL','LDAP_SYNCH', 'EPWD', 'LDAP_PWD');
31: my_session := DBMS_LDAP.init(my_host, my_port);
32:
33: retval := dbms_ldap.simple_bind_s(my_session, my_user, my_pwd);
34:
35: return my_session;
36:
37: exception

Line 46: PROCEDURE unbind(p_session in out nocopy dbms_ldap.session)

42: wf_core.raise('ICX_PREF_DESC');
43: end;
44: --
45: -------------------------------------------------------------------------------
46: PROCEDURE unbind(p_session in out nocopy dbms_ldap.session)
47: is
48: retval pls_integer;
49: begin
50: retval := -1;

Line 51: retval := DBMS_LDAP.unbind_s(p_session);

47: is
48: retval pls_integer;
49: begin
50: retval := -1;
51: retval := DBMS_LDAP.unbind_s(p_session);
52: exception
53: when others then null;
54: end;
55: --