168: then
169: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
170: end if;
171: l_result := null;
172: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
173: return l_result;
174: when others then
175: if (cur_fnd_users%isopen)
176: then
236: end if;
237:
238: exception
239: when registration_failure_exception then
240: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
241: x_result := G_FAILURE;
242: when others then
243: fnd_message.set_name ('FND', 'FND_SSO_UNEXP_ERROR');
244: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
239: when registration_failure_exception then
240: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
241: x_result := G_FAILURE;
242: when others then
243: fnd_message.set_name ('FND', 'FND_SSO_UNEXP_ERROR');
244: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
245: then
246: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
247: end if;
333: end if;
334:
335: exception
336: when others then
337: fnd_message.set_name ('FND', 'OID');
338: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
339: then
340: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
341: end if;
465: end if;
466:
467: exception
468: when registration_failure_exception then
469: fnd_message.set_name ('FND', fnd_ldap_errm.FND_SSO_OID_REG_ERROR);
470: x_result := G_FAILURE;
471: when others then
472:
473: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
476: end if;
477:
478: l_tmp_str := sqlerrm;
479: l_err_code := fnd_ldap_errm.translate_ldap_errors(l_tmp_str);
480: fnd_message.set_name ('FND', l_err_code);
481:
482: if l_err_code = fnd_ldap_errm.FND_SSO_LDAP_APPSDN_PWD_EXPIRD then
483: fnd_message.set_token('USER', l_tmp_str);
484: app_exception.raise_exception;
479: l_err_code := fnd_ldap_errm.translate_ldap_errors(l_tmp_str);
480: fnd_message.set_name ('FND', l_err_code);
481:
482: if l_err_code = fnd_ldap_errm.FND_SSO_LDAP_APPSDN_PWD_EXPIRD then
483: fnd_message.set_token('USER', l_tmp_str);
484: app_exception.raise_exception;
485: elsif l_err_code = fnd_ldap_errm.FND_SSO_LDAP_PWD_POLICY_ERR then
486: l_tmp_str := replace(l_tmp_str, 'Your', p_user_name);
487: fnd_message.set_token('REASON', l_tmp_str);
483: fnd_message.set_token('USER', l_tmp_str);
484: app_exception.raise_exception;
485: elsif l_err_code = fnd_ldap_errm.FND_SSO_LDAP_PWD_POLICY_ERR then
486: l_tmp_str := replace(l_tmp_str, 'Your', p_user_name);
487: fnd_message.set_token('REASON', l_tmp_str);
488: app_exception.raise_exception;
489: else
490: fnd_message.set_name ('FND', fnd_ldap_errm.FND_SSO_UNEXP_ERROR);
491: x_result := G_FAILURE;
486: l_tmp_str := replace(l_tmp_str, 'Your', p_user_name);
487: fnd_message.set_token('REASON', l_tmp_str);
488: app_exception.raise_exception;
489: else
490: fnd_message.set_name ('FND', fnd_ldap_errm.FND_SSO_UNEXP_ERROR);
491: x_result := G_FAILURE;
492: end if;
493:
494: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
560: end if;
561:
562: exception
563: when registration_failure_exception then
564: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
565: x_result := G_FAILURE;
566: when others then
567: fnd_message.set_name ('FND', 'FND_SSO_UNEXP_ERROR');
568: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
563: when registration_failure_exception then
564: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
565: x_result := G_FAILURE;
566: when others then
567: fnd_message.set_name ('FND', 'FND_SSO_UNEXP_ERROR');
568: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
569: then
570: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
571: end if;
622: end if;
623:
624: exception
625: when registration_failure_exception then
626: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
627: x_result := G_FAILURE;
628: when others then
629: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
630: then
687: end if;
688:
689: exception
690: when registration_failure_exception then
691: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
692: x_result := G_FAILURE;
693: when others then
694: fnd_message.set_name ('FND', 'FND_SSO_UNEXP_ERROR');
695: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
690: when registration_failure_exception then
691: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
692: x_result := G_FAILURE;
693: when others then
694: fnd_message.set_name ('FND', 'FND_SSO_UNEXP_ERROR');
695: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
696: then
697: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
698: end if;
752: end if;
753:
754: exception
755: when registration_failure_exception then
756: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
757: x_result := G_FAILURE;
758: when others then
759: fnd_message.set_name ('FND', 'FND_SSO_UNEXP_ERROR');
760: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
755: when registration_failure_exception then
756: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
757: x_result := G_FAILURE;
758: when others then
759: fnd_message.set_name ('FND', 'FND_SSO_UNEXP_ERROR');
760: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
761: then
762: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
763: end if;
835: then
836: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'SSO not enabled, returning false w/o querying OID user');
837: end if;
838: retval := G_FAILURE;
839: fnd_message.set_name ('FND', 'FND_SSO_NOT_ENABLED');
840: end if;
841:
842: else -- APPS_SSO_LDAP_SYNC not enabled.
843:
845: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'APPS_SSO_LDAP_SYNC not enabled.');
846: end if;
847:
848: retval := G_FAILURE;
849: fnd_message.set_name ('FND', 'FND_SSO_NOT_ENABLED');
850:
851: end if;
852:
853: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
858: return retval;
859:
860: exception
861: when sso_registration_failure then
862: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
863: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
864: then
865: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
866: end if;
865: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
866: end if;
867: raise;
868: when no_data_found then
869: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
870: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
871: then
872: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
873: end if;
872: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
873: end if;
874: raise;
875: when others then
876: fnd_message.set_name ('FND', 'FND_SSO_UNEXP_ERROR');
877: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
878: then
879: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
880: end if;
989: end if;
990:
991: exception
992: when registration_failure_exception then
993: fnd_message.set_name ('FND', fnd_ldap_errm.FND_SSO_OID_REG_ERROR);
994: x_result := G_FAILURE;
995: when others then
996:
997: l_tmp_str := sqlerrm;
995: when others then
996:
997: l_tmp_str := sqlerrm;
998: l_err_code := fnd_ldap_errm.translate_ldap_errors(l_tmp_str);
999: fnd_message.set_name ('FND', l_err_code);
1000:
1001: if l_err_code = fnd_ldap_errm.FND_SSO_LDAP_APPSDN_PWD_EXPIRD then
1002: fnd_message.set_token('USER', l_tmp_str);
1003: app_exception.raise_exception;
998: l_err_code := fnd_ldap_errm.translate_ldap_errors(l_tmp_str);
999: fnd_message.set_name ('FND', l_err_code);
1000:
1001: if l_err_code = fnd_ldap_errm.FND_SSO_LDAP_APPSDN_PWD_EXPIRD then
1002: fnd_message.set_token('USER', l_tmp_str);
1003: app_exception.raise_exception;
1004: elsif l_err_code = fnd_ldap_errm.FND_SSO_LDAP_PWD_POLICY_ERR then
1005: l_tmp_str := replace(l_tmp_str, 'Your', p_user_name);
1006: fnd_message.set_token('REASON', l_tmp_str);
1002: fnd_message.set_token('USER', l_tmp_str);
1003: app_exception.raise_exception;
1004: elsif l_err_code = fnd_ldap_errm.FND_SSO_LDAP_PWD_POLICY_ERR then
1005: l_tmp_str := replace(l_tmp_str, 'Your', p_user_name);
1006: fnd_message.set_token('REASON', l_tmp_str);
1007: app_exception.raise_exception;
1008: else
1009: fnd_message.set_name ('FND', fnd_ldap_errm.FND_SSO_UNEXP_ERROR);
1010: x_result := G_FAILURE;
1005: l_tmp_str := replace(l_tmp_str, 'Your', p_user_name);
1006: fnd_message.set_token('REASON', l_tmp_str);
1007: app_exception.raise_exception;
1008: else
1009: fnd_message.set_name ('FND', fnd_ldap_errm.FND_SSO_UNEXP_ERROR);
1010: x_result := G_FAILURE;
1011: end if;
1012:
1013: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1094: then
1095: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'SSO not enabled, returning false');
1096: end if;
1097: retval := false;
1098: fnd_message.set_name ('FND', 'FND_SSO_NOT_ENABLED');
1099: end if;
1100:
1101: else -- APPS_SSO_LDAP_SYNC not enabled.
1102:
1104: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'APPS_SSO_LDAP_SYNC not enabled.');
1105: end if;
1106:
1107: retval := false;
1108: fnd_message.set_name ('FND', 'FND_SSO_NOT_ENABLED');
1109:
1110: end if;
1111:
1112: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1117: return retval;
1118:
1119: exception
1120: when sso_registration_failure then
1121: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
1122: raise;
1123: when no_data_found then
1124: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
1125: raise;
1120: when sso_registration_failure then
1121: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
1122: raise;
1123: when no_data_found then
1124: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
1125: raise;
1126:
1127: end validate_login;
1128: --
1288: end if;
1289:
1290: exception
1291: when registration_failure_exception then
1292: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
1293: x_fnd_user := G_FAILURE;
1294: x_oid := G_FAILURE;
1295: raise registration_failure_exception;
1296: when no_data_found then
1293: x_fnd_user := G_FAILURE;
1294: x_oid := G_FAILURE;
1295: raise registration_failure_exception;
1296: when no_data_found then
1297: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
1298: x_fnd_user := G_FAILURE;
1299: x_oid := G_FAILURE;
1300: raise registration_failure_exception;
1301: when others then
1298: x_fnd_user := G_FAILURE;
1299: x_oid := G_FAILURE;
1300: raise registration_failure_exception;
1301: when others then
1302: fnd_message.set_name ('FND', 'FND_SSO_UNEXP_ERROR');
1303: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1304: then
1305: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
1306: end if;
1374: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'SSO not enabled, returning false');
1375: end if;
1376: x_fnd_user := G_SUCCESS;
1377: x_oid := G_FAILURE;
1378: fnd_message.set_name ('FND', 'FND_SSO_NOT_ENABLED');
1379: end if;
1380:
1381: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1382: then
1390: end if;
1391:
1392: exception
1393: when sso_registration_failure then
1394: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
1395: x_fnd_user := G_SUCCESS;
1396: x_oid := G_SUCCESS;
1397: when no_data_found then
1398: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
1394: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
1395: x_fnd_user := G_SUCCESS;
1396: x_oid := G_SUCCESS;
1397: when no_data_found then
1398: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
1399: x_fnd_user := G_SUCCESS;
1400: x_oid := G_SUCCESS;
1401: when others then
1402: fnd_message.set_name ('FND', 'FND_SSO_UNEXP_ERROR');
1398: fnd_message.set_name ('FND', 'FND_SSO_OID_REG_ERROR');
1399: x_fnd_user := G_SUCCESS;
1400: x_oid := G_SUCCESS;
1401: when others then
1402: fnd_message.set_name ('FND', 'FND_SSO_UNEXP_ERROR');
1403: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
1404: then
1405: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
1406: end if;
1494: registration := G_INVALID_REGISTRATION;
1495: x_registration := registration;
1496:
1497: when others then
1498: fnd_message.set_name ('FND', 'FND_SSO_UNEXP_ERROR');
1499: if (fnd_log.LEVEL_ERROR >= fnd_log.G_CURRENT_RUNTIME_LEVEL) then
1500: fnd_log.string(fnd_log.LEVEL_ERROR, l_module_source, sqlerrm);
1501: end if;
1502: raise;