[Home] [Help]
108: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
109: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
110: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
111: FND_MESSAGE.Set_Token('REASON', SQLERRM);
112: FND_MSG_PUB.Add;
113: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
114:
115: END Get_Concat_Ids;
116:
199:
200: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
201: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_RECUR_SCT_DEL_FAIL');
202: FND_MESSAGE.Set_Token('SECTION_ID', l_child_section_id);
203: FND_MSG_PUB.Add;
204: RAISE FND_API.G_EXC_ERROR;
205: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
206: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_RECUR_SCT_DEL_FAIL');
207: FND_MESSAGE.Set_Token('SECTION_ID', l_child_section_id);
204: RAISE FND_API.G_EXC_ERROR;
205: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
206: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_RECUR_SCT_DEL_FAIL');
207: FND_MESSAGE.Set_Token('SECTION_ID', l_child_section_id);
208: FND_MSG_PUB.Add;
209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
210: END IF;
211:
212: FETCH c1 INTO l_child_section_id;
241: EXCEPTION
242:
243: WHEN FND_API.G_EXC_ERROR THEN
244: x_return_status := FND_API.G_RET_STS_ERROR;
245: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
246: p_data => x_msg_data,
247: p_encoded => 'F');
248:
249: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
247: p_encoded => 'F');
248:
249: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
250: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
251: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
252: p_data => x_msg_data,
253: p_encoded => 'F');
254:
255: WHEN OTHERS THEN
256: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
257: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
258: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
259: FND_MESSAGE.Set_Token('REASON', SQLERRM);
260: FND_MSG_PUB.Add;
261:
262: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
263:
264: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
260: FND_MSG_PUB.Add;
261:
262: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
263:
264: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
265: THEN
266: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
267: END IF;
268:
262: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
263:
264: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
265: THEN
266: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
267: END IF;
268:
269: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
270: p_data => x_msg_data,
265: THEN
266: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
267: END IF;
268:
269: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
270: p_data => x_msg_data,
271: p_encoded => 'F');
272:
273: END Delete_Recursive_Sections;
413: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
414: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_RCR_MSITE_SCT_ASC_FAIL');
415: FND_MESSAGE.Set_Token('SECTION_ID', p_section_id);
416: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
417: FND_MSG_PUB.Add;
418: RAISE FND_API.G_EXC_ERROR;
419: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
420: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_RCR_MSITE_SCT_ASC_FAIL');
421: FND_MESSAGE.Set_Token('SECTION_ID', p_section_id);
419: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
420: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_RCR_MSITE_SCT_ASC_FAIL');
421: FND_MESSAGE.Set_Token('SECTION_ID', p_section_id);
422: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
423: FND_MSG_PUB.Add;
424: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
425: END IF;
426:
427: END LOOP;
470: COMMIT WORK;
471: END IF;
472:
473: -- Standard call to get message count and if count is 1, get message info.
474: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
475: p_data => x_msg_data,
476: p_encoded => 'F');
477:
478: EXCEPTION
478: EXCEPTION
479:
480: WHEN FND_API.G_EXC_ERROR THEN
481: x_return_status := FND_API.G_RET_STS_ERROR;
482: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
483: p_data => x_msg_data,
484: p_encoded => 'F');
485:
486: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
484: p_encoded => 'F');
485:
486: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
487: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
488: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
489: p_data => x_msg_data,
490: p_encoded => 'F');
491:
492: WHEN OTHERS THEN
493: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
494: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
495: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
496: FND_MESSAGE.Set_Token('REASON', SQLERRM);
497: FND_MSG_PUB.Add;
498:
499: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
500:
501: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
497: FND_MSG_PUB.Add;
498:
499: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
500:
501: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
502: THEN
503: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
504: END IF;
505:
499: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
500:
501: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
502: THEN
503: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
504: END IF;
505:
506: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
507: p_data => x_msg_data,
502: THEN
503: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
504: END IF;
505:
506: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
507: p_data => x_msg_data,
508: p_encoded => 'F');
509:
510: END Associate_Recursive_MSite_Sct;
630: p_api_version, l_api_name, g_pkg_name ) THEN
631: RAISE FND_API.g_exc_unexpected_error;
632: END IF;
633: IF FND_API.to_boolean(p_init_msg_list) THEN
634: FND_MSG_PUB.initialize;
635: END IF;
636: -- Initialize API return status to success
637: x_return_status := FND_API.g_ret_sts_success;
638:
735: IF (FND_API.To_Boolean(p_commit)) THEN
736: COMMIT;
737: END IF;
738: -- Standard call to get message count and if count is 1, get message info.
739: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
740: p_data => x_msg_data,
741: p_encoded => 'F');
742: EXCEPTION
743: WHEN FND_API.G_EXC_ERROR THEN
742: EXCEPTION
743: WHEN FND_API.G_EXC_ERROR THEN
744: ROLLBACK TO copy_layout_comp_mapping;
745: x_return_status := FND_API.G_RET_STS_ERROR;
746: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
747: p_data => x_msg_data,
748: p_encoded => 'F');
749: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
750: ROLLBACK TO copy_layout_comp_mapping;
748: p_encoded => 'F');
749: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
750: ROLLBACK TO copy_layout_comp_mapping;
751: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
752: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
753: p_data => x_msg_data,
754: p_encoded => 'F');
755: WHEN OTHERS THEN
756: ROLLBACK TO copy_layout_comp_mapping;
754: p_encoded => 'F');
755: WHEN OTHERS THEN
756: ROLLBACK TO copy_layout_comp_mapping;
757: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
758: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
759: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
760: END IF;
761: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
762: p_data => x_msg_data,
755: WHEN OTHERS THEN
756: ROLLBACK TO copy_layout_comp_mapping;
757: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
758: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
759: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
760: END IF;
761: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
762: p_data => x_msg_data,
763: p_encoded => 'F');
757: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
758: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
759: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
760: END IF;
761: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
762: p_data => x_msg_data,
763: p_encoded => 'F');
764: END Copy_Layout_Comp_Mapping;
765:
915:
916:
917: -- Initialize message list if p_init_msg_list is set to TRUE.
918: IF FND_API.to_Boolean(p_init_msg_list) THEN
919: FND_MSG_PUB.initialize;
920: END IF;
921:
922: -- Initialize API return status to success
923: x_return_status := FND_API.G_RET_STS_SUCCESS;
938: IF c1%NOTFOUND THEN
939: CLOSE c1;
940: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SCT_ID');
941: FND_MESSAGE.Set_Token('SECTION_ID', l_parent_section_id);
942: FND_MSG_PUB.Add;
943: RAISE FND_API.G_EXC_ERROR;
944: END IF;
945: CLOSE c1;
946:
953: IF (c2%NOTFOUND) THEN
954: CLOSE c2;
955: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_GET_SCT_ACSS_NAME');
956: FND_MESSAGE.Set_Token('ACCESS_NAME', p_parent_section_access_name);
957: FND_MSG_PUB.Add;
958: RAISE FND_API.G_EXC_ERROR;
959: END IF;
960: CLOSE c2;
961:
973: FETCH c4 INTO l_tmp_id;
974: IF (c4%NOTFOUND) THEN
975: CLOSE c4;
976: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MASTER_MSITE_NOT_FOUND');
977: FND_MSG_PUB.Add;
978: RAISE FND_API.G_EXC_ERROR;
979: ELSE
980: CLOSE c4;
981: IF (l_tmp_id IS NOT NULL) THEN
981: IF (l_tmp_id IS NOT NULL) THEN
982: -- already a root section defined
983: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_ROOT_SCT_ALREADY_DEF');
984: FND_MESSAGE.Set_Token('SECTION_ID', l_tmp_id);
985: FND_MSG_PUB.Add;
986: RAISE FND_API.G_EXC_ERROR;
987: END IF;
988: END IF;
989:
992: -- if not, throw error
993: IF (l_parent_section_type_code <> 'N') THEN
994: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_PRNT_SCT_NOT_NAV');
995: FND_MESSAGE.Set_Token('SECTION_ID', l_parent_section_id);
996: FND_MSG_PUB.Add;
997: RAISE FND_API.G_EXC_ERROR;
998: END IF;
999:
1000: -- check if the parent section (which is navigational) doesn't have
1005: IF (c3%FOUND) THEN
1006: CLOSE c3;
1007: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_PRNT_SCT_HAS_CHILD_ITM');
1008: FND_MESSAGE.Set_Token('SECTION_ID', l_parent_section_id);
1009: FND_MSG_PUB.Add;
1010: RAISE FND_API.G_EXC_ERROR;
1011: END IF;
1012: CLOSE c3;
1013:
1161:
1162: IF (sql%NOTFOUND) THEN
1163: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_MASTER_MSITE_RT_SCT_F');
1164: FND_MESSAGE.Set_Token('SECTION_ID', x_section_id);
1165: FND_MSG_PUB.Add;
1166: RAISE FND_API.G_EXC_ERROR;
1167: END IF;
1168:
1169: END IF;
1280: COMMIT WORK;
1281: END IF;
1282:
1283: -- Standard call to get message count and if count is 1, get message info.
1284: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1285: p_data => x_msg_data,
1286: p_encoded => 'F');
1287:
1288: EXCEPTION
1289:
1290: WHEN FND_API.G_EXC_ERROR THEN
1291: ROLLBACK TO CREATE_HIERARCHY_SECTION_PVT;
1292: x_return_status := FND_API.G_RET_STS_ERROR;
1293: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1294: p_data => x_msg_data,
1295: p_encoded => 'F');
1296:
1297: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1296:
1297: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1298: ROLLBACK TO CREATE_HIERARCHY_SECTION_PVT;
1299: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1300: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1301: p_data => x_msg_data,
1302: p_encoded => 'F');
1303:
1304: WHEN OTHERS THEN
1306: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1307: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1308: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1309: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1310: FND_MSG_PUB.Add;
1311:
1312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1313:
1314: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1310: FND_MSG_PUB.Add;
1311:
1312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1313:
1314: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1315: THEN
1316: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1317: END IF;
1318:
1312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1313:
1314: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1315: THEN
1316: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1317: END IF;
1318:
1319: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1320: p_data => x_msg_data,
1315: THEN
1316: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1317: END IF;
1318:
1319: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1320: p_data => x_msg_data,
1321: p_encoded => 'F');
1322:
1323: END Create_Hierarchy_Section;
1524: END IF;
1525:
1526: -- Initialize message list if p_init_msg_list is set to TRUE.
1527: IF FND_API.to_Boolean(p_init_msg_list) THEN
1528: FND_MSG_PUB.initialize;
1529: END IF;
1530:
1531: -- Initialize API return status to success
1532: x_return_status := FND_API.G_RET_STS_SUCCESS;
1541: l_section_id := p_section_id; -- section_id specified
1542:
1543: ELSE
1544: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_ID_NULL_OR_NOTSPEC');
1545: FND_MSG_PUB.Add;
1546: RAISE FND_API.G_EXC_ERROR;
1547: END IF;
1548:
1549: --
1554: IF ((p_mss_object_version_number = FND_API.G_MISS_NUM) OR
1555: (p_mss_object_version_number IS NULL))
1556: THEN
1557: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NO_MSS_OVN');
1558: FND_MSG_PUB.Add;
1559: RAISE FND_API.G_EXC_ERROR;
1560: END IF;
1561:
1562: END IF;
1579: THEN
1580: -- non-navigations section with children sections is being changed to
1581: -- type other than 'N' (navigational)
1582: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_NAV_SCT_TYPE_CHNG_FAIL');
1583: FND_MSG_PUB.Add;
1584: RAISE FND_API.G_EXC_ERROR;
1585: END IF;
1586: ELSE
1587: CLOSE c2;
1648: IF (c1%NOTFOUND) THEN
1649: CLOSE c1;
1650: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_GET_PRNT_SCT_FAIL');
1651: FND_MESSAGE.Set_Token('SECTION_ID', p_section_id);
1652: FND_MSG_PUB.Add;
1653: RAISE FND_API.G_EXC_ERROR;
1654: END IF;
1655: CLOSE c1;
1656:
1739: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1740: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_UPD_DSC_SCT_STATUS_FL');
1741: FND_MESSAGE.Set_Token('SECTION_ID', r3.section_id);
1742: FND_MESSAGE.Set_Token('OVN', r3.object_version_number);
1743: FND_MSG_PUB.Add;
1744: RAISE FND_API.G_EXC_ERROR;
1745: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1746: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_UPD_DSC_SCT_STATUS_FL');
1747: FND_MESSAGE.Set_Token('SECTION_ID', r3.section_id);
1745: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1746: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_UPD_DSC_SCT_STATUS_FL');
1747: FND_MESSAGE.Set_Token('SECTION_ID', r3.section_id);
1748: FND_MESSAGE.Set_Token('OVN', r3.object_version_number);
1749: FND_MSG_PUB.Add;
1750: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1751: END IF;
1752:
1753: END LOOP; -- end for r3
1762: COMMIT WORK;
1763: END IF;
1764:
1765: -- Standard call to get message count and if count is 1, get message info.
1766: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1767: p_data => x_msg_data,
1768: p_encoded => 'F');
1769:
1770: EXCEPTION
1771:
1772: WHEN FND_API.G_EXC_ERROR THEN
1773: ROLLBACK TO UPDATE_HIERARCHY_SECTION_PVT;
1774: x_return_status := FND_API.G_RET_STS_ERROR;
1775: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1776: p_data => x_msg_data,
1777: p_encoded => 'F');
1778:
1779: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1778:
1779: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1780: ROLLBACK TO UPDATE_HIERARCHY_SECTION_PVT;
1781: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1782: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1783: p_data => x_msg_data,
1784: p_encoded => 'F');
1785:
1786: WHEN OTHERS THEN
1788: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1789: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1790: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1791: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1792: FND_MSG_PUB.Add;
1793:
1794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1795:
1796: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1792: FND_MSG_PUB.Add;
1793:
1794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1795:
1796: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1797: THEN
1798: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1799: END IF;
1800:
1794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1795:
1796: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1797: THEN
1798: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1799: END IF;
1800:
1801: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1802: p_data => x_msg_data,
1797: THEN
1798: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1799: END IF;
1800:
1801: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1802: p_data => x_msg_data,
1803: p_encoded => 'F');
1804:
1805: END Update_Hierarchy_Section;
1863: END IF;
1864:
1865: -- Initialize message list if p_init_msg_list is set to TRUE.
1866: IF FND_API.to_Boolean(p_init_msg_list) THEN
1867: FND_MSG_PUB.initialize;
1868: END IF;
1869:
1870: -- Initialize API return status to success
1871: x_return_status := FND_API.G_RET_STS_SUCCESS;
1886: IF (c1%NOTFOUND) THEN
1887: CLOSE c1;
1888: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SCT_ACSS_NAME');
1889: FND_MESSAGE.Set_Token('ACCESS_NAME', p_access_name);
1890: FND_MSG_PUB.Add;
1891: RAISE FND_API.G_EXC_ERROR;
1892: END IF;
1893: CLOSE c1;
1894: ELSE
1893: CLOSE c1;
1894: ELSE
1895: -- neither access_name nor section_id is specified
1896: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_ID_OR_ACSS');
1897: FND_MSG_PUB.Add;
1898: RAISE FND_API.G_EXC_ERROR;
1899: END IF;
1900:
1901: --
1948: COMMIT WORK;
1949: END IF;
1950:
1951: -- Standard call to get message count and if count is 1, get message info.
1952: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1953: p_data => x_msg_data,
1954: p_encoded => 'F');
1955:
1956: EXCEPTION
1957:
1958: WHEN FND_API.G_EXC_ERROR THEN
1959: ROLLBACK TO DELETE_HIERARCHY_SECTION_PVT;
1960: x_return_status := FND_API.G_RET_STS_ERROR;
1961: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1962: p_data => x_msg_data,
1963: p_encoded => 'F');
1964:
1965: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1964:
1965: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1966: ROLLBACK TO DELETE_HIERARCHY_SECTION_PVT;
1967: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1968: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1969: p_data => x_msg_data,
1970: p_encoded => 'F');
1971:
1972: WHEN OTHERS THEN
1974: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1975: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1976: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1977: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1978: FND_MSG_PUB.Add;
1979:
1980: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1981:
1982: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1978: FND_MSG_PUB.Add;
1979:
1980: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1981:
1982: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1983: THEN
1984: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1985: END IF;
1986:
1980: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1981:
1982: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1983: THEN
1984: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1985: END IF;
1986:
1987: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1988: p_data => x_msg_data,
1983: THEN
1984: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1985: END IF;
1986:
1987: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
1988: p_data => x_msg_data,
1989: p_encoded => 'F');
1990:
1991: END Delete_Hierarchy_Section;
2033: END IF;
2034:
2035: -- Initialize message list if p_init_msg_list is set to TRUE.
2036: IF FND_API.to_Boolean(p_init_msg_list) THEN
2037: FND_MSG_PUB.initialize;
2038: END IF;
2039:
2040: -- Initialize API return status to success
2041: x_return_status := FND_API.G_RET_STS_SUCCESS;
2057: IF (c1%NOTFOUND) THEN
2058: CLOSE c1;
2059: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SCT_ACSS_NAME');
2060: FND_MESSAGE.Set_Token('ACCESS_NAME', p_access_name);
2061: FND_MSG_PUB.Add;
2062: RAISE FND_API.G_EXC_ERROR;
2063: END IF;
2064: CLOSE c1;
2065: ELSE
2064: CLOSE c1;
2065: ELSE
2066: -- neither access_name nor section_id is specified
2067: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_ID_OR_ACSS');
2068: FND_MSG_PUB.Add;
2069: RAISE FND_API.G_EXC_ERROR;
2070: END IF;
2071:
2072: --
2093:
2094: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
2095: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_RECUR_SCT_DEL_FAIL');
2096: FND_MESSAGE.Set_Token('SECTION_ID', l_section_id);
2097: FND_MSG_PUB.Add;
2098: RAISE FND_API.G_EXC_ERROR;
2099: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2100: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_RECUR_SCT_DEL_FAIL');
2101: FND_MESSAGE.Set_Token('SECTION_ID', l_section_id);
2098: RAISE FND_API.G_EXC_ERROR;
2099: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
2100: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_RECUR_SCT_DEL_FAIL');
2101: FND_MESSAGE.Set_Token('SECTION_ID', l_section_id);
2102: FND_MSG_PUB.Add;
2103: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2104: END IF;
2105:
2106: --
2111: COMMIT WORK;
2112: END IF;
2113:
2114: -- Standard call to get message count and if count is 1, get message info.
2115: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2116: p_data => x_msg_data,
2117: p_encoded => 'F');
2118:
2119: EXCEPTION
2120:
2121: WHEN FND_API.G_EXC_ERROR THEN
2122: ROLLBACK TO DELETE_HIERARCHY_SECTION_PVT;
2123: x_return_status := FND_API.G_RET_STS_ERROR;
2124: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2125: p_data => x_msg_data,
2126: p_encoded => 'F');
2127:
2128: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2127:
2128: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2129: ROLLBACK TO DELETE_HIERARCHY_SECTION_PVT;
2130: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2131: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2132: p_data => x_msg_data,
2133: p_encoded => 'F');
2134:
2135: WHEN OTHERS THEN
2137: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2138: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2139: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2140: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2141: FND_MSG_PUB.Add;
2142:
2143: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2144:
2145: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2141: FND_MSG_PUB.Add;
2142:
2143: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2144:
2145: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2146: THEN
2147: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2148: END IF;
2149:
2143: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2144:
2145: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2146: THEN
2147: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2148: END IF;
2149:
2150: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2151: p_data => x_msg_data,
2146: THEN
2147: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2148: END IF;
2149:
2150: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2151: p_data => x_msg_data,
2152: p_encoded => 'F');
2153:
2154: END Delete_Hierarchy_Section;
2223: END IF;
2224:
2225: -- Initialize message list if p_init_msg_list is set to TRUE.
2226: IF FND_API.to_Boolean(p_init_msg_list) THEN
2227: FND_MSG_PUB.initialize;
2228: END IF;
2229:
2230: -- Initialize API return status to success
2231: x_return_status := FND_API.G_RET_STS_SUCCESS;
2253: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_ITM_ALREADY_ASSOC');
2254: FND_MESSAGE.Set_Token('SECTION_ID', p_section_id);
2255: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_inventory_item_ids(i));
2256: FND_MESSAGE.Set_Token('ORGANIZATION_ID', p_organization_ids(i));
2257: FND_MSG_PUB.Add;
2258:
2259: ELSE
2260:
2261: CLOSE c2;
2335: COMMIT WORK;
2336: END IF;
2337:
2338: -- Standard call to get message count and if count is 1, get message info.
2339: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2340: p_data => x_msg_data,
2341: p_encoded => 'F');
2342:
2343: EXCEPTION
2344:
2345: WHEN FND_API.G_EXC_ERROR THEN
2346: ROLLBACK TO ASSOCIATE_ITEMS_TO_SECTION_PVT;
2347: x_return_status := FND_API.G_RET_STS_ERROR;
2348: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2349: p_data => x_msg_data,
2350: p_encoded => 'F');
2351:
2352: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2351:
2352: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2353: ROLLBACK TO ASSOCIATE_ITEMS_TO_SECTION_PVT;
2354: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2355: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2356: p_data => x_msg_data,
2357: p_encoded => 'F');
2358:
2359: WHEN OTHERS THEN
2361: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2362: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2363: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2364: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2365: FND_MSG_PUB.Add;
2366:
2367: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2368:
2369: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2365: FND_MSG_PUB.Add;
2366:
2367: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2368:
2369: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2370: THEN
2371: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2372: END IF;
2373:
2367: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2368:
2369: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2370: THEN
2371: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2372: END IF;
2373:
2374: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2375: p_data => x_msg_data,
2370: THEN
2371: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2372: END IF;
2373:
2374: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2375: p_data => x_msg_data,
2376: p_encoded => 'F');
2377:
2378: END Associate_Items_To_Section;
2443: END IF;
2444:
2445: -- Initialize message list if p_init_msg_list is set to TRUE.
2446: IF FND_API.to_Boolean(p_init_msg_list) THEN
2447: FND_MSG_PUB.initialize;
2448: END IF;
2449:
2450: -- Initialize API return status to success
2451: x_return_status := FND_API.G_RET_STS_SUCCESS;
2470: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_ITM_ALREADY_ASSOC');
2471: FND_MESSAGE.Set_Token('SECTION_ID', p_section_ids(i));
2472: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_inventory_item_id);
2473: FND_MESSAGE.Set_Token('ORGANIZATION_ID', p_organization_id);
2474: FND_MSG_PUB.Add;
2475:
2476: ELSE
2477:
2478: CLOSE c2;
2545: COMMIT WORK;
2546: END IF;
2547:
2548: -- Standard call to get message count and if count is 1, get message info.
2549: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2550: p_data => x_msg_data,
2551: p_encoded => 'F');
2552:
2553: EXCEPTION
2554:
2555: WHEN FND_API.G_EXC_ERROR THEN
2556: ROLLBACK TO ASSOCIATE_SECTIONS_TO_ITEM_PVT;
2557: x_return_status := FND_API.G_RET_STS_ERROR;
2558: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2559: p_data => x_msg_data,
2560: p_encoded => 'F');
2561:
2562: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2561:
2562: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2563: ROLLBACK TO ASSOCIATE_SECTIONS_TO_ITEM_PVT;
2564: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2565: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2566: p_data => x_msg_data,
2567: p_encoded => 'F');
2568:
2569: WHEN OTHERS THEN
2571: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2572: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2573: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2574: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2575: FND_MSG_PUB.Add;
2576:
2577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2578:
2579: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2575: FND_MSG_PUB.Add;
2576:
2577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2578:
2579: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2580: THEN
2581: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2582: END IF;
2583:
2577: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2578:
2579: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2580: THEN
2581: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2582: END IF;
2583:
2584: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2585: p_data => x_msg_data,
2580: THEN
2581: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2582: END IF;
2583:
2584: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2585: p_data => x_msg_data,
2586: p_encoded => 'F');
2587:
2588: END Associate_Sections_To_Item;
2628: END IF;
2629:
2630: -- Initialize message list if p_init_msg_list is set to TRUE.
2631: IF FND_API.to_Boolean(p_init_msg_list) THEN
2632: FND_MSG_PUB.initialize;
2633: END IF;
2634:
2635: -- Initialize API return status to success
2636: x_return_status := FND_API.G_RET_STS_SUCCESS;
2674: COMMIT WORK;
2675: END IF;
2676:
2677: -- Standard call to get message count and if count is 1, get message info.
2678: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2679: p_data => x_msg_data,
2680: p_encoded => 'F');
2681:
2682: EXCEPTION
2683:
2684: WHEN FND_API.G_EXC_ERROR THEN
2685: ROLLBACK TO DISASSOCIATE_SCTS_TO_ITMS_PVT;
2686: x_return_status := FND_API.G_RET_STS_ERROR;
2687: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2688: p_data => x_msg_data,
2689: p_encoded => 'F');
2690:
2691: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2690:
2691: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2692: ROLLBACK TO DISASSOCIATE_SCTS_TO_ITMS_PVT;
2693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2694: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2695: p_data => x_msg_data,
2696: p_encoded => 'F');
2697:
2698: WHEN OTHERS THEN
2700: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2701: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2702: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2703: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2704: FND_MSG_PUB.Add;
2705:
2706: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2707:
2708: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2704: FND_MSG_PUB.Add;
2705:
2706: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2707:
2708: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2709: THEN
2710: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2711: END IF;
2712:
2706: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2707:
2708: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2709: THEN
2710: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2711: END IF;
2712:
2713: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2714: p_data => x_msg_data,
2709: THEN
2710: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2711: END IF;
2712:
2713: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2714: p_data => x_msg_data,
2715: p_encoded => 'F');
2716:
2717: END Disassociate_Scts_To_Itms;
2755: END IF;
2756:
2757: -- Initialize message list if p_init_msg_list is set to TRUE.
2758: IF FND_API.to_Boolean(p_init_msg_list) THEN
2759: FND_MSG_PUB.initialize;
2760: END IF;
2761:
2762: -- Initialize API return status to success
2763: x_return_status := FND_API.G_RET_STS_SUCCESS;
2798: COMMIT WORK;
2799: END IF;
2800:
2801: -- Standard call to get message count and if count is 1, get message info.
2802: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2803: p_data => x_msg_data,
2804: p_encoded => 'F');
2805:
2806: EXCEPTION
2807:
2808: WHEN FND_API.G_EXC_ERROR THEN
2809: ROLLBACK TO DISASSOCIATE_SCTS_ITMS_PVT;
2810: x_return_status := FND_API.G_RET_STS_ERROR;
2811: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2812: p_data => x_msg_data,
2813: p_encoded => 'F');
2814:
2815: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2814:
2815: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2816: ROLLBACK TO DISASSOCIATE_SCTS_ITMS_PVT;
2817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2818: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2819: p_data => x_msg_data,
2820: p_encoded => 'F');
2821:
2822: WHEN OTHERS THEN
2824: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2825: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2826: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2827: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2828: FND_MSG_PUB.Add;
2829:
2830: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2831:
2832: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2828: FND_MSG_PUB.Add;
2829:
2830: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2831:
2832: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2833: THEN
2834: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2835: END IF;
2836:
2830: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2831:
2832: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2833: THEN
2834: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2835: END IF;
2836:
2837: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2838: p_data => x_msg_data,
2833: THEN
2834: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2835: END IF;
2836:
2837: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
2838: p_data => x_msg_data,
2839: p_encoded => 'F');
2840:
2841: END Disassociate_Scts_Itms;
3005: END IF;
3006:
3007: -- Initialize message list if p_init_msg_list is set to TRUE.
3008: IF FND_API.to_Boolean(p_init_msg_list) THEN
3009: FND_MSG_PUB.initialize;
3010: END IF;
3011:
3012: -- Initialize API return status to success
3013: x_return_status := FND_API.G_RET_STS_SUCCESS;
3087: IF (NOT l_found_flag) THEN
3088: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_INVALID_MSITE_SCT_ASSC');
3089: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_ids(i));
3090: FND_MESSAGE.Set_Token('SECTION_ID', p_section_id);
3091: FND_MSG_PUB.Add;
3092: RAISE FND_API.G_EXC_ERROR;
3093: END IF;
3094:
3095: END LOOP; -- loop i
3209: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3210: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_RCR_MSITE_SCT_ASC_FAIL');
3211: FND_MESSAGE.Set_Token('SECTION_ID', p_section_id);
3212: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_ids(i));
3213: FND_MSG_PUB.Add;
3214: RAISE FND_API.G_EXC_ERROR;
3215: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3216: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_RCR_MSITE_SCT_ASC_FAIL');
3217: FND_MESSAGE.Set_Token('SECTION_ID', p_section_id);
3215: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3216: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_RCR_MSITE_SCT_ASC_FAIL');
3217: FND_MESSAGE.Set_Token('SECTION_ID', p_section_id);
3218: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_ids(i));
3219: FND_MSG_PUB.Add;
3220: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3221: END IF;
3222:
3223: END IF; -- if NOT l_found_flag
3232: COMMIT WORK;
3233: END IF;
3234:
3235: -- Standard call to get message count and if count is 1, get message info.
3236: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3237: p_data => x_msg_data,
3238: p_encoded => 'F');
3239:
3240: EXCEPTION
3241:
3242: WHEN FND_API.G_EXC_ERROR THEN
3243: ROLLBACK TO ASSOCIATE_MSITES_TO_SECTION;
3244: x_return_status := FND_API.G_RET_STS_ERROR;
3245: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3246: p_data => x_msg_data,
3247: p_encoded => 'F');
3248:
3249: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3248:
3249: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3250: ROLLBACK TO ASSOCIATE_MSITES_TO_SECTION;
3251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3252: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3253: p_data => x_msg_data,
3254: p_encoded => 'F');
3255:
3256: WHEN OTHERS THEN
3258: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
3259: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
3260: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
3261: FND_MESSAGE.Set_Token('REASON', SQLERRM);
3262: FND_MSG_PUB.Add;
3263:
3264: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3265:
3266: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3262: FND_MSG_PUB.Add;
3263:
3264: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3265:
3266: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3267: THEN
3268: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3269: END IF;
3270:
3264: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3265:
3266: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3267: THEN
3268: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3269: END IF;
3270:
3271: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3272: p_data => x_msg_data,
3267: THEN
3268: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3269: END IF;
3270:
3271: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3272: p_data => x_msg_data,
3273: p_encoded => 'F');
3274:
3275: END Associate_MSites_To_Section;
3319: END IF;
3320:
3321: -- Initialize message list if p_init_msg_list is set to TRUE.
3322: IF FND_API.to_Boolean(p_init_msg_list) THEN
3323: FND_MSG_PUB.initialize;
3324: END IF;
3325:
3326: -- Initialize API return status to success
3327: x_return_status := FND_API.G_RET_STS_SUCCESS;
3337: --
3338: IF (p_mini_site_id = l_master_mini_site_id) THEN
3339: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_INVALID_ROOT_SCT_MSITE');
3340: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
3341: FND_MSG_PUB.Add;
3342: RAISE FND_API.G_EXC_ERROR;
3343: END IF;
3344:
3345: --
3380: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
3381: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_RCR_MSITE_SCT_ASC_FAIL');
3382: FND_MESSAGE.Set_Token('SECTION_ID', p_section_id);
3383: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
3384: FND_MSG_PUB.Add;
3385: RAISE FND_API.G_EXC_ERROR;
3386: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3387: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_RCR_MSITE_SCT_ASC_FAIL');
3388: FND_MESSAGE.Set_Token('SECTION_ID', p_section_id);
3386: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3387: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_RCR_MSITE_SCT_ASC_FAIL');
3388: FND_MESSAGE.Set_Token('SECTION_ID', p_section_id);
3389: FND_MESSAGE.Set_Token('MINI_SITE_ID', p_mini_site_id);
3390: FND_MSG_PUB.Add;
3391: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3392: END IF;
3393:
3394: --
3399: COMMIT WORK;
3400: END IF;
3401:
3402: -- Standard call to get message count and if count is 1, get message info.
3403: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3404: p_data => x_msg_data,
3405: p_encoded => 'F');
3406:
3407: EXCEPTION
3408:
3409: WHEN FND_API.G_EXC_ERROR THEN
3410: ROLLBACK TO ASSOCIATE_ROOT_SCT_TO_MSITE;
3411: x_return_status := FND_API.G_RET_STS_ERROR;
3412: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3413: p_data => x_msg_data,
3414: p_encoded => 'F');
3415:
3416: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3415:
3416: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3417: ROLLBACK TO ASSOCIATE_ROOT_SCT_TO_MSITE;
3418: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3419: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3420: p_data => x_msg_data,
3421: p_encoded => 'F');
3422:
3423: WHEN OTHERS THEN
3425: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
3426: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
3427: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
3428: FND_MESSAGE.Set_Token('REASON', SQLERRM);
3429: FND_MSG_PUB.Add;
3430:
3431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3432:
3433: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3429: FND_MSG_PUB.Add;
3430:
3431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3432:
3433: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3434: THEN
3435: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3436: END IF;
3437:
3431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3432:
3433: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3434: THEN
3435: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3436: END IF;
3437:
3438: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3439: p_data => x_msg_data,
3434: THEN
3435: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3436: END IF;
3437:
3438: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3439: p_data => x_msg_data,
3440: p_encoded => 'F');
3441:
3442: END Associate_Root_Sct_To_MSite;
3488: END IF;
3489:
3490: -- Initialize message list if p_init_msg_list is set to TRUE.
3491: IF FND_API.to_Boolean(p_init_msg_list) THEN
3492: FND_MSG_PUB.initialize;
3493: END IF;
3494:
3495: -- Initialize API return status to success
3496: x_return_status := FND_API.G_RET_STS_SUCCESS;
3501: IF ((p_inventory_item_id IS NULL) OR
3502: (p_inventory_item_id = FND_API.G_MISS_NUM))
3503: THEN
3504: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_INVALID_INV_ITEM_ID');
3505: FND_MSG_PUB.Add;
3506: RAISE FND_API.G_EXC_ERROR;
3507: END IF;
3508:
3509: --
3512: IF ((p_organization_id IS NULL) OR
3513: (p_organization_id = FND_API.G_MISS_NUM))
3514: THEN
3515: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_INVALID_INV_ORG_ID');
3516: FND_MSG_PUB.Add;
3517: RAISE FND_API.G_EXC_ERROR;
3518: END IF;
3519:
3520: --
3553: FND_MESSAGE.Set_Token('TABLE_NAME', l_out_error_tbl(i).TABLE_NAME);
3554: FND_MESSAGE.Set_Token('COLUMN_NAME', l_out_error_tbl(i).COLUMN_NAME);
3555: FND_MESSAGE.Set_Token('ORGANIZATION_ID',
3556: l_out_error_tbl(i).ORGANIZATION_ID);
3557: FND_MSG_PUB.Add;
3558: END LOOP;
3559:
3560: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_UPDATE_INV_ITEM_FAIL');
3561: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_inventory_item_id);
3559:
3560: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_UPDATE_INV_ITEM_FAIL');
3561: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_inventory_item_id);
3562: FND_MESSAGE.Set_Token('ORGANIZATION_ID', p_organization_id);
3563: FND_MSG_PUB.Add;
3564: RAISE FND_API.G_EXC_ERROR;
3565: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
3566:
3567: FOR i IN 1..l_out_error_tbl.count LOOP
3574: FND_MESSAGE.Set_Token('TABLE_NAME', l_out_error_tbl(i).TABLE_NAME);
3575: FND_MESSAGE.Set_Token('COLUMN_NAME', l_out_error_tbl(i).COLUMN_NAME);
3576: FND_MESSAGE.Set_Token('ORGANIZATION_ID',
3577: l_out_error_tbl(i).ORGANIZATION_ID);
3578: FND_MSG_PUB.Add;
3579: END LOOP;
3580:
3581: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_UPDATE_INV_ITEM_FAIL');
3582: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_inventory_item_id);
3580:
3581: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_UPDATE_INV_ITEM_FAIL');
3582: FND_MESSAGE.Set_Token('INVENTORY_ITEM_ID', p_inventory_item_id);
3583: FND_MESSAGE.Set_Token('ORGANIZATION_ID', p_organization_id);
3584: FND_MSG_PUB.Add;
3585: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3586: END IF;
3587:
3588: --
3593: COMMIT WORK;
3594: END IF;
3595:
3596: -- Standard call to get message count and if count is 1, get message info.
3597: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3598: p_data => x_msg_data,
3599: p_encoded => 'F');
3600:
3601: EXCEPTION
3602:
3603: WHEN FND_API.G_EXC_ERROR THEN
3604: -- ROLLBACK TO UPDATE_HIERARCHY_ITEM_PVT;
3605: x_return_status := FND_API.G_RET_STS_ERROR;
3606: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3607: p_data => x_msg_data,
3608: p_encoded => 'F');
3609:
3610: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3609:
3610: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3611: -- ROLLBACK TO UPDATE_HIERARCHY_ITEM_PVT;
3612: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3613: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3614: p_data => x_msg_data,
3615: p_encoded => 'F');
3616:
3617: WHEN OTHERS THEN
3619: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
3620: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
3621: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
3622: FND_MESSAGE.Set_Token('REASON', SQLERRM);
3623: FND_MSG_PUB.Add;
3624:
3625: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3626:
3627: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3623: FND_MSG_PUB.Add;
3624:
3625: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3626:
3627: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3628: THEN
3629: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3630: END IF;
3631:
3625: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3626:
3627: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3628: THEN
3629: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3630: END IF;
3631:
3632: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3633: p_data => x_msg_data,
3628: THEN
3629: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3630: END IF;
3631:
3632: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3633: p_data => x_msg_data,
3634: p_encoded => 'F');
3635:
3636: END Update_Hierarchy_Item;
3704: END IF;
3705:
3706: -- Initialize message list if p_init_msg_list is set to TRUE.
3707: IF FND_API.to_Boolean(p_init_msg_list) THEN
3708: FND_MSG_PUB.initialize;
3709: END IF;
3710:
3711: -- Initialize API return status to success
3712: x_return_status := FND_API.G_RET_STS_SUCCESS;
3776: COMMIT WORK;
3777: END IF;
3778:
3779: -- Standard call to get message count and if count is 1, get message info.
3780: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3781: p_data => x_msg_data,
3782: p_encoded => 'F');
3783:
3784: EXCEPTION
3785:
3786: WHEN FND_API.G_EXC_ERROR THEN
3787: ROLLBACK TO ASSOCIATE_MSITES_TO_ITEM_PVT;
3788: x_return_status := FND_API.G_RET_STS_ERROR;
3789: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3790: p_data => x_msg_data,
3791: p_encoded => 'F');
3792:
3793: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3792:
3793: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3794: ROLLBACK TO ASSOCIATE_MSITES_TO_ITEM_PVT;
3795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3796: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3797: p_data => x_msg_data,
3798: p_encoded => 'F');
3799:
3800: WHEN OTHERS THEN
3802: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
3803: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
3804: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
3805: FND_MESSAGE.Set_Token('REASON', SQLERRM);
3806: FND_MSG_PUB.Add;
3807:
3808: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3809:
3810: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3806: FND_MSG_PUB.Add;
3807:
3808: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3809:
3810: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3811: THEN
3812: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3813: END IF;
3814:
3808: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3809:
3810: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3811: THEN
3812: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3813: END IF;
3814:
3815: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3816: p_data => x_msg_data,
3811: THEN
3812: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3813: END IF;
3814:
3815: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3816: p_data => x_msg_data,
3817: p_encoded => 'F');
3818:
3819: END Associate_MSites_To_Item;
3868: END IF;
3869:
3870: -- Initialize message list if p_init_msg_list is set to TRUE.
3871: IF FND_API.to_Boolean(p_init_msg_list) THEN
3872: FND_MSG_PUB.initialize;
3873: END IF;
3874:
3875: -- Initialize API return status to success
3876: x_return_status := FND_API.G_RET_STS_SUCCESS;
3950: COMMIT WORK;
3951: END IF;
3952:
3953: -- Standard call to get message count and if count is 1, get message info.
3954: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3955: p_data => x_msg_data,
3956: p_encoded => 'F');
3957:
3958: EXCEPTION
3959:
3960: WHEN FND_API.G_EXC_ERROR THEN
3961: ROLLBACK TO UPDATE_DELETE_SCT_SCTS_PVT;
3962: x_return_status := FND_API.G_RET_STS_ERROR;
3963: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3964: p_data => x_msg_data,
3965: p_encoded => 'F');
3966:
3967: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3966:
3967: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3968: ROLLBACK TO UPDATE_DELETE_SCT_SCTS_PVT;
3969: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3970: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3971: p_data => x_msg_data,
3972: p_encoded => 'F');
3973:
3974: WHEN OTHERS THEN
3977: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
3978: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
3979: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
3980: FND_MESSAGE.Set_Token('REASON', SQLERRM);
3981: FND_MSG_PUB.Add;
3982:
3983: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3984:
3985: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3981: FND_MSG_PUB.Add;
3982:
3983: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3984:
3985: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3986: THEN
3987: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3988: END IF;
3989:
3983: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3984:
3985: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3986: THEN
3987: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3988: END IF;
3989:
3990: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3991: p_data => x_msg_data,
3986: THEN
3987: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3988: END IF;
3989:
3990: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
3991: p_data => x_msg_data,
3992: p_encoded => 'F');
3993:
3994: END Update_Delete_Sct_Scts;
4036: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
4037: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
4038: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
4039: FND_MESSAGE.Set_Token('REASON', SQLERRM);
4040: FND_MSG_PUB.Add;
4041: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4042:
4043: END Put_Section_Map;
4044:
4074: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
4075: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
4076: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
4077: FND_MESSAGE.Set_Token('REASON', SQLERRM);
4078: FND_MSG_PUB.Add;
4079: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4080:
4081: END Get_Section_Map;
4082:
4197: END IF;
4198:
4199: -- Initialize message list if p_init_msg_list is set to TRUE.
4200: IF FND_API.to_Boolean(p_init_msg_list) THEN
4201: FND_MSG_PUB.initialize;
4202: END IF;
4203:
4204: -- Initialize API return status to success
4205: x_return_status := FND_API.G_RET_STS_SUCCESS;
4223: (p_src_section_id = FND_API.G_MISS_NUM))
4224: THEN
4225: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_INVLD_CUT_SRC_SCT');
4226: FND_MESSAGE.Set_Token('SRC_SECTION_ID', p_src_section_id);
4227: FND_MSG_PUB.Add;
4228: RAISE FND_API.G_EXC_ERROR;
4229: END IF;
4230:
4231: -- New parent section should not be an invalid ID
4234: (p_dst_parent_section_id = FND_API.G_MISS_NUM))
4235: THEN
4236: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_INVLD_CUT_DST_SCT');
4237: FND_MESSAGE.Set_Token('DST_PARENT_SECTION_ID', p_dst_parent_section_id);
4238: FND_MSG_PUB.Add;
4239: RAISE FND_API.G_EXC_ERROR;
4240: END IF;
4241:
4242: --
4244: -- That is, you cannot cut and paste a section within itself
4245: --
4246: IF (p_src_section_id = p_dst_parent_section_id) THEN
4247: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_CUT_SAME_SCT_FAIL');
4248: FND_MSG_PUB.Add;
4249: RAISE FND_API.G_EXC_ERROR;
4250: END IF;
4251:
4252: --
4258: CLOSE c5;
4259: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_CUT_DST_SCT_IS_DSC_SCT');
4260: FND_MESSAGE.Set_Token('DST_PARENT_SECTION_ID', p_dst_parent_section_id);
4261: FND_MESSAGE.Set_Token('SRC_SECTION_ID', p_src_section_id);
4262: FND_MSG_PUB.Add;
4263: RAISE FND_API.G_EXC_ERROR;
4264: END IF;
4265: CLOSE c5;
4266:
4272: IF (c1%NOTFOUND) THEN
4273: CLOSE c1;
4274: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_NO_SCT_ID');
4275: FND_MESSAGE.Set_Token('SECTION_ID', p_dst_parent_section_id);
4276: FND_MSG_PUB.Add;
4277: RAISE FND_API.G_EXC_ERROR;
4278: END IF;
4279: CLOSE c1;
4280:
4280:
4281: IF (l_section_type_code <> 'N') THEN
4282: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_PRNT_SCT_NOT_NAV');
4283: FND_MESSAGE.Set_Token('SECTION_ID', p_dst_parent_section_id);
4284: FND_MSG_PUB.Add;
4285: RAISE FND_API.G_EXC_ERROR;
4286: END IF;
4287:
4288: -- Check if the destination parent section (which is navigational) doesn't
4293: IF (c2%FOUND) THEN
4294: CLOSE c2;
4295: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_PRNT_SCT_HAS_CHILD_ITM');
4296: FND_MESSAGE.Set_Token('SECTION_ID', p_dst_parent_section_id);
4297: FND_MSG_PUB.Add;
4298: RAISE FND_API.G_EXC_ERROR;
4299: END IF;
4300: CLOSE c2;
4301:
4313: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
4314: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
4315: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
4316: FND_MESSAGE.Set_Token('REASON', SQLERRM);
4317: FND_MSG_PUB.Add;
4318: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4319: END;
4320:
4321: --
4344: EXCEPTION
4345: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4346: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_GET_CONCAT_IDS_FAIL');
4347: FND_MESSAGE.Set_Token('SECTION_ID', r3.parent_section_id);
4348: FND_MSG_PUB.Add;
4349: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4350:
4351: WHEN OTHERS THEN
4352: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
4352: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
4353: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
4354: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
4355: FND_MESSAGE.Set_Token('REASON', SQLERRM);
4356: FND_MSG_PUB.Add;
4357: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4358: END;
4359:
4360: END LOOP; -- end loop r3
4398: );
4399:
4400: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
4401: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_J_ASC_MSTS_TO_SCT_FAIL');
4402: FND_MSG_PUB.Add;
4403: RAISE FND_API.G_EXC_ERROR;
4404: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
4405: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_J_ASC_MSTS_TO_SCT_FAIL');
4406: FND_MSG_PUB.Add;
4402: FND_MSG_PUB.Add;
4403: RAISE FND_API.G_EXC_ERROR;
4404: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
4405: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_J_ASC_MSTS_TO_SCT_FAIL');
4406: FND_MSG_PUB.Add;
4407: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4408: END IF;
4409:
4410: END LOOP; -- end loop r33
4414: COMMIT WORK;
4415: END IF;
4416:
4417: -- Standard call to get message count and if count is 1, get message info.
4418: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
4419: p_data => x_msg_data,
4420: p_encoded => 'F');
4421:
4422: EXCEPTION
4423:
4424: WHEN FND_API.G_EXC_ERROR THEN
4425: ROLLBACK TO CUT_AND_PASTE_SECTION_PVT;
4426: x_return_status := FND_API.G_RET_STS_ERROR;
4427: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
4428: p_data => x_msg_data,
4429: p_encoded => 'F');
4430:
4431: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4430:
4431: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4432: ROLLBACK TO CUT_AND_PASTE_SECTION_PVT;
4433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4434: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
4435: p_data => x_msg_data,
4436: p_encoded => 'F');
4437:
4438: WHEN OTHERS THEN
4440: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
4441: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
4442: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
4443: FND_MESSAGE.Set_Token('REASON', SQLERRM);
4444: FND_MSG_PUB.Add;
4445: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4446:
4447: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4448: THEN
4443: FND_MESSAGE.Set_Token('REASON', SQLERRM);
4444: FND_MSG_PUB.Add;
4445: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4446:
4447: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4448: THEN
4449: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
4450: END IF;
4451:
4445: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4446:
4447: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4448: THEN
4449: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
4450: END IF;
4451:
4452: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
4453: p_data => x_msg_data,
4448: THEN
4449: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
4450: END IF;
4451:
4452: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
4453: p_data => x_msg_data,
4454: p_encoded => 'F');
4455:
4456: END Cut_And_Paste_Section;
4635: END IF;
4636:
4637: -- Initialize message list if p_init_msg_list is set to TRUE.
4638: IF FND_API.to_Boolean(p_init_msg_list) THEN
4639: FND_MSG_PUB.initialize;
4640: END IF;
4641:
4642: -- Initialize API return status to success
4643: x_return_status := FND_API.G_RET_STS_SUCCESS;
4664: fnd_file.put_line(fnd_file.log,'Invalid duplicate source section');
4665: else
4666: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_INVLD_COPY_SRC_SCT');
4667: FND_MESSAGE.Set_Token('SRC_SECTION_ID', p_src_section_id);
4668: FND_MSG_PUB.Add;
4669: end if;
4670: RAISE FND_API.G_EXC_ERROR;
4671: END IF;
4672:
4681: fnd_file.put_line(fnd_file.log,'Invalid duplicate source section');
4682: else
4683: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_INVLD_COPY_DST_SCT');
4684: FND_MESSAGE.Set_Token('DST_PARENT_SECTION_ID', p_dst_parent_section_id);
4685: FND_MSG_PUB.Add;
4686:
4687: end if;
4688: RAISE FND_API.G_EXC_ERROR;
4689: END IF;
4778: fnd_file.put_line(fnd_file.log,'get G_RET_STS_ERROR in Create_Hierarchy_Section');
4779:
4780: else
4781: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_J_CRT_HIER_SCT_FAIL');
4782: FND_MSG_PUB.Add;
4783:
4784: end if;
4785: RAISE FND_API.G_EXC_ERROR;
4786: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
4787: if G_ENABLE_TRACE = 'Y' then
4788: fnd_file.put_line(fnd_file.log,'get G_RET_STS_UNEXP_ERROR in Create_Hierarchy_Section');
4789: else
4790: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_J_CRT_HIER_SCT_FAIL');
4791: FND_MSG_PUB.Add;
4792:
4793: end if;
4794: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4795: END IF;
4912: end if;
4913: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_MAP_INSERT_FAIL');
4914: FND_MESSAGE.Set_Token('FROM_SECTION_ID', p_src_section_id);
4915: FND_MESSAGE.Set_Token('TO_SECTION_ID', x_new_src_section_id);
4916: FND_MSG_PUB.Add;
4917: RAISE FND_API.G_EXC_ERROR;
4918: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
4919: if G_ENABLE_TRACE = 'Y' then
4920: fnd_file.put_line(fnd_file.log,'get G_RET_STS_UNEXP_ERROR in Put_Section_Map, with IBE_DSP_SCT_MAP_INSERT_FAIL error');
4921: end if;
4922: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_MAP_INSERT_FAIL');
4923: FND_MESSAGE.Set_Token('FROM_SECTION_ID', p_src_section_id);
4924: FND_MESSAGE.Set_Token('TO_SECTION_ID', x_new_src_section_id);
4925: FND_MSG_PUB.Add;
4926: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4927: END IF;
4928:
4929: -- 11.5.10, Copy layout component mapping during section duplication
4970: fnd_file.put_line(fnd_file.log,'get G_IBE_DSP_COPY_SRC_SCT_NOT_FOUND error');
4971: end if;
4972: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_COPY_SRC_SCT_NOT_FOUND');
4973: FND_MESSAGE.Set_Token('SRC_SECTION_ID', p_src_section_id);
4974: FND_MSG_PUB.Add;
4975: RAISE FND_API.G_EXC_ERROR;
4976: END IF;
4977:
4978: --
5002: fnd_file.put_line(fnd_file.log,'get IBE_DSP_SCT_MAP_GET_FAIL error in Get_Section_Map for descendants of parent section ');
5003: end if;
5004: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_MAP_GET_FAIL');
5005: FND_MESSAGE.Set_Token('FROM_SECTION_ID', r2.parent_section_id);
5006: FND_MSG_PUB.Add;
5007: RAISE FND_API.G_EXC_ERROR;
5008: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
5009: if G_ENABLE_TRACE = 'Y' then
5010: fnd_file.put_line(fnd_file.log,'get G_RET_STS_UNEXP_ERROR error in Get_Section_Map for descendants of parent section ');
5011: fnd_file.put_line(fnd_file.log,'get IBE_DSP_SCT_MAP_GET_FAIL error in Get_Section_Map for descendants of parent section ');
5012: end if;
5013: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_MAP_GET_FAIL');
5014: FND_MESSAGE.Set_Token('FROM_SECTION_ID', r2.parent_section_id);
5015: FND_MSG_PUB.Add;
5016: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5017: END IF;
5018: IF (l_debug = 'Y') THEN
5019: IBE_UTIL.debug('Calling Create_Hierarchy_Section for immediate section ');
5085: if G_ENABLE_TRACE = 'Y' then
5086: fnd_file.put_line(fnd_file.log,'get G_RET_STS_ERROR in Create_Hierarchy_Section');
5087: end if;
5088: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_J_CRT_HIER_SCT_FAIL');
5089: FND_MSG_PUB.Add;
5090: RAISE FND_API.G_EXC_ERROR;
5091: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
5092: if G_ENABLE_TRACE = 'Y' then
5093: fnd_file.put_line(fnd_file.log,'get G_RET_STS_UNEXP_ERROR in Create_Hierarchy_Section');
5092: if G_ENABLE_TRACE = 'Y' then
5093: fnd_file.put_line(fnd_file.log,'get G_RET_STS_UNEXP_ERROR in Create_Hierarchy_Section');
5094: end if;
5095: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_J_CRT_HIER_SCT_FAIL');
5096: FND_MSG_PUB.Add;
5097: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5098: END IF;
5099:
5100:
5163: end if;
5164: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_MAP_INSERT_FAIL');
5165: FND_MESSAGE.Set_Token('FROM_SECTION_ID', r2.section_id);
5166: FND_MESSAGE.Set_Token('TO_SECTION_ID', l_section_id);
5167: FND_MSG_PUB.Add;
5168: RAISE FND_API.G_EXC_ERROR;
5169: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
5170: if G_ENABLE_TRACE = 'Y' then
5171: fnd_file.put_line(fnd_file.log,'get G_RET_STS_ERROR in Put_Section_Map, with IBE_DSP_SCT_MAP_INSERT_FAIL error');
5172: end if;
5173: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_MAP_INSERT_FAIL');
5174: FND_MESSAGE.Set_Token('FROM_SECTION_ID', r2.section_id);
5175: FND_MESSAGE.Set_Token('TO_SECTION_ID', l_section_id);
5176: FND_MSG_PUB.Add;
5177: END IF;
5178:
5179: -- 11.5.10, Copy layout component mapping during section duplication
5180: -- including center display template
5240:
5241: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
5242: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_MAP_GET_FAIL');
5243: FND_MESSAGE.Set_Token('FROM_SECTION_ID', r3.section_id);
5244: FND_MSG_PUB.Add;
5245: RAISE FND_API.G_EXC_ERROR;
5246: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
5247: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_MAP_GET_FAIL');
5248: FND_MESSAGE.Set_Token('FROM_SECTION_ID', r3.section_id);
5245: RAISE FND_API.G_EXC_ERROR;
5246: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
5247: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_SCT_MAP_GET_FAIL');
5248: FND_MESSAGE.Set_Token('FROM_SECTION_ID', r3.section_id);
5249: FND_MSG_PUB.Add;
5250: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5251: END IF;
5252:
5253: l_inventory_item_ids := JTF_NUMBER_TABLE();
5302: if G_ENABLE_TRACE = 'Y' then
5303: fnd_file.put_line(fnd_file.log,'get G_RET_STS_ERROR in Associate_Items_To_Section');
5304: end if;
5305: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_J_ASC_ITMS_TO_SCT_FAIL');
5306: FND_MSG_PUB.Add;
5307: RAISE FND_API.G_EXC_ERROR;
5308: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
5309: if G_ENABLE_TRACE = 'Y' then
5310: fnd_file.put_line(fnd_file.log,'get G_RET_STS_UNEXP_ERROR in Associate_Items_To_Section');
5309: if G_ENABLE_TRACE = 'Y' then
5310: fnd_file.put_line(fnd_file.log,'get G_RET_STS_UNEXP_ERROR in Associate_Items_To_Section');
5311: end if;
5312: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_J_ASC_ITMS_TO_SCT_FAIL');
5313: FND_MSG_PUB.Add;
5314: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5315: END IF;
5316:
5317: -- adding commit 11/20/03 ab :to avoid time out in case large number of sections duplicated
5324: -- COMMIT WORK;
5325: --END IF;
5326:
5327: -- Standard call to get message count and if count is 1, get message info.
5328: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
5329: p_data => x_msg_data,
5330: p_encoded => 'F');
5331:
5332: EXCEPTION
5351: x_msg_count=>x_msg_count,
5352: x_msg_data=>x_msg_data);
5353:
5354: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_J_DUP_HIER_SCT_FAIL');
5355: FND_MSG_PUB.Add;
5356: x_return_status := FND_API.G_RET_STS_ERROR;
5357: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
5358: p_data => x_msg_data,
5359: p_encoded => 'F');
5353:
5354: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_J_DUP_HIER_SCT_FAIL');
5355: FND_MSG_PUB.Add;
5356: x_return_status := FND_API.G_RET_STS_ERROR;
5357: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
5358: p_data => x_msg_data,
5359: p_encoded => 'F');
5360:
5361: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5378: x_msg_count=>x_msg_count,
5379: x_msg_data=>x_msg_data);
5380:
5381: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_J_DUP_HIER_SCT_FAIL');
5382: FND_MSG_PUB.Add;
5383: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5384: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
5385: p_data => x_msg_data,
5386: p_encoded => 'F');
5380:
5381: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_J_DUP_HIER_SCT_FAIL');
5382: FND_MSG_PUB.Add;
5383: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5384: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
5385: p_data => x_msg_data,
5386: p_encoded => 'F');
5387:
5388: WHEN OTHERS THEN
5405: x_msg_count=>x_msg_count,
5406: x_msg_data=>x_msg_data);
5407:
5408: FND_MESSAGE.Set_Name('IBE', 'IBE_DSP_J_DUP_HIER_SCT_FAIL');
5409: FND_MSG_PUB.Add;
5410: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
5411: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
5412: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
5413: FND_MESSAGE.Set_Token('REASON', SQLERRM);
5410: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
5411: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
5412: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
5413: FND_MESSAGE.Set_Token('REASON', SQLERRM);
5414: FND_MSG_PUB.Add;
5415: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5416:
5417: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5418: THEN
5413: FND_MESSAGE.Set_Token('REASON', SQLERRM);
5414: FND_MSG_PUB.Add;
5415: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5416:
5417: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5418: THEN
5419: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5420: END IF;
5421:
5415: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5416:
5417: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5418: THEN
5419: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5420: END IF;
5421:
5422: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
5423: p_data => x_msg_data,
5418: THEN
5419: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
5420: END IF;
5421:
5422: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
5423: p_data => x_msg_data,
5424: p_encoded => 'F');
5425:
5426:
5913: p_api_version, l_api_name, g_pkg_name ) THEN
5914: RAISE FND_API.g_exc_unexpected_error;
5915: END IF;
5916: IF FND_API.to_boolean(p_init_msg_list) THEN
5917: FND_MSG_PUB.initialize;
5918: END IF;
5919: -- Initialize API return status to success
5920: x_return_status := FND_API.g_ret_sts_success;
5921:
6022: IF (FND_API.To_Boolean(p_commit)) THEN
6023: COMMIT;
6024: END IF;
6025: -- Standard call to get message count and if count is 1, get message info.
6026: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6027: p_data => x_msg_data,
6028: p_encoded => 'F');
6029: EXCEPTION
6030: WHEN FND_API.G_EXC_ERROR THEN
6032: fnd_file.put_line(fnd_file.log,'get G_EXC_ERROR in Cascade_Layout_Comp_Mapping');
6033: end if;
6034: ROLLBACK TO cascade_layout_comp_mapping;
6035: x_return_status := FND_API.G_RET_STS_ERROR;
6036: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6037: p_data => x_msg_data,
6038: p_encoded => 'F');
6039: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6040: if G_ENABLE_TRACE = 'Y' then
6041: fnd_file.put_line(fnd_file.log,'get G_EXC_UNEXPECTED_ERROR in Cascade_Layout_Comp_Mapping');
6042: end if;
6043: ROLLBACK TO cascade_layout_comp_mapping;
6044: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6045: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6046: p_data => x_msg_data,
6047: p_encoded => 'F');
6048: WHEN OTHERS THEN
6049: if G_ENABLE_TRACE = 'Y' then
6051: end if;
6052:
6053: ROLLBACK TO cascade_layout_comp_mapping;
6054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6055: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6056: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6057: END IF;
6058: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6059: p_data => x_msg_data,
6052:
6053: ROLLBACK TO cascade_layout_comp_mapping;
6054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6055: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6056: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6057: END IF;
6058: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6059: p_data => x_msg_data,
6060: p_encoded => 'F');
6054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6055: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6056: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6057: END IF;
6058: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6059: p_data => x_msg_data,
6060: p_encoded => 'F');
6061: END Cascade_Layout_Comp_Mapping;
6062:
6122: RAISE FND_API.g_exc_unexpected_error;
6123: END IF;
6124: IF FND_API.to_boolean(p_init_msg_list)
6125: THEN
6126: FND_MSG_PUB.initialize;
6127: END IF;
6128: --- Initialize API return status to success
6129: x_return_status := FND_API.g_ret_sts_success;
6130: l_debug := NVL(FND_PROFILE.VALUE('IBE_DEBUG'),'N');
6297: IF (FND_API.To_Boolean(p_commit)) THEN
6298: COMMIT WORK;
6299: END IF;
6300: -- Standard call to get message count and if count is 1, get message info.
6301: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6302: p_data => x_msg_data,
6303: p_encoded => 'F');
6304: EXCEPTION
6305: WHEN FND_API.G_EXC_ERROR THEN
6304: EXCEPTION
6305: WHEN FND_API.G_EXC_ERROR THEN
6306: ROLLBACK TO UPDATE_HIERARCHY_LAYOUT_MAP;
6307: x_return_status := FND_API.G_RET_STS_ERROR;
6308: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6309: p_data => x_msg_data,
6310: p_encoded => 'F');
6311: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6312: ROLLBACK TO UPDATE_HIERARCHY_LAYOUT_MAP;
6310: p_encoded => 'F');
6311: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6312: ROLLBACK TO UPDATE_HIERARCHY_LAYOUT_MAP;
6313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6314: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6315: p_data => x_msg_data,
6316: p_encoded => 'F');
6317: WHEN OTHERS THEN
6318: ROLLBACK TO UPDATE_HIERARCHY_LAYOUT_MAP;
6316: p_encoded => 'F');
6317: WHEN OTHERS THEN
6318: ROLLBACK TO UPDATE_HIERARCHY_LAYOUT_MAP;
6319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6320: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6321: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6322: END IF;
6323: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6324: p_data => x_msg_data,
6317: WHEN OTHERS THEN
6318: ROLLBACK TO UPDATE_HIERARCHY_LAYOUT_MAP;
6319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6320: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6321: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6322: END IF;
6323: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6324: p_data => x_msg_data,
6325: p_encoded => 'F');
6319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6320: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6321: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6322: END IF;
6323: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6324: p_data => x_msg_data,
6325: p_encoded => 'F');
6326: END Update_Hierarchy_Layout_Map;
6327:
6385: RAISE FND_API.g_exc_unexpected_error;
6386: END IF;
6387: IF FND_API.to_boolean(p_init_msg_list)
6388: THEN
6389: FND_MSG_PUB.initialize;
6390: END IF;
6391: --- Initialize API return status to success
6392: x_return_status := FND_API.g_ret_sts_success;
6393: l_debug := NVL(FND_PROFILE.VALUE('IBE_DEBUG'),'N');
6503: x_msg_data => l_msg_data);
6504: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
6505: IF (l_debug = 'Y') THEN
6506: FOR i in 1..l_msg_count loop
6507: l_msg_data := FND_MSG_PUB.get(i,FND_API.G_FALSE);
6508: IBE_UTIL.debug(l_msg_data);
6509: END LOOP;
6510: END IF;
6511: RAISE FND_API.G_EXC_ERROR;
6511: RAISE FND_API.G_EXC_ERROR;
6512: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
6513: IF (l_debug = 'Y') THEN
6514: FOR i in 1..l_msg_count loop
6515: l_msg_data := FND_MSG_PUB.get(i,FND_API.G_FALSE);
6516: IBE_UTIL.debug(l_msg_data);
6517: END LOOP;
6518: END IF;
6519: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6527: IF (FND_API.To_Boolean(p_commit)) THEN
6528: COMMIT;
6529: END IF;
6530: -- Standard call to get message count and if count is 1, get message info.
6531: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6532: p_data => x_msg_data,
6533: p_encoded => 'F');
6534: EXCEPTION
6535: WHEN FND_API.G_EXC_ERROR THEN
6534: EXCEPTION
6535: WHEN FND_API.G_EXC_ERROR THEN
6536: ROLLBACK TO UPDATE_SECTION_DLV_CTX;
6537: x_return_status := FND_API.G_RET_STS_ERROR;
6538: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6539: p_data => x_msg_data,
6540: p_encoded => 'F');
6541: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6542: ROLLBACK TO UPDATE_SECTION_DLV_CTX;
6540: p_encoded => 'F');
6541: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6542: ROLLBACK TO UPDATE_SECTION_DLV_CTX;
6543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6544: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6545: p_data => x_msg_data,
6546: p_encoded => 'F');
6547: WHEN OTHERS THEN
6548: ROLLBACK TO UPDATE_SECTION_DLV_CTX;
6546: p_encoded => 'F');
6547: WHEN OTHERS THEN
6548: ROLLBACK TO UPDATE_SECTION_DLV_CTX;
6549: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6550: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6551: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6552: END IF;
6553: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6554: p_data => x_msg_data,
6547: WHEN OTHERS THEN
6548: ROLLBACK TO UPDATE_SECTION_DLV_CTX;
6549: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6550: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6551: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6552: END IF;
6553: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6554: p_data => x_msg_data,
6555: p_encoded => 'F');
6549: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6550: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6551: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6552: END IF;
6553: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
6554: p_data => x_msg_data,
6555: p_encoded => 'F');
6556: END Update_Section_Dlv_Ctx;
6557:
6602: END IF;
6603:
6604: -- Initialize message list if p_init_msg_list is set to TRUE.
6605: IF FND_API.to_Boolean(p_init_msg_list) THEN
6606: FND_MSG_PUB.initialize;
6607: END IF;
6608: l_debug := NVL(FND_PROFILE.VALUE('IBE_DEBUG'),'N');
6609:
6610: IF (l_debug = 'Y') THEN
6681: l_overall_return_status:= FND_API.G_RET_STS_ERROR;
6682: END IF;
6683: IF (l_debug = 'Y') THEN
6684: FOR i in 1..x_msg_count loop
6685: IBE_UTIL.debug(FND_MSG_PUB.get(i,FND_API.G_FALSE));
6686: END LOOP;
6687: END IF;
6688: END IF;
6689:
6700: COMMIT WORK;
6701: END IF;
6702:
6703: -- Standard call to get message count and if count is 1, get message info.
6704: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6705: p_data => x_msg_data,
6706: p_encoded => 'F');
6707: EXCEPTION
6708:
6708:
6709: WHEN FND_API.G_EXC_ERROR THEN
6710: ROLLBACK TO ASSOCIATE_ITEMS_TO_SECTION_PVT;
6711: x_return_status := FND_API.G_RET_STS_ERROR;
6712: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6713: p_data => x_msg_data,
6714: p_encoded => 'F');
6715:
6716: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6715:
6716: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6717: ROLLBACK TO ASSOCIATE_ITEMS_TO_SECTION_PVT;
6718: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6719: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6720: p_data => x_msg_data,
6721: p_encoded => 'F');
6722:
6723: WHEN OTHERS THEN
6725: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
6726: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
6727: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
6728: FND_MESSAGE.Set_Token('REASON', SQLERRM);
6729: FND_MSG_PUB.Add;
6730: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6731:
6732: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6733: THEN
6728: FND_MESSAGE.Set_Token('REASON', SQLERRM);
6729: FND_MSG_PUB.Add;
6730: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6731:
6732: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6733: THEN
6734: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6735: END IF;
6736:
6730: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6731:
6732: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6733: THEN
6734: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6735: END IF;
6736:
6737: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6738: p_data => x_msg_data,
6733: THEN
6734: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
6735: END IF;
6736:
6737: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
6738: p_data => x_msg_data,
6739: p_encoded => 'F');
6740:
6741: END Associate_Items_To_Section;