528: fnd_log.string(fnd_log.level_procedure,g_log_module_name || '.' || lv_proc_name, g_log_proc_start);
529: END IF;
530:
531:
532: lv_registration_key := WF_ENGINE.GetItemAttrText(p_itemtype, p_itemkey, 'REGISTRATION_KEY');
533:
534: ln_reg_id := FND_REGISTRATION_UTILS_PKG.get_reg_id_from_key(lv_registration_key);
535:
536: ln_app_id := WF_ENGINE.GetItemAttrNumber(p_itemtype, p_itemkey, 'APPLICATION_ID');
532: lv_registration_key := WF_ENGINE.GetItemAttrText(p_itemtype, p_itemkey, 'REGISTRATION_KEY');
533:
534: ln_reg_id := FND_REGISTRATION_UTILS_PKG.get_reg_id_from_key(lv_registration_key);
535:
536: ln_app_id := WF_ENGINE.GetItemAttrNumber(p_itemtype, p_itemkey, 'APPLICATION_ID');
537:
538: lv_reg_type := WF_ENGINE.GetItemAttrText(p_itemtype, p_itemkey, 'REGISTRATION_TYPE');
539:
540: FND_REGISTRATION_PKG.insert_fnd_reg_details(
534: ln_reg_id := FND_REGISTRATION_UTILS_PKG.get_reg_id_from_key(lv_registration_key);
535:
536: ln_app_id := WF_ENGINE.GetItemAttrNumber(p_itemtype, p_itemkey, 'APPLICATION_ID');
537:
538: lv_reg_type := WF_ENGINE.GetItemAttrText(p_itemtype, p_itemkey, 'REGISTRATION_TYPE');
539:
540: FND_REGISTRATION_PKG.insert_fnd_reg_details(
541: ln_reg_id, ln_app_id, lv_reg_type, p_itemtype_fieldname,
542: 'VARCHAR2', NULL, p_itemtype, NULL, NULL);
603: ClearError;
604:
605: IF ( funcmode = 'RUN' ) then
606:
607: lv_reg_key := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRATION_KEY', TRUE);
608: IF ( lv_reg_key IS NULL ) THEN
609:
610: IF ( fnd_log.level_exception >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
611: fnd_log.string(fnd_log.level_exception, g_log_module_name || '.' || lv_proc_name, g_log_reg_key_notfound);
703: ClearError;
704:
705: IF ( funcmode = 'RUN' ) then
706:
707: lv_reg_key := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRATION_KEY', TRUE);
708:
709: IF ( lv_reg_key IS NULL ) THEN
710:
711: IF ( fnd_log.level_exception >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1103:
1104:
1105: IF ( funcmode = 'RUN' ) then
1106:
1107: lv_reg_key := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRATION_KEY', TRUE);
1108: IF ( lv_reg_key IS NULL ) THEN
1109:
1110: IF ( fnd_log.level_exception >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1111: fnd_log.string(fnd_log.level_exception, g_log_module_name || '.' || lv_proc_name, g_log_reg_key_notfound);
1141: -- hack!!! just to raise an arbitrary exception
1142: RAISE NO_DATA_FOUND;
1143: END IF;
1144:
1145: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_LANGUAGE', lv_registrant_lang);
1146: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL', lv_registrant_email);
1147: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ADHOC_USER_NAME', GetAdHocUserName(ln_reg_id));
1148:
1149: lv_enterprise_name := GetEnterpriseName();
1142: RAISE NO_DATA_FOUND;
1143: END IF;
1144:
1145: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_LANGUAGE', lv_registrant_lang);
1146: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL', lv_registrant_email);
1147: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ADHOC_USER_NAME', GetAdHocUserName(ln_reg_id));
1148:
1149: lv_enterprise_name := GetEnterpriseName();
1150: IF ( lv_enterprise_name IS NULL ) THEN
1143: END IF;
1144:
1145: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_LANGUAGE', lv_registrant_lang);
1146: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL', lv_registrant_email);
1147: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ADHOC_USER_NAME', GetAdHocUserName(ln_reg_id));
1148:
1149: lv_enterprise_name := GetEnterpriseName();
1150: IF ( lv_enterprise_name IS NULL ) THEN
1151:
1155:
1156: RAISE NO_DATA_FOUND;
1157: END IF;
1158:
1159: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ENTERPRISE_NAME', lv_enterprise_name);
1160:
1161: BEGIN
1162: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'Note', lv_x_field_type, lv_x_field_format, lv_notes, ln_x_field_value_number, lv_x_field_value_date);
1163: EXCEPTION WHEN OTHERS THEN
1163: EXCEPTION WHEN OTHERS THEN
1164: lv_notes := NULL;
1165: END;
1166:
1167: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'NOTE', lv_notes);
1168:
1169: lv_reg_page_url := GetRegPageURL(lv_reg_key, lv_registrant_lang);
1170: IF ( lv_reg_page_url IS NULL ) THEN
1171:
1175:
1176: RAISE NO_DATA_FOUND;
1177: END IF;
1178:
1179: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REG_PAGE_URL', lv_reg_page_url);
1180:
1181: resultout := 'COMPLETE:SUCCESS';
1182:
1183: IF ( fnd_log.level_procedure >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1264:
1265:
1266: IF ( funcmode = 'RUN' ) then
1267:
1268: lv_reg_key := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRATION_KEY', TRUE);
1269: IF ( lv_reg_key IS NULL ) THEN
1270:
1271: IF ( fnd_log.level_exception >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1272: fnd_log.string(fnd_log.level_exception, g_log_module_name || '.' || lv_proc_name, g_log_reg_key_notfound);
1301: resultout := 'COMPLETE:ERROR';
1302: RAISE NO_DATA_FOUND;
1303: END IF;
1304:
1305: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'FIRST_NAME', lv_first_name);
1306: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'LAST_NAME', lv_last_name);
1307:
1308: -- check if the registration is from Oracle Supplier Network
1309: -- and set the approver role attribute
1302: RAISE NO_DATA_FOUND;
1303: END IF;
1304:
1305: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'FIRST_NAME', lv_first_name);
1306: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'LAST_NAME', lv_last_name);
1307:
1308: -- check if the registration is from Oracle Supplier Network
1309: -- and set the approver role attribute
1310: BEGIN
1314: END;
1315:
1316: if (ln_x_field_value_number is not null) then
1317: -- this request is from OSN
1318: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'IS_OSNREQUEST', 'Y');
1319: lv_approver_role := get_approver_role_for_osn();
1320: else
1321: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'IS_OSNREQUEST', 'N');
1322: end if;
1317: -- this request is from OSN
1318: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'IS_OSNREQUEST', 'Y');
1319: lv_approver_role := get_approver_role_for_osn();
1320: else
1321: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'IS_OSNREQUEST', 'N');
1322: end if;
1323:
1324: -- if this request is not from OSN, or failed to get approver role
1325: if (ln_x_field_value_number is null
1357: END;
1358:
1359: end if; -- if this request is not from OSN, or failed to get approver role
1360:
1361: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'APPROVER_ROLE', lv_approver_role);
1362:
1363: BEGIN
1364: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'Supplier Name', lv_x_field_type, lv_x_field_format, lv_vendor_name, ln_x_field_value_number, lv_x_field_value_date);
1365: EXCEPTION WHEN OTHERS THEN
1387: resultout := 'COMPLETE:ERROR';
1388: RAISE NO_DATA_FOUND;
1389: END IF;
1390:
1391: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'VENDOR_NAME', lv_vendor_name);
1392:
1393: BEGIN
1394: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'Note', lv_x_field_type, lv_x_field_format, lv_notes, ln_x_field_value_number, lv_x_field_value_date);
1395: EXCEPTION WHEN OTHERS THEN
1395: EXCEPTION WHEN OTHERS THEN
1396: lv_notes := NULL;
1397: END;
1398:
1399: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'NOTE', lv_notes);
1400:
1401: lv_enterprise_name := GetEnterpriseName();
1402: IF ( lv_enterprise_name IS NULL ) THEN
1403:
1407:
1408: RAISE NO_DATA_FOUND;
1409: END IF;
1410:
1411: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ENTERPRISE_NAME', lv_enterprise_name);
1412:
1413: lv_approval_page_url := GetApprPageURL(lv_reg_key);
1414: IF ( lv_approval_page_url IS NULL ) THEN
1415:
1419:
1420: RAISE NO_DATA_FOUND;
1421: END IF;
1422:
1423: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'APPROVAL_PAGE_URL', lv_approval_page_url);
1424:
1425: lv_logon_page_url := GetLogonPageURL('Y');
1426: IF ( lv_logon_page_url IS NULL ) THEN
1427:
1431:
1432: RAISE NO_DATA_FOUND;
1433: END IF;
1434:
1435: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'LOGON_PAGE_URL', lv_logon_page_url);
1436:
1437: resultout := 'COMPLETE:SUCCESS';
1438:
1439: IF ( fnd_log.level_procedure >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1537:
1538:
1539: IF ( funcmode = 'RUN' ) then
1540:
1541: lv_reg_key := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRATION_KEY',
1542: TRUE);
1543: IF ( lv_reg_key IS NULL ) THEN
1544:
1545: IF ( fnd_log.level_exception >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1575: resultout := 'COMPLETE:ERROR';
1576: RAISE NO_DATA_FOUND;
1577: END IF;
1578:
1579: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REQUESTED_USER_NAME', lv_requested_user_name);
1580: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ADHOC_USER_NAME', GetAdHocUserName(ln_reg_id));
1581: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL', lv_user_email);
1582: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'FIRST_NAME', lv_first_name);
1583: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'LAST_NAME', lv_last_name);
1576: RAISE NO_DATA_FOUND;
1577: END IF;
1578:
1579: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REQUESTED_USER_NAME', lv_requested_user_name);
1580: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ADHOC_USER_NAME', GetAdHocUserName(ln_reg_id));
1581: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL', lv_user_email);
1582: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'FIRST_NAME', lv_first_name);
1583: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'LAST_NAME', lv_last_name);
1584: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME', lv_middle_name);
1577: END IF;
1578:
1579: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REQUESTED_USER_NAME', lv_requested_user_name);
1580: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ADHOC_USER_NAME', GetAdHocUserName(ln_reg_id));
1581: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL', lv_user_email);
1582: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'FIRST_NAME', lv_first_name);
1583: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'LAST_NAME', lv_last_name);
1584: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME', lv_middle_name);
1585: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE', lv_title);
1578:
1579: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REQUESTED_USER_NAME', lv_requested_user_name);
1580: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ADHOC_USER_NAME', GetAdHocUserName(ln_reg_id));
1581: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL', lv_user_email);
1582: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'FIRST_NAME', lv_first_name);
1583: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'LAST_NAME', lv_last_name);
1584: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME', lv_middle_name);
1585: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE', lv_title);
1586: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE', lv_phone);
1579: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REQUESTED_USER_NAME', lv_requested_user_name);
1580: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ADHOC_USER_NAME', GetAdHocUserName(ln_reg_id));
1581: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL', lv_user_email);
1582: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'FIRST_NAME', lv_first_name);
1583: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'LAST_NAME', lv_last_name);
1584: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME', lv_middle_name);
1585: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE', lv_title);
1586: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE', lv_phone);
1587: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE_EXT', lv_phone_ext);
1580: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ADHOC_USER_NAME', GetAdHocUserName(ln_reg_id));
1581: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL', lv_user_email);
1582: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'FIRST_NAME', lv_first_name);
1583: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'LAST_NAME', lv_last_name);
1584: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME', lv_middle_name);
1585: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE', lv_title);
1586: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE', lv_phone);
1587: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE_EXT', lv_phone_ext);
1588: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_FAX', lv_fax);
1581: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL', lv_user_email);
1582: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'FIRST_NAME', lv_first_name);
1583: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'LAST_NAME', lv_last_name);
1584: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME', lv_middle_name);
1585: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE', lv_title);
1586: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE', lv_phone);
1587: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE_EXT', lv_phone_ext);
1588: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_FAX', lv_fax);
1589:
1582: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'FIRST_NAME', lv_first_name);
1583: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'LAST_NAME', lv_last_name);
1584: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME', lv_middle_name);
1585: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE', lv_title);
1586: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE', lv_phone);
1587: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE_EXT', lv_phone_ext);
1588: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_FAX', lv_fax);
1589:
1590: lv_enterprise_name := GetEnterpriseName();
1583: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'LAST_NAME', lv_last_name);
1584: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME', lv_middle_name);
1585: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE', lv_title);
1586: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE', lv_phone);
1587: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE_EXT', lv_phone_ext);
1588: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_FAX', lv_fax);
1589:
1590: lv_enterprise_name := GetEnterpriseName();
1591: IF ( lv_enterprise_name IS NULL ) THEN
1584: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME', lv_middle_name);
1585: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE', lv_title);
1586: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE', lv_phone);
1587: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE_EXT', lv_phone_ext);
1588: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_FAX', lv_fax);
1589:
1590: lv_enterprise_name := GetEnterpriseName();
1591: IF ( lv_enterprise_name IS NULL ) THEN
1592:
1596:
1597: RAISE NO_DATA_FOUND;
1598: END IF;
1599:
1600: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ENTERPRISE_NAME', lv_enterprise_name);
1601:
1602: BEGIN
1603: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'Invited Flag', lv_x_field_type, lv_x_field_format, lv_is_invited_flag, ln_x_field_value_number, lv_x_field_value_date);
1604: EXCEPTION WHEN OTHERS THEN
1612: ELSE
1613: lv_is_invited_flag := 'N';
1614: END IF;
1615:
1616: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'IS_INVITED', lv_is_invited_flag);
1617:
1618: BEGIN
1619: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'Approver ID', lv_x_field_type, lv_x_field_format, lv_x_field_value_string, ln_approver_id, lv_x_field_value_date);
1620: EXCEPTION WHEN OTHERS THEN
1646:
1647: RAISE;
1648: END;
1649:
1650: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'CONTACT_EMAIL', lv_contact_email);
1651:
1652: BEGIN
1653: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'Supplier Number', lv_x_field_type, lv_x_field_format, lv_x_field_value_string, ln_vendor_id, lv_x_field_value_date);
1654: EXCEPTION WHEN OTHERS THEN
1665: resultout := 'COMPLETE:ERROR';
1666: RAISE NO_DATA_FOUND;
1667: END IF;
1668:
1669: WF_ENGINE.SetItemAttrNumber(itemtype, itemkey, 'VENDOR_ID', ln_vendor_id);
1670:
1671: BEGIN
1672: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'ISP', lv_x_field_type, lv_x_field_format, lv_pos_flag, ln_x_field_value_number, lv_x_field_value_date);
1673: EXCEPTION WHEN OTHERS THEN
1709: ELSE
1710: lv_sc_flag := 'N';
1711: END IF;
1712:
1713: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'POS_SELECTED', lv_pos_flag);
1714: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'PON_SELECTED', lv_pon_flag);
1715: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'SC_SELECTED', lv_sc_flag);
1716:
1717: BEGIN
1710: lv_sc_flag := 'N';
1711: END IF;
1712:
1713: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'POS_SELECTED', lv_pos_flag);
1714: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'PON_SELECTED', lv_pon_flag);
1715: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'SC_SELECTED', lv_sc_flag);
1716:
1717: BEGIN
1718: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'Note', lv_x_field_type, lv_x_field_format, lv_notes, ln_x_field_value_number, lv_x_field_value_date);
1711: END IF;
1712:
1713: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'POS_SELECTED', lv_pos_flag);
1714: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'PON_SELECTED', lv_pon_flag);
1715: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'SC_SELECTED', lv_sc_flag);
1716:
1717: BEGIN
1718: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'Note', lv_x_field_type, lv_x_field_format, lv_notes, ln_x_field_value_number, lv_x_field_value_date);
1719: EXCEPTION WHEN OTHERS THEN
1719: EXCEPTION WHEN OTHERS THEN
1720: lv_notes := NULL;
1721: END;
1722:
1723: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'NOTE', lv_notes);
1724:
1725: BEGIN
1726: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'Job Title', lv_x_field_type, lv_x_field_format, lv_job_title, ln_x_field_value_number, lv_x_field_value_date);
1727: EXCEPTION WHEN OTHERS THEN
1727: EXCEPTION WHEN OTHERS THEN
1728: lv_job_title := NULL;
1729: END;
1730:
1731: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_JOB_TITLE', lv_job_title);
1732:
1733: lv_logon_page_url := GetLogonPageURL('N');
1734: IF ( lv_logon_page_url IS NULL ) THEN
1735:
1739:
1740: RAISE NO_DATA_FOUND;
1741: END IF;
1742:
1743: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'LOGON_PAGE_URL', lv_logon_page_url);
1744:
1745: -- check if the registration is from Oracle Supplier Network
1746: -- and set the IS_OSNREQUEST attribute
1747: BEGIN
1749: EXCEPTION WHEN OTHERS THEN
1750: ln_x_field_value_number := NULL;
1751: END;
1752: if (ln_x_field_value_number is not null) then
1753: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'IS_OSNREQUEST', 'Y');
1754: else
1755: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'IS_OSNREQUEST', 'N');
1756: end if;
1757:
1751: END;
1752: if (ln_x_field_value_number is not null) then
1753: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'IS_OSNREQUEST', 'Y');
1754: else
1755: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'IS_OSNREQUEST', 'N');
1756: end if;
1757:
1758: resultout := 'COMPLETE:SUCCESS';
1759:
1837:
1838:
1839: IF ( funcmode = 'RUN' ) then
1840:
1841: lv_reg_key := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRATION_KEY', TRUE);
1842: IF ( lv_reg_key IS NULL ) THEN
1843:
1844: IF ( fnd_log.level_exception >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
1845: fnd_log.string(fnd_log.level_exception, g_log_module_name || '.' || lv_proc_name, g_log_reg_key_notfound);
1874: resultout := 'COMPLETE:ERROR';
1875: RAISE NO_DATA_FOUND;
1876: END IF;
1877:
1878: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_LANGUAGE', lv_registrant_lang);
1879: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL', lv_registrant_email);
1880: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ADHOC_USER_NAME', GetAdHocUserName(ln_reg_id));
1881:
1882: lv_enterprise_name := GetEnterpriseName();
1875: RAISE NO_DATA_FOUND;
1876: END IF;
1877:
1878: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_LANGUAGE', lv_registrant_lang);
1879: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL', lv_registrant_email);
1880: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ADHOC_USER_NAME', GetAdHocUserName(ln_reg_id));
1881:
1882: lv_enterprise_name := GetEnterpriseName();
1883: IF ( lv_enterprise_name IS NULL ) THEN
1876: END IF;
1877:
1878: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_LANGUAGE', lv_registrant_lang);
1879: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL', lv_registrant_email);
1880: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ADHOC_USER_NAME', GetAdHocUserName(ln_reg_id));
1881:
1882: lv_enterprise_name := GetEnterpriseName();
1883: IF ( lv_enterprise_name IS NULL ) THEN
1884:
1888:
1889: RAISE NO_DATA_FOUND;
1890: END IF;
1891:
1892: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ENTERPRISE_NAME', lv_enterprise_name);
1893:
1894: BEGIN
1895: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'Invited Flag', lv_x_field_type, lv_x_field_format, lv_is_invited_flag, ln_x_field_value_number, lv_x_field_value_date);
1896: EXCEPTION WHEN OTHERS THEN
1904: ELSE
1905: lv_is_invited_flag := 'N';
1906: END IF;
1907:
1908: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'IS_INVITED', lv_is_invited_flag);
1909:
1910: BEGIN
1911: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'Approver ID', lv_x_field_type, lv_x_field_format, lv_x_field_value_string, ln_approver_id, lv_x_field_value_date);
1912: EXCEPTION WHEN OTHERS THEN
1938:
1939: RAISE;
1940: END;
1941:
1942: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'CONTACT_EMAIL', lv_contact_email);
1943:
1944: resultout := 'COMPLETE:SUCCESS';
1945:
1946: IF ( fnd_log.level_procedure >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2004:
2005:
2006: IF ( funcmode = 'RUN' ) then
2007:
2008: lv_user_name := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'ADHOC_USER_NAME');
2009: lv_user_email := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL');
2010: lv_user_language := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_LANGUAGE');
2011:
2012: SELECT nls_language
2005:
2006: IF ( funcmode = 'RUN' ) then
2007:
2008: lv_user_name := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'ADHOC_USER_NAME');
2009: lv_user_email := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL');
2010: lv_user_language := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_LANGUAGE');
2011:
2012: SELECT nls_language
2013: INTO lv_nls_lang
2006: IF ( funcmode = 'RUN' ) then
2007:
2008: lv_user_name := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'ADHOC_USER_NAME');
2009: lv_user_email := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL');
2010: lv_user_language := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_LANGUAGE');
2011:
2012: SELECT nls_language
2013: INTO lv_nls_lang
2014: FROM fnd_languages
2099: BEGIN
2100:
2101: IF ( funcmode = 'RUN' ) then
2102:
2103: lv_user_name := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'ADHOC_USER_NAME');
2104:
2105: DELETE FROM wf_local_users
2106: WHERE name = lv_user_name;
2107:
2754:
2755: IF ( funcmode = 'RUN' ) then
2756:
2757: -- retrieve user info
2758: lv_reg_key := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRATION_KEY',TRUE);
2759: IF ( lv_reg_key IS NULL ) THEN
2760:
2761: IF ( fnd_log.level_exception >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2762: fnd_log.string(fnd_log.level_exception, g_log_module_name || '.' || lv_proc_name, g_log_reg_key_notfound);
2766: END IF;
2767:
2768: ln_reg_id := FND_REGISTRATION_UTILS_PKG.get_reg_id_from_key(lv_reg_key);
2769:
2770: lv_user_name := upper(WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REQUESTED_USER_NAME'));
2771: lv_user_email := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL');
2772: lv_user_firstname := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'FIRST_NAME');
2773: lv_user_lastname := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'LAST_NAME');
2774: lv_user_middlename := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME');
2767:
2768: ln_reg_id := FND_REGISTRATION_UTILS_PKG.get_reg_id_from_key(lv_reg_key);
2769:
2770: lv_user_name := upper(WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REQUESTED_USER_NAME'));
2771: lv_user_email := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL');
2772: lv_user_firstname := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'FIRST_NAME');
2773: lv_user_lastname := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'LAST_NAME');
2774: lv_user_middlename := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME');
2775: ln_vendor_id := WF_ENGINE.GetItemAttrNumber(itemtype, itemkey, 'VENDOR_ID');
2768: ln_reg_id := FND_REGISTRATION_UTILS_PKG.get_reg_id_from_key(lv_reg_key);
2769:
2770: lv_user_name := upper(WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REQUESTED_USER_NAME'));
2771: lv_user_email := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL');
2772: lv_user_firstname := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'FIRST_NAME');
2773: lv_user_lastname := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'LAST_NAME');
2774: lv_user_middlename := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME');
2775: ln_vendor_id := WF_ENGINE.GetItemAttrNumber(itemtype, itemkey, 'VENDOR_ID');
2776: lv_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE');
2769:
2770: lv_user_name := upper(WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REQUESTED_USER_NAME'));
2771: lv_user_email := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL');
2772: lv_user_firstname := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'FIRST_NAME');
2773: lv_user_lastname := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'LAST_NAME');
2774: lv_user_middlename := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME');
2775: ln_vendor_id := WF_ENGINE.GetItemAttrNumber(itemtype, itemkey, 'VENDOR_ID');
2776: lv_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE');
2777: lv_phone := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE');
2770: lv_user_name := upper(WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REQUESTED_USER_NAME'));
2771: lv_user_email := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL');
2772: lv_user_firstname := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'FIRST_NAME');
2773: lv_user_lastname := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'LAST_NAME');
2774: lv_user_middlename := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME');
2775: ln_vendor_id := WF_ENGINE.GetItemAttrNumber(itemtype, itemkey, 'VENDOR_ID');
2776: lv_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE');
2777: lv_phone := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE');
2778: lv_phone_ext := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE_EXT');
2771: lv_user_email := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_EMAIL');
2772: lv_user_firstname := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'FIRST_NAME');
2773: lv_user_lastname := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'LAST_NAME');
2774: lv_user_middlename := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME');
2775: ln_vendor_id := WF_ENGINE.GetItemAttrNumber(itemtype, itemkey, 'VENDOR_ID');
2776: lv_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE');
2777: lv_phone := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE');
2778: lv_phone_ext := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE_EXT');
2779: lv_fax := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_FAX');
2772: lv_user_firstname := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'FIRST_NAME');
2773: lv_user_lastname := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'LAST_NAME');
2774: lv_user_middlename := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME');
2775: ln_vendor_id := WF_ENGINE.GetItemAttrNumber(itemtype, itemkey, 'VENDOR_ID');
2776: lv_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE');
2777: lv_phone := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE');
2778: lv_phone_ext := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE_EXT');
2779: lv_fax := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_FAX');
2780: lv_job_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_JOB_TITLE');
2773: lv_user_lastname := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'LAST_NAME');
2774: lv_user_middlename := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME');
2775: ln_vendor_id := WF_ENGINE.GetItemAttrNumber(itemtype, itemkey, 'VENDOR_ID');
2776: lv_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE');
2777: lv_phone := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE');
2778: lv_phone_ext := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE_EXT');
2779: lv_fax := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_FAX');
2780: lv_job_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_JOB_TITLE');
2781: lv_is_pos_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'POS_SELECTED');
2774: lv_user_middlename := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'MIDDLE_NAME');
2775: ln_vendor_id := WF_ENGINE.GetItemAttrNumber(itemtype, itemkey, 'VENDOR_ID');
2776: lv_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE');
2777: lv_phone := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE');
2778: lv_phone_ext := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE_EXT');
2779: lv_fax := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_FAX');
2780: lv_job_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_JOB_TITLE');
2781: lv_is_pos_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'POS_SELECTED');
2782: lv_is_pon_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'PON_SELECTED');
2775: ln_vendor_id := WF_ENGINE.GetItemAttrNumber(itemtype, itemkey, 'VENDOR_ID');
2776: lv_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE');
2777: lv_phone := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE');
2778: lv_phone_ext := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE_EXT');
2779: lv_fax := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_FAX');
2780: lv_job_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_JOB_TITLE');
2781: lv_is_pos_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'POS_SELECTED');
2782: lv_is_pon_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'PON_SELECTED');
2783: lv_is_msc_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'SC_SELECTED');
2776: lv_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_TITLE');
2777: lv_phone := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE');
2778: lv_phone_ext := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE_EXT');
2779: lv_fax := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_FAX');
2780: lv_job_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_JOB_TITLE');
2781: lv_is_pos_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'POS_SELECTED');
2782: lv_is_pon_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'PON_SELECTED');
2783: lv_is_msc_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'SC_SELECTED');
2784:
2777: lv_phone := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE');
2778: lv_phone_ext := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE_EXT');
2779: lv_fax := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_FAX');
2780: lv_job_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_JOB_TITLE');
2781: lv_is_pos_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'POS_SELECTED');
2782: lv_is_pon_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'PON_SELECTED');
2783: lv_is_msc_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'SC_SELECTED');
2784:
2785: -- password generation
2778: lv_phone_ext := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_PHONE_EXT');
2779: lv_fax := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_FAX');
2780: lv_job_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_JOB_TITLE');
2781: lv_is_pos_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'POS_SELECTED');
2782: lv_is_pon_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'PON_SELECTED');
2783: lv_is_msc_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'SC_SELECTED');
2784:
2785: -- password generation
2786:
2779: lv_fax := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_FAX');
2780: lv_job_title := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'REGISTRANT_JOB_TITLE');
2781: lv_is_pos_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'POS_SELECTED');
2782: lv_is_pon_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'PON_SELECTED');
2783: lv_is_msc_selected := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'SC_SELECTED');
2784:
2785: -- password generation
2786:
2787: -- OSN: retrieve initial pwd set from OSN request, only when
2912: IF ( fnd_log.level_procedure >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
2913: fnd_log.string(fnd_log.level_procedure, g_log_module_name || '.' || lv_proc_name, 'Creating vendor user details');
2914: END IF;
2915:
2916: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ASSIGNED_USER_NAME', upper(lv_user_name));
2917:
2918: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'FIRST_LOGON_KEY', lv_unencrypted_password);
2919:
2920: -- get application ids
2914: END IF;
2915:
2916: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'ASSIGNED_USER_NAME', upper(lv_user_name));
2917:
2918: WF_ENGINE.SetItemAttrText(itemtype, itemkey, 'FIRST_LOGON_KEY', lv_unencrypted_password);
2919:
2920: -- get application ids
2921: OPEN l_app_id_cur('POS');
2922: FETCH l_app_id_cur INTO ln_pos_app_id;
3267:
3268:
3269: IF ( funcmode = 'RUN' ) then
3270:
3271: lv_invitation_flag := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'IS_INVITED');
3272:
3273: IF ( lv_invitation_flag IS NOT NULL AND lv_invitation_flag = 'Y') THEN
3274: resultout := 'COMPLETE:Y';
3275: ELSE
3535:
3536:
3537: IF ( funcmode = 'RUN' ) then
3538:
3539: lv_osnrequest_flag := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'IS_OSNREQUEST');
3540:
3541: IF ( lv_osnrequest_flag IS NOT NULL AND lv_osnrequest_flag = 'Y') THEN
3542: resultout := 'COMPLETE:Y';
3543: ELSE