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);
543:
544: FND_REGISTRATION_PKG.insert_fnd_reg_details(
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);
543:
544: FND_REGISTRATION_PKG.insert_fnd_reg_details(
545: ln_reg_id, ln_app_id, lv_reg_type, p_itemkey_fieldname,
546: 'VARCHAR2', NULL, p_itemkey, NULL, NULL);
547:
548:
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
1164: lv_notes := NULL;
1165: END;
1166:
1307:
1308: -- check if the registration is from Oracle Supplier Network
1309: -- and set the approver role attribute
1310: BEGIN
1311: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'OSN Request ID', lv_x_field_type, lv_x_field_format, lv_x_field_value_string, ln_x_field_value_number, lv_x_field_value_date);
1312: EXCEPTION WHEN OTHERS THEN
1313: ln_x_field_value_number := NULL;
1314: END;
1315:
1325: if (ln_x_field_value_number is null
1326: or lv_approver_role is null) then
1327:
1328: BEGIN
1329: 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);
1330: EXCEPTION WHEN OTHERS THEN
1331: ln_approver_id := NULL;
1332: END;
1333:
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
1366: lv_vendor_name := NULL;
1367: END;
1368:
1368:
1369: --if it's an OSN request, could use trading partner when supplier is null
1370: IF ( lv_vendor_name IS NULL ) THEN
1371: BEGIN
1372: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'OSN TP Name', lv_x_field_type, lv_x_field_format, lv_osn_tp_name, ln_x_field_value_number, lv_x_field_value_date);
1373:
1374: lv_vendor_name := lv_osn_tp_name;
1375: EXCEPTION WHEN OTHERS THEN
1376: lv_osn_tp_name := NULL;
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
1396: lv_notes := NULL;
1397: END;
1398:
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
1605: lv_is_invited_flag := NULL;
1606: END;
1607:
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
1621: ln_approver_id := NULL;
1622: END;
1623:
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
1655: ln_vendor_id := NULL;
1656: END;
1657:
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
1674: lv_pos_flag := NULL;
1675: END;
1676:
1674: lv_pos_flag := NULL;
1675: END;
1676:
1677: BEGIN
1678: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'Sourcing', lv_x_field_type, lv_x_field_format, lv_pon_flag, ln_x_field_value_number, lv_x_field_value_date);
1679: EXCEPTION WHEN OTHERS THEN
1680: lv_pon_flag := NULL;
1681: END;
1682:
1680: lv_pon_flag := NULL;
1681: END;
1682:
1683: BEGIN
1684: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'CollaborativePlanning', lv_x_field_type, lv_x_field_format, lv_sc_flag, ln_x_field_value_number, lv_x_field_value_date);
1685: EXCEPTION WHEN OTHERS THEN
1686: lv_sc_flag := NULL;
1687: END;
1688:
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
1720: lv_notes := NULL;
1721: END;
1722:
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
1728: lv_job_title := NULL;
1729: END;
1730:
1744:
1745: -- check if the registration is from Oracle Supplier Network
1746: -- and set the IS_OSNREQUEST attribute
1747: BEGIN
1748: FND_REGISTRATION_PKG.retrieve_fnd_reg_details( ln_reg_id, 'OSN Request ID', lv_x_field_type, lv_x_field_format, lv_x_field_value_string, ln_x_field_value_number, lv_x_field_value_date);
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
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
1897: lv_is_invited_flag := NULL;
1898: END;
1899:
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
1913: ln_approver_id := NULL;
1914: END;
1915: