91: EXCEPTION
92:
93: WHEN NO_DATA_FOUND THEN
94: FND_MESSAGE.Set_Name('BOM', 'CST_MGD_INFL_PER_NOT_CLOSED');
95: FND_MSG_PUB.Add;
96: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
97: THEN
98: FND_MSG_PUB.Add_Exc_Msg
99: ( G_PKG_NAME
92:
93: WHEN NO_DATA_FOUND THEN
94: FND_MESSAGE.Set_Name('BOM', 'CST_MGD_INFL_PER_NOT_CLOSED');
95: FND_MSG_PUB.Add;
96: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
97: THEN
98: FND_MSG_PUB.Add_Exc_Msg
99: ( G_PKG_NAME
100: , 'Check_Period_Close'
94: FND_MESSAGE.Set_Name('BOM', 'CST_MGD_INFL_PER_NOT_CLOSED');
95: FND_MSG_PUB.Add;
96: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
97: THEN
98: FND_MSG_PUB.Add_Exc_Msg
99: ( G_PKG_NAME
100: , 'Check_Period_Close'
101: );
102: END IF;
101: );
102: END IF;
103: RAISE g_period_not_closed_exc;
104: WHEN OTHERS THEN
105: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
106: THEN
107: FND_MSG_PUB.Add_Exc_Msg
108: ( G_PKG_NAME
109: , 'Check_Period_Close'
103: RAISE g_period_not_closed_exc;
104: WHEN OTHERS THEN
105: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
106: THEN
107: FND_MSG_PUB.Add_Exc_Msg
108: ( G_PKG_NAME
109: , 'Check_Period_Close'
110: );
111: END IF;
170: WHEN NO_DATA_FOUND THEN
171: NULL;
172:
173: WHEN OTHERS THEN
174: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
175: THEN
176: FND_MSG_PUB.Add_Exc_Msg
177: ( G_PKG_NAME
178: , 'Get_Previous_Acct_Period_ID'
172:
173: WHEN OTHERS THEN
174: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
175: THEN
176: FND_MSG_PUB.Add_Exc_Msg
177: ( G_PKG_NAME
178: , 'Get_Previous_Acct_Period_ID'
179: );
180: END IF;
227: EXCEPTION
228: WHEN NO_DATA_FOUND THEN
229: NULL;
230: WHEN OTHERS THEN
231: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
232: THEN
233: FND_MSG_PUB.Add_Exc_Msg
234: ( G_PKG_NAME
235: , 'Get_Prev_Org_Acct_Period_ID'
229: NULL;
230: WHEN OTHERS THEN
231: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
232: THEN
233: FND_MSG_PUB.Add_Exc_Msg
234: ( G_PKG_NAME
235: , 'Get_Prev_Org_Acct_Period_ID'
236: );
237: END IF;
286:
287: EXCEPTION
288:
289: WHEN OTHERS THEN
290: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
291: THEN
292: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
293: , 'Get_Curr_Period_Start_Date'
294: );
288:
289: WHEN OTHERS THEN
290: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
291: THEN
292: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
293: , 'Get_Curr_Period_Start_Date'
294: );
295: END IF;
296: RAISE;
473: END IF;
474:
475:
476: WHEN OTHERS THEN
477: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
478: THEN
479: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
480: , 'Get_Previous_Period_Info'
481: );
475:
476: WHEN OTHERS THEN
477: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
478: THEN
479: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
480: , 'Get_Previous_Period_Info'
481: );
482: END IF;
483: RAISE;
552:
553: EXCEPTION
554:
555: WHEN OTHERS THEN
556: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
557: THEN
558: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
559: , 'Get_Purchase_Qty'
560: );
554:
555: WHEN OTHERS THEN
556: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
557: THEN
558: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
559: , 'Get_Purchase_Qty'
560: );
561: END IF;
562: RAISE;
608:
609: EXCEPTION
610:
611: WHEN OTHERS THEN
612: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
613: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
614: , 'Get_Issue_Qty'
615: );
616: END IF;
609: EXCEPTION
610:
611: WHEN OTHERS THEN
612: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
613: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
614: , 'Get_Issue_Qty'
615: );
616: END IF;
617: RAISE;
668: x_transfer_rec := l_transfer_rec;
669:
670: EXCEPTION
671: WHEN OTHERS THEN
672: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
673: THEN
674: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
675: , 'Transfer_Tbl_Default'
676: );
670: EXCEPTION
671: WHEN OTHERS THEN
672: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
673: THEN
674: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
675: , 'Transfer_Tbl_Default'
676: );
677: END IF;
678: RAISE;
740: EXCEPTION
741:
742: WHEN l_missing_hist_data_exc THEN
743: FND_MESSAGE.Set_Name('BOM', 'CST_MGD_INFL_NO_HIST_DATA');
744: FND_MSG_PUB.Add;
745: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
746: THEN
747: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
748: , 'Check_First_Time'
741:
742: WHEN l_missing_hist_data_exc THEN
743: FND_MESSAGE.Set_Name('BOM', 'CST_MGD_INFL_NO_HIST_DATA');
744: FND_MSG_PUB.Add;
745: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
746: THEN
747: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
748: , 'Check_First_Time'
749: );
743: FND_MESSAGE.Set_Name('BOM', 'CST_MGD_INFL_NO_HIST_DATA');
744: FND_MSG_PUB.Add;
745: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
746: THEN
747: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
748: , 'Check_First_Time'
749: );
750: END IF;
751: RAISE g_no_hist_data_exc;
749: );
750: END IF;
751: RAISE g_no_hist_data_exc;
752: WHEN OTHERS THEN
753: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
754: THEN
755: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
756: , 'Check_First_Time'
757: );
751: RAISE g_no_hist_data_exc;
752: WHEN OTHERS THEN
753: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
754: THEN
755: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
756: , 'Check_First_Time'
757: );
758: END IF;
759: RAISE;
837:
838: EXCEPTION
839:
840: WHEN OTHERS THEN
841: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
842: THEN
843: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
844: , 'Infl_Item_Category'
845: );
839:
840: WHEN OTHERS THEN
841: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
842: THEN
843: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
844: , 'Infl_Item_Category'
845: );
846: END IF;
847: RAISE;
1484: Organization_ID = l_err_transfer_org_id;
1485:
1486: FND_MESSAGE.Set_Name('BOM', 'CST_MGD_INFL_PER_GAP_TNSF');
1487: FND_MESSAGE.Set_Token('ORG', l_transfer_org_code);
1488: FND_MSG_PUB.Add;
1489: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1490: THEN
1491: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
1492: , 'Calc_Inflation_Adj'
1485:
1486: FND_MESSAGE.Set_Name('BOM', 'CST_MGD_INFL_PER_GAP_TNSF');
1487: FND_MESSAGE.Set_Token('ORG', l_transfer_org_code);
1488: FND_MSG_PUB.Add;
1489: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1490: THEN
1491: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
1492: , 'Calc_Inflation_Adj'
1493: );
1487: FND_MESSAGE.Set_Token('ORG', l_transfer_org_code);
1488: FND_MSG_PUB.Add;
1489: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1490: THEN
1491: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
1492: , 'Calc_Inflation_Adj'
1493: );
1494: END IF;
1495: RAISE g_tnsf_period_gap_exc;
1493: );
1494: END IF;
1495: RAISE g_tnsf_period_gap_exc;
1496: WHEN OTHERS THEN
1497: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1498: THEN
1499: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
1500: , 'Calc_Inflation_Adj'
1501: );
1495: RAISE g_tnsf_period_gap_exc;
1496: WHEN OTHERS THEN
1497: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1498: THEN
1499: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
1500: , 'Calc_Inflation_Adj'
1501: );
1502: END IF;
1503: RAISE;
1583:
1584: EXCEPTION
1585:
1586: WHEN OTHERS THEN
1587: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1588: THEN
1589: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
1590: , 'Insert_Inflation_Adj'
1591: );
1585:
1586: WHEN OTHERS THEN
1587: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1588: THEN
1589: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
1590: , 'Insert_Inflation_Adj'
1591: );
1592: END IF;
1593: RAISE;
1650:
1651: EXCEPTION
1652:
1653: WHEN OTHERS THEN
1654: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1655: THEN
1656: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
1657: , 'Insert_Transfer_Entries'
1658: );
1652:
1653: WHEN OTHERS THEN
1654: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1655: THEN
1656: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
1657: , 'Insert_Transfer_Entries'
1658: );
1659: END IF;
1660: RAISE;
1727:
1728: -- Initialize message stack if required
1729: IF FND_API.to_Boolean(p_init_msg_list)
1730: THEN
1731: FND_MSG_PUB.initialize;
1732: END IF;
1733:
1734: l_inflation_adjustment_rec := p_inflation_adjustment_rec;
1735:
1818:
1819: WHEN FND_API.G_EXC_ERROR THEN
1820: x_return_status := FND_API.G_RET_STS_ERROR;
1821: -- Get message count and data
1822: FND_MSG_PUB.Count_And_Get
1823: ( p_count => x_msg_count
1824: , p_data => x_msg_data
1825: );
1826: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1825: );
1826: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1827: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1828: -- Get message count and data
1829: FND_MSG_PUB.Count_And_Get
1830: ( p_count => x_msg_count
1831: , p_data => x_msg_data
1832: );
1833: WHEN OTHERS THEN
1831: , p_data => x_msg_data
1832: );
1833: WHEN OTHERS THEN
1834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1835: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1836: THEN
1837: FND_MSG_PUB.Add_Exc_Msg
1838: ( G_PKG_NAME
1839: , 'Create_Inflation_Adjusted_Cost'
1833: WHEN OTHERS THEN
1834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1835: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1836: THEN
1837: FND_MSG_PUB.Add_Exc_Msg
1838: ( G_PKG_NAME
1839: , 'Create_Inflation_Adjusted_Cost'
1840: );
1841: END IF;
1839: , 'Create_Inflation_Adjusted_Cost'
1840: );
1841: END IF;
1842: -- Get message count and data
1843: FND_MSG_PUB.Count_And_Get
1844: ( p_count => x_msg_count
1845: , p_data => x_msg_data
1846: );
1847:
1926: WHERE Organization_ID = p_org_id
1927: AND Inventory_Item_ID = p_inv_item_id;
1928: FND_MESSAGE.Set_Name('BOM', 'CST_MGD_INFL_ACCT_CCID_NULL');
1929: FND_MESSAGE.Set_Token('ITEM', l_err_item_code);
1930: FND_MSG_PUB.Add;
1931: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1932: THEN
1933: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
1934: , 'Get_Acct_CCID'
1927: AND Inventory_Item_ID = p_inv_item_id;
1928: FND_MESSAGE.Set_Name('BOM', 'CST_MGD_INFL_ACCT_CCID_NULL');
1929: FND_MESSAGE.Set_Token('ITEM', l_err_item_code);
1930: FND_MSG_PUB.Add;
1931: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1932: THEN
1933: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
1934: , 'Get_Acct_CCID'
1935: );
1929: FND_MESSAGE.Set_Token('ITEM', l_err_item_code);
1930: FND_MSG_PUB.Add;
1931: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1932: THEN
1933: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
1934: , 'Get_Acct_CCID'
1935: );
1936: END IF;
1937: RAISE g_acct_ccid_null_exc;
1935: );
1936: END IF;
1937: RAISE g_acct_ccid_null_exc;
1938: WHEN OTHERS THEN
1939: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1940: THEN
1941: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
1942: , 'Get_Acct_CCID'
1943: );
1937: RAISE g_acct_ccid_null_exc;
1938: WHEN OTHERS THEN
1939: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1940: THEN
1941: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
1942: , 'Get_Acct_CCID'
1943: );
1944: END IF;
1945: RAISE;
1976:
1977: EXCEPTION
1978:
1979: WHEN OTHERS THEN
1980: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1981: THEN
1982: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
1983: , 'Get_Set_Of_Books_ID'
1984: );
1978:
1979: WHEN OTHERS THEN
1980: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1981: THEN
1982: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
1983: , 'Get_Set_Of_Books_ID'
1984: );
1985: END IF;
1986: RAISE;
2012:
2013: EXCEPTION
2014:
2015: WHEN OTHERS THEN
2016: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2017: THEN
2018: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2019: , 'Get_Currency_Code'
2020: );
2014:
2015: WHEN OTHERS THEN
2016: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2017: THEN
2018: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2019: , 'Get_Currency_Code'
2020: );
2021: END IF;
2022: RAISE;
2450:
2451: EXCEPTION
2452:
2453: WHEN OTHERS THEN
2454: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2455: THEN
2456: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2457: , 'GL_Interface_Default'
2458: );
2452:
2453: WHEN OTHERS THEN
2454: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2455: THEN
2456: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2457: , 'GL_Interface_Default'
2458: );
2459: END IF;
2460: RAISE;
2505:
2506: EXCEPTION
2507:
2508: WHEN OTHERS THEN
2509: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2510: THEN
2511: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2512: , 'Create_Journal_Entries'
2513: );
2507:
2508: WHEN OTHERS THEN
2509: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2510: THEN
2511: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2512: , 'Create_Journal_Entries'
2513: );
2514: END IF;
2515: RAISE;
2587: EXCEPTION
2588:
2589: WHEN OTHERS THEN
2590: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2591: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2592: THEN
2593: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2594: , 'Create_Infl_Period_Status'
2595: );
2589: WHEN OTHERS THEN
2590: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2591: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2592: THEN
2593: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2594: , 'Create_Infl_Period_Status'
2595: );
2596: END IF;
2597: RAISE;
2637: EXCEPTION
2638:
2639: WHEN OTHERS THEN
2640: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2641: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2642: THEN
2643: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2644: , 'Create_Period_Status'
2645: );
2639: WHEN OTHERS THEN
2640: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2641: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2642: THEN
2643: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2644: , 'Create_Period_Status'
2645: );
2646: END IF;
2647: RAISE;
2712: EXCEPTION
2713:
2714: WHEN OTHERS THEN
2715: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2716: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2717: THEN
2718: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2719: , 'Validate_Hist_Attributes'
2720: );
2714: WHEN OTHERS THEN
2715: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2716: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2717: THEN
2718: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2719: , 'Validate_Hist_Attributes'
2720: );
2721: END IF;
2722: RAISE;
2815:
2816: EXCEPTION
2817:
2818: WHEN OTHERS THEN
2819: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2820: THEN
2821: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2822: , 'Hist_Default'
2823: );
2817:
2818: WHEN OTHERS THEN
2819: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2820: THEN
2821: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2822: , 'Hist_Default'
2823: );
2824: END IF;
2825: RAISE;
2917: EXCEPTION
2918:
2919: WHEN l_nd_per_end_cost_exc THEN
2920: FND_MESSAGE.Set_Name('BOM', 'CST_MGD_INFL_UNIT_COST_NULL');
2921: FND_MSG_PUB.Add;
2922: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2923: THEN
2924: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2925: , 'Get_Period_End_Avg_Cost'
2918:
2919: WHEN l_nd_per_end_cost_exc THEN
2920: FND_MESSAGE.Set_Name('BOM', 'CST_MGD_INFL_UNIT_COST_NULL');
2921: FND_MSG_PUB.Add;
2922: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2923: THEN
2924: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2925: , 'Get_Period_End_Avg_Cost'
2926: );
2920: FND_MESSAGE.Set_Name('BOM', 'CST_MGD_INFL_UNIT_COST_NULL');
2921: FND_MSG_PUB.Add;
2922: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2923: THEN
2924: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2925: , 'Get_Period_End_Avg_Cost'
2926: );
2927: END IF;
2928:
2926: );
2927: END IF;
2928:
2929: WHEN OTHERS THEN
2930: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2931: THEN
2932: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2933: , 'Get_Period_End_Avg_Cost'
2934: );
2928:
2929: WHEN OTHERS THEN
2930: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2931: THEN
2932: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME
2933: , 'Get_Period_End_Avg_Cost'
2934: );
2935: END IF;
2936: RAISE;