1445: END IF;
1446: -- Initialize API return status to success
1447: x_return_status := FND_API.G_RET_STS_SUCCESS;
1448:
1449: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1450: THEN
1451: FND_LOG.String
1452: ( FND_LOG.level_procedure ,
1453: L_LOG_MODULE || '',
1447: x_return_status := FND_API.G_RET_STS_SUCCESS;
1448:
1449: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1450: THEN
1451: FND_LOG.String
1452: ( FND_LOG.level_procedure ,
1453: L_LOG_MODULE || '',
1454: 'Inside Create_cost_details PVT API:'
1455: );
1448:
1449: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1450: THEN
1451: FND_LOG.String
1452: ( FND_LOG.level_procedure ,
1453: L_LOG_MODULE || '',
1454: 'Inside Create_cost_details PVT API:'
1455: );
1456: END IF;
1455: );
1456: END IF;
1457:
1458:
1459: ----------------------- FND Logging -----------------------------------
1460: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1461: THEN
1462:
1463:
1456: END IF;
1457:
1458:
1459: ----------------------- FND Logging -----------------------------------
1460: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1461: THEN
1462:
1463:
1464: FND_LOG.String
1460: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1461: THEN
1462:
1463:
1464: FND_LOG.String
1465: ( FND_LOG.level_procedure ,
1466: L_LOG_MODULE || 'start'
1467: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
1468: );
1461: THEN
1462:
1463:
1464: FND_LOG.String
1465: ( FND_LOG.level_procedure ,
1466: L_LOG_MODULE || 'start'
1467: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
1468: );
1469: FND_LOG.String
1465: ( FND_LOG.level_procedure ,
1466: L_LOG_MODULE || 'start'
1467: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
1468: );
1469: FND_LOG.String
1470: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1471: , 'p_api_version:' || p_api_version
1472: );
1473: FND_LOG.String
1466: L_LOG_MODULE || 'start'
1467: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
1468: );
1469: FND_LOG.String
1470: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1471: , 'p_api_version:' || p_api_version
1472: );
1473: FND_LOG.String
1474: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1469: FND_LOG.String
1470: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1471: , 'p_api_version:' || p_api_version
1472: );
1473: FND_LOG.String
1474: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1475: , 'p_init_msg_list:' || p_init_msg_list
1476: );
1477: FND_LOG.String
1470: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1471: , 'p_api_version:' || p_api_version
1472: );
1473: FND_LOG.String
1474: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1475: , 'p_init_msg_list:' || p_init_msg_list
1476: );
1477: FND_LOG.String
1478: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1473: FND_LOG.String
1474: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1475: , 'p_init_msg_list:' || p_init_msg_list
1476: );
1477: FND_LOG.String
1478: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1479: , 'p_commit:' || p_commit
1480: );
1481: FND_LOG.String
1474: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1475: , 'p_init_msg_list:' || p_init_msg_list
1476: );
1477: FND_LOG.String
1478: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1479: , 'p_commit:' || p_commit
1480: );
1481: FND_LOG.String
1482: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1477: FND_LOG.String
1478: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1479: , 'p_commit:' || p_commit
1480: );
1481: FND_LOG.String
1482: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1483: , 'p_validation_level:' || p_validation_level
1484: );
1485: FND_LOG.String
1478: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1479: , 'p_commit:' || p_commit
1480: );
1481: FND_LOG.String
1482: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1483: , 'p_validation_level:' || p_validation_level
1484: );
1485: FND_LOG.String
1486: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1481: FND_LOG.String
1482: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1483: , 'p_validation_level:' || p_validation_level
1484: );
1485: FND_LOG.String
1486: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1487: , 'p_resp_appl_id:' || p_resp_appl_id
1488: );
1489: FND_LOG.String
1482: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1483: , 'p_validation_level:' || p_validation_level
1484: );
1485: FND_LOG.String
1486: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1487: , 'p_resp_appl_id:' || p_resp_appl_id
1488: );
1489: FND_LOG.String
1490: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1485: FND_LOG.String
1486: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1487: , 'p_resp_appl_id:' || p_resp_appl_id
1488: );
1489: FND_LOG.String
1490: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1491: , 'p_resp_id:' || p_resp_id
1492: );
1493: FND_LOG.String
1486: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1487: , 'p_resp_appl_id:' || p_resp_appl_id
1488: );
1489: FND_LOG.String
1490: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1491: , 'p_resp_id:' || p_resp_id
1492: );
1493: FND_LOG.String
1494: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1489: FND_LOG.String
1490: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1491: , 'p_resp_id:' || p_resp_id
1492: );
1493: FND_LOG.String
1494: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1495: , 'p_user_id:' || p_user_id
1496: );
1497: FND_LOG.String
1490: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1491: , 'p_resp_id:' || p_resp_id
1492: );
1493: FND_LOG.String
1494: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1495: , 'p_user_id:' || p_user_id
1496: );
1497: FND_LOG.String
1498: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1493: FND_LOG.String
1494: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1495: , 'p_user_id:' || p_user_id
1496: );
1497: FND_LOG.String
1498: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1499: , 'p_login_id:' || p_login_id
1500: );
1501: FND_LOG.String
1494: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1495: , 'p_user_id:' || p_user_id
1496: );
1497: FND_LOG.String
1498: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1499: , 'p_login_id:' || p_login_id
1500: );
1501: FND_LOG.String
1502: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1497: FND_LOG.String
1498: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1499: , 'p_login_id:' || p_login_id
1500: );
1501: FND_LOG.String
1502: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1503: , 'p_transaction_control:' || p_transaction_control
1504: );
1505: FND_LOG.String
1498: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1499: , 'p_login_id:' || p_login_id
1500: );
1501: FND_LOG.String
1502: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1503: , 'p_transaction_control:' || p_transaction_control
1504: );
1505: FND_LOG.String
1506: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1501: FND_LOG.String
1502: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1503: , 'p_transaction_control:' || p_transaction_control
1504: );
1505: FND_LOG.String
1506: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1507: , 'p_cost_creation_override: ' || p_cost_creation_override
1508: );
1509: -- --------------------------------------------------------------------------
1502: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1503: , 'p_transaction_control:' || p_transaction_control
1504: );
1505: FND_LOG.String
1506: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
1507: , 'p_cost_creation_override: ' || p_cost_creation_override
1508: );
1509: -- --------------------------------------------------------------------------
1510: -- This procedure Logs the charges record paramters.
1519: --if no value is passed then return NULL otherwise return the value passed
1520:
1521: TO_NULL (p_cost_Rec, l_cost_Rec) ;
1522:
1523: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1524: THEN
1525: FND_LOG.String
1526: ( FND_LOG.level_procedure ,
1527: L_LOG_MODULE || '',
1521: TO_NULL (p_cost_Rec, l_cost_Rec) ;
1522:
1523: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1524: THEN
1525: FND_LOG.String
1526: ( FND_LOG.level_procedure ,
1527: L_LOG_MODULE || '',
1528: 'l_cost_Rec.estimate_Detail_id : '||l_cost_Rec.estimate_Detail_id
1529: );
1522:
1523: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1524: THEN
1525: FND_LOG.String
1526: ( FND_LOG.level_procedure ,
1527: L_LOG_MODULE || '',
1528: 'l_cost_Rec.estimate_Detail_id : '||l_cost_Rec.estimate_Detail_id
1529: );
1530: END IF;
1587: x_msg_count => l_msg_count,
1588: x_return_status => l_return_status
1589: );
1590:
1591: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1592: THEN
1593: FND_LOG.String
1594: ( FND_LOG.level_procedure ,
1595: L_LOG_MODULE || '',
1589: );
1590:
1591: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1592: THEN
1593: FND_LOG.String
1594: ( FND_LOG.level_procedure ,
1595: L_LOG_MODULE || '',
1596: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
1597: );
1590:
1591: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1592: THEN
1593: FND_LOG.String
1594: ( FND_LOG.level_procedure ,
1595: L_LOG_MODULE || '',
1596: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
1597: );
1598:
1595: L_LOG_MODULE || '',
1596: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
1597: );
1598:
1599: FND_LOG.String
1600: ( FND_LOG.level_procedure ,
1601: L_LOG_MODULE || '',
1602: 'l_disallow_request_update: '||l_disallow_request_update||'l_disallow_new_charge: '||l_disallow_new_charge||
1603: 'l_disallow_charge_update: '||l_disallow_charge_update
1596: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
1597: );
1598:
1599: FND_LOG.String
1600: ( FND_LOG.level_procedure ,
1601: L_LOG_MODULE || '',
1602: 'l_disallow_request_update: '||l_disallow_request_update||'l_disallow_new_charge: '||l_disallow_new_charge||
1603: 'l_disallow_charge_update: '||l_disallow_charge_update
1604: );
1624:
1625: l_transaction_type_id := l_cost_rec.transaction_type_id;
1626: l_charge_line_type := l_cost_rec.charge_line_type;
1627:
1628: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1629: THEN
1630: FND_LOG.String
1631: ( FND_LOG.level_procedure ,
1632: L_LOG_MODULE || '',
1626: l_charge_line_type := l_cost_rec.charge_line_type;
1627:
1628: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1629: THEN
1630: FND_LOG.String
1631: ( FND_LOG.level_procedure ,
1632: L_LOG_MODULE || '',
1633: 'l_transaction_type_id : '||l_transaction_type_id ||'l_charge_line_type :'||l_charge_line_type
1634: );
1627:
1628: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1629: THEN
1630: FND_LOG.String
1631: ( FND_LOG.level_procedure ,
1632: L_LOG_MODULE || '',
1633: 'l_transaction_type_id : '||l_transaction_type_id ||'l_charge_line_type :'||l_charge_line_type
1634: );
1635: END IF;
1695: END IF;--p_cost_creation_overrid
1696:
1697:
1698:
1699: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1700: THEN
1701: FND_LOG.String
1702: ( FND_LOG.level_procedure ,
1703: L_LOG_MODULE || '',
1697:
1698:
1699: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1700: THEN
1701: FND_LOG.String
1702: ( FND_LOG.level_procedure ,
1703: L_LOG_MODULE || '',
1704: 'After Mandatory Check 1'
1705: );
1698:
1699: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1700: THEN
1701: FND_LOG.String
1702: ( FND_LOG.level_procedure ,
1703: L_LOG_MODULE || '',
1704: 'After Mandatory Check 1'
1705: );
1706: END IF;
1735: else
1736: l_cost_rec.charge_line_type := 'ACTUAL';
1737: end if;
1738:
1739: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1740: THEN
1741: FND_LOG.String
1742: ( FND_LOG.level_procedure ,
1743: L_LOG_MODULE || '',
1737: end if;
1738:
1739: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1740: THEN
1741: FND_LOG.String
1742: ( FND_LOG.level_procedure ,
1743: L_LOG_MODULE || '',
1744: 'After Mandatory Check 2'
1745: );
1738:
1739: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1740: THEN
1741: FND_LOG.String
1742: ( FND_LOG.level_procedure ,
1743: L_LOG_MODULE || '',
1744: 'After Mandatory Check 2'
1745: );
1746: END IF;
1787: FND_MESSAGE.Set_Token('API_NAME', l_api_name_full);
1788: FND_MSG_PUB.Add;
1789: RAISE FND_API.G_EXC_ERROR;
1790: END IF;
1791: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1792: THEN
1793: FND_LOG.String
1794: ( FND_LOG.level_procedure ,
1795: L_LOG_MODULE || '',
1789: RAISE FND_API.G_EXC_ERROR;
1790: END IF;
1791: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1792: THEN
1793: FND_LOG.String
1794: ( FND_LOG.level_procedure ,
1795: L_LOG_MODULE || '',
1796: 'After Validating the Cost Details'
1797: );
1790: END IF;
1791: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1792: THEN
1793: FND_LOG.String
1794: ( FND_LOG.level_procedure ,
1795: L_LOG_MODULE || '',
1796: 'After Validating the Cost Details'
1797: );
1798: END IF;
1918: --EXIT WHEN get_org_currency%NOTFOUND;
1919: CLOSE get_org_currency;
1920:
1921:
1922: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1923: THEN
1924: FND_LOG.String
1925: ( FND_LOG.level_procedure ,
1926: L_LOG_MODULE || '',
1920:
1921:
1922: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1923: THEN
1924: FND_LOG.String
1925: ( FND_LOG.level_procedure ,
1926: L_LOG_MODULE || '',
1927: 'Before calling CST_COST_API.Get_Item_Cost '||'p_inventory_item_id :'||lx_cost_rec.inventory_item_id||'p_organization_id :'||l_cost_inv_org_id
1928: );
1921:
1922: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1923: THEN
1924: FND_LOG.String
1925: ( FND_LOG.level_procedure ,
1926: L_LOG_MODULE || '',
1927: 'Before calling CST_COST_API.Get_Item_Cost '||'p_inventory_item_id :'||lx_cost_rec.inventory_item_id||'p_organization_id :'||l_cost_inv_org_id
1928: );
1929: END IF;
1937: p_cost_group_id => p_cost_group_id,
1938: p_cost_type_id => p_cost_type_id
1939: );
1940:
1941: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1942: THEN
1943: FND_LOG.String
1944: ( FND_LOG.level_procedure ,
1945: L_LOG_MODULE || '',
1939: );
1940:
1941: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1942: THEN
1943: FND_LOG.String
1944: ( FND_LOG.level_procedure ,
1945: L_LOG_MODULE || '',
1946: 'After calling CST_COST_API.Get_Item_Cost '||'l_unit_cost : '||l_unit_cost
1947: );
1940:
1941: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1942: THEN
1943: FND_LOG.String
1944: ( FND_LOG.level_procedure ,
1945: L_LOG_MODULE || '',
1946: 'After calling CST_COST_API.Get_Item_Cost '||'l_unit_cost : '||l_unit_cost
1947: );
1948: END IF;
1968: END IF;
1969:
1970: END IF;
1971:
1972: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1973: THEN
1974: FND_LOG.String
1975: ( FND_LOG.level_procedure ,
1976: L_LOG_MODULE || '',
1970: END IF;
1971:
1972: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1973: THEN
1974: FND_LOG.String
1975: ( FND_LOG.level_procedure ,
1976: L_LOG_MODULE || '',
1977: 'Before calling the Insert_Row procedure'
1978: );
1971:
1972: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
1973: THEN
1974: FND_LOG.String
1975: ( FND_LOG.level_procedure ,
1976: L_LOG_MODULE || '',
1977: 'Before calling the Insert_Row procedure'
1978: );
1979: END IF;
2023: );
2024:
2025: x_cost_id :=l_cost_id;
2026:
2027: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2028: THEN
2029: FND_LOG.String
2030: ( FND_LOG.level_procedure ,
2031: L_LOG_MODULE || '',
2025: x_cost_id :=l_cost_id;
2026:
2027: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2028: THEN
2029: FND_LOG.String
2030: ( FND_LOG.level_procedure ,
2031: L_LOG_MODULE || '',
2032: 'After calling the Insert Row '
2033: );
2026:
2027: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2028: THEN
2029: FND_LOG.String
2030: ( FND_LOG.level_procedure ,
2031: L_LOG_MODULE || '',
2032: 'After calling the Insert Row '
2033: );
2034: END IF;
2195: END IF;
2196: -- Initialize API return status to success
2197: x_return_status := FND_API.G_RET_STS_SUCCESS;
2198:
2199: ----------------------- FND Logging -----------------------------------
2200: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2201: THEN
2202: FND_LOG.String
2203: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2196: -- Initialize API return status to success
2197: x_return_status := FND_API.G_RET_STS_SUCCESS;
2198:
2199: ----------------------- FND Logging -----------------------------------
2200: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2201: THEN
2202: FND_LOG.String
2203: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2204: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2198:
2199: ----------------------- FND Logging -----------------------------------
2200: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2201: THEN
2202: FND_LOG.String
2203: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2204: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2205: );
2206: FND_LOG.String
2199: ----------------------- FND Logging -----------------------------------
2200: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2201: THEN
2202: FND_LOG.String
2203: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2204: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2205: );
2206: FND_LOG.String
2207: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2202: FND_LOG.String
2203: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2204: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2205: );
2206: FND_LOG.String
2207: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2208: , 'p_api_version:' || p_api_version
2209: );
2210: FND_LOG.String
2203: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2204: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2205: );
2206: FND_LOG.String
2207: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2208: , 'p_api_version:' || p_api_version
2209: );
2210: FND_LOG.String
2211: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2206: FND_LOG.String
2207: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2208: , 'p_api_version:' || p_api_version
2209: );
2210: FND_LOG.String
2211: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2212: , 'p_init_msg_list:' || p_init_msg_list
2213: );
2214: FND_LOG.String
2207: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2208: , 'p_api_version:' || p_api_version
2209: );
2210: FND_LOG.String
2211: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2212: , 'p_init_msg_list:' || p_init_msg_list
2213: );
2214: FND_LOG.String
2215: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2210: FND_LOG.String
2211: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2212: , 'p_init_msg_list:' || p_init_msg_list
2213: );
2214: FND_LOG.String
2215: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2216: , 'p_commit:' || p_commit
2217: );
2218: FND_LOG.String
2211: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2212: , 'p_init_msg_list:' || p_init_msg_list
2213: );
2214: FND_LOG.String
2215: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2216: , 'p_commit:' || p_commit
2217: );
2218: FND_LOG.String
2219: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2214: FND_LOG.String
2215: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2216: , 'p_commit:' || p_commit
2217: );
2218: FND_LOG.String
2219: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2220: , 'p_validation_level:' || p_validation_level
2221: );
2222: FND_LOG.String
2215: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2216: , 'p_commit:' || p_commit
2217: );
2218: FND_LOG.String
2219: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2220: , 'p_validation_level:' || p_validation_level
2221: );
2222: FND_LOG.String
2223: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2218: FND_LOG.String
2219: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2220: , 'p_validation_level:' || p_validation_level
2221: );
2222: FND_LOG.String
2223: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2224: , 'p_resp_appl_id:' || p_resp_appl_id
2225: );
2226: FND_LOG.String
2219: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2220: , 'p_validation_level:' || p_validation_level
2221: );
2222: FND_LOG.String
2223: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2224: , 'p_resp_appl_id:' || p_resp_appl_id
2225: );
2226: FND_LOG.String
2227: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2222: FND_LOG.String
2223: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2224: , 'p_resp_appl_id:' || p_resp_appl_id
2225: );
2226: FND_LOG.String
2227: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2228: , 'p_resp_id:' || p_resp_id
2229: );
2230: FND_LOG.String
2223: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2224: , 'p_resp_appl_id:' || p_resp_appl_id
2225: );
2226: FND_LOG.String
2227: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2228: , 'p_resp_id:' || p_resp_id
2229: );
2230: FND_LOG.String
2231: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2226: FND_LOG.String
2227: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2228: , 'p_resp_id:' || p_resp_id
2229: );
2230: FND_LOG.String
2231: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2232: , 'p_user_id:' || p_user_id
2233: );
2234: FND_LOG.String
2227: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2228: , 'p_resp_id:' || p_resp_id
2229: );
2230: FND_LOG.String
2231: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2232: , 'p_user_id:' || p_user_id
2233: );
2234: FND_LOG.String
2235: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2230: FND_LOG.String
2231: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2232: , 'p_user_id:' || p_user_id
2233: );
2234: FND_LOG.String
2235: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2236: , 'p_login_id:' || p_login_id
2237: );
2238: FND_LOG.String
2231: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2232: , 'p_user_id:' || p_user_id
2233: );
2234: FND_LOG.String
2235: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2236: , 'p_login_id:' || p_login_id
2237: );
2238: FND_LOG.String
2239: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2234: FND_LOG.String
2235: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2236: , 'p_login_id:' || p_login_id
2237: );
2238: FND_LOG.String
2239: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2240: , 'p_transaction_control:' || p_transaction_control
2241: );
2242: -- --------------------------------------------------------------------------
2235: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2236: , 'p_login_id:' || p_login_id
2237: );
2238: FND_LOG.String
2239: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2240: , 'p_transaction_control:' || p_transaction_control
2241: );
2242: -- --------------------------------------------------------------------------
2243: -- This procedure Logs the charges record paramters.
2249: END IF;
2250:
2251: l_cost_rec:=p_cost_rec;
2252:
2253: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2254: THEN
2255: FND_LOG.String
2256: ( FND_LOG.level_procedure ,
2257: L_LOG_MODULE || '',
2251: l_cost_rec:=p_cost_rec;
2252:
2253: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2254: THEN
2255: FND_LOG.String
2256: ( FND_LOG.level_procedure ,
2257: L_LOG_MODULE || '',
2258: 'p_cost_rec.estimate_Detail_id : '||p_cost_rec.estimate_Detail_id
2259: );
2252:
2253: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2254: THEN
2255: FND_LOG.String
2256: ( FND_LOG.level_procedure ,
2257: L_LOG_MODULE || '',
2258: 'p_cost_rec.estimate_Detail_id : '||p_cost_rec.estimate_Detail_id
2259: );
2260: END IF;
2354: x_msg_count => l_msg_count,
2355: x_return_status => l_return_status
2356: );
2357:
2358: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2359: THEN
2360: FND_LOG.String
2361: ( FND_LOG.level_procedure ,
2362: L_LOG_MODULE || '',
2356: );
2357:
2358: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2359: THEN
2360: FND_LOG.String
2361: ( FND_LOG.level_procedure ,
2362: L_LOG_MODULE || '',
2363: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
2364: );
2357:
2358: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2359: THEN
2360: FND_LOG.String
2361: ( FND_LOG.level_procedure ,
2362: L_LOG_MODULE || '',
2363: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
2364: );
2365:
2362: L_LOG_MODULE || '',
2363: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
2364: );
2365:
2366: FND_LOG.String
2367: ( FND_LOG.level_procedure ,
2368: L_LOG_MODULE || '',
2369: 'l_disallow_request_update: '||l_disallow_request_update||'l_disallow_new_charge: '||l_disallow_new_charge||
2370: 'l_disallow_charge_update: '||l_disallow_charge_update
2363: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
2364: );
2365:
2366: FND_LOG.String
2367: ( FND_LOG.level_procedure ,
2368: L_LOG_MODULE || '',
2369: 'l_disallow_request_update: '||l_disallow_request_update||'l_disallow_new_charge: '||l_disallow_new_charge||
2370: 'l_disallow_charge_update: '||l_disallow_charge_update
2371: );
2459: FND_MSG_PUB.Add;
2460: RAISE FND_API.G_EXC_ERROR;
2461: END IF;
2462:
2463: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2464: THEN
2465: FND_LOG.String
2466: ( FND_LOG.level_procedure ,
2467: L_LOG_MODULE || '',
2461: END IF;
2462:
2463: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2464: THEN
2465: FND_LOG.String
2466: ( FND_LOG.level_procedure ,
2467: L_LOG_MODULE || '',
2468: 'After Validating the Cost Details '
2469: );
2462:
2463: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2464: THEN
2465: FND_LOG.String
2466: ( FND_LOG.level_procedure ,
2467: L_LOG_MODULE || '',
2468: 'After Validating the Cost Details '
2469: );
2470:
2474:
2475: end if;
2476: END IF;
2477:
2478: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2479: THEN
2480: FND_LOG.String
2481: ( FND_LOG.level_procedure ,
2482: L_LOG_MODULE || '',
2476: END IF;
2477:
2478: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2479: THEN
2480: FND_LOG.String
2481: ( FND_LOG.level_procedure ,
2482: L_LOG_MODULE || '',
2483: 'Before Cost Calculations'
2484: );
2477:
2478: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2479: THEN
2480: FND_LOG.String
2481: ( FND_LOG.level_procedure ,
2482: L_LOG_MODULE || '',
2483: 'Before Cost Calculations'
2484: );
2485: END IF;
2533:
2534:
2535:
2536: if L_RECALC_COST = 'Y' then
2537: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2538: THEN
2539: FND_LOG.String
2540: ( FND_LOG.level_procedure ,
2541: L_LOG_MODULE || '',
2535:
2536: if L_RECALC_COST = 'Y' then
2537: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2538: THEN
2539: FND_LOG.String
2540: ( FND_LOG.level_procedure ,
2541: L_LOG_MODULE || '',
2542: 'Recalcualting the Cost'
2543: );
2536: if L_RECALC_COST = 'Y' then
2537: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2538: THEN
2539: FND_LOG.String
2540: ( FND_LOG.level_procedure ,
2541: L_LOG_MODULE || '',
2542: 'Recalcualting the Cost'
2543: );
2544: END IF;
2602: --EXIT WHEN get_org_currency%NOTFOUND;
2603: CLOSE get_org_currency;
2604:
2605:
2606: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2607: THEN
2608: FND_LOG.String
2609: ( FND_LOG.level_procedure ,
2610: L_LOG_MODULE || '',
2604:
2605:
2606: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2607: THEN
2608: FND_LOG.String
2609: ( FND_LOG.level_procedure ,
2610: L_LOG_MODULE || '',
2611: 'Before calling CST_COST_API.Get_Item_Cost '||'p_inventory_item_id :'||lx_cost_rec.inventory_item_id||'p_organization_id :'||l_cost_inv_org_id
2612: );
2605:
2606: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2607: THEN
2608: FND_LOG.String
2609: ( FND_LOG.level_procedure ,
2610: L_LOG_MODULE || '',
2611: 'Before calling CST_COST_API.Get_Item_Cost '||'p_inventory_item_id :'||lx_cost_rec.inventory_item_id||'p_organization_id :'||l_cost_inv_org_id
2612: );
2613: END IF;
2620: p_cost_group_id => p_cost_group_id,
2621: p_cost_type_id => p_cost_type_id
2622: );
2623:
2624: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2625: THEN
2626: FND_LOG.String
2627: ( FND_LOG.level_procedure ,
2628: L_LOG_MODULE || '',
2622: );
2623:
2624: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2625: THEN
2626: FND_LOG.String
2627: ( FND_LOG.level_procedure ,
2628: L_LOG_MODULE || '',
2629: 'After calling CST_COST_API.Get_Item_Cost '||'l_unit_cost : '||l_unit_cost
2630: );
2623:
2624: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2625: THEN
2626: FND_LOG.String
2627: ( FND_LOG.level_procedure ,
2628: L_LOG_MODULE || '',
2629: 'After calling CST_COST_API.Get_Item_Cost '||'l_unit_cost : '||l_unit_cost
2630: );
2631: END IF;
2645: END IF;
2646:
2647: end if ;
2648:
2649: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2650: THEN
2651: FND_LOG.String
2652: ( FND_LOG.level_procedure ,
2653: L_LOG_MODULE || '',
2647: end if ;
2648:
2649: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2650: THEN
2651: FND_LOG.String
2652: ( FND_LOG.level_procedure ,
2653: L_LOG_MODULE || '',
2654: 'Before calling the Update_Row Procedure'
2655: );
2648:
2649: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2650: THEN
2651: FND_LOG.String
2652: ( FND_LOG.level_procedure ,
2653: L_LOG_MODULE || '',
2654: 'Before calling the Update_Row Procedure'
2655: );
2656: END IF;
2818:
2819: --Initialize the API Return Success to True
2820: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2821:
2822: ----------------------- FND Logging -----------------------------------
2823: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2824: THEN
2825: FND_LOG.String
2826: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2819: --Initialize the API Return Success to True
2820: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2821:
2822: ----------------------- FND Logging -----------------------------------
2823: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2824: THEN
2825: FND_LOG.String
2826: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2827: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2821:
2822: ----------------------- FND Logging -----------------------------------
2823: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2824: THEN
2825: FND_LOG.String
2826: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2827: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2828: );
2829: FND_LOG.String
2822: ----------------------- FND Logging -----------------------------------
2823: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2824: THEN
2825: FND_LOG.String
2826: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2827: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2828: );
2829: FND_LOG.String
2830: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2825: FND_LOG.String
2826: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2827: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2828: );
2829: FND_LOG.String
2830: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2831: , 'p_api_version:' || p_api_version
2832: );
2833: FND_LOG.String
2826: ( FND_LOG.level_procedure , L_LOG_MODULE || 'start'
2827: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
2828: );
2829: FND_LOG.String
2830: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2831: , 'p_api_version:' || p_api_version
2832: );
2833: FND_LOG.String
2834: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2829: FND_LOG.String
2830: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2831: , 'p_api_version:' || p_api_version
2832: );
2833: FND_LOG.String
2834: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2835: , 'p_init_msg_list:' || p_init_msg_list
2836: );
2837: FND_LOG.String
2830: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2831: , 'p_api_version:' || p_api_version
2832: );
2833: FND_LOG.String
2834: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2835: , 'p_init_msg_list:' || p_init_msg_list
2836: );
2837: FND_LOG.String
2838: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2833: FND_LOG.String
2834: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2835: , 'p_init_msg_list:' || p_init_msg_list
2836: );
2837: FND_LOG.String
2838: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2839: , 'p_commit:' || p_commit
2840: );
2841: FND_LOG.String
2834: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2835: , 'p_init_msg_list:' || p_init_msg_list
2836: );
2837: FND_LOG.String
2838: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2839: , 'p_commit:' || p_commit
2840: );
2841: FND_LOG.String
2842: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2837: FND_LOG.String
2838: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2839: , 'p_commit:' || p_commit
2840: );
2841: FND_LOG.String
2842: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2843: , 'p_validation_level:' || p_validation_level
2844: );
2845: FND_LOG.String
2838: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2839: , 'p_commit:' || p_commit
2840: );
2841: FND_LOG.String
2842: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2843: , 'p_validation_level:' || p_validation_level
2844: );
2845: FND_LOG.String
2846: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2841: FND_LOG.String
2842: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2843: , 'p_validation_level:' || p_validation_level
2844: );
2845: FND_LOG.String
2846: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2847: , 'p_transaction_control:' || p_transaction_control
2848: );
2849: FND_LOG.String
2842: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2843: , 'p_validation_level:' || p_validation_level
2844: );
2845: FND_LOG.String
2846: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2847: , 'p_transaction_control:' || p_transaction_control
2848: );
2849: FND_LOG.String
2850: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2845: FND_LOG.String
2846: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2847: , 'p_transaction_control:' || p_transaction_control
2848: );
2849: FND_LOG.String
2850: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2851: , 'p_cost_id' || p_cost_id
2852: );
2853:
2846: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2847: , 'p_transaction_control:' || p_transaction_control
2848: );
2849: FND_LOG.String
2850: ( FND_LOG.level_procedure , L_LOG_MODULE || ''
2851: , 'p_cost_id' || p_cost_id
2852: );
2853:
2854: END IF;
2858: 'p_cost_id') ;
2859: RAISE FND_API.G_EXC_ERROR ;
2860: END IF ;
2861:
2862: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2863: THEN
2864: FND_LOG.String
2865: ( FND_LOG.level_procedure ,
2866: L_LOG_MODULE || '',
2860: END IF ;
2861:
2862: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2863: THEN
2864: FND_LOG.String
2865: ( FND_LOG.level_procedure ,
2866: L_LOG_MODULE || '',
2867: 'Before Do_Cost_Line_Exist'
2868: );
2861:
2862: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2863: THEN
2864: FND_LOG.String
2865: ( FND_LOG.level_procedure ,
2866: L_LOG_MODULE || '',
2867: 'Before Do_Cost_Line_Exist'
2868: );
2869: END IF;
2889: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2890: RAISE G_WARNING ;
2891: END IF ;
2892:
2893: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2894: THEN
2895: FND_LOG.String
2896: ( FND_LOG.level_procedure ,
2897: L_LOG_MODULE || '',
2891: END IF ;
2892:
2893: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2894: THEN
2895: FND_LOG.String
2896: ( FND_LOG.level_procedure ,
2897: L_LOG_MODULE || '',
2898: 'Before Do_charge_line_Exist'
2899: );
2892:
2893: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
2894: THEN
2895: FND_LOG.String
2896: ( FND_LOG.level_procedure ,
2897: L_LOG_MODULE || '',
2898: 'Before Do_charge_line_Exist'
2899: );
2900: END IF;
3026: lx_quantity NUMBER;
3027:
3028: BEGIN
3029:
3030: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3031: THEN
3032: FND_LOG.String
3033: ( FND_LOG.level_procedure ,
3034: L_LOG_MODULE || '',
3028: BEGIN
3029:
3030: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3031: THEN
3032: FND_LOG.String
3033: ( FND_LOG.level_procedure ,
3034: L_LOG_MODULE || '',
3035: 'Inside Validate_Cost_Details'
3036: );
3029:
3030: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3031: THEN
3032: FND_LOG.String
3033: ( FND_LOG.level_procedure ,
3034: L_LOG_MODULE || '',
3035: 'Inside Validate_Cost_Details'
3036: );
3037: END IF;
3077: END IF;
3078: END IF;
3079: END IF;
3080:
3081: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3082: THEN
3083: FND_LOG.String
3084: ( FND_LOG.level_procedure ,
3085: L_LOG_MODULE || '',
3079: END IF;
3080:
3081: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3082: THEN
3083: FND_LOG.String
3084: ( FND_LOG.level_procedure ,
3085: L_LOG_MODULE || '',
3086: 'After Cost_Id Validation'
3087: );
3080:
3081: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3082: THEN
3083: FND_LOG.String
3084: ( FND_LOG.level_procedure ,
3085: L_LOG_MODULE || '',
3086: 'After Cost_Id Validation'
3087: );
3088: END IF;
3133: x_cost_rec.incident_id :=l_db_det_rec.incident_id;
3134:
3135: end if;
3136:
3137: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3138: THEN
3139: FND_LOG.String
3140: ( FND_LOG.level_procedure ,
3141: L_LOG_MODULE || '',
3135: end if;
3136:
3137: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3138: THEN
3139: FND_LOG.String
3140: ( FND_LOG.level_procedure ,
3141: L_LOG_MODULE || '',
3142: 'After Incident_ID Validation'
3143: );
3136:
3137: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3138: THEN
3139: FND_LOG.String
3140: ( FND_LOG.level_procedure ,
3141: L_LOG_MODULE || '',
3142: 'After Incident_ID Validation'
3143: );
3144: END IF;
3241: x_msg_count => l_msg_count,
3242: x_return_status => l_return_status
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: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
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: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
3251: );
3252:
3249: L_LOG_MODULE || '',
3250: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
3251: );
3252:
3253: FND_LOG.String
3254: ( FND_LOG.level_procedure ,
3255: L_LOG_MODULE || '',
3256: 'l_disallow_request_update: '||l_disallow_request_update||'l_disallow_new_charge: '||l_disallow_new_charge||
3257: 'l_disallow_charge_update: '||l_disallow_charge_update
3250: 'l_create_cost_flag: '||l_create_cost_flag||'l_create_charge_flag: '||l_create_charge_flag
3251: );
3252:
3253: FND_LOG.String
3254: ( FND_LOG.level_procedure ,
3255: L_LOG_MODULE || '',
3256: 'l_disallow_request_update: '||l_disallow_request_update||'l_disallow_new_charge: '||l_disallow_new_charge||
3257: 'l_disallow_charge_update: '||l_disallow_charge_update
3258: );
3344:
3345: end if;
3346:
3347:
3348: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3349: THEN
3350: FND_LOG.String
3351: ( FND_LOG.level_procedure ,
3352: L_LOG_MODULE || '',
3346:
3347:
3348: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3349: THEN
3350: FND_LOG.String
3351: ( FND_LOG.level_procedure ,
3352: L_LOG_MODULE || '',
3353: 'After Estimate_Detail_ID Validation'
3354: );
3347:
3348: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3349: THEN
3350: FND_LOG.String
3351: ( FND_LOG.level_procedure ,
3352: L_LOG_MODULE || '',
3353: 'After Estimate_Detail_ID Validation'
3354: );
3355: END IF;
3432:
3433: end if;
3434:
3435: END IF;--validation_mode
3436: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3437: THEN
3438: FND_LOG.String
3439: ( FND_LOG.level_procedure ,
3440: L_LOG_MODULE || '',
3434:
3435: END IF;--validation_mode
3436: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3437: THEN
3438: FND_LOG.String
3439: ( FND_LOG.level_procedure ,
3440: L_LOG_MODULE || '',
3441: 'After Source Id and Source Code Validation'
3442: );
3435: END IF;--validation_mode
3436: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3437: THEN
3438: FND_LOG.String
3439: ( FND_LOG.level_procedure ,
3440: L_LOG_MODULE || '',
3441: 'After Source Id and Source Code Validation'
3442: );
3443: END IF;
3490: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3491: RAISE FND_API.G_EXC_ERROR ;
3492: END IF;
3493:
3494: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3495: THEN
3496: FND_LOG.String
3497: ( FND_LOG.level_procedure ,
3498: L_LOG_MODULE || '',
3492: END IF;
3493:
3494: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3495: THEN
3496: FND_LOG.String
3497: ( FND_LOG.level_procedure ,
3498: L_LOG_MODULE || '',
3499: 'Mutli Org ID l_org_id : '||l_org_id||'l_profile :'||l_profile
3500: );
3493:
3494: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3495: THEN
3496: FND_LOG.String
3497: ( FND_LOG.level_procedure ,
3498: L_LOG_MODULE || '',
3499: 'Mutli Org ID l_org_id : '||l_org_id||'l_profile :'||l_profile
3500: );
3501: END IF;
3657: --cost will be recalculated if item,ou or quantity changes during updation
3658: l_recalc_cost := 'Y' ;
3659: --dbms_output.put_line('l_recalc_cost ORG changes');
3660: END IF;
3661: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3662: THEN
3663: FND_LOG.String
3664: ( FND_LOG.level_procedure ,
3665: L_LOG_MODULE || '',
3659: --dbms_output.put_line('l_recalc_cost ORG changes');
3660: END IF;
3661: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3662: THEN
3663: FND_LOG.String
3664: ( FND_LOG.level_procedure ,
3665: L_LOG_MODULE || '',
3666: 'After Org_ID Validation'
3667: );
3660: END IF;
3661: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3662: THEN
3663: FND_LOG.String
3664: ( FND_LOG.level_procedure ,
3665: L_LOG_MODULE || '',
3666: 'After Org_ID Validation'
3667: );
3668: END IF;
3777:
3778:
3779: END IF; --validation_mode
3780:
3781: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3782: THEN
3783:
3784: FND_LOG.String
3785: ( FND_LOG.level_procedure ,
3780:
3781: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3782: THEN
3783:
3784: FND_LOG.String
3785: ( FND_LOG.level_procedure ,
3786: L_LOG_MODULE || '',
3787: 'After Item Id Validation'
3788: );
3781: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3782: THEN
3783:
3784: FND_LOG.String
3785: ( FND_LOG.level_procedure ,
3786: L_LOG_MODULE || '',
3787: 'After Item Id Validation'
3788: );
3789: END If;
3855:
3856:
3857: END IF; --validation_mode
3858:
3859: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3860: THEN
3861:
3862: FND_LOG.String
3863: ( FND_LOG.level_procedure ,
3858:
3859: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3860: THEN
3861:
3862: FND_LOG.String
3863: ( FND_LOG.level_procedure ,
3864: L_LOG_MODULE || '',
3865: 'After Inventory Org Id Validation'
3866: );
3859: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3860: THEN
3861:
3862: FND_LOG.String
3863: ( FND_LOG.level_procedure ,
3864: L_LOG_MODULE || '',
3865: 'After Inventory Org Id Validation'
3866: );
3867: END If;
3979: --DBMS_OUTPUT.PUT_LINE('Completed the txn billing type id');
3980:
3981: END IF;
3982:
3983: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3984: THEN
3985: FND_LOG.String
3986: ( FND_LOG.level_procedure ,
3987: L_LOG_MODULE || '',
3981: END IF;
3982:
3983: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3984: THEN
3985: FND_LOG.String
3986: ( FND_LOG.level_procedure ,
3987: L_LOG_MODULE || '',
3988: 'After Billing Type Validation'
3989: );
3982:
3983: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
3984: THEN
3985: FND_LOG.String
3986: ( FND_LOG.level_procedure ,
3987: L_LOG_MODULE || '',
3988: 'After Billing Type Validation'
3989: );
3990: END IF;
4117:
4118: End if;
4119: END IF;
4120:
4121: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4122: THEN
4123: FND_LOG.String
4124: ( FND_LOG.level_procedure ,
4125: L_LOG_MODULE || '',
4119: END IF;
4120:
4121: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4122: THEN
4123: FND_LOG.String
4124: ( FND_LOG.level_procedure ,
4125: L_LOG_MODULE || '',
4126: 'After UOM Validation'
4127: );
4120:
4121: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4122: THEN
4123: FND_LOG.String
4124: ( FND_LOG.level_procedure ,
4125: L_LOG_MODULE || '',
4126: 'After UOM Validation'
4127: );
4128: END IF;
4251:
4252: End if;
4253: END IF;
4254:
4255: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4256: THEN
4257: FND_LOG.String
4258: ( FND_LOG.level_procedure ,
4259: L_LOG_MODULE || '',
4253: END IF;
4254:
4255: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4256: THEN
4257: FND_LOG.String
4258: ( FND_LOG.level_procedure ,
4259: L_LOG_MODULE || '',
4260: 'After Currency Code Validation'
4261: );
4254:
4255: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4256: THEN
4257: FND_LOG.String
4258: ( FND_LOG.level_procedure ,
4259: L_LOG_MODULE || '',
4260: 'After Currency Code Validation'
4261: );
4262: END IF;
4314: AND NVL(end_date, SYSDATE) >= SYSDATE;
4315:
4316: CURSOR c_login IS
4317: SELECT 1
4318: FROM fnd_logins
4319: WHERE login_id = p_login_id
4320: AND user_id = p_user_id;
4321:
4322: l_dummy VARCHAR2(1);
4349:
4350: IF p_login_id is not null then
4351: BEGIN
4352: SELECT 'x' into l_dummy
4353: FROM fnd_logins
4354: WHERE login_id = p_login_id
4355: AND user_id = p_user_id;
4356:
4357: EXCEPTION
4488:
4489: BEGIN
4490: x_return_status := FND_API.G_RET_STS_SUCCESS;
4491:
4492: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4493: THEN
4494: FND_LOG.String
4495: (
4496: FND_LOG.level_procedure
4490: x_return_status := FND_API.G_RET_STS_SUCCESS;
4491:
4492: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4493: THEN
4494: FND_LOG.String
4495: (
4496: FND_LOG.level_procedure
4497: , L_LOG_MODULE || 'start'
4498: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
4492: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4493: THEN
4494: FND_LOG.String
4495: (
4496: FND_LOG.level_procedure
4497: , L_LOG_MODULE || 'start'
4498: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
4499: );
4500: FND_LOG.String
4496: FND_LOG.level_procedure
4497: , L_LOG_MODULE || 'start'
4498: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
4499: );
4500: FND_LOG.String
4501: (
4502: FND_LOG.level_procedure
4503: , L_LOG_MODULE || 'param 1'
4504: , 'p_api_version_number:' || p_api_version_number
4498: , 'Inside ' || L_API_NAME_FULL || ', called with parameters below:'
4499: );
4500: FND_LOG.String
4501: (
4502: FND_LOG.level_procedure
4503: , L_LOG_MODULE || 'param 1'
4504: , 'p_api_version_number:' || p_api_version_number
4505: );
4506: FND_LOG.String
4502: FND_LOG.level_procedure
4503: , L_LOG_MODULE || 'param 1'
4504: , 'p_api_version_number:' || p_api_version_number
4505: );
4506: FND_LOG.String
4507: (
4508: FND_LOG.level_procedure
4509: , L_LOG_MODULE || 'param 2'
4510: , 'p_init_msg_list:' || p_init_msg_list
4504: , 'p_api_version_number:' || p_api_version_number
4505: );
4506: FND_LOG.String
4507: (
4508: FND_LOG.level_procedure
4509: , L_LOG_MODULE || 'param 2'
4510: , 'p_init_msg_list:' || p_init_msg_list
4511: );
4512: FND_LOG.String
4508: FND_LOG.level_procedure
4509: , L_LOG_MODULE || 'param 2'
4510: , 'p_init_msg_list:' || p_init_msg_list
4511: );
4512: FND_LOG.String
4513: (
4514: FND_LOG.level_procedure
4515: , L_LOG_MODULE || 'param 3'
4516: , 'p_commit:' || p_commit
4510: , 'p_init_msg_list:' || p_init_msg_list
4511: );
4512: FND_LOG.String
4513: (
4514: FND_LOG.level_procedure
4515: , L_LOG_MODULE || 'param 3'
4516: , 'p_commit:' || p_commit
4517: );
4518: FND_LOG.String
4514: FND_LOG.level_procedure
4515: , L_LOG_MODULE || 'param 3'
4516: , 'p_commit:' || p_commit
4517: );
4518: FND_LOG.String
4519: (
4520: FND_LOG.level_procedure
4521: , L_LOG_MODULE || 'param 4'
4522: , 'p_object_type:' || p_object_type
4516: , 'p_commit:' || p_commit
4517: );
4518: FND_LOG.String
4519: (
4520: FND_LOG.level_procedure
4521: , L_LOG_MODULE || 'param 4'
4522: , 'p_object_type:' || p_object_type
4523: );
4524: FND_LOG.String
4520: FND_LOG.level_procedure
4521: , L_LOG_MODULE || 'param 4'
4522: , 'p_object_type:' || p_object_type
4523: );
4524: FND_LOG.String
4525: (
4526: FND_LOG.level_procedure
4527: , L_LOG_MODULE || 'param 5'
4528: , 'p_processing_set_id:' || p_processing_set_id
4522: , 'p_object_type:' || p_object_type
4523: );
4524: FND_LOG.String
4525: (
4526: FND_LOG.level_procedure
4527: , L_LOG_MODULE || 'param 5'
4528: , 'p_processing_set_id:' || p_processing_set_id
4529: );
4530: END IF ;
4555: ------------------------------------------------------------------------------
4556:
4557: IF NVL(p_object_type, 'X') <> 'SR'
4558: THEN
4559: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4560: THEN
4561: FND_LOG.String
4562: (
4563: FND_LOG.level_unexpected
4557: IF NVL(p_object_type, 'X') <> 'SR'
4558: THEN
4559: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4560: THEN
4561: FND_LOG.String
4562: (
4563: FND_LOG.level_unexpected
4564: , L_LOG_MODULE || 'object_type_invalid'
4565: , 'p_object_type has to be SR.'
4559: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4560: THEN
4561: FND_LOG.String
4562: (
4563: FND_LOG.level_unexpected
4564: , L_LOG_MODULE || 'object_type_invalid'
4565: , 'p_object_type has to be SR.'
4566: );
4567: END IF ;
4578: ---
4579:
4580: IF p_processing_set_id IS NULL
4581: THEN
4582: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4583: THEN
4584: FND_LOG.String
4585: (
4586: FND_LOG.level_unexpected
4580: IF p_processing_set_id IS NULL
4581: THEN
4582: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4583: THEN
4584: FND_LOG.String
4585: (
4586: FND_LOG.level_unexpected
4587: , L_LOG_MODULE || 'proc_set_id_invalid'
4588: , 'p_processing_set_id should not be NULL.'
4582: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4583: THEN
4584: FND_LOG.String
4585: (
4586: FND_LOG.level_unexpected
4587: , L_LOG_MODULE || 'proc_set_id_invalid'
4588: , 'p_processing_set_id should not be NULL.'
4589: );
4590: END IF ;
4601: ------------------------------------------------------------------------------
4602: -- Actual Logic starts below:
4603: ------------------------------------------------------------------------------
4604:
4605: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
4606: THEN
4607: FND_LOG.String
4608: (
4609: FND_LOG.level_statement
4603: ------------------------------------------------------------------------------
4604:
4605: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
4606: THEN
4607: FND_LOG.String
4608: (
4609: FND_LOG.level_statement
4610: , L_LOG_MODULE || 'del_cost_line_start'
4611: , 'deleting cost lines against SRs in the global temp table'
4605: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
4606: THEN
4607: FND_LOG.String
4608: (
4609: FND_LOG.level_statement
4610: , L_LOG_MODULE || 'del_cost_line_start'
4611: , 'deleting cost lines against SRs in the global temp table'
4612: );
4613: END IF ;
4630: );
4631:
4632: l_row_count := SQL%ROWCOUNT;
4633:
4634: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
4635: THEN
4636: FND_LOG.String
4637: (
4638: FND_LOG.level_statement
4632: l_row_count := SQL%ROWCOUNT;
4633:
4634: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
4635: THEN
4636: FND_LOG.String
4637: (
4638: FND_LOG.level_statement
4639: , L_LOG_MODULE || 'del_chg_line_end'
4640: , 'after deleting cost lines against SRs in the global temp table'
4634: IF FND_LOG.level_statement >= FND_LOG.g_current_runtime_level
4635: THEN
4636: FND_LOG.String
4637: (
4638: FND_LOG.level_statement
4639: , L_LOG_MODULE || 'del_chg_line_end'
4640: , 'after deleting cost lines against SRs in the global temp table'
4641: || l_row_count || ' rows deleted.'
4642: );
4643: END IF ;
4644:
4645: ---
4646:
4647: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4648: THEN
4649: FND_LOG.String
4650: (
4651: FND_LOG.level_procedure
4645: ---
4646:
4647: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4648: THEN
4649: FND_LOG.String
4650: (
4651: FND_LOG.level_procedure
4652: , L_LOG_MODULE || 'end'
4653: , 'Completed work in ' || L_API_NAME_FULL || ' successfully'
4647: IF FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level
4648: THEN
4649: FND_LOG.String
4650: (
4651: FND_LOG.level_procedure
4652: , L_LOG_MODULE || 'end'
4653: , 'Completed work in ' || L_API_NAME_FULL || ' successfully'
4654: );
4655: END IF ;
4657: EXCEPTION
4658: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4659: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4660:
4661: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4662: THEN
4663: FND_LOG.String
4664: (
4665: FND_LOG.level_unexpected
4659: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4660:
4661: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4662: THEN
4663: FND_LOG.String
4664: (
4665: FND_LOG.level_unexpected
4666: , L_LOG_MODULE || 'unexpected_error'
4667: , 'Inside WHEN FND_API.G_EXC_UNEXPECTED_ERROR of ' || L_API_NAME_FULL
4661: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4662: THEN
4663: FND_LOG.String
4664: (
4665: FND_LOG.level_unexpected
4666: , L_LOG_MODULE || 'unexpected_error'
4667: , 'Inside WHEN FND_API.G_EXC_UNEXPECTED_ERROR of ' || L_API_NAME_FULL
4668: );
4669: END IF ;
4674: FND_MESSAGE.Set_Token('API_NAME', L_API_NAME_FULL);
4675: FND_MESSAGE.Set_Token('ERROR', SQLERRM);
4676: FND_MSG_PUB.ADD;
4677:
4678: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4679: THEN
4680: FND_LOG.String
4681: (
4682: FND_LOG.level_unexpected
4676: FND_MSG_PUB.ADD;
4677:
4678: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4679: THEN
4680: FND_LOG.String
4681: (
4682: FND_LOG.level_unexpected
4683: , L_LOG_MODULE || 'when_others'
4684: , 'Inside WHEN OTHERS of ' || L_API_NAME_FULL || '. Oracle Error was:'
4678: IF FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level
4679: THEN
4680: FND_LOG.String
4681: (
4682: FND_LOG.level_unexpected
4683: , L_LOG_MODULE || 'when_others'
4684: , 'Inside WHEN OTHERS of ' || L_API_NAME_FULL || '. Oracle Error was:'
4685: );
4686: FND_LOG.String
4682: FND_LOG.level_unexpected
4683: , L_LOG_MODULE || 'when_others'
4684: , 'Inside WHEN OTHERS of ' || L_API_NAME_FULL || '. Oracle Error was:'
4685: );
4686: FND_LOG.String
4687: (
4688: FND_LOG.level_unexpected
4689: , L_LOG_MODULE || 'when_others'
4690: , SQLERRM
4684: , 'Inside WHEN OTHERS of ' || L_API_NAME_FULL || '. Oracle Error was:'
4685: );
4686: FND_LOG.String
4687: (
4688: FND_LOG.level_unexpected
4689: , L_LOG_MODULE || 'when_others'
4690: , SQLERRM
4691: );
4692: END IF ;