[Home] [Help]
29: ) RETURN VARCHAR2
30: IS
31: -- variables --
32: l_revision VARCHAR2(3) := null;
33: l_get_default VARCHAR2(1) := FND_API.G_TRUE;
34: BEGIN
35: if (p_mat_transaction_type = 'MAT_ISSUE') then -- material issue
36: --swai: bug 6654197 - allow user to specify revision based on profile option
37: if (nvl(fnd_profile.value('CSD_DEF_CUR_REVISION_MTL_TXN'), 'Y') = 'N' ) then
34: BEGIN
35: if (p_mat_transaction_type = 'MAT_ISSUE') then -- material issue
36: --swai: bug 6654197 - allow user to specify revision based on profile option
37: if (nvl(fnd_profile.value('CSD_DEF_CUR_REVISION_MTL_TXN'), 'Y') = 'N' ) then
38: l_get_default := FND_API.G_FALSE;
39: end if;
40: elsif (p_mat_transaction_type = 'JOB_COMP') then -- job completion
41: -- swai: bug 6654197 - allow user to specify revision based on profile option
42: if (nvl(fnd_profile.value('CSD_DEF_CUR_REVISION_JOB_COMP'), 'Y') = 'N' ) then
39: end if;
40: elsif (p_mat_transaction_type = 'JOB_COMP') then -- job completion
41: -- swai: bug 6654197 - allow user to specify revision based on profile option
42: if (nvl(fnd_profile.value('CSD_DEF_CUR_REVISION_JOB_COMP'), 'Y') = 'N' ) then
43: l_get_default := FND_API.G_FALSE;
44: end if;
45: end if;
46: if (l_get_default = FND_API.G_TRUE) then
47: l_revision := bom_revisions.get_item_revision_fn
42: if (nvl(fnd_profile.value('CSD_DEF_CUR_REVISION_JOB_COMP'), 'Y') = 'N' ) then
43: l_get_default := FND_API.G_FALSE;
44: end if;
45: end if;
46: if (l_get_default = FND_API.G_TRUE) then
47: l_revision := bom_revisions.get_item_revision_fn
48: ('EXCLUDE_OPEN_HOLD', -- eco_status
49: 'ALL', -- examine_type
50: p_org_id, -- org_id
314:
315: -- Generated job name does exist either in the interface or wip_entities table,
316: -- Success is returned
317:
318: x_return_status := FND_API.G_RET_STS_SUCCESS;
319: RETURN;
320:
321: ELSE
322:
321: ELSE
322:
323: -- Job exists in wip_job_schedule_interface table, hence return Error status
324:
325: x_return_status := FND_API.G_RET_STS_ERROR;
326: RETURN;
327:
328:
329: END IF;
332: ELSE
333:
334: -- Job exists in wip_entities table, hence return Error status
335:
336: x_return_status := FND_API.G_RET_STS_ERROR;
337: RETURN;
338:
339:
340: END IF;
378: Validate_job_name ( p_job_name => x_job_name,
379: p_organization_id => p_organization_id,
380: x_return_status => l_return_status ) ;
381:
382: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
383:
384: -- Generated job name does not exist both in the interface and wip_entities table, so exit the loop
385:
386: exit;
442: l_mod_name||'begin',
443: 'Entering procedure insert_job_header' );
444: END IF;
445:
446: x_return_status := FND_API.G_RET_STS_SUCCESS;
447:
448:
449: -- Populate the record l_job_header_rec
450:
542: WHEN OTHERS THEN
543: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_HEADER_INSERT_ERR');
544: FND_MESSAGE.SET_TOKEN('JOB_NAME', l_job_header_rec.job_name );
545: FND_MSG_PUB.ADD;
546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
547: RETURN;
548: END;
549:
550:
607: l_mod_name||'begin',
608: 'Entering procedure insert_job_details' );
609: END IF;
610:
611: x_return_status := FND_API.G_RET_STS_SUCCESS;
612:
613:
614: -- Populate the record l_job_header_rec
615:
737: WHEN OTHERS THEN
738: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_DETAILS_INSERT_ERR');
739: FND_MESSAGE.SET_TOKEN('JOB_NAME', l_job_details_rec.wip_entity_id);
740: FND_MSG_PUB.ADD;
741: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
742: RETURN;
743: END;
744:
745:
787: lc_mod_name||'begin',
788: 'Entering procedure insert_transactions_header' );
789: END IF;
790:
791: x_return_status := FND_API.G_RET_STS_SUCCESS;
792:
793:
794:
795:
880: WHEN OTHERS THEN
881: FND_MESSAGE.SET_NAME('CSD','CSD_TXNS_HEADER_INSERT_ERR');
882: FND_MESSAGE.SET_TOKEN('JOB_NAME', l_transactions_interface_rec.transaction_source_id );
883: FND_MSG_PUB.ADD;
884: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
885: RETURN;
886: END;
887:
888:
921: lc_mod_name||'begin',
922: 'Entering procedure update_transactions_header' );
923: END IF;
924:
925: x_return_status := FND_API.G_RET_STS_SUCCESS;
926:
927:
928:
929: --update table mtl_transactions_interface
946: EXCEPTION
947: WHEN OTHERS THEN
948: FND_MESSAGE.SET_NAME('CSD','CSD_TXNS_HEADER_UPDATE_ERR');
949: FND_MSG_PUB.ADD;
950: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
951: RETURN;
952: END;
953:
954:
991: lc_mod_name||'begin',
992: 'Entering procedure insert_transaction_lots' );
993: END IF;
994:
995: x_return_status := FND_API.G_RET_STS_SUCCESS;
996:
997:
998: -- Populate the row who columns
999:
1035: EXCEPTION
1036: WHEN OTHERS THEN
1037: FND_MESSAGE.SET_NAME('CSD','CSD_TXN_LOTS_INSERT_ERR');
1038: FND_MSG_PUB.ADD;
1039: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1040: RETURN;
1041: END;
1042:
1043:
1081: lc_mod_name||'begin',
1082: 'Entering procedure insert_upd_serial_numbers' );
1083: END IF;
1084:
1085: x_return_status := FND_API.G_RET_STS_SUCCESS;
1086:
1087: Select count(*) into l_row_exists from mtl_serial_numbers_interface
1088: where transaction_interface_id =
1089: p_srl_nmbrs_interface_rec.transaction_interface_id;
1101: EXCEPTION
1102: WHEN OTHERS THEN
1103: FND_MESSAGE.SET_NAME('CSD','CSD_SRL_NMBRS_UPDATE_ERR');
1104: FND_MSG_PUB.ADD;
1105: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1106: RETURN;
1107: END;
1108:
1109: ELSE
1144: EXCEPTION
1145: WHEN OTHERS THEN
1146: FND_MESSAGE.SET_NAME('CSD','CSD_SRL_NMBRS_INSERT_ERR');
1147: FND_MSG_PUB.ADD;
1148: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1149: RETURN;
1150: END;
1151:
1152: END IF;
1205: lc_mod_name||'begin',
1206: 'Entering procedure insert_wip_cost_txn' );
1207: END IF;
1208:
1209: x_return_status := FND_API.G_RET_STS_SUCCESS;
1210:
1211:
1212: -- Populate the constant values
1213:
1281: EXCEPTION
1282: WHEN OTHERS THEN
1283: FND_MESSAGE.SET_NAME('CSD','CSD_WIP_COST_TXN_INSERT_ERR');
1284: FND_MSG_PUB.ADD;
1285: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1286: RETURN;
1287:
1288: END;
1289:
1340: lc_mod_name||'begin',
1341: 'Entering procedure insert_wip_move_txn' );
1342: END IF;
1343:
1344: x_return_status := FND_API.G_RET_STS_SUCCESS;
1345:
1346:
1347: -- Populate the constant values
1348:
1410: EXCEPTION
1411: WHEN OTHERS THEN
1412: FND_MESSAGE.SET_NAME('CSD','CSD_WIP_MOVE_TXN_INSERT_ERR');
1413: FND_MSG_PUB.ADD;
1414: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1415: RETURN;
1416:
1417: END;
1418:
1624:
1625: SAVEPOINT PROCESS_JOB_COMP_TXN_PVT;
1626:
1627: -- Standard call to check for call compatibility.
1628: IF NOT FND_API.Compatible_API_Call(lc_api_version_number,
1629: p_api_version_number,
1630: lc_api_name,
1631: G_PKG_NAME) THEN
1632: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1628: IF NOT FND_API.Compatible_API_Call(lc_api_version_number,
1629: p_api_version_number,
1630: lc_api_name,
1631: G_PKG_NAME) THEN
1632: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1633: END IF;
1634:
1635: IF FND_API.to_boolean(p_init_msg_list) THEN
1636: FND_MSG_PUB.initialize;
1631: G_PKG_NAME) THEN
1632: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1633: END IF;
1634:
1635: IF FND_API.to_boolean(p_init_msg_list) THEN
1636: FND_MSG_PUB.initialize;
1637: END IF;
1638:
1639: x_return_status := FND_API.G_RET_STS_SUCCESS;
1635: IF FND_API.to_boolean(p_init_msg_list) THEN
1636: FND_MSG_PUB.initialize;
1637: END IF;
1638:
1639: x_return_status := FND_API.G_RET_STS_SUCCESS;
1640:
1641: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1642: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
1643: lc_mod_name||'beforecallinsertjobcomptxn',
1644: 'Just before calling insert_job_comp_txn');
1645: END IF;
1646: insert_job_comp_txn (
1647: p_api_version_number => lc_api_version_number,
1648: p_init_msg_list => fnd_api.g_false ,
1649: p_commit => fnd_api.g_false,
1650: p_validation_level => p_validation_level,
1651: x_return_status => x_return_status,
1652: x_msg_count => x_msg_count,
1645: END IF;
1646: insert_job_comp_txn (
1647: p_api_version_number => lc_api_version_number,
1648: p_init_msg_list => fnd_api.g_false ,
1649: p_commit => fnd_api.g_false,
1650: p_validation_level => p_validation_level,
1651: x_return_status => x_return_status,
1652: x_msg_count => x_msg_count,
1653: x_msg_data => x_msg_data,
1655: x_need_details_flag => l_need_details_flag,
1656: x_transaction_header_id => l_transaction_header_id
1657: );
1658:
1659: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1660: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_COMP_TXN_FAILURE');
1661: FND_MSG_PUB.ADD;
1662: RAISE FND_API.G_EXC_ERROR;
1663: END IF;
1658:
1659: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1660: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_COMP_TXN_FAILURE');
1661: FND_MSG_PUB.ADD;
1662: RAISE FND_API.G_EXC_ERROR;
1663: END IF;
1664:
1665: -- if no need for details, then we can process transactions and commit
1666: IF l_need_details_flag = 'F' THEN
1670: 'Just before calling process_mti_transactions');
1671: END IF;
1672: process_mti_transactions(
1673: p_api_version_number => lc_api_version_number,
1674: p_init_msg_list => fnd_api.g_false ,
1675: p_commit => fnd_api.g_false,
1676: p_validation_level => p_validation_level,
1677: x_return_status => x_return_status,
1678: x_msg_count => x_msg_count,
1671: END IF;
1672: process_mti_transactions(
1673: p_api_version_number => lc_api_version_number,
1674: p_init_msg_list => fnd_api.g_false ,
1675: p_commit => fnd_api.g_false,
1676: p_validation_level => p_validation_level,
1677: x_return_status => x_return_status,
1678: x_msg_count => x_msg_count,
1679: x_msg_data => x_msg_data,
1679: x_msg_data => x_msg_data,
1680: p_txn_header_id => l_transaction_header_id
1681: -- p_txn_type IN VARCHAR2
1682: );
1683: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1684: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_COMP_TXN_FAILURE');
1685: FND_MSG_PUB.ADD;
1686: RAISE FND_API.G_EXC_ERROR;
1687: END IF;
1682: );
1683: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1684: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_COMP_TXN_FAILURE');
1685: FND_MSG_PUB.ADD;
1686: RAISE FND_API.G_EXC_ERROR;
1687: END IF;
1688: ELSE
1689: --if we need details, pass back the transaction header id
1690: x_transaction_header_id := l_transaction_header_id;
1690: x_transaction_header_id := l_transaction_header_id;
1691: END IF;
1692:
1693: -- Check before commit
1694: IF l_need_details_flag = 'F' and FND_API.to_Boolean( p_commit )
1695: THEN
1696: COMMIT WORK;
1697: END IF;
1698:
1696: COMMIT WORK;
1697: END IF;
1698:
1699: EXCEPTION
1700: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1701: ROLLBACK to PROCESS_JOB_COMP_TXN_PVT ;
1702: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1703:
1704: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1698:
1699: EXCEPTION
1700: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1701: ROLLBACK to PROCESS_JOB_COMP_TXN_PVT ;
1702: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1703:
1704: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1705: p_count => x_msg_count,
1706: p_data => x_msg_data);
1700: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1701: ROLLBACK to PROCESS_JOB_COMP_TXN_PVT ;
1702: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1703:
1704: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1705: p_count => x_msg_count,
1706: p_data => x_msg_data);
1707:
1708: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1711: 'G_EXC_UNEXPECTED_ERROR Exception');
1712: END IF;
1713:
1714:
1715: WHEN FND_API.G_EXC_ERROR THEN
1716: ROLLBACK to PROCESS_JOB_COMP_TXN_PVT ;
1717: x_return_status := FND_API.G_RET_STS_ERROR;
1718:
1719: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1713:
1714:
1715: WHEN FND_API.G_EXC_ERROR THEN
1716: ROLLBACK to PROCESS_JOB_COMP_TXN_PVT ;
1717: x_return_status := FND_API.G_RET_STS_ERROR;
1718:
1719: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1720: p_count => x_msg_count,
1721: p_data => x_msg_data);
1715: WHEN FND_API.G_EXC_ERROR THEN
1716: ROLLBACK to PROCESS_JOB_COMP_TXN_PVT ;
1717: x_return_status := FND_API.G_RET_STS_ERROR;
1718:
1719: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1720: p_count => x_msg_count,
1721: p_data => x_msg_data);
1722:
1723: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1727: END IF;
1728:
1729: WHEN OTHERS THEN
1730: ROLLBACK to PROCESS_JOB_COMP_TXN_PVT ;
1731: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1732:
1733: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1734: -- Add Unexpected Error to Message List, here SQLERRM is used for
1735: -- getting the error
1736: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
1737: p_procedure_name => lc_api_name );
1738: END IF;
1739:
1740: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1741: p_count => x_msg_count,
1742: p_data => x_msg_data);
1743:
1744: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1916:
1917: SAVEPOINT INSERT_JOB_COMP_TXN_PVT;
1918:
1919: -- Standard call to check for call compatibility.
1920: IF NOT FND_API.Compatible_API_Call(lc_api_version_number,
1921: p_api_version_number,
1922: lc_api_name,
1923: G_PKG_NAME) THEN
1924: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1920: IF NOT FND_API.Compatible_API_Call(lc_api_version_number,
1921: p_api_version_number,
1922: lc_api_name,
1923: G_PKG_NAME) THEN
1924: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1925: END IF;
1926:
1927:
1928: IF FND_API.to_boolean(p_init_msg_list) THEN
1924: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1925: END IF;
1926:
1927:
1928: IF FND_API.to_boolean(p_init_msg_list) THEN
1929: FND_MSG_PUB.initialize;
1930: END IF;
1931:
1932: -- initialize out params
1929: FND_MSG_PUB.initialize;
1930: END IF;
1931:
1932: -- initialize out params
1933: x_return_status := FND_API.G_RET_STS_SUCCESS;
1934: x_need_details_flag := 'F';
1935:
1936: -- generate transaction_id
1937: open get_mtl_header_id;
1961: IF l_last_move_allowed = 'N' THEN
1962: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_COMP_MV_NOT_ALL');
1963: FND_MSG_PUB.ADD;
1964: close get_last_operation_dtls;
1965: RAISE FND_API.G_EXC_ERROR;
1966: END IF;
1967: END IF;
1968: close get_last_operation_dtls;
1969:
1969:
1970: IF l_transaction_quantity <= 0 THEN
1971: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_COMP_ZER_QTY');
1972: FND_MSG_PUB.ADD;
1973: RAISE FND_API.G_EXC_ERROR;
1974: END IF;
1975:
1976: l_transactions_interface_rec.source_code := lc_completion_source_code;
1977: l_transactions_interface_rec.transaction_date := sysdate;
2107: fetch get_mtl_header_id into l_transactions_interface_rec.transaction_interface_id;
2108: close get_mtl_header_id;
2109: END IF;
2110:
2111: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2112: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2113: END IF;
2114: END LOOP;
2115: ELSE -- Quantity = 1
2108: close get_mtl_header_id;
2109: END IF;
2110:
2111: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2112: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2113: END IF;
2114: END LOOP;
2115: ELSE -- Quantity = 1
2116: --insert into table mtl_transactions_interface
2144: p_interface_id => l_transactions_interface_rec.transaction_interface_id
2145: );
2146: END IF; -- end bug#9453092
2147:
2148: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2149: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2150: END IF;
2151: END IF;
2152:
2145: );
2146: END IF; -- end bug#9453092
2147:
2148: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2149: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2150: END IF;
2151: END IF;
2152:
2153: ELSE -- l_serial_number_control_code check
2186: insert_cst_interface(p_wip_entity_id => p_comp_job_dtls_rec.wip_entity_id,
2187: p_interface_id => l_transactions_interface_rec.transaction_interface_id
2188: );
2189: END IF; -- end bug#9453092
2190: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2191: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2192: END IF;
2193: END IF; -- l_serial_number_control_code check
2194:
2187: p_interface_id => l_transactions_interface_rec.transaction_interface_id
2188: );
2189: END IF; -- end bug#9453092
2190: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2191: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2192: END IF;
2193: END IF; -- l_serial_number_control_code check
2194:
2195: -- Regardless of whether or not details are needed, pass back
2196: -- the transaction header ID.
2197: x_transaction_header_id := l_transactions_interface_rec.transaction_header_id;
2198:
2199: -- Standard check for p_commit
2200: IF FND_API.to_Boolean( p_commit )
2201: THEN
2202: COMMIT WORK;
2203: END IF;
2204:
2202: COMMIT WORK;
2203: END IF;
2204:
2205: EXCEPTION
2206: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2207: ROLLBACK to INSERT_JOB_COMP_TXN_PVT ;
2208: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2209:
2210: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2204:
2205: EXCEPTION
2206: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2207: ROLLBACK to INSERT_JOB_COMP_TXN_PVT ;
2208: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2209:
2210: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2211: p_count => x_msg_count,
2212: p_data => x_msg_data);
2206: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2207: ROLLBACK to INSERT_JOB_COMP_TXN_PVT ;
2208: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2209:
2210: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2211: p_count => x_msg_count,
2212: p_data => x_msg_data);
2213:
2214: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2217: 'G_EXC_UNEXPECTED_ERROR Exception');
2218: END IF;
2219:
2220:
2221: WHEN FND_API.G_EXC_ERROR THEN
2222: ROLLBACK to INSERT_JOB_COMP_TXN_PVT ;
2223: x_return_status := FND_API.G_RET_STS_ERROR;
2224:
2225:
2219:
2220:
2221: WHEN FND_API.G_EXC_ERROR THEN
2222: ROLLBACK to INSERT_JOB_COMP_TXN_PVT ;
2223: x_return_status := FND_API.G_RET_STS_ERROR;
2224:
2225:
2226: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2227: p_count => x_msg_count,
2222: ROLLBACK to INSERT_JOB_COMP_TXN_PVT ;
2223: x_return_status := FND_API.G_RET_STS_ERROR;
2224:
2225:
2226: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2227: p_count => x_msg_count,
2228: p_data => x_msg_data);
2229:
2230: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2234: END IF;
2235:
2236: WHEN OTHERS THEN
2237: ROLLBACK to INSERT_JOB_COMP_TXN_PVT ;
2238: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2239:
2240: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2241:
2242: -- Add Unexpected Error to Message List, here SQLERRM is used for
2245: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
2246: p_procedure_name => lc_api_name );
2247: END IF;
2248:
2249: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2250: p_count => x_msg_count,
2251: p_data => x_msg_data);
2252:
2253: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2292:
2293: SAVEPOINT PROCESS_MTI_TRANSACTIONS_PVT;
2294:
2295: -- Standard call to check for call compatibility.
2296: IF NOT FND_API.Compatible_API_Call(lc_api_version_number,
2297: p_api_version_number,
2298: lc_api_name,
2299: G_PKG_NAME) THEN
2300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2296: IF NOT FND_API.Compatible_API_Call(lc_api_version_number,
2297: p_api_version_number,
2298: lc_api_name,
2299: G_PKG_NAME) THEN
2300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2301: END IF;
2302:
2303:
2304: IF FND_API.to_boolean(p_init_msg_list) THEN
2300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2301: END IF;
2302:
2303:
2304: IF FND_API.to_boolean(p_init_msg_list) THEN
2305: FND_MSG_PUB.initialize;
2306: END IF;
2307: x_return_status := FND_API.G_RET_STS_SUCCESS;
2308:
2303:
2304: IF FND_API.to_boolean(p_init_msg_list) THEN
2305: FND_MSG_PUB.initialize;
2306: END IF;
2307: x_return_status := FND_API.G_RET_STS_SUCCESS;
2308:
2309: -- get the wip entity ids being processed.
2310: -- swai: bug 13820264, FP of bug#13797285, subhat
2311: SELECT DISTINCT transaction_source_id
2323: END IF;
2324:
2325: l_return_count := INV_TXN_MANAGER_PUB.process_Transactions(
2326: p_api_version => lc_api_version_number, --1.0, -- ,
2327: p_init_msg_list => fnd_api.g_false, --'T', -- fnd_api.g_false ,
2328: p_commit => fnd_api.g_false, --'T', -- fnd_api.g_false ,
2329: p_validation_level => p_validation_level ,
2330: x_return_status => x_return_status,
2331: x_msg_count => x_msg_count,
2324:
2325: l_return_count := INV_TXN_MANAGER_PUB.process_Transactions(
2326: p_api_version => lc_api_version_number, --1.0, -- ,
2327: p_init_msg_list => fnd_api.g_false, --'T', -- fnd_api.g_false ,
2328: p_commit => fnd_api.g_false, --'T', -- fnd_api.g_false ,
2329: p_validation_level => p_validation_level ,
2330: x_return_status => x_return_status,
2331: x_msg_count => x_msg_count,
2332: x_msg_data => x_msg_data,
2334: p_table => l_table,
2335: p_header_id => p_txn_header_id );
2336:
2337: IF ( txn_int_error_exists( p_txn_header_id) or
2338: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
2339:
2340: --bug#14456229 --14497341
2341: if (p_txn_header_id is not null) then
2342: IF (nvl(fnd_profile.value('MRP_DEBUG'),'Y') = 'N') THEN
2360:
2361:
2362: FND_MESSAGE.SET_NAME('CSD','CSD_PROCESS_MTI_TXN_FAILURE');
2363: FND_MSG_PUB.ADD;
2364: RAISE FND_API.G_EXC_ERROR;
2365: END IF;
2366:
2367: -- subhat FedEx material update changes.
2368: -- swai: bug 13820264, FP of bug#13797285, subhat
2371:
2372: update_mat_issue_quantities
2373: (
2374: p_api_version_number => 1.0 ,
2375: p_init_msg_list => fnd_api.g_false ,
2376: p_commit => fnd_api.g_false ,
2377: p_validation_level => fnd_api.g_valid_level_none,
2378: x_return_status => x_return_status,
2379: x_msg_count => x_msg_count,
2372: update_mat_issue_quantities
2373: (
2374: p_api_version_number => 1.0 ,
2375: p_init_msg_list => fnd_api.g_false ,
2376: p_commit => fnd_api.g_false ,
2377: p_validation_level => fnd_api.g_valid_level_none,
2378: x_return_status => x_return_status,
2379: x_msg_count => x_msg_count,
2380: x_msg_data => x_msg_data,
2373: (
2374: p_api_version_number => 1.0 ,
2375: p_init_msg_list => fnd_api.g_false ,
2376: p_commit => fnd_api.g_false ,
2377: p_validation_level => fnd_api.g_valid_level_none,
2378: x_return_status => x_return_status,
2379: x_msg_count => x_msg_count,
2380: x_msg_data => x_msg_data,
2381: p_repair_line_id => NULL,
2389: );
2390: END LOOP;
2391:
2392: -- Standard check for p_commit
2393: IF FND_API.to_Boolean( p_commit )
2394: THEN
2395: COMMIT WORK;
2396: END IF;
2397:
2395: COMMIT WORK;
2396: END IF;
2397:
2398: EXCEPTION
2399: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2400: ROLLBACK to PROCESS_MTI_TRANSACTIONS_PVT ;
2401: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2402:
2403: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2397:
2398: EXCEPTION
2399: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2400: ROLLBACK to PROCESS_MTI_TRANSACTIONS_PVT ;
2401: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2402:
2403: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2404: p_count => x_msg_count,
2405: p_data => x_msg_data);
2399: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2400: ROLLBACK to PROCESS_MTI_TRANSACTIONS_PVT ;
2401: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2402:
2403: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2404: p_count => x_msg_count,
2405: p_data => x_msg_data);
2406:
2407: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2410: 'G_EXC_UNEXPECTED_ERROR Exception');
2411: END IF;
2412:
2413:
2414: WHEN FND_API.G_EXC_ERROR THEN
2415: --bug#14456229 --14497341
2416: IF (nvl(fnd_profile.value('MRP_DEBUG'),'Y') = 'Y') THEN
2417: ROLLBACK to PROCESS_MTI_TRANSACTIONS_PVT ;
2418: End if;
2417: ROLLBACK to PROCESS_MTI_TRANSACTIONS_PVT ;
2418: End if;
2419: --bug#14456229 --14497341
2420:
2421: x_return_status := FND_API.G_RET_STS_ERROR;
2422:
2423: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2424: p_count => x_msg_count,
2425: p_data => x_msg_data);
2419: --bug#14456229 --14497341
2420:
2421: x_return_status := FND_API.G_RET_STS_ERROR;
2422:
2423: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2424: p_count => x_msg_count,
2425: p_data => x_msg_data);
2426:
2427: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2431: END IF;
2432:
2433: WHEN OTHERS THEN
2434: ROLLBACK to PROCESS_MTI_TRANSACTIONS_PVT ;
2435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2436:
2437: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2438: -- Add Unexpected Error to Message List, here SQLERRM is used for
2439: -- getting the error
2440: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
2441: p_procedure_name => lc_api_name );
2442: END IF;
2443:
2444: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2445: p_count => x_msg_count,
2446: p_data => x_msg_data);
2447:
2448: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2545: END IF;
2546:
2547: SAVEPOINT PROCESS_OPER_COMP_TXN_PVT;
2548: -- Standard call to check for call compatibility.
2549: IF NOT FND_API.Compatible_API_Call
2550: (lc_api_version_number,
2551: p_api_version_number,
2552: lc_api_name,
2553: G_PKG_NAME)
2551: p_api_version_number,
2552: lc_api_name,
2553: G_PKG_NAME)
2554: THEN
2555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2556: END IF;
2557:
2558:
2559: IF FND_API.to_boolean(p_init_msg_list) THEN
2555: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2556: END IF;
2557:
2558:
2559: IF FND_API.to_boolean(p_init_msg_list) THEN
2560: FND_MSG_PUB.initialize;
2561: END IF;
2562:
2563:
2562:
2563:
2564:
2565:
2566: x_return_status := FND_API.G_RET_STS_SUCCESS;
2567:
2568:
2569: -- Populate the constant values
2570:
2607: IF l_prev_wip_entity_id = p_mv_txn_dtls_tbl(mv_ctr).wip_entity_id THEN
2608: IF l_prev_to_operation_seq_num <> p_mv_txn_dtls_tbl(mv_ctr).fm_operation_seq_num THEN
2609: FND_MESSAGE.SET_NAME('CSD','CSD_OP_COMP_SEQ_ERROR');
2610: FND_MSG_PUB.ADD;
2611: RAISE FND_API.G_EXC_ERROR;
2612: ELSE
2613: l_wip_move_txn_interface_rec.transaction_quantity := p_mv_txn_dtls_tbl(mv_ctr).transaction_quantity +
2614: l_prev_transaction_quantity;
2615: END IF;
2656:
2657: insert_wip_move_txn( p_wip_move_txn_interface_rec => l_wip_move_txn_interface_rec,
2658: x_return_status => x_return_status );
2659:
2660: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2661: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2662: END IF;
2663:
2664: END LOOP;
2657: insert_wip_move_txn( p_wip_move_txn_interface_rec => l_wip_move_txn_interface_rec,
2658: x_return_status => x_return_status );
2659:
2660: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2661: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2662: END IF;
2663:
2664: END LOOP;
2665: -- end swai: bug 5330060
2681: p_procPhase => l_process_phase,
2682: p_txnHdrID => l_material_transaction_id,
2683: p_mtlMode => WIP_CONSTANTS.ONLINE,
2684: p_cplTxnID => NULL,
2685: p_commit => FND_API.G_FALSE,
2686: x_returnStatus => x_return_status,
2687: x_errorMsg => x_msg_data);
2688:
2689: */
2688:
2689: */
2690:
2691: wip_movProc_grp.processInterface(p_groupID => l_wip_move_txn_interface_rec.group_id,
2692: p_commit => FND_API.G_FALSE,
2693: x_returnStatus => x_return_status ) ;
2694:
2695: -- Need to get errors from error table and pass it back
2696: open check_mv_interface_errors ( l_wip_move_txn_interface_rec.group_id );
2695: -- Need to get errors from error table and pass it back
2696: open check_mv_interface_errors ( l_wip_move_txn_interface_rec.group_id );
2697: fetch check_mv_interface_errors into l_err_wip_entity_name, l_err_op_seq_num;
2698:
2699: If (( x_return_status <> FND_API.G_RET_STS_SUCCESS) or
2700: (l_err_op_seq_num is not null)) THEN
2701:
2702: IF (l_err_op_seq_num is null) THEN
2703: close check_mv_interface_errors ;
2702: IF (l_err_op_seq_num is null) THEN
2703: close check_mv_interface_errors ;
2704: FND_MESSAGE.SET_NAME('CSD','CSD_MOVE_TXN_FAILURE');
2705: FND_MSG_PUB.ADD;
2706: RAISE FND_API.G_EXC_ERROR;
2707:
2708: ELSE
2709: x_return_status := FND_API.G_RET_STS_ERROR;
2710: WHILE check_mv_interface_errors%FOUND LOOP
2705: FND_MSG_PUB.ADD;
2706: RAISE FND_API.G_EXC_ERROR;
2707:
2708: ELSE
2709: x_return_status := FND_API.G_RET_STS_ERROR;
2710: WHILE check_mv_interface_errors%FOUND LOOP
2711: FND_MESSAGE.SET_NAME('CSD','CSD_MOVE_TXN_FAILURE_DET');
2712: FND_MESSAGE.SET_TOKEN('WIP_ENTITY_NAME', l_err_wip_entity_name);
2713: FND_MESSAGE.SET_TOKEN('OPERATION_SEQ_NUM', l_err_op_seq_num );
2718: end if;
2719: close check_mv_interface_errors ;
2720:
2721:
2722: /* IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2723: ROLLBACK to PROCESS_OPER_COMP_TXN_PVT ;
2724:
2725:
2726: FND_MESSAGE.SET_NAME('CSD','CSD_MOVE_TXN_FAILURE');
2724:
2725:
2726: FND_MESSAGE.SET_NAME('CSD','CSD_MOVE_TXN_FAILURE');
2727: FND_MSG_PUB.ADD;
2728: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; */
2729:
2730:
2731: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2732: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
2739: -- END IF;
2740:
2741:
2742: -- Standard check for p_commit
2743: IF FND_API.to_Boolean( p_commit )
2744: THEN
2745: COMMIT WORK;
2746: END IF;
2747:
2745: COMMIT WORK;
2746: END IF;
2747:
2748: EXCEPTION
2749: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2750: ROLLBACK to PROCESS_OPER_COMP_TXN_PVT ;
2751: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2752:
2753: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2747:
2748: EXCEPTION
2749: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2750: ROLLBACK to PROCESS_OPER_COMP_TXN_PVT ;
2751: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2752:
2753: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2754: p_count => x_msg_count,
2755: p_data => x_msg_data);
2749: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2750: ROLLBACK to PROCESS_OPER_COMP_TXN_PVT ;
2751: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2752:
2753: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2754: p_count => x_msg_count,
2755: p_data => x_msg_data);
2756:
2757: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2760: 'G_EXC_UNEXPECTED_ERROR Exception');
2761: END IF;
2762:
2763:
2764: WHEN FND_API.G_EXC_ERROR THEN
2765: ROLLBACK to PROCESS_OPER_COMP_TXN_PVT ;
2766: x_return_status := FND_API.G_RET_STS_ERROR;
2767:
2768:
2762:
2763:
2764: WHEN FND_API.G_EXC_ERROR THEN
2765: ROLLBACK to PROCESS_OPER_COMP_TXN_PVT ;
2766: x_return_status := FND_API.G_RET_STS_ERROR;
2767:
2768:
2769: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2770: p_count => x_msg_count,
2765: ROLLBACK to PROCESS_OPER_COMP_TXN_PVT ;
2766: x_return_status := FND_API.G_RET_STS_ERROR;
2767:
2768:
2769: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2770: p_count => x_msg_count,
2771: p_data => x_msg_data);
2772:
2773: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2777: END IF;
2778:
2779: WHEN OTHERS THEN
2780: ROLLBACK to PROCESS_OPER_COMP_TXN_PVT ;
2781: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2782:
2783: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2784:
2785: -- Add Unexpected Error to Message List, here SQLERRM is used for
2788: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
2789: p_procedure_name => lc_api_name );
2790: END IF;
2791:
2792: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2793: p_count => x_msg_count,
2794: p_data => x_msg_data);
2795:
2796: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
2926: END IF;
2927:
2928: SAVEPOINT PROCESS_ISSUE_MTL_TXN_PVT;
2929: -- Standard call to check for call compatibility.
2930: IF NOT FND_API.Compatible_API_Call
2931: (lc_api_version_number,
2932: p_api_version_number,
2933: lc_api_name,
2934: G_PKG_NAME)
2932: p_api_version_number,
2933: lc_api_name,
2934: G_PKG_NAME)
2935: THEN
2936: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2937: END IF;
2938:
2939:
2940: IF FND_API.to_boolean(p_init_msg_list) THEN
2936: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2937: END IF;
2938:
2939:
2940: IF FND_API.to_boolean(p_init_msg_list) THEN
2941: FND_MSG_PUB.initialize;
2942: END IF;
2943:
2944:
2943:
2944:
2945:
2946:
2947: x_return_status := FND_API.G_RET_STS_SUCCESS;
2948:
2949: -- x_need_details_flag := 'F';
2950:
2951:
3016:
3017: If l_transactions_interface_rec.transaction_quantity = 0 then
3018: FND_MESSAGE.SET_NAME('CSD','CSD_ISS_QTY_ZERO');
3019: FND_MSG_PUB.ADD;
3020: RAISE FND_API.G_EXC_ERROR;
3021: end if;
3022:
3023:
3024: l_transactions_interface_rec.transaction_uom := p_mtl_txn_dtls_tbl(mtl_ctr).transaction_uom;
3218: insert_transactions_header( p_transactions_interface_rec => l_transactions_interface_rec,
3219: x_return_status => x_return_status );
3220:
3221:
3222: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3224: END IF;
3225:
3226: IF l_qty_ctr <> p_mtl_txn_dtls_tbl(mtl_ctr).transaction_quantity THEN
3219: x_return_status => x_return_status );
3220:
3221:
3222: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3224: END IF;
3225:
3226: IF l_qty_ctr <> p_mtl_txn_dtls_tbl(mtl_ctr).transaction_quantity THEN
3227: -- generate transaction_interface_id for the next record
3256: insert_upd_serial_numbers( p_srl_nmbrs_interface_rec => l_srl_nmbrs_interface_rec,
3257: x_return_status => x_return_status );
3258:
3259:
3260: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3261: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3262: END IF;
3263:
3264: ELSE
3257: x_return_status => x_return_status );
3258:
3259:
3260: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3261: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3262: END IF;
3263:
3264: ELSE
3265:
3290: insert_transactions_header( p_transactions_interface_rec => l_transactions_interface_rec,
3291: x_return_status => x_return_status );
3292:
3293:
3294: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3296: END IF;
3297:
3298:
3291: x_return_status => x_return_status );
3292:
3293:
3294: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3296: END IF;
3297:
3298:
3299:
3322: insert_transactions_header( p_transactions_interface_rec => l_transactions_interface_rec,
3323: x_return_status => x_return_status );
3324:
3325:
3326: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3327: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3328: END IF;
3329:
3330: END IF;
3323: x_return_status => x_return_status );
3324:
3325:
3326: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3327: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3328: END IF;
3329:
3330: END IF;
3331:
3400: insert_job_header( p_job_header_rec => l_job_header_rec,
3401: x_return_status => x_return_status );
3402:
3403:
3404: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3405: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3406: END IF;
3407:
3408:
3401: x_return_status => x_return_status );
3402:
3403:
3404: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3405: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3406: END IF;
3407:
3408:
3409: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3420:
3421: insert_job_details( p_job_details_rec => l_job_details_rec,
3422: x_return_status => x_return_status );
3423:
3424: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3425: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3426: END IF;
3427:
3428:
3421: insert_job_details( p_job_details_rec => l_job_details_rec,
3422: x_return_status => x_return_status );
3423:
3424: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3425: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3426: END IF;
3427:
3428:
3429: END IF;
3455: ,p_WIP_ENTITY_ID => null
3456: ,p_OPERATION_SEQ_NUM => null
3457: ,p_RESOURCE_SEQ_NUM => null
3458: ,p_employee_id => null
3459: ,p_TRANSACTION_QUANTITY => FND_API.G_MISS_NUM
3460: ,p_TRANSACTION_UOM => FND_API.G_MISS_CHAR
3461: ,p_SERIAL_NUMBER => FND_API.G_MISS_CHAR
3462: ,p_REVISION => FND_API.G_MISS_CHAR
3463: ,p_REASON_ID => FND_API.G_MISS_NUM
3456: ,p_OPERATION_SEQ_NUM => null
3457: ,p_RESOURCE_SEQ_NUM => null
3458: ,p_employee_id => null
3459: ,p_TRANSACTION_QUANTITY => FND_API.G_MISS_NUM
3460: ,p_TRANSACTION_UOM => FND_API.G_MISS_CHAR
3461: ,p_SERIAL_NUMBER => FND_API.G_MISS_CHAR
3462: ,p_REVISION => FND_API.G_MISS_CHAR
3463: ,p_REASON_ID => FND_API.G_MISS_NUM
3464: ,p_BACKFLUSH_FLAG => null
3457: ,p_RESOURCE_SEQ_NUM => null
3458: ,p_employee_id => null
3459: ,p_TRANSACTION_QUANTITY => FND_API.G_MISS_NUM
3460: ,p_TRANSACTION_UOM => FND_API.G_MISS_CHAR
3461: ,p_SERIAL_NUMBER => FND_API.G_MISS_CHAR
3462: ,p_REVISION => FND_API.G_MISS_CHAR
3463: ,p_REASON_ID => FND_API.G_MISS_NUM
3464: ,p_BACKFLUSH_FLAG => null
3465: ,p_COUNT_POINT_TYPE => null
3458: ,p_employee_id => null
3459: ,p_TRANSACTION_QUANTITY => FND_API.G_MISS_NUM
3460: ,p_TRANSACTION_UOM => FND_API.G_MISS_CHAR
3461: ,p_SERIAL_NUMBER => FND_API.G_MISS_CHAR
3462: ,p_REVISION => FND_API.G_MISS_CHAR
3463: ,p_REASON_ID => FND_API.G_MISS_NUM
3464: ,p_BACKFLUSH_FLAG => null
3465: ,p_COUNT_POINT_TYPE => null
3466: ,p_DEPARTMENT_ID => null
3459: ,p_TRANSACTION_QUANTITY => FND_API.G_MISS_NUM
3460: ,p_TRANSACTION_UOM => FND_API.G_MISS_CHAR
3461: ,p_SERIAL_NUMBER => FND_API.G_MISS_CHAR
3462: ,p_REVISION => FND_API.G_MISS_CHAR
3463: ,p_REASON_ID => FND_API.G_MISS_NUM
3464: ,p_BACKFLUSH_FLAG => null
3465: ,p_COUNT_POINT_TYPE => null
3466: ,p_DEPARTMENT_ID => null
3467: ,p_DESCRIPTION => null
3471: ,p_LAST_UNIT_START_DATE => null
3472: ,p_MINIMUM_TRANSFER_QUANTITY => null
3473: ,p_STANDARD_OPERATION_ID => null
3474: ,p_OBJECT_VERSION_NUMBER => p_mtl_txn_dtls_tbl(mtl_ctr).object_version_number
3475: ,p_CREATE_RO_FLAG => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).CREATE_RO_FLAG, FND_API.G_MISS_CHAR) -- bug#13698799 auto create ro, parent ro
3476: );
3477: /*
3478: CSD_WIP_TRANSACTION_DTLS_PKG.Delete_Row(
3479: p_WIP_TRANSACTION_DETAIL_ID => p_mtl_txn_dtls_tbl(mtl_ctr).WIP_TRANSACTION_DETAIL_ID );
3507: IF l_need_details_flag = 'F' THEN
3508:
3509: l_return_count := INV_TXN_MANAGER_PUB.process_Transactions(
3510: p_api_version => lc_api_version_number, --1.0, -- ,
3511: p_init_msg_list => fnd_api.g_false, --'T', -- fnd_api.g_false ,
3512: p_commit => fnd_api.g_false, --'T', -- fnd_api.g_false ,
3513: p_validation_level => p_validation_level ,
3514: x_return_status => x_return_status,
3515: x_msg_count => x_msg_count,
3508:
3509: l_return_count := INV_TXN_MANAGER_PUB.process_Transactions(
3510: p_api_version => lc_api_version_number, --1.0, -- ,
3511: p_init_msg_list => fnd_api.g_false, --'T', -- fnd_api.g_false ,
3512: p_commit => fnd_api.g_false, --'T', -- fnd_api.g_false ,
3513: p_validation_level => p_validation_level ,
3514: x_return_status => x_return_status,
3515: x_msg_count => x_msg_count,
3516: x_msg_data => x_msg_data,
3519: p_header_id => l_transactions_interface_rec.transaction_header_id );
3520:
3521:
3522: If ( txn_int_error_exists( l_transactions_interface_rec.transaction_header_id ) or
3523: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
3524: -- x_msg_data := x_msg_data||' after pt ' ;
3525: -- ROLLBACK to PROCESS_ISSUE_MTL_TXN_PVT ;
3526:
3527:
3529:
3530: FND_MESSAGE.SET_NAME('CSD','CSD_MAT_TXN_FAILURE');
3531: FND_MSG_PUB.ADD;
3532:
3533: RAISE FND_API.G_EXC_ERROR;
3534:
3535: -- END IF;
3536:
3537:
3563: x_errorMsg => x_msg_data );
3564:
3565:
3566: If ( ml_error_exists( l_job_header_rec.group_id ) or
3567: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
3568:
3569:
3570: FND_MESSAGE.SET_NAME('CSD','CSD_MTL_ISS_MASS_LD_FAILURE');
3571: FND_MSG_PUB.ADD;
3568:
3569:
3570: FND_MESSAGE.SET_NAME('CSD','CSD_MTL_ISS_MASS_LD_FAILURE');
3571: FND_MSG_PUB.ADD;
3572: x_return_status := FND_API.G_RET_STS_ERROR;
3573:
3574: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3575: p_count => x_msg_count,
3576: p_data => x_msg_data);
3570: FND_MESSAGE.SET_NAME('CSD','CSD_MTL_ISS_MASS_LD_FAILURE');
3571: FND_MSG_PUB.ADD;
3572: x_return_status := FND_API.G_RET_STS_ERROR;
3573:
3574: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3575: p_count => x_msg_count,
3576: p_data => x_msg_data);
3577:
3578: RETURN;
3590:
3591: EXCEPTION
3592: WHEN OTHERS THEN
3593:
3594: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3595:
3596: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3597:
3598: -- Add Unexpected Error to Message List, here SQLERRM is used for
3601: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
3602: p_procedure_name => lc_api_name );
3603: END IF;
3604:
3605: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3606: p_count => x_msg_count,
3607: p_data => x_msg_data);
3608:
3609: END;
3608:
3609: END;
3610:
3611:
3612: /* IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3613: -- ROLLBACK to PROCESS_ISSUE_MTL_TXN_PVT ;
3614: -- dbms_output.put_line('WIP Update Error');
3615:
3616:
3616:
3617: FND_MESSAGE.SET_NAME('CSD','CSD_MAT_TXN_FAILURE');
3618: FND_MSG_PUB.ADD;
3619: RETURN; */
3620: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3621:
3622:
3623: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3624: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
3643: LOOP
3644: update_mat_issue_quantities
3645: (
3646: p_api_version_number => 1.0 ,
3647: p_init_msg_list => fnd_api.g_false ,
3648: p_commit => fnd_api.g_false ,
3649: p_validation_level => fnd_api.g_valid_level_none,
3650: x_return_status => x_return_status,
3651: x_msg_count => x_msg_count,
3644: update_mat_issue_quantities
3645: (
3646: p_api_version_number => 1.0 ,
3647: p_init_msg_list => fnd_api.g_false ,
3648: p_commit => fnd_api.g_false ,
3649: p_validation_level => fnd_api.g_valid_level_none,
3650: x_return_status => x_return_status,
3651: x_msg_count => x_msg_count,
3652: x_msg_data => x_msg_data,
3645: (
3646: p_api_version_number => 1.0 ,
3647: p_init_msg_list => fnd_api.g_false ,
3648: p_commit => fnd_api.g_false ,
3649: p_validation_level => fnd_api.g_valid_level_none,
3650: x_return_status => x_return_status,
3651: x_msg_count => x_msg_count,
3652: x_msg_data => x_msg_data,
3653: p_repair_line_id => NULL,
3668: LOOP
3669: update_mat_issue_quantities
3670: (
3671: p_api_version_number => 1.0 ,
3672: p_init_msg_list => fnd_api.g_false ,
3673: p_commit => fnd_api.g_false ,
3674: p_validation_level => fnd_api.g_valid_level_none,
3675: x_return_status => x_return_status,
3676: x_msg_count => x_msg_count,
3669: update_mat_issue_quantities
3670: (
3671: p_api_version_number => 1.0 ,
3672: p_init_msg_list => fnd_api.g_false ,
3673: p_commit => fnd_api.g_false ,
3674: p_validation_level => fnd_api.g_valid_level_none,
3675: x_return_status => x_return_status,
3676: x_msg_count => x_msg_count,
3677: x_msg_data => x_msg_data,
3670: (
3671: p_api_version_number => 1.0 ,
3672: p_init_msg_list => fnd_api.g_false ,
3673: p_commit => fnd_api.g_false ,
3674: p_validation_level => fnd_api.g_valid_level_none,
3675: x_return_status => x_return_status,
3676: x_msg_count => x_msg_count,
3677: x_msg_data => x_msg_data,
3678: p_repair_line_id => NULL,
3691:
3692:
3693:
3694: -- Standard check for p_commit
3695: IF l_need_details_flag = 'F' and FND_API.to_Boolean( p_commit )
3696: THEN
3697: COMMIT WORK;
3698: END IF;
3699:
3697: COMMIT WORK;
3698: END IF;
3699:
3700: EXCEPTION
3701: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3702: -- dbms_output.put_line( 'FND_API.G_EXC_UNEXPECTED_ERROR error'|| sqlerrm);
3703: ROLLBACK to PROCESS_ISSUE_MTL_TXN_PVT ;
3704: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3705:
3698: END IF;
3699:
3700: EXCEPTION
3701: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3702: -- dbms_output.put_line( 'FND_API.G_EXC_UNEXPECTED_ERROR error'|| sqlerrm);
3703: ROLLBACK to PROCESS_ISSUE_MTL_TXN_PVT ;
3704: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3705:
3706: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3700: EXCEPTION
3701: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3702: -- dbms_output.put_line( 'FND_API.G_EXC_UNEXPECTED_ERROR error'|| sqlerrm);
3703: ROLLBACK to PROCESS_ISSUE_MTL_TXN_PVT ;
3704: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3705:
3706: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3707: p_count => x_msg_count,
3708: p_data => x_msg_data);
3702: -- dbms_output.put_line( 'FND_API.G_EXC_UNEXPECTED_ERROR error'|| sqlerrm);
3703: ROLLBACK to PROCESS_ISSUE_MTL_TXN_PVT ;
3704: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3705:
3706: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3707: p_count => x_msg_count,
3708: p_data => x_msg_data);
3709:
3710: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3713: 'G_EXC_UNEXPECTED_ERROR Exception');
3714: END IF;
3715:
3716:
3717: WHEN FND_API.G_EXC_ERROR THEN
3718: ROLLBACK to PROCESS_ISSUE_MTL_TXN_PVT ;
3719: x_return_status := FND_API.G_RET_STS_ERROR;
3720:
3721:
3715:
3716:
3717: WHEN FND_API.G_EXC_ERROR THEN
3718: ROLLBACK to PROCESS_ISSUE_MTL_TXN_PVT ;
3719: x_return_status := FND_API.G_RET_STS_ERROR;
3720:
3721:
3722: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3723: p_count => x_msg_count,
3718: ROLLBACK to PROCESS_ISSUE_MTL_TXN_PVT ;
3719: x_return_status := FND_API.G_RET_STS_ERROR;
3720:
3721:
3722: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3723: p_count => x_msg_count,
3724: p_data => x_msg_data);
3725:
3726: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3731:
3732: WHEN OTHERS THEN
3733: -- dbms_output.put_line( 'OTHERS error' || sqlerrm );
3734: ROLLBACK to PROCESS_ISSUE_MTL_TXN_PVT ;
3735: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3736:
3737: -- IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3738:
3739: -- Add Unexpected Error to Message List, here SQLERRM is used for
3742: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
3743: p_procedure_name => lc_api_name );
3744: -- END IF;
3745:
3746: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3747: p_count => x_msg_count,
3748: p_data => x_msg_data);
3749:
3750: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3788: END IF;
3789:
3790: SAVEPOINT PROCESS_MTL_TXNS_LOT_SRL_PVT;
3791: -- Standard call to check for call compatibility.
3792: IF NOT FND_API.Compatible_API_Call
3793: (lc_api_version_number,
3794: p_api_version_number,
3795: lc_api_name,
3796: G_PKG_NAME)
3794: p_api_version_number,
3795: lc_api_name,
3796: G_PKG_NAME)
3797: THEN
3798: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3799: END IF;
3800:
3801: IF FND_API.to_boolean(p_init_msg_list) THEN
3802: FND_MSG_PUB.initialize;
3797: THEN
3798: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3799: END IF;
3800:
3801: IF FND_API.to_boolean(p_init_msg_list) THEN
3802: FND_MSG_PUB.initialize;
3803: END IF;
3804:
3805: x_return_status := FND_API.G_RET_STS_SUCCESS;
3801: IF FND_API.to_boolean(p_init_msg_list) THEN
3802: FND_MSG_PUB.initialize;
3803: END IF;
3804:
3805: x_return_status := FND_API.G_RET_STS_SUCCESS;
3806:
3807: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3808: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3809: lc_mod_name||'beforecallinsertjobcomptxn',
3810: 'Just before calling insert_job_comp_txn');
3811: END IF;
3812: update_mtl_txns_lot_srl (
3813: p_api_version_number => lc_api_version_number,
3814: p_init_msg_list => fnd_api.g_false ,
3815: p_commit => fnd_api.g_false,
3816: p_validation_level => p_validation_level,
3817: x_return_status => x_return_status,
3818: x_msg_count => x_msg_count,
3811: END IF;
3812: update_mtl_txns_lot_srl (
3813: p_api_version_number => lc_api_version_number,
3814: p_init_msg_list => fnd_api.g_false ,
3815: p_commit => fnd_api.g_false,
3816: p_validation_level => p_validation_level,
3817: x_return_status => x_return_status,
3818: x_msg_count => x_msg_count,
3819: x_msg_data => x_msg_data,
3819: x_msg_data => x_msg_data,
3820: p_mtl_txn_dtls_tbl => p_mtl_txn_dtls_tbl,
3821: p_transaction_header_id => p_transaction_header_id
3822: );
3823: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
3824: FND_MESSAGE.SET_NAME('CSD','CSD_MAT_TXN_FAILURE');
3825: FND_MSG_PUB.ADD;
3826: RAISE FND_API.G_EXC_ERROR;
3827: END IF;
3822: );
3823: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
3824: FND_MESSAGE.SET_NAME('CSD','CSD_MAT_TXN_FAILURE');
3825: FND_MSG_PUB.ADD;
3826: RAISE FND_API.G_EXC_ERROR;
3827: END IF;
3828:
3829: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3830: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
3832: 'Just before calling process_mti_transactions');
3833: END IF;
3834: process_mti_transactions(
3835: p_api_version_number => lc_api_version_number,
3836: p_init_msg_list => fnd_api.g_false ,
3837: p_commit => fnd_api.g_false,
3838: p_validation_level => p_validation_level,
3839: x_return_status => x_return_status,
3840: x_msg_count => x_msg_count,
3833: END IF;
3834: process_mti_transactions(
3835: p_api_version_number => lc_api_version_number,
3836: p_init_msg_list => fnd_api.g_false ,
3837: p_commit => fnd_api.g_false,
3838: p_validation_level => p_validation_level,
3839: x_return_status => x_return_status,
3840: x_msg_count => x_msg_count,
3841: x_msg_data => x_msg_data,
3841: x_msg_data => x_msg_data,
3842: p_txn_header_id => p_transaction_header_id
3843: -- p_txn_type IN VARCHAR2
3844: );
3845: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
3846: FND_MESSAGE.SET_NAME('CSD','CSD_MAT_TXN_FAILURE');
3847: FND_MSG_PUB.ADD;
3848: RAISE FND_API.G_EXC_ERROR;
3849: END IF;
3844: );
3845: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
3846: FND_MESSAGE.SET_NAME('CSD','CSD_MAT_TXN_FAILURE');
3847: FND_MSG_PUB.ADD;
3848: RAISE FND_API.G_EXC_ERROR;
3849: END IF;
3850:
3851: -- Standard check for p_commit
3852: IF FND_API.to_Boolean( p_commit )
3848: RAISE FND_API.G_EXC_ERROR;
3849: END IF;
3850:
3851: -- Standard check for p_commit
3852: IF FND_API.to_Boolean( p_commit )
3853: THEN
3854: COMMIT WORK;
3855: END IF;
3856:
3854: COMMIT WORK;
3855: END IF;
3856:
3857: EXCEPTION
3858: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3859: ROLLBACK to PROCESS_MTL_TXNS_LOT_SRL_PVT ;
3860: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3861:
3862: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3856:
3857: EXCEPTION
3858: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3859: ROLLBACK to PROCESS_MTL_TXNS_LOT_SRL_PVT ;
3860: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3861:
3862: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3863: p_count => x_msg_count,
3864: p_data => x_msg_data);
3858: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3859: ROLLBACK to PROCESS_MTL_TXNS_LOT_SRL_PVT ;
3860: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3861:
3862: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3863: p_count => x_msg_count,
3864: p_data => x_msg_data);
3865:
3866: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3868: lc_mod_name||'unx_exception',
3869: 'G_EXC_UNEXPECTED_ERROR Exception');
3870: END IF;
3871:
3872: WHEN FND_API.G_EXC_ERROR THEN
3873: ROLLBACK to PROCESS_MTL_TXNS_LOT_SRL_PVT ;
3874: x_return_status := FND_API.G_RET_STS_ERROR;
3875:
3876: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3870: END IF;
3871:
3872: WHEN FND_API.G_EXC_ERROR THEN
3873: ROLLBACK to PROCESS_MTL_TXNS_LOT_SRL_PVT ;
3874: x_return_status := FND_API.G_RET_STS_ERROR;
3875:
3876: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3877: p_count => x_msg_count,
3878: p_data => x_msg_data);
3872: WHEN FND_API.G_EXC_ERROR THEN
3873: ROLLBACK to PROCESS_MTL_TXNS_LOT_SRL_PVT ;
3874: x_return_status := FND_API.G_RET_STS_ERROR;
3875:
3876: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3877: p_count => x_msg_count,
3878: p_data => x_msg_data);
3879:
3880: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3884: END IF;
3885:
3886: WHEN OTHERS THEN
3887: ROLLBACK to PROCESS_MTL_TXNS_LOT_SRL_PVT ;
3888: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3889:
3890: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3891: -- Add Unexpected Error to Message List, here SQLERRM is used for
3892: -- getting the error
3893: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
3894: p_procedure_name => lc_api_name );
3895: END IF;
3896:
3897: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3898: p_count => x_msg_count,
3899: p_data => x_msg_data);
3900:
3901: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
3950: END IF;
3951:
3952: SAVEPOINT UPDATE_MTL_TXNS_LOT_SRL_PVT;
3953: -- Standard call to check for call compatibility.
3954: IF NOT FND_API.Compatible_API_Call
3955: (lc_api_version_number,
3956: p_api_version_number,
3957: lc_api_name,
3958: G_PKG_NAME)
3956: p_api_version_number,
3957: lc_api_name,
3958: G_PKG_NAME)
3959: THEN
3960: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3961: END IF;
3962:
3963: IF FND_API.to_boolean(p_init_msg_list) THEN
3964: FND_MSG_PUB.initialize;
3959: THEN
3960: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3961: END IF;
3962:
3963: IF FND_API.to_boolean(p_init_msg_list) THEN
3964: FND_MSG_PUB.initialize;
3965: END IF;
3966:
3967: x_return_status := FND_API.G_RET_STS_SUCCESS;
3963: IF FND_API.to_boolean(p_init_msg_list) THEN
3964: FND_MSG_PUB.initialize;
3965: END IF;
3966:
3967: x_return_status := FND_API.G_RET_STS_SUCCESS;
3968:
3969: FOR mtl_ctr in p_mtl_txn_dtls_tbl.FIRST.. p_mtl_txn_dtls_tbl.LAST
3970: LOOP
3971: l_transactions_interface_rec.subinventory_code := p_mtl_txn_dtls_tbl(mtl_ctr).supply_subinventory;
3984:
3985: update_transactions_header(p_transactions_interface_rec => l_transactions_interface_rec,
3986: x_return_status => x_return_status );
3987:
3988: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3989: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3990: END IF;
3991:
3992: -- Check for Lot Control
3985: update_transactions_header(p_transactions_interface_rec => l_transactions_interface_rec,
3986: x_return_status => x_return_status );
3987:
3988: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3989: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3990: END IF;
3991:
3992: -- Check for Lot Control
3993: IF p_mtl_txn_dtls_tbl(mtl_ctr).lot_control_code = lc_full_lot_control THEN
4012:
4013: insert_upd_serial_numbers(p_srl_nmbrs_interface_rec => l_srl_nmbrs_interface_rec,
4014: x_return_status => x_return_status);
4015:
4016: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4017: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4018: END IF;
4019: END IF;
4020:
4013: insert_upd_serial_numbers(p_srl_nmbrs_interface_rec => l_srl_nmbrs_interface_rec,
4014: x_return_status => x_return_status);
4015:
4016: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4017: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4018: END IF;
4019: END IF;
4020:
4021: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4026:
4027: insert_transaction_lots(p_txn_lots_interface_rec => l_txn_lots_interface_rec,
4028: x_return_status => x_return_status );
4029:
4030: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4031: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4032: END IF;
4033: ELSE -- not lc_full_lot_control
4034: IF p_mtl_txn_dtls_tbl(mtl_ctr).SERIAL_NUMBER_CONTROL_CODE in ( lc_predefined_serial_control , lc_inven_rct_srl_control ) THEN
4027: insert_transaction_lots(p_txn_lots_interface_rec => l_txn_lots_interface_rec,
4028: x_return_status => x_return_status );
4029:
4030: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4031: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4032: END IF;
4033: ELSE -- not lc_full_lot_control
4034: IF p_mtl_txn_dtls_tbl(mtl_ctr).SERIAL_NUMBER_CONTROL_CODE in ( lc_predefined_serial_control , lc_inven_rct_srl_control ) THEN
4035: l_srl_nmbrs_interface_rec.transaction_interface_id := l_transactions_interface_rec.transaction_interface_id;
4043:
4044: insert_upd_serial_numbers(p_srl_nmbrs_interface_rec => l_srl_nmbrs_interface_rec,
4045: x_return_status => x_return_status );
4046:
4047: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4048: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4049: END IF;
4050: END IF;
4051: END IF; -- end lot control condition
4044: insert_upd_serial_numbers(p_srl_nmbrs_interface_rec => l_srl_nmbrs_interface_rec,
4045: x_return_status => x_return_status );
4046:
4047: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4048: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4049: END IF;
4050: END IF;
4051: END IF; -- end lot control condition
4052: END LOOP;
4051: END IF; -- end lot control condition
4052: END LOOP;
4053:
4054: -- Standard check for p_commit
4055: IF FND_API.to_Boolean( p_commit )
4056: THEN
4057: COMMIT WORK;
4058: END IF;
4059:
4057: COMMIT WORK;
4058: END IF;
4059:
4060: EXCEPTION
4061: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4062: ROLLBACK to UPDATE_MTL_TXNS_LOT_SRL_PVT ;
4063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4064:
4065: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4059:
4060: EXCEPTION
4061: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4062: ROLLBACK to UPDATE_MTL_TXNS_LOT_SRL_PVT ;
4063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4064:
4065: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4066: p_count => x_msg_count,
4067: p_data => x_msg_data);
4061: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4062: ROLLBACK to UPDATE_MTL_TXNS_LOT_SRL_PVT ;
4063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4064:
4065: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4066: p_count => x_msg_count,
4067: p_data => x_msg_data);
4068:
4069: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4071: lc_mod_name||'unx_exception',
4072: 'G_EXC_UNEXPECTED_ERROR Exception');
4073: END IF;
4074:
4075: WHEN FND_API.G_EXC_ERROR THEN
4076: ROLLBACK to UPDATE_MTL_TXNS_LOT_SRL_PVT ;
4077: x_return_status := FND_API.G_RET_STS_ERROR;
4078:
4079: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4073: END IF;
4074:
4075: WHEN FND_API.G_EXC_ERROR THEN
4076: ROLLBACK to UPDATE_MTL_TXNS_LOT_SRL_PVT ;
4077: x_return_status := FND_API.G_RET_STS_ERROR;
4078:
4079: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4080: p_count => x_msg_count,
4081: p_data => x_msg_data);
4075: WHEN FND_API.G_EXC_ERROR THEN
4076: ROLLBACK to UPDATE_MTL_TXNS_LOT_SRL_PVT ;
4077: x_return_status := FND_API.G_RET_STS_ERROR;
4078:
4079: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4080: p_count => x_msg_count,
4081: p_data => x_msg_data);
4082:
4083: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4087: END IF;
4088:
4089: WHEN OTHERS THEN
4090: ROLLBACK to UPDATE_MTL_TXNS_LOT_SRL_PVT ;
4091: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4092:
4093: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4094: -- Add Unexpected Error to Message List, here SQLERRM is used for
4095: -- getting the error
4096: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
4097: p_procedure_name => lc_api_name );
4098: END IF;
4099:
4100: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4101: p_count => x_msg_count,
4102: p_data => x_msg_data);
4103:
4104: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4174: END IF;
4175:
4176: SAVEPOINT PROCESS_TRANSACT_RES_TXN_PVT;
4177: -- Standard call to check for call compatibility.
4178: IF NOT FND_API.Compatible_API_Call
4179: (lc_api_version_number,
4180: p_api_version_number,
4181: lc_api_name,
4182: G_PKG_NAME)
4180: p_api_version_number,
4181: lc_api_name,
4182: G_PKG_NAME)
4183: THEN
4184: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4185: END IF;
4186:
4187:
4188: IF FND_API.to_boolean(p_init_msg_list) THEN
4184: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4185: END IF;
4186:
4187:
4188: IF FND_API.to_boolean(p_init_msg_list) THEN
4189: FND_MSG_PUB.initialize;
4190: END IF;
4191:
4192:
4191:
4192:
4193:
4194:
4195: x_return_status := FND_API.G_RET_STS_SUCCESS;
4196:
4197:
4198: -- Populate the row who columns
4199:
4220: /* IF l_job_details_rec.autocharge_type is NULL THEN
4221:
4222: FND_MESSAGE.SET_NAME('CSD','CSD_ATCHG_TYP_NULL');
4223: FND_MSG_PUB.ADD;
4224: RAISE FND_API.G_EXC_ERROR;
4225: end if;
4226:
4227:
4228: l_job_details_rec.basis_type := fnd_profile.value('CSD_HV_BASIS_TYP');
4232: IF l_job_details_rec.basis_type is NULL THEN
4233:
4234: FND_MESSAGE.SET_NAME('CSD','CSD_BASIS_TYP_NULL');
4235: FND_MSG_PUB.ADD;
4236: RAISE FND_API.G_EXC_ERROR;
4237: end if;
4238:
4239: l_job_details_rec.scheduled_flag := fnd_profile.value('CSD_HV_SCD_FLG');
4240:
4243: IF l_job_details_rec.scheduled_flag is NULL THEN
4244:
4245: FND_MESSAGE.SET_NAME('CSD','CSD_SCD_FLG_NULL');
4246: FND_MSG_PUB.ADD;
4247: RAISE FND_API.G_EXC_ERROR;
4248: end if;
4249:
4250: l_job_details_rec.standard_rate_flag := fnd_profile.value('CSD_HV_STD_FLG');
4251:
4254: IF l_job_details_rec.standard_rate_flag is NULL THEN
4255:
4256: FND_MESSAGE.SET_NAME('CSD','CSD_STD_FLG_NULL');
4257: FND_MSG_PUB.ADD;
4258: RAISE FND_API.G_EXC_ERROR;
4259: end if; */
4260:
4261: l_wip_cost_txn_interface_rec.transaction_date := sysdate;
4262: l_wip_cost_txn_interface_rec.transaction_type := lc_res_transaction_type;
4285:
4286: If l_wip_cost_txn_interface_rec.transaction_quantity = 0 then
4287: FND_MESSAGE.SET_NAME('CSD','CSD_TRX_QTY_ZERO');
4288: FND_MSG_PUB.ADD;
4289: RAISE FND_API.G_EXC_ERROR;
4290: end if;
4291:
4292: l_wip_cost_txn_interface_rec.transaction_uom := p_res_txn_dtls_tbl(res_ctr).transaction_uom;
4293: l_wip_cost_txn_interface_rec.wip_entity_name := p_res_txn_dtls_tbl(res_ctr).wip_entity_name;
4329: insert_wip_cost_txn( p_wip_cost_txn_interface_rec => l_wip_cost_txn_interface_rec,
4330: x_return_status => x_return_status );
4331:
4332:
4333: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4334: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4335: END IF;
4336:
4337:
4330: x_return_status => x_return_status );
4331:
4332:
4333: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4334: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4335: END IF;
4336:
4337:
4338:
4403: insert_job_header( p_job_header_rec => l_job_header_rec,
4404: x_return_status => x_return_status );
4405:
4406:
4407: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4408: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4409: END IF;
4410:
4411:
4404: x_return_status => x_return_status );
4405:
4406:
4407: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4408: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4409: END IF;
4410:
4411:
4412: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4418:
4419: insert_job_details( p_job_details_rec => l_job_details_rec,
4420: x_return_status => x_return_status );
4421:
4422: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4424: END IF;
4425:
4426: END IF;
4419: insert_job_details( p_job_details_rec => l_job_details_rec,
4420: x_return_status => x_return_status );
4421:
4422: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4424: END IF;
4425:
4426: END IF;
4427:
4452: ,p_WIP_ENTITY_ID => null
4453: ,p_OPERATION_SEQ_NUM => null
4454: ,p_RESOURCE_SEQ_NUM => null
4455: ,p_employee_id => null
4456: ,p_TRANSACTION_QUANTITY => FND_API.G_MISS_NUM
4457: ,p_TRANSACTION_UOM => FND_API.G_MISS_CHAR
4458: ,p_SERIAL_NUMBER => null
4459: ,p_REVISION => null
4460: ,p_REASON_ID => null
4453: ,p_OPERATION_SEQ_NUM => null
4454: ,p_RESOURCE_SEQ_NUM => null
4455: ,p_employee_id => null
4456: ,p_TRANSACTION_QUANTITY => FND_API.G_MISS_NUM
4457: ,p_TRANSACTION_UOM => FND_API.G_MISS_CHAR
4458: ,p_SERIAL_NUMBER => null
4459: ,p_REVISION => null
4460: ,p_REASON_ID => null
4461: ,p_BACKFLUSH_FLAG => null
4495: x_returnStatus => x_return_status,
4496: x_errorMsg => x_msg_data );
4497:
4498: If ( ml_error_exists( l_job_header_rec.group_id ) or
4499: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
4500:
4501: FND_MESSAGE.SET_NAME('CSD','CSD_RES_TXN_MASS_LD_FAILURE');
4502: FND_MSG_PUB.ADD;
4503: x_return_status := FND_API.G_RET_STS_ERROR;
4499: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
4500:
4501: FND_MESSAGE.SET_NAME('CSD','CSD_RES_TXN_MASS_LD_FAILURE');
4502: FND_MSG_PUB.ADD;
4503: x_return_status := FND_API.G_RET_STS_ERROR;
4504:
4505: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4506: p_count => x_msg_count,
4507: p_data => x_msg_data);
4501: FND_MESSAGE.SET_NAME('CSD','CSD_RES_TXN_MASS_LD_FAILURE');
4502: FND_MSG_PUB.ADD;
4503: x_return_status := FND_API.G_RET_STS_ERROR;
4504:
4505: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4506: p_count => x_msg_count,
4507: p_data => x_msg_data);
4508:
4509: RETURN;
4521:
4522: EXCEPTION
4523: WHEN OTHERS THEN
4524:
4525: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4526:
4527: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4528:
4529: -- Add Unexpected Error to Message List, here SQLERRM is used for
4532: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
4533: p_procedure_name => lc_api_name );
4534: END IF;
4535:
4536: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4537: p_count => x_msg_count,
4538: p_data => x_msg_data);
4539:
4540: END;
4539:
4540: END;
4541:
4542:
4543: /* IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4544: -- ROLLBACK to PROCESS_TRANSACT_RES_TXN_PVT ;
4545:
4546: FND_MESSAGE.SET_NAME('CSD','CSD_RES_TXN_FAILURE');
4547: FND_MSG_PUB.ADD;
4545:
4546: FND_MESSAGE.SET_NAME('CSD','CSD_RES_TXN_FAILURE');
4547: FND_MSG_PUB.ADD;
4548: RETURN; -- later - once wip works - can remove this
4549: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4550: */
4551:
4552:
4553: /* IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4563: END IF;
4564:
4565:
4566: -- Standard check for p_commit
4567: IF FND_API.to_Boolean( p_commit )
4568: THEN
4569: COMMIT WORK;
4570: END IF;
4571:
4569: COMMIT WORK;
4570: END IF;
4571:
4572: EXCEPTION
4573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4574: ROLLBACK to PROCESS_TRANSACT_RES_TXN_PVT ;
4575: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4576:
4577: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4571:
4572: EXCEPTION
4573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4574: ROLLBACK to PROCESS_TRANSACT_RES_TXN_PVT ;
4575: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4576:
4577: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4578: p_count => x_msg_count,
4579: p_data => x_msg_data);
4573: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4574: ROLLBACK to PROCESS_TRANSACT_RES_TXN_PVT ;
4575: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4576:
4577: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4578: p_count => x_msg_count,
4579: p_data => x_msg_data);
4580:
4581: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4584: 'G_EXC_UNEXPECTED_ERROR Exception');
4585: END IF;
4586:
4587:
4588: WHEN FND_API.G_EXC_ERROR THEN
4589: ROLLBACK to PROCESS_TRANSACT_RES_TXN_PVT ;
4590: x_return_status := FND_API.G_RET_STS_ERROR;
4591:
4592:
4586:
4587:
4588: WHEN FND_API.G_EXC_ERROR THEN
4589: ROLLBACK to PROCESS_TRANSACT_RES_TXN_PVT ;
4590: x_return_status := FND_API.G_RET_STS_ERROR;
4591:
4592:
4593: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4594: p_count => x_msg_count,
4589: ROLLBACK to PROCESS_TRANSACT_RES_TXN_PVT ;
4590: x_return_status := FND_API.G_RET_STS_ERROR;
4591:
4592:
4593: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4594: p_count => x_msg_count,
4595: p_data => x_msg_data);
4596:
4597: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4601: END IF;
4602:
4603: WHEN OTHERS THEN
4604: ROLLBACK to PROCESS_TRANSACT_RES_TXN_PVT ;
4605: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4606:
4607: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4608:
4609: -- Add Unexpected Error to Message List, here SQLERRM is used for
4612: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
4613: p_procedure_name => lc_api_name );
4614: END IF;
4615:
4616: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4617: p_count => x_msg_count,
4618: p_data => x_msg_data);
4619:
4620: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
4763:
4764: -- Standard Start of API savepoint
4765: SAVEPOINT PROCESS_SAVE_MTL_TXN_DTLS_PVT;
4766: -- Standard call to check for call compatibility.
4767: IF NOT FND_API.Compatible_API_Call
4768: (lc_api_version_number,
4769: p_api_version_number,
4770: lc_api_name,
4771: G_PKG_NAME)
4769: p_api_version_number,
4770: lc_api_name,
4771: G_PKG_NAME)
4772: THEN
4773: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4774: END IF;
4775:
4776: -- Initialize message list if p_init_msg_list is set to TRUE
4777: IF FND_API.to_boolean(p_init_msg_list) THEN
4773: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4774: END IF;
4775:
4776: -- Initialize message list if p_init_msg_list is set to TRUE
4777: IF FND_API.to_boolean(p_init_msg_list) THEN
4778: FND_MSG_PUB.initialize;
4779: END IF;
4780:
4781:
4778: FND_MSG_PUB.initialize;
4779: END IF;
4780:
4781:
4782: x_return_status := FND_API.G_RET_STS_SUCCESS;
4783: x_op_created := FND_API.G_FALSE;
4784:
4785: -- Populate the constant values
4786:
4779: END IF;
4780:
4781:
4782: x_return_status := FND_API.G_RET_STS_SUCCESS;
4783: x_op_created := FND_API.G_FALSE;
4784:
4785: -- Populate the constant values
4786:
4787: l_job_header_rec.load_type := lc_non_std_update_load_type;
4841: -- it would force a wip_supply_type of pull, which
4842: -- required backflush.
4843: FND_MESSAGE.SET_NAME('CSD','CSD_DEF_OP_DEPT_NULL');
4844: FND_MSG_PUB.ADD;
4845: RAISE FND_API.G_EXC_ERROR;
4846: else
4847: l_op_dtls_tbl(1).new_row := 'Y';
4848: l_op_dtls_tbl(1).wip_entity_id := p_mtl_txn_dtls_tbl(mtl_ctr).wip_entity_id;
4849: l_op_dtls_tbl(1).organization_id := p_mtl_txn_dtls_tbl(mtl_ctr).organization_id;
4858:
4859: PROCESS_SAVE_OP_DTLS
4860: (
4861: p_api_version_number => 1.0,
4862: p_init_msg_list => fnd_api.g_false,
4863: p_Commit => fnd_api.g_false,
4864: p_validation_level => p_validation_level,
4865: x_return_status => x_return_status,
4866: x_msg_count => x_msg_count,
4859: PROCESS_SAVE_OP_DTLS
4860: (
4861: p_api_version_number => 1.0,
4862: p_init_msg_list => fnd_api.g_false,
4863: p_Commit => fnd_api.g_false,
4864: p_validation_level => p_validation_level,
4865: x_return_status => x_return_status,
4866: x_msg_count => x_msg_count,
4867: x_msg_data => x_msg_data,
4866: x_msg_count => x_msg_count,
4867: x_msg_data => x_msg_data,
4868: p_op_dtls_tbl => l_op_dtls_tbl
4869: );
4870: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
4871: l_op_seq_num := l_op_dtls_tbl(1).operation_seq_num;
4872: x_op_created := FND_API.G_TRUE;
4873: else
4874: FND_MESSAGE.SET_NAME('CSD','CSD_OP_AUTO_CREATE_FAILURE');
4868: p_op_dtls_tbl => l_op_dtls_tbl
4869: );
4870: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
4871: l_op_seq_num := l_op_dtls_tbl(1).operation_seq_num;
4872: x_op_created := FND_API.G_TRUE;
4873: else
4874: FND_MESSAGE.SET_NAME('CSD','CSD_OP_AUTO_CREATE_FAILURE');
4875: FND_MSG_PUB.ADD;
4876: RAISE FND_API.G_EXC_ERROR;
4872: x_op_created := FND_API.G_TRUE;
4873: else
4874: FND_MESSAGE.SET_NAME('CSD','CSD_OP_AUTO_CREATE_FAILURE');
4875: FND_MSG_PUB.ADD;
4876: RAISE FND_API.G_EXC_ERROR;
4877: end if;
4878: end if; -- department profile
4879: end if; -- operation does not exist
4880: end if;
4971: -- subinventory is only required when the supply type is operation pull(3) or assembly pull (2).
4972: If l_job_details_rec.supply_subinventory is NULL AND l_wip_supply_type IN (2,3) then
4973: FND_MESSAGE.SET_NAME('CSD','CSD_DEF_SUB_INV_NULL');
4974: FND_MSG_PUB.ADD;
4975: RAISE FND_API.G_EXC_ERROR;
4976: end if;
4977:
4978:
4979:
4990: insert_job_header( p_job_header_rec => l_job_header_rec,
4991: x_return_status => x_return_status );
4992:
4993:
4994: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4996: END IF;
4997:
4998:
4991: x_return_status => x_return_status );
4992:
4993:
4994: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
4995: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4996: END IF;
4997:
4998:
4999: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5005:
5006: insert_job_details( p_job_details_rec => l_job_details_rec,
5007: x_return_status => x_return_status );
5008:
5009: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5010: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5011: END IF;
5012:
5013:
5006: insert_job_details( p_job_details_rec => l_job_details_rec,
5007: x_return_status => x_return_status );
5008:
5009: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5010: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5011: END IF;
5012:
5013:
5014:
5027: x_returnStatus => x_return_status,
5028: x_errorMsg => x_msg_data );
5029:
5030: If ( ml_error_exists( l_job_header_rec.group_id ) or
5031: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
5032:
5033: FND_MESSAGE.SET_NAME('CSD','CSD_MTL_ADD_MASS_LD_FAILURE');
5034: FND_MSG_PUB.ADD;
5035: x_return_status := FND_API.G_RET_STS_ERROR;
5031: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
5032:
5033: FND_MESSAGE.SET_NAME('CSD','CSD_MTL_ADD_MASS_LD_FAILURE');
5034: FND_MSG_PUB.ADD;
5035: x_return_status := FND_API.G_RET_STS_ERROR;
5036:
5037: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5038: p_count => x_msg_count,
5039: p_data => x_msg_data);
5033: FND_MESSAGE.SET_NAME('CSD','CSD_MTL_ADD_MASS_LD_FAILURE');
5034: FND_MSG_PUB.ADD;
5035: x_return_status := FND_API.G_RET_STS_ERROR;
5036:
5037: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5038: p_count => x_msg_count,
5039: p_data => x_msg_data);
5040: -- Need to rollback Raise exception -
5041: -- once commit is removed from above call
5038: p_count => x_msg_count,
5039: p_data => x_msg_data);
5040: -- Need to rollback Raise exception -
5041: -- once commit is removed from above call
5042: -- raise FND_API.G_EXC_ERROR;
5043: RETURN;
5044: end if;
5045:
5046: --bug#12316893
5055: 2 /* 2 = materials */);
5056:
5057: -- when rollback for WIP works, remove x_return_status, count_and_get,
5058: -- and return then reinstate raise exception above
5059: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5060: /*
5061: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5062: -- Add Unexpected Error to Message List, here SQLERRM is used for
5063: -- getting the error
5065: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
5066: p_procedure_name => lc_api_name );
5067: END IF;
5068: */
5069: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5070: p_count => x_msg_count,
5071: p_data => x_msg_data);
5072:
5073: END;
5170:
5171: insert_job_header( p_job_header_rec => l_job_header_rec,
5172: x_return_status => x_return_status );
5173:
5174: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5175: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5176: END IF;
5177:
5178:
5171: insert_job_header( p_job_header_rec => l_job_header_rec,
5172: x_return_status => x_return_status );
5173:
5174: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5175: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5176: END IF;
5177:
5178:
5179: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5184:
5185: insert_job_details( p_job_details_rec => l_job_details_rec,
5186: x_return_status => x_return_status );
5187:
5188: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5189: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5190: END IF;
5191:
5192: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5185: insert_job_details( p_job_details_rec => l_job_details_rec,
5186: x_return_status => x_return_status );
5187:
5188: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5189: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5190: END IF;
5191:
5192: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5193: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5203: x_returnStatus => x_return_status,
5204: x_errorMsg => x_msg_data );
5205:
5206: If ( ml_error_exists( l_job_header_rec.group_id ) or
5207: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
5208:
5209: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5210: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
5211: lc_mod_name,
5213: END IF;
5214:
5215: FND_MESSAGE.SET_NAME('CSD','CSD_MTL_UPD_MASS_LD_FAILURE');
5216: FND_MSG_PUB.ADD;
5217: x_return_status := FND_API.G_RET_STS_ERROR;
5218: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5219: p_count => x_msg_count,
5220: p_data => x_msg_data);
5221: -- do not return: keep going even if requirements cannot be saved,
5214:
5215: FND_MESSAGE.SET_NAME('CSD','CSD_MTL_UPD_MASS_LD_FAILURE');
5216: FND_MSG_PUB.ADD;
5217: x_return_status := FND_API.G_RET_STS_ERROR;
5218: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5219: p_count => x_msg_count,
5220: p_data => x_msg_data);
5221: -- do not return: keep going even if requirements cannot be saved,
5222: -- because wip transaction details can be updated.
5240: 2 /* 2 = materials */);
5241:
5242: FND_MESSAGE.SET_NAME('CSD','CSD_MTL_UPD_MASS_LD_FAILURE');
5243: FND_MSG_PUB.ADD;
5244: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5245: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5246: p_count => x_msg_count,
5247: p_data => x_msg_data);
5248: END;
5241:
5242: FND_MESSAGE.SET_NAME('CSD','CSD_MTL_UPD_MASS_LD_FAILURE');
5243: FND_MSG_PUB.ADD;
5244: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5245: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5246: p_count => x_msg_count,
5247: p_data => x_msg_data);
5248: END;
5249: END IF; -- p_mtl_txn_dtls_tbl(mtl_ctr).new_row <> 'Y'
5325: ,p_RESOURCE_SEQ_NUM => null
5326: ,p_employee_id => null
5327: ,p_TRANSACTION_QUANTITY => p_mtl_txn_dtls_tbl(mtl_ctr).TRANSACTION_QUANTITY
5328: ,p_TRANSACTION_UOM => p_mtl_txn_dtls_tbl(mtl_ctr).TRANSACTION_UOM
5329: ,p_SERIAL_NUMBER => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).SERIAL_NUMBER, FND_API.G_MISS_CHAR)
5330: ,p_REVISION => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).REVISION, FND_API.G_MISS_CHAR) -- swai: bug 6995498/7182047
5331: ,p_REASON_ID => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).REASON_ID, FND_API.G_MISS_NUM)-- swai bug 6841113
5332: ,p_BACKFLUSH_FLAG => null
5333: ,p_COUNT_POINT_TYPE => null
5326: ,p_employee_id => null
5327: ,p_TRANSACTION_QUANTITY => p_mtl_txn_dtls_tbl(mtl_ctr).TRANSACTION_QUANTITY
5328: ,p_TRANSACTION_UOM => p_mtl_txn_dtls_tbl(mtl_ctr).TRANSACTION_UOM
5329: ,p_SERIAL_NUMBER => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).SERIAL_NUMBER, FND_API.G_MISS_CHAR)
5330: ,p_REVISION => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).REVISION, FND_API.G_MISS_CHAR) -- swai: bug 6995498/7182047
5331: ,p_REASON_ID => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).REASON_ID, FND_API.G_MISS_NUM)-- swai bug 6841113
5332: ,p_BACKFLUSH_FLAG => null
5333: ,p_COUNT_POINT_TYPE => null
5334: ,p_DEPARTMENT_ID => null
5327: ,p_TRANSACTION_QUANTITY => p_mtl_txn_dtls_tbl(mtl_ctr).TRANSACTION_QUANTITY
5328: ,p_TRANSACTION_UOM => p_mtl_txn_dtls_tbl(mtl_ctr).TRANSACTION_UOM
5329: ,p_SERIAL_NUMBER => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).SERIAL_NUMBER, FND_API.G_MISS_CHAR)
5330: ,p_REVISION => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).REVISION, FND_API.G_MISS_CHAR) -- swai: bug 6995498/7182047
5331: ,p_REASON_ID => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).REASON_ID, FND_API.G_MISS_NUM)-- swai bug 6841113
5332: ,p_BACKFLUSH_FLAG => null
5333: ,p_COUNT_POINT_TYPE => null
5334: ,p_DEPARTMENT_ID => null
5335: ,p_DESCRIPTION => null
5340: ,p_MINIMUM_TRANSFER_QUANTITY => null
5341: ,p_STANDARD_OPERATION_ID => null
5342: ,p_OBJECT_VERSION_NUMBER => p_mtl_txn_dtls_tbl(mtl_ctr).object_version_number
5343: -- yvchen: bug 13258460 - 12.1.3+ add DFF attributes
5344: ,p_ATTRIBUTE_CATEGORY => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR)
5345: ,p_ATTRIBUTE1 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
5346: ,p_ATTRIBUTE2 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
5347: ,p_ATTRIBUTE3 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
5348: ,p_ATTRIBUTE4 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5341: ,p_STANDARD_OPERATION_ID => null
5342: ,p_OBJECT_VERSION_NUMBER => p_mtl_txn_dtls_tbl(mtl_ctr).object_version_number
5343: -- yvchen: bug 13258460 - 12.1.3+ add DFF attributes
5344: ,p_ATTRIBUTE_CATEGORY => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR)
5345: ,p_ATTRIBUTE1 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
5346: ,p_ATTRIBUTE2 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
5347: ,p_ATTRIBUTE3 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
5348: ,p_ATTRIBUTE4 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5349: ,p_ATTRIBUTE5 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5342: ,p_OBJECT_VERSION_NUMBER => p_mtl_txn_dtls_tbl(mtl_ctr).object_version_number
5343: -- yvchen: bug 13258460 - 12.1.3+ add DFF attributes
5344: ,p_ATTRIBUTE_CATEGORY => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR)
5345: ,p_ATTRIBUTE1 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
5346: ,p_ATTRIBUTE2 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
5347: ,p_ATTRIBUTE3 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
5348: ,p_ATTRIBUTE4 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5349: ,p_ATTRIBUTE5 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5350: ,p_ATTRIBUTE6 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5343: -- yvchen: bug 13258460 - 12.1.3+ add DFF attributes
5344: ,p_ATTRIBUTE_CATEGORY => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR)
5345: ,p_ATTRIBUTE1 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
5346: ,p_ATTRIBUTE2 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
5347: ,p_ATTRIBUTE3 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
5348: ,p_ATTRIBUTE4 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5349: ,p_ATTRIBUTE5 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5350: ,p_ATTRIBUTE6 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5351: ,p_ATTRIBUTE7 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5344: ,p_ATTRIBUTE_CATEGORY => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR)
5345: ,p_ATTRIBUTE1 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
5346: ,p_ATTRIBUTE2 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
5347: ,p_ATTRIBUTE3 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
5348: ,p_ATTRIBUTE4 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5349: ,p_ATTRIBUTE5 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5350: ,p_ATTRIBUTE6 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5351: ,p_ATTRIBUTE7 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5352: ,p_ATTRIBUTE8 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5345: ,p_ATTRIBUTE1 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
5346: ,p_ATTRIBUTE2 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
5347: ,p_ATTRIBUTE3 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
5348: ,p_ATTRIBUTE4 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5349: ,p_ATTRIBUTE5 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5350: ,p_ATTRIBUTE6 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5351: ,p_ATTRIBUTE7 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5352: ,p_ATTRIBUTE8 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5353: ,p_ATTRIBUTE9 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5346: ,p_ATTRIBUTE2 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
5347: ,p_ATTRIBUTE3 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
5348: ,p_ATTRIBUTE4 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5349: ,p_ATTRIBUTE5 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5350: ,p_ATTRIBUTE6 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5351: ,p_ATTRIBUTE7 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5352: ,p_ATTRIBUTE8 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5353: ,p_ATTRIBUTE9 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5354: ,p_ATTRIBUTE10 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5347: ,p_ATTRIBUTE3 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
5348: ,p_ATTRIBUTE4 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5349: ,p_ATTRIBUTE5 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5350: ,p_ATTRIBUTE6 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5351: ,p_ATTRIBUTE7 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5352: ,p_ATTRIBUTE8 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5353: ,p_ATTRIBUTE9 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5354: ,p_ATTRIBUTE10 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5355: ,p_ATTRIBUTE11 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5348: ,p_ATTRIBUTE4 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5349: ,p_ATTRIBUTE5 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5350: ,p_ATTRIBUTE6 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5351: ,p_ATTRIBUTE7 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5352: ,p_ATTRIBUTE8 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5353: ,p_ATTRIBUTE9 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5354: ,p_ATTRIBUTE10 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5355: ,p_ATTRIBUTE11 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5356: ,p_ATTRIBUTE12 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5349: ,p_ATTRIBUTE5 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5350: ,p_ATTRIBUTE6 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5351: ,p_ATTRIBUTE7 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5352: ,p_ATTRIBUTE8 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5353: ,p_ATTRIBUTE9 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5354: ,p_ATTRIBUTE10 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5355: ,p_ATTRIBUTE11 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5356: ,p_ATTRIBUTE12 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5357: ,p_ATTRIBUTE13 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
5350: ,p_ATTRIBUTE6 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5351: ,p_ATTRIBUTE7 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5352: ,p_ATTRIBUTE8 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5353: ,p_ATTRIBUTE9 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5354: ,p_ATTRIBUTE10 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5355: ,p_ATTRIBUTE11 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5356: ,p_ATTRIBUTE12 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5357: ,p_ATTRIBUTE13 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
5358: ,p_ATTRIBUTE14 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
5351: ,p_ATTRIBUTE7 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5352: ,p_ATTRIBUTE8 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5353: ,p_ATTRIBUTE9 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5354: ,p_ATTRIBUTE10 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5355: ,p_ATTRIBUTE11 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5356: ,p_ATTRIBUTE12 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5357: ,p_ATTRIBUTE13 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
5358: ,p_ATTRIBUTE14 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
5359: ,p_ATTRIBUTE15 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE15, FND_API.G_MISS_CHAR)
5352: ,p_ATTRIBUTE8 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5353: ,p_ATTRIBUTE9 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5354: ,p_ATTRIBUTE10 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5355: ,p_ATTRIBUTE11 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5356: ,p_ATTRIBUTE12 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5357: ,p_ATTRIBUTE13 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
5358: ,p_ATTRIBUTE14 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
5359: ,p_ATTRIBUTE15 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE15, FND_API.G_MISS_CHAR)
5360: ,p_CREATE_RO_FLAG => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).CREATE_RO_FLAG, FND_API.G_MISS_CHAR) -- bug#13698799 auto create ro, parent ro
5353: ,p_ATTRIBUTE9 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5354: ,p_ATTRIBUTE10 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5355: ,p_ATTRIBUTE11 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5356: ,p_ATTRIBUTE12 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5357: ,p_ATTRIBUTE13 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
5358: ,p_ATTRIBUTE14 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
5359: ,p_ATTRIBUTE15 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE15, FND_API.G_MISS_CHAR)
5360: ,p_CREATE_RO_FLAG => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).CREATE_RO_FLAG, FND_API.G_MISS_CHAR) -- bug#13698799 auto create ro, parent ro
5361: );
5354: ,p_ATTRIBUTE10 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5355: ,p_ATTRIBUTE11 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5356: ,p_ATTRIBUTE12 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5357: ,p_ATTRIBUTE13 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
5358: ,p_ATTRIBUTE14 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
5359: ,p_ATTRIBUTE15 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE15, FND_API.G_MISS_CHAR)
5360: ,p_CREATE_RO_FLAG => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).CREATE_RO_FLAG, FND_API.G_MISS_CHAR) -- bug#13698799 auto create ro, parent ro
5361: );
5362:
5355: ,p_ATTRIBUTE11 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5356: ,p_ATTRIBUTE12 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5357: ,p_ATTRIBUTE13 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
5358: ,p_ATTRIBUTE14 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
5359: ,p_ATTRIBUTE15 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE15, FND_API.G_MISS_CHAR)
5360: ,p_CREATE_RO_FLAG => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).CREATE_RO_FLAG, FND_API.G_MISS_CHAR) -- bug#13698799 auto create ro, parent ro
5361: );
5362:
5363: end if;
5356: ,p_ATTRIBUTE12 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5357: ,p_ATTRIBUTE13 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
5358: ,p_ATTRIBUTE14 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
5359: ,p_ATTRIBUTE15 => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).ATTRIBUTE15, FND_API.G_MISS_CHAR)
5360: ,p_CREATE_RO_FLAG => nvl(p_mtl_txn_dtls_tbl(mtl_ctr).CREATE_RO_FLAG, FND_API.G_MISS_CHAR) -- bug#13698799 auto create ro, parent ro
5361: );
5362:
5363: end if;
5364:
5364:
5365: END LOOP;
5366:
5367: -- Standard check for p_commit
5368: IF FND_API.to_Boolean( p_commit )
5369: THEN
5370: COMMIT WORK;
5371: END IF;
5372:
5370: COMMIT WORK;
5371: END IF;
5372:
5373: EXCEPTION
5374: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5375: ROLLBACK to PROCESS_SAVE_MTL_TXN_DTLS_PVT ;
5376: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5377:
5378: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5372:
5373: EXCEPTION
5374: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5375: ROLLBACK to PROCESS_SAVE_MTL_TXN_DTLS_PVT ;
5376: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5377:
5378: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5379: p_count => x_msg_count,
5380: p_data => x_msg_data);
5374: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5375: ROLLBACK to PROCESS_SAVE_MTL_TXN_DTLS_PVT ;
5376: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5377:
5378: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5379: p_count => x_msg_count,
5380: p_data => x_msg_data);
5381:
5382: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5385: 'G_EXC_UNEXPECTED_ERROR Exception');
5386: END IF;
5387:
5388:
5389: WHEN FND_API.G_EXC_ERROR THEN
5390: ROLLBACK to PROCESS_SAVE_MTL_TXN_DTLS_PVT ;
5391: x_return_status := FND_API.G_RET_STS_ERROR;
5392:
5393:
5387:
5388:
5389: WHEN FND_API.G_EXC_ERROR THEN
5390: ROLLBACK to PROCESS_SAVE_MTL_TXN_DTLS_PVT ;
5391: x_return_status := FND_API.G_RET_STS_ERROR;
5392:
5393:
5394: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5395: p_count => x_msg_count,
5390: ROLLBACK to PROCESS_SAVE_MTL_TXN_DTLS_PVT ;
5391: x_return_status := FND_API.G_RET_STS_ERROR;
5392:
5393:
5394: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5395: p_count => x_msg_count,
5396: p_data => x_msg_data);
5397:
5398: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5402: END IF;
5403:
5404: WHEN OTHERS THEN
5405: ROLLBACK to PROCESS_SAVE_MTL_TXN_DTLS_PVT ;
5406: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5407:
5408: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5409:
5410: -- Add Unexpected Error to Message List, here SQLERRM is used for
5413: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
5414: p_procedure_name => lc_api_name );
5415: END IF;
5416:
5417: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5418: p_count => x_msg_count,
5419: p_data => x_msg_data);
5420:
5421: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5516:
5517: -- Standard Start of API savepoint
5518: SAVEPOINT PROCESS_SAVE_RES_TXN_DTLS_PVT;
5519: -- Standard call to check for call compatibility.
5520: IF NOT FND_API.Compatible_API_Call
5521: (lc_api_version_number,
5522: p_api_version_number,
5523: lc_api_name,
5524: G_PKG_NAME)
5522: p_api_version_number,
5523: lc_api_name,
5524: G_PKG_NAME)
5525: THEN
5526: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5527: END IF;
5528:
5529:
5530: -- Initialize message list if p_init_msg_list is set to TRUE
5527: END IF;
5528:
5529:
5530: -- Initialize message list if p_init_msg_list is set to TRUE
5531: IF FND_API.to_boolean(p_init_msg_list) THEN
5532: FND_MSG_PUB.initialize;
5533: END IF;
5534:
5535: x_return_status := FND_API.G_RET_STS_SUCCESS;
5531: IF FND_API.to_boolean(p_init_msg_list) THEN
5532: FND_MSG_PUB.initialize;
5533: END IF;
5534:
5535: x_return_status := FND_API.G_RET_STS_SUCCESS;
5536:
5537:
5538:
5539: -- Populate the constant values
5626: insert_job_header( p_job_header_rec => l_job_header_rec,
5627: x_return_status => x_return_status );
5628:
5629:
5630: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5631: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5632: END IF;
5633:
5634:
5627: x_return_status => x_return_status );
5628:
5629:
5630: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5631: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5632: END IF;
5633:
5634:
5635: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5641:
5642: insert_job_details( p_job_details_rec => l_job_details_rec,
5643: x_return_status => x_return_status );
5644:
5645: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5646: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5647: END IF;
5648:
5649:
5642: insert_job_details( p_job_details_rec => l_job_details_rec,
5643: x_return_status => x_return_status );
5644:
5645: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5646: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5647: END IF;
5648:
5649:
5650:
5663: x_returnStatus => x_return_status,
5664: x_errorMsg => x_msg_data );
5665:
5666: If ( ml_error_exists( l_job_header_rec.group_id ) or
5667: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
5668:
5669: FND_MESSAGE.SET_NAME('CSD','CSD_RES_ADD_MASS_LD_FAILURE');
5670: FND_MSG_PUB.ADD;
5671: x_return_status := FND_API.G_RET_STS_ERROR;
5667: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
5668:
5669: FND_MESSAGE.SET_NAME('CSD','CSD_RES_ADD_MASS_LD_FAILURE');
5670: FND_MSG_PUB.ADD;
5671: x_return_status := FND_API.G_RET_STS_ERROR;
5672:
5673: FND_MSG_PUB.count_and_get(p_encoded => FND_API.G_FALSE,
5674: p_count => x_msg_count,
5675: p_data => x_msg_data);
5669: FND_MESSAGE.SET_NAME('CSD','CSD_RES_ADD_MASS_LD_FAILURE');
5670: FND_MSG_PUB.ADD;
5671: x_return_status := FND_API.G_RET_STS_ERROR;
5672:
5673: FND_MSG_PUB.count_and_get(p_encoded => FND_API.G_FALSE,
5674: p_count => x_msg_count,
5675: p_data => x_msg_data);
5676:
5677: -- Need to rollback Raise exception -
5675: p_data => x_msg_data);
5676:
5677: -- Need to rollback Raise exception -
5678: -- once commit is removed from above call
5679: -- raise FND_API.G_EXC_ERROR;
5680: RETURN;
5681: end if;
5682:
5683: --bug#12316893
5690: EXCEPTION
5691: WHEN OTHERS THEN
5692: add_wip_interface_errors(l_job_header_rec.group_id,
5693: 3 /* 3 = resources */);
5694: -- raise FND_API.G_EXC_UNEXPECTED_ERROR;
5695:
5696: -- when rollback for WIP works, remove x_return_status, count_and_get,
5697: -- and return then reinstate raise exception above
5698: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5694: -- raise FND_API.G_EXC_UNEXPECTED_ERROR;
5695:
5696: -- when rollback for WIP works, remove x_return_status, count_and_get,
5697: -- and return then reinstate raise exception above
5698: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5699: /*
5700: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5701: -- Add Unexpected Error to Message List, here SQLERRM is used for
5702: -- getting the error
5703: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
5704: p_procedure_name => lc_api_name );
5705: END IF;
5706: */
5707: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5708: p_count => x_msg_count,
5709: p_data => x_msg_data);
5710: return;
5711: END;
5786: ,p_INVENTORY_ITEM_ID => null
5787: ,p_WIP_ENTITY_ID => null
5788: ,p_OPERATION_SEQ_NUM => null
5789: ,p_RESOURCE_SEQ_NUM => null
5790: ,p_employee_id => nvl(p_res_txn_dtls_tbl(res_ctr).employee_id, FND_API.G_MISS_NUM)
5791: ,p_TRANSACTION_QUANTITY => p_res_txn_dtls_tbl(res_ctr).TRANSACTION_QUANTITY
5792: ,p_TRANSACTION_UOM => p_res_txn_dtls_tbl(res_ctr).TRANSACTION_UOM
5793: ,p_SERIAL_NUMBER => null
5794: ,p_REVISION => null -- swai: bug 6995498/7182047
5804: ,p_MINIMUM_TRANSFER_QUANTITY => null
5805: ,p_STANDARD_OPERATION_ID => null
5806: ,p_OBJECT_VERSION_NUMBER => p_res_txn_dtls_tbl(res_ctr).object_version_number
5807: -- swai: bug 15955754, FP of bug 14823164 - 12.1.3+ add DFF attributes
5808: ,p_ATTRIBUTE_CATEGORY => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR)
5809: ,p_ATTRIBUTE1 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
5810: ,p_ATTRIBUTE2 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
5811: ,p_ATTRIBUTE3 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
5812: ,p_ATTRIBUTE4 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5805: ,p_STANDARD_OPERATION_ID => null
5806: ,p_OBJECT_VERSION_NUMBER => p_res_txn_dtls_tbl(res_ctr).object_version_number
5807: -- swai: bug 15955754, FP of bug 14823164 - 12.1.3+ add DFF attributes
5808: ,p_ATTRIBUTE_CATEGORY => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR)
5809: ,p_ATTRIBUTE1 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
5810: ,p_ATTRIBUTE2 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
5811: ,p_ATTRIBUTE3 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
5812: ,p_ATTRIBUTE4 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5813: ,p_ATTRIBUTE5 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5806: ,p_OBJECT_VERSION_NUMBER => p_res_txn_dtls_tbl(res_ctr).object_version_number
5807: -- swai: bug 15955754, FP of bug 14823164 - 12.1.3+ add DFF attributes
5808: ,p_ATTRIBUTE_CATEGORY => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR)
5809: ,p_ATTRIBUTE1 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
5810: ,p_ATTRIBUTE2 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
5811: ,p_ATTRIBUTE3 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
5812: ,p_ATTRIBUTE4 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5813: ,p_ATTRIBUTE5 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5814: ,p_ATTRIBUTE6 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5807: -- swai: bug 15955754, FP of bug 14823164 - 12.1.3+ add DFF attributes
5808: ,p_ATTRIBUTE_CATEGORY => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR)
5809: ,p_ATTRIBUTE1 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
5810: ,p_ATTRIBUTE2 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
5811: ,p_ATTRIBUTE3 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
5812: ,p_ATTRIBUTE4 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5813: ,p_ATTRIBUTE5 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5814: ,p_ATTRIBUTE6 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5815: ,p_ATTRIBUTE7 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5808: ,p_ATTRIBUTE_CATEGORY => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR)
5809: ,p_ATTRIBUTE1 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
5810: ,p_ATTRIBUTE2 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
5811: ,p_ATTRIBUTE3 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
5812: ,p_ATTRIBUTE4 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5813: ,p_ATTRIBUTE5 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5814: ,p_ATTRIBUTE6 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5815: ,p_ATTRIBUTE7 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5816: ,p_ATTRIBUTE8 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5809: ,p_ATTRIBUTE1 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
5810: ,p_ATTRIBUTE2 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
5811: ,p_ATTRIBUTE3 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
5812: ,p_ATTRIBUTE4 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5813: ,p_ATTRIBUTE5 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5814: ,p_ATTRIBUTE6 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5815: ,p_ATTRIBUTE7 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5816: ,p_ATTRIBUTE8 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5817: ,p_ATTRIBUTE9 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5810: ,p_ATTRIBUTE2 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
5811: ,p_ATTRIBUTE3 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
5812: ,p_ATTRIBUTE4 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5813: ,p_ATTRIBUTE5 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5814: ,p_ATTRIBUTE6 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5815: ,p_ATTRIBUTE7 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5816: ,p_ATTRIBUTE8 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5817: ,p_ATTRIBUTE9 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5818: ,p_ATTRIBUTE10 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5811: ,p_ATTRIBUTE3 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
5812: ,p_ATTRIBUTE4 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5813: ,p_ATTRIBUTE5 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5814: ,p_ATTRIBUTE6 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5815: ,p_ATTRIBUTE7 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5816: ,p_ATTRIBUTE8 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5817: ,p_ATTRIBUTE9 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5818: ,p_ATTRIBUTE10 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5819: ,p_ATTRIBUTE11 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5812: ,p_ATTRIBUTE4 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
5813: ,p_ATTRIBUTE5 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5814: ,p_ATTRIBUTE6 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5815: ,p_ATTRIBUTE7 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5816: ,p_ATTRIBUTE8 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5817: ,p_ATTRIBUTE9 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5818: ,p_ATTRIBUTE10 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5819: ,p_ATTRIBUTE11 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5820: ,p_ATTRIBUTE12 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5813: ,p_ATTRIBUTE5 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
5814: ,p_ATTRIBUTE6 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5815: ,p_ATTRIBUTE7 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5816: ,p_ATTRIBUTE8 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5817: ,p_ATTRIBUTE9 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5818: ,p_ATTRIBUTE10 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5819: ,p_ATTRIBUTE11 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5820: ,p_ATTRIBUTE12 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5821: ,p_ATTRIBUTE13 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
5814: ,p_ATTRIBUTE6 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
5815: ,p_ATTRIBUTE7 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5816: ,p_ATTRIBUTE8 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5817: ,p_ATTRIBUTE9 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5818: ,p_ATTRIBUTE10 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5819: ,p_ATTRIBUTE11 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5820: ,p_ATTRIBUTE12 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5821: ,p_ATTRIBUTE13 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
5822: ,p_ATTRIBUTE14 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
5815: ,p_ATTRIBUTE7 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
5816: ,p_ATTRIBUTE8 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5817: ,p_ATTRIBUTE9 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5818: ,p_ATTRIBUTE10 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5819: ,p_ATTRIBUTE11 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5820: ,p_ATTRIBUTE12 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5821: ,p_ATTRIBUTE13 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
5822: ,p_ATTRIBUTE14 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
5823: ,p_ATTRIBUTE15 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE15, FND_API.G_MISS_CHAR)
5816: ,p_ATTRIBUTE8 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
5817: ,p_ATTRIBUTE9 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5818: ,p_ATTRIBUTE10 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5819: ,p_ATTRIBUTE11 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5820: ,p_ATTRIBUTE12 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5821: ,p_ATTRIBUTE13 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
5822: ,p_ATTRIBUTE14 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
5823: ,p_ATTRIBUTE15 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE15, FND_API.G_MISS_CHAR)
5824: ,p_CREATE_RO_FLAG => null --bug#13698799 auto create ro, parent ro
5817: ,p_ATTRIBUTE9 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
5818: ,p_ATTRIBUTE10 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5819: ,p_ATTRIBUTE11 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5820: ,p_ATTRIBUTE12 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5821: ,p_ATTRIBUTE13 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
5822: ,p_ATTRIBUTE14 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
5823: ,p_ATTRIBUTE15 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE15, FND_API.G_MISS_CHAR)
5824: ,p_CREATE_RO_FLAG => null --bug#13698799 auto create ro, parent ro
5825: );
5818: ,p_ATTRIBUTE10 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
5819: ,p_ATTRIBUTE11 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5820: ,p_ATTRIBUTE12 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5821: ,p_ATTRIBUTE13 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
5822: ,p_ATTRIBUTE14 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
5823: ,p_ATTRIBUTE15 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE15, FND_API.G_MISS_CHAR)
5824: ,p_CREATE_RO_FLAG => null --bug#13698799 auto create ro, parent ro
5825: );
5826:
5819: ,p_ATTRIBUTE11 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
5820: ,p_ATTRIBUTE12 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
5821: ,p_ATTRIBUTE13 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
5822: ,p_ATTRIBUTE14 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
5823: ,p_ATTRIBUTE15 => nvl(p_res_txn_dtls_tbl(res_ctr).ATTRIBUTE15, FND_API.G_MISS_CHAR)
5824: ,p_CREATE_RO_FLAG => null --bug#13698799 auto create ro, parent ro
5825: );
5826:
5827: end if;
5828:
5829: END LOOP;
5830:
5831: -- Standard check for p_commit
5832: IF FND_API.to_Boolean( p_commit )
5833: THEN
5834: COMMIT WORK;
5835: END IF;
5836:
5834: COMMIT WORK;
5835: END IF;
5836:
5837: EXCEPTION
5838: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5839: ROLLBACK to PROCESS_SAVE_RES_TXN_DTLS_PVT ;
5840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5841:
5842: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5836:
5837: EXCEPTION
5838: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5839: ROLLBACK to PROCESS_SAVE_RES_TXN_DTLS_PVT ;
5840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5841:
5842: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5843: p_count => x_msg_count,
5844: p_data => x_msg_data);
5838: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5839: ROLLBACK to PROCESS_SAVE_RES_TXN_DTLS_PVT ;
5840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5841:
5842: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5843: p_count => x_msg_count,
5844: p_data => x_msg_data);
5845:
5846: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5849: 'G_EXC_UNEXPECTED_ERROR Exception');
5850: END IF;
5851:
5852:
5853: WHEN FND_API.G_EXC_ERROR THEN
5854: ROLLBACK to PROCESS_SAVE_RES_TXN_DTLS_PVT ;
5855: x_return_status := FND_API.G_RET_STS_ERROR;
5856:
5857:
5851:
5852:
5853: WHEN FND_API.G_EXC_ERROR THEN
5854: ROLLBACK to PROCESS_SAVE_RES_TXN_DTLS_PVT ;
5855: x_return_status := FND_API.G_RET_STS_ERROR;
5856:
5857:
5858: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5859: p_count => x_msg_count,
5854: ROLLBACK to PROCESS_SAVE_RES_TXN_DTLS_PVT ;
5855: x_return_status := FND_API.G_RET_STS_ERROR;
5856:
5857:
5858: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5859: p_count => x_msg_count,
5860: p_data => x_msg_data);
5861:
5862: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5866: END IF;
5867:
5868: WHEN OTHERS THEN
5869: ROLLBACK to PROCESS_SAVE_RES_TXN_DTLS_PVT ;
5870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5871:
5872: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5873:
5874: -- Add Unexpected Error to Message List, here SQLERRM is used for
5877: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
5878: p_procedure_name => lc_api_name );
5879: END IF;
5880:
5881: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
5882: p_count => x_msg_count,
5883: p_data => x_msg_data);
5884:
5885: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
5946: -- Standard Start of API savepoint
5947: SAVEPOINT PROCESS_SAVE_OP_DTLS_PVT;
5948:
5949: -- Standard call to check for call compatibility.
5950: IF NOT FND_API.Compatible_API_Call
5951: (lc_api_version_number,
5952: p_api_version_number,
5953: lc_api_name,
5954: G_PKG_NAME)
5952: p_api_version_number,
5953: lc_api_name,
5954: G_PKG_NAME)
5955: THEN
5956: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5957: END IF;
5958:
5959:
5960: -- Initialize message list if p_init_msg_list is set to TRUE
5957: END IF;
5958:
5959:
5960: -- Initialize message list if p_init_msg_list is set to TRUE
5961: IF FND_API.to_boolean(p_init_msg_list) THEN
5962: FND_MSG_PUB.initialize;
5963: END IF;
5964:
5965: x_return_status := FND_API.G_RET_STS_SUCCESS;
5961: IF FND_API.to_boolean(p_init_msg_list) THEN
5962: FND_MSG_PUB.initialize;
5963: END IF;
5964:
5965: x_return_status := FND_API.G_RET_STS_SUCCESS;
5966:
5967: -- Populate the constant values for job header
5968: l_job_header_rec.load_type := lc_non_std_update_load_type;
5969:
6031:
6032: insert_job_header( p_job_header_rec => l_job_header_rec,
6033: x_return_status => x_return_status );
6034:
6035: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6036: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6037: END IF;
6038:
6039: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6032: insert_job_header( p_job_header_rec => l_job_header_rec,
6033: x_return_status => x_return_status );
6034:
6035: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6036: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6037: END IF;
6038:
6039: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6040: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
6044:
6045: insert_job_details( p_job_details_rec => l_job_details_rec,
6046: x_return_status => x_return_status );
6047:
6048: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6049: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6050: END IF;
6051:
6052: -- Call WIP Mass Load API
6045: insert_job_details( p_job_details_rec => l_job_details_rec,
6046: x_return_status => x_return_status );
6047:
6048: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6049: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6050: END IF;
6051:
6052: -- Call WIP Mass Load API
6053: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6063: x_returnStatus => x_return_status,
6064: x_errorMsg => x_msg_data );
6065:
6066: If ( ml_error_exists( l_job_header_rec.group_id ) or
6067: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
6068:
6069: FND_MESSAGE.SET_NAME('CSD','CSD_OP_ADD_MASS_LD_FAILURE');
6070: FND_MSG_PUB.ADD;
6071: x_return_status := FND_API.G_RET_STS_ERROR;
6067: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
6068:
6069: FND_MESSAGE.SET_NAME('CSD','CSD_OP_ADD_MASS_LD_FAILURE');
6070: FND_MSG_PUB.ADD;
6071: x_return_status := FND_API.G_RET_STS_ERROR;
6072:
6073: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6074: p_count => x_msg_count,
6075: p_data => x_msg_data);
6069: FND_MESSAGE.SET_NAME('CSD','CSD_OP_ADD_MASS_LD_FAILURE');
6070: FND_MSG_PUB.ADD;
6071: x_return_status := FND_API.G_RET_STS_ERROR;
6072:
6073: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6074: p_count => x_msg_count,
6075: p_data => x_msg_data);
6076:
6077: -- Need to rollback Raise exception -
6075: p_data => x_msg_data);
6076:
6077: -- Need to rollback Raise exception -
6078: -- once commit is removed from above call
6079: -- raise FND_API.G_EXC_ERROR;
6080: RETURN;
6081: end if;
6082:
6083: --bug#12316893
6089: EXCEPTION
6090: WHEN OTHERS THEN
6091: add_wip_interface_errors(l_job_header_rec.group_id,
6092: 1 /* 1 = operations */);
6093: -- raise FND_API.G_EXC_UNEXPECTED_ERROR;
6094:
6095: -- when rollback for WIP works, remove x_return_status, count_and_get,
6096: -- and return then reinstate raise exception above
6097: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6093: -- raise FND_API.G_EXC_UNEXPECTED_ERROR;
6094:
6095: -- when rollback for WIP works, remove x_return_status, count_and_get,
6096: -- and return then reinstate raise exception above
6097: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6098: /*
6099: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6100:
6101: -- Add Unexpected Error to Message List, here SQLERRM is used for
6104: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
6105: p_procedure_name => lc_api_name );
6106: END IF;
6107: */
6108: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6109: p_count => x_msg_count,
6110: p_data => x_msg_data);
6111: return;
6112: END;
6203: ,p_MINIMUM_TRANSFER_QUANTITY => p_op_dtls_tbl(op_ctr).MINIMUM_TRANSFER_QUANTITY
6204: ,p_STANDARD_OPERATION_ID => p_op_dtls_tbl(op_ctr).STANDARD_OPERATION_ID
6205: ,p_OBJECT_VERSION_NUMBER => p_op_dtls_tbl(op_ctr).object_version_number
6206: -- yvchen: bug 13258460 - 12.1.3+ add DFF attributes
6207: ,p_ATTRIBUTE_CATEGORY => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR)
6208: ,p_ATTRIBUTE1 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
6209: ,p_ATTRIBUTE2 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
6210: ,p_ATTRIBUTE3 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
6211: ,p_ATTRIBUTE4 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
6204: ,p_STANDARD_OPERATION_ID => p_op_dtls_tbl(op_ctr).STANDARD_OPERATION_ID
6205: ,p_OBJECT_VERSION_NUMBER => p_op_dtls_tbl(op_ctr).object_version_number
6206: -- yvchen: bug 13258460 - 12.1.3+ add DFF attributes
6207: ,p_ATTRIBUTE_CATEGORY => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR)
6208: ,p_ATTRIBUTE1 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
6209: ,p_ATTRIBUTE2 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
6210: ,p_ATTRIBUTE3 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
6211: ,p_ATTRIBUTE4 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
6212: ,p_ATTRIBUTE5 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
6205: ,p_OBJECT_VERSION_NUMBER => p_op_dtls_tbl(op_ctr).object_version_number
6206: -- yvchen: bug 13258460 - 12.1.3+ add DFF attributes
6207: ,p_ATTRIBUTE_CATEGORY => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR)
6208: ,p_ATTRIBUTE1 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
6209: ,p_ATTRIBUTE2 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
6210: ,p_ATTRIBUTE3 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
6211: ,p_ATTRIBUTE4 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
6212: ,p_ATTRIBUTE5 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
6213: ,p_ATTRIBUTE6 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
6206: -- yvchen: bug 13258460 - 12.1.3+ add DFF attributes
6207: ,p_ATTRIBUTE_CATEGORY => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR)
6208: ,p_ATTRIBUTE1 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
6209: ,p_ATTRIBUTE2 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
6210: ,p_ATTRIBUTE3 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
6211: ,p_ATTRIBUTE4 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
6212: ,p_ATTRIBUTE5 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
6213: ,p_ATTRIBUTE6 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
6214: ,p_ATTRIBUTE7 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
6207: ,p_ATTRIBUTE_CATEGORY => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE_CATEGORY, FND_API.G_MISS_CHAR)
6208: ,p_ATTRIBUTE1 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
6209: ,p_ATTRIBUTE2 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
6210: ,p_ATTRIBUTE3 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
6211: ,p_ATTRIBUTE4 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
6212: ,p_ATTRIBUTE5 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
6213: ,p_ATTRIBUTE6 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
6214: ,p_ATTRIBUTE7 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
6215: ,p_ATTRIBUTE8 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
6208: ,p_ATTRIBUTE1 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE1, FND_API.G_MISS_CHAR)
6209: ,p_ATTRIBUTE2 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
6210: ,p_ATTRIBUTE3 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
6211: ,p_ATTRIBUTE4 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
6212: ,p_ATTRIBUTE5 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
6213: ,p_ATTRIBUTE6 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
6214: ,p_ATTRIBUTE7 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
6215: ,p_ATTRIBUTE8 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
6216: ,p_ATTRIBUTE9 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
6209: ,p_ATTRIBUTE2 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE2, FND_API.G_MISS_CHAR)
6210: ,p_ATTRIBUTE3 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
6211: ,p_ATTRIBUTE4 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
6212: ,p_ATTRIBUTE5 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
6213: ,p_ATTRIBUTE6 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
6214: ,p_ATTRIBUTE7 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
6215: ,p_ATTRIBUTE8 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
6216: ,p_ATTRIBUTE9 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
6217: ,p_ATTRIBUTE10 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
6210: ,p_ATTRIBUTE3 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE3, FND_API.G_MISS_CHAR)
6211: ,p_ATTRIBUTE4 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
6212: ,p_ATTRIBUTE5 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
6213: ,p_ATTRIBUTE6 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
6214: ,p_ATTRIBUTE7 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
6215: ,p_ATTRIBUTE8 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
6216: ,p_ATTRIBUTE9 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
6217: ,p_ATTRIBUTE10 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
6218: ,p_ATTRIBUTE11 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
6211: ,p_ATTRIBUTE4 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE4, FND_API.G_MISS_CHAR)
6212: ,p_ATTRIBUTE5 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
6213: ,p_ATTRIBUTE6 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
6214: ,p_ATTRIBUTE7 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
6215: ,p_ATTRIBUTE8 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
6216: ,p_ATTRIBUTE9 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
6217: ,p_ATTRIBUTE10 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
6218: ,p_ATTRIBUTE11 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
6219: ,p_ATTRIBUTE12 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
6212: ,p_ATTRIBUTE5 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE5, FND_API.G_MISS_CHAR)
6213: ,p_ATTRIBUTE6 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
6214: ,p_ATTRIBUTE7 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
6215: ,p_ATTRIBUTE8 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
6216: ,p_ATTRIBUTE9 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
6217: ,p_ATTRIBUTE10 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
6218: ,p_ATTRIBUTE11 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
6219: ,p_ATTRIBUTE12 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
6220: ,p_ATTRIBUTE13 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
6213: ,p_ATTRIBUTE6 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE6, FND_API.G_MISS_CHAR)
6214: ,p_ATTRIBUTE7 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
6215: ,p_ATTRIBUTE8 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
6216: ,p_ATTRIBUTE9 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
6217: ,p_ATTRIBUTE10 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
6218: ,p_ATTRIBUTE11 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
6219: ,p_ATTRIBUTE12 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
6220: ,p_ATTRIBUTE13 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
6221: ,p_ATTRIBUTE14 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
6214: ,p_ATTRIBUTE7 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE7, FND_API.G_MISS_CHAR)
6215: ,p_ATTRIBUTE8 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
6216: ,p_ATTRIBUTE9 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
6217: ,p_ATTRIBUTE10 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
6218: ,p_ATTRIBUTE11 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
6219: ,p_ATTRIBUTE12 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
6220: ,p_ATTRIBUTE13 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
6221: ,p_ATTRIBUTE14 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
6222: ,p_ATTRIBUTE15 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE15, FND_API.G_MISS_CHAR)
6215: ,p_ATTRIBUTE8 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE8, FND_API.G_MISS_CHAR)
6216: ,p_ATTRIBUTE9 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
6217: ,p_ATTRIBUTE10 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
6218: ,p_ATTRIBUTE11 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
6219: ,p_ATTRIBUTE12 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
6220: ,p_ATTRIBUTE13 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
6221: ,p_ATTRIBUTE14 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
6222: ,p_ATTRIBUTE15 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE15, FND_API.G_MISS_CHAR)
6223: ,p_CREATE_RO_FLAG => NULL --bug#13698799 auto create ro, parent ro
6216: ,p_ATTRIBUTE9 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE9, FND_API.G_MISS_CHAR)
6217: ,p_ATTRIBUTE10 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
6218: ,p_ATTRIBUTE11 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
6219: ,p_ATTRIBUTE12 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
6220: ,p_ATTRIBUTE13 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
6221: ,p_ATTRIBUTE14 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
6222: ,p_ATTRIBUTE15 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE15, FND_API.G_MISS_CHAR)
6223: ,p_CREATE_RO_FLAG => NULL --bug#13698799 auto create ro, parent ro
6224: );
6217: ,p_ATTRIBUTE10 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE10, FND_API.G_MISS_CHAR)
6218: ,p_ATTRIBUTE11 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
6219: ,p_ATTRIBUTE12 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
6220: ,p_ATTRIBUTE13 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
6221: ,p_ATTRIBUTE14 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
6222: ,p_ATTRIBUTE15 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE15, FND_API.G_MISS_CHAR)
6223: ,p_CREATE_RO_FLAG => NULL --bug#13698799 auto create ro, parent ro
6224: );
6225:
6218: ,p_ATTRIBUTE11 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE11, FND_API.G_MISS_CHAR)
6219: ,p_ATTRIBUTE12 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE12, FND_API.G_MISS_CHAR)
6220: ,p_ATTRIBUTE13 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE13, FND_API.G_MISS_CHAR)
6221: ,p_ATTRIBUTE14 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE14, FND_API.G_MISS_CHAR)
6222: ,p_ATTRIBUTE15 => nvl(p_op_dtls_tbl(op_ctr).ATTRIBUTE15, FND_API.G_MISS_CHAR)
6223: ,p_CREATE_RO_FLAG => NULL --bug#13698799 auto create ro, parent ro
6224: );
6225:
6226: end if;
6226: end if;
6227: END LOOP;
6228:
6229: -- Standard check for p_commit
6230: IF FND_API.to_Boolean( p_commit )
6231: THEN
6232: COMMIT WORK;
6233: END IF;
6234:
6232: COMMIT WORK;
6233: END IF;
6234:
6235: EXCEPTION
6236: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6237: ROLLBACK to PROCESS_SAVE_OP_DTLS_PVT ;
6238: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6239:
6240: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6234:
6235: EXCEPTION
6236: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6237: ROLLBACK to PROCESS_SAVE_OP_DTLS_PVT ;
6238: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6239:
6240: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6241: p_count => x_msg_count,
6242: p_data => x_msg_data);
6236: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6237: ROLLBACK to PROCESS_SAVE_OP_DTLS_PVT ;
6238: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6239:
6240: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6241: p_count => x_msg_count,
6242: p_data => x_msg_data);
6243:
6244: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6247: 'G_EXC_UNEXPECTED_ERROR Exception');
6248: END IF;
6249:
6250:
6251: WHEN FND_API.G_EXC_ERROR THEN
6252: ROLLBACK to PROCESS_SAVE_OP_DTLS_PVT ;
6253: x_return_status := FND_API.G_RET_STS_ERROR;
6254:
6255:
6249:
6250:
6251: WHEN FND_API.G_EXC_ERROR THEN
6252: ROLLBACK to PROCESS_SAVE_OP_DTLS_PVT ;
6253: x_return_status := FND_API.G_RET_STS_ERROR;
6254:
6255:
6256: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6257: p_count => x_msg_count,
6252: ROLLBACK to PROCESS_SAVE_OP_DTLS_PVT ;
6253: x_return_status := FND_API.G_RET_STS_ERROR;
6254:
6255:
6256: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6257: p_count => x_msg_count,
6258: p_data => x_msg_data);
6259:
6260: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6264: END IF;
6265:
6266: WHEN OTHERS THEN
6267: ROLLBACK to PROCESS_SAVE_OP_DTLS_PVT ;
6268: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6269:
6270: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
6271:
6272: -- Add Unexpected Error to Message List, here SQLERRM is used for
6275: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
6276: p_procedure_name => lc_api_name );
6277: END IF;
6278:
6279: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6280: p_count => x_msg_count,
6281: p_data => x_msg_data);
6282:
6283: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6416:
6417: -- Standard Start of API savepoint
6418: SAVEPOINT CREATE_WIP_JOB_PVT;
6419: -- Standard call to check for call compatibility.
6420: IF NOT FND_API.Compatible_API_Call
6421: (lc_api_version_number,
6422: p_api_version_number,
6423: lc_api_name,
6424: G_PKG_NAME)
6422: p_api_version_number,
6423: lc_api_name,
6424: G_PKG_NAME)
6425: THEN
6426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6427: END IF;
6428:
6429: -- Initialize message list if p_init_msg_list is set to TRUE
6430: IF FND_API.to_boolean(p_init_msg_list) THEN
6426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6427: END IF;
6428:
6429: -- Initialize message list if p_init_msg_list is set to TRUE
6430: IF FND_API.to_boolean(p_init_msg_list) THEN
6431: FND_MSG_PUB.initialize;
6432: END IF;
6433:
6434: -- Initialize API return status to success
6431: FND_MSG_PUB.initialize;
6432: END IF;
6433:
6434: -- Initialize API return status to success
6435: x_return_status:=FND_API.G_RET_STS_SUCCESS;
6436:
6437:
6438: l_job_header_rec.organization_id :=
6439: fnd_profile.value('CSD_DEF_REP_INV_ORG');
6443: IF l_job_header_rec.organization_id is NULL THEN
6444:
6445: FND_MESSAGE.SET_NAME('CSD','CSD_DEF_REP_INV_NULL');
6446: FND_MSG_PUB.ADD;
6447: RAISE FND_API.G_EXC_ERROR;
6448: end if;
6449:
6450:
6451: l_job_prefix := fnd_profile.value('CSD_DEFAULT_JOB_PREFIX');
6457: IF l_job_prefix is NULL THEN
6458:
6459: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_PREFIX_NULL');
6460: FND_MSG_PUB.ADD;
6461: RAISE FND_API.G_EXC_ERROR;
6462: end if;
6463:
6464:
6465: --bug#13472453
6479: IF l_job_header_rec.class_code is NULL THEN
6480:
6481: FND_MESSAGE.SET_NAME('CSD','CSD_CLASS_CODE_NULL');
6482: FND_MSG_PUB.ADD;
6483: RAISE FND_API.G_EXC_ERROR;
6484: end if;
6485:
6486:
6487:
6558: x_return_status =>
6559: x_return_status );
6560:
6561:
6562: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6563: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6564: END IF;
6565:
6566:
6559: x_return_status );
6560:
6561:
6562: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6563: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6564: END IF;
6565:
6566:
6567: -- CALL WIP API to process records in wip interface table,
6593:
6594: -- dbms_output.put_line('After calling createonejob');
6595:
6596: If ( ml_error_exists( l_job_header_rec.group_id ) or
6597: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
6598:
6599: -- ROLLBACK to CREATE_WIP_JOB_PVT ;
6600:
6601:
6600:
6601:
6602: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_CREAT_FAILURE');
6603: FND_MSG_PUB.ADD;
6604: RAISE FND_API.G_EXC_ERROR;
6605:
6606: -- Need to rollback Raise exception -
6607: -- once commit is removed from above call
6608:
6616:
6617:
6618: CSD_WARRANTY_CONTRACT_PVT.Default_Warranty_Contract(
6619: P_Api_Version_Number => 1.0,
6620: P_Init_Msg_List => FND_API.G_FALSE,
6621: p_commit => FND_API.G_TRUE,
6622: p_validation_level => fnd_api.g_valid_level_none,
6623: P_Repair_Line_Id => p_repair_line_id,
6624: P_Wip_Entity_Id => l_wip_entity_id,
6617:
6618: CSD_WARRANTY_CONTRACT_PVT.Default_Warranty_Contract(
6619: P_Api_Version_Number => 1.0,
6620: P_Init_Msg_List => FND_API.G_FALSE,
6621: p_commit => FND_API.G_TRUE,
6622: p_validation_level => fnd_api.g_valid_level_none,
6623: P_Repair_Line_Id => p_repair_line_id,
6624: P_Wip_Entity_Id => l_wip_entity_id,
6625: X_Return_Status => x_return_status,
6618: CSD_WARRANTY_CONTRACT_PVT.Default_Warranty_Contract(
6619: P_Api_Version_Number => 1.0,
6620: P_Init_Msg_List => FND_API.G_FALSE,
6621: p_commit => FND_API.G_TRUE,
6622: p_validation_level => fnd_api.g_valid_level_none,
6623: P_Repair_Line_Id => p_repair_line_id,
6624: P_Wip_Entity_Id => l_wip_entity_id,
6625: X_Return_Status => x_return_status,
6626: X_Msg_Count => x_msg_count,
6625: X_Return_Status => x_return_status,
6626: X_Msg_Count => x_msg_count,
6627: X_Msg_Data => x_msg_data
6628: );
6629: IF NOT (x_return_status = Fnd_Api.G_RET_STS_SUCCESS)
6630: THEN
6631: RAISE Fnd_Api.G_EXC_ERROR;
6632: END IF;
6633:
6627: X_Msg_Data => x_msg_data
6628: );
6629: IF NOT (x_return_status = Fnd_Api.G_RET_STS_SUCCESS)
6630: THEN
6631: RAISE Fnd_Api.G_EXC_ERROR;
6632: END IF;
6633:
6634:
6635:
6728: x_return_status => l_return_status,
6729: x_msg_count => l_msg_count,
6730: x_msg_data => l_msg_data
6731: );
6732: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
6733: FND_MESSAGE.SET_NAME('CSD','CSD_DEF_REASON_CODE_FAILURE');
6734: FND_MSG_PUB.ADD;
6735: RAISE FND_API.G_EXC_ERROR;
6736: END IF;
6731: );
6732: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
6733: FND_MESSAGE.SET_NAME('CSD','CSD_DEF_REASON_CODE_FAILURE');
6734: FND_MSG_PUB.ADD;
6735: RAISE FND_API.G_EXC_ERROR;
6736: END IF;
6737: if (l_default_rule_id is not null) then
6738: l_mtl_txn_dtls_tbl(0).REASON_ID := l_default_reason_id;
6739: l_rule_input_rec.WIP_MTL_DISP_CODE_ID := l_default_reason_id; -- bug#14155233 default service warranty
6754: x_return_status => l_return_status,
6755: x_msg_count => l_msg_count,
6756: x_msg_data => l_msg_data
6757: );
6758: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
6759: FND_MESSAGE.SET_NAME('CSD','CSD_DEF_CREATE_RO_FLAG_FAILURE');
6760: FND_MSG_PUB.ADD;
6761: RAISE FND_API.G_EXC_ERROR;
6762: END IF;
6757: );
6758: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
6759: FND_MESSAGE.SET_NAME('CSD','CSD_DEF_CREATE_RO_FLAG_FAILURE');
6760: FND_MSG_PUB.ADD;
6761: RAISE FND_API.G_EXC_ERROR;
6762: END IF;
6763: if (l_default_rule_id is not null) then
6764: if l_default_create_ro_flag = 'Y' then
6765: l_mtl_txn_dtls_tbl(0).CREATE_RO_FLAG := fnd_api.g_true;
6761: RAISE FND_API.G_EXC_ERROR;
6762: END IF;
6763: if (l_default_rule_id is not null) then
6764: if l_default_create_ro_flag = 'Y' then
6765: l_mtl_txn_dtls_tbl(0).CREATE_RO_FLAG := fnd_api.g_true;
6766: else
6767: l_mtl_txn_dtls_tbl(0).CREATE_RO_FLAG := fnd_api.g_false;
6768: end if;
6769: end if;
6763: if (l_default_rule_id is not null) then
6764: if l_default_create_ro_flag = 'Y' then
6765: l_mtl_txn_dtls_tbl(0).CREATE_RO_FLAG := fnd_api.g_true;
6766: else
6767: l_mtl_txn_dtls_tbl(0).CREATE_RO_FLAG := fnd_api.g_false;
6768: end if;
6769: end if;
6770:
6771: end if;
6783: x_op_created => l_op_created,
6784: x_return_status => x_return_status,
6785: x_msg_count => x_msg_count,
6786: x_msg_data => x_msg_data);
6787: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
6788: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_GEN_FAILURE');
6789: FND_MSG_PUB.ADD;
6790: RAISE FND_API.G_EXC_ERROR;
6791: END IF;
6786: x_msg_data => x_msg_data);
6787: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
6788: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_GEN_FAILURE');
6789: FND_MSG_PUB.ADD;
6790: RAISE FND_API.G_EXC_ERROR;
6791: END IF;
6792:
6793:
6794: /* IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6790: RAISE FND_API.G_EXC_ERROR;
6791: END IF;
6792:
6793:
6794: /* IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6795: ROLLBACK to CREATE_WIP_JOB_PVT ;
6796:
6797:
6798: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_CREAT_FAILURE');
6796:
6797:
6798: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_CREAT_FAILURE');
6799: FND_MSG_PUB.ADD;
6800: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; */
6801:
6802:
6803: -- dbms_output.put_line('In Error');
6804:
6827:
6828:
6829: csd_to_form_repair_job_xref.validate_and_write(
6830: p_api_version_number => lc_api_version_number,
6831: p_init_msg_list => FND_API.G_FALSE,
6832: p_commit => FND_API.G_FALSE,
6833: p_validation_level => NULL,
6834: p_action_code => 0,
6835: px_repair_job_xref_id => l_repair_xref_id,
6828:
6829: csd_to_form_repair_job_xref.validate_and_write(
6830: p_api_version_number => lc_api_version_number,
6831: p_init_msg_list => FND_API.G_FALSE,
6832: p_commit => FND_API.G_FALSE,
6833: p_validation_level => NULL,
6834: p_action_code => 0,
6835: px_repair_job_xref_id => l_repair_xref_id,
6836: p_created_by => l_user_id,
6871: x_msg_count => x_msg_count,
6872: x_msg_data => x_msg_data);
6873:
6874:
6875: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6876: ROLLBACK to CREATE_WIP_JOB_PVT ;
6877:
6878: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6879: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6895:
6896:
6897: csd_to_form_repair_history.validate_and_write(
6898: p_api_version_number => lc_api_version_number,
6899: p_init_msg_list => FND_API.G_FALSE,
6900: p_commit => FND_API.G_FALSE,
6901: p_validation_level => NULL,
6902: p_action_code => 0,
6903: px_repair_history_id => l_rep_hist_id,
6896:
6897: csd_to_form_repair_history.validate_and_write(
6898: p_api_version_number => lc_api_version_number,
6899: p_init_msg_list => FND_API.G_FALSE,
6900: p_commit => FND_API.G_FALSE,
6901: p_validation_level => NULL,
6902: p_action_code => 0,
6903: px_repair_history_id => l_rep_hist_id,
6904: p_OBJECT_VERSION_NUMBER => NULL,
6963: x_return_status => x_return_status,
6964: x_msg_count => x_msg_count,
6965: x_msg_data => x_msg_data);
6966:
6967: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
6968: ROLLBACK to CREATE_WIP_JOB_PVT ;
6969:
6970: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6971: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
6977:
6978: END IF;
6979:
6980: -- Standard check for p_commit
6981: IF FND_API.to_Boolean( p_commit )
6982: THEN
6983: COMMIT WORK;
6984: END IF;
6985:
6984: END IF;
6985:
6986:
6987: EXCEPTION
6988: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6989: ROLLBACK to CREATE_WIP_JOB_PVT ;
6990: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6991:
6992: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6986:
6987: EXCEPTION
6988: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6989: ROLLBACK to CREATE_WIP_JOB_PVT ;
6990: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6991:
6992: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6993: p_count => x_msg_count,
6994: p_data => x_msg_data);
6988: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6989: ROLLBACK to CREATE_WIP_JOB_PVT ;
6990: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6991:
6992: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
6993: p_count => x_msg_count,
6994: p_data => x_msg_data);
6995:
6996: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
6999: 'G_EXC_UNEXPECTED_ERROR Exception');
7000: END IF;
7001:
7002:
7003: WHEN FND_API.G_EXC_ERROR THEN
7004: ROLLBACK to CREATE_WIP_JOB_PVT ;
7005: x_return_status := FND_API.G_RET_STS_ERROR;
7006:
7007:
7001:
7002:
7003: WHEN FND_API.G_EXC_ERROR THEN
7004: ROLLBACK to CREATE_WIP_JOB_PVT ;
7005: x_return_status := FND_API.G_RET_STS_ERROR;
7006:
7007:
7008: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
7009: p_count => x_msg_count,
7004: ROLLBACK to CREATE_WIP_JOB_PVT ;
7005: x_return_status := FND_API.G_RET_STS_ERROR;
7006:
7007:
7008: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
7009: p_count => x_msg_count,
7010: p_data => x_msg_data);
7011:
7012: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7016: END IF;
7017:
7018: WHEN OTHERS THEN
7019: ROLLBACK to CREATE_WIP_JOB_PVT ;
7020: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7021:
7022: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7023:
7024: -- Add Unexpected Error to Message List, here SQLERRM is used for
7027: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
7028: p_procedure_name => lc_api_name );
7029: END IF;
7030:
7031: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
7032: p_count => x_msg_count,
7033: p_data => x_msg_data);
7034:
7035: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7219:
7220: -- Standard Start of API savepoint
7221: SAVEPOINT GENERATE_WIP_JOBS_FROM_SCS_PVT;
7222: -- Standard call to check for call compatibility.
7223: IF NOT FND_API.Compatible_API_Call
7224: (lc_api_version_number,
7225: p_api_version_number,
7226: lc_api_name,
7227: G_PKG_NAME)
7225: p_api_version_number,
7226: lc_api_name,
7227: G_PKG_NAME)
7228: THEN
7229: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7230: END IF;
7231:
7232: -- Initialize message list if p_init_msg_list is set to TRUE
7233: IF FND_API.to_boolean(p_init_msg_list) THEN
7229: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7230: END IF;
7231:
7232: -- Initialize message list if p_init_msg_list is set to TRUE
7233: IF FND_API.to_boolean(p_init_msg_list) THEN
7234: FND_MSG_PUB.initialize;
7235: END IF;
7236:
7237: -- Initialize API return status to success
7234: FND_MSG_PUB.initialize;
7235: END IF;
7236:
7237: -- Initialize API return status to success
7238: x_return_status:=FND_API.G_RET_STS_SUCCESS;
7239:
7240: l_job_header_rec.organization_id :=
7241: fnd_profile.value('CSD_DEF_REP_INV_ORG');
7242:
7244: IF l_job_header_rec.organization_id is NULL THEN
7245:
7246: FND_MESSAGE.SET_NAME('CSD','CSD_DEF_REP_INV_NULL');
7247: FND_MSG_PUB.ADD;
7248: RAISE FND_API.G_EXC_ERROR;
7249: END IF;
7250:
7251: l_job_prefix := fnd_profile.value('CSD_DEFAULT_JOB_PREFIX');
7252:
7253: -- If l_job_prefix is null, throw an error and return;
7254: IF l_job_prefix is NULL THEN
7255: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_PREFIX_NULL');
7256: FND_MSG_PUB.ADD;
7257: RAISE FND_API.G_EXC_ERROR;
7258: END IF;
7259:
7260: l_job_header_rec.class_code :=
7261: fnd_profile.value('CSD_DEF_WIP_ACCOUNTING_CLASS');
7262:
7263: IF l_job_header_rec.class_code is NULL THEN
7264: FND_MESSAGE.SET_NAME('CSD','CSD_CLASS_CODE_NULL');
7265: FND_MSG_PUB.ADD;
7266: RAISE FND_API.G_EXC_ERROR;
7267: END IF;
7268:
7269: -- Populate the Job Header Record
7270:
7367:
7368: -- dbms_output.put_line('After insert_job_header');
7369:
7370:
7371: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7372: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7373: END IF;
7374:
7375: -- CALL WIP API to process records in wip interface table,
7368: -- dbms_output.put_line('After insert_job_header');
7369:
7370:
7371: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7372: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7373: END IF;
7374:
7375: -- CALL WIP API to process records in wip interface table,
7376: -- If API fails, Raise error, rollback and return
7399: --bug#13472453
7400:
7401:
7402: If ( ml_error_exists( l_job_header_rec.group_id ) or
7403: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
7404:
7405: -- ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7406:
7407:
7406:
7407:
7408: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_GEN_FAILURE');
7409: FND_MSG_PUB.ADD;
7410: RAISE FND_API.G_EXC_ERROR;
7411:
7412: -- Need to rollback Raise exception -
7413: -- once commit is removed from above call
7414:
7421:
7422:
7423: CSD_WARRANTY_CONTRACT_PVT.Default_Warranty_Contract(
7424: P_Api_Version_Number => 1.0,
7425: P_Init_Msg_List => FND_API.G_FALSE,
7426: p_commit => FND_API.G_TRUE,
7427: p_validation_level => fnd_api.g_valid_level_none,
7428: P_Repair_Line_Id => p_repair_line_id,
7429: P_Wip_Entity_Id => l_wip_entity_id,
7422:
7423: CSD_WARRANTY_CONTRACT_PVT.Default_Warranty_Contract(
7424: P_Api_Version_Number => 1.0,
7425: P_Init_Msg_List => FND_API.G_FALSE,
7426: p_commit => FND_API.G_TRUE,
7427: p_validation_level => fnd_api.g_valid_level_none,
7428: P_Repair_Line_Id => p_repair_line_id,
7429: P_Wip_Entity_Id => l_wip_entity_id,
7430: X_Return_Status => x_return_status,
7423: CSD_WARRANTY_CONTRACT_PVT.Default_Warranty_Contract(
7424: P_Api_Version_Number => 1.0,
7425: P_Init_Msg_List => FND_API.G_FALSE,
7426: p_commit => FND_API.G_TRUE,
7427: p_validation_level => fnd_api.g_valid_level_none,
7428: P_Repair_Line_Id => p_repair_line_id,
7429: P_Wip_Entity_Id => l_wip_entity_id,
7430: X_Return_Status => x_return_status,
7431: X_Msg_Count => x_msg_count,
7430: X_Return_Status => x_return_status,
7431: X_Msg_Count => x_msg_count,
7432: X_Msg_Data => x_msg_data
7433: );
7434: IF NOT (x_return_status = Fnd_Api.G_RET_STS_SUCCESS)
7435: THEN
7436: RAISE Fnd_Api.G_EXC_ERROR;
7437: END IF;
7438:
7432: X_Msg_Data => x_msg_data
7433: );
7434: IF NOT (x_return_status = Fnd_Api.G_RET_STS_SUCCESS)
7435: THEN
7436: RAISE Fnd_Api.G_EXC_ERROR;
7437: END IF;
7438:
7439:
7440: /***************************************************************************
7471: x_return_status => l_return_status,
7472: x_msg_count => l_msg_count,
7473: x_msg_data => l_msg_data
7474: );
7475: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
7476: FND_MESSAGE.SET_NAME('CSD','CSD_DEF_REASON_CODE_FAILURE');
7477: FND_MSG_PUB.ADD;
7478: RAISE FND_API.G_EXC_ERROR;
7479: END IF;
7474: );
7475: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
7476: FND_MESSAGE.SET_NAME('CSD','CSD_DEF_REASON_CODE_FAILURE');
7477: FND_MSG_PUB.ADD;
7478: RAISE FND_API.G_EXC_ERROR;
7479: END IF;
7480:
7481: if (l_default_rule_id is not null) then
7482: l_mtl_txn_dtls_tbl(i).REASON_ID := l_default_reason_id;
7497: x_return_status => l_return_status,
7498: x_msg_count => l_msg_count,
7499: x_msg_data => l_msg_data
7500: );
7501: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
7502: FND_MESSAGE.SET_NAME('CSD','CSD_DEF_CREATE_RO_FLAG_FAILURE');
7503: FND_MSG_PUB.ADD;
7504: RAISE FND_API.G_EXC_ERROR;
7505: END IF;
7500: );
7501: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
7502: FND_MESSAGE.SET_NAME('CSD','CSD_DEF_CREATE_RO_FLAG_FAILURE');
7503: FND_MSG_PUB.ADD;
7504: RAISE FND_API.G_EXC_ERROR;
7505: END IF;
7506: if (l_default_rule_id is not null) then
7507: if l_default_create_ro_flag = 'Y' then
7508: l_mtl_txn_dtls_tbl(i).CREATE_RO_FLAG := fnd_api.g_true;
7504: RAISE FND_API.G_EXC_ERROR;
7505: END IF;
7506: if (l_default_rule_id is not null) then
7507: if l_default_create_ro_flag = 'Y' then
7508: l_mtl_txn_dtls_tbl(i).CREATE_RO_FLAG := fnd_api.g_true;
7509: else
7510: l_mtl_txn_dtls_tbl(i).CREATE_RO_FLAG := fnd_api.g_false;
7511: end if;
7512: end if;
7506: if (l_default_rule_id is not null) then
7507: if l_default_create_ro_flag = 'Y' then
7508: l_mtl_txn_dtls_tbl(i).CREATE_RO_FLAG := fnd_api.g_true;
7509: else
7510: l_mtl_txn_dtls_tbl(i).CREATE_RO_FLAG := fnd_api.g_false;
7511: end if;
7512: end if;
7513:
7514: -- increment the counter
7619: x_return_status => l_return_status,
7620: x_msg_count => l_msg_count,
7621: x_msg_data => l_msg_data
7622: );
7623: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
7624: FND_MESSAGE.SET_NAME('CSD','CSD_DEF_REASON_CODE_FAILURE');
7625: FND_MSG_PUB.ADD;
7626: RAISE FND_API.G_EXC_ERROR;
7627: END IF;
7622: );
7623: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
7624: FND_MESSAGE.SET_NAME('CSD','CSD_DEF_REASON_CODE_FAILURE');
7625: FND_MSG_PUB.ADD;
7626: RAISE FND_API.G_EXC_ERROR;
7627: END IF;
7628: if (l_default_rule_id is not null) then
7629: l_mtl_txn_dtls_tbl(i).REASON_ID := l_default_reason_id;
7630: l_rule_input_rec.WIP_MTL_DISP_CODE_ID := l_default_reason_id; -- bug#14155233 default service warranty
7644: x_return_status => l_return_status,
7645: x_msg_count => l_msg_count,
7646: x_msg_data => l_msg_data
7647: );
7648: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
7649: FND_MESSAGE.SET_NAME('CSD','CSD_DEF_CREATE_RO_FLAG_FAILURE');
7650: FND_MSG_PUB.ADD;
7651: RAISE FND_API.G_EXC_ERROR;
7652: END IF;
7647: );
7648: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
7649: FND_MESSAGE.SET_NAME('CSD','CSD_DEF_CREATE_RO_FLAG_FAILURE');
7650: FND_MSG_PUB.ADD;
7651: RAISE FND_API.G_EXC_ERROR;
7652: END IF;
7653: if (l_default_rule_id is not null) then
7654: if l_default_create_ro_flag = 'Y' then
7655: l_mtl_txn_dtls_tbl(i).CREATE_RO_FLAG := fnd_api.g_true;
7651: RAISE FND_API.G_EXC_ERROR;
7652: END IF;
7653: if (l_default_rule_id is not null) then
7654: if l_default_create_ro_flag = 'Y' then
7655: l_mtl_txn_dtls_tbl(i).CREATE_RO_FLAG := fnd_api.g_true;
7656: else
7657: l_mtl_txn_dtls_tbl(i).CREATE_RO_FLAG := fnd_api.g_false;
7658: end if;
7659: end if;
7653: if (l_default_rule_id is not null) then
7654: if l_default_create_ro_flag = 'Y' then
7655: l_mtl_txn_dtls_tbl(i).CREATE_RO_FLAG := fnd_api.g_true;
7656: else
7657: l_mtl_txn_dtls_tbl(i).CREATE_RO_FLAG := fnd_api.g_false;
7658: end if;
7659: end if;
7660:
7661: end if;
7674: x_op_created => l_op_created,
7675: x_return_status => x_return_status,
7676: x_msg_count => x_msg_count,
7677: x_msg_data => x_msg_data);
7678: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
7679: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_GEN_FAILURE');
7680: FND_MSG_PUB.ADD;
7681: RAISE FND_API.G_EXC_ERROR;
7682: END IF;
7677: x_msg_data => x_msg_data);
7678: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
7679: FND_MESSAGE.SET_NAME('CSD','CSD_JOB_GEN_FAILURE');
7680: FND_MSG_PUB.ADD;
7681: RAISE FND_API.G_EXC_ERROR;
7682: END IF;
7683: End if;
7684:
7685: -- dbms_output.put_line('After createOneJob');
7696: END IF;
7697:
7698: csd_to_form_repair_job_xref.validate_and_write(
7699: p_api_version_number => lc_api_version_number,
7700: p_init_msg_list => FND_API.G_FALSE,
7701: p_commit => FND_API.G_FALSE,
7702: p_validation_level => NULL,
7703: p_action_code => 0,
7704: px_repair_job_xref_id => l_repair_xref_id,
7697:
7698: csd_to_form_repair_job_xref.validate_and_write(
7699: p_api_version_number => lc_api_version_number,
7700: p_init_msg_list => FND_API.G_FALSE,
7701: p_commit => FND_API.G_FALSE,
7702: p_validation_level => NULL,
7703: p_action_code => 0,
7704: px_repair_job_xref_id => l_repair_xref_id,
7705: p_created_by => l_user_id,
7742:
7743: -- dbms_output.put_line('After call to csd_to_form_repair_job_xref.validate_and_write');
7744:
7745:
7746: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7747: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7748: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7749: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
7750: lc_mod_name||'exc_exception',
7760: END IF;
7761:
7762: csd_to_form_repair_history.validate_and_write(
7763: p_api_version_number => lc_api_version_number,
7764: p_init_msg_list => FND_API.G_FALSE,
7765: p_commit => FND_API.G_FALSE,
7766: p_validation_level => NULL,
7767: p_action_code => 0,
7768: px_repair_history_id => l_rep_hist_id,
7761:
7762: csd_to_form_repair_history.validate_and_write(
7763: p_api_version_number => lc_api_version_number,
7764: p_init_msg_list => FND_API.G_FALSE,
7765: p_commit => FND_API.G_FALSE,
7766: p_validation_level => NULL,
7767: p_action_code => 0,
7768: px_repair_history_id => l_rep_hist_id,
7769: p_OBJECT_VERSION_NUMBER => NULL,
7830: x_msg_data => x_msg_data);
7831:
7832: -- dbms_output.put_line('after call to csd_to_form_repair_history.validate_and_write');
7833:
7834: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7835: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7836: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7837: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
7838: lc_mod_name||'exc_exception',
7872:
7873:
7874: CSD_RO_SERVICE_CODES_PVT.Update_RO_Service_Code(
7875: p_api_version => lc_api_version_number,
7876: p_commit => FND_API.G_FALSE,
7877: p_init_msg_list => FND_API.G_FALSE,
7878: p_validation_level => 100,
7879: p_ro_service_code_rec => l_ro_service_code_rec,
7880: x_obj_ver_number => l_object_version_number,
7873:
7874: CSD_RO_SERVICE_CODES_PVT.Update_RO_Service_Code(
7875: p_api_version => lc_api_version_number,
7876: p_commit => FND_API.G_FALSE,
7877: p_init_msg_list => FND_API.G_FALSE,
7878: p_validation_level => 100,
7879: p_ro_service_code_rec => l_ro_service_code_rec,
7880: x_obj_ver_number => l_object_version_number,
7881: x_return_status => x_return_status,
7883: x_msg_data => x_msg_data ) ;
7884:
7885:
7886: -- dbms_output.put_line('after call to CSD_RO_SERVICE_CODES_PVT.Update_RO_Service_Code');
7887: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
7888: -- dbms_output.put_line('inside return status CSD_RO_SERVICE_CODES_PVT.Update_RO_Service_Code');
7889: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7890: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7891: FND_LOG.STRING( FND_LOG.LEVEL_ERROR,
7900: -- swai: bug 5239301
7901: -- if there are messages to show, then set the return status in order
7902: -- to flag this, but do not rollback.
7903: if l_show_messages_flag = 'T' then
7904: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7905: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
7906: p_count => x_msg_count,
7907: p_data => x_msg_data);
7908: end if;
7901: -- if there are messages to show, then set the return status in order
7902: -- to flag this, but do not rollback.
7903: if l_show_messages_flag = 'T' then
7904: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7905: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
7906: p_count => x_msg_count,
7907: p_data => x_msg_data);
7908: end if;
7909: -- swai: end bug 5239301
7908: end if;
7909: -- swai: end bug 5239301
7910:
7911: -- Standard check for p_commit
7912: IF FND_API.to_Boolean( p_commit )
7913: THEN
7914: COMMIT WORK;
7915: END IF;
7916:
7915: END IF;
7916:
7917:
7918: EXCEPTION
7919: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7920: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7921: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7922:
7923: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
7917:
7918: EXCEPTION
7919: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7920: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7921: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7922:
7923: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
7924: p_count => x_msg_count,
7925: p_data => x_msg_data);
7919: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7920: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7921: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7922:
7923: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
7924: p_count => x_msg_count,
7925: p_data => x_msg_data);
7926:
7927: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7930: 'G_EXC_UNEXPECTED_ERROR Exception');
7931: END IF;
7932:
7933:
7934: WHEN FND_API.G_EXC_ERROR THEN
7935: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7936: x_return_status := FND_API.G_RET_STS_ERROR;
7937:
7938:
7932:
7933:
7934: WHEN FND_API.G_EXC_ERROR THEN
7935: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7936: x_return_status := FND_API.G_RET_STS_ERROR;
7937:
7938:
7939: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
7940: p_count => x_msg_count,
7935: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7936: x_return_status := FND_API.G_RET_STS_ERROR;
7937:
7938:
7939: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
7940: p_count => x_msg_count,
7941: p_data => x_msg_data);
7942:
7943: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
7947: END IF;
7948:
7949: WHEN OTHERS THEN
7950: ROLLBACK to GENERATE_WIP_JOBS_FROM_SCS_PVT ;
7951: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7952:
7953: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7954:
7955: -- Add Unexpected Error to Message List, here SQLERRM is used for
7958: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
7959: p_procedure_name => lc_api_name );
7960: END IF;
7961:
7962: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
7963: p_count => x_msg_count,
7964: p_data => x_msg_data);
7965:
7966: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8096:
8097: SAVEPOINT PROCESS_AUTO_ISSUE_MTL_TXN_PVT;
8098:
8099: -- Standard call to check for call compatibility.
8100: IF NOT FND_API.Compatible_API_Call (lc_api_version_number,
8101: p_api_version_number,
8102: lc_api_name,
8103: G_PKG_NAME)
8104: THEN
8101: p_api_version_number,
8102: lc_api_name,
8103: G_PKG_NAME)
8104: THEN
8105: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8106: END IF;
8107:
8108:
8109: IF FND_API.to_boolean(p_init_msg_list) THEN
8105: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8106: END IF;
8107:
8108:
8109: IF FND_API.to_boolean(p_init_msg_list) THEN
8110: FND_MSG_PUB.initialize;
8111: END IF;
8112:
8113: x_return_status := FND_API.G_RET_STS_SUCCESS;
8109: IF FND_API.to_boolean(p_init_msg_list) THEN
8110: FND_MSG_PUB.initialize;
8111: END IF;
8112:
8113: x_return_status := FND_API.G_RET_STS_SUCCESS;
8114:
8115: open get_wip_operation_mtls(p_wip_entity_id, p_operation_seq_num);
8116: fetch get_wip_operation_mtls bulk collect into l_mtl_txn_dtls_tbl;
8117: close get_wip_operation_mtls;
8129: );
8130: end if;
8131:
8132: -- Standard check for p_commit
8133: IF FND_API.to_Boolean( p_commit )
8134: THEN
8135: COMMIT WORK;
8136: END IF;
8137:
8136: END IF;
8137:
8138:
8139: EXCEPTION
8140: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8141: ROLLBACK to PROCESS_AUTO_ISSUE_MTL_TXN_PVT ;
8142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8143:
8144: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8138:
8139: EXCEPTION
8140: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8141: ROLLBACK to PROCESS_AUTO_ISSUE_MTL_TXN_PVT ;
8142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8143:
8144: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8145: p_count => x_msg_count,
8146: p_data => x_msg_data);
8140: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8141: ROLLBACK to PROCESS_AUTO_ISSUE_MTL_TXN_PVT ;
8142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8143:
8144: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8145: p_count => x_msg_count,
8146: p_data => x_msg_data);
8147:
8148: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8151: 'G_EXC_UNEXPECTED_ERROR Exception');
8152: END IF;
8153:
8154:
8155: WHEN FND_API.G_EXC_ERROR THEN
8156: ROLLBACK to PROCESS_AUTO_ISSUE_MTL_TXN_PVT ;
8157: x_return_status := FND_API.G_RET_STS_ERROR;
8158:
8159:
8153:
8154:
8155: WHEN FND_API.G_EXC_ERROR THEN
8156: ROLLBACK to PROCESS_AUTO_ISSUE_MTL_TXN_PVT ;
8157: x_return_status := FND_API.G_RET_STS_ERROR;
8158:
8159:
8160: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8161: p_count => x_msg_count,
8156: ROLLBACK to PROCESS_AUTO_ISSUE_MTL_TXN_PVT ;
8157: x_return_status := FND_API.G_RET_STS_ERROR;
8158:
8159:
8160: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8161: p_count => x_msg_count,
8162: p_data => x_msg_data);
8163:
8164: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8168: END IF;
8169:
8170: WHEN OTHERS THEN
8171: ROLLBACK to PROCESS_AUTO_ISSUE_MTL_TXN_PVT ;
8172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8173:
8174: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8175:
8176: -- Add Unexpected Error to Message List, here SQLERRM is used for
8179: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
8180: p_procedure_name => lc_api_name );
8181: END IF;
8182:
8183: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8184: p_count => x_msg_count,
8185: p_data => x_msg_data);
8186:
8187: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8318:
8319: SAVEPOINT PROCESS_AUTO_TRANS_RES_TXN_PVT;
8320:
8321: -- Standard call to check for call compatibility.
8322: IF NOT FND_API.Compatible_API_Call (lc_api_version_number,
8323: p_api_version_number,
8324: lc_api_name,
8325: G_PKG_NAME)
8326: THEN
8323: p_api_version_number,
8324: lc_api_name,
8325: G_PKG_NAME)
8326: THEN
8327: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8328: END IF;
8329:
8330:
8331: IF FND_API.to_boolean(p_init_msg_list) THEN
8327: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8328: END IF;
8329:
8330:
8331: IF FND_API.to_boolean(p_init_msg_list) THEN
8332: FND_MSG_PUB.initialize;
8333: END IF;
8334:
8335: x_return_status := FND_API.G_RET_STS_SUCCESS;
8331: IF FND_API.to_boolean(p_init_msg_list) THEN
8332: FND_MSG_PUB.initialize;
8333: END IF;
8334:
8335: x_return_status := FND_API.G_RET_STS_SUCCESS;
8336:
8337: open get_wip_operation_res(p_wip_entity_id, p_operation_seq_num);
8338: fetch get_wip_operation_res bulk collect into l_res_txn_dtls_tbl;
8339: close get_wip_operation_res;
8350: );
8351: end if;
8352:
8353: -- Standard check for p_commit
8354: IF FND_API.to_Boolean( p_commit )
8355: THEN
8356: COMMIT WORK;
8357: END IF;
8358:
8357: END IF;
8358:
8359:
8360: EXCEPTION
8361: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8362: ROLLBACK to PROCESS_AUTO_TRANS_RES_TXN_PVT ;
8363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8364:
8365: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8359:
8360: EXCEPTION
8361: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8362: ROLLBACK to PROCESS_AUTO_TRANS_RES_TXN_PVT ;
8363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8364:
8365: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8366: p_count => x_msg_count,
8367: p_data => x_msg_data);
8361: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8362: ROLLBACK to PROCESS_AUTO_TRANS_RES_TXN_PVT ;
8363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8364:
8365: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8366: p_count => x_msg_count,
8367: p_data => x_msg_data);
8368:
8369: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8372: 'G_EXC_UNEXPECTED_ERROR Exception');
8373: END IF;
8374:
8375:
8376: WHEN FND_API.G_EXC_ERROR THEN
8377: ROLLBACK to PROCESS_AUTO_TRANS_RES_TXN_PVT ;
8378: x_return_status := FND_API.G_RET_STS_ERROR;
8379:
8380:
8374:
8375:
8376: WHEN FND_API.G_EXC_ERROR THEN
8377: ROLLBACK to PROCESS_AUTO_TRANS_RES_TXN_PVT ;
8378: x_return_status := FND_API.G_RET_STS_ERROR;
8379:
8380:
8381: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8382: p_count => x_msg_count,
8377: ROLLBACK to PROCESS_AUTO_TRANS_RES_TXN_PVT ;
8378: x_return_status := FND_API.G_RET_STS_ERROR;
8379:
8380:
8381: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8382: p_count => x_msg_count,
8383: p_data => x_msg_data);
8384:
8385: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8389: END IF;
8390:
8391: WHEN OTHERS THEN
8392: ROLLBACK to PROCESS_AUTO_TRANS_RES_TXN_PVT ;
8393: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8394:
8395: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8396:
8397: -- Add Unexpected Error to Message List, here SQLERRM is used for
8400: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
8401: p_procedure_name => lc_api_name );
8402: END IF;
8403:
8404: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8405: p_count => x_msg_count,
8406: p_data => x_msg_data);
8407:
8408: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8493:
8494: SAVEPOINT PROCESS_AUTO_OPER_COMP_TXN_PVT;
8495:
8496: -- Standard call to check for call compatibility.
8497: IF NOT FND_API.Compatible_API_Call (lc_api_version_number,
8498: p_api_version_number,
8499: lc_api_name,
8500: G_PKG_NAME)
8501: THEN
8498: p_api_version_number,
8499: lc_api_name,
8500: G_PKG_NAME)
8501: THEN
8502: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8503: END IF;
8504:
8505:
8506: IF FND_API.to_boolean(p_init_msg_list) THEN
8502: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8503: END IF;
8504:
8505:
8506: IF FND_API.to_boolean(p_init_msg_list) THEN
8507: FND_MSG_PUB.initialize;
8508: END IF;
8509:
8510: x_return_status := FND_API.G_RET_STS_SUCCESS;
8506: IF FND_API.to_boolean(p_init_msg_list) THEN
8507: FND_MSG_PUB.initialize;
8508: END IF;
8509:
8510: x_return_status := FND_API.G_RET_STS_SUCCESS;
8511:
8512: open get_wip_operation(p_wip_entity_id, p_operation_seq_num);
8513: fetch get_wip_operation bulk collect into l_mv_txn_dtls_tbl;
8514: close get_wip_operation;
8525: );
8526: end if;
8527:
8528: -- Standard check for p_commit
8529: IF FND_API.to_Boolean( p_commit )
8530: THEN
8531: COMMIT WORK;
8532: END IF;
8533:
8532: END IF;
8533:
8534:
8535: EXCEPTION
8536: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8537: ROLLBACK to PROCESS_AUTO_OPER_COMP_TXN_PVT ;
8538: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8539:
8540: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8534:
8535: EXCEPTION
8536: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8537: ROLLBACK to PROCESS_AUTO_OPER_COMP_TXN_PVT ;
8538: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8539:
8540: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8541: p_count => x_msg_count,
8542: p_data => x_msg_data);
8536: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8537: ROLLBACK to PROCESS_AUTO_OPER_COMP_TXN_PVT ;
8538: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8539:
8540: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8541: p_count => x_msg_count,
8542: p_data => x_msg_data);
8543:
8544: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8547: 'G_EXC_UNEXPECTED_ERROR Exception');
8548: END IF;
8549:
8550:
8551: WHEN FND_API.G_EXC_ERROR THEN
8552: ROLLBACK to PROCESS_AUTO_OPER_COMP_TXN_PVT ;
8553: x_return_status := FND_API.G_RET_STS_ERROR;
8554:
8555:
8549:
8550:
8551: WHEN FND_API.G_EXC_ERROR THEN
8552: ROLLBACK to PROCESS_AUTO_OPER_COMP_TXN_PVT ;
8553: x_return_status := FND_API.G_RET_STS_ERROR;
8554:
8555:
8556: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8557: p_count => x_msg_count,
8552: ROLLBACK to PROCESS_AUTO_OPER_COMP_TXN_PVT ;
8553: x_return_status := FND_API.G_RET_STS_ERROR;
8554:
8555:
8556: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8557: p_count => x_msg_count,
8558: p_data => x_msg_data);
8559:
8560: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8564: END IF;
8565:
8566: WHEN OTHERS THEN
8567: ROLLBACK to PROCESS_AUTO_OPER_COMP_TXN_PVT ;
8568: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8569:
8570: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8571:
8572: -- Add Unexpected Error to Message List, here SQLERRM is used for
8575: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
8576: p_procedure_name => lc_api_name );
8577: END IF;
8578:
8579: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8580: p_count => x_msg_count,
8581: p_data => x_msg_data);
8582:
8583: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8750:
8751: SAVEPOINT PROCESS_TIME_CLOCK_RES_TXN_PVT;
8752:
8753: -- Standard call to check for call compatibility.
8754: IF NOT FND_API.Compatible_API_Call (lc_api_version_number,
8755: p_api_version_number,
8756: lc_api_name,
8757: G_PKG_NAME)
8758: THEN
8755: p_api_version_number,
8756: lc_api_name,
8757: G_PKG_NAME)
8758: THEN
8759: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8760: END IF;
8761:
8762:
8763: IF FND_API.to_boolean(p_init_msg_list) THEN
8759: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8760: END IF;
8761:
8762:
8763: IF FND_API.to_boolean(p_init_msg_list) THEN
8764: FND_MSG_PUB.initialize;
8765: END IF;
8766:
8767: x_return_status := FND_API.G_RET_STS_SUCCESS;
8763: IF FND_API.to_boolean(p_init_msg_list) THEN
8764: FND_MSG_PUB.initialize;
8765: END IF;
8766:
8767: x_return_status := FND_API.G_RET_STS_SUCCESS;
8768:
8769: open get_time_clock_entry;
8770: fetch get_time_clock_entry
8771: into l_wip_entity_id,
8780: l_resource_id := fnd_profile.value('CSD_DEF_HV_BOM_RESOURCE');-- get resource from profile value.
8781: if (l_resource_id is null) then
8782: FND_MESSAGE.SET_NAME('CSD', 'CSD_NO_DEF_HV_BOM_RESOURCE');
8783: FND_MSG_PUB.add_detail(p_message_type => FND_MSG_PUB.G_WARNING_MSG);
8784: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8785: RETURN;
8786: else
8787: -- Bug 8923513: Validate the resource against the operation department
8788: -- if resource does not belong to department, throw error.
8792:
8793: if (l_exists is null) then
8794: FND_MESSAGE.SET_NAME('CSD', 'CSD_INVALID_DEF_HV_BOM_RES');
8795: FND_MSG_PUB.add_detail(p_message_type => FND_MSG_PUB.G_WARNING_MSG);
8796: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8797: RETURN;
8798: end if;
8799: end if;
8800: end if;
8914: p_res_txn_dtls_tbl => l_res_txn_dtls_tbl
8915: );
8916:
8917: EXCEPTION
8918: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8919: ROLLBACK to PROCESS_TIME_CLOCK_RES_TXN_PVT ;
8920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8921:
8922: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8916:
8917: EXCEPTION
8918: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8919: ROLLBACK to PROCESS_TIME_CLOCK_RES_TXN_PVT ;
8920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8921:
8922: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8923: p_count => x_msg_count,
8924: p_data => x_msg_data);
8918: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8919: ROLLBACK to PROCESS_TIME_CLOCK_RES_TXN_PVT ;
8920: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8921:
8922: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8923: p_count => x_msg_count,
8924: p_data => x_msg_data);
8925:
8926: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8929: 'G_EXC_UNEXPECTED_ERROR Exception');
8930: END IF;
8931:
8932:
8933: WHEN FND_API.G_EXC_ERROR THEN
8934: ROLLBACK to PROCESS_TIME_CLOCK_RES_TXN_PVT ;
8935: x_return_status := FND_API.G_RET_STS_ERROR;
8936:
8937:
8931:
8932:
8933: WHEN FND_API.G_EXC_ERROR THEN
8934: ROLLBACK to PROCESS_TIME_CLOCK_RES_TXN_PVT ;
8935: x_return_status := FND_API.G_RET_STS_ERROR;
8936:
8937:
8938: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8939: p_count => x_msg_count,
8934: ROLLBACK to PROCESS_TIME_CLOCK_RES_TXN_PVT ;
8935: x_return_status := FND_API.G_RET_STS_ERROR;
8936:
8937:
8938: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8939: p_count => x_msg_count,
8940: p_data => x_msg_data);
8941:
8942: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
8946: END IF;
8947:
8948: WHEN OTHERS THEN
8949: ROLLBACK to PROCESS_TIME_CLOCK_RES_TXN_PVT ;
8950: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8951:
8952: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8953:
8954: -- Add Unexpected Error to Message List, here SQLERRM is used for
8957: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
8958: p_procedure_name => lc_api_name );
8959: END IF;
8960:
8961: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
8962: p_count => x_msg_count,
8963: p_data => x_msg_data);
8964:
8965: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9019:
9020: SAVEPOINT PROCESS_COMP_WORK_RO_STATUS;
9021:
9022: -- Standard call to check for call compatibility.
9023: IF NOT FND_API.Compatible_API_Call (lc_api_version_number,
9024: p_api_version_number,
9025: lc_api_name,
9026: G_PKG_NAME)
9027: THEN
9024: p_api_version_number,
9025: lc_api_name,
9026: G_PKG_NAME)
9027: THEN
9028: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9029: END IF;
9030:
9031:
9032: IF FND_API.to_boolean(p_init_msg_list) THEN
9028: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9029: END IF;
9030:
9031:
9032: IF FND_API.to_boolean(p_init_msg_list) THEN
9033: FND_MSG_PUB.initialize;
9034: END IF;
9035:
9036: x_return_status := FND_API.G_RET_STS_SUCCESS;
9032: IF FND_API.to_boolean(p_init_msg_list) THEN
9033: FND_MSG_PUB.initialize;
9034: END IF;
9035:
9036: x_return_status := FND_API.G_RET_STS_SUCCESS;
9037:
9038: -- get the repair order info in order to update flow status
9039: open c_get_repair_info;
9040: fetch c_get_repair_info
9074: into x_new_flow_status_code, x_new_ro_status_code;
9075: close c_get_repair_status;
9076:
9077: -- Standard check for p_commit
9078: IF FND_API.to_Boolean( p_commit )
9079: THEN
9080: COMMIT WORK;
9081: END IF;
9082:
9080: COMMIT WORK;
9081: END IF;
9082:
9083: EXCEPTION
9084: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9085: ROLLBACK to PROCESS_COMP_WORK_RO_STATUS ;
9086: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9087:
9088: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9082:
9083: EXCEPTION
9084: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9085: ROLLBACK to PROCESS_COMP_WORK_RO_STATUS ;
9086: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9087:
9088: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9089: p_count => x_msg_count,
9090: p_data => x_msg_data);
9084: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9085: ROLLBACK to PROCESS_COMP_WORK_RO_STATUS ;
9086: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9087:
9088: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9089: p_count => x_msg_count,
9090: p_data => x_msg_data);
9091:
9092: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9095: 'G_EXC_UNEXPECTED_ERROR Exception');
9096: END IF;
9097:
9098:
9099: WHEN FND_API.G_EXC_ERROR THEN
9100: ROLLBACK to PROCESS_COMP_WORK_RO_STATUS ;
9101: x_return_status := FND_API.G_RET_STS_ERROR;
9102:
9103:
9097:
9098:
9099: WHEN FND_API.G_EXC_ERROR THEN
9100: ROLLBACK to PROCESS_COMP_WORK_RO_STATUS ;
9101: x_return_status := FND_API.G_RET_STS_ERROR;
9102:
9103:
9104: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9105: p_count => x_msg_count,
9100: ROLLBACK to PROCESS_COMP_WORK_RO_STATUS ;
9101: x_return_status := FND_API.G_RET_STS_ERROR;
9102:
9103:
9104: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9105: p_count => x_msg_count,
9106: p_data => x_msg_data);
9107:
9108: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9112: END IF;
9113:
9114: WHEN OTHERS THEN
9115: ROLLBACK to PROCESS_COMP_WORK_RO_STATUS ;
9116: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9117:
9118: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9119:
9120: -- Add Unexpected Error to Message List, here SQLERRM is used for
9123: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
9124: p_procedure_name => lc_api_name );
9125: END IF;
9126:
9127: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9128: p_count => x_msg_count,
9129: p_data => x_msg_data);
9130:
9131: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9199: -- Standard Start of API savepoint
9200: SAVEPOINT PROCESS_DELETE_MTL_TXN_DTL_PVT;
9201:
9202: -- Standard call to check for call compatibility.
9203: IF NOT FND_API.Compatible_API_Call
9204: (lc_api_version_number,
9205: p_api_version_number,
9206: lc_api_name,
9207: G_PKG_NAME)
9205: p_api_version_number,
9206: lc_api_name,
9207: G_PKG_NAME)
9208: THEN
9209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9210: END IF;
9211:
9212: -- Initialize message list if p_init_msg_list is set to TRUE
9213: IF FND_API.to_boolean(p_init_msg_list) THEN
9209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9210: END IF;
9211:
9212: -- Initialize message list if p_init_msg_list is set to TRUE
9213: IF FND_API.to_boolean(p_init_msg_list) THEN
9214: FND_MSG_PUB.initialize;
9215: END IF;
9216:
9217:
9214: FND_MSG_PUB.initialize;
9215: END IF;
9216:
9217:
9218: x_return_status := FND_API.G_RET_STS_SUCCESS;
9219:
9220: --
9221: -- populate l_job_header_rec values
9222: --
9250: insert_job_header( p_job_header_rec => l_job_header_rec,
9251: x_return_status => x_return_status );
9252:
9253:
9254: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9255: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9256: END IF;
9257:
9258:
9251: x_return_status => x_return_status );
9252:
9253:
9254: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9255: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9256: END IF;
9257:
9258:
9259: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9265:
9266: insert_job_details( p_job_details_rec => l_job_details_rec,
9267: x_return_status => x_return_status );
9268:
9269: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9270: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9271: END IF;
9272:
9273:
9266: insert_job_details( p_job_details_rec => l_job_details_rec,
9267: x_return_status => x_return_status );
9268:
9269: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
9270: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9271: END IF;
9272:
9273:
9274:
9287: x_returnStatus => x_return_status,
9288: x_errorMsg => x_msg_data );
9289:
9290: If ( ml_error_exists( l_job_header_rec.group_id ) or
9291: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
9292:
9293: FND_MESSAGE.SET_NAME('CSD','CSD_MTL_ADD_MASS_LD_FAILURE');
9294: FND_MSG_PUB.ADD;
9295: x_return_status := FND_API.G_RET_STS_ERROR;
9291: x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
9292:
9293: FND_MESSAGE.SET_NAME('CSD','CSD_MTL_ADD_MASS_LD_FAILURE');
9294: FND_MSG_PUB.ADD;
9295: x_return_status := FND_API.G_RET_STS_ERROR;
9296:
9297: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9298: p_count => x_msg_count,
9299: p_data => x_msg_data);
9293: FND_MESSAGE.SET_NAME('CSD','CSD_MTL_ADD_MASS_LD_FAILURE');
9294: FND_MSG_PUB.ADD;
9295: x_return_status := FND_API.G_RET_STS_ERROR;
9296:
9297: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9298: p_count => x_msg_count,
9299: p_data => x_msg_data);
9300: -- Need to rollback Raise exception -
9301: -- once commit is removed from above call
9298: p_count => x_msg_count,
9299: p_data => x_msg_data);
9300: -- Need to rollback Raise exception -
9301: -- once commit is removed from above call
9302: -- raise FND_API.G_EXC_ERROR;
9303: RETURN;
9304: end if;
9305:
9306: --bug#12316893
9315: 2 /* 2 = materials */);
9316:
9317: -- when rollback for WIP works, remove x_return_status, count_and_get,
9318: -- and return then reinstate raise exception above
9319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9320: /*
9321: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9322: -- Add Unexpected Error to Message List, here SQLERRM is used for
9323: -- getting the error
9325: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
9326: p_procedure_name => lc_api_name );
9327: END IF;
9328: */
9329: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9330: p_count => x_msg_count,
9331: p_data => x_msg_data);
9332:
9333: END;
9353:
9354: end if;
9355:
9356: -- Standard check for p_commit
9357: IF FND_API.to_Boolean( p_commit ) THEN
9358: COMMIT WORK;
9359: END IF;
9360:
9361: EXCEPTION
9358: COMMIT WORK;
9359: END IF;
9360:
9361: EXCEPTION
9362: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9363: ROLLBACK to PROCESS_DELETE_MTL_TXN_DTL_PVT ;
9364: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9365:
9366: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9360:
9361: EXCEPTION
9362: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9363: ROLLBACK to PROCESS_DELETE_MTL_TXN_DTL_PVT ;
9364: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9365:
9366: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9367: p_count => x_msg_count,
9368: p_data => x_msg_data);
9362: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9363: ROLLBACK to PROCESS_DELETE_MTL_TXN_DTL_PVT ;
9364: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9365:
9366: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9367: p_count => x_msg_count,
9368: p_data => x_msg_data);
9369:
9370: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9373: 'G_EXC_UNEXPECTED_ERROR Exception');
9374: END IF;
9375:
9376:
9377: WHEN FND_API.G_EXC_ERROR THEN
9378: ROLLBACK to PROCESS_DELETE_MTL_TXN_DTL_PVT ;
9379: x_return_status := FND_API.G_RET_STS_ERROR;
9380:
9381:
9375:
9376:
9377: WHEN FND_API.G_EXC_ERROR THEN
9378: ROLLBACK to PROCESS_DELETE_MTL_TXN_DTL_PVT ;
9379: x_return_status := FND_API.G_RET_STS_ERROR;
9380:
9381:
9382: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9383: p_count => x_msg_count,
9378: ROLLBACK to PROCESS_DELETE_MTL_TXN_DTL_PVT ;
9379: x_return_status := FND_API.G_RET_STS_ERROR;
9380:
9381:
9382: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9383: p_count => x_msg_count,
9384: p_data => x_msg_data);
9385:
9386: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9390: END IF;
9391:
9392: WHEN OTHERS THEN
9393: ROLLBACK to PROCESS_DELETE_MTL_TXN_DTL_PVT ;
9394: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9395:
9396: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9397:
9398: -- Add Unexpected Error to Message List, here SQLERRM is used for
9401: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
9402: p_procedure_name => lc_api_name );
9403: END IF;
9404:
9405: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9406: p_count => x_msg_count,
9407: p_data => x_msg_data);
9408:
9409: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9487: p_operation_seq_num => p_operation_seq_num,
9488: x_return_status => l_return_status,
9489: x_error_message => l_error_message);
9490:
9491: IF (l_return_status = FND_API.G_RET_STS_SUCCESS ) THEN
9492: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
9493: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE,
9494: lc_mod_name,
9495: 'WIP_OPERATIONS_PKG.Valid_Op_Delete returned success.' );
9626: -- Standard Start of API savepoint
9627: SAVEPOINT PROCESS_DELETE_op_dtl_PVT;
9628:
9629: -- Standard call to check for call compatibility.
9630: IF NOT FND_API.Compatible_API_Call
9631: (lc_api_version_number,
9632: p_api_version_number,
9633: lc_api_name,
9634: G_PKG_NAME)
9632: p_api_version_number,
9633: lc_api_name,
9634: G_PKG_NAME)
9635: THEN
9636: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9637: END IF;
9638:
9639: -- Initialize message list if p_init_msg_list is set to TRUE
9640: IF FND_API.to_boolean(p_init_msg_list) THEN
9636: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9637: END IF;
9638:
9639: -- Initialize message list if p_init_msg_list is set to TRUE
9640: IF FND_API.to_boolean(p_init_msg_list) THEN
9641: FND_MSG_PUB.initialize;
9642: END IF;
9643:
9644:
9641: FND_MSG_PUB.initialize;
9642: END IF;
9643:
9644:
9645: x_return_status := FND_API.G_RET_STS_SUCCESS;
9646:
9647: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9648: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9649: lc_mod_name||'beforecallinsertjobdtls',
9656: p_operation_seq_num => p_op_dtls.operation_seq_num,
9657: x_return_status => l_return_status,
9658: x_error_message => l_error_message);
9659:
9660: If (x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
9661: IF ( FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9662: FND_LOG.STRING( FND_LOG.LEVEL_EVENT,
9663: lc_mod_name,
9664: 'Error during WIP_OPERATIONS_PKG.Delete_Operation: ' || l_error_message);
9666:
9667: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
9668: fnd_message.set_token('MESSAGE', l_error_message);
9669: fnd_msg_pub.add;
9670: x_return_status := FND_API.G_RET_STS_ERROR;
9671:
9672: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9673: p_count => x_msg_count,
9674: p_data => x_msg_data);
9668: fnd_message.set_token('MESSAGE', l_error_message);
9669: fnd_msg_pub.add;
9670: x_return_status := FND_API.G_RET_STS_ERROR;
9671:
9672: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9673: p_count => x_msg_count,
9674: p_data => x_msg_data);
9675: RETURN;
9676: end if;
9783:
9784: END LOOP;
9785:
9786: -- Standard check for p_commit
9787: IF FND_API.to_Boolean( p_commit ) THEN
9788: COMMIT WORK;
9789: END IF;
9790:
9791: EXCEPTION
9788: COMMIT WORK;
9789: END IF;
9790:
9791: EXCEPTION
9792: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9793: ROLLBACK to PROCESS_DELETE_OP_DTL_PVT ;
9794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9795:
9796: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9790:
9791: EXCEPTION
9792: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9793: ROLLBACK to PROCESS_DELETE_OP_DTL_PVT ;
9794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9795:
9796: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9797: p_count => x_msg_count,
9798: p_data => x_msg_data);
9792: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9793: ROLLBACK to PROCESS_DELETE_OP_DTL_PVT ;
9794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9795:
9796: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9797: p_count => x_msg_count,
9798: p_data => x_msg_data);
9799:
9800: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9803: 'G_EXC_UNEXPECTED_ERROR Exception');
9804: END IF;
9805:
9806:
9807: WHEN FND_API.G_EXC_ERROR THEN
9808: ROLLBACK to PROCESS_DELETE_op_dtl_PVT ;
9809: x_return_status := FND_API.G_RET_STS_ERROR;
9810:
9811:
9805:
9806:
9807: WHEN FND_API.G_EXC_ERROR THEN
9808: ROLLBACK to PROCESS_DELETE_op_dtl_PVT ;
9809: x_return_status := FND_API.G_RET_STS_ERROR;
9810:
9811:
9812: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9813: p_count => x_msg_count,
9808: ROLLBACK to PROCESS_DELETE_op_dtl_PVT ;
9809: x_return_status := FND_API.G_RET_STS_ERROR;
9810:
9811:
9812: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9813: p_count => x_msg_count,
9814: p_data => x_msg_data);
9815:
9816: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9820: END IF;
9821:
9822: WHEN OTHERS THEN
9823: ROLLBACK to PROCESS_DELETE_op_dtl_PVT ;
9824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9825:
9826: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9827:
9828: -- Add Unexpected Error to Message List, here SQLERRM is used for
9831: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
9832: p_procedure_name => lc_api_name );
9833: END IF;
9834:
9835: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
9836: p_count => x_msg_count,
9837: p_data => x_msg_data);
9838:
9839: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
9881: fnd_log.string(fnd_log.level_statement,lc_mod_name||'begin','Entering private API' );
9882: END IF;
9883:
9884: -- Standard call to check for call compatibility.
9885: IF NOT fnd_api.Compatible_API_Call
9886: (lc_api_version_number,
9887: p_api_version_number,
9888: lc_api_name,
9889: G_PKG_NAME)
9887: p_api_version_number,
9888: lc_api_name,
9889: G_PKG_NAME)
9890: THEN
9891: RAISE fnd_api.g_exc_unexpected_error;
9892: END IF;
9893:
9894: -- Initialize message list if p_init_msg_list is set to TRUE
9895: IF fnd_api.to_boolean(p_init_msg_list)
9891: RAISE fnd_api.g_exc_unexpected_error;
9892: END IF;
9893:
9894: -- Initialize message list if p_init_msg_list is set to TRUE
9895: IF fnd_api.to_boolean(p_init_msg_list)
9896: THEN
9897: fnd_msg_pub.initialize;
9898: END IF;
9899:
9896: THEN
9897: fnd_msg_pub.initialize;
9898: END IF;
9899:
9900: x_return_status := fnd_api.g_ret_sts_success;
9901:
9902: -- dump the input parameters.
9903:
9904: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level )
9917: -- start processing.
9918: -- case#1. Best case. The wip transaction detail id and quantity and transaction type are provided.
9919: -- the best case cannot be probably met at this point since, HVR doesn't guarantee that rows will be
9920: -- present in the CSD table.
9921: -- when fnd_api.g_valid_level_full is passed in then we also verify if the total transacted material is
9922: -- greater than the quantity_issued.
9923:
9924: IF p_wip_transaction_detail_id IS NOT NULL AND p_transaction_type_id IS NOT NULL AND p_quantity IS NOT NULL
9925: THEN
9922: -- greater than the quantity_issued.
9923:
9924: IF p_wip_transaction_detail_id IS NOT NULL AND p_transaction_type_id IS NOT NULL AND p_quantity IS NOT NULL
9925: THEN
9926: IF p_validation_level = fnd_api.g_valid_level_none
9927: THEN
9928: IF p_transaction_type_id = 35
9929: THEN
9930: UPDATE csd_wip_transaction_details SET quantity_issued = (NVL(quantity_issued,0) + p_quantity)
10270: retcode := 0;
10271: update_mat_issue_quantities
10272: (
10273: p_api_version_number => 1.0 ,
10274: p_init_msg_list => fnd_api.g_false ,
10275: p_commit => fnd_api.g_false ,
10276: p_validation_level => fnd_api.g_valid_level_none,
10277: x_return_status => x_return_status,
10278: x_msg_count => x_msg_count,
10271: update_mat_issue_quantities
10272: (
10273: p_api_version_number => 1.0 ,
10274: p_init_msg_list => fnd_api.g_false ,
10275: p_commit => fnd_api.g_false ,
10276: p_validation_level => fnd_api.g_valid_level_none,
10277: x_return_status => x_return_status,
10278: x_msg_count => x_msg_count,
10279: x_msg_data => x_msg_data,
10272: (
10273: p_api_version_number => 1.0 ,
10274: p_init_msg_list => fnd_api.g_false ,
10275: p_commit => fnd_api.g_false ,
10276: p_validation_level => fnd_api.g_valid_level_none,
10277: x_return_status => x_return_status,
10278: x_msg_count => x_msg_count,
10279: x_msg_data => x_msg_data,
10280: p_repair_line_id => p_repair_line_id,
10286: p_transaction_date_start => l_txn_start_date,
10287: p_transaction_date_end => l_txn_end_date
10288: );
10289:
10290: IF x_return_status <> fnd_api.g_ret_sts_success
10291: THEN
10292: retcode := 2;
10293: errbuf := x_msg_data;
10294: END IF;
10349:
10350: SAVEPOINT GENERATE_ESTIMATE_FROM_WIP;
10351:
10352: -- Standard call to check for call compatibility.
10353: IF NOT FND_API.Compatible_API_Call(lc_api_version_number,
10354: p_api_version_number,
10355: lc_api_name,
10356: G_PKG_NAME) THEN
10357: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10353: IF NOT FND_API.Compatible_API_Call(lc_api_version_number,
10354: p_api_version_number,
10355: lc_api_name,
10356: G_PKG_NAME) THEN
10357: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10358: END IF;
10359:
10360:
10361: IF FND_API.to_boolean(p_init_msg_list) THEN
10357: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10358: END IF;
10359:
10360:
10361: IF FND_API.to_boolean(p_init_msg_list) THEN
10362: FND_MSG_PUB.initialize;
10363: END IF;
10364:
10365: -- initialize out params
10362: FND_MSG_PUB.initialize;
10363: END IF;
10364:
10365: -- initialize out params
10366: x_return_status := FND_API.G_RET_STS_SUCCESS;
10367:
10368: -- Validate mandatory input parameters.
10369: if (lc_proc_level >= lc_debug_level) then
10370: FND_LOG.STRING(lc_proc_level, lc_mod_name,
10403: END IF;
10404:
10405: CSD_REPAIR_ESTIMATE_PVT.Import_Estimates_From_Wip(
10406: p_api_version => 1.0,
10407: p_commit => FND_API.G_FALSE,
10408: p_init_msg_list =>FND_API.G_FALSE,
10409: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
10410: x_return_status => x_return_status,
10411: x_msg_count => x_msg_count,
10404:
10405: CSD_REPAIR_ESTIMATE_PVT.Import_Estimates_From_Wip(
10406: p_api_version => 1.0,
10407: p_commit => FND_API.G_FALSE,
10408: p_init_msg_list =>FND_API.G_FALSE,
10409: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
10410: x_return_status => x_return_status,
10411: x_msg_count => x_msg_count,
10412: x_msg_data => x_msg_data,
10405: CSD_REPAIR_ESTIMATE_PVT.Import_Estimates_From_Wip(
10406: p_api_version => 1.0,
10407: p_commit => FND_API.G_FALSE,
10408: p_init_msg_list =>FND_API.G_FALSE,
10409: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
10410: x_return_status => x_return_status,
10411: x_msg_count => x_msg_count,
10412: x_msg_data => x_msg_data,
10413: p_repair_line_id => p_repair_line_id,
10419: p_organization_id => l_organization_id,
10420: x_warning_flag => l_warning_flag );
10421:
10422:
10423: IF ((x_return_status <> FND_API.G_RET_STS_SUCCESS ) OR (l_warning_flag = FND_API.G_TRUE)) THEN
10424: FND_MESSAGE.SET_NAME('CSD','CSD_EST_WIP_IMPORT_FAILURE');
10425: FND_MSG_PUB.ADD;
10426: RAISE FND_API.G_EXC_ERROR;
10427: END IF;
10422:
10423: IF ((x_return_status <> FND_API.G_RET_STS_SUCCESS ) OR (l_warning_flag = FND_API.G_TRUE)) THEN
10424: FND_MESSAGE.SET_NAME('CSD','CSD_EST_WIP_IMPORT_FAILURE');
10425: FND_MSG_PUB.ADD;
10426: RAISE FND_API.G_EXC_ERROR;
10427: END IF;
10428:
10429:
10430: -- Standard check for p_commit
10427: END IF;
10428:
10429:
10430: -- Standard check for p_commit
10431: IF FND_API.to_Boolean( p_commit )
10432: THEN
10433: COMMIT WORK;
10434: END IF;
10435:
10433: COMMIT WORK;
10434: END IF;
10435:
10436: EXCEPTION
10437: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10438: ROLLBACK to GENERATE_ESTIMATE_FROM_WIP ;
10439: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10440:
10441: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
10435:
10436: EXCEPTION
10437: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10438: ROLLBACK to GENERATE_ESTIMATE_FROM_WIP ;
10439: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10440:
10441: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
10442: p_count => x_msg_count,
10443: p_data => x_msg_data);
10437: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10438: ROLLBACK to GENERATE_ESTIMATE_FROM_WIP ;
10439: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10440:
10441: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
10442: p_count => x_msg_count,
10443: p_data => x_msg_data);
10444:
10445: IF (lc_excep_level >= lc_debug_level ) then
10448: 'G_EXC_UNEXPECTED_ERROR Exception');
10449: END IF;
10450:
10451:
10452: WHEN FND_API.G_EXC_ERROR THEN
10453: ROLLBACK to GENERATE_ESTIMATE_FROM_WIP ;
10454: x_return_status := FND_API.G_RET_STS_ERROR;
10455:
10456:
10450:
10451:
10452: WHEN FND_API.G_EXC_ERROR THEN
10453: ROLLBACK to GENERATE_ESTIMATE_FROM_WIP ;
10454: x_return_status := FND_API.G_RET_STS_ERROR;
10455:
10456:
10457: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
10458: p_count => x_msg_count,
10453: ROLLBACK to GENERATE_ESTIMATE_FROM_WIP ;
10454: x_return_status := FND_API.G_RET_STS_ERROR;
10455:
10456:
10457: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
10458: p_count => x_msg_count,
10459: p_data => x_msg_data);
10460:
10461: IF ( lc_error_level >= lc_debug_level ) then
10465: END IF;
10466:
10467: WHEN OTHERS THEN
10468: ROLLBACK to GENERATE_ESTIMATE_FROM_WIP ;
10469: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10470:
10471: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
10472: -- Add Unexpected Error to Message List, here SQLERRM is used for
10473: -- getting the error
10474: FND_MSG_PUB.add_exc_msg(p_pkg_name => G_PKG_NAME,
10475: p_procedure_name => lc_api_name );
10476: END IF;
10477:
10478: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
10479: p_count => x_msg_count,
10480: p_data => x_msg_data);
10481:
10482: IF ( lc_excep_level >= lc_debug_level) then