1: package body fnd_oid_util as
2: /* $Header: AFSCOUTB.pls 120.36.12020000.2 2012/07/23 15:18:37 ctilley ship $ */
3: --
4: -- Start of Package Globals
5:
2: /* $Header: AFSCOUTB.pls 120.36.12020000.2 2012/07/23 15:18:37 ctilley ship $ */
3: --
4: -- Start of Package Globals
5:
6: G_MODULE_SOURCE constant varchar2(80) := 'fnd.plsql.oid.fnd_oid_util.';
7:
8: -- FIXME: For compiling get_key, PutOIDEvent only - Should be removed
9: key_guid varchar2(8);
10: procedure validate_OID_preferences (
1055: l_module_source varchar2(256);
1056: l_apps_user_key apps_user_key_type;
1057: l_user_name fnd_user.user_name%type;
1058: l_ldap_attr_list ldap_attr_list;
1059: l_ldap_message fnd_oid_util.ldap_message_type;
1060: l_return_status varchar2(1);
1061:
1062: PRAGMA AUTONOMOUS_TRANSACTION;
1063: begin
1073: raise user_name_null_exp;
1074: end if;
1075:
1076: l_user_name := p_user_name;
1077: l_apps_user_key := fnd_oid_util.get_fnd_user(p_user_name => l_user_name);
1078:
1079: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1080: then
1081: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source,
1094: then
1095: raise user_guid_null_exp;
1096: end if;
1097:
1098: l_ldap_attr_list := fnd_oid_util.get_user_attributes(p_userguid => l_apps_user_key.user_guid,
1099: p_user_name => l_user_name);
1100: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1101: then
1102: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source,
1201: l_module_source varchar2(256);
1202: l_apps_user_key apps_user_key_type;
1203: l_user_name fnd_user.user_name%type;
1204: l_ldap_attr_list ldap_attr_list;
1205: l_ldap_message fnd_oid_util.ldap_message_type;
1206: l_return_status varchar2(1);
1207: begin
1208: l_module_source := G_MODULE_SOURCE || 'synch_user_from_LDAP_NO_AUTO: ';
1209:
1217: raise user_name_null_exp;
1218: end if;
1219:
1220: l_user_name := p_user_name;
1221: l_apps_user_key := fnd_oid_util.get_fnd_user(p_user_name => l_user_name);
1222:
1223: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1224: then
1225: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source,
1238: then
1239: raise user_guid_null_exp;
1240: end if;
1241:
1242: l_ldap_attr_list := fnd_oid_util.get_user_attributes(p_userguid => l_apps_user_key.user_guid,
1243: p_user_name => l_user_name);
1244: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1245: then
1246: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source,
1388: l_user_name := p_user_name;
1389:
1390: -- Adding the following login for updating FAX and Email from OID when users are creared onDemand
1391: -- Refer to Bug 4411170
1392: l_ldap_attr_list := fnd_oid_util.get_user_attributes(p_userguid => p_user_guid,
1393: p_user_name => l_user_name);
1394:
1395: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1396: then
1573: then
1574: l_event_name := 'oracle.apps.fnd.oidsync.resend';
1575: end if;
1576: -- Get the fnd_user.user_name
1577: fnd_oid_util.get_entity_key_value(p_event_status.event_id
1578: , l_entity_key_value);
1579:
1580: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1581: then
2509: end;
2510:
2511: begin
2512: set_ldap_message_attr;
2513: end fnd_oid_util;