[Home] [Help]
23: ,crossdock_type NUMBER DEFAULT NULL
24: );
25:
26: PROCEDURE print_debug(p_err_msg VARCHAR2, p_level NUMBER) IS
27: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
28: BEGIN
29: IF (l_debug = 1) THEN
30: inv_mobile_helper_functions.tracelog(p_err_msg => p_err_msg, p_module => g_pkg_name||'($Revision: 120.17.12020000.3 $)', p_level => p_level);
31: END IF;
87: , p_SOURCE_LINE_ID IN NUMBER
88: , p_SOURCE_LINE_DETAIL_ID IN NUMBER
89: , p_SOURCE_NAME IN VARCHAR2
90: ) IS
91: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
92: BEGIN
93: x_return_status := g_ret_sts_success;
94:
95: IF (p_lpn_id IS NOT NULL OR p_license_plate_number IS NOT NULL) THEN
463: l_serial_control_code mtl_system_items.serial_number_control_code%TYPE;
464: l_api_version CONSTANT NUMBER := 1.0;
465: l_api_name CONSTANT VARCHAR2(30) := 'insert_mtli';
466: l_progress NUMBER; --Progress Indicator
467: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'), 0);
468:
469: l_att_org_id NUMBER;
470:
471: --nsinghi bug#5209065 START. Default the variables to input parameters.
479: --nsinghi bug#5209065 END.
480: /* Bug 13727314 */
481: l_lot_status_id mtl_lot_numbers.status_id%type;
482: l_default_status_id number:= NULL;
483: l_allow_status_entry VARCHAR2(3) := NVL(fnd_profile.VALUE('INV_ALLOW_ONHAND_STATUS_ENTRY'), 'N');
484:
485: BEGIN
486:
487: -- Standard call to check for call compatibility.
1410: l_api_version CONSTANT NUMBER := 1.0;
1411: l_api_name CONSTANT VARCHAR2(30) := 'insert_mtli';
1412: l_success NUMBER;
1413: l_progress NUMBER; --Progress Indicator
1414: l_debug NUMBER := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
1415: BEGIN
1416:
1417: -- Standard call to check for call compatibility.
1418: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version,
1956: user_defined_exp_date CONSTANT NUMBER := 4;
1957: l_shelf_life_days mtl_system_items.shelf_life_days%TYPE;
1958: l_shelf_life_code mtl_system_items.shelf_life_code%TYPE;
1959: l_expiration_date mtl_lot_numbers.expiration_date%TYPE;
1960: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1961: BEGIN
1962: x_return_status := g_ret_sts_success;
1963:
1964: fnd_msg_pub.initialize;
2231: , p_to_serial_number IN OUT NOCOPY VARCHAR2
2232: , p_txn_type IN NUMBER
2233: )
2234: RETURN BOOLEAN IS
2235: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2236: l_serial_diff NUMBER := 0;
2237: l_serial_qty NUMBER := 0;
2238: l_serial_prefix VARCHAR2(30);
2239: l_cur_serial_number mtl_serial_numbers.serial_number%TYPE;
2465: ) return BOOLEAN
2466: IS
2467: l_exist NUMBER;
2468: l_org_id NUMBER;
2469: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2470: BEGIN
2471: x_return_status := g_ret_sts_success;
2472:
2473: -- If not patchsetJ then return from this place.
2575: , p_lpn IN VARCHAR2
2576: , p_parent_lpn_id IN NUMBER DEFAULT NULL
2577: ) return BOOLEAN
2578: IS
2579: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2580: l_exists NUMBER;
2581: l_lpn_id NUMBER;
2582: BEGIN
2583: x_return_status := g_ret_sts_success;
2685: l_api_name VARCHAR2(30) := 'VALIDATE_LPN_INFO';
2686: l_api_version CONSTANT NUMBER := 1.0;
2687:
2688: l_progress VARCHAR2(10) := '00';
2689: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2690: BEGIN
2691: x_return_status := g_ret_sts_success;
2692:
2693: l_progress := '10';
2832: , p_group_id IN NUMBER
2833: , p_request_id IN NUMBER
2834: ) IS
2835: l_exist NUMBER;
2836: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2837: BEGIN
2838: x_return_status := g_ret_sts_success;
2839:
2840: /*
2962: , location_id
2963: FROM rcv_transactions_interface rti
2964: WHERE interface_transaction_id = p_rti_id;
2965:
2966: l_debug NUMBER := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
2967: BEGIN
2968: x_return_status := g_ret_sts_success;
2969:
2970: IF (l_debug = 1) THEN
3185: l_rti_id NUMBER;
3186:
3187: l_api_name VARCHAR2(30) := 'SPLIT_LOT_SERIAL';
3188: l_api_version CONSTANT NUMBER := 1.0;
3189: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3190: BEGIN
3191: x_return_status := g_ret_sts_success;
3192:
3193: -- Standard call to check for call compatibility.
3231: , p_rti_id IN NUMBER
3232: ) return BOOLEAN
3233: IS
3234: l_org_id NUMBER;
3235: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3236: BEGIN
3237: x_return_status := g_ret_sts_success;
3238:
3239: IF (l_debug = 1) THEN
3365: ORDER BY rt.transfer_lpn_id;
3366:
3367: l_label_status VARCHAR2(500);
3368: l_bus_flow_code NUMBER;
3369: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3370: l_progress VARCHAR2(10) := '00';
3371: l_cd_count NUMBER;--bug 6412992, 6907475;
3372:
3373: BEGIN
3797: l_serial_control_code NUMBER;
3798: l_new_txn_tb inv_rcv_common_apis.trans_rec_tb_tp;
3799: l_temp NUMBER;
3800: l_sysdate DATE := Sysdate;
3801: l_debug NUMBER := Nvl(fnd_profile.value('INV_DEBUG_TRACE'), 0);
3802: l_progress VARCHAR2(10) := '0';
3803: l_error_code NUMBER;
3804: l_inspection_flag NUMBER;
3805: l_load_flag NUMBER;
4862: l_remaining_prim_qty NUMBER;
4863: l_remaining_qty NUMBER;
4864: -- OPMCovergence
4865: l_remaining_sec_qty NUMBER;
4866: l_debug NUMBER := Nvl(fnd_profile.value('INV_DEBUG_TRACE'), 0);
4867: l_progress VARCHAR2(10) := '00';
4868:
4869: l_SECONDARY_QUANTITY NUMBER; --OPM Convergence
4870: l_SECONDARY_QUANTITY_DELIVERED NUMBER; --OPM Convergence
5962: l_mmtts_to_split wms_atf_runtime_pub_apis.task_id_table_type;
5963: l_sysdate DATE := Sysdate;
5964:
5965: l_error_code NUMBER;
5966: l_debug NUMBER := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
5967: l_progress VARCHAR2(10) := '10';
5968:
5969: BEGIN
5970: