APPS.PON_TCA_MERGE_PVT dependencies on PON_ATTRIBUTE_LISTS

Line 1639: -- merge for Sourcing PON_ATTRIBUTE_LISTS entity.

1635: -- Pre-reqs : Attributes List with the given trading_partner_contact_id
1636: -- (p_From_FK_id) must exists in the database
1637: --
1638: -- Function : This procedure will be attached to the TRADING_PARTNER_CONTACT_ID
1639: -- merge for Sourcing PON_ATTRIBUTE_LISTS entity.
1640: --
1641: -- It will veto Party Merge if -
1642: -- p_From_FK_id and p_To_FK_id both are not Buyer user party
1643: --

Line 1644: -- This will merge the all the PON_ATTRIBUTE_LISTS records

1640: --
1641: -- It will veto Party Merge if -
1642: -- p_From_FK_id and p_To_FK_id both are not Buyer user party
1643: --
1644: -- This will merge the all the PON_ATTRIBUTE_LISTS records
1645: -- having TRADING_PARTNER_CONTACT_ID equals to p_From_FK_id
1646: -- to party id having value (p_To_FK_id)
1647: --
1648: -- Parameters:

Line 1729: -- PON_ATTRIBUTE_LISTS.TRADING_PARTNER_CONTACT_ID

1725:
1726: fnd_file.put_line (fnd_file.log, '20 : Seller Merge - Error');
1727: --
1728: -- This can not happen in any normal scenario as
1729: -- PON_ATTRIBUTE_LISTS.TRADING_PARTNER_CONTACT_ID
1730: -- can never contain a seller user id. Thus, raising a veto though
1731: -- it will possibly never be called
1732: --
1733: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

Line 1749: UPDATE PON_ATTRIBUTE_LISTS

1745: --
1746: -- there is no chance of unique key constraint violation
1747: -- due to the following updates
1748: --
1749: UPDATE PON_ATTRIBUTE_LISTS
1750: SET LAST_UPDATE_DATE = SYSDATE,
1751: LAST_UPDATED_BY = -1,
1752: TRADING_PARTNER_CONTACT_ID = p_To_FK_id
1753: WHERE TRADING_PARTNER_CONTACT_ID = p_From_FK_id;

Line 1755: fnd_file.put_line (fnd_file.log, '50 : Buyer Merge - Updated TPC IDs in PON_ATTRIBUTE_LISTS: '||sql%rowcount||' rows');

1751: LAST_UPDATED_BY = -1,
1752: TRADING_PARTNER_CONTACT_ID = p_To_FK_id
1753: WHERE TRADING_PARTNER_CONTACT_ID = p_From_FK_id;
1754:
1755: fnd_file.put_line (fnd_file.log, '50 : Buyer Merge - Updated TPC IDs in PON_ATTRIBUTE_LISTS: '||sql%rowcount||' rows');
1756:
1757:
1758: ELSIF (l_merge_scenario = G_IRRELEVANT) THEN
1759: --