DBA Data[Home] [Help]

APPS.PON_TCA_MERGE_PVT dependencies on FND_MESSAGE

Line 92: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

88: --
89: -- It does not check any thing and simply forwards
90: -- a veto against the current Party Merge
91: --
92: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
93: FND_MSG_PUB.ADD;
94: x_return_status := FND_API.G_RET_STS_ERROR;
95:
96: --} end of procedure

Line 648: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

644: --
645: -- We need add some Sourcing specific message for this
646: --
647: fnd_file.put_line (fnd_file.log, '60 : Error in PON_TCA_PARTY_MERGE.MERGE_NEG_TEAM_FND_USER SQLERRM:'||SQLERRM);
648: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
649: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
650: FND_MSG_PUB.ADD;
651:
652: --} end of procedure

Line 649: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

645: -- We need add some Sourcing specific message for this
646: --
647: fnd_file.put_line (fnd_file.log, '60 : Error in PON_TCA_PARTY_MERGE.MERGE_NEG_TEAM_FND_USER SQLERRM:'||SQLERRM);
648: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
649: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
650: FND_MSG_PUB.ADD;
651:
652: --} end of procedure
653: END MERGE_NEG_TEAM_FND_USER;

Line 762: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

758: -- PON_AUCTION_HEADERS_ALL.TRADING_PARTNER_CONTACT_ID
759: -- can never contain a seller user id. Thus, raising a veto though
760: -- it will possibly never be called
761: --
762: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
763: FND_MSG_PUB.ADD;
764: x_return_status := FND_API.G_RET_STS_ERROR;
765:
766: ELSIF (l_merge_scenario = G_BUYER) THEN

Line 824: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

820: --
821: -- We need add some Sourcing specific message for this
822: --
823: fnd_file.put_line (fnd_file.log, '80 : Error in PON_TCA_PARTY_MERGE.NEG_TPC_MERGE SQLERRM:'||SQLERRM);
824: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
825: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
826: FND_MSG_PUB.ADD;
827:
828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 825: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

821: -- We need add some Sourcing specific message for this
822: --
823: fnd_file.put_line (fnd_file.log, '80 : Error in PON_TCA_PARTY_MERGE.NEG_TPC_MERGE SQLERRM:'||SQLERRM);
824: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
825: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
826: FND_MSG_PUB.ADD;
827:
828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
829:

Line 936: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

932: -- PON_AUCTION_HEADERS_ALL.DRAFT_LOCKED_BY_CONTACT_ID
933: -- can never contain a seller user id. Thus, raising a veto though
934: -- it will possibly never be called
935: --
936: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
937: FND_MSG_PUB.ADD;
938: x_return_status := FND_API.G_RET_STS_ERROR;
939:
940: ELSIF (l_merge_scenario = G_BUYER) THEN

Line 983: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

979: --
980: -- We need add some Sourcing specific message for this
981: --
982: fnd_file.put_line (fnd_file.log, '60 : Error in PON_TCA_PARTY_MERGE.NEG_DRFT_LCK_MERGE SQLERRM:'||SQLERRM);
983: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
984: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
985: FND_MSG_PUB.ADD;
986:
987: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 984: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

980: -- We need add some Sourcing specific message for this
981: --
982: fnd_file.put_line (fnd_file.log, '60 : Error in PON_TCA_PARTY_MERGE.NEG_DRFT_LCK_MERGE SQLERRM:'||SQLERRM);
983: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
984: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
985: FND_MSG_PUB.ADD;
986:
987: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
988:

Line 1096: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

1092: -- PON_AUCTION_HEADERS_ALL.DRAFT_UNLOCKED_BY_CONTACT_ID
1093: -- can never contain a seller user id. Thus, raising a veto though
1094: -- it will possibly never be called
1095: --
1096: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
1097: FND_MSG_PUB.ADD;
1098: x_return_status := FND_API.G_RET_STS_ERROR;
1099:
1100: ELSIF (l_merge_scenario = G_BUYER) THEN

Line 1146: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

1142: fnd_file.put_line (fnd_file.log, '60 : Error in PON_TCA_PARTY_MERGE.NEG_DRFT_UNLCK_MERGE SQLERRM:'||SQLERRM);
1143: --
1144: -- We need add some Sourcing specific message for this
1145: --
1146: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1147: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1148: FND_MSG_PUB.ADD;
1149:
1150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1147: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

1143: --
1144: -- We need add some Sourcing specific message for this
1145: --
1146: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1147: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1148: FND_MSG_PUB.ADD;
1149:
1150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1151:

Line 1260: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

1256: -- PON_AUCTION_HEADERS_ALL.SCORING_LOCK_TP_CONTACT_ID
1257: -- can never contain a seller user id. Thus, raising a veto though
1258: -- it will possibly never be called
1259: --
1260: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
1261: FND_MSG_PUB.ADD;
1262: x_return_status := FND_API.G_RET_STS_ERROR;
1263:
1264: ELSIF (l_merge_scenario = G_BUYER) THEN

Line 1308: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

1304: fnd_file.put_line (fnd_file.log, '60 : Error in PON_TCA_PARTY_MERGE.NEG_SCORE_LCK_MERGE SQLERRM:'||SQLERRM);
1305: --
1306: -- We need add some Sourcing specific message for this
1307: --
1308: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1309: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1310: FND_MSG_PUB.ADD;
1311:
1312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1309: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

1305: --
1306: -- We need add some Sourcing specific message for this
1307: --
1308: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1309: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1310: FND_MSG_PUB.ADD;
1311:
1312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1313:

Line 1422: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

1418: -- PON_AUCTION_EVENTS.TRADING_PARTNER_CONTACT_ID
1419: -- can never contain a seller user id. Thus, raising a veto though
1420: -- it will possibly never be called
1421: --
1422: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
1423: FND_MSG_PUB.ADD;
1424: x_return_status := FND_API.G_RET_STS_ERROR;
1425:
1426: ELSIF (l_merge_scenario = G_BUYER) THEN

Line 1468: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

1464: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.NEG_EVENT_MERGE SQLERRM:'||SQLERRM);
1465: --
1466: -- We need add some Sourcing specific message for this
1467: --
1468: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1469: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1470: FND_MSG_PUB.ADD;
1471:
1472: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1469: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

1465: --
1466: -- We need add some Sourcing specific message for this
1467: --
1468: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1469: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1470: FND_MSG_PUB.ADD;
1471:
1472: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1473:

Line 1580: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

1576: -- PON_BIDDERS_LISTS.TRADING_PARTNER_CONTACT_ID
1577: -- can never contain a seller user id. Thus, raising a veto though
1578: -- it will possibly never be called
1579: --
1580: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
1581: FND_MSG_PUB.ADD;
1582: x_return_status := FND_API.G_RET_STS_ERROR;
1583:
1584: ELSIF (l_merge_scenario = G_BUYER) THEN

Line 1620: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

1616: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.BIDDER_LST_MERGE SQLERRM:'||SQLERRM);
1617: --
1618: -- We need add some Sourcing specific message for this
1619: --
1620: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1621: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1622: FND_MSG_PUB.ADD;
1623:
1624: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1621: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

1617: --
1618: -- We need add some Sourcing specific message for this
1619: --
1620: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1621: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1622: FND_MSG_PUB.ADD;
1623:
1624: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1625:

Line 1733: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

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
1734: FND_MSG_PUB.ADD;
1735: x_return_status := FND_API.G_RET_STS_ERROR;
1736:
1737: ELSIF (l_merge_scenario = G_BUYER) THEN

Line 1773: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

1769: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.NEG_ATTR_LST_MERGE SQLERRM:'||SQLERRM);
1770: --
1771: -- We need add some Sourcing specific message for this
1772: --
1773: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1774: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1775: FND_MSG_PUB.ADD;
1776:
1777: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1774: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

1770: --
1771: -- We need add some Sourcing specific message for this
1772: --
1773: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1774: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1775: FND_MSG_PUB.ADD;
1776:
1777: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1778:

Line 1885: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

1881: -- PON_BID_HEADERS.SURROG_BID_CREATED_CONTACT_ID
1882: -- can never contain a seller user id. Thus, raising a veto though
1883: -- it will possibly never be called
1884: --
1885: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
1886: FND_MSG_PUB.ADD;
1887: x_return_status := FND_API.G_RET_STS_ERROR;
1888:
1889: ELSIF (l_merge_scenario = G_BUYER) THEN

Line 1934: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

1930: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.RES_SURROG_MERGE SQLERRM:'||SQLERRM);
1931: --
1932: -- We need add some Sourcing specific message for this
1933: --
1934: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1935: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1936: FND_MSG_PUB.ADD;
1937:
1938: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1935: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

1931: --
1932: -- We need add some Sourcing specific message for this
1933: --
1934: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
1935: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
1936: FND_MSG_PUB.ADD;
1937:
1938: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1939:

Line 2047: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

2043: -- PON_BID_HEADERS.SCORE_OVERRIDE_TP_CONTACT_ID
2044: -- can never contain a seller user id. Thus, raising a veto though
2045: -- it will possibly never be called
2046: --
2047: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
2048: FND_MSG_PUB.ADD;
2049: x_return_status := FND_API.G_RET_STS_ERROR;
2050:
2051: ELSIF (l_merge_scenario = G_BUYER) THEN

Line 2096: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

2092: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.RES_SCORE_MERGE SQLERRM:'||SQLERRM);
2093: --
2094: -- We need add some Sourcing specific message for this
2095: --
2096: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2097: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2098: FND_MSG_PUB.ADD;
2099:
2100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2097: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

2093: --
2094: -- We need add some Sourcing specific message for this
2095: --
2096: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2097: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2098: FND_MSG_PUB.ADD;
2099:
2100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2101:

Line 2209: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

2205: -- PON_BID_HEADERS.SHORTLIST_TPC_ID
2206: -- can never contain a seller user id. Thus, raising a veto though
2207: -- it will possibly never be called
2208: --
2209: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
2210: FND_MSG_PUB.ADD;
2211: x_return_status := FND_API.G_RET_STS_ERROR;
2212:
2213: ELSIF (l_merge_scenario = G_BUYER) THEN

Line 2256: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

2252: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.RES_SHRT_LIST_MERGE SQLERRM:'||SQLERRM);
2253: --
2254: -- We need add some Sourcing specific message for this
2255: --
2256: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2257: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2258: FND_MSG_PUB.ADD;
2259:
2260: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2257: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

2253: --
2254: -- We need add some Sourcing specific message for this
2255: --
2256: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2257: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2258: FND_MSG_PUB.ADD;
2259:
2260: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2261:

Line 2368: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

2364: -- PON_CONTRACTS.AUTHORING_PARTY_CONTACT_ID
2365: -- can never contain a seller user id. Thus, raising a veto though
2366: -- it will possibly never be called
2367: --
2368: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
2369: FND_MSG_PUB.ADD;
2370: x_return_status := FND_API.G_RET_STS_ERROR;
2371:
2372: ELSIF (l_merge_scenario = G_BUYER) THEN

Line 2416: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

2412: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.NEG_CONTRCT_MERGE SQLERRM:'||SQLERRM);
2413: --
2414: -- We need add some Sourcing specific message for this
2415: --
2416: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2417: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2418: FND_MSG_PUB.ADD;
2419:
2420: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2417: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

2413: --
2414: -- We need add some Sourcing specific message for this
2415: --
2416: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2417: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2418: FND_MSG_PUB.ADD;
2419:
2420: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2421:

Line 2528: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

2524: fnd_file.put_line (fnd_file.log, '20 : Incompatible Merge - Error');
2525: --
2526: -- This can not be passed. Thus, raising a veto.
2527: --
2528: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
2529: FND_MSG_PUB.ADD;
2530: x_return_status := FND_API.G_RET_STS_ERROR;
2531:
2532: ELSIF (l_merge_scenario = G_SELLER OR l_merge_scenario = G_BUYER) THEN

Line 2562: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

2558: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.NEG_DISC_THR_MERGE SQLERRM:'||SQLERRM);
2559: --
2560: -- We need add some Sourcing specific message for this
2561: --
2562: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2563: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2564: FND_MSG_PUB.ADD;
2565:
2566: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2563: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

2559: --
2560: -- We need add some Sourcing specific message for this
2561: --
2562: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2563: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2564: FND_MSG_PUB.ADD;
2565:
2566: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2567:

Line 2676: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

2672:
2673: --
2674: -- This can not be passed. Thus, raising a veto.
2675: --
2676: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
2677: FND_MSG_PUB.ADD;
2678: x_return_status := FND_API.G_RET_STS_ERROR;
2679:
2680: ELSIF (l_merge_scenario = G_SELLER OR l_merge_scenario = G_BUYER) THEN

Line 2739: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

2735: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.NEG_DISC_THR_ENTRY_MERGE SQLERRM:'||SQLERRM);
2736: --
2737: -- We need add some Sourcing specific message for this
2738: --
2739: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2740: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2741: FND_MSG_PUB.ADD;
2742:
2743: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2740: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

2736: --
2737: -- We need add some Sourcing specific message for this
2738: --
2739: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2740: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2741: FND_MSG_PUB.ADD;
2742:
2743: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2744:

Line 2856: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

2852: fnd_file.put_line (fnd_file.log, '20 : Incompatible Merge - Error');
2853: --
2854: -- This can not be passed. Thus, raising a veto.
2855: --
2856: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
2857: FND_MSG_PUB.ADD;
2858: x_return_status := FND_API.G_RET_STS_ERROR;
2859:
2860: ELSIF (l_merge_scenario = G_SELLER OR l_merge_scenario = G_IRRELEVANT) THEN

Line 2880: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

2876: fnd_file.put_line (fnd_file.log, '40 : Error in PON_TCA_PARTY_MERGE.NEG_COMP_MERGE SQLERRM:'||SQLERRM);
2877: --
2878: -- We need add some Sourcing specific message for this
2879: --
2880: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2881: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2882: FND_MSG_PUB.ADD;
2883:
2884: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2881: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

2877: --
2878: -- We need add some Sourcing specific message for this
2879: --
2880: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
2881: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
2882: FND_MSG_PUB.ADD;
2883:
2884: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2885:

Line 2993: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

2989: fnd_file.put_line (fnd_file.log, '20 : Incompatible Merge - Error');
2990: --
2991: -- This can not be passed. Thus, raising a veto.
2992: --
2993: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
2994: FND_MSG_PUB.ADD;
2995: x_return_status := FND_API.G_RET_STS_ERROR;
2996:
2997: ELSIF (l_merge_scenario = G_SELLER OR l_merge_scenario = G_BUYER) THEN

Line 3058: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

3054: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.NEG_DISC_TE_RCP_MERGE SQLERRM:'||SQLERRM);
3055: --
3056: -- We need add some Sourcing specific message for this
3057: --
3058: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3059: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3060: FND_MSG_PUB.ADD;
3061:
3062: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3059: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

3055: --
3056: -- We need add some Sourcing specific message for this
3057: --
3058: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3059: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3060: FND_MSG_PUB.ADD;
3061:
3062: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3063:

Line 3171: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

3167: -- PON_ACKNOWLEDGEMENTS.SURROG_BID_ACK_CONTACT_ID
3168: -- can never contain a seller user id. Thus, raising a veto though
3169: -- it will possibly never be called
3170: --
3171: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
3172: FND_MSG_PUB.ADD;
3173: x_return_status := FND_API.G_RET_STS_ERROR;
3174:
3175: ELSIF (l_merge_scenario = G_BUYER) THEN

Line 3219: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

3215: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.RES_SURR_ACK_MERGE SQLERRM:'||SQLERRM);
3216: --
3217: -- We need add some Sourcing specific message for this
3218: --
3219: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3220: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3221: FND_MSG_PUB.ADD;
3222:
3223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3220: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

3216: --
3217: -- We need add some Sourcing specific message for this
3218: --
3219: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3220: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3221: FND_MSG_PUB.ADD;
3222:
3223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3224:

Line 3331: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

3327: -- PON_SUPPLIER_ACCESS.BUYER_TP_CONTACT_ID
3328: -- can never contain a seller user id. Thus, raising a veto though
3329: -- it will possibly never be called
3330: --
3331: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
3332: FND_MSG_PUB.ADD;
3333: x_return_status := FND_API.G_RET_STS_ERROR;
3334:
3335: ELSIF (l_merge_scenario = G_BUYER) THEN

Line 3378: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

3374: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.NEG_SUPP_ACC_MERGE SQLERRM:'||SQLERRM);
3375: --
3376: -- We need add some Sourcing specific message for this
3377: --
3378: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3379: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3380: FND_MSG_PUB.ADD;
3381:
3382: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3379: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

3375: --
3376: -- We need add some Sourcing specific message for this
3377: --
3378: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3379: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3380: FND_MSG_PUB.ADD;
3381:
3382: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3383:

Line 3492: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

3488: -- PON_BIDDING_PARTIES.TRADING_PARTNER_CONTACT_ID
3489: -- can never contain a buyer user id. Thus, raising a veto though
3490: -- it will possibly never be called
3491: --
3492: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
3493: FND_MSG_PUB.ADD;
3494: x_return_status := FND_API.G_RET_STS_ERROR;
3495:
3496: ELSIF (l_merge_scenario = G_SELLER) THEN

Line 3540: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

3536: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.BID_PARTY_TPC_MERGE SQLERRM:'||SQLERRM);
3537: --
3538: -- We need add some Sourcing specific message for this
3539: --
3540: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3541: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3542: FND_MSG_PUB.ADD;
3543:
3544: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3541: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

3537: --
3538: -- We need add some Sourcing specific message for this
3539: --
3540: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3541: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3542: FND_MSG_PUB.ADD;
3543:
3544: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3545:

Line 3653: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

3649: -- PON_BIDDING_PARTIES.ACK_PARTNER_CONTACT_ID
3650: -- can never contain a buyer user id. Thus, raising a veto though
3651: -- it will possibly never be called
3652: --
3653: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
3654: FND_MSG_PUB.ADD;
3655: x_return_status := FND_API.G_RET_STS_ERROR;
3656:
3657: ELSIF (l_merge_scenario = G_SELLER) THEN

Line 3701: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

3697: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.BID_PARTY_ACK_TPC_MERGE SQLERRM:'||SQLERRM);
3698: --
3699: -- We need add some Sourcing specific message for this
3700: --
3701: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3702: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3703: FND_MSG_PUB.ADD;
3704:
3705: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3702: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

3698: --
3699: -- We need add some Sourcing specific message for this
3700: --
3701: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3702: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3703: FND_MSG_PUB.ADD;
3704:
3705: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3706:

Line 3814: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

3810: -- can never contain a buyer user id which is merged to a seller user.
3811: -- Thus, raising a veto though
3812: -- it will possibly never be called
3813: --
3814: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
3815: FND_MSG_PUB.ADD;
3816: x_return_status := FND_API.G_RET_STS_ERROR;
3817:
3818: ELSIF (l_merge_scenario = G_SELLER OR l_merge_scenario = G_BUYER ) THEN

Line 3848: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

3844: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.RES_UNLCK_TPC_MERGE SQLERRM:'||SQLERRM);
3845: --
3846: -- We need add some Sourcing specific message for this
3847: --
3848: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3849: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3850: FND_MSG_PUB.ADD;
3851:
3852: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3849: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

3845: --
3846: -- We need add some Sourcing specific message for this
3847: --
3848: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3849: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3850: FND_MSG_PUB.ADD;
3851:
3852: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3853:

Line 3962: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

3958: -- can never contain a buyer user id which is merged to a seller user id.
3959: -- Thus, raising a veto though
3960: -- it will possibly never be called
3961: --
3962: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
3963: FND_MSG_PUB.ADD;
3964: x_return_status := FND_API.G_RET_STS_ERROR;
3965:
3966: ELSIF (l_merge_scenario = G_SELLER OR l_merge_scenario = G_BUYER) THEN

Line 3996: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

3992: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.RES_LCK_TPC_MERGE SQLERRM:'||SQLERRM);
3993: --
3994: -- We need add some Sourcing specific message for this
3995: --
3996: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3997: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3998: FND_MSG_PUB.ADD;
3999:
4000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3997: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

3993: --
3994: -- We need add some Sourcing specific message for this
3995: --
3996: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
3997: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
3998: FND_MSG_PUB.ADD;
3999:
4000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4001:

Line 4109: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

4105: -- PON_BID_HEADERS.TRADING_PARTNER_CONTACT_ID
4106: -- can never contain a buyer user id. Thus, raising a veto though
4107: -- it will possibly never be called
4108: --
4109: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
4110: FND_MSG_PUB.ADD;
4111: x_return_status := FND_API.G_RET_STS_ERROR;
4112:
4113: ELSIF (l_merge_scenario = G_SELLER) THEN

Line 4163: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

4159: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.RES_TPC_MERGE SQLERRM:'||SQLERRM);
4160: --
4161: -- We need add some Sourcing specific message for this
4162: --
4163: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4164: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4165: FND_MSG_PUB.ADD;
4166:
4167: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 4164: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

4160: --
4161: -- We need add some Sourcing specific message for this
4162: --
4163: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4164: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4165: FND_MSG_PUB.ADD;
4166:
4167: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4168:

Line 4275: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

4271: -- PON_OPTIMIZE_CONSTRAINTS.TRADING_PARTNER_CONTACT_ID
4272: -- can never contain a buyer user id. Thus, raising a veto though
4273: -- it will possibly never be called
4274: --
4275: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
4276: FND_MSG_PUB.ADD;
4277: x_return_status := FND_API.G_RET_STS_ERROR;
4278:
4279: ELSIF (l_merge_scenario = G_SELLER) THEN

Line 4310: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

4306: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.OPTMZ_TPC_MERGE SQLERRM:'||SQLERRM);
4307: --
4308: -- We need add some Sourcing specific message for this
4309: --
4310: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4311: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4312: FND_MSG_PUB.ADD;
4313:
4314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 4311: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

4307: --
4308: -- We need add some Sourcing specific message for this
4309: --
4310: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4311: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4312: FND_MSG_PUB.ADD;
4313:
4314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4315:

Line 4422: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

4418: -- PON_ACKNOWLEDGEMENTS.TRADING_PARTNER_CONTACT_ID
4419: -- can never contain a buyer user id. Thus, raising a veto though
4420: -- it will possibly never be called
4421: --
4422: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
4423: FND_MSG_PUB.ADD;
4424: x_return_status := FND_API.G_RET_STS_ERROR;
4425:
4426: ELSIF (l_merge_scenario = G_SELLER) THEN

Line 4462: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

4458: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.RES_ACK_MERGE SQLERRM:'||SQLERRM);
4459: --
4460: -- We need add some Sourcing specific message for this
4461: --
4462: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4463: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4464: FND_MSG_PUB.ADD;
4465:
4466: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 4463: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

4459: --
4460: -- We need add some Sourcing specific message for this
4461: --
4462: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4463: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4464: FND_MSG_PUB.ADD;
4465:
4466: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4467:

Line 4573: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

4569: -- PON_AUCTION_SUMMARY.TRADING_PARTNER_CONTACT_ID
4570: -- can never contain a buyer user id. Thus, raising a veto though
4571: -- it will possibly never be called
4572: --
4573: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
4574: FND_MSG_PUB.ADD;
4575: x_return_status := FND_API.G_RET_STS_ERROR;
4576:
4577: ELSIF (l_merge_scenario = G_SELLER) THEN

Line 4609: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

4605: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.AUC_SUMM_TPC_MERGE SQLERRM:'||SQLERRM);
4606: --
4607: -- We need add some Sourcing specific message for this
4608: --
4609: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4610: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4611: FND_MSG_PUB.ADD;
4612:
4613: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 4610: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

4606: --
4607: -- We need add some Sourcing specific message for this
4608: --
4609: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4610: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4611: FND_MSG_PUB.ADD;
4612:
4613: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4614:

Line 4722: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message

4718: -- PON_SUPPLIER_ACTIVITIES.TRADING_PARTNER_CONTACT_ID
4719: -- can never contain a buyer user id. Thus, raising a veto though
4720: -- it will possibly never be called
4721: --
4722: FND_MESSAGE.SET_NAME('AR', 'PON_TCA_MRG_ERR'); -- Need to put some Sourcing Specific Error Message
4723: FND_MSG_PUB.ADD;
4724: x_return_status := FND_API.G_RET_STS_ERROR;
4725:
4726: ELSIF (l_merge_scenario = G_SELLER) THEN

Line 4763: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');

4759: fnd_file.put_line (fnd_file.log, '70 : Error in PON_TCA_PARTY_MERGE.SUP_ACT_MERGE SQLERRM:'||SQLERRM);
4760: --
4761: -- We need add some Sourcing specific message for this
4762: --
4763: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4764: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4765: FND_MSG_PUB.ADD;
4766:
4767: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 4764: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);

4760: --
4761: -- We need add some Sourcing specific message for this
4762: --
4763: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4764: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
4765: FND_MSG_PUB.ADD;
4766:
4767: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4768: