[Home] [Help]
80: IF (l_lpn_id IS NULL) THEN
81: RETURN;
82: END IF;
83:
84: wms_return_sv.unmark_returns
85: (x_return_status => x_return_status,
86: x_msg_count => x_msg_count,
87: x_msg_data => x_msg_data,
88: p_rcv_trx_interface_id => p_wdd_rec.source_line_id,
456: l_message VARCHAR2(2000);
457: BEGIN
458: FOR mark_rec IN remark_lpns LOOP
459: --re-mark with master rti id
460: wms_return_sv.MARK_RETURNS(
461: x_return_status => l_return_status,
462: x_msg_count => l_msg_count,
463: x_msg_data => l_msg_data,
464: p_rcv_trx_interface_id => mark_rec.interface_transaction_id,
788: --We need delivery_detail_id to call wms api and create reservation
789: l_wdd_tbl(1).delivery_detail_id := l_OUT_rec.detail_ids(1);
790: IF (rti_rec.TRANSFER_LPN_ID IS NOT NULL) THEN
791:
792: wms_return_sv.Create_Update_Containers_RTV
793: ( x_return_status => l_return_status,
794: x_msg_count => l_msg_count,
795: x_msg_data => l_msg_data,
796: p_interface_txn_id => rti_rec.interface_transaction_id,
861: --We need delivery_detail_id to call wms api and create reservation
862: l_wdd_tbl(1).delivery_detail_id := l_OUT_rec.detail_ids(1);
863: IF (rti_rec.TRANSFER_LPN_ID IS NOT NULL) THEN
864:
865: wms_return_sv.Create_Update_Containers_RTV
866: ( x_return_status => l_return_status,
867: x_msg_count => l_msg_count,
868: x_msg_data => l_msg_data,
869: p_interface_txn_id => rti_rec.interface_transaction_id,
2184: END IF;
2185: END IF;
2186: --Re-mark lpn for new RTIs
2187: IF( rti_rec.transfer_lpn_id IS NOT NULL) THEN
2188: wms_return_sv.MARK_RETURNS(
2189: x_return_status => l_return_status,
2190: x_msg_count => l_msg_count,
2191: x_msg_data => l_msg_data,
2192: p_rcv_trx_interface_id => l_rti_id,
2863: ELSE
2864: raise e_Overship_Error;
2865: END IF;
2866: -- RTV project phase 2 : start
2867: wms_return_sv.perform_post_TM_wms_updates
2868: (x_return_status => l_return_status,
2869: x_msg_count => l_msg_count,
2870: x_msg_data => l_msg_data,
2871: p_rcv_trx_interface_id => p_bkup_rti_id,
2883: END IF;
2884: --RTV project phase 2 : start
2885: WHEN e_WMS_post_Error THEN
2886: IF (g_asn_debug = 'Y') THEN
2887: asn_debug.put_line('Unexpected exception in adjust_lot_data while calling wms_return_sv.perform_post_TM_wms_updates');
2888: raise;
2889: END IF;
2890: --RTV project phase 2 : end
2891: WHEN OTHERS THEN
3118: FOR indx IN 1 .. l_wdd_lpns.COUNT LOOP
3119: IF( wdd_rec.delivery_detail_id = l_wdd_lpns(indx).delivery_detail_id ) THEN
3120: l_lpn_id := l_wdd_lpns(indx).lpn_id;
3121: IF (g_asn_debug = 'Y') THEN
3122: asn_debug.put_line('before calling wms_return_sv.unmark_returns for lpn_id:'|| l_lpn_id);
3123: END IF;
3124: --we should pass lpn_id here, since we are not able to fetch lpn_id
3125: --from wsh_delivery_assignments
3126: unmark_wdd_lpn(p_wdd_rec => wdd_rec,
3261:
3262: END LOOP;
3263: --RTV project phase 2 : start
3264: IF (l_rtv_order <> -1) THEN
3265: wms_return_sv.cancel_return_order_RTV
3266: (x_return_status => l_return_status,
3267: x_msg_count => l_msg_count,
3268: x_msg_data => l_msg_data,
3269: p_rtv_order => l_rtv_order);
3322: raise fnd_api.g_exc_error;
3323:
3324: WHEN e_cancel_unmark_lpn_error THEN
3325: IF (g_asn_debug = 'Y') THEN
3326: asn_debug.put_line('wms_return_sv.unmark_returns returned error!');
3327: END IF;
3328: fnd_msg_pub.count_and_get (p_encoded => 'T',
3329: p_count => l_msg_count,
3330: p_data => l_msg_data
3338: raise fnd_api.g_exc_error;
3339:
3340: WHEN e_cancel_unpack_lpn_error THEN
3341: IF (g_asn_debug = 'Y') THEN
3342: asn_debug.put_line('wms_return_sv.cancel_return_order_RTV returned error!');
3343: END IF;
3344: fnd_msg_pub.count_and_get (p_encoded => 'T',
3345: p_count => l_msg_count,
3346: p_data => l_msg_data