[Home] [Help]
1753:
1754: END check_loose_quantity;
1755:
1756:
1757: PROCEDURE CHECK_WMS_INSTALL (
1758: x_return_status OUT NOCOPY VARCHAR2,
1759: p_msg_count OUT NOCOPY NUMBER,
1760: p_msg_data OUT NOCOPY VARCHAR2,
1761: p_org IN NUMBER
1762: )
1763: IS
1764: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1765: BEGIN
1766: IF wms_install.check_install(x_return_status,
1767: p_msg_count,
1768: p_msg_data,
1769: p_org) THEN
1770: x_return_status := 'Y';
1771: ELSE
1772: x_return_status := 'N';
1773: END IF;
1774:
1775: END check_WMS_install;
1776:
1777:
1778:
1779: FUNCTION check_lpn_reservation(p_lpn_id IN NUMBER,
2017: FUNCTION validate_lpn_status_quantity(
2018: p_lpn_id IN NUMBER,
2019: p_orgid IN NUMBER,
2020: p_to_org_id IN NUMBER,
2021: p_wms_installed IN VARCHAR2,
2022: p_transaction_type_id IN NUMBER,
2023: p_source_type_id IN NUMBER,
2024: x_return_msg OUT NOCOPY VARCHAR2
2025: )
2031: x_return := inv_ui_item_sub_loc_lovs.vaildate_lpn_status(
2032: p_lpn_id,
2033: p_orgid,
2034: p_to_org_id,
2035: p_wms_installed,
2036: p_transaction_type_id
2037: );
2038: /*
2039: x_return_msg is set to 'VALIDATE_LPN_STATUS_FAILED' to indicate to the calling
2080: FUNCTION validate_lpn_status_quantity(
2081: p_lpn_id IN NUMBER,
2082: p_orgid IN NUMBER,
2083: p_to_org_id IN NUMBER,
2084: p_wms_installed IN VARCHAR2,
2085: p_transaction_type_id IN NUMBER,
2086: p_source_type_id IN NUMBER,
2087: p_to_subinventory_code IN VARCHAR2,
2088: x_return_msg OUT NOCOPY VARCHAR2
2129: x_return := inv_ui_item_sub_loc_lovs.vaildate_lpn_status(
2130: p_lpn_id,
2131: p_orgid,
2132: p_to_org_id,
2133: p_wms_installed,
2134: p_transaction_type_id
2135: );*/
2136: /*
2137: x_return_msg is set to 'VALIDATE_LPN_STATUS_FAILED' to indicate to the calling
2177: FUNCTION validate_lpn_status_quantity2(
2178: p_lpn_id IN NUMBER,
2179: p_orgid IN NUMBER,
2180: p_to_org_id IN NUMBER,
2181: p_wms_installed IN VARCHAR2,
2182: p_transaction_type_id IN NUMBER,
2183: p_source_type_id IN NUMBER,
2184: x_return_msg OUT NOCOPY VARCHAR2
2185: )
2191: x_return := inv_ui_item_sub_loc_lovs.vaildate_lpn_status(
2192: p_lpn_id,
2193: p_orgid,
2194: p_to_org_id,
2195: p_wms_installed,
2196: p_transaction_type_id
2197: );
2198: /*
2199: x_return_msg is set to 'VALIDATE_LPN_STATUS_FAILED' to indicate to the calling
2238: FUNCTION orgxfer_lpn_check(
2239: p_lpn_id IN NUMBER,
2240: p_orgid IN NUMBER,
2241: p_to_org_id IN NUMBER,
2242: p_wms_installed IN VARCHAR2,
2243: p_transaction_type_id IN NUMBER,
2244: p_source_type_id IN NUMBER,
2245: x_return_msg OUT NOCOPY VARCHAR2
2246: )
2260: --check the status
2261: x_return := inv_ui_item_sub_loc_lovs.vaildate_lpn_status( p_lpn_id,
2262: p_orgid,
2263: p_to_org_id,
2264: p_wms_installed,
2265: p_transaction_type_id);
2266: if ( x_return <> 'Y' ) then
2267: x_return_msg := 'INVALID_STATUS';
2268: return x_return;
3420: , p_restrict_locators_code IN NUMBER
3421: , p_inventory_item_id IN NUMBER
3422: , p_concatenated_segments IN VARCHAR2
3423: , p_transaction_type_id IN NUMBER
3424: , p_wms_installed IN VARCHAR2
3425: ) IS
3426: l_org NUMBER;
3427: l_restrict_locators_code NUMBER;
3428: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3455: AND NVL(a.disable_date, TRUNC(SYSDATE + 1)) > TRUNC(SYSDATE)
3456: AND b.subinventory_code = p_subinventory_code
3457: AND a.inventory_location_id = b.secondary_locator
3458: AND a.concatenated_segments LIKE (p_concatenated_segments||'%')
3459: 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'
3460: ORDER BY a.concatenated_segments;
3461: ELSE --Locators not restricted
3462: OPEN x_locators FOR
3463: SELECT inventory_location_id
3467: WHERE organization_id = l_org
3468: AND subinventory_code = p_subinventory_code
3469: AND NVL(disable_date, TRUNC(SYSDATE + 1)) > TRUNC(SYSDATE)
3470: AND concatenated_segments LIKE (p_concatenated_segments||'%')
3471: 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'
3472: ORDER BY concatenated_segments;
3473: END IF;
3474: END get_valid_to_locs;
3475:
3483: , p_restrict_locators_code IN NUMBER
3484: , p_inventory_item_id IN NUMBER
3485: , p_concatenated_segments IN VARCHAR2
3486: , p_transaction_type_id IN NUMBER
3487: , p_wms_installed IN VARCHAR2
3488: , p_project_id IN NUMBER
3489: , p_task_id IN NUMBER
3490: ) IS
3491: l_org NUMBER;
3523: AND a.inventory_location_id = b.secondary_locator
3524: AND inv_project.get_locsegs(a.inventory_location_id, l_org) LIKE (p_concatenated_segments||'%')
3525: AND NVL(a.project_id, -1) = NVL(p_project_id, -1)
3526: AND NVL(a.task_id, -1) = NVL(p_task_id, -1)
3527: 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'
3528: ORDER BY 2;
3529: ELSE --Locators not restricted
3530: OPEN x_locators FOR
3531: SELECT inventory_location_id
3537: AND NVL(disable_date, TRUNC(SYSDATE + 1)) > TRUNC(SYSDATE)
3538: AND inv_project.get_locsegs(inventory_location_id, l_org) LIKE (p_concatenated_segments||'%')
3539: AND NVL(project_id, -1) = NVL(p_project_id, -1)
3540: AND NVL(task_id, -1) = NVL(p_task_id, -1)
3541: 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'
3542: ORDER BY 2;
3543: END IF;
3544: END get_valid_prj_to_locs;
3545: -------------------------------------------------------------------------------
3569: p_to_locator IN VARCHAR2,
3570: p_to_locator_id IN NUMBER,
3571: p_reason_id IN NUMBER,
3572: p_lot_number IN VARCHAR2,
3573: p_wms_installed IN VARCHAR2,
3574: p_transaction_action_id IN NUMBER,
3575: p_transaction_type_id IN VARCHAR2,
3576: p_source_type_id IN NUMBER,
3577: p_user_id IN NUMBER,
3643: END IF;
3644:
3645: -- Check if the serial number is available to be transacted for this transaction
3646: l_status_allowed := inv_material_status_grp.is_status_applicable
3647: (p_wms_installed => p_wms_installed,
3648: p_trx_status_enabled => NULL,
3649: p_trx_type_id => p_transaction_type_id,
3650: p_lot_status_enabled => NULL,
3651: p_serial_status_enabled => NULL,
3679: p_transaction_action_id => p_transaction_action_id,
3680: p_To_Organization_Id => p_organization_id,
3681: p_serial_number_control_code => p_serial_control_code,
3682: p_transaction_type_id => p_transaction_type_id,
3683: p_wms_installed => p_wms_installed);
3684:
3685: LOOP
3686: FETCH l_ref_cur INTO
3687: l_to_subinventory_code,
3720: p_restrict_locators_code => p_restrict_loc_code,
3721: p_inventory_item_id => p_inventory_item_id,
3722: p_concatenated_segments => p_to_locator,
3723: p_transaction_type_id => p_transaction_type_id,
3724: p_wms_installed => p_wms_installed,
3725: p_project_id => p_project_id,
3726: p_task_id => p_task_id );
3727: ELSE
3728: --inv_ui_item_sub_loc_lovs.get_valid_to_locs(x_Locators => l_ref_cur,
3735: p_restrict_locators_code => p_restrict_loc_code,
3736: p_inventory_item_id => p_inventory_item_id,
3737: p_concatenated_segments => p_to_locator,
3738: p_transaction_type_id => p_transaction_type_id,
3739: p_wms_installed => p_wms_installed);
3740:
3741:
3742: LOOP
3743: FETCH l_ref_cur INTO