1436: END IF;
1437: -- Initialize API return status to success
1438: x_return_status := FND_API.G_RET_STS_SUCCESS;
1439:
1440: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1441: THEN
1442: FND_LOG.String
1443: ( FND_LOG.level_procedure ,
1444: L_LOG_MODULE || '',
1438: x_return_status := FND_API.G_RET_STS_SUCCESS;
1439:
1440: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1441: THEN
1442: FND_LOG.String
1443: ( FND_LOG.level_procedure ,
1444: L_LOG_MODULE || '',
1445: 'Inside Create_cost_details PVT API:'
1446: );
1439:
1440: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1441: THEN
1442: FND_LOG.String
1443: ( FND_LOG.level_procedure ,
1444: L_LOG_MODULE || '',
1445: 'Inside Create_cost_details PVT API:'
1446: );
1447: END IF;
1446: );
1447: END IF;
1448:
1449:
1450: ----------------------- FND Logging -----------------------------------
1451: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1452: THEN
1453:
1454:
1447: END IF;
1448:
1449:
1450: ----------------------- FND Logging -----------------------------------
1451: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1452: THEN
1453:
1454:
1455: FND_LOG.String
1451: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1452: THEN
1453:
1454:
1455: FND_LOG.String
1456: ( FND_LOG.level_procedure ,
1457: L_LOG_MODULE || 'start'
1458: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
1459: );
1452: THEN
1453:
1454:
1455: FND_LOG.String
1456: ( FND_LOG.level_procedure ,
1457: L_LOG_MODULE || 'start'
1458: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
1459: );
1460: FND_LOG.String
1456: ( FND_LOG.level_procedure ,
1457: L_LOG_MODULE || 'start'
1458: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
1459: );
1460: FND_LOG.String
1461: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1462: , 'p_api_version:' || p_api_version
1463: );
1464: FND_LOG.String
1457: L_LOG_MODULE || 'start'
1458: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
1459: );
1460: FND_LOG.String
1461: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1462: , 'p_api_version:' || p_api_version
1463: );
1464: FND_LOG.String
1465: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1460: FND_LOG.String
1461: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1462: , 'p_api_version:' || p_api_version
1463: );
1464: FND_LOG.String
1465: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1466: , 'p_init_msg_list:' || p_init_msg_list
1467: );
1468: FND_LOG.String
1461: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1462: , 'p_api_version:' || p_api_version
1463: );
1464: FND_LOG.String
1465: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1466: , 'p_init_msg_list:' || p_init_msg_list
1467: );
1468: FND_LOG.String
1469: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1464: FND_LOG.String
1465: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1466: , 'p_init_msg_list:' || p_init_msg_list
1467: );
1468: FND_LOG.String
1469: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1470: , 'p_commit:' || p_commit
1471: );
1472: FND_LOG.String
1465: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1466: , 'p_init_msg_list:' || p_init_msg_list
1467: );
1468: FND_LOG.String
1469: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1470: , 'p_commit:' || p_commit
1471: );
1472: FND_LOG.String
1473: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1468: FND_LOG.String
1469: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1470: , 'p_commit:' || p_commit
1471: );
1472: FND_LOG.String
1473: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1474: , 'p_validation_level:' || p_validation_level
1475: );
1476: FND_LOG.String
1469: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1470: , 'p_commit:' || p_commit
1471: );
1472: FND_LOG.String
1473: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1474: , 'p_validation_level:' || p_validation_level
1475: );
1476: FND_LOG.String
1477: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1472: FND_LOG.String
1473: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1474: , 'p_validation_level:' || p_validation_level
1475: );
1476: FND_LOG.String
1477: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1478: , 'p_resp_appl_id:' || p_resp_appl_id
1479: );
1480: FND_LOG.String
1473: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1474: , 'p_validation_level:' || p_validation_level
1475: );
1476: FND_LOG.String
1477: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1478: , 'p_resp_appl_id:' || p_resp_appl_id
1479: );
1480: FND_LOG.String
1481: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1476: FND_LOG.String
1477: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1478: , 'p_resp_appl_id:' || p_resp_appl_id
1479: );
1480: FND_LOG.String
1481: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1482: , 'p_resp_id:' || p_resp_id
1483: );
1484: FND_LOG.String
1477: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1478: , 'p_resp_appl_id:' || p_resp_appl_id
1479: );
1480: FND_LOG.String
1481: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1482: , 'p_resp_id:' || p_resp_id
1483: );
1484: FND_LOG.String
1485: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1480: FND_LOG.String
1481: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1482: , 'p_resp_id:' || p_resp_id
1483: );
1484: FND_LOG.String
1485: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1486: , 'p_user_id:' || p_user_id
1487: );
1488: FND_LOG.String
1481: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1482: , 'p_resp_id:' || p_resp_id
1483: );
1484: FND_LOG.String
1485: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1486: , 'p_user_id:' || p_user_id
1487: );
1488: FND_LOG.String
1489: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1484: FND_LOG.String
1485: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1486: , 'p_user_id:' || p_user_id
1487: );
1488: FND_LOG.String
1489: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1490: , 'p_login_id:' || p_login_id
1491: );
1492: FND_LOG.String
1485: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1486: , 'p_user_id:' || p_user_id
1487: );
1488: FND_LOG.String
1489: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1490: , 'p_login_id:' || p_login_id
1491: );
1492: FND_LOG.String
1493: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1488: FND_LOG.String
1489: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1490: , 'p_login_id:' || p_login_id
1491: );
1492: FND_LOG.String
1493: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1494: , 'p_transaction_control:' || p_transaction_control
1495: );
1496: FND_LOG.String
1489: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1490: , 'p_login_id:' || p_login_id
1491: );
1492: FND_LOG.String
1493: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1494: , 'p_transaction_control:' || p_transaction_control
1495: );
1496: FND_LOG.String
1497: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1492: FND_LOG.String
1493: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1494: , 'p_transaction_control:' || p_transaction_control
1495: );
1496: FND_LOG.String
1497: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1498: , 'p_cost_creation_override: ' || p_cost_creation_override
1499: );
1500: -- --------------------------------------------------------------------------
1493: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1494: , 'p_transaction_control:' || p_transaction_control
1495: );
1496: FND_LOG.String
1497: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1498: , 'p_cost_creation_override: ' || p_cost_creation_override
1499: );
1500: -- --------------------------------------------------------------------------
1501: -- This procedure Logs the charges record paramters.
1510: --if no value is passed then return NULL otherwise return the value passed
1511:
1512: TO_NULL (p_cost_Rec, l_cost_Rec) ;
1513:
1514: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1515: THEN
1516: FND_LOG.String
1517: ( FND_LOG.level_procedure ,
1518: L_LOG_MODULE || '',
1512: TO_NULL (p_cost_Rec, l_cost_Rec) ;
1513:
1514: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1515: THEN
1516: FND_LOG.String
1517: ( FND_LOG.level_procedure ,
1518: L_LOG_MODULE || '',
1519: 'l_cost_Rec.estimate_Detail_id : '||l_cost_Rec.estimate_Detail_id
1520: );
1513:
1514: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1515: THEN
1516: FND_LOG.String
1517: ( FND_LOG.level_procedure ,
1518: L_LOG_MODULE || '',
1519: 'l_cost_Rec.estimate_Detail_id : '||l_cost_Rec.estimate_Detail_id
1520: );
1521: END IF;
1578: x_msg_count => l_msg_count,
1579: x_return_status => l_return_status
1580: );
1581:
1582: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1583: THEN
1584: FND_LOG.String
1585: ( FND_LOG.level_procedure ,
1586: L_LOG_MODULE || '',
1580: );
1581:
1582: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1583: THEN
1584: FND_LOG.String
1585: ( FND_LOG.level_procedure ,
1586: L_LOG_MODULE || '',
1587: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
1588: );
1581:
1582: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1583: THEN
1584: FND_LOG.String
1585: ( FND_LOG.level_procedure ,
1586: L_LOG_MODULE || '',
1587: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
1588: );
1589:
1586: L_LOG_MODULE || '',
1587: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
1588: );
1589:
1590: FND_LOG.String
1591: ( FND_LOG.level_procedure ,
1592: L_LOG_MODULE || '',
1593: 'l_disallow_request_update: '||l_disallow_request_update||'l_disallow_new_charge: '||l_disallow_new_charge||
1594: 'l_disallow_charge_update: '||l_disallow_charge_update
1587: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
1588: );
1589:
1590: FND_LOG.String
1591: ( FND_LOG.level_procedure ,
1592: L_LOG_MODULE || '',
1593: 'l_disallow_request_update: '||l_disallow_request_update||'l_disallow_new_charge: '||l_disallow_new_charge||
1594: 'l_disallow_charge_update: '||l_disallow_charge_update
1595: );
1615:
1616: l_transaction_type_id := l_cost_rec.transaction_type_id;
1617: l_charge_line_type := l_cost_rec.charge_line_type;
1618:
1619: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1620: THEN
1621: FND_LOG.String
1622: ( FND_LOG.level_procedure ,
1623: L_LOG_MODULE || '',
1617: l_charge_line_type := l_cost_rec.charge_line_type;
1618:
1619: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1620: THEN
1621: FND_LOG.String
1622: ( FND_LOG.level_procedure ,
1623: L_LOG_MODULE || '',
1624: 'l_transaction_type_id : '||l_transaction_type_id ||'l_charge_line_type :'||l_charge_line_type
1625: );
1618:
1619: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1620: THEN
1621: FND_LOG.String
1622: ( FND_LOG.level_procedure ,
1623: L_LOG_MODULE || '',
1624: 'l_transaction_type_id : '||l_transaction_type_id ||'l_charge_line_type :'||l_charge_line_type
1625: );
1626: END IF;
1686: END IF;--p_cost_creation_overrid
1687:
1688:
1689:
1690: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1691: THEN
1692: FND_LOG.String
1693: ( FND_LOG.level_procedure ,
1694: L_LOG_MODULE || '',
1688:
1689:
1690: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1691: THEN
1692: FND_LOG.String
1693: ( FND_LOG.level_procedure ,
1694: L_LOG_MODULE || '',
1695: 'After Mandatory Check 1'
1696: );
1689:
1690: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1691: THEN
1692: FND_LOG.String
1693: ( FND_LOG.level_procedure ,
1694: L_LOG_MODULE || '',
1695: 'After Mandatory Check 1'
1696: );
1697: END IF;
1726: else
1727: l_cost_rec.charge_line_type := 'ACTUAL';
1728: end if;
1729:
1730: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1731: THEN
1732: FND_LOG.String
1733: ( FND_LOG.level_procedure ,
1734: L_LOG_MODULE || '',
1728: end if;
1729:
1730: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1731: THEN
1732: FND_LOG.String
1733: ( FND_LOG.level_procedure ,
1734: L_LOG_MODULE || '',
1735: 'After Mandatory Check 2'
1736: );
1729:
1730: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1731: THEN
1732: FND_LOG.String
1733: ( FND_LOG.level_procedure ,
1734: L_LOG_MODULE || '',
1735: 'After Mandatory Check 2'
1736: );
1737: END IF;
1778: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
1779: FND_MSG_PUB.Add;
1780: RAISE FND_API.G_EXC_ERROR;
1781: END IF;
1782: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1783: THEN
1784: FND_LOG.String
1785: ( FND_LOG.level_procedure ,
1786: L_LOG_MODULE || '',
1780: RAISE FND_API.G_EXC_ERROR;
1781: END IF;
1782: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1783: THEN
1784: FND_LOG.String
1785: ( FND_LOG.level_procedure ,
1786: L_LOG_MODULE || '',
1787: 'After Validating the Cost Details'
1788: );
1781: END IF;
1782: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1783: THEN
1784: FND_LOG.String
1785: ( FND_LOG.level_procedure ,
1786: L_LOG_MODULE || '',
1787: 'After Validating the Cost Details'
1788: );
1789: END IF;
1924: END IF;
1925:
1926: END IF;
1927:
1928: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1929: THEN
1930: FND_LOG.String
1931: ( FND_LOG.level_procedure ,
1932: L_LOG_MODULE || '',
1926: END IF;
1927:
1928: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1929: THEN
1930: FND_LOG.String
1931: ( FND_LOG.level_procedure ,
1932: L_LOG_MODULE || '',
1933: 'Before calling the Insert_Row procedure'
1934: );
1927:
1928: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1929: THEN
1930: FND_LOG.String
1931: ( FND_LOG.level_procedure ,
1932: L_LOG_MODULE || '',
1933: 'Before calling the Insert_Row procedure'
1934: );
1935: END IF;
1979: );
1980:
1981: x_cost_id :=l_cost_id;
1982:
1983: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1984: THEN
1985: FND_LOG.String
1986: ( FND_LOG.level_procedure ,
1987: L_LOG_MODULE || '',
1981: x_cost_id :=l_cost_id;
1982:
1983: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1984: THEN
1985: FND_LOG.String
1986: ( FND_LOG.level_procedure ,
1987: L_LOG_MODULE || '',
1988: 'After calling the Insert Row '
1989: );
1982:
1983: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1984: THEN
1985: FND_LOG.String
1986: ( FND_LOG.level_procedure ,
1987: L_LOG_MODULE || '',
1988: 'After calling the Insert Row '
1989: );
1990: END IF;
2141: END IF;
2142: -- Initialize API return status to success
2143: x_return_status := FND_API.G_RET_STS_SUCCESS;
2144:
2145: ----------------------- FND Logging -----------------------------------
2146: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2147: THEN
2148: FND_LOG.String
2149: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2142: -- Initialize API return status to success
2143: x_return_status := FND_API.G_RET_STS_SUCCESS;
2144:
2145: ----------------------- FND Logging -----------------------------------
2146: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2147: THEN
2148: FND_LOG.String
2149: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2150: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2144:
2145: ----------------------- FND Logging -----------------------------------
2146: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2147: THEN
2148: FND_LOG.String
2149: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2150: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2151: );
2152: FND_LOG.String
2145: ----------------------- FND Logging -----------------------------------
2146: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2147: THEN
2148: FND_LOG.String
2149: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2150: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2151: );
2152: FND_LOG.String
2153: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2148: FND_LOG.String
2149: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2150: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2151: );
2152: FND_LOG.String
2153: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2154: , 'p_api_version:' || p_api_version
2155: );
2156: FND_LOG.String
2149: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2150: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2151: );
2152: FND_LOG.String
2153: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2154: , 'p_api_version:' || p_api_version
2155: );
2156: FND_LOG.String
2157: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2152: FND_LOG.String
2153: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2154: , 'p_api_version:' || p_api_version
2155: );
2156: FND_LOG.String
2157: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2158: , 'p_init_msg_list:' || p_init_msg_list
2159: );
2160: FND_LOG.String
2153: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2154: , 'p_api_version:' || p_api_version
2155: );
2156: FND_LOG.String
2157: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2158: , 'p_init_msg_list:' || p_init_msg_list
2159: );
2160: FND_LOG.String
2161: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2156: FND_LOG.String
2157: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2158: , 'p_init_msg_list:' || p_init_msg_list
2159: );
2160: FND_LOG.String
2161: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2162: , 'p_commit:' || p_commit
2163: );
2164: FND_LOG.String
2157: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2158: , 'p_init_msg_list:' || p_init_msg_list
2159: );
2160: FND_LOG.String
2161: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2162: , 'p_commit:' || p_commit
2163: );
2164: FND_LOG.String
2165: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2160: FND_LOG.String
2161: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2162: , 'p_commit:' || p_commit
2163: );
2164: FND_LOG.String
2165: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2166: , 'p_validation_level:' || p_validation_level
2167: );
2168: FND_LOG.String
2161: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2162: , 'p_commit:' || p_commit
2163: );
2164: FND_LOG.String
2165: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2166: , 'p_validation_level:' || p_validation_level
2167: );
2168: FND_LOG.String
2169: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2164: FND_LOG.String
2165: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2166: , 'p_validation_level:' || p_validation_level
2167: );
2168: FND_LOG.String
2169: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2170: , 'p_resp_appl_id:' || p_resp_appl_id
2171: );
2172: FND_LOG.String
2165: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2166: , 'p_validation_level:' || p_validation_level
2167: );
2168: FND_LOG.String
2169: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2170: , 'p_resp_appl_id:' || p_resp_appl_id
2171: );
2172: FND_LOG.String
2173: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2168: FND_LOG.String
2169: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2170: , 'p_resp_appl_id:' || p_resp_appl_id
2171: );
2172: FND_LOG.String
2173: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2174: , 'p_resp_id:' || p_resp_id
2175: );
2176: FND_LOG.String
2169: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2170: , 'p_resp_appl_id:' || p_resp_appl_id
2171: );
2172: FND_LOG.String
2173: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2174: , 'p_resp_id:' || p_resp_id
2175: );
2176: FND_LOG.String
2177: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2172: FND_LOG.String
2173: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2174: , 'p_resp_id:' || p_resp_id
2175: );
2176: FND_LOG.String
2177: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2178: , 'p_user_id:' || p_user_id
2179: );
2180: FND_LOG.String
2173: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2174: , 'p_resp_id:' || p_resp_id
2175: );
2176: FND_LOG.String
2177: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2178: , 'p_user_id:' || p_user_id
2179: );
2180: FND_LOG.String
2181: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2176: FND_LOG.String
2177: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2178: , 'p_user_id:' || p_user_id
2179: );
2180: FND_LOG.String
2181: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2182: , 'p_login_id:' || p_login_id
2183: );
2184: FND_LOG.String
2177: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2178: , 'p_user_id:' || p_user_id
2179: );
2180: FND_LOG.String
2181: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2182: , 'p_login_id:' || p_login_id
2183: );
2184: FND_LOG.String
2185: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2180: FND_LOG.String
2181: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2182: , 'p_login_id:' || p_login_id
2183: );
2184: FND_LOG.String
2185: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2186: , 'p_transaction_control:' || p_transaction_control
2187: );
2188: -- --------------------------------------------------------------------------
2181: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2182: , 'p_login_id:' || p_login_id
2183: );
2184: FND_LOG.String
2185: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2186: , 'p_transaction_control:' || p_transaction_control
2187: );
2188: -- --------------------------------------------------------------------------
2189: -- This procedure Logs the charges record paramters.
2195: END IF;
2196:
2197: l_cost_rec:=p_cost_rec;
2198:
2199: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2200: THEN
2201: FND_LOG.String
2202: ( FND_LOG.level_procedure ,
2203: L_LOG_MODULE || '',
2197: l_cost_rec:=p_cost_rec;
2198:
2199: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2200: THEN
2201: FND_LOG.String
2202: ( FND_LOG.level_procedure ,
2203: L_LOG_MODULE || '',
2204: 'p_cost_rec.estimate_Detail_id : '||p_cost_rec.estimate_Detail_id
2205: );
2198:
2199: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2200: THEN
2201: FND_LOG.String
2202: ( FND_LOG.level_procedure ,
2203: L_LOG_MODULE || '',
2204: 'p_cost_rec.estimate_Detail_id : '||p_cost_rec.estimate_Detail_id
2205: );
2206: END IF;
2300: x_msg_count => l_msg_count,
2301: x_return_status => l_return_status
2302: );
2303:
2304: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2305: THEN
2306: FND_LOG.String
2307: ( FND_LOG.level_procedure ,
2308: L_LOG_MODULE || '',
2302: );
2303:
2304: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2305: THEN
2306: FND_LOG.String
2307: ( FND_LOG.level_procedure ,
2308: L_LOG_MODULE || '',
2309: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
2310: );
2303:
2304: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2305: THEN
2306: FND_LOG.String
2307: ( FND_LOG.level_procedure ,
2308: L_LOG_MODULE || '',
2309: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
2310: );
2311:
2308: L_LOG_MODULE || '',
2309: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
2310: );
2311:
2312: FND_LOG.String
2313: ( FND_LOG.level_procedure ,
2314: L_LOG_MODULE || '',
2315: 'l_disallow_request_update: '||l_disallow_request_update||'l_disallow_new_charge: '||l_disallow_new_charge||
2316: 'l_disallow_charge_update: '||l_disallow_charge_update
2309: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
2310: );
2311:
2312: FND_LOG.String
2313: ( FND_LOG.level_procedure ,
2314: L_LOG_MODULE || '',
2315: 'l_disallow_request_update: '||l_disallow_request_update||'l_disallow_new_charge: '||l_disallow_new_charge||
2316: 'l_disallow_charge_update: '||l_disallow_charge_update
2317: );
2405: FND_MSG_PUB.Add;
2406: RAISE FND_API.G_EXC_ERROR;
2407: END IF;
2408:
2409: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2410: THEN
2411: FND_LOG.String
2412: ( FND_LOG.level_procedure ,
2413: L_LOG_MODULE || '',
2407: END IF;
2408:
2409: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2410: THEN
2411: FND_LOG.String
2412: ( FND_LOG.level_procedure ,
2413: L_LOG_MODULE || '',
2414: 'After Validating the Cost Details '
2415: );
2408:
2409: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2410: THEN
2411: FND_LOG.String
2412: ( FND_LOG.level_procedure ,
2413: L_LOG_MODULE || '',
2414: 'After Validating the Cost Details '
2415: );
2416:
2420:
2421: end if;
2422: END IF;
2423:
2424: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2425: THEN
2426: FND_LOG.String
2427: ( FND_LOG.level_procedure ,
2428: L_LOG_MODULE || '',
2422: END IF;
2423:
2424: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2425: THEN
2426: FND_LOG.String
2427: ( FND_LOG.level_procedure ,
2428: L_LOG_MODULE || '',
2429: 'Before Cost Calculations'
2430: );
2423:
2424: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2425: THEN
2426: FND_LOG.String
2427: ( FND_LOG.level_procedure ,
2428: L_LOG_MODULE || '',
2429: 'Before Cost Calculations'
2430: );
2431: END IF;
2479:
2480:
2481:
2482: if L_RECALC_COST = 'Y' then
2483: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2484: THEN
2485: FND_LOG.String
2486: ( FND_LOG.level_procedure ,
2487: L_LOG_MODULE || '',
2481:
2482: if L_RECALC_COST = 'Y' then
2483: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2484: THEN
2485: FND_LOG.String
2486: ( FND_LOG.level_procedure ,
2487: L_LOG_MODULE || '',
2488: 'Recalcualting the Cost'
2489: );
2482: if L_RECALC_COST = 'Y' then
2483: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2484: THEN
2485: FND_LOG.String
2486: ( FND_LOG.level_procedure ,
2487: L_LOG_MODULE || '',
2488: 'Recalcualting the Cost'
2489: );
2490: END IF;
2542: END IF;
2543:
2544: end if ;
2545:
2546: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2547: THEN
2548: FND_LOG.String
2549: ( FND_LOG.level_procedure ,
2550: L_LOG_MODULE || '',
2544: end if ;
2545:
2546: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2547: THEN
2548: FND_LOG.String
2549: ( FND_LOG.level_procedure ,
2550: L_LOG_MODULE || '',
2551: 'Before calling the Update_Row Procedure'
2552: );
2545:
2546: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2547: THEN
2548: FND_LOG.String
2549: ( FND_LOG.level_procedure ,
2550: L_LOG_MODULE || '',
2551: 'Before calling the Update_Row Procedure'
2552: );
2553: END IF;
2715:
2716: --Initialize the API Return Success to True
2717: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2718:
2719: ----------------------- FND Logging -----------------------------------
2720: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2721: THEN
2722: FND_LOG.String
2723: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2716: --Initialize the API Return Success to True
2717: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2718:
2719: ----------------------- FND Logging -----------------------------------
2720: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2721: THEN
2722: FND_LOG.String
2723: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2724: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2718:
2719: ----------------------- FND Logging -----------------------------------
2720: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2721: THEN
2722: FND_LOG.String
2723: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2724: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2725: );
2726: FND_LOG.String
2719: ----------------------- FND Logging -----------------------------------
2720: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2721: THEN
2722: FND_LOG.String
2723: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2724: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2725: );
2726: FND_LOG.String
2727: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2722: FND_LOG.String
2723: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2724: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2725: );
2726: FND_LOG.String
2727: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2728: , 'p_api_version:' || p_api_version
2729: );
2730: FND_LOG.String
2723: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2724: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2725: );
2726: FND_LOG.String
2727: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2728: , 'p_api_version:' || p_api_version
2729: );
2730: FND_LOG.String
2731: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2726: FND_LOG.String
2727: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2728: , 'p_api_version:' || p_api_version
2729: );
2730: FND_LOG.String
2731: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2732: , 'p_init_msg_list:' || p_init_msg_list
2733: );
2734: FND_LOG.String
2727: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2728: , 'p_api_version:' || p_api_version
2729: );
2730: FND_LOG.String
2731: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2732: , 'p_init_msg_list:' || p_init_msg_list
2733: );
2734: FND_LOG.String
2735: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2730: FND_LOG.String
2731: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2732: , 'p_init_msg_list:' || p_init_msg_list
2733: );
2734: FND_LOG.String
2735: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2736: , 'p_commit:' || p_commit
2737: );
2738: FND_LOG.String
2731: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2732: , 'p_init_msg_list:' || p_init_msg_list
2733: );
2734: FND_LOG.String
2735: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2736: , 'p_commit:' || p_commit
2737: );
2738: FND_LOG.String
2739: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2734: FND_LOG.String
2735: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2736: , 'p_commit:' || p_commit
2737: );
2738: FND_LOG.String
2739: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2740: , 'p_validation_level:' || p_validation_level
2741: );
2742: FND_LOG.String
2735: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2736: , 'p_commit:' || p_commit
2737: );
2738: FND_LOG.String
2739: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2740: , 'p_validation_level:' || p_validation_level
2741: );
2742: FND_LOG.String
2743: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2738: FND_LOG.String
2739: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2740: , 'p_validation_level:' || p_validation_level
2741: );
2742: FND_LOG.String
2743: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2744: , 'p_transaction_control:' || p_transaction_control
2745: );
2746: FND_LOG.String
2739: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2740: , 'p_validation_level:' || p_validation_level
2741: );
2742: FND_LOG.String
2743: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2744: , 'p_transaction_control:' || p_transaction_control
2745: );
2746: FND_LOG.String
2747: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2742: FND_LOG.String
2743: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2744: , 'p_transaction_control:' || p_transaction_control
2745: );
2746: FND_LOG.String
2747: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2748: , 'p_cost_id' || p_cost_id
2749: );
2750:
2743: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2744: , 'p_transaction_control:' || p_transaction_control
2745: );
2746: FND_LOG.String
2747: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2748: , 'p_cost_id' || p_cost_id
2749: );
2750:
2751: END IF;
2755: 'p_cost_id') ;
2756: RAISE FND_API.G_EXC_ERROR ;
2757: END IF ;
2758:
2759: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2760: THEN
2761: FND_LOG.String
2762: ( FND_LOG.level_procedure ,
2763: L_LOG_MODULE || '',
2757: END IF ;
2758:
2759: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2760: THEN
2761: FND_LOG.String
2762: ( FND_LOG.level_procedure ,
2763: L_LOG_MODULE || '',
2764: 'Before Do_Cost_Line_Exist'
2765: );
2758:
2759: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2760: THEN
2761: FND_LOG.String
2762: ( FND_LOG.level_procedure ,
2763: L_LOG_MODULE || '',
2764: 'Before Do_Cost_Line_Exist'
2765: );
2766: END IF;
2786: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2787: RAISE G_WARNING ;
2788: END IF ;
2789:
2790: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2791: THEN
2792: FND_LOG.String
2793: ( FND_LOG.level_procedure ,
2794: L_LOG_MODULE || '',
2788: END IF ;
2789:
2790: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2791: THEN
2792: FND_LOG.String
2793: ( FND_LOG.level_procedure ,
2794: L_LOG_MODULE || '',
2795: 'Before Do_charge_line_Exist'
2796: );
2789:
2790: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2791: THEN
2792: FND_LOG.String
2793: ( FND_LOG.level_procedure ,
2794: L_LOG_MODULE || '',
2795: 'Before Do_charge_line_Exist'
2796: );
2797: END IF;
2923: lx_quantity NUMBER;
2924:
2925: BEGIN
2926:
2927: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2928: THEN
2929: FND_LOG.String
2930: ( FND_LOG.level_procedure ,
2931: L_LOG_MODULE || '',
2925: BEGIN
2926:
2927: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2928: THEN
2929: FND_LOG.String
2930: ( FND_LOG.level_procedure ,
2931: L_LOG_MODULE || '',
2932: 'Inside Validate_Cost_Details'
2933: );
2926:
2927: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2928: THEN
2929: FND_LOG.String
2930: ( FND_LOG.level_procedure ,
2931: L_LOG_MODULE || '',
2932: 'Inside Validate_Cost_Details'
2933: );
2934: END IF;
2974: END IF;
2975: END IF;
2976: END IF;
2977:
2978: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2979: THEN
2980: FND_LOG.String
2981: ( FND_LOG.level_procedure ,
2982: L_LOG_MODULE || '',
2976: END IF;
2977:
2978: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2979: THEN
2980: FND_LOG.String
2981: ( FND_LOG.level_procedure ,
2982: L_LOG_MODULE || '',
2983: 'After Cost_Id Validation'
2984: );
2977:
2978: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2979: THEN
2980: FND_LOG.String
2981: ( FND_LOG.level_procedure ,
2982: L_LOG_MODULE || '',
2983: 'After Cost_Id Validation'
2984: );
2985: END IF;
3030: x_cost_rec.incident_id :=l_db_det_rec.incident_id;
3031:
3032: end if;
3033:
3034: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3035: THEN
3036: FND_LOG.String
3037: ( FND_LOG.level_procedure ,
3038: L_LOG_MODULE || '',
3032: end if;
3033:
3034: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3035: THEN
3036: FND_LOG.String
3037: ( FND_LOG.level_procedure ,
3038: L_LOG_MODULE || '',
3039: 'After Incident_ID Validation'
3040: );
3033:
3034: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3035: THEN
3036: FND_LOG.String
3037: ( FND_LOG.level_procedure ,
3038: L_LOG_MODULE || '',
3039: 'After Incident_ID Validation'
3040: );
3041: END IF;
3138: x_msg_count => l_msg_count,
3139: x_return_status => l_return_status
3140: );
3141:
3142: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3143: THEN
3144: FND_LOG.String
3145: ( FND_LOG.level_procedure ,
3146: L_LOG_MODULE || '',
3140: );
3141:
3142: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3143: THEN
3144: FND_LOG.String
3145: ( FND_LOG.level_procedure ,
3146: L_LOG_MODULE || '',
3147: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
3148: );
3141:
3142: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3143: THEN
3144: FND_LOG.String
3145: ( FND_LOG.level_procedure ,
3146: L_LOG_MODULE || '',
3147: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
3148: );
3149:
3146: L_LOG_MODULE || '',
3147: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
3148: );
3149:
3150: FND_LOG.String
3151: ( FND_LOG.level_procedure ,
3152: L_LOG_MODULE || '',
3153: 'l_disallow_request_update: '||l_disallow_request_update||'l_disallow_new_charge: '||l_disallow_new_charge||
3154: 'l_disallow_charge_update: '||l_disallow_charge_update
3147: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
3148: );
3149:
3150: FND_LOG.String
3151: ( FND_LOG.level_procedure ,
3152: L_LOG_MODULE || '',
3153: 'l_disallow_request_update: '||l_disallow_request_update||'l_disallow_new_charge: '||l_disallow_new_charge||
3154: 'l_disallow_charge_update: '||l_disallow_charge_update
3155: );
3241:
3242: end if;
3243:
3244:
3245: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3246: THEN
3247: FND_LOG.String
3248: ( FND_LOG.level_procedure ,
3249: L_LOG_MODULE || '',
3243:
3244:
3245: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3246: THEN
3247: FND_LOG.String
3248: ( FND_LOG.level_procedure ,
3249: L_LOG_MODULE || '',
3250: 'After Estimate_Detail_ID Validation'
3251: );
3244:
3245: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3246: THEN
3247: FND_LOG.String
3248: ( FND_LOG.level_procedure ,
3249: L_LOG_MODULE || '',
3250: 'After Estimate_Detail_ID Validation'
3251: );
3252: END IF;
3329:
3330: end if;
3331:
3332: END IF;--validation_mode
3333: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3334: THEN
3335: FND_LOG.String
3336: ( FND_LOG.level_procedure ,
3337: L_LOG_MODULE || '',
3331:
3332: END IF;--validation_mode
3333: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3334: THEN
3335: FND_LOG.String
3336: ( FND_LOG.level_procedure ,
3337: L_LOG_MODULE || '',
3338: 'After Source Id and Source Code Validation'
3339: );
3332: END IF;--validation_mode
3333: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3334: THEN
3335: FND_LOG.String
3336: ( FND_LOG.level_procedure ,
3337: L_LOG_MODULE || '',
3338: 'After Source Id and Source Code Validation'
3339: );
3340: END IF;
3387: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3388: RAISE FND_API.G_EXC_ERROR ;
3389: END IF;
3390:
3391: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3392: THEN
3393: FND_LOG.String
3394: ( FND_LOG.level_procedure ,
3395: L_LOG_MODULE || '',
3389: END IF;
3390:
3391: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3392: THEN
3393: FND_LOG.String
3394: ( FND_LOG.level_procedure ,
3395: L_LOG_MODULE || '',
3396: 'Mutli Org ID l_org_id : '||l_org_id||'l_profile :'||l_profile
3397: );
3390:
3391: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3392: THEN
3393: FND_LOG.String
3394: ( FND_LOG.level_procedure ,
3395: L_LOG_MODULE || '',
3396: 'Mutli Org ID l_org_id : '||l_org_id||'l_profile :'||l_profile
3397: );
3398: END IF;
3554: --cost will be recalculated if item,ou or quantity changes during updation
3555: l_recalc_cost := 'Y' ;
3556: --dbms_output.put_line('l_recalc_cost ORG changes');
3557: END IF;
3558: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3559: THEN
3560: FND_LOG.String
3561: ( FND_LOG.level_procedure ,
3562: L_LOG_MODULE || '',
3556: --dbms_output.put_line('l_recalc_cost ORG changes');
3557: END IF;
3558: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3559: THEN
3560: FND_LOG.String
3561: ( FND_LOG.level_procedure ,
3562: L_LOG_MODULE || '',
3563: 'After Org_ID Validation'
3564: );
3557: END IF;
3558: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3559: THEN
3560: FND_LOG.String
3561: ( FND_LOG.level_procedure ,
3562: L_LOG_MODULE || '',
3563: 'After Org_ID Validation'
3564: );
3565: END IF;
3674:
3675:
3676: END IF; --validation_mode
3677:
3678: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3679: THEN
3680:
3681: FND_LOG.String
3682: ( FND_LOG.level_procedure ,
3677:
3678: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3679: THEN
3680:
3681: FND_LOG.String
3682: ( FND_LOG.level_procedure ,
3683: L_LOG_MODULE || '',
3684: 'After Item Id Validation'
3685: );
3678: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3679: THEN
3680:
3681: FND_LOG.String
3682: ( FND_LOG.level_procedure ,
3683: L_LOG_MODULE || '',
3684: 'After Item Id Validation'
3685: );
3686: END If;
3752:
3753:
3754: END IF; --validation_mode
3755:
3756: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3757: THEN
3758:
3759: FND_LOG.String
3760: ( FND_LOG.level_procedure ,
3755:
3756: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3757: THEN
3758:
3759: FND_LOG.String
3760: ( FND_LOG.level_procedure ,
3761: L_LOG_MODULE || '',
3762: 'After Inventory Org Id Validation'
3763: );
3756: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3757: THEN
3758:
3759: FND_LOG.String
3760: ( FND_LOG.level_procedure ,
3761: L_LOG_MODULE || '',
3762: 'After Inventory Org Id Validation'
3763: );
3764: END If;
3876: --DBMS_OUTPUT.PUT_LINE('Completed the txn billing type id');
3877:
3878: END IF;
3879:
3880: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3881: THEN
3882: FND_LOG.String
3883: ( FND_LOG.level_procedure ,
3884: L_LOG_MODULE || '',
3878: END IF;
3879:
3880: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3881: THEN
3882: FND_LOG.String
3883: ( FND_LOG.level_procedure ,
3884: L_LOG_MODULE || '',
3885: 'After Billing Type Validation'
3886: );
3879:
3880: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3881: THEN
3882: FND_LOG.String
3883: ( FND_LOG.level_procedure ,
3884: L_LOG_MODULE || '',
3885: 'After Billing Type Validation'
3886: );
3887: END IF;
4014:
4015: End if;
4016: END IF;
4017:
4018: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4019: THEN
4020: FND_LOG.String
4021: ( FND_LOG.level_procedure ,
4022: L_LOG_MODULE || '',
4016: END IF;
4017:
4018: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4019: THEN
4020: FND_LOG.String
4021: ( FND_LOG.level_procedure ,
4022: L_LOG_MODULE || '',
4023: 'After UOM Validation'
4024: );
4017:
4018: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4019: THEN
4020: FND_LOG.String
4021: ( FND_LOG.level_procedure ,
4022: L_LOG_MODULE || '',
4023: 'After UOM Validation'
4024: );
4025: END IF;
4148:
4149: End if;
4150: END IF;
4151:
4152: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4153: THEN
4154: FND_LOG.String
4155: ( FND_LOG.level_procedure ,
4156: L_LOG_MODULE || '',
4150: END IF;
4151:
4152: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4153: THEN
4154: FND_LOG.String
4155: ( FND_LOG.level_procedure ,
4156: L_LOG_MODULE || '',
4157: 'After Currency Code Validation'
4158: );
4151:
4152: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4153: THEN
4154: FND_LOG.String
4155: ( FND_LOG.level_procedure ,
4156: L_LOG_MODULE || '',
4157: 'After Currency Code Validation'
4158: );
4159: END IF;
4211: AND NVL(end_date, SYSDATE) >= SYSDATE;
4212:
4213: CURSOR c_login IS
4214: SELECT 1
4215: FROM fnd_logins
4216: WHERE login_id = p_login_id
4217: AND user_id = p_user_id;
4218:
4219: l_dummy VARCHAR2(1);
4246:
4247: IF p_login_id is not null then
4248: BEGIN
4249: SELECT 'x' into l_dummy
4250: FROM fnd_logins
4251: WHERE login_id = p_login_id
4252: AND user_id = p_user_id;
4253:
4254: EXCEPTION
4385:
4386: BEGIN
4387: x_return_status := FND_API.G_RET_STS_SUCCESS;
4388:
4389: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4390: THEN
4391: FND_LOG.String
4392: (
4393: FND_LOG.level_procedure
4387: x_return_status := FND_API.G_RET_STS_SUCCESS;
4388:
4389: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4390: THEN
4391: FND_LOG.String
4392: (
4393: FND_LOG.level_procedure
4394: , L_LOG_MODULE || 'start'
4395: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
4389: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4390: THEN
4391: FND_LOG.String
4392: (
4393: FND_LOG.level_procedure
4394: , L_LOG_MODULE || 'start'
4395: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
4396: );
4397: FND_LOG.String
4393: FND_LOG.level_procedure
4394: , L_LOG_MODULE || 'start'
4395: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
4396: );
4397: FND_LOG.String
4398: (
4399: FND_LOG.level_procedure
4400: , L_LOG_MODULE || 'param 1'
4401: , 'p_api_version_number:' || p_api_version_number
4395: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
4396: );
4397: FND_LOG.String
4398: (
4399: FND_LOG.level_procedure
4400: , L_LOG_MODULE || 'param 1'
4401: , 'p_api_version_number:' || p_api_version_number
4402: );
4403: FND_LOG.String
4399: FND_LOG.level_procedure
4400: , L_LOG_MODULE || 'param 1'
4401: , 'p_api_version_number:' || p_api_version_number
4402: );
4403: FND_LOG.String
4404: (
4405: FND_LOG.level_procedure
4406: , L_LOG_MODULE || 'param 2'
4407: , 'p_init_msg_list:' || p_init_msg_list
4401: , 'p_api_version_number:' || p_api_version_number
4402: );
4403: FND_LOG.String
4404: (
4405: FND_LOG.level_procedure
4406: , L_LOG_MODULE || 'param 2'
4407: , 'p_init_msg_list:' || p_init_msg_list
4408: );
4409: FND_LOG.String
4405: FND_LOG.level_procedure
4406: , L_LOG_MODULE || 'param 2'
4407: , 'p_init_msg_list:' || p_init_msg_list
4408: );
4409: FND_LOG.String
4410: (
4411: FND_LOG.level_procedure
4412: , L_LOG_MODULE || 'param 3'
4413: , 'p_commit:' || p_commit
4407: , 'p_init_msg_list:' || p_init_msg_list
4408: );
4409: FND_LOG.String
4410: (
4411: FND_LOG.level_procedure
4412: , L_LOG_MODULE || 'param 3'
4413: , 'p_commit:' || p_commit
4414: );
4415: FND_LOG.String
4411: FND_LOG.level_procedure
4412: , L_LOG_MODULE || 'param 3'
4413: , 'p_commit:' || p_commit
4414: );
4415: FND_LOG.String
4416: (
4417: FND_LOG.level_procedure
4418: , L_LOG_MODULE || 'param 4'
4419: , 'p_object_type:' || p_object_type
4413: , 'p_commit:' || p_commit
4414: );
4415: FND_LOG.String
4416: (
4417: FND_LOG.level_procedure
4418: , L_LOG_MODULE || 'param 4'
4419: , 'p_object_type:' || p_object_type
4420: );
4421: FND_LOG.String
4417: FND_LOG.level_procedure
4418: , L_LOG_MODULE || 'param 4'
4419: , 'p_object_type:' || p_object_type
4420: );
4421: FND_LOG.String
4422: (
4423: FND_LOG.level_procedure
4424: , L_LOG_MODULE || 'param 5'
4425: , 'p_processing_set_id:' || p_processing_set_id
4419: , 'p_object_type:' || p_object_type
4420: );
4421: FND_LOG.String
4422: (
4423: FND_LOG.level_procedure
4424: , L_LOG_MODULE || 'param 5'
4425: , 'p_processing_set_id:' || p_processing_set_id
4426: );
4427: END IF ;
4452: ------------------------------------------------------------------------------
4453:
4454: IF NVL(p_object_type, 'X') <> 'SR'
4455: THEN
4456: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4457: THEN
4458: FND_LOG.String
4459: (
4460: FND_LOG.level_unexpected
4454: IF NVL(p_object_type, 'X') <> 'SR'
4455: THEN
4456: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4457: THEN
4458: FND_LOG.String
4459: (
4460: FND_LOG.level_unexpected
4461: , L_LOG_MODULE || 'object_type_invalid'
4462: , 'p_object_type has to be SR.'
4456: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4457: THEN
4458: FND_LOG.String
4459: (
4460: FND_LOG.level_unexpected
4461: , L_LOG_MODULE || 'object_type_invalid'
4462: , 'p_object_type has to be SR.'
4463: );
4464: END IF ;
4475: ---
4476:
4477: IF p_processing_set_id IS NULL
4478: THEN
4479: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4480: THEN
4481: FND_LOG.String
4482: (
4483: FND_LOG.level_unexpected
4477: IF p_processing_set_id IS NULL
4478: THEN
4479: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4480: THEN
4481: FND_LOG.String
4482: (
4483: FND_LOG.level_unexpected
4484: , L_LOG_MODULE || 'proc_set_id_invalid'
4485: , 'p_processing_set_id should not be NULL.'
4479: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4480: THEN
4481: FND_LOG.String
4482: (
4483: FND_LOG.level_unexpected
4484: , L_LOG_MODULE || 'proc_set_id_invalid'
4485: , 'p_processing_set_id should not be NULL.'
4486: );
4487: END IF ;
4498: ------------------------------------------------------------------------------
4499: -- Actual Logic starts below:
4500: ------------------------------------------------------------------------------
4501:
4502: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
4503: THEN
4504: FND_LOG.String
4505: (
4506: FND_LOG.level_statement
4500: ------------------------------------------------------------------------------
4501:
4502: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
4503: THEN
4504: FND_LOG.String
4505: (
4506: FND_LOG.level_statement
4507: , L_LOG_MODULE || 'del_cost_line_start'
4508: , 'deleting cost lines against SRs in the global temp table'
4502: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
4503: THEN
4504: FND_LOG.String
4505: (
4506: FND_LOG.level_statement
4507: , L_LOG_MODULE || 'del_cost_line_start'
4508: , 'deleting cost lines against SRs in the global temp table'
4509: );
4510: END IF ;
4527: );
4528:
4529: l_row_count := SQL%ROWCOUNT;
4530:
4531: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
4532: THEN
4533: FND_LOG.String
4534: (
4535: FND_LOG.level_statement
4529: l_row_count := SQL%ROWCOUNT;
4530:
4531: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
4532: THEN
4533: FND_LOG.String
4534: (
4535: FND_LOG.level_statement
4536: , L_LOG_MODULE || 'del_chg_line_end'
4537: , 'after deleting cost lines against SRs in the global temp table'
4531: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
4532: THEN
4533: FND_LOG.String
4534: (
4535: FND_LOG.level_statement
4536: , L_LOG_MODULE || 'del_chg_line_end'
4537: , 'after deleting cost lines against SRs in the global temp table'
4538: || l_row_count || ' rows deleted.'
4539: );
4540: END IF ;
4541:
4542: ---
4543:
4544: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4545: THEN
4546: FND_LOG.String
4547: (
4548: FND_LOG.level_procedure
4542: ---
4543:
4544: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4545: THEN
4546: FND_LOG.String
4547: (
4548: FND_LOG.level_procedure
4549: , L_LOG_MODULE || 'end'
4550: , 'Completed work in ' || L_API_NAME_FULL || ' successfully'
4544: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4545: THEN
4546: FND_LOG.String
4547: (
4548: FND_LOG.level_procedure
4549: , L_LOG_MODULE || 'end'
4550: , 'Completed work in ' || L_API_NAME_FULL || ' successfully'
4551: );
4552: END IF ;
4554: EXCEPTION
4555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4556: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4557:
4558: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4559: THEN
4560: FND_LOG.String
4561: (
4562: FND_LOG.level_unexpected
4556: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4557:
4558: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4559: THEN
4560: FND_LOG.String
4561: (
4562: FND_LOG.level_unexpected
4563: , L_LOG_MODULE || 'unexpected_error'
4564: , 'Inside WHEN FND_API.G_EXC_UNEXPECTED_ERROR of ' || L_API_NAME_FULL
4558: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4559: THEN
4560: FND_LOG.String
4561: (
4562: FND_LOG.level_unexpected
4563: , L_LOG_MODULE || 'unexpected_error'
4564: , 'Inside WHEN FND_API.G_EXC_UNEXPECTED_ERROR of ' || L_API_NAME_FULL
4565: );
4566: END IF ;
4571: FND_MESSAGE.Set_Token('API_NAME', L_API_NAME_FULL);
4572: FND_MESSAGE.Set_Token('ERROR', SQLERRM);
4573: FND_MSG_PUB.ADD;
4574:
4575: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4576: THEN
4577: FND_LOG.String
4578: (
4579: FND_LOG.level_unexpected
4573: FND_MSG_PUB.ADD;
4574:
4575: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4576: THEN
4577: FND_LOG.String
4578: (
4579: FND_LOG.level_unexpected
4580: , L_LOG_MODULE || 'when_others'
4581: , 'Inside WHEN OTHERS of ' || L_API_NAME_FULL || '. Oracle Error was:'
4575: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4576: THEN
4577: FND_LOG.String
4578: (
4579: FND_LOG.level_unexpected
4580: , L_LOG_MODULE || 'when_others'
4581: , 'Inside WHEN OTHERS of ' || L_API_NAME_FULL || '. Oracle Error was:'
4582: );
4583: FND_LOG.String
4579: FND_LOG.level_unexpected
4580: , L_LOG_MODULE || 'when_others'
4581: , 'Inside WHEN OTHERS of ' || L_API_NAME_FULL || '. Oracle Error was:'
4582: );
4583: FND_LOG.String
4584: (
4585: FND_LOG.level_unexpected
4586: , L_LOG_MODULE || 'when_others'
4587: , SQLERRM
4581: , 'Inside WHEN OTHERS of ' || L_API_NAME_FULL || '. Oracle Error was:'
4582: );
4583: FND_LOG.String
4584: (
4585: FND_LOG.level_unexpected
4586: , L_LOG_MODULE || 'when_others'
4587: , SQLERRM
4588: );
4589: END IF ;