[Home] [Help]
8: -- trace
9: -----------------------------------------------------
10: PROCEDURE trace(p_msg IN VARCHAR2,p_level IN NUMBER DEFAULT 1 ) IS
11:
12: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
13: BEGIN
14: IF l_debug = 1 THEN
15: inv_trx_util_pub.trace(p_msg, 'WMS_RFID_DEVICE_PUB', P_LEVEL);
16: END IF;
24: --PROCEDURE generate_xml_csv_api()
25: ---------------------------------------------------------
26: PROCEDURE populate_history(p_device_id IN NUMBER)
27: IS
28: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
29: --might need to change this to transfer only required columns
30: CURSOR cur_dev IS SELECT * FROM wms_device_requests where device_id = p_device_id;
31:
32: l_cnt NUMBER := 0;
123: l_retval NUMBER;
124: l_msg_count NUMBER;
125: l_count NUMBER;
126: l_tmp_out NUMBER;
127: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
128: BEGIN
129:
130: SAVEPOINT generate_xml_csv_sp;
131:
319: --3 : Yes, for the trip;
320: l_trip_id NUMBER;
321: l_delivery_id NUMBER;
322: x_is_last_lpn NUMBER;
323: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
324: BEGIN
325: IF (l_debug = 1) THEN
326: trace('Inside is_last_lpn_load');
327: END IF;
477: x_out_business_event_id OUT nocopy NUMBER,
478: x_valid_device_for_txn OUT nocopy NUMBER,
479: x_verif_req OUT nocopy VARCHAR2)
480: IS
481: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
482: l_count NUMBER :=0;
483:
484: BEGIN
485:
592: l_concatenated_segments VARCHAR2(120);
593: l_del_name VARCHAR2(30);
594:
595:
596: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
597:
598:
599: BEGIN
600: IF (l_debug = 1) THEN
800: l_is_last_lpn_load NUMBER;
801: l_msg_count NUMBER;
802: l_msg_data VARCHAR2(250);
803: l_catch_wt_check NUMBER;
804: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
805: --l_return_status varchar2;
806: BEGIN
807: IF (l_debug = 1) THEN
808: trace('Inside process_normal_truck_load');
1002: l_deli_count NUMBER;
1003: l_msg_count NUMBER;
1004: l_trip_id NUMBER;
1005: l_is_last_lpn_load NUMBER;
1006: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1007: BEGIN
1008: IF (l_debug = 1) THEN
1009: trace('Inside process_normal_truck_load_ship');
1010: END IF;
1121: l_group_by_intmed_value VARCHAR2(100);
1122: l_group_by_ship_method_value VARCHAR2(100);
1123: l_serial_at_issue NUMBER;
1124: l_catch_wt_check NUMBER;
1125: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1126: BEGIN
1127:
1128: IF (l_debug = 1) THEN
1129: trace('Inside PROCESS_DIRECT_TRUCK_LOAD');
1357: l_missing_item_cur t_genref;
1358:
1359: l_is_last_lpn_load NUMBER;
1360:
1361: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1362:
1363: BEGIN
1364: IF (l_debug = 1) THEN
1365: trace('Inside process_direct_truck_load_ship');
1498: l_source_type VARCHAR2(30);
1499: l_shipment_hdr_id_dummy NUMBER;
1500: l_vendor_id NUMBER;
1501:
1502: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1503: BEGIN
1504:
1505: IF (l_debug = 1) THEN
1506: trace('process_rfid_receiving_txn:l_shipment_header_id:p_routing_id:p_lpn_id:p_lpn_context');
1854: l_item_id NUMBER;
1855: l_serial_number VARCHAR2(30);
1856:
1857:
1858: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1859: BEGIN
1860:
1861:
1862: x_return_status := 'S';
2350: l_total_gtin_qty NUMBER := 0;
2351: l_total_lpn_qty NUMBER := 0;
2352: l_total_temp_qty NUMBER := 0;
2353:
2354: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2355: --Assumption All cases in the pallet will use same rule and
2356: --threshold_percentage including the pallet
2357: G_PROFILE_GTIN VARCHAR2(100) := FND_PROFILE.value('INV:GTIN_CROSS_REFERENCE_TYPE');
2358: BEGIN
2353:
2354: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2355: --Assumption All cases in the pallet will use same rule and
2356: --threshold_percentage including the pallet
2357: G_PROFILE_GTIN VARCHAR2(100) := FND_PROFILE.value('INV:GTIN_CROSS_REFERENCE_TYPE');
2358: BEGIN
2359:
2360: x_return_status := 'S';
2361:
2827: l_tag_len NUMBER;
2828: l_tag_count NUMBER;
2829: l_verif_req VARCHAR2(1);
2830:
2831: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2832:
2833: BEGIN
2834: x_return_value := 'success';
2835:
2839: END IF;
2840:
2841: IF fnd_global.user_id = -1 OR fnd_global.user_id IS NULL THEN
2842:
2843: l_user_id := fnd_profile.value('WMS_RFID_USER');
2844: select APPLICATION_ID INTO l_resp_appl_id from fnd_application where
2845: APPLICATION_SHORT_NAME = 'WMS' AND ROWNUM <2;
2846: l_resp_id := 21676; --Corresponding to "Warehouse Manager" responsibility
2847:
3558: x_return_value out nocopy VARCHAR2, --success,error,warning
3559: x_return_mesg OUT nocopy VARCHAR2,
3560: x_request_id OUT nocopy NUMBER
3561: ) IS
3562: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3563: BEGIN
3564:
3565: IF (l_debug = 1) THEN
3566: trace('process_rfid_txn :Calling parent process_rfid_txn');
3618: l_first_pos NUMBER;
3619: l_second_pos NUMBER;
3620: l_index NUMBER;
3621:
3622: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3623:
3624: epc_tag_id wms_epc_tagid_type;
3625: epc_tag_data wms_epc_tagdata_type;
3626: