215: END IF;
216:
217: -- Initialize message list if p_init_msg_list is set to TRUE.
218: IF fnd_api.to_boolean(p_init_msg_list) THEN
219: fnd_msg_pub.initialize;
220: END IF;
221:
222: -- Initialize API return status to success
223: x_return_status := fnd_api.g_ret_sts_success;
383: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
384: l_msg_index := 1;
385: l_msg_count := x_msg_count;
386: WHILE l_msg_count > 0 LOOP
387: x_msg_data := FND_MSG_PUB.GET
388: ( l_msg_index,
389: FND_API.G_FALSE );
390: -- csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Post API ');
391: -- csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
410: COMMIT WORK;
411: END IF;
412:
413: -- Standard call to get message count and if count is 1, get message info.
414: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
415: EXCEPTION
416: WHEN fnd_api.g_exc_error THEN
417: ROLLBACK TO insert_row;
418: x_return_status := fnd_api.g_ret_sts_error;
415: EXCEPTION
416: WHEN fnd_api.g_exc_error THEN
417: ROLLBACK TO insert_row;
418: x_return_status := fnd_api.g_ret_sts_error;
419: /*fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);*/
420: WHEN fnd_api.g_exc_unexpected_error THEN
421: ROLLBACK TO insert_row;
422: x_return_status := fnd_api.g_ret_sts_unexp_error;
423: /*fnd_msg_pub.count_and_get(
419: /*fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);*/
420: WHEN fnd_api.g_exc_unexpected_error THEN
421: ROLLBACK TO insert_row;
422: x_return_status := fnd_api.g_ret_sts_unexp_error;
423: /*fnd_msg_pub.count_and_get(
424: p_count => x_msg_count
425: ,p_data => x_msg_data);*/
426: WHEN OTHERS THEN
427: ROLLBACK TO insert_row;
426: WHEN OTHERS THEN
427: ROLLBACK TO insert_row;
428: x_return_status := fnd_api.g_ret_sts_unexp_error;
429:
430: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
431: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
432: END IF;
433:
434: /*fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data); */
427: ROLLBACK TO insert_row;
428: x_return_status := fnd_api.g_ret_sts_unexp_error;
429:
430: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
431: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
432: END IF;
433:
434: /*fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data); */
435:
430: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
431: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
432: END IF;
433:
434: /*fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data); */
435:
436:
437: end insert_row;
438:
541: END IF;
542:
543: -- Initialize message list if p_init_msg_list is set to TRUE.
544: IF fnd_api.to_boolean(p_init_msg_list) THEN
545: fnd_msg_pub.initialize;
546: END IF;
547:
548: -- Initialize API return status to success
549: x_return_status := fnd_api.g_ret_sts_success;
739: where instance_id = p_instance_id;
740:
741: if (l_old_location_type_code = 'INVENTORY') then
742: FND_MESSAGE.SET_NAME('EAM', 'EAM_INVALID_LOCATION_UPDATE');
743: FND_MSG_PUB.Add;
744: RAISE FND_API.G_EXC_ERROR;
745: end if;
746: end if;
747: end if;
772: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
773: l_msg_index := 1;
774: l_msg_count := x_msg_count;
775: WHILE l_msg_count > 0 LOOP
776: x_msg_data := FND_MSG_PUB.GET
777: ( l_msg_index,
778: FND_API.G_FALSE );
779: -- csi_gen_utility_pvt.put_line('ERROR FROM CSI_ITEM_INSTANCE_CUHK.Create_Item_Instance_Post API ');
780: -- csi_gen_utility_pvt.put_line('MESSAGE DATA = '||x_msg_data);
797: COMMIT WORK;
798: END IF;
799:
800: -- Standard call to get message count and if count is 1, get message info.
801: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
802: EXCEPTION
803: WHEN fnd_api.g_exc_error THEN
804: ROLLBACK TO update_row;
805: x_return_status := fnd_api.g_ret_sts_error;
802: EXCEPTION
803: WHEN fnd_api.g_exc_error THEN
804: ROLLBACK TO update_row;
805: x_return_status := fnd_api.g_ret_sts_error;
806: /*fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);*/
807: WHEN fnd_api.g_exc_unexpected_error THEN
808: ROLLBACK TO update_row;
809: x_return_status := fnd_api.g_ret_sts_unexp_error;
810: /*fnd_msg_pub.count_and_get(
806: /*fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);*/
807: WHEN fnd_api.g_exc_unexpected_error THEN
808: ROLLBACK TO update_row;
809: x_return_status := fnd_api.g_ret_sts_unexp_error;
810: /*fnd_msg_pub.count_and_get(
811: p_count => x_msg_count
812: ,p_data => x_msg_data);*/
813: WHEN OTHERS THEN
814: ROLLBACK TO update_row;
813: WHEN OTHERS THEN
814: ROLLBACK TO update_row;
815: x_return_status := fnd_api.g_ret_sts_unexp_error;
816:
817: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
818: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
819: END IF;
820:
821: /*fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data); */
814: ROLLBACK TO update_row;
815: x_return_status := fnd_api.g_ret_sts_unexp_error;
816:
817: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
818: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
819: END IF;
820:
821: /*fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data); */
822:
817: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
818: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
819: END IF;
820:
821: /*fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data); */
822:
823: end update_row;
824:
825: PROCEDURE LOCK_ROW(
1156: END IF;
1157:
1158: -- Initialize message list if p_init_msg_list is set to TRUE.
1159: IF fnd_api.to_boolean(p_init_msg_list) THEN
1160: fnd_msg_pub.initialize;
1161: END IF;
1162:
1163: -- Initialize API return status to success
1164: x_return_status := fnd_api.g_ret_sts_success;
1284: COMMIT WORK;
1285: END IF;
1286:
1287: -- Standard call to get message count and if count is 1, get message info.
1288: fnd_msg_pub.count_and_get(
1289: p_count => x_msg_count
1290: ,p_data => x_msg_data);
1291:
1292:
1293: EXCEPTION
1294: WHEN fnd_api.g_exc_error THEN
1295: ROLLBACK TO create_asset;
1296: x_return_status := fnd_api.g_ret_sts_error;
1297: /*fnd_msg_pub.count_and_get(
1298: p_count => x_msg_count
1299: ,p_data => x_msg_data);*/
1300: WHEN fnd_api.g_exc_unexpected_error THEN
1301: ROLLBACK TO create_asset;
1299: ,p_data => x_msg_data);*/
1300: WHEN fnd_api.g_exc_unexpected_error THEN
1301: ROLLBACK TO create_asset;
1302: x_return_status := fnd_api.g_ret_sts_unexp_error;
1303: /*fnd_msg_pub.count_and_get(
1304: p_count => x_msg_count
1305: ,p_data => x_msg_data);*/
1306: WHEN OTHERS THEN
1307: ROLLBACK TO create_asset;
1306: WHEN OTHERS THEN
1307: ROLLBACK TO create_asset;
1308: x_return_status := fnd_api.g_ret_sts_unexp_error;
1309:
1310: IF fnd_msg_pub.check_msg_level(
1311: fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1312: fnd_msg_pub.add_exc_msg(G_PKG_NAME, l_api_name);
1313: END IF;
1314:
1307: ROLLBACK TO create_asset;
1308: x_return_status := fnd_api.g_ret_sts_unexp_error;
1309:
1310: IF fnd_msg_pub.check_msg_level(
1311: fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1312: fnd_msg_pub.add_exc_msg(G_PKG_NAME, l_api_name);
1313: END IF;
1314:
1315: /*fnd_msg_pub.count_and_get(
1308: x_return_status := fnd_api.g_ret_sts_unexp_error;
1309:
1310: IF fnd_msg_pub.check_msg_level(
1311: fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1312: fnd_msg_pub.add_exc_msg(G_PKG_NAME, l_api_name);
1313: END IF;
1314:
1315: /*fnd_msg_pub.count_and_get(
1316: p_count => x_msg_count
1311: fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1312: fnd_msg_pub.add_exc_msg(G_PKG_NAME, l_api_name);
1313: END IF;
1314:
1315: /*fnd_msg_pub.count_and_get(
1316: p_count => x_msg_count
1317: ,p_data => x_msg_data);*/
1318:
1319: end create_asset;
1419: END IF;
1420:
1421: -- Initialize message list if p_init_msg_list is set to TRUE.
1422: IF fnd_api.to_boolean(p_init_msg_list) THEN
1423: fnd_msg_pub.initialize;
1424: END IF;
1425:
1426: -- Initialize API return status to success
1427: x_return_status := fnd_api.g_ret_sts_success;
1632: END IF;
1633:
1634:
1635: -- Standard call to get message count and if count is 1, get message info.
1636: fnd_msg_pub.count_and_get(
1637: p_count => x_msg_count
1638: ,p_data => x_msg_data);
1639:
1640:
1641: EXCEPTION
1642: WHEN fnd_api.g_exc_error THEN
1643: ROLLBACK TO update_asset;
1644: x_return_status := fnd_api.g_ret_sts_error;
1645: /*fnd_msg_pub.count_and_get(
1646: p_count => x_msg_count
1647: ,p_data => x_msg_data);*/
1648: WHEN fnd_api.g_exc_unexpected_error THEN
1649: ROLLBACK TO update_asset;
1647: ,p_data => x_msg_data);*/
1648: WHEN fnd_api.g_exc_unexpected_error THEN
1649: ROLLBACK TO update_asset;
1650: x_return_status := fnd_api.g_ret_sts_unexp_error;
1651: /*fnd_msg_pub.count_and_get(
1652: p_count => x_msg_count
1653: ,p_data => x_msg_data);*/
1654: WHEN OTHERS THEN
1655: ROLLBACK TO update_asset;
1654: WHEN OTHERS THEN
1655: ROLLBACK TO update_asset;
1656: x_return_status := fnd_api.g_ret_sts_unexp_error;
1657:
1658: IF fnd_msg_pub.check_msg_level(
1659: fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1660: fnd_msg_pub.add_exc_msg(G_PKG_NAME, l_api_name);
1661: END IF;
1662:
1655: ROLLBACK TO update_asset;
1656: x_return_status := fnd_api.g_ret_sts_unexp_error;
1657:
1658: IF fnd_msg_pub.check_msg_level(
1659: fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1660: fnd_msg_pub.add_exc_msg(G_PKG_NAME, l_api_name);
1661: END IF;
1662:
1663: /*fnd_msg_pub.count_and_get(
1656: x_return_status := fnd_api.g_ret_sts_unexp_error;
1657:
1658: IF fnd_msg_pub.check_msg_level(
1659: fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1660: fnd_msg_pub.add_exc_msg(G_PKG_NAME, l_api_name);
1661: END IF;
1662:
1663: /*fnd_msg_pub.count_and_get(
1664: p_count => x_msg_count
1659: fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1660: fnd_msg_pub.add_exc_msg(G_PKG_NAME, l_api_name);
1661: END IF;
1662:
1663: /*fnd_msg_pub.count_and_get(
1664: p_count => x_msg_count
1665: ,p_data => x_msg_data);*/
1666:
1667:
1701: END IF;
1702:
1703: -- Initialize message list if p_init_msg_list is set to TRUE.
1704: IF fnd_api.to_boolean(p_init_msg_list) THEN
1705: fnd_msg_pub.initialize;
1706: END IF;
1707:
1708: -- Initialize API return status to success
1709: x_return_status := fnd_api.g_ret_sts_success;
1756: COMMIT WORK;
1757: END IF;
1758:
1759: -- Standard call to get message count and if count is 1, get message info.
1760: fnd_msg_pub.count_and_get(
1761: p_count => x_msg_count
1762: ,p_data => x_msg_data);
1763:
1764:
1765: EXCEPTION
1766: WHEN fnd_api.g_exc_error THEN
1767: ROLLBACK TO serial_check;
1768: x_return_status := fnd_api.g_ret_sts_error;
1769: fnd_msg_pub.count_and_get(
1770: p_count => x_msg_count
1771: ,p_data => x_msg_data);
1772: WHEN fnd_api.g_exc_unexpected_error THEN
1773: ROLLBACK TO serial_check;
1771: ,p_data => x_msg_data);
1772: WHEN fnd_api.g_exc_unexpected_error THEN
1773: ROLLBACK TO serial_check;
1774: x_return_status := fnd_api.g_ret_sts_unexp_error;
1775: fnd_msg_pub.count_and_get(
1776: p_count => x_msg_count
1777: ,p_data => x_msg_data);
1778: WHEN OTHERS THEN
1779: ROLLBACK TO serial_check;
1778: WHEN OTHERS THEN
1779: ROLLBACK TO serial_check;
1780: x_return_status := fnd_api.g_ret_sts_unexp_error;
1781:
1782: IF fnd_msg_pub.check_msg_level(
1783: fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1784: fnd_msg_pub.add_exc_msg(G_PKG_NAME, l_api_name);
1785: END IF;
1786:
1779: ROLLBACK TO serial_check;
1780: x_return_status := fnd_api.g_ret_sts_unexp_error;
1781:
1782: IF fnd_msg_pub.check_msg_level(
1783: fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1784: fnd_msg_pub.add_exc_msg(G_PKG_NAME, l_api_name);
1785: END IF;
1786:
1787: fnd_msg_pub.count_and_get(
1780: x_return_status := fnd_api.g_ret_sts_unexp_error;
1781:
1782: IF fnd_msg_pub.check_msg_level(
1783: fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1784: fnd_msg_pub.add_exc_msg(G_PKG_NAME, l_api_name);
1785: END IF;
1786:
1787: fnd_msg_pub.count_and_get(
1788: p_count => x_msg_count
1783: fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1784: fnd_msg_pub.add_exc_msg(G_PKG_NAME, l_api_name);
1785: END IF;
1786:
1787: fnd_msg_pub.count_and_get(
1788: p_count => x_msg_count
1789: ,p_data => x_msg_data);
1790:
1791: END SERIAL_CHECK;