2516: PROCEDURE validate_bom_resource
2517: (
2518: x_return_status OUT NOCOPY VARCHAR2,
2519: x_msg_data OUT NOCOPY VARCHAR2,
2520: p_bom_resource_code IN BOM_RESOURCES.resource_code%TYPE,
2521: p_x_bom_resource_id IN OUT NOCOPY BOM_RESOURCES.resource_id%TYPE,
2522: p_x_bom_org_id IN OUT NOCOPY BOM_RESOURCES.organization_id%TYPE
2523: )
2524: IS
2517: (
2518: x_return_status OUT NOCOPY VARCHAR2,
2519: x_msg_data OUT NOCOPY VARCHAR2,
2520: p_bom_resource_code IN BOM_RESOURCES.resource_code%TYPE,
2521: p_x_bom_resource_id IN OUT NOCOPY BOM_RESOURCES.resource_id%TYPE,
2522: p_x_bom_org_id IN OUT NOCOPY BOM_RESOURCES.organization_id%TYPE
2523: )
2524: IS
2525:
2518: x_return_status OUT NOCOPY VARCHAR2,
2519: x_msg_data OUT NOCOPY VARCHAR2,
2520: p_bom_resource_code IN BOM_RESOURCES.resource_code%TYPE,
2521: p_x_bom_resource_id IN OUT NOCOPY BOM_RESOURCES.resource_id%TYPE,
2522: p_x_bom_org_id IN OUT NOCOPY BOM_RESOURCES.organization_id%TYPE
2523: )
2524: IS
2525:
2526: l_bom_resource_id BOM_RESOURCES.resource_id%TYPE;
2522: p_x_bom_org_id IN OUT NOCOPY BOM_RESOURCES.organization_id%TYPE
2523: )
2524: IS
2525:
2526: l_bom_resource_id BOM_RESOURCES.resource_id%TYPE;
2527: l_bom_org_id BOM_RESOURCES.organization_id%TYPE;
2528:
2529: CURSOR get_rec_from_value ( c_bom_resource_code BOM_RESOURCES.resource_code%TYPE )
2530: IS
2523: )
2524: IS
2525:
2526: l_bom_resource_id BOM_RESOURCES.resource_id%TYPE;
2527: l_bom_org_id BOM_RESOURCES.organization_id%TYPE;
2528:
2529: CURSOR get_rec_from_value ( c_bom_resource_code BOM_RESOURCES.resource_code%TYPE )
2530: IS
2531: SELECT DISTINCT resource_id,
2525:
2526: l_bom_resource_id BOM_RESOURCES.resource_id%TYPE;
2527: l_bom_org_id BOM_RESOURCES.organization_id%TYPE;
2528:
2529: CURSOR get_rec_from_value ( c_bom_resource_code BOM_RESOURCES.resource_code%TYPE )
2530: IS
2531: SELECT DISTINCT resource_id,
2532: organization_id
2533: FROM BOM_RESOURCES
2529: CURSOR get_rec_from_value ( c_bom_resource_code BOM_RESOURCES.resource_code%TYPE )
2530: IS
2531: SELECT DISTINCT resource_id,
2532: organization_id
2533: FROM BOM_RESOURCES
2534: WHERE resource_code = c_bom_resource_code;
2535:
2536: CURSOR get_rec_from_id ( c_bom_resource_id BOM_RESOURCES.resource_id%TYPE,
2537: c_bom_org_id BOM_RESOURCES.organization_id%TYPE )
2532: organization_id
2533: FROM BOM_RESOURCES
2534: WHERE resource_code = c_bom_resource_code;
2535:
2536: CURSOR get_rec_from_id ( c_bom_resource_id BOM_RESOURCES.resource_id%TYPE,
2537: c_bom_org_id BOM_RESOURCES.organization_id%TYPE )
2538: IS
2539: SELECT DISTINCT resource_id,
2540: organization_id
2533: FROM BOM_RESOURCES
2534: WHERE resource_code = c_bom_resource_code;
2535:
2536: CURSOR get_rec_from_id ( c_bom_resource_id BOM_RESOURCES.resource_id%TYPE,
2537: c_bom_org_id BOM_RESOURCES.organization_id%TYPE )
2538: IS
2539: SELECT DISTINCT resource_id,
2540: organization_id
2541: FROM BOM_RESOURCES
2537: c_bom_org_id BOM_RESOURCES.organization_id%TYPE )
2538: IS
2539: SELECT DISTINCT resource_id,
2540: organization_id
2541: FROM BOM_RESOURCES
2542: WHERE resource_id = c_bom_resource_id
2543: AND organization_id = c_bom_org_id;
2544:
2545: BEGIN
2606: p_x_bom_resource_id := l_bom_resource_id;
2607: p_x_bom_org_id := l_bom_org_id;
2608: ELSE
2609: x_return_status := FND_API.G_RET_STS_ERROR;
2610: x_msg_data := 'AHL_RM_TOO_MANY_BOM_RESOURCES';
2611: END IF;
2612:
2613: CLOSE get_rec_from_value;
2614: RETURN;
2634:
2635: CURSOR get_rec_from_value ( c_bom_department_name BOM_DEPARTMENTS.DESCRIPTION%TYPE , c_bom_resource_id NUMBER, c_bom_org_id NUMBER)
2636: IS
2637: select distinct DEPT.department_id
2638: from bom_departments DEPT, BOM_DEPARTMENT_RESOURCES DEPT_RES, BOM_RESOURCES RES
2639: where DEPT_RES.department_id = DEPT.department_id
2640: and DEPT.description = c_bom_department_name
2641: and DEPT_RES.resource_id = c_bom_resource_id
2642: and DEPT.organization_id = c_bom_org_id;