DBA Data[Home] [Help]

APPS.PO_FED_FIELD_FUNCTIONS dependencies on FND_MSG_PUB

Line 218: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );

214: EXCEPTION
215: WHEN No_Data_Found THEN
216: NULL;
217: WHEN OTHERS THEN
218: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
219: END;
220: END IF;
221:
222: IF contact IS NULL THEN

Line 239: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );

235: EXCEPTION
236: WHEN No_Data_Found THEN
237: NULL;
238: WHEN OTHERS THEN
239: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
240: END;
241: END IF;
242:
243: END IF ;

Line 441: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': NO DATA FOUND' );

437: end if;
438:
439: EXCEPTION
440: WHEN No_Data_Found THEN
441: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': NO DATA FOUND' );
442: WHEN OTHERS THEN
443: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
444: IF (PO_LOG.d_exc) THEN
445: PO_LOG.proc_end(d_module||': '|| SQLERRM );

Line 443: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );

439: EXCEPTION
440: WHEN No_Data_Found THEN
441: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': NO DATA FOUND' );
442: WHEN OTHERS THEN
443: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
444: IF (PO_LOG.d_exc) THEN
445: PO_LOG.proc_end(d_module||': '|| SQLERRM );
446: PO_LOG.proc_end(d_module);
447: END IF;

Line 517: fnd_msg_pub.ADD;

513: IF p_location IS NULL then
514: x_msg_data := 'Location cannot be null for ' || l_AddTypeDispField;
515: fnd_message.set_name(d_appln_short_name,'PO_LOCATION_NOT_NULL') ;
516: fnd_message.set_token('ADDTYPE',l_AddTypeDispField);
517: fnd_msg_pub.ADD;
518: END IF;
519:
520: IF p_contact_id IS NULL then
521: x_msg_data := 'Contact cannot be null for ' || l_AddTypeDispField;

Line 524: fnd_msg_pub.ADD;

520: IF p_contact_id IS NULL then
521: x_msg_data := 'Contact cannot be null for ' || l_AddTypeDispField;
522: fnd_message.set_name(d_appln_short_name,'PO_CONTACT_NOT_NULL') ;
523: fnd_message.set_token('ADDTYPE',l_AddTypeDispField);
524: fnd_msg_pub.ADD;
525: END IF;
526: END IF ;
527:
528: IF (PO_LOG.d_proc) THEN

Line 540: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
537: x_errorcode := '-2';
538: x_msg_count := '1';
539: x_msg_data := 'Exception in pr_addresses_XSC';
540: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
541: END pr_addresses_XSC;
542:
543: PROCEDURE po_addresses_XSC
544: (

Line 608: fnd_msg_pub.ADD;

604: x_msg_data := 'Location cannot be null for ' || l_AddTypeDispField;
605:
606: fnd_message.set_name(d_appln_short_name,'PO_LOCATION_NOT_NULL') ;
607: fnd_message.set_token('ADDTYPE',l_AddTypeDispField);
608: fnd_msg_pub.ADD;
609: END IF ;
610:
611: IF (PO_LOG.d_proc) THEN
612: PO_LOG.proc_end(d_module);

Line 623: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

619: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
620: x_errorcode := '-2';
621: x_msg_count := '1';
622: x_msg_data := 'Exception in addresses_XSC';
623: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
624: END po_addresses_XSC;
625:
626:
627: PROCEDURE pr_addresses_XPD

Line 703: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

699: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
700: x_errorcode := '-2';
701: x_msg_count := '1';
702: x_msg_data := 'Exception in addresses_XPD';
703: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
704: IF (PO_LOG.d_exc) THEN
705: PO_LOG.proc_end(d_module,'x_msg_data' , x_msg_data ||': '|| SQLERRM );
706: PO_LOG.proc_end(d_module);
707: END IF;

Line 803: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

799: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
800: x_errorcode := '-2';
801: x_msg_count := '1';
802: x_msg_data := 'Exception in addresses_XPD';
803: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
804: IF (PO_LOG.d_exc) THEN
805: PO_LOG.proc_end(d_module,'x_msg_data' , x_msg_data ||': '|| SQLERRM );
806: PO_LOG.proc_end(d_module);
807: END IF;

Line 1016: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

1012: x_errorcode := '-2';
1013: x_msg_count := '1';
1014: x_msg_data := 'Exception in addresses_XLE';
1015:
1016: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
1017: IF (PO_LOG.d_exc) THEN
1018: PO_LOG.proc_end(d_module,'x_msg_data' , x_msg_data ||': '|| SQLERRM );
1019: PO_LOG.proc_end(d_module);
1020: END IF;

Line 1069: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );

1065: x_errorcode := '-2';
1066: x_msg_count := '1';
1067: x_msg_data := 'Exception in bu_pri_prj_inf_XLE : '|| SQLERRM;
1068:
1069: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );
1070: IF (PO_LOG.d_exc) THEN
1071: PO_LOG.proc_end(d_module,'x_msg_data' , x_msg_data );
1072: PO_LOG.proc_end(d_module);
1073: END IF;

Line 1118: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );

1114: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1115: x_errorcode := '-2';
1116: x_msg_count := '1';
1117: x_msg_data := 'Exception in bu_pri_prj_inf_XPD : '|| SQLERRM ;
1118: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );
1119: END pr_bu_pri_prj_inf_XPD;
1120:
1121: PROCEDURE po_bu_pri_prj_inf_XPD
1122: (

Line 1154: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );

1150: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1151: x_errorcode := '-2';
1152: x_msg_count := '1';
1153: x_msg_data := 'Exception in bu_pri_prj_inf_XPD : '|| SQLERRM ;
1154: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );
1155: END po_bu_pri_prj_inf_XPD;
1156:
1157: PROCEDURE fed_cust_desg_XLE
1158: (

Line 1192: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );

1188: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1189: x_errorcode := '-2';
1190: x_msg_count := '1';
1191: x_msg_data := 'Exception in fed_cust_desg_XLE : '|| SQLERRM ;
1192: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );
1193: END fed_cust_desg_XLE;
1194:
1195: PROCEDURE po_fed_cust_desg_XPD
1196: (

Line 1232: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );

1228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1229: x_errorcode := '-2';
1230: x_msg_count := '1';
1231: x_msg_data := 'Exception in po_fed_cust_desg_XPD: '|| SQLERRM ;
1232: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );
1233: END po_fed_cust_desg_XPD;
1234:
1235: PROCEDURE add_item_info_XD
1236: (

Line 1286: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );

1282: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1283: x_errorcode := '-2';
1284: x_msg_count := '1';
1285: x_msg_data := 'Exception in add_item_info_XD';
1286: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );
1287:
1288: END add_item_info_XD;
1289:
1290:

Line 1328: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );

1324: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1325: x_errorcode := '-2';
1326: x_msg_count := '1';
1327: x_msg_data := 'Exception in add_item_info_XLE';
1328: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );
1329: END add_item_info_XLE;
1330:
1331:
1332: PROCEDURE ship_info_XD

Line 1441: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': NO DATA FOUND' );

1437:
1438: END IF;
1439: EXCEPTION
1440: WHEN No_Data_Found THEN
1441: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': NO DATA FOUND' );
1442: WHEN OTHERS THEN
1443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1444: x_errorcode := '-2';
1445: x_msg_count := '1';

Line 1447: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );

1443: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1444: x_errorcode := '-2';
1445: x_msg_count := '1';
1446: x_msg_data := 'Exception in ship_info_XD';
1447: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );
1448: END ship_info_XD;
1449:
1450: PROCEDURE ship_info_XLE
1451: (

Line 1561: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': NO DATA FOUND' );

1557: x_msg_data := 'SUCCESS';
1558:
1559: EXCEPTION
1560: WHEN No_Data_Found THEN
1561: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': NO DATA FOUND' );
1562: p_hidd_ship_addr := NULL ;
1563: p_hiddenCountry := NULL ;
1564: p_hiddenZipCode := NULL ;
1565: x_ship_to_addr := NULL ;

Line 1572: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );

1568: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1569: x_errorcode := '-2';
1570: x_msg_count := '1';
1571: x_msg_data := 'Exception in ship_info_XLE';
1572: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );
1573:
1574: END ship_info_XLE;
1575:
1576: PROCEDURE pr_sourcing_info_req_XPD

Line 1607: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );

1603: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1604: x_errorcode := '-2';
1605: x_msg_count := '1';
1606: x_msg_data := 'Exception in sourcing_info_req_XPD';
1607: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );
1608: END pr_sourcing_info_req_XPD;
1609:
1610:
1611:

Line 1672: fnd_msg_pub.ADD;

1668: x_errorcode := '-1';
1669: l_msg_count := l_msg_count + 1;
1670: x_msg_data := 'The set aside percentage does not apply on an unrestricted action.';
1671: fnd_message.set_name(d_appln_short_name, 'PO_NO_PER_UNRES_ACTION');
1672: fnd_msg_pub.ADD;
1673: END IF ;
1674: IF p_set_aside_stat = 'SET_ASIDE' AND To_Number(Nvl(p_set_aside_perc,0)) <= 0 THEN
1675: x_return_status := FND_API.G_RET_STS_ERROR;
1676: x_errorcode := '-1';

Line 1680: fnd_msg_pub.ADD;

1676: x_errorcode := '-1';
1677: l_msg_count := l_msg_count + 1;
1678: x_msg_data := 'The Set Aside Percentage must contain a value greater than 0, when the Set Aside Status is ''Set Aside''.';
1679: fnd_message.set_name(d_appln_short_name, 'PO_SET_ASIDE_PER_POSITIVE');
1680: fnd_msg_pub.ADD;
1681: END IF;
1682: IF p_set_aside_stat = 'SET_ASIDE' AND p_set_aside_type IS null THEN
1683: x_return_status := FND_API.G_RET_STS_ERROR;
1684: x_errorcode := '-1';

Line 1688: fnd_msg_pub.ADD;

1684: x_errorcode := '-1';
1685: l_msg_count := l_msg_count + 1;
1686: x_msg_data := 'When the Set Aside Status is ''Set Aside'', you must select a value for the set aside type.';
1687: fnd_message.set_name(d_appln_short_name,'PO_SET_ASIDE_SELECT_TYPE');
1688: fnd_msg_pub.ADD;
1689: END IF;
1690:
1691: --Bug 13491410
1692: --, this validation should be carried on only for Base

Line 1701: fnd_msg_pub.ADD;

1697: x_errorcode := '-1';
1698: l_msg_count := l_msg_count + 1;
1699: x_msg_data := 'The value ''Small Business'' for Set-Aside is not valid for new Awards/ IDVs.';
1700: fnd_message.set_name(d_appln_short_name,'PO_SMALL_BUSNS_INVALID');
1701: fnd_msg_pub.ADD;
1702: END IF;
1703:
1704: IF p_set_aside_stat = 'SET_ASIDE' AND p_naics IS null THEN
1705: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1710: fnd_msg_pub.ADD;

1706: x_errorcode := '-1';
1707: l_msg_count := l_msg_count + 1;
1708: x_msg_data := 'When the Set Aside Status is ''Set Aside'' you must select a value for the NAICS ';
1709: fnd_message.set_name(d_appln_short_name, 'PO_SET_ASIDE_NAICS');
1710: fnd_msg_pub.ADD;
1711: END IF;
1712: IF p_set_aside_stat = 'UNRESTRICTED' AND p_size_stand IS NOT null THEN
1713: x_return_status := FND_API.G_RET_STS_ERROR;
1714: x_errorcode := '-1';

Line 1718: fnd_msg_pub.ADD;

1714: x_errorcode := '-1';
1715: l_msg_count := l_msg_count + 1;
1716: x_msg_data := 'The size standard does not apply on an unrestricted action.';
1717: fnd_message.set_name(d_appln_short_name, 'PO_NO_SIZE_UNRES_ACTION');
1718: fnd_msg_pub.ADD;
1719: END IF;
1720: IF p_set_aside_stat = 'UNRESTRICTED' AND p_naics IS NOT null THEN
1721: x_return_status := FND_API.G_RET_STS_ERROR;
1722: x_errorcode := '-1';

Line 1726: fnd_msg_pub.ADD;

1722: x_errorcode := '-1';
1723: l_msg_count := l_msg_count + 1;
1724: x_msg_data := 'The NAICS designation does not apply on an unrestricted action.';
1725: fnd_message.set_name(d_appln_short_name, 'PO_NO_NAICS_UNRES_ACTION');
1726: fnd_msg_pub.ADD;
1727: END IF;
1728: IF p_set_aside_stat = 'UNRESTRICTED' AND p_set_aside_type IS NOT null THEN
1729: x_return_status := FND_API.G_RET_STS_ERROR;
1730: x_errorcode := '-1';

Line 1734: fnd_msg_pub.ADD;

1730: x_errorcode := '-1';
1731: l_msg_count := l_msg_count + 1;
1732: x_msg_data := 'The set aside type does not apply on an unrestricted action.';
1733: fnd_message.set_name(d_appln_short_name, 'PO_NO_ASIDETYPE_UNRES_ACTION');
1734: fnd_msg_pub.ADD;
1735: END IF;
1736:
1737: IF l_msg_count > 0 THEN
1738: x_msg_count := l_msg_count;

Line 1746: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );

1742: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1743: x_errorcode := '-2';
1744: x_msg_count := '1';
1745: x_msg_data := 'Exception in competitive_info_XV';
1746: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );
1747: END competitive_info_XV;
1748:
1749:
1750: PROCEDURE competitive_info_XLE

Line 1811: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );

1807: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1808: x_errorcode := '-2';
1809: x_msg_count := '1';
1810: x_msg_data := 'Exception in competitive_info_XLE';
1811: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );
1812: END competitive_info_XLE;
1813:
1814: FUNCTION get_supplier_contact_details(p_contact_id IN NUMBER, p_supplier_site_id IN NUMBER) RETURN VARCHAR2 IS
1815:

Line 1887: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );

1883: RETURN(p_hidd_contact_xml);
1884:
1885: EXCEPTION
1886: WHEN No_Data_Found THEN
1887: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
1888: WHEN OTHERS THEN
1889: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
1890:
1891: END get_supplier_contact_details;

Line 1889: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );

1885: EXCEPTION
1886: WHEN No_Data_Found THEN
1887: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
1888: WHEN OTHERS THEN
1889: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
1890:
1891: END get_supplier_contact_details;
1892:
1893: FUNCTION get_supplier_addr_details(p_supplier_site_id IN NUMBER) RETURN VARCHAR2 IS

Line 2042: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );

2038: RETURN(p_hidd_addr_xml);
2039:
2040: EXCEPTION
2041: WHEN No_Data_Found THEN
2042: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
2043: WHEN OTHERS THEN
2044: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
2045:
2046: END get_supplier_addr_details;

Line 2044: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );

2040: EXCEPTION
2041: WHEN No_Data_Found THEN
2042: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
2043: WHEN OTHERS THEN
2044: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
2045:
2046: END get_supplier_addr_details;
2047:
2048: PROCEDURE supplier_details_XD

Line 2256: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );

2252: EXCEPTION
2253: WHEN No_Data_Found THEN
2254: d_progress := 90;
2255: WHEN OTHERS THEN
2256: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
2257: d_progress := 95;
2258: END ;
2259: END ;
2260:

Line 2271: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );

2267: EXCEPTION
2268: WHEN No_Data_Found THEN
2269: d_progress := 90;
2270: WHEN OTHERS THEN
2271: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
2272: d_progress := 95;
2273: END ;
2274:
2275: l_ccr_reg_idictr := pos_util_pkg.IS_SITE_CCR(1.0,NULL,x_supplier_site_id);

Line 2336: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );

2332: WHEN No_Data_Found THEN
2333: d_progress := 120;
2334: WHEN OTHERS THEN
2335: d_progress := 125;
2336: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
2337: END;
2338: BEGIN
2339: IF p_ccr_reg_idictr ='T' THEN
2340: SELECT Taxpayer_id

Line 2358: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );

2354: EXCEPTION
2355: WHEN No_Data_Found THEN
2356: d_progress := 140;
2357: WHEN OTHERS THEN
2358: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
2359: END ;
2360: END IF;
2361: END IF ;
2362:

Line 2388: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );

2384: WHEN No_Data_Found THEN
2385: d_progress := 40;
2386: WHEN OTHERS THEN
2387: d_progress := 45;
2388: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
2389: END;
2390:
2391: p_phone_num := l_phone_num;
2392: p_email := l_email;

Line 2399: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );

2395:
2396: d_progress := 150;
2397: EXCEPTION
2398: WHEN OTHERS THEN
2399: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
2400:
2401:
2402: END supplier_details_XD;
2403:

Line 2449: fnd_msg_pub.ADD;

2445: x_errorcode := '-1';
2446: l_msg_count := l_msg_count + 1;
2447: x_msg_data := 'A CCR Exception Reason must be entered when the Vendor is not registered within CCR.';
2448: fnd_message.set_name(d_appln_short_name, 'PO_VEN_NOT_REG_CCR_EXC_REASON');
2449: fnd_msg_pub.ADD;
2450: END IF ;
2451: -- rather than checking for 'Inactive' status, we must check for 'Expired' status.
2452: IF p_ccr_reg_status ='Expired' AND p_ccr_exp_reason IS NULL THEN
2453: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2458: fnd_msg_pub.ADD ;

2454: x_errorcode := '-1';
2455: l_msg_count := l_msg_count + 1;
2456: x_msg_data := 'A CCR Exception Reason must be provided when the vendors CCR registration has expired.';
2457: fnd_message.set_name(d_appln_short_name, 'PO_REG_EXP_CCR_EXC_REASON');
2458: fnd_msg_pub.ADD ;
2459: END IF ;
2460: IF p_eft_indctr = 'N' AND p_eft_exc_resn IS NULL THEN
2461: x_return_status := FND_API.G_RET_STS_ERROR;
2462: x_errorcode := '-1';

Line 2466: fnd_msg_pub.ADD ;

2462: x_errorcode := '-1';
2463: l_msg_count := l_msg_count + 1;
2464: x_msg_data := 'When EFT does not apply, an EFT exclusion reason must be selected.';
2465: fnd_message.set_name(d_appln_short_name, 'PO_NO_EFT_REASON_SELECTED');
2466: fnd_msg_pub.ADD ;
2467: END IF ;
2468:
2469: IF l_msg_count > 0 THEN
2470: x_msg_count := l_msg_count;

Line 2479: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

2475: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2476: x_errorcode := '-2';
2477: x_msg_count := '1';
2478: x_msg_data := 'Exception in addresses_XSC';
2479: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
2480:
2481: END supplier_details_XSC;
2482:
2483:

Line 2566: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

2562: EXCEPTION
2563: WHEN No_Data_Found THEN
2564: p_addrs_dtls := NULL ;
2565: WHEN OTHERS THEN
2566: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
2567: END ;
2568:
2569: BEGIN
2570:

Line 2577: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

2573: EXCEPTION
2574: WHEN No_Data_Found THEN
2575: p_addrs_dtls := NULL ;
2576: WHEN OTHERS THEN
2577: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
2578:
2579: END ;
2580:
2581: ELSE

Line 2594: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

2590: EXCEPTION
2591: WHEN No_Data_Found THEN
2592: p_orig_splr_name := NULL;
2593: WHEN OTHERS THEN
2594: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
2595: END ;
2596:
2597: x_return_status := FND_API.G_RET_STS_SUCCESS;
2598: x_errorcode := '0';

Line 2608: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

2604: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2605: x_errorcode := '-2';
2606: x_msg_count := '1';
2607: x_msg_data := 'Exception in supplier_details_XLE';
2608: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
2609:
2610:
2611: IF (PO_LOG.d_exc) THEN
2612: PO_LOG.proc_end(d_module,'x_msg_data' , x_msg_data ||': '|| SQLERRM );

Line 2740: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

2736: EXCEPTION
2737: WHEN No_Data_Found THEN
2738: NULL ;
2739: WHEN OTHERS THEN
2740: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
2741: END ;
2742:
2743: BEGIN
2744:

Line 2787: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

2783: EXCEPTION
2784: WHEN No_Data_Found THEN
2785: p_addrs_dtls := NULL ;
2786: WHEN OTHERS THEN
2787: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
2788:
2789: END ;
2790:
2791: BEGIN

Line 2840: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

2836: EXCEPTION
2837: WHEN No_Data_Found THEN
2838: NULL ;
2839: WHEN OTHERS THEN
2840: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
2841:
2842: END ;
2843: l_ccr_reg_idictr := pos_util_pkg.IS_SITE_CCR(1.0,NULL,l_supplier_site_id);
2844: IF l_ccr_reg_idictr = 'T' THEN

Line 2915: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

2911: EXCEPTION
2912: WHEN No_Data_Found THEN
2913: NULL;
2914: WHEN OTHERS THEN
2915: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
2916: END;
2917:
2918: BEGIN
2919: IF p_ccr_reg_idictr ='T' THEN

Line 2935: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

2931: EXCEPTION
2932: WHEN No_Data_Found THEN
2933: NULL;
2934: WHEN OTHERS THEN
2935: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
2936: END ;
2937:
2938: x_return_status := FND_API.G_RET_STS_SUCCESS;
2939: x_errorcode := '0';

Line 2949: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

2945: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2946: x_errorcode := '-2';
2947: x_msg_count := '1';
2948: x_msg_data := 'Exception in supplier_details_XRD';
2949: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
2950:
2951: IF (PO_LOG.d_exc) THEN
2952: PO_LOG.proc_end(d_module,'x_msg_data' , x_msg_data ||': '|| SQLERRM );
2953: PO_LOG.proc_end(d_module);

Line 3390: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

3386: x_errorcode := '-2';
3387: x_msg_count := '1';
3388: x_msg_data := 'Exception in addresses_XLE';
3389:
3390: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
3391: IF (PO_LOG.d_exc) THEN
3392: PO_LOG.proc_end(d_module,'x_msg_data' , x_msg_data ||': '|| SQLERRM );
3393: PO_LOG.proc_end(d_module);
3394: END IF;

Line 3528: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': NO DATA FOUND' );

3524:
3525: EXCEPTION
3526:
3527: WHEN No_Data_Found THEN
3528: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': NO DATA FOUND' );
3529:
3530: WHEN OTHERS THEN
3531: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
3532: IF (PO_LOG.d_exc) THEN

Line 3531: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );

3527: WHEN No_Data_Found THEN
3528: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': NO DATA FOUND' );
3529:
3530: WHEN OTHERS THEN
3531: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name ||': '|| SQLERRM );
3532: IF (PO_LOG.d_exc) THEN
3533: PO_LOG.proc_end(d_module||': '|| SQLERRM );
3534: PO_LOG.proc_end(d_module);
3535: END IF;

Line 3615: fnd_msg_pub.ADD;

3611: l_msg_count := l_msg_count + 1;
3612: x_msg_count := to_char( l_msg_count) ;
3613: x_msg_data := 'Enter a value for Amount if you have selected a value in Funds Information.' ;
3614: fnd_message.set_name(d_appln_short_name,'ICX_AMOUNT_NOT_NULL') ;
3615: fnd_msg_pub.ADD;
3616:
3617: END IF;
3618:
3619: IF (p_acceptance_status = 'CHANGE' OR p_acceptance_status = 'REJECT') AND p_remarks IS NULL THEN

Line 3626: fnd_msg_pub.ADD;

3622: l_msg_count := l_msg_count + 1;
3623: x_msg_count := to_char( l_msg_count) ;
3624: x_msg_data := 'Enter the remarks if MIPR Acceptance Status is Rejected with changes. ' ;
3625: fnd_message.set_name(d_appln_short_name,'ICX_REMARKS_NOT_NULL') ;
3626: fnd_msg_pub.ADD;
3627:
3628: END IF;
3629:
3630: IF p_obligation_type = 'BOTH' THEN

Line 3642: fnd_msg_pub.ADD;

3638: l_msg_count := l_msg_count + 1;
3639: x_msg_count := to_char( l_msg_count) ;
3640: x_msg_data := 'You have entered MIPR Obligation Type as Both. Please specify Obligation Type for each Line in Lines page.' ;
3641: fnd_message.set_name(d_appln_short_name,'ICX_MIPR_OBLI_NULL_AT_LINES') ;
3642: fnd_msg_pub.ADD;
3643: END IF;
3644: END IF;
3645:
3646: select nvl(clm_mipr_type, 'NONE') into l_mipr_type

Line 3658: fnd_msg_pub.ADD;

3654: l_msg_count := l_msg_count + 1;
3655: x_msg_count := to_char( l_msg_count) ;
3656: x_msg_data := 'MIPR Acceptance Status cannot be Blank' ;
3657: fnd_message.set_name(d_appln_short_name,'ICX_MIPR_ACC_NOT_NULL') ;
3658: fnd_msg_pub.ADD;
3659:
3660: END IF;
3661:
3662: IF p_obligation_type IS NULL THEN

Line 3669: fnd_msg_pub.ADD;

3665: l_msg_count := l_msg_count + 1;
3666: x_msg_count := to_char( l_msg_count) ;
3667: x_msg_data := 'MIPR Obligation Type cannot be Blank' ;
3668: fnd_message.set_name(d_appln_short_name,'ICX_MIPR_OBLI_NOT_NULL') ;
3669: fnd_msg_pub.ADD;
3670:
3671: END IF;
3672:
3673: IF p_auth_officer IS NULL THEN

Line 3680: fnd_msg_pub.ADD;

3676: l_msg_count := l_msg_count + 1;
3677: x_msg_count := to_char( l_msg_count) ;
3678: x_msg_data := 'MIPR Authorizing Officer cannot be Blank' ;
3679: fnd_message.set_name(d_appln_short_name,'ICX_MIPR_AUTH_NOT_NULL') ;
3680: fnd_msg_pub.ADD;
3681:
3682: END IF;
3683: END IF;
3684:

Line 3697: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );

3693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3694: x_errorcode := '-2';
3695: x_msg_count := '1';
3696: x_msg_data := 'Exception in pr_mipr_acc_info_xsc';
3697: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data||': '||SQLERRM );
3698:
3699: END pr_mipr_acc_info_xsc;
3700:
3701: PROCEDURE closeout_XD

Line 3786: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );

3782: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3783: x_errorcode := '-2';
3784: x_msg_count := '1';
3785: x_msg_data := 'Exception in closeout_XD';
3786: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );
3787: END closeout_XD;
3788:
3789:
3790: -- : Addind a new procedure

Line 3834: fnd_msg_pub.ADD;

3830: x_errorcode := '-1';
3831: l_msg_count := l_msg_count + 1;
3832: x_msg_data := 'The set aside percentage does not apply on an unrestricted action.';
3833: fnd_message.set_name(d_appln_short_name, 'PO_NO_PER_UNRES_ACTION');
3834: fnd_msg_pub.ADD;
3835: END IF ;
3836: IF p_set_aside_stat = 'SET_ASIDE' AND To_Number(Nvl(p_set_aside_perc,0)) <= 0 THEN
3837: x_return_status := FND_API.G_RET_STS_ERROR;
3838: x_errorcode := '-1';

Line 3842: fnd_msg_pub.ADD;

3838: x_errorcode := '-1';
3839: l_msg_count := l_msg_count + 1;
3840: x_msg_data := 'The Set Aside Percentage must contain a value greater than 0, when the Set Aside Status is ''Set Aside''.';
3841: fnd_message.set_name(d_appln_short_name, 'PO_SET_ASIDE_PER_POSITIVE');
3842: fnd_msg_pub.ADD;
3843: END IF;
3844: IF p_set_aside_stat = 'SET_ASIDE' AND p_set_aside_type IS null THEN
3845: x_return_status := FND_API.G_RET_STS_ERROR;
3846: x_errorcode := '-1';

Line 3850: fnd_msg_pub.ADD;

3846: x_errorcode := '-1';
3847: l_msg_count := l_msg_count + 1;
3848: x_msg_data := 'When the Set Aside Status is ''Set Aside'', you must select a value for the set aside type.';
3849: fnd_message.set_name(d_appln_short_name,'PO_SET_ASIDE_SELECT_TYPE');
3850: fnd_msg_pub.ADD;
3851: END IF;
3852:
3853:
3854: --this validation should be carried on only for Base Documents/Sols, since it is a read only field in Mods/Amendmenst

Line 3861: fnd_msg_pub.ADD;

3857: x_errorcode := '-1';
3858: l_msg_count := l_msg_count + 1;
3859: x_msg_data := 'The value ''Small Business'' for Set-Aside is not valid for new Awards/ IDVs.';
3860: fnd_message.set_name(d_appln_short_name,'PO_SMALL_BUSNS_INVALID');
3861: fnd_msg_pub.ADD;
3862: END IF;
3863:
3864: IF p_set_aside_stat = 'SET_ASIDE' AND p_naics IS null THEN
3865: x_return_status := FND_API.G_RET_STS_ERROR;

Line 3870: fnd_msg_pub.ADD;

3866: x_errorcode := '-1';
3867: l_msg_count := l_msg_count + 1;
3868: x_msg_data := 'When the Set Aside Status is ''Set Aside'' you must select a value for the NAICS ';
3869: fnd_message.set_name(d_appln_short_name, 'PO_SET_ASIDE_NAICS');
3870: fnd_msg_pub.ADD;
3871: END IF;
3872: IF p_set_aside_stat = 'UNRESTRICTED' AND p_size_stand IS NOT null THEN
3873: x_return_status := FND_API.G_RET_STS_ERROR;
3874: x_errorcode := '-1';

Line 3878: fnd_msg_pub.ADD;

3874: x_errorcode := '-1';
3875: l_msg_count := l_msg_count + 1;
3876: x_msg_data := 'The size standard does not apply on an unrestricted action.';
3877: fnd_message.set_name(d_appln_short_name, 'PO_NO_SIZE_UNRES_ACTION');
3878: fnd_msg_pub.ADD;
3879: END IF;
3880: IF p_set_aside_stat = 'UNRESTRICTED' AND p_naics IS NOT null THEN
3881: x_return_status := FND_API.G_RET_STS_ERROR;
3882: x_errorcode := '-1';

Line 3886: fnd_msg_pub.ADD;

3882: x_errorcode := '-1';
3883: l_msg_count := l_msg_count + 1;
3884: x_msg_data := 'The NAICS designation does not apply on an unrestricted action.';
3885: fnd_message.set_name(d_appln_short_name, 'PO_NO_NAICS_UNRES_ACTION');
3886: fnd_msg_pub.ADD;
3887: END IF;
3888: IF p_set_aside_stat = 'UNRESTRICTED' AND p_set_aside_type IS NOT null THEN
3889: x_return_status := FND_API.G_RET_STS_ERROR;
3890: x_errorcode := '-1';

Line 3894: fnd_msg_pub.ADD;

3890: x_errorcode := '-1';
3891: l_msg_count := l_msg_count + 1;
3892: x_msg_data := 'The set aside type does not apply on an unrestricted action.';
3893: fnd_message.set_name(d_appln_short_name, 'PO_NO_ASIDETYPE_UNRES_ACTION');
3894: fnd_msg_pub.ADD;
3895: END IF;
3896:
3897: IF l_msg_count > 0 THEN
3898: x_msg_count := l_msg_count;

Line 3906: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );

3902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3903: x_errorcode := '-2';
3904: x_msg_count := '1';
3905: x_msg_data := 'Exception in pon_competitive_info_XV';
3906: fnd_msg_pub.Add_Exc_Msg ( d_pkg_name, d_proc_name, x_msg_data );
3907: END pon_competitive_info_XV;
3908:
3909: END po_fed_field_functions;