[Home] [Help]
157: l_header_rec Header_Rec_Type;
158: l_line_rec Line_rec_type;
159: l_line_tbl Line_Tbl_type;
160:
161: l_rqmt_header_Rec csp_requirement_headers_pvt.requirement_header_rec_type;
162:
163: l_rqmt_line_Rec csp_requirement_lines_pvt.requirement_line_rec_type;
164: l_rqmt_line_Tbl csp_requirement_lines_pvt.requirement_line_tbl_type;
165: x_rqmt_line_Tbl csp_requirement_lines_pvt.requirement_line_tbl_type;
412: ELSE
413: BEGIN
414: select requirement_header_id
415: into l_check_existence
416: from csp_requirement_headers
417: where requirement_header_id = l_header_rec.requirement_header_id;
418: EXCEPTION
419: WHEN NO_DATA_FOUND THEN
420: fnd_message.set_name('CSP', 'CSP_INVALID_REQUIREMENT_HEADER');
425: WHEN OTHERS THEN
426: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
427: fnd_message.set_token('ERR_FIELD', 'l_header_rec.requirement_header_id', FALSE);
428: fnd_message.set_token('ROUTINE', G_PKG_NAME||'.'||l_api_name, FALSE);
429: fnd_message.set_token('TABLE', 'CSP_REQUIREMENT_HEADERS', FALSE);
430: FND_MSG_PUB.ADD;
431: RAISE EXCP_USER_DEFINED;
432: END;
433: END IF;
560: l_header_rec.requirement_header_id IS NULL) THEN
561: BEGIN
562: SELECT requirement_header_id
563: INTO l_requirement_header_id
564: FROM csp_requirement_headers
565: WHERE task_id = l_header_rec.task_id;
566: EXCEPTION
567: WHEN NO_DATA_FOUND THEN
568: -- call private api for inserting into csp_Requirement_headers
564: FROM csp_requirement_headers
565: WHERE task_id = l_header_rec.task_id;
566: EXCEPTION
567: WHEN NO_DATA_FOUND THEN
568: -- call private api for inserting into csp_Requirement_headers
569: CSP_REQUIREMENT_HEADERS_PVT.Create_requirement_headers(
570: P_Api_Version_Number => l_api_Version_number,
571: P_Init_Msg_List => p_init_msg_list,
572: P_Commit => FND_API.G_FALSE,
565: WHERE task_id = l_header_rec.task_id;
566: EXCEPTION
567: WHEN NO_DATA_FOUND THEN
568: -- call private api for inserting into csp_Requirement_headers
569: CSP_REQUIREMENT_HEADERS_PVT.Create_requirement_headers(
570: P_Api_Version_Number => l_api_Version_number,
571: P_Init_Msg_List => p_init_msg_list,
572: P_Commit => FND_API.G_FALSE,
573: p_validation_level => null,
592: ELSIF (l_header_rec.requirement_header_id IS NOT NULL) THEN
593: BEGIN
594: SELECT requirement_header_id
595: INTO l_requirement_header_id
596: FROM csp_requirement_headers
597: WHERE requirement_header_id = l_header_rec.requirement_header_id;
598: EXCEPTION
599: WHEN NO_DATA_FOUND THEN
600: -- call private api for inserting into csp_Requirement_headers
596: FROM csp_requirement_headers
597: WHERE requirement_header_id = l_header_rec.requirement_header_id;
598: EXCEPTION
599: WHEN NO_DATA_FOUND THEN
600: -- call private api for inserting into csp_Requirement_headers
601: CSP_REQUIREMENT_HEADERS_PVT.Create_requirement_headers(
602: P_Api_Version_Number => l_api_Version_number,
603: P_Init_Msg_List => p_init_msg_list,
604: P_Commit => FND_API.G_FALSE,
597: WHERE requirement_header_id = l_header_rec.requirement_header_id;
598: EXCEPTION
599: WHEN NO_DATA_FOUND THEN
600: -- call private api for inserting into csp_Requirement_headers
601: CSP_REQUIREMENT_HEADERS_PVT.Create_requirement_headers(
602: P_Api_Version_Number => l_api_Version_number,
603: P_Init_Msg_List => p_init_msg_list,
604: P_Commit => FND_API.G_FALSE,
605: p_validation_level => null,
619: END IF;
620: END IF;
621: END;
622: ELSE
623: -- call private api for inserting into csp_Requirement_headers
624: CSP_REQUIREMENT_HEADERS_PVT.Create_requirement_headers(
625: P_Api_Version_Number => l_api_Version_number,
626: P_Init_Msg_List => p_init_msg_list,
627: P_Commit => FND_API.G_FALSE,
620: END IF;
621: END;
622: ELSE
623: -- call private api for inserting into csp_Requirement_headers
624: CSP_REQUIREMENT_HEADERS_PVT.Create_requirement_headers(
625: P_Api_Version_Number => l_api_Version_number,
626: P_Init_Msg_List => p_init_msg_list,
627: P_Commit => FND_API.G_FALSE,
628: p_validation_level => null,
693: END LOOP;
694:
695: ELSIF (l_header_rec.operation = 'UPDATE') THEN
696: -- call private api for updating requirement headers
697: CSP_REQUIREMENT_HEADERS_PVT.Update_requirement_headers(
698: P_Api_Version_Number => l_api_Version_number,
699: P_Init_Msg_List => p_init_msg_list,
700: P_Commit => FND_API.G_FALSE,
701: p_validation_level => null,
815:
816: CURSOR rs_info_cur(p_rqmt_header_id NUMBER) IS
817: SELECT cla.organization_id,
818: cla.subinventory_code
819: FROM csp_requirement_headers crh,
820: jtf_task_assignments jta,
821: csp_INV_LOC_ASSIGNMENTS cla
822: WHERE cla.default_code = 'IN'
823: AND cla.resource_type = decode(crh.task_assignment_id,null,crh.resource_type,jta.resource_type_code)
1378: ELSE
1379: DELETE FROM csp_requirement_lines
1380: WHERE requirement_header_id = p_header_id;
1381:
1382: DELETE FROM csp_requirement_headers
1383: WHERE requirement_header_id = p_header_id;
1384: END IF;
1385:
1386: IF fnd_api.to_boolean(p_commit) THEN
1444: l_user_id NUMBER;
1445: l_login_id NUMBER;
1446: l_today DATE;
1447: l_parts_defined VARCHAR2(30);
1448: l_rqmt_header_Rec csp_requirement_headers_pvt.requirement_header_rec_type;
1449: l_rqmt_line_Rec csp_requirement_lines_pvt.requirement_line_rec_type;
1450: l_rqmt_line_Tbl csp_requirement_lines_pvt.requirement_line_tbl_type;
1451: l_rqmt_line_Tbl_out csp_requirement_lines_pvt.requirement_line_tbl_type;
1452: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1672: IF (l_header_rec.task_id IS NOT NULL) THEN
1673: BEGIN
1674: SELECT requirement_header_id
1675: INTO l_requirement_header_id
1676: FROM csp_requirement_headers
1677: WHERE task_id = l_header_rec.task_id;
1678:
1679: IF (l_requirement_header_id IS NOT NULL) THEN
1680: Rollback to save_rqmt_line_PUB;
1688: return;
1689: END IF;
1690: EXCEPTION
1691: WHEN NO_DATA_FOUND THEN
1692: -- call private api for inserting into csp_Requirement_headers
1693: CSP_REQUIREMENT_HEADERS_PVT.Create_requirement_headers(
1694: P_Api_Version_Number => l_api_Version_number,
1695: P_Init_Msg_List => p_init_msg_list,
1696: P_Commit => FND_API.G_FALSE,
1689: END IF;
1690: EXCEPTION
1691: WHEN NO_DATA_FOUND THEN
1692: -- call private api for inserting into csp_Requirement_headers
1693: CSP_REQUIREMENT_HEADERS_PVT.Create_requirement_headers(
1694: P_Api_Version_Number => l_api_Version_number,
1695: P_Init_Msg_List => p_init_msg_list,
1696: P_Commit => FND_API.G_FALSE,
1697: p_validation_level => null,
1714: WHEN OTHERS THEN
1715: NULL;
1716: END;
1717: ELSE */
1718: -- call private api for inserting into csp_Requirement_headers
1719: CSP_REQUIREMENT_HEADERS_PVT.Create_requirement_headers(
1720: P_Api_Version_Number => l_api_Version_number,
1721: P_Init_Msg_List => p_init_msg_list,
1722: P_Commit => FND_API.G_FALSE,
1715: NULL;
1716: END;
1717: ELSE */
1718: -- call private api for inserting into csp_Requirement_headers
1719: CSP_REQUIREMENT_HEADERS_PVT.Create_requirement_headers(
1720: P_Api_Version_Number => l_api_Version_number,
1721: P_Init_Msg_List => p_init_msg_list,
1722: P_Commit => FND_API.G_FALSE,
1723: p_validation_level => null,
1739: -- check to see if requirement_header_id is valid
1740: BEGIN
1741: select requirement_header_id
1742: into l_check_existence
1743: from csp_requirement_headers
1744: where requirement_header_id = l_header_rec.requirement_header_id;
1745: EXCEPTION
1746: WHEN NO_DATA_FOUND THEN
1747: fnd_message.set_name('CSP', 'CSP_INVALID_REQUIREMENT_HEADER');
1751: WHEN OTHERS THEN
1752: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
1753: fnd_message.set_token('ERR_FIELD', 'l_header_rec.requirement_header_id', FALSE);
1754: fnd_message.set_token('ROUTINE', G_PKG_NAME||'.'||l_api_name, FALSE);
1755: fnd_message.set_token('TABLE', 'CSP_REQUIREMENT_HEADERS', FALSE);
1756: FND_MSG_PUB.ADD;
1757: RAISE EXCP_USER_DEFINED;
1758: END;
1759:
1764: l_rqmt_header_Rec.ship_to_location_id := nvl(l_header_rec.ship_to_location_id, FND_API.G_MISS_NUM);
1765: l_rqmt_header_Rec.task_id := nvl(l_header_rec.task_id, FND_API.G_MISS_NUM);
1766: l_rqmt_header_Rec.need_by_date := nvl(l_header_rec.need_by_date, FND_API.G_MISS_DATE);
1767:
1768: CSP_REQUIREMENT_HEADERS_PVT.Update_requirement_headers(
1769: P_Api_Version_Number => l_api_Version_number,
1770: P_Init_Msg_List => p_init_msg_list,
1771: P_Commit => FND_API.G_FALSE,
1772: p_validation_level => null,
2070: l_header_rec.requirement_header_id,
2071: l_header_rec.need_by_Date,
2072: l_header_rec.dest_organization_id,
2073: l_header_rec.dest_subinventory
2074: FROM csp_Requirement_headers
2075: WHERE requirement_header_id = p_header_id;
2076:
2077: EXCEPTION
2078: WHEN no_data_found THEN
2360: l_header_Rec.ship_to_location_id,
2361: l_header_rec.need_by_Date,
2362: l_header_rec.dest_organization_id,
2363: l_header_rec.dest_subinventory
2364: FROM csp_Requirement_headers
2365: WHERE requirement_header_id = p_header_id;
2366:
2367: l_header_Rec.operation := G_OPR_CREATE;
2368:
2464: ELSE
2465: -- update open_requirement_flag on requirement header
2466: BEGIN
2467: l_open_requirement := 'S';
2468: update csp_requirement_headers
2469: set open_requirement = 'S'
2470: where requirement_header_id = p_header_id;
2471: EXCEPTION
2472: when others then
2542: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2543: RAISE FND_API.G_EXC_ERROR;
2544: ELSE
2545: IF (nvl(l_open_requirement, 'W') <> 'S') THEN
2546: update csp_requirement_headers
2547: set open_requirement = 'S'
2548: where requirement_header_id = p_header_id;
2549: END IF;
2550:
2634: l_subinventory_code VARCHAR2(30);
2635:
2636: CURSOR get_rqmt_Header IS
2637: SELECT requirement_header_id
2638: FROM csp_requirement_headers
2639: WHERE task_assignment_id = l_Task_Assignment_id;
2640:
2641: CURSOR get_resource_location IS
2642: SELECT ship_to_location_id
2672: FETCH get_rqmt_Header INTO l_rqmt_header_id;
2673: EXIT WHEN get_rqmt_Header%NOTFOUND;
2674:
2675: IF l_rqmt_header_id IS NOT NULL THEN
2676: UPDATE csp_requirement_headers
2677: SET task_assignment_id = l_task_assignment_id,
2678: ship_to_location_id = l_ship_to_location_id,
2679: destination_organization_id = l_organization_id,
2680: destination_subinventory = l_subinventory_code