[Home] [Help]
1906:
1907: END check_loose_quantity;
1908:
1909:
1910: PROCEDURE CHECK_WMS_INSTALL (
1911: x_return_status OUT NOCOPY VARCHAR2,
1912: p_msg_count OUT NOCOPY NUMBER,
1913: p_msg_data OUT NOCOPY VARCHAR2,
1914: p_org IN NUMBER
1915: )
1916: IS
1917: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1918: BEGIN
1919: IF wms_install.check_install(x_return_status,
1920: p_msg_count,
1921: p_msg_data,
1922: p_org) THEN
1923: x_return_status := 'Y';
1924: ELSE
1925: x_return_status := 'N';
1926: END IF;
1927:
1928: END check_WMS_install;
1929:
1930:
1931:
1932: FUNCTION check_lpn_reservation(p_lpn_id IN NUMBER,
2243: FUNCTION validate_lpn_status_quantity(
2244: p_lpn_id IN NUMBER,
2245: p_orgid IN NUMBER,
2246: p_to_org_id IN NUMBER,
2247: p_wms_installed IN VARCHAR2,
2248: p_transaction_type_id IN NUMBER,
2249: p_source_type_id IN NUMBER,
2250: x_return_msg OUT NOCOPY VARCHAR2
2251: )
2257: x_return := inv_ui_item_sub_loc_lovs.vaildate_lpn_status(
2258: p_lpn_id,
2259: p_orgid,
2260: p_to_org_id,
2261: p_wms_installed,
2262: p_transaction_type_id
2263: );
2264: /*
2265: x_return_msg is set to 'VALIDATE_LPN_STATUS_FAILED' to indicate to the calling
2306: FUNCTION validate_lpn_status_quantity(
2307: p_lpn_id IN NUMBER,
2308: p_orgid IN NUMBER,
2309: p_to_org_id IN NUMBER,
2310: p_wms_installed IN VARCHAR2,
2311: p_transaction_type_id IN NUMBER,
2312: p_source_type_id IN NUMBER,
2313: p_to_subinventory_code IN VARCHAR2,
2314: x_return_msg OUT NOCOPY VARCHAR2
2355: x_return := inv_ui_item_sub_loc_lovs.vaildate_lpn_status(
2356: p_lpn_id,
2357: p_orgid,
2358: p_to_org_id,
2359: p_wms_installed,
2360: p_transaction_type_id
2361: );*/
2362: /*
2363: x_return_msg is set to 'VALIDATE_LPN_STATUS_FAILED' to indicate to the calling
2403: FUNCTION validate_lpn_status_quantity2(
2404: p_lpn_id IN NUMBER,
2405: p_orgid IN NUMBER,
2406: p_to_org_id IN NUMBER,
2407: p_wms_installed IN VARCHAR2,
2408: p_transaction_type_id IN NUMBER,
2409: p_source_type_id IN NUMBER,
2410: x_return_msg OUT NOCOPY VARCHAR2
2411: )
2417: x_return := inv_ui_item_sub_loc_lovs.vaildate_lpn_status(
2418: p_lpn_id,
2419: p_orgid,
2420: p_to_org_id,
2421: p_wms_installed,
2422: p_transaction_type_id
2423: );
2424: /*
2425: x_return_msg is set to 'VALIDATE_LPN_STATUS_FAILED' to indicate to the calling
2482: FUNCTION orgxfer_lpn_check(
2483: p_lpn_id IN NUMBER,
2484: p_orgid IN NUMBER,
2485: p_to_org_id IN NUMBER,
2486: p_wms_installed IN VARCHAR2,
2487: p_transaction_type_id IN NUMBER,
2488: p_source_type_id IN NUMBER,
2489: x_return_msg OUT NOCOPY VARCHAR2
2490: )
2504: --check the status
2505: x_return := inv_ui_item_sub_loc_lovs.vaildate_lpn_status( p_lpn_id,
2506: p_orgid,
2507: p_to_org_id,
2508: p_wms_installed,
2509: p_transaction_type_id);
2510: if ( x_return <> 'Y' ) then
2511: x_return_msg := 'INVALID_STATUS';
2512: return x_return;
3699: , p_restrict_locators_code IN NUMBER
3700: , p_inventory_item_id IN NUMBER
3701: , p_concatenated_segments IN VARCHAR2
3702: , p_transaction_type_id IN NUMBER
3703: , p_wms_installed IN VARCHAR2
3704: ) IS
3705: l_org NUMBER;
3706: l_restrict_locators_code NUMBER;
3707: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3734: AND NVL(a.disable_date, TRUNC(SYSDATE + 1)) > TRUNC(SYSDATE)
3735: AND b.subinventory_code = p_subinventory_code
3736: AND a.inventory_location_id = b.secondary_locator
3737: AND a.concatenated_segments LIKE (p_concatenated_segments||'%')
3738: AND inv_material_status_grp.is_status_applicable(p_wms_installed, NULL, p_transaction_type_id, NULL, NULL, l_org, p_inventory_item_id, p_subinventory_code, a.inventory_location_id, NULL, NULL, 'L') = 'Y'
3739: ORDER BY a.concatenated_segments;
3740: ELSE --Locators not restricted
3741: OPEN x_locators FOR
3742: SELECT inventory_location_id
3746: WHERE organization_id = l_org
3747: AND subinventory_code = p_subinventory_code
3748: AND NVL(disable_date, TRUNC(SYSDATE + 1)) > TRUNC(SYSDATE)
3749: AND concatenated_segments LIKE (p_concatenated_segments||'%')
3750: AND inv_material_status_grp.is_status_applicable(p_wms_installed, NULL, p_transaction_type_id, NULL, NULL, l_org, p_inventory_item_id, p_subinventory_code, inventory_location_id, NULL, NULL, 'L') = 'Y'
3751: ORDER BY concatenated_segments;
3752: END IF;
3753: END get_valid_to_locs;
3754:
3762: , p_restrict_locators_code IN NUMBER
3763: , p_inventory_item_id IN NUMBER
3764: , p_concatenated_segments IN VARCHAR2
3765: , p_transaction_type_id IN NUMBER
3766: , p_wms_installed IN VARCHAR2
3767: , p_project_id IN NUMBER
3768: , p_task_id IN NUMBER
3769: ) IS
3770: l_org NUMBER;
3802: AND a.inventory_location_id = b.secondary_locator
3803: AND inv_project.get_locsegs(a.inventory_location_id, l_org) LIKE (p_concatenated_segments||'%')
3804: AND NVL(a.project_id, -1) = NVL(p_project_id, -1)
3805: AND NVL(a.task_id, -1) = NVL(p_task_id, -1)
3806: AND inv_material_status_grp.is_status_applicable(p_wms_installed, NULL, p_transaction_type_id, NULL, NULL, l_org, p_inventory_item_id, p_subinventory_code, a.inventory_location_id, NULL, NULL, 'L') = 'Y'
3807: ORDER BY 2;
3808: ELSE --Locators not restricted
3809: OPEN x_locators FOR
3810: SELECT inventory_location_id
3816: AND NVL(disable_date, TRUNC(SYSDATE + 1)) > TRUNC(SYSDATE)
3817: AND inv_project.get_locsegs(inventory_location_id, l_org) LIKE (p_concatenated_segments||'%')
3818: AND NVL(project_id, -1) = NVL(p_project_id, -1)
3819: AND NVL(task_id, -1) = NVL(p_task_id, -1)
3820: AND inv_material_status_grp.is_status_applicable(p_wms_installed, NULL, p_transaction_type_id, NULL, NULL, l_org, p_inventory_item_id, p_subinventory_code, inventory_location_id, NULL, NULL, 'L') = 'Y'
3821: ORDER BY 2;
3822: END IF;
3823: END get_valid_prj_to_locs;
3824: -------------------------------------------------------------------------------
3848: p_to_locator IN VARCHAR2,
3849: p_to_locator_id IN NUMBER,
3850: p_reason_id IN NUMBER,
3851: p_lot_number IN VARCHAR2,
3852: p_wms_installed IN VARCHAR2,
3853: p_transaction_action_id IN NUMBER,
3854: p_transaction_type_id IN VARCHAR2,
3855: p_source_type_id IN NUMBER,
3856: p_user_id IN NUMBER,
3922: END IF;
3923:
3924: -- Check if the serial number is available to be transacted for this transaction
3925: l_status_allowed := inv_material_status_grp.is_status_applicable
3926: (p_wms_installed => p_wms_installed,
3927: p_trx_status_enabled => NULL,
3928: p_trx_type_id => p_transaction_type_id,
3929: p_lot_status_enabled => NULL,
3930: p_serial_status_enabled => NULL,
3958: p_transaction_action_id => p_transaction_action_id,
3959: p_To_Organization_Id => p_organization_id,
3960: p_serial_number_control_code => p_serial_control_code,
3961: p_transaction_type_id => p_transaction_type_id,
3962: p_wms_installed => p_wms_installed);
3963:
3964: LOOP
3965: FETCH l_ref_cur INTO
3966: l_to_subinventory_code,
3999: p_restrict_locators_code => p_restrict_loc_code,
4000: p_inventory_item_id => p_inventory_item_id,
4001: p_concatenated_segments => p_to_locator,
4002: p_transaction_type_id => p_transaction_type_id,
4003: p_wms_installed => p_wms_installed,
4004: p_project_id => p_project_id,
4005: p_task_id => p_task_id );
4006: ELSE
4007: --inv_ui_item_sub_loc_lovs.get_valid_to_locs(x_Locators => l_ref_cur,
4014: p_restrict_locators_code => p_restrict_loc_code,
4015: p_inventory_item_id => p_inventory_item_id,
4016: p_concatenated_segments => p_to_locator,
4017: p_transaction_type_id => p_transaction_type_id,
4018: p_wms_installed => p_wms_installed);
4019:
4020:
4021: LOOP
4022: FETCH l_ref_cur INTO