DBA Data[Home] [Help]

APPS.FND_LDAP_UTIL dependencies on FND_LOG

Line 48: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

44: -- change it to FAILURE if open_ssl fails, else let the simple_bind_s
45: -- go through
46: l_retval := dbms_ldap.SUCCESS;
47:
48: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
49: then
50: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
51: end if;
52:

Line 50: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');

46: l_retval := dbms_ldap.SUCCESS;
47:
48: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
49: then
50: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
51: end if;
52:
53: dbms_ldap.use_exception := TRUE;
54:

Line 66: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

62:
63: l_session := DBMS_LDAP.init(l_host, l_port);
64:
65: -- Elan, 04/27/2004, Not disclosing the password - gets saved to the database
66: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
67: then
68: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source
69: , 'l_host = ' || l_host || ', l_port = ' || l_port ||
70: ', l_ldap_auth = ' || l_ldap_auth || ', l_db_wlt_url = ' ||

Line 68: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source

64:
65: -- Elan, 04/27/2004, Not disclosing the password - gets saved to the database
66: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
67: then
68: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source
69: , 'l_host = ' || l_host || ', l_port = ' || l_port ||
70: ', l_ldap_auth = ' || l_ldap_auth || ', l_db_wlt_url = ' ||
71: l_db_wlt_url ||
72: ', l_user = ' || l_user || ', l_pwd = ****');

Line 91: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

87: fnd_message.set_name ('FND', 'FND_SSO_SSL_ERROR');
88: raise_application_error(-20002, 'FND_SSO_SSL_ERROR');
89: end if;
90:
91: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
92: then
93: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');
94: end if;
95:

Line 93: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');

89: end if;
90:
91: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
92: then
93: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');
94: end if;
95:
96: return l_session;
97:

Line 101: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

97:
98: exception
99: when dbms_ldap.invalid_session then
100: fnd_message.set_name ('FND', 'FND_SSO_INV_SESSION');
101: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
102: then
103: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
104: end if;
105: raise;

Line 103: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);

99: when dbms_ldap.invalid_session then
100: fnd_message.set_name ('FND', 'FND_SSO_INV_SESSION');
101: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
102: then
103: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
104: end if;
105: raise;
106: when dbms_ldap.invalid_ssl_wallet_loc then
107: fnd_message.set_name ('FND', 'FND_SSO_WALLET_LOC');

Line 108: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

104: end if;
105: raise;
106: when dbms_ldap.invalid_ssl_wallet_loc then
107: fnd_message.set_name ('FND', 'FND_SSO_WALLET_LOC');
108: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
109: then
110: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
111: end if;
112: raise;

Line 110: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);

106: when dbms_ldap.invalid_ssl_wallet_loc then
107: fnd_message.set_name ('FND', 'FND_SSO_WALLET_LOC');
108: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
109: then
110: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
111: end if;
112: raise;
113: when dbms_ldap.invalid_ssl_wallet_passwd then
114: fnd_message.set_name ('FND', 'FND_SSO_WALLET_PWD');

Line 115: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

111: end if;
112: raise;
113: when dbms_ldap.invalid_ssl_wallet_passwd then
114: fnd_message.set_name ('FND', 'FND_SSO_WALLET_PWD');
115: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
116: then
117: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
118: end if;
119: raise;

Line 117: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);

113: when dbms_ldap.invalid_ssl_wallet_passwd then
114: fnd_message.set_name ('FND', 'FND_SSO_WALLET_PWD');
115: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
116: then
117: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
118: end if;
119: raise;
120: when dbms_ldap.invalid_ssl_auth_mode then
121: fnd_message.set_name ('FND', 'FND_SSO_INV_AUTH_MODE');

Line 122: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

118: end if;
119: raise;
120: when dbms_ldap.invalid_ssl_auth_mode then
121: fnd_message.set_name ('FND', 'FND_SSO_INV_AUTH_MODE');
122: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
123: then
124: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
125: end if;
126: raise;

Line 124: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);

120: when dbms_ldap.invalid_ssl_auth_mode then
121: fnd_message.set_name ('FND', 'FND_SSO_INV_AUTH_MODE');
122: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
123: then
124: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
125: end if;
126: raise;
127: when others then
128: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

Line 128: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

124: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
125: end if;
126: raise;
127: when others then
128: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
129: then
130: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
131: end if;
132: raise;

Line 130: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);

126: raise;
127: when others then
128: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
129: then
130: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
131: end if;
132: raise;
133:
134: end get_oid_session;

Line 145: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

141: begin
142:
143: l_module_source := G_MODULE_SOURCE || 'unbind: ';
144:
145: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
146: then
147: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
148: end if;
149:

Line 147: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');

143: l_module_source := G_MODULE_SOURCE || 'unbind: ';
144:
145: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
146: then
147: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
148: end if;
149:
150: retval := dbms_ldap.unbind_s(p_session);
151:

Line 152: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

148: end if;
149:
150: retval := dbms_ldap.unbind_s(p_session);
151:
152: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
153: then
154: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');
155: end if;
156:

Line 154: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');

150: retval := dbms_ldap.unbind_s(p_session);
151:
152: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
153: then
154: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');
155: end if;
156:
157: return retval;
158:

Line 161: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

157: return retval;
158:
159: exception
160: when others then
161: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
162: then
163: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
164: end if;
165: raise;

Line 163: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);

159: exception
160: when others then
161: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
162: then
163: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
164: end if;
165: raise;
166:
167: end unbind;

Line 181: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

177: begin
178:
179: l_module_source := G_MODULE_SOURCE || 'removeExtraQuotes: ';
180:
181: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
182: then
183: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
184: end if;
185:

Line 183: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');

179: l_module_source := G_MODULE_SOURCE || 'removeExtraQuotes: ';
180:
181: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
182: then
183: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
184: end if;
185:
186: strLength := length(p_app);
187:

Line 193: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

189: quotesIndex := instr(p_app, '"');
190: p_app := Substr(p_app, 0, quotesIndex-1) || Substr(p_app, quotesIndex+1, strLength);
191: end loop;
192:
193: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
194: then
195: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');
196: end if;
197:

Line 195: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');

191: end loop;
192:
193: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
194: then
195: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');
196: end if;
197:
198: exception
199: when others then

Line 200: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

196: end if;
197:
198: exception
199: when others then
200: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
201: then
202: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
203: end if;
204: raise;

Line 202: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);

198: exception
199: when others then
200: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
201: then
202: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
203: end if;
204: raise;
205:
206: end removeExtraQuotes;

Line 218: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

214: begin
215:
216: l_module_source := G_MODULE_SOURCE || 'get_orclappname: ';
217:
218: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
219: then
220: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
221: end if;
222:

Line 220: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');

216: l_module_source := G_MODULE_SOURCE || 'get_orclappname: ';
217:
218: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
219: then
220: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
221: end if;
222:
223: -- Bug 5001849 use FND API instead of directly doing a select against
224: -- fnd_user_preferences

Line 232: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

228: p_pref_name => 'USERNAME');
229:
230: removeExtraQuotes(orclAppName);
231:
232: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
233: then
234: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');
235: end if;
236:

Line 234: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');

230: removeExtraQuotes(orclAppName);
231:
232: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
233: then
234: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');
235: end if;
236:
237: return orclAppName;
238:

Line 241: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

237: return orclAppName;
238:
239: exception
240: when others then
241: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
242: then
243: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
244: end if;
245: raise;

Line 243: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);

239: exception
240: when others then
241: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
242: then
243: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
244: end if;
245: raise;
246:
247: end get_orclappname;

Line 269: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

265: begin
266:
267: l_module_source := G_MODULE_SOURCE || 'get_dn_for_GUID: ';
268:
269: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
270: then
271: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
272: end if;
273:

Line 271: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');

267: l_module_source := G_MODULE_SOURCE || 'get_dn_for_GUID: ';
268:
269: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
270: then
271: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
272: end if;
273:
274: l_base := '';
275: l_ldap_session := get_oid_session;

Line 292: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

288: else
289: l_dn := dbms_ldap.get_dn(l_ldap_session, l_entry);
290: end if;
291:
292: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
293: then
294: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'GUID::'||p_orclguid||' DN::'||l_dn);
295: end if;
296:

Line 294: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'GUID::'||p_orclguid||' DN::'||l_dn);

290: end if;
291:
292: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
293: then
294: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'GUID::'||p_orclguid||' DN::'||l_dn);
295: end if;
296:
297: result := unbind(l_ldap_session);
298:

Line 303: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

299: if (l_dn is null) then
300: raise no_data_found;
301: end if;
302:
303: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
304: then
305: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');
306: end if;
307:

Line 305: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');

301: end if;
302:
303: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
304: then
305: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');
306: end if;
307:
308: return l_dn;
309:

Line 313: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

309:
310: exception
311: when no_data_found then
312: fnd_message.set_name ('FND', 'FND_SSO_USER_NOT_FOUND');
313: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
314: then
315: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, 'No user found with the given GUID');
316: end if;
317: raise;

Line 315: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, 'No user found with the given GUID');

311: when no_data_found then
312: fnd_message.set_name ('FND', 'FND_SSO_USER_NOT_FOUND');
313: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
314: then
315: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, 'No user found with the given GUID');
316: end if;
317: raise;
318: when others then
319: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

Line 319: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

315: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, 'No user found with the given GUID');
316: end if;
317: raise;
318: when others then
319: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
320: then
321: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
322: end if;
323: raise;

Line 321: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);

317: raise;
318: when others then
319: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
320: then
321: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
322: end if;
323: raise;
324:
325: end get_dn_for_GUID;

Line 343: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

339: begin
340:
341: l_module_source := G_MODULE_SOURCE || 'get_dn_for_GUID: ';
342:
343: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
344: then
345: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
346: end if;
347:

Line 345: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');

341: l_module_source := G_MODULE_SOURCE || 'get_dn_for_GUID: ';
342:
343: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
344: then
345: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
346: end if;
347:
348: l_base := '';
349:

Line 365: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL) then

361: else
362: l_dn := dbms_ldap.get_dn(p_ldap_session, l_entry);
363: end if;
364:
365: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL) then
366: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'GUID::'||p_orclguid||' DN::'||l_dn);
367: end if;
368:
369: if (l_dn is null) then

Line 366: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'GUID::'||p_orclguid||' DN::'||l_dn);

362: l_dn := dbms_ldap.get_dn(p_ldap_session, l_entry);
363: end if;
364:
365: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL) then
366: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'GUID::'||p_orclguid||' DN::'||l_dn);
367: end if;
368:
369: if (l_dn is null) then
370: raise no_data_found;

Line 373: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

369: if (l_dn is null) then
370: raise no_data_found;
371: end if;
372:
373: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
374: then
375: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');
376: end if;
377:

Line 375: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');

371: end if;
372:
373: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
374: then
375: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');
376: end if;
377:
378: return l_dn;
379:

Line 383: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

379:
380: exception
381: when no_data_found then
382: fnd_message.set_name ('FND', 'FND_SSO_USER_NOT_FOUND');
383: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
384: then
385: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, 'No user found with the given GUID');
386: end if;
387: raise;

Line 385: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, 'No user found with the given GUID');

381: when no_data_found then
382: fnd_message.set_name ('FND', 'FND_SSO_USER_NOT_FOUND');
383: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
384: then
385: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, 'No user found with the given GUID');
386: end if;
387: raise;
388: when others then
389: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

Line 389: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

385: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, 'No user found with the given GUID');
386: end if;
387: raise;
388: when others then
389: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
390: then
391: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
392: end if;
393: raise;

Line 391: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);

387: raise;
388: when others then
389: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
390: then
391: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
392: end if;
393: raise;
394:
395: end get_dn_for_GUID;

Line 429: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

425: l_module_source varchar2(256);
426: begin
427: l_module_source := G_MODULE_SOURCE || 'get_guid_for_dn:';
428:
429: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
430: then
431: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
432: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'DN='||p_dn);
433: end if;

Line 431: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');

427: l_module_source := G_MODULE_SOURCE || 'get_guid_for_dn:';
428:
429: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
430: then
431: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
432: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'DN='||p_dn);
433: end if;
434:
435: l_attrs(0) := 'orclGuid';

Line 432: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'DN='||p_dn);

428:
429: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
430: then
431: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
432: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'DN='||p_dn);
433: end if;
434:
435: l_attrs(0) := 'orclGuid';
436: begin

Line 450: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

446: -- asume that DN not found
447: -- is not accurate, but better that nothing
448: err := SQLERRM;
449: if (instr(err,'No such object')>1) then
450: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
451: then
452: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source,
453: ' DN not found : raise NO_DATA_FOUND');
454: end if;

Line 452: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source,

448: err := SQLERRM;
449: if (instr(err,'No such object')>1) then
450: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
451: then
452: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source,
453: ' DN not found : raise NO_DATA_FOUND');
454: end if;
455: raise NO_DATA_FOUND;
456: else

Line 457: if (fnd_log.LEVEL_EXCEPTION>= fnd_log.G_CURRENT_RUNTIME_LEVEL)

453: ' DN not found : raise NO_DATA_FOUND');
454: end if;
455: raise NO_DATA_FOUND;
456: else
457: if (fnd_log.LEVEL_EXCEPTION>= fnd_log.G_CURRENT_RUNTIME_LEVEL)
458: then
459: fnd_log.string(fnd_log.LEVEL_EXCEPTION, l_module_source, SQLERRM);
460: fnd_log.string(fnd_log.LEVEL_EXCEPTION, l_module_source, ' from dbms_ldap.search_s, dn='||p_dn);
461: end if;

Line 459: fnd_log.string(fnd_log.LEVEL_EXCEPTION, l_module_source, SQLERRM);

455: raise NO_DATA_FOUND;
456: else
457: if (fnd_log.LEVEL_EXCEPTION>= fnd_log.G_CURRENT_RUNTIME_LEVEL)
458: then
459: fnd_log.string(fnd_log.LEVEL_EXCEPTION, l_module_source, SQLERRM);
460: fnd_log.string(fnd_log.LEVEL_EXCEPTION, l_module_source, ' from dbms_ldap.search_s, dn='||p_dn);
461: end if;
462: raise;
463: end if;

Line 460: fnd_log.string(fnd_log.LEVEL_EXCEPTION, l_module_source, ' from dbms_ldap.search_s, dn='||p_dn);

456: else
457: if (fnd_log.LEVEL_EXCEPTION>= fnd_log.G_CURRENT_RUNTIME_LEVEL)
458: then
459: fnd_log.string(fnd_log.LEVEL_EXCEPTION, l_module_source, SQLERRM);
460: fnd_log.string(fnd_log.LEVEL_EXCEPTION, l_module_source, ' from dbms_ldap.search_s, dn='||p_dn);
461: end if;
462: raise;
463: end if;
464: end;

Line 476: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

472: l_guid := null;
473: end;
474:
475:
476: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
477: then
478: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' END : guid='||l_guid);
479: end if;
480: return l_guid;

Line 478: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' END : guid='||l_guid);

474:
475:
476: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
477: then
478: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' END : guid='||l_guid);
479: end if;
480: return l_guid;
481:
482: exception

Line 484: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

480: return l_guid;
481:
482: exception
483: when others then
484: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
485: then
486: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, ' for DN='||p_dn);
487: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
488: end if;

Line 486: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, ' for DN='||p_dn);

482: exception
483: when others then
484: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
485: then
486: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, ' for DN='||p_dn);
487: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
488: end if;
489: raise;
490: end get_guid_for_dn;

Line 487: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);

483: when others then
484: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
485: then
486: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, ' for DN='||p_dn);
487: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
488: end if;
489: raise;
490: end get_guid_for_dn;
491: --

Line 508: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

504: begin
505:
506: l_module_source := G_MODULE_SOURCE || 'get_default_realm ';
507:
508: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
509: then
510: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
511: end if;
512: l_result := FND_OID_PLUG.getRealmDN(username);

Line 510: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');

506: l_module_source := G_MODULE_SOURCE || 'get_default_realm ';
507:
508: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
509: then
510: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
511: end if;
512: l_result := FND_OID_PLUG.getRealmDN(username);
513: if (fnd_log.LEVEL_STATEMENT>= fnd_log.G_CURRENT_RUNTIME_LEVEL)
514: then

Line 513: if (fnd_log.LEVEL_STATEMENT>= fnd_log.G_CURRENT_RUNTIME_LEVEL)

509: then
510: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
511: end if;
512: l_result := FND_OID_PLUG.getRealmDN(username);
513: if (fnd_log.LEVEL_STATEMENT>= fnd_log.G_CURRENT_RUNTIME_LEVEL)
514: then
515: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'realm: '||l_result);
516: end if;
517:

Line 515: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'realm: '||l_result);

511: end if;
512: l_result := FND_OID_PLUG.getRealmDN(username);
513: if (fnd_log.LEVEL_STATEMENT>= fnd_log.G_CURRENT_RUNTIME_LEVEL)
514: then
515: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'realm: '||l_result);
516: end if;
517:
518: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
519: then

Line 518: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

514: then
515: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'realm: '||l_result);
516: end if;
517:
518: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
519: then
520: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'End');
521: end if;
522:

Line 520: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'End');

516: end if;
517:
518: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
519: then
520: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'End');
521: end if;
522:
523: return l_result;
524:

Line 527: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

523: return l_result;
524:
525: exception
526: when others then
527: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
528: then
529: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
530: end if;
531: raise;

Line 529: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);

525: exception
526: when others then
527: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
528: then
529: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
530: end if;
531: raise;
532:
533: end get_default_realm;

Line 556: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

552:
553: begin
554: l_module_source := G_MODULE_SOURCE || 'proxy_as_user: ';
555:
556: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
557: then
558: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
559: end if;
560:

Line 558: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');

554: l_module_source := G_MODULE_SOURCE || 'proxy_as_user: ';
555:
556: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
557: then
558: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Begin');
559: end if;
560:
561: x_ldap_session := fnd_ldap_util.get_oid_session;
562: l_dn := get_dn_for_guid(p_orclguid => p_orclguid, p_ldap_session => x_ldap_session);

Line 569: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

565:
566: l_retval := dbms_ldap.simple_bind_s(x_ldap_session, l_dn, null);
567:
568: if (l_retval = dbms_ldap.SUCCESS) then
569: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
570: then
571: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Proxied Successfully for User DN:' ||
572: l_dn);
573: end if;

Line 571: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Proxied Successfully for User DN:' ||

567:
568: if (l_retval = dbms_ldap.SUCCESS) then
569: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
570: then
571: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Proxied Successfully for User DN:' ||
572: l_dn);
573: end if;
574: else
575: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

Line 575: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

571: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Proxied Successfully for User DN:' ||
572: l_dn);
573: end if;
574: else
575: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
576: then
577: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Proxy Failed for User DN: ' ||
578: l_dn);
579: end if;

Line 577: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Proxy Failed for User DN: ' ||

573: end if;
574: else
575: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
576: then
577: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'Proxy Failed for User DN: ' ||
578: l_dn);
579: end if;
580: raise proxy_failed_exp;
581: end if;

Line 583: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

579: end if;
580: raise proxy_failed_exp;
581: end if;
582:
583: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
584: then
585: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');
586: end if;
587:

Line 585: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');

581: end if;
582:
583: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
584: then
585: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'End');
586: end if;
587:
588: --return l_session;
589:

Line 593: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

589:
590: exception
591: when dbms_ldap.invalid_session then
592: fnd_message.set_name ('FND', 'FND_SSO_INV_SESSION');
593: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
594: then
595: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
596: end if;
597: raise;

Line 595: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);

591: when dbms_ldap.invalid_session then
592: fnd_message.set_name ('FND', 'FND_SSO_INV_SESSION');
593: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
594: then
595: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
596: end if;
597: raise;
598: when others then
599: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

Line 599: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

595: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
596: end if;
597: raise;
598: when others then
599: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
600: then
601: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
602: end if;
603: raise;

Line 601: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);

597: raise;
598: when others then
599: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
600: then
601: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
602: end if;
603: raise;
604:
605: end proxy_as_user;

Line 638: IF(fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN

634: l_message dbms_ldap.message := NULL;
635: BEGIN
636: l_module_source := g_module_source || 'get_Attribute ';
637:
638: IF(fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
639: fnd_log.string(fnd_log.level_procedure, l_module_source, 'Begin ');
640: END IF;
641: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
642: fnd_log.string(fnd_log.level_statement, l_module_source, ' dn:' || p_dn || ' attr:' || p_attr_name);

Line 639: fnd_log.string(fnd_log.level_procedure, l_module_source, 'Begin ');

635: BEGIN
636: l_module_source := g_module_source || 'get_Attribute ';
637:
638: IF(fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
639: fnd_log.string(fnd_log.level_procedure, l_module_source, 'Begin ');
640: END IF;
641: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
642: fnd_log.string(fnd_log.level_statement, l_module_source, ' dn:' || p_dn || ' attr:' || p_attr_name);
643: END IF;

Line 641: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

637:
638: IF(fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
639: fnd_log.string(fnd_log.level_procedure, l_module_source, 'Begin ');
640: END IF;
641: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
642: fnd_log.string(fnd_log.level_statement, l_module_source, ' dn:' || p_dn || ' attr:' || p_attr_name);
643: END IF;
644:
645: l_attrs(0) := p_attr_name;

Line 642: fnd_log.string(fnd_log.level_statement, l_module_source, ' dn:' || p_dn || ' attr:' || p_attr_name);

638: IF(fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
639: fnd_log.string(fnd_log.level_procedure, l_module_source, 'Begin ');
640: END IF;
641: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
642: fnd_log.string(fnd_log.level_statement, l_module_source, ' dn:' || p_dn || ' attr:' || p_attr_name);
643: END IF;
644:
645: l_attrs(0) := p_attr_name;
646: result := dbms_ldap.search_s(ld => p_ldap_session, base => p_dn,

Line 654: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

650: l_attrs := dbms_ldap.get_values(p_ldap_session, l_entry, p_attr_name);
651: BEGIN
652: l_result := l_attrs(0);
653: EXCEPTION WHEN NO_DATA_FOUND THEN
654: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
655: fnd_log.string(fnd_log.level_statement, l_module_source, 'attribute '||p_attr_name||' not present at '||p_dn);
656: END IF;
657: l_result := null; -- DN found, but does not contain the attribute
658: END;

Line 655: fnd_log.string(fnd_log.level_statement, l_module_source, 'attribute '||p_attr_name||' not present at '||p_dn);

651: BEGIN
652: l_result := l_attrs(0);
653: EXCEPTION WHEN NO_DATA_FOUND THEN
654: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
655: fnd_log.string(fnd_log.level_statement, l_module_source, 'attribute '||p_attr_name||' not present at '||p_dn);
656: END IF;
657: l_result := null; -- DN found, but does not contain the attribute
658: END;
659:

Line 660: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

656: END IF;
657: l_result := null; -- DN found, but does not contain the attribute
658: END;
659:
660: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
661: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> ' || l_result);
662: END IF;
663: return l_result;
664:

Line 661: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> ' || l_result);

657: l_result := null; -- DN found, but does not contain the attribute
658: END;
659:
660: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
661: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> ' || l_result);
662: END IF;
663: return l_result;
664:
665: EXCEPTION

Line 669: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

665: EXCEPTION
666: WHEN dbms_ldap.general_error THEN
667: BEGIN
668:
669: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
670: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> not found '||sqlerrm);
671: END IF;
672: return null; -- DN NOT FOUND
673: END;

Line 670: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> not found '||sqlerrm);

666: WHEN dbms_ldap.general_error THEN
667: BEGIN
668:
669: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
670: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> not found '||sqlerrm);
671: END IF;
672: return null; -- DN NOT FOUND
673: END;
674: WHEN OTHERS THEN

Line 676: IF(fnd_log.level_error >= fnd_log.g_current_runtime_level) THEN

672: return null; -- DN NOT FOUND
673: END;
674: WHEN OTHERS THEN
675:
676: IF(fnd_log.level_error >= fnd_log.g_current_runtime_level) THEN
677: fnd_log.string(fnd_log.level_error, l_module_source, sqlerrm);
678:
679: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
680: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> RAISE');

Line 677: fnd_log.string(fnd_log.level_error, l_module_source, sqlerrm);

673: END;
674: WHEN OTHERS THEN
675:
676: IF(fnd_log.level_error >= fnd_log.g_current_runtime_level) THEN
677: fnd_log.string(fnd_log.level_error, l_module_source, sqlerrm);
678:
679: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
680: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> RAISE');
681: END IF;

Line 679: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

675:
676: IF(fnd_log.level_error >= fnd_log.g_current_runtime_level) THEN
677: fnd_log.string(fnd_log.level_error, l_module_source, sqlerrm);
678:
679: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
680: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> RAISE');
681: END IF;
682:
683: END IF;

Line 680: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> RAISE');

676: IF(fnd_log.level_error >= fnd_log.g_current_runtime_level) THEN
677: fnd_log.string(fnd_log.level_error, l_module_source, sqlerrm);
678:
679: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
680: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> RAISE');
681: END IF;
682:
683: END IF;
684:

Line 721: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

717:
718: BEGIN
719: l_module_source := g_module_source || 'get_DAS_BASE_URL ';
720:
721: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
722: fnd_log.string(fnd_log.level_statement, l_module_source, 'Begin ');
723: END IF;
724:
725: IF(g_das_base_url is not NULL) THEN

Line 722: fnd_log.string(fnd_log.level_statement, l_module_source, 'Begin ');

718: BEGIN
719: l_module_source := g_module_source || 'get_DAS_BASE_URL ';
720:
721: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
722: fnd_log.string(fnd_log.level_statement, l_module_source, 'Begin ');
723: END IF;
724:
725: IF(g_das_base_url is not NULL) THEN
726:

Line 727: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

723: END IF;
724:
725: IF(g_das_base_url is not NULL) THEN
726:
727: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
728: fnd_log.string(fnd_log.level_statement, l_module_source, 'END (cached)-> ' || g_das_base_url);
729: END IF;
730:
731: RETURN g_das_base_url;

Line 728: fnd_log.string(fnd_log.level_statement, l_module_source, 'END (cached)-> ' || g_das_base_url);

724:
725: IF(g_das_base_url is not NULL) THEN
726:
727: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
728: fnd_log.string(fnd_log.level_statement, l_module_source, 'END (cached)-> ' || g_das_base_url);
729: END IF;
730:
731: RETURN g_das_base_url;
732: END IF;

Line 739: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

735: if (l_result is not null)
736: THEN
737: g_das_product_base := l_try;
738: g_das_base_url := l_result;
739: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
740: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_BASE_DN ' || g_das_product_base);
741: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_URL-> ' || g_das_base_url);
742: fnd_log.string(fnd_log.level_statement, l_module_source, 'END -> ' || g_das_base_url);
743: END IF;

Line 740: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_BASE_DN ' || g_das_product_base);

736: THEN
737: g_das_product_base := l_try;
738: g_das_base_url := l_result;
739: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
740: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_BASE_DN ' || g_das_product_base);
741: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_URL-> ' || g_das_base_url);
742: fnd_log.string(fnd_log.level_statement, l_module_source, 'END -> ' || g_das_base_url);
743: END IF;
744:

Line 741: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_URL-> ' || g_das_base_url);

737: g_das_product_base := l_try;
738: g_das_base_url := l_result;
739: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
740: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_BASE_DN ' || g_das_product_base);
741: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_URL-> ' || g_das_base_url);
742: fnd_log.string(fnd_log.level_statement, l_module_source, 'END -> ' || g_das_base_url);
743: END IF;
744:
745: return g_das_base_url;

Line 742: fnd_log.string(fnd_log.level_statement, l_module_source, 'END -> ' || g_das_base_url);

738: g_das_base_url := l_result;
739: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
740: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_BASE_DN ' || g_das_product_base);
741: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_URL-> ' || g_das_base_url);
742: fnd_log.string(fnd_log.level_statement, l_module_source, 'END -> ' || g_das_base_url);
743: END IF;
744:
745: return g_das_base_url;
746: END IF;

Line 753: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

749: if (l_result is not null)
750: THEN
751: g_das_product_base :=l_try;
752: g_das_base_url := l_result;
753: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
754: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_BASE_DN ' || g_das_product_base);
755: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_URL-> ' || g_das_base_url);
756: fnd_log.string(fnd_log.level_statement, l_module_source, 'END -> ' || g_das_base_url);
757: END IF;

Line 754: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_BASE_DN ' || g_das_product_base);

750: THEN
751: g_das_product_base :=l_try;
752: g_das_base_url := l_result;
753: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
754: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_BASE_DN ' || g_das_product_base);
755: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_URL-> ' || g_das_base_url);
756: fnd_log.string(fnd_log.level_statement, l_module_source, 'END -> ' || g_das_base_url);
757: END IF;
758: return g_das_base_url;

Line 755: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_URL-> ' || g_das_base_url);

751: g_das_product_base :=l_try;
752: g_das_base_url := l_result;
753: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
754: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_BASE_DN ' || g_das_product_base);
755: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_URL-> ' || g_das_base_url);
756: fnd_log.string(fnd_log.level_statement, l_module_source, 'END -> ' || g_das_base_url);
757: END IF;
758: return g_das_base_url;
759: END IF;

Line 756: fnd_log.string(fnd_log.level_statement, l_module_source, 'END -> ' || g_das_base_url);

752: g_das_base_url := l_result;
753: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
754: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_BASE_DN ' || g_das_product_base);
755: fnd_log.string(fnd_log.level_statement, l_module_source, ' DAS_URL-> ' || g_das_base_url);
756: fnd_log.string(fnd_log.level_statement, l_module_source, 'END -> ' || g_das_base_url);
757: END IF;
758: return g_das_base_url;
759: END IF;
760: /*

Line 763: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level)

759: END IF;
760: /*
761: * Incorrect settings or something
762: */
763: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level)
764: THEN
765: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> FAILED ' );
766: END IF;
767: G_DAS_PRODUCT_BASE:=NULL;

Line 765: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> FAILED ' );

761: * Incorrect settings or something
762: */
763: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level)
764: THEN
765: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> FAILED ' );
766: END IF;
767: G_DAS_PRODUCT_BASE:=NULL;
768: G_DAS_BASE_URL := NULL;
769: return NULL;

Line 773: IF(fnd_log.level_error >= fnd_log.g_current_runtime_level)

769: return NULL;
770:
771: EXCEPTION WHEN others THEN
772:
773: IF(fnd_log.level_error >= fnd_log.g_current_runtime_level)
774: THEN
775: fnd_log.string(fnd_log.level_error, l_module_source, sqlerrm);
776: END IF;
777:

Line 775: fnd_log.string(fnd_log.level_error, l_module_source, sqlerrm);

771: EXCEPTION WHEN others THEN
772:
773: IF(fnd_log.level_error >= fnd_log.g_current_runtime_level)
774: THEN
775: fnd_log.string(fnd_log.level_error, l_module_source, sqlerrm);
776: END IF;
777:
778: fnd_message.set_name('FND', 'get_DAS_BASE_URL'); RETURN NULL;
779: END get_das_base_url;

Line 813: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

809: result pls_integer;
810: BEGIN
811: l_module_source := g_module_source || 'get_das_operationurl ';
812:
813: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
814: fnd_log.string(fnd_log.level_statement, l_module_source, 'Begin ');
815: fnd_log.string(fnd_log.level_statement, l_module_source, ' realm:' || p_realm || ' op:"' || p_operation||'"');
816: END IF;
817:

Line 814: fnd_log.string(fnd_log.level_statement, l_module_source, 'Begin ');

810: BEGIN
811: l_module_source := g_module_source || 'get_das_operationurl ';
812:
813: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
814: fnd_log.string(fnd_log.level_statement, l_module_source, 'Begin ');
815: fnd_log.string(fnd_log.level_statement, l_module_source, ' realm:' || p_realm || ' op:"' || p_operation||'"');
816: END IF;
817:
818: l_ldap_session := fnd_ldap_util.get_oid_session;

Line 815: fnd_log.string(fnd_log.level_statement, l_module_source, ' realm:' || p_realm || ' op:"' || p_operation||'"');

811: l_module_source := g_module_source || 'get_das_operationurl ';
812:
813: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
814: fnd_log.string(fnd_log.level_statement, l_module_source, 'Begin ');
815: fnd_log.string(fnd_log.level_statement, l_module_source, ' realm:' || p_realm || ' op:"' || p_operation||'"');
816: END IF;
817:
818: l_ldap_session := fnd_ldap_util.get_oid_session;
819: IF (p_realm is NOT null)

Line 824: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

820: THEN
821:
822: l_result := get_attribute(l_ldap_session, 'cn='|| p_operation||','|| g_das_relative_base||','||p_realm, 'orcldasurl' );
823: l_base := get_das_base_url(l_ldap_session,p_realm);
824: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
825:
826: fnd_log.string(fnd_log.level_statement, l_module_source, ' op_url:' || l_result);
827: fnd_log.string(fnd_log.level_statement, l_module_source, ' base:' || l_base);
828:

Line 826: fnd_log.string(fnd_log.level_statement, l_module_source, ' op_url:' || l_result);

822: l_result := get_attribute(l_ldap_session, 'cn='|| p_operation||','|| g_das_relative_base||','||p_realm, 'orcldasurl' );
823: l_base := get_das_base_url(l_ldap_session,p_realm);
824: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
825:
826: fnd_log.string(fnd_log.level_statement, l_module_source, ' op_url:' || l_result);
827: fnd_log.string(fnd_log.level_statement, l_module_source, ' base:' || l_base);
828:
829: END IF;
830: END IF;

Line 827: fnd_log.string(fnd_log.level_statement, l_module_source, ' base:' || l_base);

823: l_base := get_das_base_url(l_ldap_session,p_realm);
824: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
825:
826: fnd_log.string(fnd_log.level_statement, l_module_source, ' op_url:' || l_result);
827: fnd_log.string(fnd_log.level_statement, l_module_source, ' base:' || l_base);
828:
829: END IF;
830: END IF;
831: -- For no realm returned the default data (which is not the same

Line 835: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

831: -- For no realm returned the default data (which is not the same
832: -- as data for the default realm )
833: if (p_realm is NULL or l_result is null)
834: THEN
835: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
836: fnd_log.string(fnd_log.level_statement, l_module_source, ' get default Urls');
837: END IF;
838:
839: l_result := get_attribute(l_ldap_session, 'cn='||p_operation||','||g_das_relative_base, 'orcldasurl' );

Line 836: fnd_log.string(fnd_log.level_statement, l_module_source, ' get default Urls');

832: -- as data for the default realm )
833: if (p_realm is NULL or l_result is null)
834: THEN
835: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
836: fnd_log.string(fnd_log.level_statement, l_module_source, ' get default Urls');
837: END IF;
838:
839: l_result := get_attribute(l_ldap_session, 'cn='||p_operation||','||g_das_relative_base, 'orcldasurl' );
840: l_base := get_das_base_url(l_ldap_session,null);

Line 841: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

837: END IF;
838:
839: l_result := get_attribute(l_ldap_session, 'cn='||p_operation||','||g_das_relative_base, 'orcldasurl' );
840: l_base := get_das_base_url(l_ldap_session,null);
841: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
842: fnd_log.string(fnd_log.level_statement, l_module_source, ' op_url:' || l_result);
843: fnd_log.string(fnd_log.level_statement, l_module_source, ' base:' || l_base);
844: END IF;
845: END IF;

Line 842: fnd_log.string(fnd_log.level_statement, l_module_source, ' op_url:' || l_result);

838:
839: l_result := get_attribute(l_ldap_session, 'cn='||p_operation||','||g_das_relative_base, 'orcldasurl' );
840: l_base := get_das_base_url(l_ldap_session,null);
841: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
842: fnd_log.string(fnd_log.level_statement, l_module_source, ' op_url:' || l_result);
843: fnd_log.string(fnd_log.level_statement, l_module_source, ' base:' || l_base);
844: END IF;
845: END IF;
846:

Line 843: fnd_log.string(fnd_log.level_statement, l_module_source, ' base:' || l_base);

839: l_result := get_attribute(l_ldap_session, 'cn='||p_operation||','||g_das_relative_base, 'orcldasurl' );
840: l_base := get_das_base_url(l_ldap_session,null);
841: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
842: fnd_log.string(fnd_log.level_statement, l_module_source, ' op_url:' || l_result);
843: fnd_log.string(fnd_log.level_statement, l_module_source, ' base:' || l_base);
844: END IF;
845: END IF;
846:
847: result := fnd_ldap_util.unbind(l_ldap_session);

Line 850: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

846:
847: result := fnd_ldap_util.unbind(l_ldap_session);
848: if (l_result is null or l_base is null)
849: then
850: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
851: fnd_log.string(fnd_log.level_statement, l_module_source, 'END->NULLl:');
852: END IF;
853: return NULL;
854: end if;

Line 851: fnd_log.string(fnd_log.level_statement, l_module_source, 'END->NULLl:');

847: result := fnd_ldap_util.unbind(l_ldap_session);
848: if (l_result is null or l_base is null)
849: then
850: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
851: fnd_log.string(fnd_log.level_statement, l_module_source, 'END->NULLl:');
852: END IF;
853: return NULL;
854: end if;
855: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

Line 855: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

851: fnd_log.string(fnd_log.level_statement, l_module_source, 'END->NULLl:');
852: END IF;
853: return NULL;
854: end if;
855: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
856: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> ' || l_base||l_result);
857: END IF;
858: return l_base||l_result;
859:

Line 856: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> ' || l_base||l_result);

852: END IF;
853: return NULL;
854: end if;
855: IF(fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
856: fnd_log.string(fnd_log.level_statement, l_module_source, 'END-> ' || l_base||l_result);
857: END IF;
858: return l_base||l_result;
859:
860: EXCEPTION WHEN OTHERS THEN

Line 861: IF(fnd_log.level_error >= fnd_log.g_current_runtime_level)

857: END IF;
858: return l_base||l_result;
859:
860: EXCEPTION WHEN OTHERS THEN
861: IF(fnd_log.level_error >= fnd_log.g_current_runtime_level)
862: THEN
863: fnd_log.string(fnd_log.level_error, l_module_source, sqlerrm);
864: END IF;
865:

Line 863: fnd_log.string(fnd_log.level_error, l_module_source, sqlerrm);

859:
860: EXCEPTION WHEN OTHERS THEN
861: IF(fnd_log.level_error >= fnd_log.g_current_runtime_level)
862: THEN
863: fnd_log.string(fnd_log.level_error, l_module_source, sqlerrm);
864: END IF;
865:
866: fnd_message.set_name('FND', 'get_DAS_BASE_URL');
867: return null;

Line 881: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

877: ret pls_integer;
878: l_module_source varchar2(256):= G_MODULE_SOURCE || 'add_attribute_M: ';
879:
880: BEGIN
881: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
882: then
883: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
884: end if;
885: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

Line 883: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');

879:
880: BEGIN
881: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
882: then
883: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
884: end if;
885: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
886: then
887: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'dn='||dn);

Line 885: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

881: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
882: then
883: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
884: end if;
885: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
886: then
887: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'dn='||dn);
888: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'attribute='||name||' value='||value);
889: end if;

Line 887: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'dn='||dn);

883: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
884: end if;
885: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
886: then
887: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'dn='||dn);
888: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'attribute='||name||' value='||value);
889: end if;
890:
891: modArray := dbms_ldap.create_mod_array(num => 1);

Line 888: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'attribute='||name||' value='||value);

884: end if;
885: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
886: then
887: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'dn='||dn);
888: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'attribute='||name||' value='||value);
889: end if;
890:
891: modArray := dbms_ldap.create_mod_array(num => 1);
892: vals(0) := value;

Line 896: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

892: vals(0) := value;
893: dbms_ldap.populate_mod_array(modptr=>modArray,mod_op=>dbms_ldap.mod_add,mod_type=>name,modval=>vals);
894: ret := dbms_ldap.modify_s(ld=>x_ldap,entrydn=>dn,modptr=>modArray);
895: dbms_ldap.free_mod_array(modptr => modArray);
896: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
897: then
898: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END');
899: end if;
900:

Line 898: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END');

894: ret := dbms_ldap.modify_s(ld=>x_ldap,entrydn=>dn,modptr=>modArray);
895: dbms_ldap.free_mod_array(modptr => modArray);
896: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
897: then
898: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END');
899: end if;
900:
901: exception when others then
902: if (fnd_log.LEVEL_UNEXPECTED >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

Line 902: if (fnd_log.LEVEL_UNEXPECTED >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

898: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END');
899: end if;
900:
901: exception when others then
902: if (fnd_log.LEVEL_UNEXPECTED >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
903: then
904: fnd_log.string(fnd_log.LEVEL_UNEXPECTED, l_module_source, sqlerrm);
905: end if;
906: raise;

Line 904: fnd_log.string(fnd_log.LEVEL_UNEXPECTED, l_module_source, sqlerrm);

900:
901: exception when others then
902: if (fnd_log.LEVEL_UNEXPECTED >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
903: then
904: fnd_log.string(fnd_log.LEVEL_UNEXPECTED, l_module_source, sqlerrm);
905: end if;
906: raise;
907:
908: END add_attribute_M;

Line 919: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

915: /*
916: * flag=-99 just to print the stack on the log
917: */
918: IF (flag=-99) THEN
919: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
920: then
921: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'DUMP ldap status for FND_LDAP_UTIL='||g_common_counter);
922: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'g_common_counter='||g_common_counter);
923: IF (G_TRACK_LDAP_STACK) THEN

Line 921: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'DUMP ldap status for FND_LDAP_UTIL='||g_common_counter);

917: */
918: IF (flag=-99) THEN
919: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
920: then
921: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'DUMP ldap status for FND_LDAP_UTIL='||g_common_counter);
922: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'g_common_counter='||g_common_counter);
923: IF (G_TRACK_LDAP_STACK) THEN
924: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ldap_session_stack);
925: END IF;

Line 922: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'g_common_counter='||g_common_counter);

918: IF (flag=-99) THEN
919: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
920: then
921: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'DUMP ldap status for FND_LDAP_UTIL='||g_common_counter);
922: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'g_common_counter='||g_common_counter);
923: IF (G_TRACK_LDAP_STACK) THEN
924: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ldap_session_stack);
925: END IF;
926: end if;

Line 924: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ldap_session_stack);

920: then
921: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'DUMP ldap status for FND_LDAP_UTIL='||g_common_counter);
922: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'g_common_counter='||g_common_counter);
923: IF (G_TRACK_LDAP_STACK) THEN
924: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ldap_session_stack);
925: END IF;
926: end if;
927: return null;
928: END IF;

Line 932: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

928: END IF;
929:
930:
931:
932: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
933: then
934: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
935: end if;
936: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

Line 934: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');

930:
931:
932: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
933: then
934: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
935: end if;
936: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
937: then
938: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'initialy g_common_counter='||g_common_counter);

Line 936: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

932: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
933: then
934: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
935: end if;
936: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
937: then
938: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'initialy g_common_counter='||g_common_counter);
939: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'initialy flag='||flag);
940: end if;

Line 938: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'initialy g_common_counter='||g_common_counter);

934: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
935: end if;
936: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
937: then
938: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'initialy g_common_counter='||g_common_counter);
939: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'initialy flag='||flag);
940: end if;
941:
942: if (g_common_counter=0) then

Line 939: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'initialy flag='||flag);

935: end if;
936: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
937: then
938: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'initialy g_common_counter='||g_common_counter);
939: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'initialy flag='||flag);
940: end if;
941:
942: if (g_common_counter=0) then
943: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

Line 943: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

939: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'initialy flag='||flag);
940: end if;
941:
942: if (g_common_counter=0) then
943: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
944: then
945: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'creating a new connection');
946: IF (G_TRACK_LDAP_STACK) THEN
947: ldap_session_stack := dbms_utility.FORMAT_CALL_STACK;

Line 945: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'creating a new connection');

941:
942: if (g_common_counter=0) then
943: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
944: then
945: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'creating a new connection');
946: IF (G_TRACK_LDAP_STACK) THEN
947: ldap_session_stack := dbms_utility.FORMAT_CALL_STACK;
948: END IF;
949: end if;

Line 955: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

951: end if;
952: flag := g_common_counter;
953: g_common_counter := g_common_counter + 1;
954:
955: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
956: then
957: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'finally g_common_counter='||g_common_counter);
958: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'finally flag='||flag);
959: end if;

Line 957: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'finally g_common_counter='||g_common_counter);

953: g_common_counter := g_common_counter + 1;
954:
955: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
956: then
957: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'finally g_common_counter='||g_common_counter);
958: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'finally flag='||flag);
959: end if;
960: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
961: then

Line 958: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'finally flag='||flag);

954:
955: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
956: then
957: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'finally g_common_counter='||g_common_counter);
958: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'finally flag='||flag);
959: end if;
960: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
961: then
962: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END');

Line 960: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

956: then
957: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'finally g_common_counter='||g_common_counter);
958: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'finally flag='||flag);
959: end if;
960: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
961: then
962: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END');
963: end if;
964: return g_common_ldap;

Line 962: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END');

958: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'finally flag='||flag);
959: end if;
960: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
961: then
962: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END');
963: end if;
964: return g_common_ldap;
965:
966: exception when others then

Line 967: if (fnd_log.LEVEL_UNEXPECTED >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

963: end if;
964: return g_common_ldap;
965:
966: exception when others then
967: if (fnd_log.LEVEL_UNEXPECTED >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
968: then
969: fnd_log.string(fnd_log.LEVEL_UNEXPECTED, l_module_source, sqlerrm);
970: end if;
971: raise;

Line 969: fnd_log.string(fnd_log.LEVEL_UNEXPECTED, l_module_source, sqlerrm);

965:
966: exception when others then
967: if (fnd_log.LEVEL_UNEXPECTED >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
968: then
969: fnd_log.string(fnd_log.LEVEL_UNEXPECTED, l_module_source, sqlerrm);
970: end if;
971: raise;
972: END c_get_oid_session;
973:

Line 979: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

975: is
976: l_module_source varchar2(256):= G_MODULE_SOURCE || 'c_unbind: ';
977: ret pls_integer;
978: begin
979: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
980: then
981: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
982: end if;
983:

Line 981: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');

977: ret pls_integer;
978: begin
979: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
980: then
981: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
982: end if;
983:
984: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
985: then

Line 984: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

980: then
981: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
982: end if;
983:
984: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
985: then
986: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' incomming g_common_counter='||g_common_counter);
987: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' incomming flag='||flag);
988: end if;

Line 986: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' incomming g_common_counter='||g_common_counter);

982: end if;
983:
984: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
985: then
986: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' incomming g_common_counter='||g_common_counter);
987: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' incomming flag='||flag);
988: end if;
989:
990: if (flag=0)then

Line 987: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' incomming flag='||flag);

983:
984: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
985: then
986: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' incomming g_common_counter='||g_common_counter);
987: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' incomming flag='||flag);
988: end if;
989:
990: if (flag=0)then
991: ret := unbind(g_common_ldap);

Line 997: if (fnd_log.LEVEL_UNEXPECTED >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

993: elsif (g_common_counter>1) then
994: g_common_counter := g_common_counter - 1;
995: -- we don't wont to reach 0, because we will lose control.
996: else
997: if (fnd_log.LEVEL_UNEXPECTED >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
998: then
999: fnd_log.string(fnd_log.LEVEL_UNEXPECTED, l_module_source, 'g_common_counter reached invalid value='||g_common_counter);
1000: end if;
1001:

Line 999: fnd_log.string(fnd_log.LEVEL_UNEXPECTED, l_module_source, 'g_common_counter reached invalid value='||g_common_counter);

995: -- we don't wont to reach 0, because we will lose control.
996: else
997: if (fnd_log.LEVEL_UNEXPECTED >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
998: then
999: fnd_log.string(fnd_log.LEVEL_UNEXPECTED, l_module_source, 'g_common_counter reached invalid value='||g_common_counter);
1000: end if;
1001:
1002: end if;
1003: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

Line 1003: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

999: fnd_log.string(fnd_log.LEVEL_UNEXPECTED, l_module_source, 'g_common_counter reached invalid value='||g_common_counter);
1000: end if;
1001:
1002: end if;
1003: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1004: then
1005: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' final g_common_counter='||g_common_counter);
1006: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' final flag='||flag);
1007: end if;

Line 1005: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' final g_common_counter='||g_common_counter);

1001:
1002: end if;
1003: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1004: then
1005: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' final g_common_counter='||g_common_counter);
1006: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' final flag='||flag);
1007: end if;
1008: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1009: then

Line 1006: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' final flag='||flag);

1002: end if;
1003: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1004: then
1005: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' final g_common_counter='||g_common_counter);
1006: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' final flag='||flag);
1007: end if;
1008: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1009: then
1010: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END');

Line 1008: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

1004: then
1005: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' final g_common_counter='||g_common_counter);
1006: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' final flag='||flag);
1007: end if;
1008: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1009: then
1010: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END');
1011: end if;
1012: exception when others then

Line 1010: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END');

1006: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, ' final flag='||flag);
1007: end if;
1008: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1009: then
1010: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END');
1011: end if;
1012: exception when others then
1013: if (fnd_log.LEVEL_UNEXPECTED >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1014: then

Line 1013: if (fnd_log.LEVEL_UNEXPECTED >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

1009: then
1010: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END');
1011: end if;
1012: exception when others then
1013: if (fnd_log.LEVEL_UNEXPECTED >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1014: then
1015: fnd_log.string(fnd_log.LEVEL_UNEXPECTED, l_module_source, sqlerrm);
1016: end if;
1017: raise;

Line 1015: fnd_log.string(fnd_log.LEVEL_UNEXPECTED, l_module_source, sqlerrm);

1011: end if;
1012: exception when others then
1013: if (fnd_log.LEVEL_UNEXPECTED >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1014: then
1015: fnd_log.string(fnd_log.LEVEL_UNEXPECTED, l_module_source, sqlerrm);
1016: end if;
1017: raise;
1018: end c_unbind;
1019:

Line 1033: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

1029: l_module_source varchar2(1000) ;
1030: BEGIN
1031: l_module_source := G_MODULE_SOURCE || 'getAttribute: ';
1032:
1033: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1034: then
1035: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
1036: end if;
1037:

Line 1035: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');

1031: l_module_source := G_MODULE_SOURCE || 'getAttribute: ';
1032:
1033: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1034: then
1035: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
1036: end if;
1037:
1038: l_attrs(0):= attrName;
1039: result := dbms_ldap.search_s(ld => ldap

Line 1050: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

1046: l_entry := dbms_ldap.first_entry(ldap, l_message);
1047: if (l_entry is null ) then return null; end if;
1048: l_attrs := dbms_ldap.get_values(ldap, l_entry, attrName);
1049: l_result := l_attrs(0);
1050: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1051: then
1052: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'ldapsearch -b "'||dn||'" -s base "'||filterExp||'" '||attrName);
1053: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'result:'||l_result);
1054: end if;

Line 1052: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'ldapsearch -b "'||dn||'" -s base "'||filterExp||'" '||attrName);

1048: l_attrs := dbms_ldap.get_values(ldap, l_entry, attrName);
1049: l_result := l_attrs(0);
1050: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1051: then
1052: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'ldapsearch -b "'||dn||'" -s base "'||filterExp||'" '||attrName);
1053: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'result:'||l_result);
1054: end if;
1055:
1056: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

Line 1053: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'result:'||l_result);

1049: l_result := l_attrs(0);
1050: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1051: then
1052: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'ldapsearch -b "'||dn||'" -s base "'||filterExp||'" '||attrName);
1053: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'result:'||l_result);
1054: end if;
1055:
1056: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1057: then

Line 1056: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

1052: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'ldapsearch -b "'||dn||'" -s base "'||filterExp||'" '||attrName);
1053: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'result:'||l_result);
1054: end if;
1055:
1056: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1057: then
1058: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END ');
1059: end if;
1060: return l_result;

Line 1058: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END ');

1054: end if;
1055:
1056: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1057: then
1058: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END ');
1059: end if;
1060: return l_result;
1061:
1062:

Line 1064: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)

1060: return l_result;
1061:
1062:
1063: exception when NO_DATA_FOUND then
1064: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1065: then
1066: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END -> NULL');
1067: end if;
1068: return null;

Line 1066: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END -> NULL');

1062:
1063: exception when NO_DATA_FOUND then
1064: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1065: then
1066: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'END -> NULL');
1067: end if;
1068: return null;
1069: END getLDAPAttribute;
1070: