[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_ship_method_value VARCHAR2(100);
1122: l_serial_at_issue NUMBER;
1123: l_ct_wt_enabled 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');
1356: l_missing_item_cur t_genref;
1357:
1358: l_is_last_lpn_load NUMBER;
1359:
1360: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1361:
1362: BEGIN
1363: IF (l_debug = 1) THEN
1364: trace('Inside process_direct_truck_load_ship');
1497: l_source_type VARCHAR2(30);
1498: l_shipment_hdr_id_dummy NUMBER;
1499: l_vendor_id NUMBER;
1500:
1501: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1502: BEGIN
1503:
1504: IF (l_debug = 1) THEN
1505: trace('process_rfid_receiving_txn:l_shipment_header_id:p_routing_id:p_lpn_id:p_lpn_context');
1853: l_item_id NUMBER;
1854: l_serial_number VARCHAR2(30);
1855:
1856:
1857: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1858: BEGIN
1859:
1860:
1861: x_return_status := 'S';
2349: l_total_gtin_qty NUMBER := 0;
2350: l_total_lpn_qty NUMBER := 0;
2351: l_total_temp_qty NUMBER := 0;
2352:
2353: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2354: --Assumption All cases in the pallet will use same rule and
2355: --threshold_percentage including the pallet
2356: G_PROFILE_GTIN VARCHAR2(100) := FND_PROFILE.value('INV:GTIN_CROSS_REFERENCE_TYPE');
2357: BEGIN
2352:
2353: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2354: --Assumption All cases in the pallet will use same rule and
2355: --threshold_percentage including the pallet
2356: G_PROFILE_GTIN VARCHAR2(100) := FND_PROFILE.value('INV:GTIN_CROSS_REFERENCE_TYPE');
2357: BEGIN
2358:
2359: x_return_status := 'S';
2360:
2826: l_tag_len NUMBER;
2827: l_tag_count NUMBER;
2828: l_verif_req VARCHAR2(1);
2829:
2830: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2831:
2832: BEGIN
2833: x_return_value := 'success';
2834:
2838: END IF;
2839:
2840: IF fnd_global.user_id = -1 OR fnd_global.user_id IS NULL THEN
2841:
2842: l_user_id := fnd_profile.value('WMS_RFID_USER');
2843: select APPLICATION_ID INTO l_resp_appl_id from fnd_application where
2844: APPLICATION_SHORT_NAME = 'WMS' AND ROWNUM <2;
2845: l_resp_id := 21676; --Corresponding to "Warehouse Manager" responsibility
2846:
3557: x_return_value out nocopy VARCHAR2, --success,error,warning
3558: x_return_mesg OUT nocopy VARCHAR2,
3559: x_request_id OUT nocopy NUMBER
3560: ) IS
3561: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3562: BEGIN
3563:
3564: IF (l_debug = 1) THEN
3565: trace('process_rfid_txn :Calling parent process_rfid_txn');
3617: l_first_pos NUMBER;
3618: l_second_pos NUMBER;
3619: l_index NUMBER;
3620:
3621: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3622:
3623: epc_tag_id wms_epc_tagid_type;
3624: epc_tag_data wms_epc_tagdata_type;
3625: