471: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
472: END IF;
473: -- Initialize message list if p_init_msg_list is set to TRUE.
474: IF FND_API.to_Boolean( p_init_msg_list ) THEN
475: FND_MSG_PUB.initialize;
476: END IF;
477: -- Initialize API return status to success
478: x_return_status := FND_API.G_RET_STS_SUCCESS;
479: x_loading_status := 'CN_INSERTED';
692: EXCEPTION
693: WHEN FND_API.G_EXC_ERROR THEN
694: ROLLBACK TO get_adj;
695: x_return_status := FND_API.G_RET_STS_ERROR ;
696: FND_MSG_PUB.Count_And_Get(
697: p_count => x_msg_count ,
698: p_data => x_msg_data ,
699: p_encoded => FND_API.G_FALSE);
700: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
700: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
701: ROLLBACK TO get_adj;
702: x_loading_status := 'UNEXPECTED_ERR';
703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
704: FND_MSG_PUB.Count_And_Get(
705: p_count => x_msg_count ,
706: p_data => x_msg_data ,
707: p_encoded => FND_API.G_FALSE);
708: WHEN OTHERS THEN
708: WHEN OTHERS THEN
709: ROLLBACK TO get_adj;
710: x_loading_status := 'UNEXPECTED_ERR';
711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
712: IF FND_MSG_PUB.Check_Msg_Level(
713: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
714: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
715: END IF;
716: FND_MSG_PUB.Count_And_Get(
709: ROLLBACK TO get_adj;
710: x_loading_status := 'UNEXPECTED_ERR';
711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
712: IF FND_MSG_PUB.Check_Msg_Level(
713: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
714: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
715: END IF;
716: FND_MSG_PUB.Count_And_Get(
717: p_count => x_msg_count ,
710: x_loading_status := 'UNEXPECTED_ERR';
711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
712: IF FND_MSG_PUB.Check_Msg_Level(
713: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
714: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
715: END IF;
716: FND_MSG_PUB.Count_And_Get(
717: p_count => x_msg_count ,
718: p_data => x_msg_data ,
712: IF FND_MSG_PUB.Check_Msg_Level(
713: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
714: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
715: END IF;
716: FND_MSG_PUB.Count_And_Get(
717: p_count => x_msg_count ,
718: p_data => x_msg_data ,
719: p_encoded => FND_API.G_FALSE);
720: END;
792: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
793: END IF;
794: -- Initialize message list if p_init_msg_list is set to TRUE.
795: IF FND_API.to_Boolean( p_init_msg_list ) THEN
796: FND_MSG_PUB.initialize;
797: END IF;
798: -- Initialize API return status to success
799: x_return_status := FND_API.G_RET_STS_SUCCESS;
800: x_loading_status := 'CN_INSERTED';
1230: EXCEPTION
1231: WHEN FND_API.G_EXC_ERROR THEN
1232: ROLLBACK TO get_split_data;
1233: x_return_status := FND_API.G_RET_STS_ERROR ;
1234: FND_MSG_PUB.Count_And_Get(
1235: p_count => x_msg_count ,
1236: p_data => x_msg_data ,
1237: p_encoded => FND_API.G_FALSE);
1238: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1238: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1239: ROLLBACK TO get_split_data;
1240: x_loading_status := 'UNEXPECTED_ERR';
1241: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1242: FND_MSG_PUB.Count_And_Get(
1243: p_count => x_msg_count ,
1244: p_data => x_msg_data ,
1245: p_encoded => FND_API.G_FALSE);
1246: WHEN OTHERS THEN
1246: WHEN OTHERS THEN
1247: ROLLBACK TO get_split_data;
1248: x_loading_status := 'UNEXPECTED_ERR';
1249: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1250: IF FND_MSG_PUB.Check_Msg_Level(
1251: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1252: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1253: END IF;
1254: FND_MSG_PUB.Count_And_Get(
1247: ROLLBACK TO get_split_data;
1248: x_loading_status := 'UNEXPECTED_ERR';
1249: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1250: IF FND_MSG_PUB.Check_Msg_Level(
1251: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1252: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1253: END IF;
1254: FND_MSG_PUB.Count_And_Get(
1255: p_count => x_msg_count ,
1248: x_loading_status := 'UNEXPECTED_ERR';
1249: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1250: IF FND_MSG_PUB.Check_Msg_Level(
1251: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1252: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1253: END IF;
1254: FND_MSG_PUB.Count_And_Get(
1255: p_count => x_msg_count ,
1256: p_data => x_msg_data ,
1250: IF FND_MSG_PUB.Check_Msg_Level(
1251: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1252: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1253: END IF;
1254: FND_MSG_PUB.Count_And_Get(
1255: p_count => x_msg_count ,
1256: p_data => x_msg_data ,
1257: p_encoded => FND_API.G_FALSE);
1258: END;
1321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1322: END IF;
1323: -- Initialize message list if p_init_msg_list is set to TRUE.
1324: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1325: FND_MSG_PUB.initialize;
1326: END IF;
1327: -- Initialize API return status to success
1328: x_return_status := FND_API.G_RET_STS_SUCCESS;
1329: x_loading_status := 'CN_INSERTED';
1338: AND period_status IN ('O','F')
1339: AND org_id = p_newtx_rec.org_id;
1340: --
1341: IF (l_period_count = 0) THEN
1342: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
1343: FND_MESSAGE.Set_Name('CN', 'NOT_WITHIN_OPEN_PERIODS');
1344: FND_MSG_PUB.Add;
1345: END IF;
1346: x_loading_status := 'NOT_WITHIN_OPEN_PERIODS';
1340: --
1341: IF (l_period_count = 0) THEN
1342: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
1343: FND_MESSAGE.Set_Name('CN', 'NOT_WITHIN_OPEN_PERIODS');
1344: FND_MSG_PUB.Add;
1345: END IF;
1346: x_loading_status := 'NOT_WITHIN_OPEN_PERIODS';
1347: RAISE FND_API.G_EXC_ERROR ;
1348: ELSE
1407: x_return_status => l_return_status,
1408: p_conversion_type => CN_SYSTEM_PARAMETERS.VALUE('CN_CONVERSION_TYPE', p_newtx_rec.org_id));
1409: IF (l_return_status = 'NO DATA') THEN
1410: FND_MESSAGE.SET_NAME('CN','CN_ADJ_NO_CONVERSION');
1411: FND_MSG_PUB.Add;
1412: x_loading_status := 'CN_ADJ_NO_CONVERSION';
1413: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1414: ELSIF (l_return_status = 'ERROR') THEN
1415: FND_MESSAGE.SET_NAME('CN','CN_ADJ_CONV_ERROR');
1412: x_loading_status := 'CN_ADJ_NO_CONVERSION';
1413: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1414: ELSIF (l_return_status = 'ERROR') THEN
1415: FND_MESSAGE.SET_NAME('CN','CN_ADJ_CONV_ERROR');
1416: FND_MSG_PUB.Add;
1417: x_loading_status := 'CN_ADJ_NO_CONVERSION';
1418: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1419: END IF;
1420: END IF;
1437: x_return_status => l_return_status,
1438: p_conversion_type => CN_SYSTEM_PARAMETERS.VALUE('CN_CONVERSION_TYPE', p_newtx_rec.org_id));
1439: IF (l_return_status = 'NO DATA') THEN
1440: FND_MESSAGE.SET_NAME('CN','CN_ADJ_NO_CONVERSION');
1441: FND_MSG_PUB.Add;
1442: x_loading_status := 'CN_ADJ_NO_CONVERSION';
1443: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1444: ELSIF (l_return_status = 'ERROR') THEN
1445: FND_MESSAGE.SET_NAME('CN','CN_ADJ_CONV_ERROR');
1442: x_loading_status := 'CN_ADJ_NO_CONVERSION';
1443: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1444: ELSIF (l_return_status = 'ERROR') THEN
1445: FND_MESSAGE.SET_NAME('CN','CN_ADJ_CONV_ERROR');
1446: FND_MSG_PUB.Add;
1447: x_loading_status := 'CN_ADJ_NO_CONVERSION';
1448: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1449: END IF;
1450: END IF;
1468: EXCEPTION
1469: WHEN FND_API.G_EXC_ERROR THEN
1470: ROLLBACK TO insert_api_record;
1471: x_return_status := FND_API.G_RET_STS_ERROR ;
1472: FND_MSG_PUB.Count_And_Get(
1473: p_count => x_msg_count ,
1474: p_data => x_msg_data ,
1475: p_encoded => FND_API.G_FALSE);
1476: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1476: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1477: ROLLBACK TO insert_api_record;
1478: x_loading_status := 'UNEXPECTED_ERR';
1479: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1480: FND_MSG_PUB.Count_And_Get(
1481: p_count => x_msg_count ,
1482: p_data => x_msg_data ,
1483: p_encoded => FND_API.G_FALSE);
1484: WHEN OTHERS THEN
1484: WHEN OTHERS THEN
1485: ROLLBACK TO insert_api_record;
1486: x_loading_status := 'UNEXPECTED_ERR';
1487: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1488: IF FND_MSG_PUB.Check_Msg_Level(
1489: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1490: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1491: END IF;
1492: FND_MSG_PUB.Count_And_Get(
1485: ROLLBACK TO insert_api_record;
1486: x_loading_status := 'UNEXPECTED_ERR';
1487: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1488: IF FND_MSG_PUB.Check_Msg_Level(
1489: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1490: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1491: END IF;
1492: FND_MSG_PUB.Count_And_Get(
1493: p_count => x_msg_count ,
1486: x_loading_status := 'UNEXPECTED_ERR';
1487: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1488: IF FND_MSG_PUB.Check_Msg_Level(
1489: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1490: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1491: END IF;
1492: FND_MSG_PUB.Count_And_Get(
1493: p_count => x_msg_count ,
1494: p_data => x_msg_data ,
1488: IF FND_MSG_PUB.Check_Msg_Level(
1489: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1490: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1491: END IF;
1492: FND_MSG_PUB.Count_And_Get(
1493: p_count => x_msg_count ,
1494: p_data => x_msg_data ,
1495: p_encoded => FND_API.G_FALSE);
1496: END;
1541: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1542: END IF;
1543: -- Initialize message list if p_init_msg_list is set to TRUE.
1544: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1545: FND_MSG_PUB.initialize;
1546: END IF;
1547: -- Initialize API return status to success
1548: x_return_status := FND_API.G_RET_STS_SUCCESS;
1549: x_loading_status := 'CN_INSERTED';
1634: EXCEPTION
1635: WHEN FND_API.G_EXC_ERROR THEN
1636: ROLLBACK TO call_mass_update;
1637: x_return_status := FND_API.G_RET_STS_ERROR ;
1638: FND_MSG_PUB.Count_And_Get(
1639: p_count => x_msg_count ,
1640: p_data => x_msg_data ,
1641: p_encoded => FND_API.G_FALSE);
1642: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1642: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1643: ROLLBACK TO call_mass_update;
1644: x_loading_status := 'UNEXPECTED_ERR';
1645: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1646: FND_MSG_PUB.Count_And_Get(
1647: p_count => x_msg_count ,
1648: p_data => x_msg_data ,
1649: p_encoded => FND_API.G_FALSE);
1650: WHEN OTHERS THEN
1650: WHEN OTHERS THEN
1651: ROLLBACK TO call_mass_update;
1652: x_loading_status := 'UNEXPECTED_ERR';
1653: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1654: IF FND_MSG_PUB.Check_Msg_Level(
1655: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1656: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1657: END IF;
1658: FND_MSG_PUB.Count_And_Get(
1651: ROLLBACK TO call_mass_update;
1652: x_loading_status := 'UNEXPECTED_ERR';
1653: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1654: IF FND_MSG_PUB.Check_Msg_Level(
1655: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1656: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1657: END IF;
1658: FND_MSG_PUB.Count_And_Get(
1659: p_count => x_msg_count ,
1652: x_loading_status := 'UNEXPECTED_ERR';
1653: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1654: IF FND_MSG_PUB.Check_Msg_Level(
1655: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1656: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1657: END IF;
1658: FND_MSG_PUB.Count_And_Get(
1659: p_count => x_msg_count ,
1660: p_data => x_msg_data ,
1654: IF FND_MSG_PUB.Check_Msg_Level(
1655: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1656: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1657: END IF;
1658: FND_MSG_PUB.Count_And_Get(
1659: p_count => x_msg_count ,
1660: p_data => x_msg_data ,
1661: p_encoded => FND_API.G_FALSE);
1662: END;
1696: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1697: END IF;
1698: -- Initialize message list if p_init_msg_list is set to TRUE.
1699: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1700: FND_MSG_PUB.initialize;
1701: END IF;
1702: -- Initialize API return status to success
1703: x_return_status := FND_API.G_RET_STS_SUCCESS;
1704: x_loading_status := 'CN_INSERTED';
1724: EXCEPTION
1725: WHEN FND_API.G_EXC_ERROR THEN
1726: ROLLBACK TO call_deal_assign;
1727: x_return_status := FND_API.G_RET_STS_ERROR ;
1728: FND_MSG_PUB.Count_And_Get(
1729: p_count => x_msg_count ,
1730: p_data => x_msg_data ,
1731: p_encoded => FND_API.G_FALSE);
1732: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1732: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1733: ROLLBACK TO call_deal_assign;
1734: x_loading_status := 'UNEXPECTED_ERR';
1735: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1736: FND_MSG_PUB.Count_And_Get(
1737: p_count => x_msg_count ,
1738: p_data => x_msg_data ,
1739: p_encoded => FND_API.G_FALSE);
1740: WHEN OTHERS THEN
1740: WHEN OTHERS THEN
1741: ROLLBACK TO call_deal_assign;
1742: x_loading_status := 'UNEXPECTED_ERR';
1743: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1744: IF FND_MSG_PUB.Check_Msg_Level(
1745: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1746: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1747: END IF;
1748: FND_MSG_PUB.Count_And_Get(
1741: ROLLBACK TO call_deal_assign;
1742: x_loading_status := 'UNEXPECTED_ERR';
1743: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1744: IF FND_MSG_PUB.Check_Msg_Level(
1745: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1746: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1747: END IF;
1748: FND_MSG_PUB.Count_And_Get(
1749: p_count => x_msg_count ,
1742: x_loading_status := 'UNEXPECTED_ERR';
1743: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1744: IF FND_MSG_PUB.Check_Msg_Level(
1745: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1746: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1747: END IF;
1748: FND_MSG_PUB.Count_And_Get(
1749: p_count => x_msg_count ,
1750: p_data => x_msg_data ,
1744: IF FND_MSG_PUB.Check_Msg_Level(
1745: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1746: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
1747: END IF;
1748: FND_MSG_PUB.Count_And_Get(
1749: p_count => x_msg_count ,
1750: p_data => x_msg_data ,
1751: p_encoded => FND_API.G_FALSE);
1752: END;
1829: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1830: END IF;
1831: -- Initialize message list if p_init_msg_list is set to TRUE.
1832: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1833: FND_MSG_PUB.initialize;
1834: END IF;
1835: -- Initialize API return status to success
1836: x_return_status := FND_API.G_RET_STS_SUCCESS;
1837: x_loading_status := 'CN_INSERTED';
1846: l_id_counter := l_id_counter + 1;
1847: END IF;
1848: END LOOP;
1849: IF (l_id_counter = 0) THEN
1850: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
1851: FND_MESSAGE.Set_Name('CN', 'CN_NO_SPLIT_RESOURCE');
1852: FND_MSG_PUB.Add;
1853: END IF;
1854: x_loading_status := 'CN_NO_SPLIT_RESOURCE';
1848: END LOOP;
1849: IF (l_id_counter = 0) THEN
1850: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
1851: FND_MESSAGE.Set_Name('CN', 'CN_NO_SPLIT_RESOURCE');
1852: FND_MSG_PUB.Add;
1853: END IF;
1854: x_loading_status := 'CN_NO_SPLIT_RESOURCE';
1855: RAISE FND_API.G_EXC_ERROR;
1856: END IF;
1873: (l_adj_tbl(1).split_pct <> 0)) THEN -- 2
1874:
1875: -- bug 2118574
1876: -- IF (l_split_amount <> p_transaction_amount) THEN
1877: -- IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
1878: -- FND_MESSAGE.Set_Name('CN', 'CN_ADJ_SPLIT_AMOUNT');
1879: -- FND_MSG_PUB.Add;
1880: -- END IF;
1881: -- x_loading_status := 'CN_ADJ_SPLIT_AMOUNT';
1875: -- bug 2118574
1876: -- IF (l_split_amount <> p_transaction_amount) THEN
1877: -- IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
1878: -- FND_MESSAGE.Set_Name('CN', 'CN_ADJ_SPLIT_AMOUNT');
1879: -- FND_MSG_PUB.Add;
1880: -- END IF;
1881: -- x_loading_status := 'CN_ADJ_SPLIT_AMOUNT';
1882: -- RAISE FND_API.G_EXC_ERROR;
1883: -- END IF;
1883: -- END IF;
1884:
1885:
1886: IF (l_split_percent <> l_adj_tbl(1).split_pct) THEN
1887: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
1888: FND_MESSAGE.Set_Name('CN', 'CN_ADJ_SPLIT_PERCENT');
1889: FND_MSG_PUB.Add;
1890: END IF;
1891: x_loading_status := 'CN_ADJ_SPLIT_PERCENT';
1885:
1886: IF (l_split_percent <> l_adj_tbl(1).split_pct) THEN
1887: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
1888: FND_MESSAGE.Set_Name('CN', 'CN_ADJ_SPLIT_PERCENT');
1889: FND_MSG_PUB.Add;
1890: END IF;
1891: x_loading_status := 'CN_ADJ_SPLIT_PERCENT';
1892: RAISE FND_API.G_EXC_ERROR;
1893: END IF;
1927: x_msg_data => x_msg_data,
1928: x_loading_status => x_loading_status);
1929: --
1930: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1931: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
1932: FND_MESSAGE.Set_Name('CN', 'CN_UPDATE_INV_ERROR');
1933: FND_MSG_PUB.Add;
1934: END IF;
1935: x_loading_status := 'CN_UPDATE_INV_ERROR';
1929: --
1930: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1931: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
1932: FND_MESSAGE.Set_Name('CN', 'CN_UPDATE_INV_ERROR');
1933: FND_MSG_PUB.Add;
1934: END IF;
1935: x_loading_status := 'CN_UPDATE_INV_ERROR';
1936: RAISE FND_API.G_EXC_ERROR;
1937: END IF;
2043:
2044: --
2045: EXCEPTION
2046: WHEN OTHERS THEN
2047: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2048: FND_MESSAGE.Set_Name('CN', 'CN_SPLIT_TRX_ERROR');
2049: FND_MSG_PUB.Add;
2050: END IF;
2051: x_loading_status := 'CN_SPLIT_TRX_ERROR';
2045: EXCEPTION
2046: WHEN OTHERS THEN
2047: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2048: FND_MESSAGE.Set_Name('CN', 'CN_SPLIT_TRX_ERROR');
2049: FND_MSG_PUB.Add;
2050: END IF;
2051: x_loading_status := 'CN_SPLIT_TRX_ERROR';
2052: RAISE FND_API.G_EXC_ERROR;
2053: END;
2070: x_msg_data => x_msg_data,
2071: x_loading_status => x_loading_status);
2072: --
2073: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2074: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2075: FND_MESSAGE.Set_Name('CN', 'CN_UPDATE_INV_ERROR');
2076: FND_MSG_PUB.Add;
2077: END IF;
2078: x_loading_status := 'CN_UPDATE_INV_ERROR';
2072: --
2073: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2074: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2075: FND_MESSAGE.Set_Name('CN', 'CN_UPDATE_INV_ERROR');
2076: FND_MSG_PUB.Add;
2077: END IF;
2078: x_loading_status := 'CN_UPDATE_INV_ERROR';
2079: RAISE FND_API.G_EXC_ERROR;
2080: END IF;
2095: x_loading_status => x_loading_status);
2096: END IF;
2097: --
2098: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2099: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2100: FND_MESSAGE.Set_Name('CN', 'CN_UPDATE_CM_ERROR');
2101: FND_MSG_PUB.Add;
2102: END IF;
2103: x_loading_status := 'CN_UPDATE_CM_ERROR';
2097: --
2098: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2099: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2100: FND_MESSAGE.Set_Name('CN', 'CN_UPDATE_CM_ERROR');
2101: FND_MSG_PUB.Add;
2102: END IF;
2103: x_loading_status := 'CN_UPDATE_CM_ERROR';
2104: RAISE FND_API.G_EXC_ERROR;
2105: END IF;
2141: END IF;
2142: END IF;
2143: EXCEPTION
2144: WHEN OTHERS THEN
2145: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2146: FND_MESSAGE.Set_Name('CN', 'CN_DEAL_REV_ERROR');
2147: FND_MSG_PUB.Add;
2148: END IF;
2149: x_loading_status := 'CN_DEAL_REV_ERROR';
2143: EXCEPTION
2144: WHEN OTHERS THEN
2145: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2146: FND_MESSAGE.Set_Name('CN', 'CN_DEAL_REV_ERROR');
2147: FND_MSG_PUB.Add;
2148: END IF;
2149: x_loading_status := 'CN_DEAL_REV_ERROR';
2150: RAISE FND_API.G_EXC_ERROR;
2151: END;
2173: END IF;
2174: END IF;
2175: EXCEPTION
2176: WHEN OTHERS THEN
2177: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2178: FND_MESSAGE.Set_Name('CN', 'CN_DEAL_REV_ERROR');
2179: FND_MSG_PUB.Add;
2180: END IF;
2181: x_loading_status := 'CN_DEAL_REV_ERROR';
2175: EXCEPTION
2176: WHEN OTHERS THEN
2177: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2178: FND_MESSAGE.Set_Name('CN', 'CN_DEAL_REV_ERROR');
2179: FND_MSG_PUB.Add;
2180: END IF;
2181: x_loading_status := 'CN_DEAL_REV_ERROR';
2182: RAISE FND_API.G_EXC_ERROR;
2183: END;
2189: l_split_percent := l_split_percent + NVL(p_split_data_tbl(i).split_pct,0);
2190: END IF;
2191: END LOOP;
2192: IF ((l_split_percent <> 100) AND (l_deal_type = 'REVENUE')) THEN
2193: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2194: FND_MESSAGE.Set_Name('CN', 'CN_ADJ_SPLIT_PERCENT');
2195: FND_MSG_PUB.Add;
2196: END IF;
2197: x_loading_status := 'CN_ADJ_SPLIT_PERCENT';
2191: END LOOP;
2192: IF ((l_split_percent <> 100) AND (l_deal_type = 'REVENUE')) THEN
2193: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2194: FND_MESSAGE.Set_Name('CN', 'CN_ADJ_SPLIT_PERCENT');
2195: FND_MSG_PUB.Add;
2196: END IF;
2197: x_loading_status := 'CN_ADJ_SPLIT_PERCENT';
2198: RAISE FND_API.G_EXC_ERROR;
2199: END IF;
2331: END LOOP;
2332:
2333: --
2334: IF (l_data_exist = 'N') THEN
2335: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2336: FND_MESSAGE.Set_Name('CN', 'CN_NO_REC_DEAL');
2337: FND_MSG_PUB.Add;
2338: END IF;
2339: x_loading_status := 'CN_NO_REC_DEAL';
2333: --
2334: IF (l_data_exist = 'N') THEN
2335: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2336: FND_MESSAGE.Set_Name('CN', 'CN_NO_REC_DEAL');
2337: FND_MSG_PUB.Add;
2338: END IF;
2339: x_loading_status := 'CN_NO_REC_DEAL';
2340: RAISE FND_API.G_EXC_ERROR;
2341: END IF;
2472: END IF;
2473: END LOOP;
2474: END LOOP;
2475: ELSE
2476: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2477: FND_MESSAGE.Set_Name('CN', 'CN_NO_REC_DEAL');
2478: FND_MSG_PUB.Add;
2479: END IF;
2480: x_loading_status := 'CN_NO_REC_DEAL';
2474: END LOOP;
2475: ELSE
2476: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2477: FND_MESSAGE.Set_Name('CN', 'CN_NO_REC_DEAL');
2478: FND_MSG_PUB.Add;
2479: END IF;
2480: x_loading_status := 'CN_NO_REC_DEAL';
2481: RAISE FND_API.G_EXC_ERROR;
2482: END IF; -- 11 end
2503: x_msg_data => x_msg_data,
2504: x_loading_status => x_loading_status);
2505: --
2506: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2507: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2508: FND_MESSAGE.Set_Name('CN', 'CN_UPDATE_INV_ERROR');
2509: FND_MSG_PUB.Add;
2510: END IF;
2511: x_loading_status := 'CN_UPDATE_INV_ERROR';
2505: --
2506: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2507: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
2508: FND_MESSAGE.Set_Name('CN', 'CN_UPDATE_INV_ERROR');
2509: FND_MSG_PUB.Add;
2510: END IF;
2511: x_loading_status := 'CN_UPDATE_INV_ERROR';
2512: RAISE FND_API.G_EXC_ERROR;
2513: END IF;
2663: EXCEPTION
2664: WHEN FND_API.G_EXC_ERROR THEN
2665: ROLLBACK TO call_split;
2666: x_return_status := FND_API.G_RET_STS_ERROR ;
2667: FND_MSG_PUB.Count_And_Get(
2668: p_count => x_msg_count ,
2669: p_data => x_msg_data ,
2670: p_encoded => FND_API.G_FALSE);
2671: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2671: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2672: ROLLBACK TO call_split;
2673: x_loading_status := 'UNEXPECTED_ERR';
2674: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2675: FND_MSG_PUB.Count_And_Get(
2676: p_count => x_msg_count ,
2677: p_data => x_msg_data ,
2678: p_encoded => FND_API.G_FALSE);
2679: WHEN OTHERS THEN
2679: WHEN OTHERS THEN
2680: ROLLBACK TO call_split;
2681: x_loading_status := 'UNEXPECTED_ERR';
2682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2683: IF FND_MSG_PUB.Check_Msg_Level(
2684: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2685: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
2686: END IF;
2687: FND_MSG_PUB.Count_And_Get(
2680: ROLLBACK TO call_split;
2681: x_loading_status := 'UNEXPECTED_ERR';
2682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2683: IF FND_MSG_PUB.Check_Msg_Level(
2684: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2685: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
2686: END IF;
2687: FND_MSG_PUB.Count_And_Get(
2688: p_count => x_msg_count ,
2681: x_loading_status := 'UNEXPECTED_ERR';
2682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2683: IF FND_MSG_PUB.Check_Msg_Level(
2684: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2685: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
2686: END IF;
2687: FND_MSG_PUB.Count_And_Get(
2688: p_count => x_msg_count ,
2689: p_data => x_msg_data ,
2683: IF FND_MSG_PUB.Check_Msg_Level(
2684: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2685: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
2686: END IF;
2687: FND_MSG_PUB.Count_And_Get(
2688: p_count => x_msg_count ,
2689: p_data => x_msg_data ,
2690: p_encoded => FND_API.G_FALSE);
2691: END;
2721: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2722: END IF;
2723: -- Initialize message list if p_init_msg_list is set to TRUE.
2724: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2725: FND_MSG_PUB.initialize;
2726: END IF;
2727: -- Initialize API return status to success
2728: x_return_status := FND_API.G_RET_STS_SUCCESS;
2729: x_loading_status := 'CN_INSERTED';
2756: EXCEPTION
2757: WHEN FND_API.G_EXC_ERROR THEN
2758: ROLLBACK TO get_trx_lines;
2759: x_return_status := FND_API.G_RET_STS_ERROR ;
2760: FND_MSG_PUB.Count_And_Get(
2761: p_count => x_msg_count ,
2762: p_data => x_msg_data ,
2763: p_encoded => FND_API.G_FALSE);
2764: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2764: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2765: ROLLBACK TO get_trx_lines;
2766: x_loading_status := 'UNEXPECTED_ERR';
2767: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2768: FND_MSG_PUB.Count_And_Get(
2769: p_count => x_msg_count ,
2770: p_data => x_msg_data ,
2771: p_encoded => FND_API.G_FALSE);
2772: WHEN OTHERS THEN
2772: WHEN OTHERS THEN
2773: ROLLBACK TO get_trx_lines;
2774: x_loading_status := 'UNEXPECTED_ERR';
2775: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2776: IF FND_MSG_PUB.Check_Msg_Level(
2777: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2778: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
2779: END IF;
2780: FND_MSG_PUB.Count_And_Get(
2773: ROLLBACK TO get_trx_lines;
2774: x_loading_status := 'UNEXPECTED_ERR';
2775: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2776: IF FND_MSG_PUB.Check_Msg_Level(
2777: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2778: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
2779: END IF;
2780: FND_MSG_PUB.Count_And_Get(
2781: p_count => x_msg_count ,
2774: x_loading_status := 'UNEXPECTED_ERR';
2775: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2776: IF FND_MSG_PUB.Check_Msg_Level(
2777: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2778: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
2779: END IF;
2780: FND_MSG_PUB.Count_And_Get(
2781: p_count => x_msg_count ,
2782: p_data => x_msg_data ,
2776: IF FND_MSG_PUB.Check_Msg_Level(
2777: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2778: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
2779: END IF;
2780: FND_MSG_PUB.Count_And_Get(
2781: p_count => x_msg_count ,
2782: p_data => x_msg_data ,
2783: p_encoded => FND_API.G_FALSE);
2784: END;
2848: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2849: END IF;
2850: -- Initialize message list if p_init_msg_list is set to TRUE.
2851: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2852: FND_MSG_PUB.initialize;
2853: END IF;
2854: -- Initialize API return status to success
2855: x_return_status := FND_API.G_RET_STS_SUCCESS;
2856: x_loading_status := 'CN_INSERTED';
2888: x_adj_count := x_adj_tbl.COUNT;
2889: EXCEPTION
2890: WHEN FND_API.G_EXC_ERROR THEN
2891: x_return_status := FND_API.G_RET_STS_ERROR ;
2892: FND_MSG_PUB.Count_And_Get(
2893: p_count => x_msg_count ,
2894: p_data => x_msg_data ,
2895: p_encoded => FND_API.G_FALSE);
2896: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2895: p_encoded => FND_API.G_FALSE);
2896: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2897: x_loading_status := 'UNEXPECTED_ERR';
2898: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2899: FND_MSG_PUB.Count_And_Get(
2900: p_count => x_msg_count ,
2901: p_data => x_msg_data ,
2902: p_encoded => FND_API.G_FALSE);
2903: WHEN OTHERS THEN
2902: p_encoded => FND_API.G_FALSE);
2903: WHEN OTHERS THEN
2904: x_loading_status := 'UNEXPECTED_ERR';
2905: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2906: IF FND_MSG_PUB.Check_Msg_Level(
2907: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2908: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
2909: END IF;
2910: FND_MSG_PUB.Count_And_Get(
2903: WHEN OTHERS THEN
2904: x_loading_status := 'UNEXPECTED_ERR';
2905: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2906: IF FND_MSG_PUB.Check_Msg_Level(
2907: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2908: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
2909: END IF;
2910: FND_MSG_PUB.Count_And_Get(
2911: p_count => x_msg_count ,
2904: x_loading_status := 'UNEXPECTED_ERR';
2905: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2906: IF FND_MSG_PUB.Check_Msg_Level(
2907: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2908: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
2909: END IF;
2910: FND_MSG_PUB.Count_And_Get(
2911: p_count => x_msg_count ,
2912: p_data => x_msg_data ,
2906: IF FND_MSG_PUB.Check_Msg_Level(
2907: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2908: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
2909: END IF;
2910: FND_MSG_PUB.Count_And_Get(
2911: p_count => x_msg_count ,
2912: p_data => x_msg_data ,
2913: p_encoded => FND_API.G_FALSE);
2914: END;
2942: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2943: END IF;
2944: -- Initialize message list if p_init_msg_list is set to TRUE.
2945: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2946: FND_MSG_PUB.initialize;
2947: END IF;
2948: -- Initialize API return status to success
2949: x_return_status := FND_API.G_RET_STS_SUCCESS;
2950: x_loading_status := 'CN_INSERTED';
2978: x_cust_info_rec.ship_to_contact := l_cust_info_rec.ship_to_contact;
2979: EXCEPTION
2980: WHEN FND_API.G_EXC_ERROR THEN
2981: x_return_status := FND_API.G_RET_STS_ERROR ;
2982: FND_MSG_PUB.Count_And_Get(
2983: p_count => x_msg_count ,
2984: p_data => x_msg_data ,
2985: p_encoded => FND_API.G_FALSE);
2986: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2985: p_encoded => FND_API.G_FALSE);
2986: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2987: x_loading_status := 'UNEXPECTED_ERR';
2988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2989: FND_MSG_PUB.Count_And_Get(
2990: p_count => x_msg_count ,
2991: p_data => x_msg_data ,
2992: p_encoded => FND_API.G_FALSE);
2993: WHEN OTHERS THEN
2992: p_encoded => FND_API.G_FALSE);
2993: WHEN OTHERS THEN
2994: x_loading_status := 'UNEXPECTED_ERR';
2995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2996: IF FND_MSG_PUB.Check_Msg_Level(
2997: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2998: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
2999: END IF;
3000: FND_MSG_PUB.Count_And_Get(
2993: WHEN OTHERS THEN
2994: x_loading_status := 'UNEXPECTED_ERR';
2995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2996: IF FND_MSG_PUB.Check_Msg_Level(
2997: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2998: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
2999: END IF;
3000: FND_MSG_PUB.Count_And_Get(
3001: p_count => x_msg_count ,
2994: x_loading_status := 'UNEXPECTED_ERR';
2995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2996: IF FND_MSG_PUB.Check_Msg_Level(
2997: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2998: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
2999: END IF;
3000: FND_MSG_PUB.Count_And_Get(
3001: p_count => x_msg_count ,
3002: p_data => x_msg_data ,
2996: IF FND_MSG_PUB.Check_Msg_Level(
2997: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2998: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
2999: END IF;
3000: FND_MSG_PUB.Count_And_Get(
3001: p_count => x_msg_count ,
3002: p_data => x_msg_data ,
3003: p_encoded => FND_API.G_FALSE);
3004: END;
3037: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3038: END IF;
3039: -- Initialize message list if p_init_msg_list is set to TRUE.
3040: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3041: FND_MSG_PUB.initialize;
3042: END IF;
3043: -- Initialize API return status to success
3044: x_return_status := FND_API.G_RET_STS_SUCCESS;
3045: x_loading_status := 'CN_INSERTED';
3084: x_msg_data => x_msg_data,
3085: x_loading_status => x_loading_status);
3086: --
3087: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3088: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
3089: FND_MESSAGE.Set_Name('CN', 'CN_UPDATE_INV_ERROR');
3090: FND_MSG_PUB.Add;
3091: END IF;
3092: x_loading_status := 'CN_UPDATE_INV_ERROR';
3086: --
3087: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3088: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
3089: FND_MESSAGE.Set_Name('CN', 'CN_UPDATE_INV_ERROR');
3090: FND_MSG_PUB.Add;
3091: END IF;
3092: x_loading_status := 'CN_UPDATE_INV_ERROR';
3093: RAISE FND_API.G_EXC_ERROR;
3094: END IF;
3171: x_msg_data => x_msg_data,
3172: x_loading_status => x_loading_status);
3173: --
3174: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3175: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
3176: FND_MESSAGE.Set_Name('CN', 'CN_UPDATE_INV_ERROR');
3177: FND_MSG_PUB.Add;
3178: END IF;
3179: x_loading_status := 'CN_UPDATE_INV_ERROR';
3173: --
3174: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3175: IF (FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)) THEN
3176: FND_MESSAGE.Set_Name('CN', 'CN_UPDATE_INV_ERROR');
3177: FND_MSG_PUB.Add;
3178: END IF;
3179: x_loading_status := 'CN_UPDATE_INV_ERROR';
3180: RAISE FND_API.G_EXC_ERROR;
3181: END IF;
3202:
3203: EXCEPTION
3204: WHEN FND_API.G_EXC_ERROR THEN
3205: x_return_status := FND_API.G_RET_STS_ERROR ;
3206: FND_MSG_PUB.Count_And_Get(
3207: p_count => x_msg_count ,
3208: p_data => x_msg_data ,
3209: p_encoded => FND_API.G_FALSE);
3210: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3209: p_encoded => FND_API.G_FALSE);
3210: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3211: x_loading_status := 'UNEXPECTED_ERR';
3212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3213: FND_MSG_PUB.Count_And_Get(
3214: p_count => x_msg_count ,
3215: p_data => x_msg_data ,
3216: p_encoded => FND_API.G_FALSE);
3217: WHEN OTHERS THEN
3216: p_encoded => FND_API.G_FALSE);
3217: WHEN OTHERS THEN
3218: x_loading_status := 'UNEXPECTED_ERR';
3219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3220: IF FND_MSG_PUB.Check_Msg_Level(
3221: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3222: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
3223: END IF;
3224: FND_MSG_PUB.Count_And_Get(
3217: WHEN OTHERS THEN
3218: x_loading_status := 'UNEXPECTED_ERR';
3219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3220: IF FND_MSG_PUB.Check_Msg_Level(
3221: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3222: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
3223: END IF;
3224: FND_MSG_PUB.Count_And_Get(
3225: p_count => x_msg_count ,
3218: x_loading_status := 'UNEXPECTED_ERR';
3219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3220: IF FND_MSG_PUB.Check_Msg_Level(
3221: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3222: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
3223: END IF;
3224: FND_MSG_PUB.Count_And_Get(
3225: p_count => x_msg_count ,
3226: p_data => x_msg_data ,
3220: IF FND_MSG_PUB.Check_Msg_Level(
3221: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3222: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
3223: END IF;
3224: FND_MSG_PUB.Count_And_Get(
3225: p_count => x_msg_count ,
3226: p_data => x_msg_data ,
3227: p_encoded => FND_API.G_FALSE);
3228: END;
3260: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3261: END IF;
3262: -- Initialize message list if p_init_msg_list is set to TRUE.
3263: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3264: FND_MSG_PUB.initialize;
3265: END IF;
3266: -- Initialize API return status to success
3267: x_return_status := FND_API.G_RET_STS_SUCCESS;
3268: x_loading_status := 'CN_INSERTED';
3303: END IF;
3304: EXCEPTION
3305: WHEN FND_API.G_EXC_ERROR THEN
3306: x_return_status := FND_API.G_RET_STS_ERROR ;
3307: FND_MSG_PUB.Count_And_Get(
3308: p_count => x_msg_count ,
3309: p_data => x_msg_data ,
3310: p_encoded => FND_API.G_FALSE);
3311: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3310: p_encoded => FND_API.G_FALSE);
3311: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3312: x_loading_status := 'UNEXPECTED_ERR';
3313: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3314: FND_MSG_PUB.Count_And_Get(
3315: p_count => x_msg_count ,
3316: p_data => x_msg_data ,
3317: p_encoded => FND_API.G_FALSE);
3318: WHEN OTHERS THEN
3317: p_encoded => FND_API.G_FALSE);
3318: WHEN OTHERS THEN
3319: x_loading_status := 'UNEXPECTED_ERR';
3320: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3321: IF FND_MSG_PUB.Check_Msg_Level(
3322: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3323: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
3324: END IF;
3325: FND_MSG_PUB.Count_And_Get(
3318: WHEN OTHERS THEN
3319: x_loading_status := 'UNEXPECTED_ERR';
3320: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3321: IF FND_MSG_PUB.Check_Msg_Level(
3322: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3323: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
3324: END IF;
3325: FND_MSG_PUB.Count_And_Get(
3326: p_count => x_msg_count ,
3319: x_loading_status := 'UNEXPECTED_ERR';
3320: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3321: IF FND_MSG_PUB.Check_Msg_Level(
3322: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3323: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
3324: END IF;
3325: FND_MSG_PUB.Count_And_Get(
3326: p_count => x_msg_count ,
3327: p_data => x_msg_data ,
3321: IF FND_MSG_PUB.Check_Msg_Level(
3322: FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3323: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME ,l_api_name );
3324: END IF;
3325: FND_MSG_PUB.Count_And_Get(
3326: p_count => x_msg_count ,
3327: p_data => x_msg_data ,
3328: p_encoded => FND_API.G_FALSE);
3329: END;