[Home] [Help]
22: g_pkg_name CONSTANT VARCHAR2(30):= 'EAM_PROCESS_WO_PUB';
23:
24: PROCEDURE DELETE_RELATIONSHIP
25: ( p_api_version IN NUMBER
26: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
27: , p_commit IN VARCHAR2 := FND_API.G_FALSE
28: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
29:
30: , p_parent_object_id IN NUMBER
23:
24: PROCEDURE DELETE_RELATIONSHIP
25: ( p_api_version IN NUMBER
26: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
27: , p_commit IN VARCHAR2 := FND_API.G_FALSE
28: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
29:
30: , p_parent_object_id IN NUMBER
31: , p_parent_object_type_id IN NUMBER
24: PROCEDURE DELETE_RELATIONSHIP
25: ( p_api_version IN NUMBER
26: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
27: , p_commit IN VARCHAR2 := FND_API.G_FALSE
28: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
29:
30: , p_parent_object_id IN NUMBER
31: , p_parent_object_type_id IN NUMBER
32: , p_child_object_id IN NUMBER
417: , x_mesg_token_tbl => l_out_mesg_token_tbl
418: );
419: l_mesg_token_tbl := l_out_mesg_token_tbl;
420:
421: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
422: THEN
423: EAM_PROCESS_WO_PVT.Set_Debug('N');
424: END IF;
425: END IF;
428:
429:
430:
431:
432: l_return_status := FND_API.G_RET_STS_SUCCESS;
433: l_eam_return_status := FND_API.G_RET_STS_SUCCESS;
434: x_return_status := FND_API.G_RET_STS_SUCCESS;
435:
436: l_eam_wo_tbl.delete;
429:
430:
431:
432: l_return_status := FND_API.G_RET_STS_SUCCESS;
433: l_eam_return_status := FND_API.G_RET_STS_SUCCESS;
434: x_return_status := FND_API.G_RET_STS_SUCCESS;
435:
436: l_eam_wo_tbl.delete;
437: l_eam_wo_relations_tbl.delete;
430:
431:
432: l_return_status := FND_API.G_RET_STS_SUCCESS;
433: l_eam_return_status := FND_API.G_RET_STS_SUCCESS;
434: x_return_status := FND_API.G_RET_STS_SUCCESS;
435:
436: l_eam_wo_tbl.delete;
437: l_eam_wo_relations_tbl.delete;
438: l_eam_op_tbl.delete;
677:
678:
679: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(to_char(sysdate,'DD-MON-YY HH:MI:SS')||' EAM_PROCESS_WO_PUB.PROCESS_MASTER_CHILD_WO : CHECK_BO_NETWORK completed with status ='||l_return_status) ; END IF ;
680:
681: if nvl(l_return_status,FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS then
682:
683: l_out_mesg_token_tbl := l_mesg_token_tbl;
684: EAM_ERROR_MESSAGE_PVT.Add_Error_Token
685: ( p_message_name => 'EAM_WN_BO_NET_ERR'
757: EAM_ERROR_MESSAGE_PVT.Close_Debug_Session;
758: END IF;
759:
760:
761: l_eam_return_status := FND_API.G_RET_STS_ERROR;
762: x_return_status := FND_API.G_RET_STS_ERROR;
763: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;
764: return;
765: end if;
758: END IF;
759:
760:
761: l_eam_return_status := FND_API.G_RET_STS_ERROR;
762: x_return_status := FND_API.G_RET_STS_ERROR;
763: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;
764: return;
765: end if;
766:
1187: -- till start of this current WO process start
1188: IF nvl(l_return_status,'Q') <> 'S' THEN
1189: rollback to Single_WO_Process;
1190:
1191: l_eam_return_status := FND_API.G_RET_STS_ERROR;
1192: x_return_status := FND_API.G_RET_STS_ERROR;
1193:
1194: -- Also disregard all relations pertaining to this work
1195: -- order as not valid;
1188: IF nvl(l_return_status,'Q') <> 'S' THEN
1189: rollback to Single_WO_Process;
1190:
1191: l_eam_return_status := FND_API.G_RET_STS_ERROR;
1192: x_return_status := FND_API.G_RET_STS_ERROR;
1193:
1194: -- Also disregard all relations pertaining to this work
1195: -- order as not valid;
1196: if l_eam_wo_relations_tbl.count <> 0 then
1198:
1199: if l_eam_wo_relations_tbl(j).parent_header_id = l_header_id or
1200: l_eam_wo_relations_tbl(j).child_header_id = l_header_id or
1201: l_eam_wo_relations_tbl(j).top_level_header_id = l_header_id then
1202: l_eam_wo_relations_tbl(j).return_status := FND_API.G_RET_STS_ERROR;
1203: end if;
1204:
1205: end loop;
1206: end if;
1419: , x_mesg_token_tbl => l_out_mesg_token_tbl
1420: );
1421: l_mesg_token_tbl := l_out_mesg_token_tbl;
1422:
1423: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
1424: THEN
1425: EAM_PROCESS_WO_PVT.Set_Debug('N');
1426: END IF;
1427: END IF;
1460:
1461: EAM_WO_NETWORK_DEFAULT_PVT.Check_Wo_Dates
1462: (
1463: p_api_version => 1.0,
1464: p_init_msg_list => FND_API.G_FALSE,
1465: p_commit => FND_API.G_FALSE,
1466: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1467: p_wip_entity_id => l_temp_wip_entity_id,
1468: x_return_status => l_return_status,
1461: EAM_WO_NETWORK_DEFAULT_PVT.Check_Wo_Dates
1462: (
1463: p_api_version => 1.0,
1464: p_init_msg_list => FND_API.G_FALSE,
1465: p_commit => FND_API.G_FALSE,
1466: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1467: p_wip_entity_id => l_temp_wip_entity_id,
1468: x_return_status => l_return_status,
1469: x_msg_count => l_msg_count,
1462: (
1463: p_api_version => 1.0,
1464: p_init_msg_list => FND_API.G_FALSE,
1465: p_commit => FND_API.G_FALSE,
1466: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1467: p_wip_entity_id => l_temp_wip_entity_id,
1468: x_return_status => l_return_status,
1469: x_msg_count => l_msg_count,
1470: x_msg_data => l_msg_data
1476: IF ( EAM_PROCESS_WO_PVT.Get_Debug = 'Y' AND l_temp_index = 2 ) THEN
1477: EAM_ERROR_MESSAGE_PVT.Write_Debug(to_char(sysdate,'DD-MON-YY HH:MI:SS')||' EAM_PROCESS_WO_PUB.PROCESS_MASTER_CHILD_WO : Check_Wo_Dates for child wo completed with status of '||l_return_status) ;
1478: END IF ;
1479:
1480: IF l_return_status = FND_API.G_RET_STS_ERROR OR
1481: l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1482:
1483: --Before inserting the error message, insert the confirmation message of work order creation.
1484: x_return_status := l_return_status;
1477: EAM_ERROR_MESSAGE_PVT.Write_Debug(to_char(sysdate,'DD-MON-YY HH:MI:SS')||' EAM_PROCESS_WO_PUB.PROCESS_MASTER_CHILD_WO : Check_Wo_Dates for child wo completed with status of '||l_return_status) ;
1478: END IF ;
1479:
1480: IF l_return_status = FND_API.G_RET_STS_ERROR OR
1481: l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1482:
1483: --Before inserting the error message, insert the confirmation message of work order creation.
1484: x_return_status := l_return_status;
1485: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;
1482:
1483: --Before inserting the error message, insert the confirmation message of work order creation.
1484: x_return_status := l_return_status;
1485: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;
1486: l_eam_return_status := FND_API.G_RET_STS_ERROR;
1487:
1488: if l_eam_wo_list.count > 0 then
1489: for l_new_wo_list in l_eam_wo_list.first..l_eam_wo_list.last loop
1490: eam_execution_jsp.add_message(p_app_short_name => 'EAM',
1502: p_msg_name => 'EAM_WO_CHK_DATES_ERR',
1503: p_token1 => 'WORKORDER', p_value1 => l_wo_name);
1504:
1505: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;
1506: l_eam_return_status := FND_API.G_RET_STS_ERROR;
1507: end if;
1508: end if;
1509: l_temp_wip_entity_id := l_eam_wo_relations_tbl(i).CHILD_OBJECT_ID;
1510: END LOOP;
1517: IF ( EAM_PROCESS_WO_PVT.Get_Debug = 'Y') THEN EAM_ERROR_MESSAGE_PVT.Write_Debug(to_char(sysdate,'DD-MON-YY HH:MI:SS')||' EAM_PROCESS_WO_PUB.PROCESS_MASTER_CHILD_WO : Calling the AEAM_WO_NETWORK_DEFAULT_PVT.add_WO_To_Network ') ; END IF ;
1518:
1519: EAM_WO_NETWORK_DEFAULT_PVT.Add_WO_To_Network(
1520: p_api_version => 1.0,
1521: p_init_msg_list => FND_API.G_FALSE,
1522: p_commit => FND_API.G_FALSE,
1523: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1524:
1525: p_child_object_id => l_eam_wo_relations_tbl(i).child_object_id,
1518:
1519: EAM_WO_NETWORK_DEFAULT_PVT.Add_WO_To_Network(
1520: p_api_version => 1.0,
1521: p_init_msg_list => FND_API.G_FALSE,
1522: p_commit => FND_API.G_FALSE,
1523: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1524:
1525: p_child_object_id => l_eam_wo_relations_tbl(i).child_object_id,
1526: p_child_object_type_id => l_eam_wo_relations_tbl(i).child_object_type_id,
1519: EAM_WO_NETWORK_DEFAULT_PVT.Add_WO_To_Network(
1520: p_api_version => 1.0,
1521: p_init_msg_list => FND_API.G_FALSE,
1522: p_commit => FND_API.G_FALSE,
1523: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1524:
1525: p_child_object_id => l_eam_wo_relations_tbl(i).child_object_id,
1526: p_child_object_type_id => l_eam_wo_relations_tbl(i).child_object_type_id,
1527: p_parent_object_id => l_eam_wo_relations_tbl(i).parent_object_id,
1538: l_eam_wo_relations_tbl(i).return_status := l_return_status;
1539:
1540: if l_return_status <> 'S' then
1541:
1542: l_eam_return_status := FND_API.G_RET_STS_ERROR;
1543: x_return_status := FND_API.G_RET_STS_ERROR;
1544:
1545: rollback to Add_Wo_To_Network_Start;
1546:
1539:
1540: if l_return_status <> 'S' then
1541:
1542: l_eam_return_status := FND_API.G_RET_STS_ERROR;
1543: x_return_status := FND_API.G_RET_STS_ERROR;
1544:
1545: rollback to Add_Wo_To_Network_Start;
1546:
1547: l_out_eam_wo_rec := l_eam_wo_rec;
1573: , p_eam_res_usage_tbl => l_eam_res_usage_tbl
1574: , p_eam_mat_req_tbl => l_eam_mat_req_tbl
1575: , p_eam_direct_items_tbl => l_eam_di_tbl
1576: , p_mesg_token_tbl => l_mesg_token_tbl
1577: , p_error_status => FND_API.G_RET_STS_ERROR
1578: , p_error_scope => EAM_ERROR_MESSAGE_PVT.G_SCOPE_RECORD
1579: , p_other_status => EAM_ERROR_MESSAGE_PVT.G_STATUS_ERROR
1580: , p_other_message => l_other_message
1581: , p_other_token_tbl => l_other_token_tbl
1622:
1623: EAM_WO_NETWORK_DEFAULT_PVT.Add_Dependency
1624: (
1625: p_api_version => 1.0,
1626: p_init_msg_list => FND_API.G_FALSE,
1627: p_commit => FND_API.G_FALSE,
1628: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1629:
1630: p_prior_object_id => l_eam_wo_relations_tbl(i).parent_object_id,
1623: EAM_WO_NETWORK_DEFAULT_PVT.Add_Dependency
1624: (
1625: p_api_version => 1.0,
1626: p_init_msg_list => FND_API.G_FALSE,
1627: p_commit => FND_API.G_FALSE,
1628: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1629:
1630: p_prior_object_id => l_eam_wo_relations_tbl(i).parent_object_id,
1631: p_prior_object_type_id => l_eam_wo_relations_tbl(i).parent_object_type_id,
1624: (
1625: p_api_version => 1.0,
1626: p_init_msg_list => FND_API.G_FALSE,
1627: p_commit => FND_API.G_FALSE,
1628: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1629:
1630: p_prior_object_id => l_eam_wo_relations_tbl(i).parent_object_id,
1631: p_prior_object_type_id => l_eam_wo_relations_tbl(i).parent_object_type_id,
1632: p_next_object_id => l_eam_wo_relations_tbl(i).child_object_id,
1641: l_eam_wo_relations_tbl(i).return_status := l_return_status;
1642:
1643: if l_return_status <> 'S' then
1644:
1645: l_eam_return_status := FND_API.G_RET_STS_ERROR;
1646: x_return_status := FND_API.G_RET_STS_ERROR;
1647:
1648:
1649: rollback to Add_Dependency_Start;
1642:
1643: if l_return_status <> 'S' then
1644:
1645: l_eam_return_status := FND_API.G_RET_STS_ERROR;
1646: x_return_status := FND_API.G_RET_STS_ERROR;
1647:
1648:
1649: rollback to Add_Dependency_Start;
1650:
1677: , p_eam_res_usage_tbl => l_eam_res_usage_tbl
1678: , p_eam_mat_req_tbl => l_eam_mat_req_tbl
1679: , p_eam_direct_items_tbl => l_eam_di_tbl
1680: , p_mesg_token_tbl => l_mesg_token_tbl
1681: , p_error_status => FND_API.G_RET_STS_ERROR
1682: , p_error_scope => EAM_ERROR_MESSAGE_PVT.G_SCOPE_RECORD
1683: , p_other_status => EAM_ERROR_MESSAGE_PVT.G_STATUS_ERROR
1684: , p_other_message => l_other_message
1685: , p_other_token_tbl => l_other_token_tbl
1729:
1730: EAM_WO_NETWORK_DEFAULT_PVT.Delink_Child_From_Parent
1731: (
1732: p_api_version => 1.0,
1733: p_init_msg_list => FND_API.G_FALSE,
1734: p_commit => FND_API.G_FALSE,
1735: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1736:
1737: p_child_object_id => l_eam_wo_relations_tbl(i).child_object_id,
1730: EAM_WO_NETWORK_DEFAULT_PVT.Delink_Child_From_Parent
1731: (
1732: p_api_version => 1.0,
1733: p_init_msg_list => FND_API.G_FALSE,
1734: p_commit => FND_API.G_FALSE,
1735: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1736:
1737: p_child_object_id => l_eam_wo_relations_tbl(i).child_object_id,
1738: p_child_object_type_id => l_eam_wo_relations_tbl(i).child_object_type_id,
1731: (
1732: p_api_version => 1.0,
1733: p_init_msg_list => FND_API.G_FALSE,
1734: p_commit => FND_API.G_FALSE,
1735: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1736:
1737: p_child_object_id => l_eam_wo_relations_tbl(i).child_object_id,
1738: p_child_object_type_id => l_eam_wo_relations_tbl(i).child_object_type_id,
1739: p_parent_object_id => l_eam_wo_relations_tbl(i).parent_object_id,
1751:
1752:
1753: if l_return_status <> 'S' then
1754:
1755: l_eam_return_status := FND_API.G_RET_STS_ERROR;
1756: x_return_status := FND_API.G_RET_STS_ERROR;
1757:
1758:
1759: rollback to Delink_Relation_Start;
1752:
1753: if l_return_status <> 'S' then
1754:
1755: l_eam_return_status := FND_API.G_RET_STS_ERROR;
1756: x_return_status := FND_API.G_RET_STS_ERROR;
1757:
1758:
1759: rollback to Delink_Relation_Start;
1760:
1787: , p_eam_res_usage_tbl => l_eam_res_usage_tbl
1788: , p_eam_mat_req_tbl => l_eam_mat_req_tbl
1789: , p_eam_direct_items_tbl => l_eam_di_tbl
1790: , p_mesg_token_tbl => l_mesg_token_tbl
1791: , p_error_status => FND_API.G_RET_STS_ERROR
1792: , p_error_scope => EAM_ERROR_MESSAGE_PVT.G_SCOPE_RECORD
1793: , p_other_status => EAM_ERROR_MESSAGE_PVT.G_STATUS_ERROR
1794: , p_other_message => l_other_message
1795: , p_other_token_tbl => l_other_token_tbl
1834:
1835: EAM_WO_NETWORK_DEFAULT_PVT.Delete_Dependency
1836: (
1837: p_api_version => 1.0,
1838: p_init_msg_list => FND_API.G_FALSE,
1839: p_commit => FND_API.G_FALSE,
1840: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1841:
1842: p_prior_object_id => l_eam_wo_relations_tbl(i).parent_object_id,
1835: EAM_WO_NETWORK_DEFAULT_PVT.Delete_Dependency
1836: (
1837: p_api_version => 1.0,
1838: p_init_msg_list => FND_API.G_FALSE,
1839: p_commit => FND_API.G_FALSE,
1840: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1841:
1842: p_prior_object_id => l_eam_wo_relations_tbl(i).parent_object_id,
1843: p_prior_object_type_id => l_eam_wo_relations_tbl(i).parent_object_type_id,
1836: (
1837: p_api_version => 1.0,
1838: p_init_msg_list => FND_API.G_FALSE,
1839: p_commit => FND_API.G_FALSE,
1840: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1841:
1842: p_prior_object_id => l_eam_wo_relations_tbl(i).parent_object_id,
1843: p_prior_object_type_id => l_eam_wo_relations_tbl(i).parent_object_type_id,
1844: p_next_object_id => l_eam_wo_relations_tbl(i).child_object_id,
1855:
1856:
1857: if l_return_status <> 'S' then
1858:
1859: l_eam_return_status := FND_API.G_RET_STS_ERROR;
1860: x_return_status := FND_API.G_RET_STS_ERROR;
1861:
1862:
1863: rollback to Delete_Dependency_Start;
1856:
1857: if l_return_status <> 'S' then
1858:
1859: l_eam_return_status := FND_API.G_RET_STS_ERROR;
1860: x_return_status := FND_API.G_RET_STS_ERROR;
1861:
1862:
1863: rollback to Delete_Dependency_Start;
1864:
1892: , p_eam_res_usage_tbl => l_eam_res_usage_tbl
1893: , p_eam_mat_req_tbl => l_eam_mat_req_tbl
1894: , p_eam_direct_items_tbl => l_eam_di_tbl
1895: , p_mesg_token_tbl => l_mesg_token_tbl
1896: , p_error_status => FND_API.G_RET_STS_ERROR
1897: , p_error_scope => EAM_ERROR_MESSAGE_PVT.G_SCOPE_RECORD
1898: , p_other_status => EAM_ERROR_MESSAGE_PVT.G_STATUS_ERROR
1899: , p_other_message => l_other_message
1900: , p_other_token_tbl => l_other_token_tbl
1951:
1952: EAM_WO_NETWORK_VALIDATE_PVT.Validate_Structure
1953: (
1954: p_api_version => 1.0,
1955: p_init_msg_list => FND_API.G_FALSE,
1956: p_commit => FND_API.G_FALSE,
1957: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1958:
1959: p_work_object_id => l_eam_wo_tbl(l_eam_wo_tbl.first).wip_entity_id,
1952: EAM_WO_NETWORK_VALIDATE_PVT.Validate_Structure
1953: (
1954: p_api_version => 1.0,
1955: p_init_msg_list => FND_API.G_FALSE,
1956: p_commit => FND_API.G_FALSE,
1957: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1958:
1959: p_work_object_id => l_eam_wo_tbl(l_eam_wo_tbl.first).wip_entity_id,
1960: p_work_object_type_id => 1,
1953: (
1954: p_api_version => 1.0,
1955: p_init_msg_list => FND_API.G_FALSE,
1956: p_commit => FND_API.G_FALSE,
1957: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1958:
1959: p_work_object_id => l_eam_wo_tbl(l_eam_wo_tbl.first).wip_entity_id,
1960: p_work_object_type_id => 1,
1961: p_exception_logging => 'Y',
1969: x_wo_relationship_exc_tbl => l_wo_relationship_exc_tbl
1970: );
1971:
1972:
1973: IF l_return_status = FND_API.G_RET_STS_ERROR OR
1974: l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1975:
1976: x_return_status := l_return_status; -- added for bug# 3544860
1977:
1970: );
1971:
1972:
1973: IF l_return_status = FND_API.G_RET_STS_ERROR OR
1974: l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1975:
1976: x_return_status := l_return_status; -- added for bug# 3544860
1977:
1978: l_out_mesg_token_tbl := l_mesg_token_tbl;
2014: , p_eam_res_usage_tbl => l_eam_res_usage_tbl
2015: , p_eam_mat_req_tbl => l_eam_mat_req_tbl
2016: , p_eam_direct_items_tbl => l_eam_di_tbl
2017: , p_mesg_token_tbl => l_mesg_token_tbl
2018: , p_error_status => FND_API.G_RET_STS_ERROR
2019: , p_error_scope => EAM_ERROR_MESSAGE_PVT.G_SCOPE_RECORD
2020: , p_other_status => EAM_ERROR_MESSAGE_PVT.G_STATUS_ERROR
2021: , p_other_message => l_other_message
2022: , p_other_token_tbl => l_other_token_tbl
2098: x_eam_wo_comp_mr_read_tbl := l_eam_wo_comp_mr_read_tbl;
2099: x_eam_op_comp_tbl := l_eam_op_comp_tbl;
2100: x_eam_request_tbl := l_eam_request_tbl;
2101:
2102: if nvl(l_eam_return_status,FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS then
2103: x_return_status := FND_API.G_RET_STS_ERROR;
2104: end if;
2105:
2106: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;
2099: x_eam_op_comp_tbl := l_eam_op_comp_tbl;
2100: x_eam_request_tbl := l_eam_request_tbl;
2101:
2102: if nvl(l_eam_return_status,FND_API.G_RET_STS_ERROR) <> FND_API.G_RET_STS_SUCCESS then
2103: x_return_status := FND_API.G_RET_STS_ERROR;
2104: end if;
2105:
2106: x_msg_count := EAM_ERROR_MESSAGE_PVT.Get_Message_Count;
2107:
2162: , p_eam_res_usage_tbl => l_eam_res_usage_tbl
2163: , p_eam_mat_req_tbl => l_eam_mat_req_tbl
2164: , p_eam_direct_items_tbl => l_eam_di_tbl
2165: , p_mesg_token_tbl => l_mesg_token_tbl
2166: , p_error_status => FND_API.G_RET_STS_ERROR
2167: , p_error_scope => EAM_ERROR_MESSAGE_PVT.G_SCOPE_RECORD
2168: , p_other_status => EAM_ERROR_MESSAGE_PVT.G_STATUS_ERROR
2169: , p_other_message => l_other_message
2170: , p_other_token_tbl => l_other_token_tbl
2264: l_batch_id NUMBER;
2265: l_header_id_tbl EAM_PROCESS_WO_PUB.header_id_tbl_type;
2266: l_count NUMBER;
2267: l_header_id NUMBER;
2268: l_found VARCHAR2(1) := FND_API.G_FALSE;
2269: l_return_status VARCHAR2(1);
2270:
2271: l_eam_wo_tbl EAM_PROCESS_WO_PUB.eam_wo_tbl_type
2272: := p_eam_wo_tbl;
2307: := p_eam_request_tbl;
2308:
2309: BEGIN
2310:
2311: l_return_status := FND_API.G_RET_STS_SUCCESS;
2312:
2313: l_batch_id := null;
2314:
2315: if l_eam_wo_tbl.count > 0 then
2314:
2315: if l_eam_wo_tbl.count > 0 then
2316: FOR i in l_eam_wo_tbl.first..l_eam_wo_tbl.last LOOP
2317: IF l_eam_wo_tbl(i).batch_id is null or l_eam_wo_tbl(i).header_id is null then
2318: l_return_status := FND_API.G_RET_STS_ERROR;
2319: return;
2320: END IF;
2321: l_eam_wo_tbl(i).row_id := i;
2322: IF l_batch_id = null THEN
2321: l_eam_wo_tbl(i).row_id := i;
2322: IF l_batch_id = null THEN
2323: l_batch_id := l_eam_wo_tbl(i).batch_id;
2324: ELSIF l_batch_id <> l_eam_wo_tbl(i).batch_id THEN
2325: l_return_status := FND_API.G_RET_STS_ERROR;
2326: END IF;
2327: l_header_id := l_eam_wo_tbl(i).header_id;
2328: l_found := FND_API.G_FALSE;
2329: if l_header_id_tbl.count > 0 then
2324: ELSIF l_batch_id <> l_eam_wo_tbl(i).batch_id THEN
2325: l_return_status := FND_API.G_RET_STS_ERROR;
2326: END IF;
2327: l_header_id := l_eam_wo_tbl(i).header_id;
2328: l_found := FND_API.G_FALSE;
2329: if l_header_id_tbl.count > 0 then
2330: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2331: if l_header_id = l_header_id_tbl(j).header_id then
2332: l_found := FND_API.G_TRUE;
2328: l_found := FND_API.G_FALSE;
2329: if l_header_id_tbl.count > 0 then
2330: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2331: if l_header_id = l_header_id_tbl(j).header_id then
2332: l_found := FND_API.G_TRUE;
2333: end if;
2334: end loop;
2335: end if;
2336: if l_found = FND_API.G_FALSE then
2332: l_found := FND_API.G_TRUE;
2333: end if;
2334: end loop;
2335: end if;
2336: if l_found = FND_API.G_FALSE then
2337: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2338: end if;
2339: END LOOP;
2340: end if;
2342:
2343: if l_eam_op_tbl.count > 0 then
2344: FOR i in l_eam_op_tbl.first..l_eam_op_tbl.last LOOP
2345: IF l_eam_op_tbl(i).batch_id is null or l_eam_op_tbl(i).header_id is null then
2346: l_return_status := FND_API.G_RET_STS_ERROR;
2347: return;
2348: END IF;
2349: l_eam_op_tbl(i).row_id := i;
2350: IF l_batch_id = null THEN
2349: l_eam_op_tbl(i).row_id := i;
2350: IF l_batch_id = null THEN
2351: l_batch_id := l_eam_op_tbl(i).batch_id;
2352: ELSIF l_batch_id <> l_eam_op_tbl(i).batch_id THEN
2353: l_return_status := FND_API.G_RET_STS_ERROR;
2354: END IF;
2355: l_header_id := l_eam_op_tbl(i).header_id;
2356: l_found := FND_API.G_FALSE;
2357: if l_header_id_tbl.count > 0 then
2352: ELSIF l_batch_id <> l_eam_op_tbl(i).batch_id THEN
2353: l_return_status := FND_API.G_RET_STS_ERROR;
2354: END IF;
2355: l_header_id := l_eam_op_tbl(i).header_id;
2356: l_found := FND_API.G_FALSE;
2357: if l_header_id_tbl.count > 0 then
2358: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2359: if l_header_id = l_header_id_tbl(j).header_id then
2360: l_found := FND_API.G_TRUE;
2356: l_found := FND_API.G_FALSE;
2357: if l_header_id_tbl.count > 0 then
2358: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2359: if l_header_id = l_header_id_tbl(j).header_id then
2360: l_found := FND_API.G_TRUE;
2361: end if;
2362: end loop;
2363: end if;
2364: if l_found = FND_API.G_FALSE then
2360: l_found := FND_API.G_TRUE;
2361: end if;
2362: end loop;
2363: end if;
2364: if l_found = FND_API.G_FALSE then
2365: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2366: end if;
2367: END LOOP;
2368: end if;
2370:
2371: if l_eam_op_network_tbl.count > 0 then
2372: FOR i in l_eam_op_network_tbl.first..l_eam_op_network_tbl.last LOOP
2373: IF l_eam_op_network_tbl(i).batch_id is null or l_eam_op_network_tbl(i).header_id is null then
2374: l_return_status := FND_API.G_RET_STS_ERROR;
2375: return;
2376: END IF;
2377: l_eam_op_network_tbl(i).row_id := i;
2378: IF l_batch_id = null THEN
2377: l_eam_op_network_tbl(i).row_id := i;
2378: IF l_batch_id = null THEN
2379: l_batch_id := l_eam_op_network_tbl(i).batch_id;
2380: ELSIF l_batch_id <> l_eam_op_network_tbl(i).batch_id THEN
2381: l_return_status := FND_API.G_RET_STS_ERROR;
2382: END IF;
2383: l_header_id := l_eam_op_network_tbl(i).header_id;
2384: l_found := FND_API.G_FALSE;
2385: if l_header_id_tbl.count > 0 then
2380: ELSIF l_batch_id <> l_eam_op_network_tbl(i).batch_id THEN
2381: l_return_status := FND_API.G_RET_STS_ERROR;
2382: END IF;
2383: l_header_id := l_eam_op_network_tbl(i).header_id;
2384: l_found := FND_API.G_FALSE;
2385: if l_header_id_tbl.count > 0 then
2386: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2387: if l_header_id = l_header_id_tbl(j).header_id then
2388: l_found := FND_API.G_TRUE;
2384: l_found := FND_API.G_FALSE;
2385: if l_header_id_tbl.count > 0 then
2386: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2387: if l_header_id = l_header_id_tbl(j).header_id then
2388: l_found := FND_API.G_TRUE;
2389: end if;
2390: end loop;
2391: end if;
2392: if l_found = FND_API.G_FALSE then
2388: l_found := FND_API.G_TRUE;
2389: end if;
2390: end loop;
2391: end if;
2392: if l_found = FND_API.G_FALSE then
2393: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2394: end if;
2395: END LOOP;
2396: end if;
2397:
2398: if l_eam_res_tbl.count > 0 then
2399: FOR i in l_eam_res_tbl.first..l_eam_res_tbl.last LOOP
2400: IF l_eam_res_tbl(i).batch_id is null or l_eam_res_tbl(i).header_id is null then
2401: l_return_status := FND_API.G_RET_STS_ERROR;
2402: return;
2403: END IF;
2404: l_eam_res_tbl(i).row_id := i;
2405: IF l_batch_id = null THEN
2404: l_eam_res_tbl(i).row_id := i;
2405: IF l_batch_id = null THEN
2406: l_batch_id := l_eam_res_tbl(i).batch_id;
2407: ELSIF l_batch_id <> l_eam_res_tbl(i).batch_id THEN
2408: l_return_status := FND_API.G_RET_STS_ERROR;
2409: END IF;
2410: l_header_id := l_eam_res_tbl(i).header_id;
2411: l_found := FND_API.G_FALSE;
2412: if l_header_id_tbl.count > 0 then
2407: ELSIF l_batch_id <> l_eam_res_tbl(i).batch_id THEN
2408: l_return_status := FND_API.G_RET_STS_ERROR;
2409: END IF;
2410: l_header_id := l_eam_res_tbl(i).header_id;
2411: l_found := FND_API.G_FALSE;
2412: if l_header_id_tbl.count > 0 then
2413: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2414: if l_header_id = l_header_id_tbl(j).header_id then
2415: l_found := FND_API.G_TRUE;
2411: l_found := FND_API.G_FALSE;
2412: if l_header_id_tbl.count > 0 then
2413: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2414: if l_header_id = l_header_id_tbl(j).header_id then
2415: l_found := FND_API.G_TRUE;
2416: end if;
2417: end loop;
2418: end if;
2419: if l_found = FND_API.G_FALSE then
2415: l_found := FND_API.G_TRUE;
2416: end if;
2417: end loop;
2418: end if;
2419: if l_found = FND_API.G_FALSE then
2420: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2421: end if;
2422: END LOOP;
2423: end if;
2424:
2425: if l_eam_res_inst_tbl.count > 0 then
2426: FOR i in l_eam_res_inst_tbl.first..l_eam_res_inst_tbl.last LOOP
2427: IF l_eam_res_inst_tbl(i).batch_id is null or l_eam_res_inst_tbl(i).header_id is null then
2428: l_return_status := FND_API.G_RET_STS_ERROR;
2429: return;
2430: END IF;
2431: l_eam_res_inst_tbl(i).row_id := i;
2432: IF l_batch_id = null THEN
2431: l_eam_res_inst_tbl(i).row_id := i;
2432: IF l_batch_id = null THEN
2433: l_batch_id := l_eam_res_inst_tbl(i).batch_id;
2434: ELSIF l_batch_id <> l_eam_res_inst_tbl(i).batch_id THEN
2435: l_return_status := FND_API.G_RET_STS_ERROR;
2436: END IF;
2437: l_header_id := l_eam_res_inst_tbl(i).header_id;
2438: l_found := FND_API.G_FALSE;
2439: if l_header_id_tbl.count > 0 then
2434: ELSIF l_batch_id <> l_eam_res_inst_tbl(i).batch_id THEN
2435: l_return_status := FND_API.G_RET_STS_ERROR;
2436: END IF;
2437: l_header_id := l_eam_res_inst_tbl(i).header_id;
2438: l_found := FND_API.G_FALSE;
2439: if l_header_id_tbl.count > 0 then
2440: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2441: if l_header_id = l_header_id_tbl(j).header_id then
2442: l_found := FND_API.G_TRUE;
2438: l_found := FND_API.G_FALSE;
2439: if l_header_id_tbl.count > 0 then
2440: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2441: if l_header_id = l_header_id_tbl(j).header_id then
2442: l_found := FND_API.G_TRUE;
2443: end if;
2444: end loop;
2445: end if;
2446: if l_found = FND_API.G_FALSE then
2442: l_found := FND_API.G_TRUE;
2443: end if;
2444: end loop;
2445: end if;
2446: if l_found = FND_API.G_FALSE then
2447: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2448: end if;
2449: END LOOP;
2450: end if;
2451:
2452: if l_eam_sub_res_tbl.count > 0 then
2453: FOR i in l_eam_sub_res_tbl.first..l_eam_sub_res_tbl.last LOOP
2454: IF l_eam_sub_res_tbl(i).batch_id is null or l_eam_sub_res_tbl(i).header_id is null then
2455: l_return_status := FND_API.G_RET_STS_ERROR;
2456: return;
2457: END IF;
2458: l_eam_sub_res_tbl(i).row_id := i;
2459: IF l_batch_id = null THEN
2458: l_eam_sub_res_tbl(i).row_id := i;
2459: IF l_batch_id = null THEN
2460: l_batch_id := l_eam_sub_res_tbl(i).batch_id;
2461: ELSIF l_batch_id <> l_eam_sub_res_tbl(i).batch_id THEN
2462: l_return_status := FND_API.G_RET_STS_ERROR;
2463: END IF;
2464: l_header_id := l_eam_sub_res_tbl(i).header_id;
2465: l_found := FND_API.G_FALSE;
2466: if l_header_id_tbl.count > 0 then
2461: ELSIF l_batch_id <> l_eam_sub_res_tbl(i).batch_id THEN
2462: l_return_status := FND_API.G_RET_STS_ERROR;
2463: END IF;
2464: l_header_id := l_eam_sub_res_tbl(i).header_id;
2465: l_found := FND_API.G_FALSE;
2466: if l_header_id_tbl.count > 0 then
2467: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2468: if l_header_id = l_header_id_tbl(j).header_id then
2469: l_found := FND_API.G_TRUE;
2465: l_found := FND_API.G_FALSE;
2466: if l_header_id_tbl.count > 0 then
2467: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2468: if l_header_id = l_header_id_tbl(j).header_id then
2469: l_found := FND_API.G_TRUE;
2470: end if;
2471: end loop;
2472: end if;
2473: if l_found = FND_API.G_FALSE then
2469: l_found := FND_API.G_TRUE;
2470: end if;
2471: end loop;
2472: end if;
2473: if l_found = FND_API.G_FALSE then
2474: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2475: end if;
2476: END LOOP;
2477: end if;
2478:
2479: if l_eam_res_usage_tbl.count > 0 then
2480: FOR i in l_eam_res_usage_tbl.first..l_eam_res_usage_tbl.last LOOP
2481: IF l_eam_res_usage_tbl(i).batch_id is null or l_eam_res_usage_tbl(i).header_id is null then
2482: l_return_status := FND_API.G_RET_STS_ERROR;
2483: return;
2484: END IF;
2485: l_eam_res_usage_tbl(i).row_id := i;
2486: IF l_batch_id = null THEN
2485: l_eam_res_usage_tbl(i).row_id := i;
2486: IF l_batch_id = null THEN
2487: l_batch_id := l_eam_res_usage_tbl(i).batch_id;
2488: ELSIF l_batch_id <> l_eam_res_usage_tbl(i).batch_id THEN
2489: l_return_status := FND_API.G_RET_STS_ERROR;
2490: END IF;
2491: l_header_id := l_eam_res_usage_tbl(i).header_id;
2492: l_found := FND_API.G_FALSE;
2493: if l_header_id_tbl.count > 0 then
2488: ELSIF l_batch_id <> l_eam_res_usage_tbl(i).batch_id THEN
2489: l_return_status := FND_API.G_RET_STS_ERROR;
2490: END IF;
2491: l_header_id := l_eam_res_usage_tbl(i).header_id;
2492: l_found := FND_API.G_FALSE;
2493: if l_header_id_tbl.count > 0 then
2494: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2495: if l_header_id = l_header_id_tbl(j).header_id then
2496: l_found := FND_API.G_TRUE;
2492: l_found := FND_API.G_FALSE;
2493: if l_header_id_tbl.count > 0 then
2494: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2495: if l_header_id = l_header_id_tbl(j).header_id then
2496: l_found := FND_API.G_TRUE;
2497: end if;
2498: end loop;
2499: end if;
2500: if l_found = FND_API.G_FALSE then
2496: l_found := FND_API.G_TRUE;
2497: end if;
2498: end loop;
2499: end if;
2500: if l_found = FND_API.G_FALSE then
2501: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2502: end if;
2503: END LOOP;
2504: end if;
2505:
2506: if l_eam_mat_req_tbl.count > 0 then
2507: FOR i in l_eam_mat_req_tbl.first..l_eam_mat_req_tbl.last LOOP
2508: IF l_eam_mat_req_tbl(i).batch_id is null or l_eam_mat_req_tbl(i).header_id is null then
2509: l_return_status := FND_API.G_RET_STS_ERROR;
2510: return;
2511: END IF;
2512: l_eam_mat_req_tbl(i).row_id := i;
2513: IF l_batch_id = null THEN
2512: l_eam_mat_req_tbl(i).row_id := i;
2513: IF l_batch_id = null THEN
2514: l_batch_id := l_eam_mat_req_tbl(i).batch_id;
2515: ELSIF l_batch_id <> l_eam_mat_req_tbl(i).batch_id THEN
2516: l_return_status := FND_API.G_RET_STS_ERROR;
2517: END IF;
2518: l_header_id := l_eam_mat_req_tbl(i).header_id;
2519: l_found := FND_API.G_FALSE;
2520: if l_header_id_tbl.count > 0 then
2515: ELSIF l_batch_id <> l_eam_mat_req_tbl(i).batch_id THEN
2516: l_return_status := FND_API.G_RET_STS_ERROR;
2517: END IF;
2518: l_header_id := l_eam_mat_req_tbl(i).header_id;
2519: l_found := FND_API.G_FALSE;
2520: if l_header_id_tbl.count > 0 then
2521: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2522: if l_header_id = l_header_id_tbl(j).header_id then
2523: l_found := FND_API.G_TRUE;
2519: l_found := FND_API.G_FALSE;
2520: if l_header_id_tbl.count > 0 then
2521: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2522: if l_header_id = l_header_id_tbl(j).header_id then
2523: l_found := FND_API.G_TRUE;
2524: end if;
2525: end loop;
2526: end if;
2527: if l_found = FND_API.G_FALSE then
2523: l_found := FND_API.G_TRUE;
2524: end if;
2525: end loop;
2526: end if;
2527: if l_found = FND_API.G_FALSE then
2528: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2529: end if;
2530: END LOOP;
2531: end if;
2532:
2533: if l_eam_direct_items_tbl.count > 0 then
2534: FOR i in l_eam_direct_items_tbl.first..l_eam_direct_items_tbl.last LOOP
2535: IF l_eam_direct_items_tbl(i).batch_id is null or l_eam_direct_items_tbl(i).header_id is null then
2536: l_return_status := FND_API.G_RET_STS_ERROR;
2537: return;
2538: END IF;
2539: l_eam_direct_items_tbl(i).row_id := i;
2540: IF l_batch_id = null THEN
2539: l_eam_direct_items_tbl(i).row_id := i;
2540: IF l_batch_id = null THEN
2541: l_batch_id := l_eam_direct_items_tbl(i).batch_id;
2542: ELSIF l_batch_id <> l_eam_direct_items_tbl(i).batch_id THEN
2543: l_return_status := FND_API.G_RET_STS_ERROR;
2544: END IF;
2545: l_header_id := l_eam_direct_items_tbl(i).header_id;
2546: l_found := FND_API.G_FALSE;
2547: if l_header_id_tbl.count > 0 then
2542: ELSIF l_batch_id <> l_eam_direct_items_tbl(i).batch_id THEN
2543: l_return_status := FND_API.G_RET_STS_ERROR;
2544: END IF;
2545: l_header_id := l_eam_direct_items_tbl(i).header_id;
2546: l_found := FND_API.G_FALSE;
2547: if l_header_id_tbl.count > 0 then
2548: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2549: if l_header_id = l_header_id_tbl(j).header_id then
2550: l_found := FND_API.G_TRUE;
2546: l_found := FND_API.G_FALSE;
2547: if l_header_id_tbl.count > 0 then
2548: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2549: if l_header_id = l_header_id_tbl(j).header_id then
2550: l_found := FND_API.G_TRUE;
2551: end if;
2552: end loop;
2553: end if;
2554: if l_found = FND_API.G_FALSE then
2550: l_found := FND_API.G_TRUE;
2551: end if;
2552: end loop;
2553: end if;
2554: if l_found = FND_API.G_FALSE then
2555: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2556: end if;
2557: END LOOP;
2558: end if;
2560: if l_eam_wo_comp_tbl.count > 0 then
2561:
2562: FOR i in l_eam_wo_comp_tbl.first..l_eam_wo_comp_tbl.last LOOP
2563: IF l_eam_wo_comp_tbl(i).batch_id is null or l_eam_wo_comp_tbl(i).header_id is null then
2564: l_return_status := FND_API.G_RET_STS_ERROR;
2565: return;
2566: END IF;
2567: l_eam_wo_comp_tbl(i).row_id := i;
2568: IF l_batch_id = null THEN
2567: l_eam_wo_comp_tbl(i).row_id := i;
2568: IF l_batch_id = null THEN
2569: l_batch_id := l_eam_wo_comp_tbl(i).batch_id;
2570: ELSIF l_batch_id <> l_eam_wo_comp_tbl(i).batch_id THEN
2571: l_return_status := FND_API.G_RET_STS_ERROR;
2572: END IF;
2573: l_header_id := l_eam_wo_comp_tbl(i).header_id;
2574: l_found := FND_API.G_FALSE;
2575: if l_header_id_tbl.count > 0 then
2570: ELSIF l_batch_id <> l_eam_wo_comp_tbl(i).batch_id THEN
2571: l_return_status := FND_API.G_RET_STS_ERROR;
2572: END IF;
2573: l_header_id := l_eam_wo_comp_tbl(i).header_id;
2574: l_found := FND_API.G_FALSE;
2575: if l_header_id_tbl.count > 0 then
2576: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2577: if l_header_id = l_header_id_tbl(j).header_id then
2578: l_found := FND_API.G_TRUE;
2574: l_found := FND_API.G_FALSE;
2575: if l_header_id_tbl.count > 0 then
2576: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2577: if l_header_id = l_header_id_tbl(j).header_id then
2578: l_found := FND_API.G_TRUE;
2579: end if;
2580: end loop;
2581: end if;
2582: if l_found = FND_API.G_FALSE then
2578: l_found := FND_API.G_TRUE;
2579: end if;
2580: end loop;
2581: end if;
2582: if l_found = FND_API.G_FALSE then
2583: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2584: end if;
2585: END LOOP;
2586: end if;
2587:
2588: if l_eam_wo_quality_tbl.count > 0 then
2589: FOR i in l_eam_wo_quality_tbl.first..l_eam_wo_quality_tbl.last LOOP
2590: IF l_eam_wo_quality_tbl(i).batch_id is null or l_eam_wo_quality_tbl(i).header_id is null then
2591: l_return_status := FND_API.G_RET_STS_ERROR;
2592: return;
2593: END IF;
2594: l_eam_wo_quality_tbl(i).row_id := i;
2595: IF l_batch_id = null THEN
2594: l_eam_wo_quality_tbl(i).row_id := i;
2595: IF l_batch_id = null THEN
2596: l_batch_id := l_eam_wo_quality_tbl(i).batch_id;
2597: ELSIF l_batch_id <> l_eam_wo_quality_tbl(i).batch_id THEN
2598: l_return_status := FND_API.G_RET_STS_ERROR;
2599: END IF;
2600: l_header_id := l_eam_wo_quality_tbl(i).header_id;
2601: l_found := FND_API.G_FALSE;
2602: if l_header_id_tbl.count > 0 then
2597: ELSIF l_batch_id <> l_eam_wo_quality_tbl(i).batch_id THEN
2598: l_return_status := FND_API.G_RET_STS_ERROR;
2599: END IF;
2600: l_header_id := l_eam_wo_quality_tbl(i).header_id;
2601: l_found := FND_API.G_FALSE;
2602: if l_header_id_tbl.count > 0 then
2603: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2604: if l_header_id = l_header_id_tbl(j).header_id then
2605: l_found := FND_API.G_TRUE;
2601: l_found := FND_API.G_FALSE;
2602: if l_header_id_tbl.count > 0 then
2603: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2604: if l_header_id = l_header_id_tbl(j).header_id then
2605: l_found := FND_API.G_TRUE;
2606: end if;
2607: end loop;
2608: end if;
2609: if l_found = FND_API.G_FALSE then
2605: l_found := FND_API.G_TRUE;
2606: end if;
2607: end loop;
2608: end if;
2609: if l_found = FND_API.G_FALSE then
2610: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2611: end if;
2612: END LOOP;
2613: end if;
2614:
2615: if l_eam_meter_reading_tbl.count > 0 then
2616: FOR i in l_eam_meter_reading_tbl.first..l_eam_meter_reading_tbl.last LOOP
2617: IF l_eam_meter_reading_tbl(i).batch_id is null or l_eam_meter_reading_tbl(i).header_id is null then
2618: l_return_status := FND_API.G_RET_STS_ERROR;
2619: return;
2620: END IF;
2621: l_eam_meter_reading_tbl(i).row_id := i;
2622: IF l_batch_id = null THEN
2621: l_eam_meter_reading_tbl(i).row_id := i;
2622: IF l_batch_id = null THEN
2623: l_batch_id := l_eam_meter_reading_tbl(i).batch_id;
2624: ELSIF l_batch_id <> l_eam_meter_reading_tbl(i).batch_id THEN
2625: l_return_status := FND_API.G_RET_STS_ERROR;
2626: END IF;
2627: l_header_id := l_eam_meter_reading_tbl(i).header_id;
2628: l_found := FND_API.G_FALSE;
2629: if l_header_id_tbl.count > 0 then
2624: ELSIF l_batch_id <> l_eam_meter_reading_tbl(i).batch_id THEN
2625: l_return_status := FND_API.G_RET_STS_ERROR;
2626: END IF;
2627: l_header_id := l_eam_meter_reading_tbl(i).header_id;
2628: l_found := FND_API.G_FALSE;
2629: if l_header_id_tbl.count > 0 then
2630: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2631: if l_header_id = l_header_id_tbl(j).header_id then
2632: l_found := FND_API.G_TRUE;
2628: l_found := FND_API.G_FALSE;
2629: if l_header_id_tbl.count > 0 then
2630: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2631: if l_header_id = l_header_id_tbl(j).header_id then
2632: l_found := FND_API.G_TRUE;
2633: end if;
2634: end loop;
2635: end if;
2636: if l_found = FND_API.G_FALSE then
2632: l_found := FND_API.G_TRUE;
2633: end if;
2634: end loop;
2635: end if;
2636: if l_found = FND_API.G_FALSE then
2637: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2638: end if;
2639: END LOOP;
2640: end if;
2641:
2642: if l_eam_counter_prop_tbl.count > 0 then
2643: FOR i in l_eam_counter_prop_tbl.first..l_eam_counter_prop_tbl.last LOOP
2644: IF l_eam_counter_prop_tbl(i).batch_id is null or l_eam_counter_prop_tbl(i).header_id is null then
2645: l_return_status := FND_API.G_RET_STS_ERROR;
2646: return;
2647: END IF;
2648: l_eam_counter_prop_tbl(i).row_id := i;
2649: IF l_batch_id = null THEN
2648: l_eam_counter_prop_tbl(i).row_id := i;
2649: IF l_batch_id = null THEN
2650: l_batch_id := l_eam_counter_prop_tbl(i).batch_id;
2651: ELSIF l_batch_id <> l_eam_counter_prop_tbl(i).batch_id THEN
2652: l_return_status := FND_API.G_RET_STS_ERROR;
2653: END IF;
2654: l_header_id := l_eam_counter_prop_tbl(i).header_id;
2655: l_found := FND_API.G_FALSE;
2656: if l_header_id_tbl.count > 0 then
2651: ELSIF l_batch_id <> l_eam_counter_prop_tbl(i).batch_id THEN
2652: l_return_status := FND_API.G_RET_STS_ERROR;
2653: END IF;
2654: l_header_id := l_eam_counter_prop_tbl(i).header_id;
2655: l_found := FND_API.G_FALSE;
2656: if l_header_id_tbl.count > 0 then
2657: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2658: if l_header_id = l_header_id_tbl(j).header_id then
2659: l_found := FND_API.G_TRUE;
2655: l_found := FND_API.G_FALSE;
2656: if l_header_id_tbl.count > 0 then
2657: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2658: if l_header_id = l_header_id_tbl(j).header_id then
2659: l_found := FND_API.G_TRUE;
2660: end if;
2661: end loop;
2662: end if;
2663: if l_found = FND_API.G_FALSE then
2659: l_found := FND_API.G_TRUE;
2660: end if;
2661: end loop;
2662: end if;
2663: if l_found = FND_API.G_FALSE then
2664: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2665: end if;
2666: END LOOP;
2667: end if;
2668:
2669: if l_eam_wo_comp_rebuild_tbl.count > 0 then
2670: FOR i in l_eam_wo_comp_rebuild_tbl.first..l_eam_wo_comp_rebuild_tbl.last LOOP
2671: IF l_eam_wo_comp_rebuild_tbl(i).batch_id is null or l_eam_wo_comp_rebuild_tbl(i).header_id is null then
2672: l_return_status := FND_API.G_RET_STS_ERROR;
2673: return;
2674: END IF;
2675: l_eam_wo_comp_rebuild_tbl(i).row_id := i;
2676: IF l_batch_id = null THEN
2675: l_eam_wo_comp_rebuild_tbl(i).row_id := i;
2676: IF l_batch_id = null THEN
2677: l_batch_id := l_eam_wo_comp_rebuild_tbl(i).batch_id;
2678: ELSIF l_batch_id <> l_eam_wo_comp_rebuild_tbl(i).batch_id THEN
2679: l_return_status := FND_API.G_RET_STS_ERROR;
2680: END IF;
2681: l_header_id := l_eam_wo_comp_rebuild_tbl(i).header_id;
2682: l_found := FND_API.G_FALSE;
2683: if l_header_id_tbl.count > 0 then
2678: ELSIF l_batch_id <> l_eam_wo_comp_rebuild_tbl(i).batch_id THEN
2679: l_return_status := FND_API.G_RET_STS_ERROR;
2680: END IF;
2681: l_header_id := l_eam_wo_comp_rebuild_tbl(i).header_id;
2682: l_found := FND_API.G_FALSE;
2683: if l_header_id_tbl.count > 0 then
2684: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2685: if l_header_id = l_header_id_tbl(j).header_id then
2686: l_found := FND_API.G_TRUE;
2682: l_found := FND_API.G_FALSE;
2683: if l_header_id_tbl.count > 0 then
2684: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2685: if l_header_id = l_header_id_tbl(j).header_id then
2686: l_found := FND_API.G_TRUE;
2687: end if;
2688: end loop;
2689: end if;
2690: if l_found = FND_API.G_FALSE then
2686: l_found := FND_API.G_TRUE;
2687: end if;
2688: end loop;
2689: end if;
2690: if l_found = FND_API.G_FALSE then
2691: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2692: end if;
2693: END LOOP;
2694: end if;
2695:
2696: if l_eam_wo_comp_mr_read_tbl.count > 0 then
2697: FOR i in l_eam_wo_comp_mr_read_tbl.first..l_eam_wo_comp_mr_read_tbl.last LOOP
2698: IF l_eam_wo_comp_mr_read_tbl(i).batch_id is null or l_eam_wo_comp_mr_read_tbl(i).header_id is null then
2699: l_return_status := FND_API.G_RET_STS_ERROR;
2700: return;
2701: END IF;
2702: l_eam_wo_comp_mr_read_tbl(i).row_id := i;
2703: IF l_batch_id = null THEN
2702: l_eam_wo_comp_mr_read_tbl(i).row_id := i;
2703: IF l_batch_id = null THEN
2704: l_batch_id := l_eam_wo_comp_mr_read_tbl(i).batch_id;
2705: ELSIF l_batch_id <> l_eam_wo_comp_mr_read_tbl(i).batch_id THEN
2706: l_return_status := FND_API.G_RET_STS_ERROR;
2707: END IF;
2708: l_header_id := l_eam_wo_comp_mr_read_tbl(i).header_id;
2709: l_found := FND_API.G_FALSE;
2710: if l_header_id_tbl.count > 0 then
2705: ELSIF l_batch_id <> l_eam_wo_comp_mr_read_tbl(i).batch_id THEN
2706: l_return_status := FND_API.G_RET_STS_ERROR;
2707: END IF;
2708: l_header_id := l_eam_wo_comp_mr_read_tbl(i).header_id;
2709: l_found := FND_API.G_FALSE;
2710: if l_header_id_tbl.count > 0 then
2711: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2712: if l_header_id = l_header_id_tbl(j).header_id then
2713: l_found := FND_API.G_TRUE;
2709: l_found := FND_API.G_FALSE;
2710: if l_header_id_tbl.count > 0 then
2711: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2712: if l_header_id = l_header_id_tbl(j).header_id then
2713: l_found := FND_API.G_TRUE;
2714: end if;
2715: end loop;
2716: end if;
2717: if l_found = FND_API.G_FALSE then
2713: l_found := FND_API.G_TRUE;
2714: end if;
2715: end loop;
2716: end if;
2717: if l_found = FND_API.G_FALSE then
2718: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2719: end if;
2720: END LOOP;
2721: end if;
2722:
2723: if l_eam_op_comp_tbl.count > 0 then
2724: FOR i in l_eam_op_comp_tbl.first..l_eam_op_comp_tbl.last LOOP
2725: IF l_eam_op_comp_tbl(i).batch_id is null or l_eam_op_comp_tbl(i).header_id is null then
2726: l_return_status := FND_API.G_RET_STS_ERROR;
2727: return;
2728: END IF;
2729: l_eam_op_comp_tbl(i).row_id := i;
2730: IF l_batch_id = null THEN
2729: l_eam_op_comp_tbl(i).row_id := i;
2730: IF l_batch_id = null THEN
2731: l_batch_id := l_eam_op_comp_tbl(i).batch_id;
2732: ELSIF l_batch_id <> l_eam_op_comp_tbl(i).batch_id THEN
2733: l_return_status := FND_API.G_RET_STS_ERROR;
2734: END IF;
2735: l_header_id := l_eam_op_comp_tbl(i).header_id;
2736: l_found := FND_API.G_FALSE;
2737: if l_header_id_tbl.count > 0 then
2732: ELSIF l_batch_id <> l_eam_op_comp_tbl(i).batch_id THEN
2733: l_return_status := FND_API.G_RET_STS_ERROR;
2734: END IF;
2735: l_header_id := l_eam_op_comp_tbl(i).header_id;
2736: l_found := FND_API.G_FALSE;
2737: if l_header_id_tbl.count > 0 then
2738: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2739: if l_header_id = l_header_id_tbl(j).header_id then
2740: l_found := FND_API.G_TRUE;
2736: l_found := FND_API.G_FALSE;
2737: if l_header_id_tbl.count > 0 then
2738: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2739: if l_header_id = l_header_id_tbl(j).header_id then
2740: l_found := FND_API.G_TRUE;
2741: end if;
2742: end loop;
2743: end if;
2744: if l_found = FND_API.G_FALSE then
2740: l_found := FND_API.G_TRUE;
2741: end if;
2742: end loop;
2743: end if;
2744: if l_found = FND_API.G_FALSE then
2745: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2746: end if;
2747: END LOOP;
2748: end if;
2749:
2750: if l_eam_request_tbl.count > 0 then
2751: FOR i in l_eam_request_tbl.first..l_eam_request_tbl.last LOOP
2752: IF l_eam_request_tbl(i).batch_id is null or l_eam_request_tbl(i).header_id is null then
2753: l_return_status := FND_API.G_RET_STS_ERROR;
2754: return;
2755: END IF;
2756: l_eam_request_tbl(i).row_id := i;
2757: IF l_batch_id = null THEN
2756: l_eam_request_tbl(i).row_id := i;
2757: IF l_batch_id = null THEN
2758: l_batch_id := l_eam_request_tbl(i).batch_id;
2759: ELSIF l_batch_id <> l_eam_request_tbl(i).batch_id THEN
2760: l_return_status := FND_API.G_RET_STS_ERROR;
2761: END IF;
2762: l_header_id := l_eam_request_tbl(i).header_id;
2763: l_found := FND_API.G_FALSE;
2764: if l_header_id_tbl.count > 0 then
2759: ELSIF l_batch_id <> l_eam_request_tbl(i).batch_id THEN
2760: l_return_status := FND_API.G_RET_STS_ERROR;
2761: END IF;
2762: l_header_id := l_eam_request_tbl(i).header_id;
2763: l_found := FND_API.G_FALSE;
2764: if l_header_id_tbl.count > 0 then
2765: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2766: if l_header_id = l_header_id_tbl(j).header_id then
2767: l_found := FND_API.G_TRUE;
2763: l_found := FND_API.G_FALSE;
2764: if l_header_id_tbl.count > 0 then
2765: for j in l_header_id_tbl.first..l_header_id_tbl.last loop
2766: if l_header_id = l_header_id_tbl(j).header_id then
2767: l_found := FND_API.G_TRUE;
2768: end if;
2769: end loop;
2770: end if;
2771: if l_found = FND_API.G_FALSE then
2767: l_found := FND_API.G_TRUE;
2768: end if;
2769: end loop;
2770: end if;
2771: if l_found = FND_API.G_FALSE then
2772: l_header_id_tbl(l_header_id_tbl.count+1).header_id := l_header_id;
2773: end if;
2774: END LOOP;
2775: end if;
2775: end if;
2776:
2777:
2778: -- If return status is not success, then set all records as unprocessed
2779: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
2780:
2781: for i in l_eam_wo_tbl.first..l_eam_wo_tbl.last loop
2782: if l_eam_wo_tbl(i).transaction_type is not null then
2783: l_eam_wo_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2779: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
2780:
2781: for i in l_eam_wo_tbl.first..l_eam_wo_tbl.last loop
2782: if l_eam_wo_tbl(i).transaction_type is not null then
2783: l_eam_wo_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2784: end if;
2785: end loop;
2786:
2787: for i in l_eam_wo_relations_tbl.first..l_eam_wo_relations_tbl.last loop
2785: end loop;
2786:
2787: for i in l_eam_wo_relations_tbl.first..l_eam_wo_relations_tbl.last loop
2788: if l_eam_wo_relations_tbl(i).transaction_type is not null then
2789: l_eam_wo_relations_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2790: end if;
2791: end loop;
2792:
2793: for i in l_eam_op_tbl.first..l_eam_op_tbl.last loop
2791: end loop;
2792:
2793: for i in l_eam_op_tbl.first..l_eam_op_tbl.last loop
2794: if l_eam_op_tbl(i).transaction_type is not null then
2795: l_eam_op_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2796: end if;
2797: end loop;
2798:
2799: for i in l_eam_op_network_tbl.first..l_eam_op_tbl.last loop
2797: end loop;
2798:
2799: for i in l_eam_op_network_tbl.first..l_eam_op_tbl.last loop
2800: if l_eam_op_network_tbl(i).transaction_type is not null then
2801: l_eam_op_network_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2802: end if;
2803: end loop;
2804:
2805: for i in l_eam_res_tbl.first..l_eam_res_tbl.last loop
2803: end loop;
2804:
2805: for i in l_eam_res_tbl.first..l_eam_res_tbl.last loop
2806: if l_eam_res_tbl(i).transaction_type is not null then
2807: l_eam_res_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2808: end if;
2809: end loop;
2810:
2811: for i in l_eam_res_inst_tbl.first..l_eam_res_inst_tbl.last loop
2809: end loop;
2810:
2811: for i in l_eam_res_inst_tbl.first..l_eam_res_inst_tbl.last loop
2812: if l_eam_res_inst_tbl(i).transaction_type is not null then
2813: l_eam_res_inst_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2814: end if;
2815: end loop;
2816:
2817: for i in l_eam_sub_res_tbl.first..l_eam_sub_res_tbl.last loop
2815: end loop;
2816:
2817: for i in l_eam_sub_res_tbl.first..l_eam_sub_res_tbl.last loop
2818: if l_eam_sub_res_tbl(i).transaction_type is not null then
2819: l_eam_sub_res_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2820: end if;
2821: end loop;
2822:
2823:
2822:
2823:
2824: for i in l_eam_res_usage_tbl.first..l_eam_res_usage_tbl.last loop
2825: if l_eam_res_usage_tbl(i).transaction_type is not null then
2826: l_eam_res_usage_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2827: end if;
2828: end loop;
2829:
2830: for i in l_eam_mat_req_tbl.first..l_eam_mat_req_tbl.last loop
2828: end loop;
2829:
2830: for i in l_eam_mat_req_tbl.first..l_eam_mat_req_tbl.last loop
2831: if l_eam_mat_req_tbl(i).transaction_type is not null then
2832: l_eam_mat_req_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2833: end if;
2834: end loop;
2835:
2836: for i in l_eam_direct_items_tbl.first..l_eam_direct_items_tbl.last loop
2834: end loop;
2835:
2836: for i in l_eam_direct_items_tbl.first..l_eam_direct_items_tbl.last loop
2837: if l_eam_direct_items_tbl(i).transaction_type is not null then
2838: l_eam_direct_items_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2839: end if;
2840:
2841: for i in l_eam_wo_comp_tbl.first..l_eam_wo_comp_tbl.last loop
2842: if l_eam_wo_comp_tbl(i).transaction_type is not null then
2839: end if;
2840:
2841: for i in l_eam_wo_comp_tbl.first..l_eam_wo_comp_tbl.last loop
2842: if l_eam_wo_comp_tbl(i).transaction_type is not null then
2843: l_eam_wo_comp_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2844: end if;
2845: end loop;
2846:
2847: for i in l_eam_wo_quality_tbl.first..l_eam_wo_quality_tbl.last loop
2845: end loop;
2846:
2847: for i in l_eam_wo_quality_tbl.first..l_eam_wo_quality_tbl.last loop
2848: if l_eam_wo_quality_tbl(i).transaction_type is not null then
2849: l_eam_wo_quality_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2850: end if;
2851: end loop;
2852:
2853: for i in l_eam_meter_reading_tbl.first..l_eam_meter_reading_tbl.last loop
2851: end loop;
2852:
2853: for i in l_eam_meter_reading_tbl.first..l_eam_meter_reading_tbl.last loop
2854: if l_eam_meter_reading_tbl(i).transaction_type is not null then
2855: l_eam_meter_reading_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2856: end if;
2857: end loop;
2858:
2859: for i in l_eam_counter_prop_tbl.first..l_eam_counter_prop_tbl.last loop
2857: end loop;
2858:
2859: for i in l_eam_counter_prop_tbl.first..l_eam_counter_prop_tbl.last loop
2860: if l_eam_counter_prop_tbl(i).transaction_type is not null then
2861: l_eam_counter_prop_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2862: end if;
2863: end loop;
2864:
2865: for i in l_eam_wo_comp_rebuild_tbl.first..l_eam_wo_comp_rebuild_tbl.last loop
2863: end loop;
2864:
2865: for i in l_eam_wo_comp_rebuild_tbl.first..l_eam_wo_comp_rebuild_tbl.last loop
2866: if l_eam_wo_comp_rebuild_tbl(i).transaction_type is not null then
2867: l_eam_wo_comp_rebuild_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2868: end if;
2869: end loop;
2870:
2871: for i in l_eam_wo_comp_mr_read_tbl.first..l_eam_wo_comp_mr_read_tbl.last loop
2869: end loop;
2870:
2871: for i in l_eam_wo_comp_mr_read_tbl.first..l_eam_wo_comp_mr_read_tbl.last loop
2872: if l_eam_wo_comp_mr_read_tbl(i).transaction_type is not null then
2873: l_eam_wo_comp_mr_read_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2874: end if;
2875: end loop;
2876:
2877: for i in l_eam_op_comp_tbl.first..l_eam_op_comp_tbl.last loop
2875: end loop;
2876:
2877: for i in l_eam_op_comp_tbl.first..l_eam_op_comp_tbl.last loop
2878: if l_eam_op_comp_tbl(i).transaction_type is not null then
2879: l_eam_op_comp_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2880: end if;
2881: end loop;
2882:
2883: for i in l_eam_request_tbl.first..l_eam_request_tbl.last loop
2881: end loop;
2882:
2883: for i in l_eam_request_tbl.first..l_eam_request_tbl.last loop
2884: if l_eam_request_tbl(i).transaction_type is not null then
2885: l_eam_request_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2886: end if;
2887: end loop;
2888:
2889: end loop;
2918:
2919: EXCEPTION
2920:
2921: WHEN OTHERS THEN
2922: l_return_status := FND_API.G_RET_STS_ERROR;
2923: -- set all records as unprocessed
2924:
2925: for i in l_eam_wo_tbl.first..l_eam_wo_tbl.last loop
2926: if l_eam_wo_tbl(i).transaction_type is not null then
2923: -- set all records as unprocessed
2924:
2925: for i in l_eam_wo_tbl.first..l_eam_wo_tbl.last loop
2926: if l_eam_wo_tbl(i).transaction_type is not null then
2927: l_eam_wo_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2928: end if;
2929: end loop;
2930:
2931: for i in l_eam_wo_relations_tbl.first..l_eam_wo_relations_tbl.last loop
2929: end loop;
2930:
2931: for i in l_eam_wo_relations_tbl.first..l_eam_wo_relations_tbl.last loop
2932: if l_eam_wo_relations_tbl(i).transaction_type is not null then
2933: l_eam_wo_relations_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2934: end if;
2935: end loop;
2936:
2937: for i in l_eam_op_tbl.first..l_eam_op_tbl.last loop
2935: end loop;
2936:
2937: for i in l_eam_op_tbl.first..l_eam_op_tbl.last loop
2938: if l_eam_op_tbl(i).transaction_type is not null then
2939: l_eam_op_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2940: end if;
2941: end loop;
2942:
2943: for i in l_eam_op_network_tbl.first..l_eam_op_tbl.last loop
2941: end loop;
2942:
2943: for i in l_eam_op_network_tbl.first..l_eam_op_tbl.last loop
2944: if l_eam_op_network_tbl(i).transaction_type is not null then
2945: l_eam_op_network_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2946: end if;
2947: end loop;
2948:
2949: for i in l_eam_res_tbl.first..l_eam_res_tbl.last loop
2947: end loop;
2948:
2949: for i in l_eam_res_tbl.first..l_eam_res_tbl.last loop
2950: if l_eam_res_tbl(i).transaction_type is not null then
2951: l_eam_res_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2952: end if;
2953: end loop;
2954:
2955: for i in l_eam_res_inst_tbl.first..l_eam_res_inst_tbl.last loop
2953: end loop;
2954:
2955: for i in l_eam_res_inst_tbl.first..l_eam_res_inst_tbl.last loop
2956: if l_eam_res_inst_tbl(i).transaction_type is not null then
2957: l_eam_res_inst_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2958: end if;
2959: end loop;
2960:
2961: for i in l_eam_sub_res_tbl.first..l_eam_sub_res_tbl.last loop
2959: end loop;
2960:
2961: for i in l_eam_sub_res_tbl.first..l_eam_sub_res_tbl.last loop
2962: if l_eam_sub_res_tbl(i).transaction_type is not null then
2963: l_eam_sub_res_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2964: end if;
2965: end loop;
2966:
2967: for i in l_eam_mat_req_tbl.first..l_eam_mat_req_tbl.last loop
2965: end loop;
2966:
2967: for i in l_eam_mat_req_tbl.first..l_eam_mat_req_tbl.last loop
2968: if l_eam_mat_req_tbl(i).transaction_type is not null then
2969: l_eam_mat_req_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2970: end if;
2971: end loop;
2972:
2973: for i in l_eam_direct_items_tbl.first..l_eam_direct_items_tbl.last loop
2971: end loop;
2972:
2973: for i in l_eam_direct_items_tbl.first..l_eam_direct_items_tbl.last loop
2974: if l_eam_direct_items_tbl(i).transaction_type is not null then
2975: l_eam_direct_items_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2976: end if;
2977: end loop;
2978:
2979: for i in l_eam_res_usage_tbl.first..l_eam_res_usage_tbl.last loop
2977: end loop;
2978:
2979: for i in l_eam_res_usage_tbl.first..l_eam_res_usage_tbl.last loop
2980: if l_eam_res_usage_tbl(i).transaction_type is not null then
2981: l_eam_res_usage_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2982: end if;
2983: end loop;
2984:
2985: for i in l_eam_wo_comp_tbl.first..l_eam_wo_comp_tbl.last loop
2983: end loop;
2984:
2985: for i in l_eam_wo_comp_tbl.first..l_eam_wo_comp_tbl.last loop
2986: if l_eam_wo_comp_tbl(i).transaction_type is not null then
2987: l_eam_wo_comp_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2988: end if;
2989: end loop;
2990:
2991: for i in l_eam_wo_quality_tbl.first..l_eam_wo_quality_tbl.last loop
2989: end loop;
2990:
2991: for i in l_eam_wo_quality_tbl.first..l_eam_wo_quality_tbl.last loop
2992: if l_eam_wo_quality_tbl(i).transaction_type is not null then
2993: l_eam_wo_quality_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
2994: end if;
2995: end loop;
2996:
2997: for i in l_eam_meter_reading_tbl.first..l_eam_meter_reading_tbl.last loop
2995: end loop;
2996:
2997: for i in l_eam_meter_reading_tbl.first..l_eam_meter_reading_tbl.last loop
2998: if l_eam_meter_reading_tbl(i).transaction_type is not null then
2999: l_eam_meter_reading_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
3000: end if;
3001: end loop;
3002:
3003: for i in l_eam_counter_prop_tbl.first..l_eam_counter_prop_tbl.last loop
3001: end loop;
3002:
3003: for i in l_eam_counter_prop_tbl.first..l_eam_counter_prop_tbl.last loop
3004: if l_eam_counter_prop_tbl(i).transaction_type is not null then
3005: l_eam_counter_prop_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
3006: end if;
3007: end loop;
3008:
3009: for i in l_eam_wo_comp_rebuild_tbl.first..l_eam_wo_comp_rebuild_tbl.last loop
3007: end loop;
3008:
3009: for i in l_eam_wo_comp_rebuild_tbl.first..l_eam_wo_comp_rebuild_tbl.last loop
3010: if l_eam_wo_comp_rebuild_tbl(i).transaction_type is not null then
3011: l_eam_wo_comp_rebuild_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
3012: end if;
3013: end loop;
3014:
3015: for i in l_eam_wo_comp_mr_read_tbl.first..l_eam_wo_comp_mr_read_tbl.last loop
3013: end loop;
3014:
3015: for i in l_eam_wo_comp_mr_read_tbl.first..l_eam_wo_comp_mr_read_tbl.last loop
3016: if l_eam_wo_comp_mr_read_tbl(i).transaction_type is not null then
3017: l_eam_wo_comp_mr_read_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
3018: end if;
3019: end loop;
3020:
3021: for i in l_eam_op_comp_tbl.first..l_eam_op_comp_tbl.last loop
3019: end loop;
3020:
3021: for i in l_eam_op_comp_tbl.first..l_eam_op_comp_tbl.last loop
3022: if l_eam_op_comp_tbl(i).transaction_type is not null then
3023: l_eam_op_comp_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
3024: end if;
3025: end loop;
3026:
3027: for i in l_eam_request_tbl.first..l_eam_request_tbl.last loop
3025: end loop;
3026:
3027: for i in l_eam_request_tbl.first..l_eam_request_tbl.last loop
3028: if l_eam_request_tbl(i).transaction_type is not null then
3029: l_eam_request_tbl(i).return_status := FND_API.G_RET_STS_ERROR;
3030: end if;
3031: end loop;
3032:
3033:
3409: , x_mesg_token_tbl => l_out_mesg_token_tbl
3410: );
3411: l_mesg_token_tbl := l_out_mesg_token_tbl;
3412:
3413: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
3414: THEN
3415: EAM_PROCESS_WO_PVT.Set_Debug('N');
3416: END IF;
3417: END IF;
4610:
4611:
4612: PROCEDURE EXPLODE_ACTIVITY
4613: ( p_api_version IN NUMBER := 1.0
4614: , p_init_msg_list IN VARCHAR2 := fnd_api.g_false
4615: , p_commit IN VARCHAR2 := fnd_api.g_false
4616: , p_validation_level IN NUMBER := fnd_api.g_valid_level_full
4617: , p_organization_id IN NUMBER
4618: , p_asset_activity_id IN NUMBER
4611:
4612: PROCEDURE EXPLODE_ACTIVITY
4613: ( p_api_version IN NUMBER := 1.0
4614: , p_init_msg_list IN VARCHAR2 := fnd_api.g_false
4615: , p_commit IN VARCHAR2 := fnd_api.g_false
4616: , p_validation_level IN NUMBER := fnd_api.g_valid_level_full
4617: , p_organization_id IN NUMBER
4618: , p_asset_activity_id IN NUMBER
4619: , p_wip_entity_id IN NUMBER
4612: PROCEDURE EXPLODE_ACTIVITY
4613: ( p_api_version IN NUMBER := 1.0
4614: , p_init_msg_list IN VARCHAR2 := fnd_api.g_false
4615: , p_commit IN VARCHAR2 := fnd_api.g_false
4616: , p_validation_level IN NUMBER := fnd_api.g_valid_level_full
4617: , p_organization_id IN NUMBER
4618: , p_asset_activity_id IN NUMBER
4619: , p_wip_entity_id IN NUMBER
4620: , p_start_date IN DATE
5313:
5314: PROCEDURE COPY_WORKORDER
5315: ( p_bo_identifier IN VARCHAR2 := 'EAM'
5316: , p_api_version_number IN NUMBER := 1.0
5317: , p_init_msg_list IN VARCHAR2 := fnd_api.g_false
5318: , p_commit IN VARCHAR2 := fnd_api.g_false
5319: , p_wip_entity_id IN NUMBER
5320: , p_organization_id IN NUMBER
5321: , x_eam_wo_rec OUT NOCOPY EAM_PROCESS_WO_PUB.eam_wo_rec_type
5314: PROCEDURE COPY_WORKORDER
5315: ( p_bo_identifier IN VARCHAR2 := 'EAM'
5316: , p_api_version_number IN NUMBER := 1.0
5317: , p_init_msg_list IN VARCHAR2 := fnd_api.g_false
5318: , p_commit IN VARCHAR2 := fnd_api.g_false
5319: , p_wip_entity_id IN NUMBER
5320: , p_organization_id IN NUMBER
5321: , x_eam_wo_rec OUT NOCOPY EAM_PROCESS_WO_PUB.eam_wo_rec_type
5322: , x_eam_op_tbl OUT NOCOPY EAM_PROCESS_WO_PUB.eam_op_tbl_type