[Home] [Help]
53: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
54: --
55: IF l_debug_on IS NULL
56: THEN
57: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
58: END IF;
59: --
60: --
61: -- Debug Statements
60: --
61: -- Debug Statements
62: --
63: IF l_debug_on THEN
64: WSH_DEBUG_SV.push(l_module_name);
65: --
66: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
67: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
68: END IF;
62: --
63: IF l_debug_on THEN
64: WSH_DEBUG_SV.push(l_module_name);
65: --
66: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
67: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
68: END IF;
69: --
70: SAVEPOINT REVERT_TRIPS_GRP;
63: IF l_debug_on THEN
64: WSH_DEBUG_SV.push(l_module_name);
65: --
66: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
67: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
68: END IF;
69: --
70: SAVEPOINT REVERT_TRIPS_GRP;
71: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
85: --
86: -- Debug Statements
87: --
88: IF l_debug_on THEN
89: WSH_DEBUG_SV.pop(l_module_name);
90: END IF;
91: --
92: EXCEPTION
93: --{
97: --
98: -- Debug Statements
99: --
100: IF l_debug_on THEN
101: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
102: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
103: END IF;
104: --
105: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
98: -- Debug Statements
99: --
100: IF l_debug_on THEN
101: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
102: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
103: END IF;
104: --
105: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
106: ROLLBACK TO REVERT_TRIPS_GRP;
108: --
109: -- Debug Statements
110: --
111: IF l_debug_on THEN
112: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
113: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
114: END IF;
115: --
116: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
109: -- Debug Statements
110: --
111: IF l_debug_on THEN
112: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
113: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
114: END IF;
115: --
116: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
117: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
118: --
119: -- Debug Statements
120: --
121: IF l_debug_on THEN
122: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
123: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
124: END IF;
125: --
126: WHEN OTHERS THEN
119: -- Debug Statements
120: --
121: IF l_debug_on THEN
122: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
123: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
124: END IF;
125: --
126: WHEN OTHERS THEN
127: ROLLBACK TO REVERT_TRIPS_GRP;
131: --
132: -- Debug Statements
133: --
134: IF l_debug_on THEN
135: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
136: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
137: END IF;
138: --
139: END revert_trips;
132: -- Debug Statements
133: --
134: IF l_debug_on THEN
135: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
136: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
137: END IF;
138: --
139: END revert_trips;
140: --
210: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
211: --
212: IF l_debug_on IS NULL
213: THEN
214: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
215: END IF;
216: --
217: --
218: -- Debug Statements
217: --
218: -- Debug Statements
219: --
220: IF l_debug_on THEN
221: WSH_DEBUG_SV.push(l_module_name);
222: --
223: --WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
224: --WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
225: END IF;
219: --
220: IF l_debug_on THEN
221: WSH_DEBUG_SV.push(l_module_name);
222: --
223: --WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
224: --WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
225: END IF;
226: --
227: SAVEPOINT REVERT_DELIVERIES_GRP;
220: IF l_debug_on THEN
221: WSH_DEBUG_SV.push(l_module_name);
222: --
223: --WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
224: --WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
225: END IF;
226: --
227: SAVEPOINT REVERT_DELIVERIES_GRP;
228: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
239:
240: */
241:
242: IF l_debug_on THEN
243: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id_tab count',l_delivery_id_tab.count);
244: END IF;
245:
246: IF (p_delivery_id_tab.count > 0 ) THEN
247: --{
260: p_organization_id => l_organization_id,
261: x_return_status => l_wf_rs ) ;
262: --Error Handling to be done in WSH_WF_STD.Raise_Event itself
263: IF l_debug_on THEN
264: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
265: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', p_delivery_id_tab(i));
266: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
267: END IF;
268: --Done Raise Event: Pick To Pod Workflow
261: x_return_status => l_wf_rs ) ;
262: --Error Handling to be done in WSH_WF_STD.Raise_Event itself
263: IF l_debug_on THEN
264: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
265: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', p_delivery_id_tab(i));
266: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
267: END IF;
268: --Done Raise Event: Pick To Pod Workflow
269: */
262: --Error Handling to be done in WSH_WF_STD.Raise_Event itself
263: IF l_debug_on THEN
264: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
265: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', p_delivery_id_tab(i));
266: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
267: END IF;
268: --Done Raise Event: Pick To Pod Workflow
269: */
270: END LOOP;
278: p_update_flag => 'Y',
279: p_calc_wv_if_frozen => 'N',
280: x_return_status => l_return_status);
281: IF l_debug_on THEN
282: WSH_DEBUG_SV.log(l_module_name,'Return STatus after calling Delivery_Weight_Volume',l_return_status);
283: END IF;
284:
285: wsh_util_core.api_post_call(
286: p_return_status => l_return_status,
293: p_entity_ids => p_delivery_id_tab,
294: x_return_status => l_return_status);
295: --
296: IF l_debug_on THEN
297: WSH_DEBUG_SV.log(l_module_name,'Return STatus after calling Mark_Reprice_Required',l_return_status);
298: END IF;
299: --
300: wsh_util_core.api_post_call(
301: p_return_status => l_return_status,
307: p_entity_ids => p_delivery_id_tab,
308: x_return_status => l_return_status);
309: --
310: IF l_debug_on THEN
311: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling calculate_cont_del_tpdates',l_return_status);
312: END IF;
313: --
314: wsh_util_core.api_post_call(
315: p_return_status => l_return_status,
322: p_delivery_id_tab => p_delivery_id_tab,
323: x_return_status => l_return_status);
324:
325: IF l_debug_on THEN
326: WSH_DEBUG_SV.log(l_module_name,'Return STatus after calling setTripStopStatus',l_return_status);
327: END IF;
328: wsh_util_core.api_post_call(
329: p_return_status => l_return_status,
330: x_num_warnings => l_num_warnings,
344: --
345: -- Debug Statements
346: --
347: IF l_debug_on THEN
348: WSH_DEBUG_SV.pop(l_module_name);
349: END IF;
350: --
351: EXCEPTION
352: --{
356: --
357: -- Debug Statements
358: --
359: IF l_debug_on THEN
360: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
361: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
362: END IF;
363: --
364: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
357: -- Debug Statements
358: --
359: IF l_debug_on THEN
360: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
361: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
362: END IF;
363: --
364: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
365: ROLLBACK TO REVERT_DELIVERIES_GRP;
367: --
368: -- Debug Statements
369: --
370: IF l_debug_on THEN
371: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
372: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
373: END IF;
374: --
375: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
368: -- Debug Statements
369: --
370: IF l_debug_on THEN
371: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
372: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
373: END IF;
374: --
375: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
376: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
377: --
378: -- Debug Statements
379: --
380: IF l_debug_on THEN
381: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
382: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
383: END IF;
384: --
385: WHEN OTHERS THEN
378: -- Debug Statements
379: --
380: IF l_debug_on THEN
381: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
382: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
383: END IF;
384: --
385: WHEN OTHERS THEN
386: ROLLBACK TO REVERT_DELIVERIES_GRP;
390: --
391: -- Debug Statements
392: --
393: IF l_debug_on THEN
394: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
395: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
396: END IF;
397: --
398: END revert_deliveries;
391: -- Debug Statements
392: --
393: IF l_debug_on THEN
394: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
395: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
396: END IF;
397: --
398: END revert_deliveries;
399: --
640: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
641: --
642: IF l_debug_on IS NULL
643: THEN
644: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
645: END IF;
646: --
647: --
648: -- Debug Statements
647: --
648: -- Debug Statements
649: --
650: IF l_debug_on THEN
651: WSH_DEBUG_SV.push(l_module_name);
652: --
653: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
654: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
655: END IF;
649: --
650: IF l_debug_on THEN
651: WSH_DEBUG_SV.push(l_module_name);
652: --
653: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
654: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
655: END IF;
656: --
657: SAVEPOINT REVERT_DETAILS_GRP;
650: IF l_debug_on THEN
651: WSH_DEBUG_SV.push(l_module_name);
652: --
653: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
654: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
655: END IF;
656: --
657: SAVEPOINT REVERT_DETAILS_GRP;
658: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
670: l_shipment_line_id := NULL;
671: --}
672: END IF;
673: IF l_debug_on THEN
674: WSH_DEBUG_SV.log(l_module_name,'l_rel_sts',l_rel_sts);
675: END IF;
676: */
677: open l_del_details_csr(p_shipment_header_id);
678: fetch l_del_details_csr bulk collect into l_source_line_id_tab,
688: l_picked_quantity_tab,
689: l_shipped_quantity_tab;
690: close l_del_details_csr;
691: IF l_debug_on THEN
692: WSH_DEBUG_SV.logmsg(l_module_name,'After fetching the cursor');
693: WSH_DEBUG_SV.log(l_module_name,'l_po_line_loc_id_tab count is', l_po_line_loc_id_tab.count);
694: END IF;
695: IF l_po_line_loc_id_tab.count > 0 THEN
696: --{
689: l_shipped_quantity_tab;
690: close l_del_details_csr;
691: IF l_debug_on THEN
692: WSH_DEBUG_SV.logmsg(l_module_name,'After fetching the cursor');
693: WSH_DEBUG_SV.log(l_module_name,'l_po_line_loc_id_tab count is', l_po_line_loc_id_tab.count);
694: END IF;
695: IF l_po_line_loc_id_tab.count > 0 THEN
696: --{
697: i := l_po_line_loc_id_tab.first;
713: l_sum_returned_quantity := 0;
714: l_sum_returned_quantity2 := 0;
715: l_sum_req_qty := 0;
716: IF l_debug_on THEN
717: WSH_DEBUG_SV.logmsg(l_module_name,'After initializing the quantities');
718: END IF;
719: open l_tot_ret_qty_csr(l_source_line_id_tab(i),
720: l_po_line_loc_id_tab(i));
721: fetch l_tot_ret_qty_csr into l_sum_returned_quantity,
721: fetch l_tot_ret_qty_csr into l_sum_returned_quantity,
722: l_sum_returned_quantity2;
723: close l_tot_ret_qty_csr;
724: IF l_debug_on THEN
725: WSH_DEBUG_SV.log(l_module_name,'l_sum_returned_quantity',l_sum_returned_quantity);
726: WSH_DEBUG_SV.log(l_module_name,'l_sum_returned_quantity2',l_sum_returned_quantity2);
727: END IF;
728: IF (nvl(l_sum_returned_quantity,0) > 0 ) THEN
729: --{
722: l_sum_returned_quantity2;
723: close l_tot_ret_qty_csr;
724: IF l_debug_on THEN
725: WSH_DEBUG_SV.log(l_module_name,'l_sum_returned_quantity',l_sum_returned_quantity);
726: WSH_DEBUG_SV.log(l_module_name,'l_sum_returned_quantity2',l_sum_returned_quantity2);
727: END IF;
728: IF (nvl(l_sum_returned_quantity,0) > 0 ) THEN
729: --{
730: open l_tot_req_qty_csr(l_source_line_id_tab(i),
731: l_po_line_loc_id_tab(i));
732: fetch l_tot_req_qty_csr into l_sum_req_qty, l_sum_req_qty2;
733: close l_tot_req_qty_csr;
734: IF l_debug_on THEN
735: WSH_DEBUG_SV.log(l_module_name,'l_sum_req_qty',l_sum_req_qty);
736: WSH_DEBUG_SV.log(l_module_name,'l_sum_req_qty2',l_sum_req_qty2);
737: END IF;
738: IF nvl (l_sum_req_qty, 0) < l_sum_returned_quantity THEN
739: --{
732: fetch l_tot_req_qty_csr into l_sum_req_qty, l_sum_req_qty2;
733: close l_tot_req_qty_csr;
734: IF l_debug_on THEN
735: WSH_DEBUG_SV.log(l_module_name,'l_sum_req_qty',l_sum_req_qty);
736: WSH_DEBUG_SV.log(l_module_name,'l_sum_req_qty2',l_sum_req_qty2);
737: END IF;
738: IF nvl (l_sum_req_qty, 0) < l_sum_returned_quantity THEN
739: --{
740: FND_MESSAGE.SET_NAME('WSH','WSH_IB_INSUFF_LINES_REVERT');
759: DELETE wsh_delivery_assignments_v
760: WHERE delivery_detail_id = l_delete_det_tbl(i);
761:
762: IF l_debug_on THEN
763: WSH_DEBUG_SV.log(l_module_name,'SQL%ROWCOUNT After deleting LPNs from WDA',SQL%ROWCOUNT);
764: END IF;
765:
766: --Deleting the rows in WSH_DELIVERY_DETAILS corresponding to the selected LPNs.
767: FORALL i IN l_delete_det_tbl.FIRST..l_delete_det_tbl.LAST
768: DELETE WSH_DELIVERY_DETAILS
769: WHERE delivery_detail_id = l_delete_det_tbl(i);
770:
771: IF l_debug_on THEN
772: WSH_DEBUG_SV.log(l_module_name,'SQL%ROWCOUNT After deleting LPNs from WDD',SQL%ROWCOUNT);
773: END IF;
774: --}
775: END IF;
776: l_delete_det_tbl.delete;
808: --
809: -- Debug Statements
810: --
811: IF l_debug_on THEN
812: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_RCV_CORR_RTV_TXN_PKG.PROCESS_REMAINING_REQ_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
813: END IF;
814: --
815: l_pr_rem_in_rec.action_code := 'REVERT_MATCH';
816: WSH_RCV_CORR_RTV_TXN_PKG.process_remaining_req_quantity (
820: --
821: -- Debug Statements
822: --
823: IF l_debug_on THEN
824: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
825: END IF;
826: --
827: wsh_util_core.api_post_call(
828: p_return_status => l_return_status,
847: and rcv_shipment_line_id is null
848: RETURNING delivery_detail_id BULK COLLECT INTO l_detail_tab;
849:
850: IF l_debug_on THEN
851: WSH_DEBUG_SV.log(l_module_name,'SQL%ROWCOUNT After updating wdds',SQL%ROWCOUNT);
852: END IF;
853:
854: --
855: -- DBI Project
856: -- Update of wsh_delivery_details where released_status
857: -- are changed, call DBI API after the update.
858: -- This API will also check for DBI Installed or not
859: IF l_debug_on THEN
860: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API. delivery details l_detail_tab count :',l_detail_tab.COUNT);
861: END IF;
862: WSH_INTEGRATION.DBI_Update_Detail_Log
863: (p_delivery_detail_id_tab => l_detail_tab,
864: p_dml_type => 'UPDATE',
864: p_dml_type => 'UPDATE',
865: x_return_status => l_dbi_rs);
866:
867: IF l_debug_on THEN
868: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
869: END IF;
870: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
871: x_return_status := l_dbi_rs;
872: Rollback to REVERT_DETAILS_GRP;
871: x_return_status := l_dbi_rs;
872: Rollback to REVERT_DETAILS_GRP;
873: -- just pass this return status to caller API
874: IF l_debug_on THEN
875: WSH_DEBUG_SV.logmsg(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
876: WSH_DEBUG_SV.pop(l_module_name);
877: END IF;
878: return;
879: END IF;
872: Rollback to REVERT_DETAILS_GRP;
873: -- just pass this return status to caller API
874: IF l_debug_on THEN
875: WSH_DEBUG_SV.logmsg(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
876: WSH_DEBUG_SV.pop(l_module_name);
877: END IF;
878: return;
879: END IF;
880: -- End of Code for DBI Project
928: --}
929: END LOOP;
930:
931: IF l_debug_on THEN
932: WSH_DEBUG_SV.logmsg(l_module_name,'Before doing the update');
933: END IF;
934: FORALL i IN l_del_det_id_tab.FIRST..l_del_det_id_tab.LAST
935: update wsh_delivery_details
936: set returned_quantity = NULL,
945: where delivery_detail_id = l_del_det_id_tab(i)
946: and source_code = 'PO';
947:
948: IF l_debug_on THEN
949: WSH_DEBUG_SV.logmsg(l_module_name,'After doing the update');
950: END IF;
951:
952: IF l_debug_on THEN
953: WSH_DEBUG_SV.logmsg(l_module_name,'After doing the update');
949: WSH_DEBUG_SV.logmsg(l_module_name,'After doing the update');
950: END IF;
951:
952: IF l_debug_on THEN
953: WSH_DEBUG_SV.logmsg(l_module_name,'After doing the update');
954: WSH_DEBUG_SV.log(l_module_name,'l_num_errors', l_num_errors);
955: WSH_DEBUG_SV.log(l_module_name,'l_num_warnings', l_num_warnings);
956: END IF;
957: --
950: END IF;
951:
952: IF l_debug_on THEN
953: WSH_DEBUG_SV.logmsg(l_module_name,'After doing the update');
954: WSH_DEBUG_SV.log(l_module_name,'l_num_errors', l_num_errors);
955: WSH_DEBUG_SV.log(l_module_name,'l_num_warnings', l_num_warnings);
956: END IF;
957: --
958: -- DBI Project
951:
952: IF l_debug_on THEN
953: WSH_DEBUG_SV.logmsg(l_module_name,'After doing the update');
954: WSH_DEBUG_SV.log(l_module_name,'l_num_errors', l_num_errors);
955: WSH_DEBUG_SV.log(l_module_name,'l_num_warnings', l_num_warnings);
956: END IF;
957: --
958: -- DBI Project
959: -- Update of wsh_delivery_details where released_status
959: -- Update of wsh_delivery_details where released_status
960: -- are changed, call DBI API after the update.
961: -- This API will also check for DBI Installed or not
962: IF l_debug_on THEN
963: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API. delivery details l_del_det_id_tab count :',l_del_det_id_tab.COUNT);
964: END IF;
965: WSH_INTEGRATION.DBI_Update_Detail_Log
966: (p_delivery_detail_id_tab => l_del_det_id_tab,
967: p_dml_type => 'UPDATE',
967: p_dml_type => 'UPDATE',
968: x_return_status => l_dbi_rs);
969:
970: IF l_debug_on THEN
971: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
972: END IF;
973: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
974: x_return_status := l_dbi_rs ;
975: Rollback to REVERT_DETAILS_GRP;
974: x_return_status := l_dbi_rs ;
975: Rollback to REVERT_DETAILS_GRP;
976: -- just pass this return status to caller API
977: IF l_debug_on THEN
978: WSH_DEBUG_SV.logmsg(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
979: WSH_DEBUG_SV.pop(l_module_name);
980: END IF;
981: return;
982: END IF;
975: Rollback to REVERT_DETAILS_GRP;
976: -- just pass this return status to caller API
977: IF l_debug_on THEN
978: WSH_DEBUG_SV.logmsg(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
979: WSH_DEBUG_SV.pop(l_module_name);
980: END IF;
981: return;
982: END IF;
983: -- End of Code for DBI Project
1002: returning delivery_detail_id
1003: bulk collect into l_cnt_det_id_tab;
1004: --
1005: IF l_debug_on THEN
1006: WSH_DEBUG_SV.log(l_module_name,'l_cnt_det_id_tab count', l_cnt_det_id_tab.count);
1007: END IF;
1008: --
1009: IF (l_cnt_det_id_tab.count > 0 ) THEN
1010: --{
1013: -- Update of wsh_delivery_details where released_status
1014: -- are changed, call DBI API after the update.
1015: -- This API will also check for DBI Installed or not
1016: IF l_debug_on THEN
1017: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API. delivery details l_del_det_id_tab count :',l_del_det_id_tab.COUNT);
1018: END IF;
1019: WSH_INTEGRATION.DBI_Update_Detail_Log
1020: (p_delivery_detail_id_tab => l_cnt_det_id_tab,
1021: p_dml_type => 'UPDATE',
1021: p_dml_type => 'UPDATE',
1022: x_return_status => l_dbi_rs);
1023:
1024: IF l_debug_on THEN
1025: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
1026: END IF;
1027: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1028: x_return_status := l_dbi_rs ;
1029: Rollback to REVERT_DETAILS_GRP;
1028: x_return_status := l_dbi_rs ;
1029: Rollback to REVERT_DETAILS_GRP;
1030: -- just pass this return status to caller API
1031: IF l_debug_on THEN
1032: WSH_DEBUG_SV.logmsg(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
1033: WSH_DEBUG_SV.pop(l_module_name);
1034: END IF;
1035: return;
1036: END IF;
1029: Rollback to REVERT_DETAILS_GRP;
1030: -- just pass this return status to caller API
1031: IF l_debug_on THEN
1032: WSH_DEBUG_SV.logmsg(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
1033: WSH_DEBUG_SV.pop(l_module_name);
1034: END IF;
1035: return;
1036: END IF;
1037: -- End of Code for DBI Project
1044: --
1045: -- Debug Statements
1046: --
1047: IF l_debug_on THEN
1048: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DETAIL_WEIGHT_VOLUME',WSH_DEBUG_SV.C_PROC_LEVEL);
1049: END IF;
1050: --
1051: WSH_WV_UTILS.Detail_Weight_Volume(
1052: p_detail_rows => l_del_det_id_tab,
1056: --
1057: -- Debug Statements
1058: --
1059: IF l_debug_on THEN
1060: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1061: END IF;
1062: --
1063: wsh_util_core.api_post_call(
1064: p_return_status => l_return_status,
1086: --
1087: -- Debug Statements
1088: --
1089: IF l_debug_on THEN
1090: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE',WSH_DEBUG_SV.C_PROC_LEVEL);
1091: END IF;
1092: --
1093: wsh_util_core.get_cached_value(
1094: p_cache_tbl => l_del_cache_tbl,
1107: --
1108: -- Debug Statements
1109: --
1110: IF l_debug_on THEN
1111: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE',WSH_DEBUG_SV.C_PROC_LEVEL);
1112: WSH_DEBUG_SV.log(l_module_name,'Delivery Id is ',l_delivery_id_tab(l_del_index));
1113: END IF;
1114: --
1115: wsh_util_core.get_cached_value(
1108: -- Debug Statements
1109: --
1110: IF l_debug_on THEN
1111: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE',WSH_DEBUG_SV.C_PROC_LEVEL);
1112: WSH_DEBUG_SV.log(l_module_name,'Delivery Id is ',l_delivery_id_tab(l_del_index));
1113: END IF;
1114: --
1115: wsh_util_core.get_cached_value(
1116: p_cache_tbl => l_del_cache_tbl,
1123: --
1124: -- Debug Statements
1125: --
1126: IF l_debug_on THEN
1127: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling wsh_util_core.get_cached_value for put is',l_return_status);
1128: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1129: END IF;
1130: --
1131: wsh_util_core.api_post_call(
1124: -- Debug Statements
1125: --
1126: IF l_debug_on THEN
1127: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling wsh_util_core.get_cached_value for put is',l_return_status);
1128: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1129: END IF;
1130: --
1131: wsh_util_core.api_post_call(
1132: p_return_status => l_return_status,
1135:
1136: x_delivery_id_tab(x_delivery_id_tab.count+1) := l_delivery_id_tab(l_del_index);
1137: x_status_code_tab(x_status_code_tab.count+1) := l_status_code_tab(l_del_index);
1138: IF l_debug_on THEN
1139: WSH_DEBUG_SV.logmsg(l_module_name,'After assigning the value');
1140: END IF;
1141: --}
1142: END IF;
1143: l_del_index := l_delivery_id_tab.next(l_del_index);
1152: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1153: END IF;
1154: --
1155: IF l_debug_on THEN
1156: WSH_DEBUG_SV.logmsg(l_module_name,'Before calling count and get');
1157: END IF;
1158: FND_MSG_PUB.Count_And_Get
1159: (
1160: p_count => x_msg_count,
1167: -- Debug Statements
1168: --
1169: IF l_debug_on THEN
1170: IF l_debug_on THEN
1171: WSH_DEBUG_SV.logmsg(l_module_name,'End of the procedure');
1172: END IF;
1173: WSH_DEBUG_SV.pop(l_module_name);
1174: END IF;
1175: --
1169: IF l_debug_on THEN
1170: IF l_debug_on THEN
1171: WSH_DEBUG_SV.logmsg(l_module_name,'End of the procedure');
1172: END IF;
1173: WSH_DEBUG_SV.pop(l_module_name);
1174: END IF;
1175: --
1176: EXCEPTION
1177: --{
1181: -- need to change the message
1182: FND_MESSAGE.SET_NAME('WSH','WSH_DELIVERY_LINES_LOCKED');
1183: wsh_util_core.add_message(x_return_status,l_module_name);
1184: IF l_debug_on THEN
1185: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1186: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DD_LOCKED');
1187: END IF;
1188: --
1189: WHEN FND_API.G_EXC_ERROR THEN
1182: FND_MESSAGE.SET_NAME('WSH','WSH_DELIVERY_LINES_LOCKED');
1183: wsh_util_core.add_message(x_return_status,l_module_name);
1184: IF l_debug_on THEN
1185: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1186: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DD_LOCKED');
1187: END IF;
1188: --
1189: WHEN FND_API.G_EXC_ERROR THEN
1190: ROLLBACK TO REVERT_DETAILS_GRP;
1200: --
1201: -- Debug Statements
1202: --
1203: IF l_debug_on THEN
1204: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1205: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1206: END IF;
1207: --
1208: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1201: -- Debug Statements
1202: --
1203: IF l_debug_on THEN
1204: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1205: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1206: END IF;
1207: --
1208: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1209: ROLLBACK TO REVERT_DETAILS_GRP;
1219: --
1220: -- Debug Statements
1221: --
1222: IF l_debug_on THEN
1223: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1224: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1225: END IF;
1226: --
1227: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1220: -- Debug Statements
1221: --
1222: IF l_debug_on THEN
1223: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1224: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1225: END IF;
1226: --
1227: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1228: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1237: --
1238: -- Debug Statements
1239: --
1240: IF l_debug_on THEN
1241: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1242: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1243: END IF;
1244: --
1245: WHEN OTHERS THEN
1238: -- Debug Statements
1239: --
1240: IF l_debug_on THEN
1241: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1242: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1243: END IF;
1244: --
1245: WHEN OTHERS THEN
1246: ROLLBACK TO REVERT_DETAILS_GRP;
1258: --
1259: -- Debug Statements
1260: --
1261: IF l_debug_on THEN
1262: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1263: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1264: END IF;
1265: --
1266: END revert_details;
1259: -- Debug Statements
1260: --
1261: IF l_debug_on THEN
1262: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1263: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1264: END IF;
1265: --
1266: END revert_details;
1267: --
1373: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1374: --
1375: IF l_debug_on IS NULL
1376: THEN
1377: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1378: END IF;
1379: --
1380: --
1381: -- Debug Statements
1380: --
1381: -- Debug Statements
1382: --
1383: IF l_debug_on THEN
1384: WSH_DEBUG_SV.push(l_module_name);
1385: --
1386: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_LINE_ID',P_SHIPMENT_LINE_ID);
1387: --WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
1388: END IF;
1382: --
1383: IF l_debug_on THEN
1384: WSH_DEBUG_SV.push(l_module_name);
1385: --
1386: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_LINE_ID',P_SHIPMENT_LINE_ID);
1387: --WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
1388: END IF;
1389: --
1390: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1383: IF l_debug_on THEN
1384: WSH_DEBUG_SV.push(l_module_name);
1385: --
1386: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_LINE_ID',P_SHIPMENT_LINE_ID);
1387: --WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
1388: END IF;
1389: --
1390: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1391: --
1394: fetch l_max_txn_id_csr into l_max_txn_id;
1395: close l_max_txn_id_csr;
1396:
1397: IF l_debug_on THEN
1398: WSH_DEBUG_SV.log(l_module_name,'l_max_txn_id',l_max_txn_id);
1399: END IF;
1400: IF l_debug_on THEN
1401: WSH_DEBUG_SV.logmsg(l_module_name,'Before opening the cursor l_get_rcvd_qty_csr');
1402: END IF;
1397: IF l_debug_on THEN
1398: WSH_DEBUG_SV.log(l_module_name,'l_max_txn_id',l_max_txn_id);
1399: END IF;
1400: IF l_debug_on THEN
1401: WSH_DEBUG_SV.logmsg(l_module_name,'Before opening the cursor l_get_rcvd_qty_csr');
1402: END IF;
1403: open l_get_rcvd_qty_csr(p_shipment_line_id);
1404: fetch l_get_rcvd_qty_csr bulk collect into
1405: l_txn_id_tab,
1411: l_txn_type_tab,
1412: l_parent_txn_type_tab;
1413: close l_get_rcvd_qty_csr;
1414: IF l_debug_on THEN
1415: WSH_DEBUG_SV.logmsg(l_module_name,'After fetching the cursor l_get_rcvd_qty_csr');
1416: WSH_DEBUG_SV.log(l_module_name,'rcv txns records count is',l_txn_id_tab.count);
1417: END IF;
1418: x_delete_rec_flag := 'N';
1419:
1412: l_parent_txn_type_tab;
1413: close l_get_rcvd_qty_csr;
1414: IF l_debug_on THEN
1415: WSH_DEBUG_SV.logmsg(l_module_name,'After fetching the cursor l_get_rcvd_qty_csr');
1416: WSH_DEBUG_SV.log(l_module_name,'rcv txns records count is',l_txn_id_tab.count);
1417: END IF;
1418: x_delete_rec_flag := 'N';
1419:
1420: IF l_debug_on THEN
1417: END IF;
1418: x_delete_rec_flag := 'N';
1419:
1420: IF l_debug_on THEN
1421: WSH_DEBUG_SV.log(l_module_name,'x_delete_rec_flag',x_delete_rec_flag);
1422: END IF;
1423: l_index := l_prim_qty_tab.first;
1424: IF ( nvl(l_index, 0) > 0 ) THEN
1425: --{
1430:
1431: while l_index is not null loop
1432: --{
1433: IF l_debug_on THEN
1434: WSH_DEBUG_SV.log(l_module_name,'transaction type',l_txn_type_tab(l_index));
1435: WSH_DEBUG_SV.log(l_module_name,'parent transaction type',l_parent_txn_type_tab(l_index));
1436: END IF;
1437: IF (l_txn_type_tab(l_index) = c_receipt) THEN
1438: --{
1431: while l_index is not null loop
1432: --{
1433: IF l_debug_on THEN
1434: WSH_DEBUG_SV.log(l_module_name,'transaction type',l_txn_type_tab(l_index));
1435: WSH_DEBUG_SV.log(l_module_name,'parent transaction type',l_parent_txn_type_tab(l_index));
1436: END IF;
1437: IF (l_txn_type_tab(l_index) = c_receipt) THEN
1438: --{
1439: l_prim_rcvd_qty := nvl(l_prim_rcvd_qty,0) + nvl(l_prim_qty_tab(l_index),0);
1438: --{
1439: l_prim_rcvd_qty := nvl(l_prim_rcvd_qty,0) + nvl(l_prim_qty_tab(l_index),0);
1440: l_sec_rcvd_qty := nvl(l_sec_rcvd_qty,0) + nvl(l_sec_qty_tab(l_index),0);
1441: IF l_debug_on THEN
1442: WSH_DEBUG_SV.log(l_module_name,'l_prim_rcvd_qty',l_prim_rcvd_qty);
1443: END IF;
1444: --}
1445: ELSIF (l_txn_type_tab(l_index) = c_rtv and l_parent_txn_type_tab(l_index) = c_receipt) THEN
1446: --{
1446: --{
1447: l_prim_ret_qty := nvl(l_prim_ret_qty,0) + nvl(l_prim_qty_tab(l_index),0);
1448: l_sec_ret_qty := nvl(l_sec_ret_qty,0) + nvl(l_sec_qty_tab(l_index), 0);
1449: IF l_debug_on THEN
1450: WSH_DEBUG_SV.log(l_module_name,'l_prim_ret_qty',l_prim_ret_qty);
1451: END IF;
1452: --}
1453: ELSIF (l_txn_type_tab(l_index) = c_correct and l_parent_txn_type_tab(l_index) = c_receipt) THEN
1454: --{
1454: --{
1455: l_prim_rcvd_corr_qty := nvl(l_prim_rcvd_corr_qty, 0) + nvl(l_prim_qty_tab(l_index),0);
1456: l_sec_rcvd_corr_qty := nvl(l_sec_rcvd_corr_qty,0) + nvl(l_sec_qty_tab(l_index), 0);
1457: IF l_debug_on THEN
1458: WSH_DEBUG_SV.log(l_module_name,'l_prim_rcvd_corr_qty',l_prim_rcvd_corr_qty);
1459: END IF;
1460: --}
1461: ELSIF (l_txn_type_tab(l_index) = c_correct and l_parent_txn_type_tab(l_index) = c_rtv) THEN
1462: --{
1462: --{
1463: l_prim_rtv_corr_qty := nvl(l_prim_rtv_corr_qty, 0) + nvl(l_prim_qty_tab(l_index),0);
1464: l_sec_rtv_corr_qty := nvl(l_sec_rtv_corr_qty,0) + nvl(l_sec_qty_tab(l_index), 0);
1465: IF l_debug_on THEN
1466: WSH_DEBUG_SV.log(l_module_name,'l_prim_rtv_corr_qty',l_prim_rtv_corr_qty);
1467: END IF;
1468: --}
1469: END IF;
1470: l_index := l_prim_qty_tab.next(l_index);
1483: --
1484: -- Debug Statements
1485: --
1486: IF l_debug_on THEN
1487: WSH_DEBUG_SV.log(l_module_name,'x_max_rcv_txn_id',x_max_rcv_txn_id);
1488: WSH_DEBUG_SV.pop(l_module_name);
1489: END IF;
1490: --
1491: EXCEPTION
1484: -- Debug Statements
1485: --
1486: IF l_debug_on THEN
1487: WSH_DEBUG_SV.log(l_module_name,'x_max_rcv_txn_id',x_max_rcv_txn_id);
1488: WSH_DEBUG_SV.pop(l_module_name);
1489: END IF;
1490: --
1491: EXCEPTION
1492: --{
1495: --
1496: -- Debug Statements
1497: --
1498: IF l_debug_on THEN
1499: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1500: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1501: END IF;
1502: --
1503: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1496: -- Debug Statements
1497: --
1498: IF l_debug_on THEN
1499: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1500: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1501: END IF;
1502: --
1503: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1504: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1505: --
1506: -- Debug Statements
1507: --
1508: IF l_debug_on THEN
1509: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1510: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1511: END IF;
1512: --
1513: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1506: -- Debug Statements
1507: --
1508: IF l_debug_on THEN
1509: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1510: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1511: END IF;
1512: --
1513: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1514: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1515: --
1516: -- Debug Statements
1517: --
1518: IF l_debug_on THEN
1519: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1520: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1521: END IF;
1522: --
1523: WHEN OTHERS THEN
1516: -- Debug Statements
1517: --
1518: IF l_debug_on THEN
1519: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1520: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1521: END IF;
1522: --
1523: WHEN OTHERS THEN
1524: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1527: --
1528: -- Debug Statements
1529: --
1530: IF l_debug_on THEN
1531: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1532: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1533: END IF;
1534: --
1535: END get_cum_rcvd_rtv_quantities;
1528: -- Debug Statements
1529: --
1530: IF l_debug_on THEN
1531: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1532: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1533: END IF;
1534: --
1535: END get_cum_rcvd_rtv_quantities;
1536:
1853: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1854: --
1855: IF l_debug_on IS NULL
1856: THEN
1857: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1858: END IF;
1859: --
1860: --
1861: -- Debug Statements
1860: --
1861: -- Debug Statements
1862: --
1863: IF l_debug_on THEN
1864: WSH_DEBUG_SV.push(l_module_name);
1865: --
1866: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1867: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1868: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1862: --
1863: IF l_debug_on THEN
1864: WSH_DEBUG_SV.push(l_module_name);
1865: --
1866: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1867: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1868: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1869: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
1870: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
1863: IF l_debug_on THEN
1864: WSH_DEBUG_SV.push(l_module_name);
1865: --
1866: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1867: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1868: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1869: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
1870: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
1871: --WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
1864: WSH_DEBUG_SV.push(l_module_name);
1865: --
1866: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1867: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1868: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1869: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
1870: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
1871: --WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
1872: END IF;
1865: --
1866: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1867: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1868: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1869: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
1870: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
1871: --WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
1872: END IF;
1873: --
1866: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1867: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1868: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1869: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
1870: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
1871: --WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
1872: END IF;
1873: --
1874: IF FND_API.to_Boolean(p_init_msg_list) THEN
1867: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1868: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1869: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
1870: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
1871: --WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
1872: END IF;
1873: --
1874: IF FND_API.to_Boolean(p_init_msg_list) THEN
1875: FND_MSG_PUB.initialize;
1949: l_status_matched_flag := 'N';
1950: --}
1951: END IF;
1952: IF l_debug_on THEN
1953: WSH_DEBUG_SV.log(l_module_name,'l_status_matched_flag',nvl(l_status_matched_flag,'N'));
1954: WSH_DEBUG_SV.log(l_module_name,'p_view_only_flag',nvl(p_view_only_flag,'N'));
1955: END IF;
1956: -- This condition is to make sure that the transaction status is matched and its
1957: -- child txns are pending and that the user trying to match the pending transaction.
1950: --}
1951: END IF;
1952: IF l_debug_on THEN
1953: WSH_DEBUG_SV.log(l_module_name,'l_status_matched_flag',nvl(l_status_matched_flag,'N'));
1954: WSH_DEBUG_SV.log(l_module_name,'p_view_only_flag',nvl(p_view_only_flag,'N'));
1955: END IF;
1956: -- This condition is to make sure that the transaction status is matched and its
1957: -- child txns are pending and that the user trying to match the pending transaction.
1958: IF (nvl(l_status_matched_flag, 'N') = 'Y' AND nvl(p_view_only_flag,'N') <> 'Y') THEN
1957: -- child txns are pending and that the user trying to match the pending transaction.
1958: IF (nvl(l_status_matched_flag, 'N') = 'Y' AND nvl(p_view_only_flag,'N') <> 'Y') THEN
1959: --{
1960: IF l_debug_on THEN
1961: WSH_DEBUG_SV.logmsg(l_module_name,'opening l_partial_shipment_line_csr');
1962: END IF;
1963: open l_partial_shipment_line_csr(p_shipment_header_id);
1964: --}
1965: ELSE
1965: ELSE
1966: --{
1967: -- otherwise we query all the shipment lines belonging to the header.
1968: IF l_debug_on THEN
1969: WSH_DEBUG_SV.logmsg(l_module_name,'opening l_all_shipment_line_csr');
1970: END IF;
1971: open l_all_shipment_line_csr(p_shipment_header_id);
1972: --}
1973: END IF;
1992: open l_txn_type_num_csr(p_shipment_header_id,shpmt_line_rec.shipment_line_id);
1993: fetch l_txn_type_num_csr into l_txn_type_number;
1994: close l_txn_type_num_csr;
1995: IF l_debug_on THEN
1996: WSH_DEBUG_SV.log(l_module_name,'l_txn_type_number',l_txn_type_number);
1997: END IF;
1998: -- The below condition has been added because, if the receipt
1999: -- is against an ASN and that the transaction_type is
2000: -- RECEIPT_ADD and if there is already a record in
2032: END IF;
2033: --}
2034: END IF;
2035: IF l_debug_on THEN
2036: WSH_DEBUG_SV.log(l_module_name,'l_txn_type_number after the check',l_txn_type_number);
2037: END IF;
2038: --}
2039: ELSE
2040: --{
2082: --
2083: -- Debug Statements
2084: --
2085: IF l_debug_on THEN
2086: WSH_DEBUG_SV.log(l_module_name,'l_prim_rcvd_qty', l_prim_rcvd_qty);
2087: WSH_DEBUG_SV.log(l_module_name,'l_prim_ret_qty', l_prim_ret_qty);
2088: WSH_DEBUG_SV.log(l_module_name,'l_prim_rcv_uom_code', l_prim_rcv_uom_code);
2089: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2090: END IF;
2083: -- Debug Statements
2084: --
2085: IF l_debug_on THEN
2086: WSH_DEBUG_SV.log(l_module_name,'l_prim_rcvd_qty', l_prim_rcvd_qty);
2087: WSH_DEBUG_SV.log(l_module_name,'l_prim_ret_qty', l_prim_ret_qty);
2088: WSH_DEBUG_SV.log(l_module_name,'l_prim_rcv_uom_code', l_prim_rcv_uom_code);
2089: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2090: END IF;
2091: --
2084: --
2085: IF l_debug_on THEN
2086: WSH_DEBUG_SV.log(l_module_name,'l_prim_rcvd_qty', l_prim_rcvd_qty);
2087: WSH_DEBUG_SV.log(l_module_name,'l_prim_ret_qty', l_prim_ret_qty);
2088: WSH_DEBUG_SV.log(l_module_name,'l_prim_rcv_uom_code', l_prim_rcv_uom_code);
2089: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2090: END IF;
2091: --
2092: wsh_util_core.api_post_call(
2085: IF l_debug_on THEN
2086: WSH_DEBUG_SV.log(l_module_name,'l_prim_rcvd_qty', l_prim_rcvd_qty);
2087: WSH_DEBUG_SV.log(l_module_name,'l_prim_ret_qty', l_prim_ret_qty);
2088: WSH_DEBUG_SV.log(l_module_name,'l_prim_rcv_uom_code', l_prim_rcv_uom_code);
2089: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2090: END IF;
2091: --
2092: wsh_util_core.api_post_call(
2093: p_return_status => l_return_status,
2147: x_shpmt_lines_out_rec.max_txn_id_tab.extend;
2148: --
2149: l_index := x_shpmt_lines_out_rec.shipment_line_id_tab.count;
2150: IF l_debug_on THEN
2151: WSH_DEBUG_SV.logmsg(l_module_name,'Before assigning the values');
2152: WSH_DEBUG_SV.log(l_module_name,'l_index',l_index);
2153: END IF;
2154: open l_max_with_txn_id_csr(p_shipment_header_id, shpmt_line_rec.shipment_line_id);
2155: fetch l_max_with_txn_id_csr into x_shpmt_lines_out_rec.max_txn_id_tab(l_index);
2148: --
2149: l_index := x_shpmt_lines_out_rec.shipment_line_id_tab.count;
2150: IF l_debug_on THEN
2151: WSH_DEBUG_SV.logmsg(l_module_name,'Before assigning the values');
2152: WSH_DEBUG_SV.log(l_module_name,'l_index',l_index);
2153: END IF;
2154: open l_max_with_txn_id_csr(p_shipment_header_id, shpmt_line_rec.shipment_line_id);
2155: fetch l_max_with_txn_id_csr into x_shpmt_lines_out_rec.max_txn_id_tab(l_index);
2156: close l_max_with_txn_id_csr;
2154: open l_max_with_txn_id_csr(p_shipment_header_id, shpmt_line_rec.shipment_line_id);
2155: fetch l_max_with_txn_id_csr into x_shpmt_lines_out_rec.max_txn_id_tab(l_index);
2156: close l_max_with_txn_id_csr;
2157: IF l_debug_on THEN
2158: WSH_DEBUG_SV.log(l_module_name,'x_shpmt_lines_out_rec.max_txn_id_tab('|| l_index||')',x_shpmt_lines_out_rec.max_txn_id_tab(l_index));
2159: END IF;
2160: x_shpmt_lines_out_rec.shipment_line_id_tab(l_index) := shpmt_line_rec.shipment_line_id;
2161: x_shpmt_lines_out_rec.item_id_tab(l_index) := shpmt_line_rec.item_id;
2162: x_shpmt_lines_out_rec.item_revision_tab(l_index) := shpmt_line_rec.item_revision;
2185: x_shpmt_lines_out_rec.po_line_num_tab(l_index) := shpmt_line_rec.po_line_number;
2186: x_shpmt_lines_out_rec.po_revision_num_tab(l_index) := nvl(shpmt_line_rec.rel_revision_num, shpmt_line_rec.po_revision_num);
2187: x_shpmt_lines_out_rec.txn_type_number_tab(l_index) := l_txn_type_number;
2188: IF l_debug_on THEN
2189: WSH_DEBUG_SV.logmsg(l_module_name,'After assigning the values');
2190: WSH_DEBUG_SV.log(l_module_name,'l_txn_type_number', l_txn_type_number);
2191: END IF;
2192: --
2193: --
2186: x_shpmt_lines_out_rec.po_revision_num_tab(l_index) := nvl(shpmt_line_rec.rel_revision_num, shpmt_line_rec.po_revision_num);
2187: x_shpmt_lines_out_rec.txn_type_number_tab(l_index) := l_txn_type_number;
2188: IF l_debug_on THEN
2189: WSH_DEBUG_SV.logmsg(l_module_name,'After assigning the values');
2190: WSH_DEBUG_SV.log(l_module_name,'l_txn_type_number', l_txn_type_number);
2191: END IF;
2192: --
2193: --
2194: open l_get_del_det_item_csr(shpmt_line_rec.po_line_location_id,
2196: fetch l_get_del_det_item_csr into l_dd_item_id, l_dd_uom_code, l_dd_organization_id, l_unit_of_measure,l_src_requested_qty,l_src_requested_qty2;
2197: close l_get_del_det_item_csr;
2198:
2199: IF l_debug_on THEN
2200: WSH_DEBUG_SV.log(l_module_name,'l_dd_uom_code', l_dd_uom_code);
2201: WSH_DEBUG_SV.log(l_module_name,'l_dd_item_id', l_dd_item_id);
2202: WSH_DEBUG_SV.log(l_module_name,'l_src_requested_qty', l_src_requested_qty);
2203: WSH_DEBUG_SV.log(l_module_name,'l_src_requested_qty2', l_src_requested_qty2);
2204: END IF;
2197: close l_get_del_det_item_csr;
2198:
2199: IF l_debug_on THEN
2200: WSH_DEBUG_SV.log(l_module_name,'l_dd_uom_code', l_dd_uom_code);
2201: WSH_DEBUG_SV.log(l_module_name,'l_dd_item_id', l_dd_item_id);
2202: WSH_DEBUG_SV.log(l_module_name,'l_src_requested_qty', l_src_requested_qty);
2203: WSH_DEBUG_SV.log(l_module_name,'l_src_requested_qty2', l_src_requested_qty2);
2204: END IF;
2205: IF l_txn_type = 'RECEIPT' THEN
2198:
2199: IF l_debug_on THEN
2200: WSH_DEBUG_SV.log(l_module_name,'l_dd_uom_code', l_dd_uom_code);
2201: WSH_DEBUG_SV.log(l_module_name,'l_dd_item_id', l_dd_item_id);
2202: WSH_DEBUG_SV.log(l_module_name,'l_src_requested_qty', l_src_requested_qty);
2203: WSH_DEBUG_SV.log(l_module_name,'l_src_requested_qty2', l_src_requested_qty2);
2204: END IF;
2205: IF l_txn_type = 'RECEIPT' THEN
2206: --{
2199: IF l_debug_on THEN
2200: WSH_DEBUG_SV.log(l_module_name,'l_dd_uom_code', l_dd_uom_code);
2201: WSH_DEBUG_SV.log(l_module_name,'l_dd_item_id', l_dd_item_id);
2202: WSH_DEBUG_SV.log(l_module_name,'l_src_requested_qty', l_src_requested_qty);
2203: WSH_DEBUG_SV.log(l_module_name,'l_src_requested_qty2', l_src_requested_qty2);
2204: END IF;
2205: IF l_txn_type = 'RECEIPT' THEN
2206: --{
2207: IF l_dd_uom_code = l_prim_rcv_uom_code THEN
2212: x_shpmt_lines_out_rec.secondary_qty_received_tab(l_index) := l_sec_rcvd_qty;
2213: x_shpmt_lines_out_rec.secondary_qty_returned_tab(l_index) := l_sec_ret_qty;
2214: x_shpmt_lines_out_rec.secondary_uom_code_tab(l_index) := l_sec_rcv_uom_code;
2215: IF l_debug_on THEN
2216: WSH_DEBUG_SV.log(l_module_name,'l_unit_of_measure', l_unit_of_measure);
2217: END IF;
2218: x_shpmt_lines_out_rec.primary_unit_of_measure_tab(l_index):= l_unit_of_measure;
2219: x_shpmt_lines_out_rec.secondary_unit_of_measure_tab(l_index):= shpmt_line_rec.secondary_unit_of_measure;
2220: --}
2223: --
2224: -- Debug Statements
2225: --
2226: IF l_debug_on THEN
2227: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_UTIL_PKG.CONVERT_QUANTITY For received quantity',WSH_DEBUG_SV.C_PROC_LEVEL);
2228: END IF;
2229: --
2230: WSH_INBOUND_UTIL_PKG.convert_quantity(
2231: p_inv_item_id => l_dd_item_id,
2238: --
2239: -- Debug Statements
2240: --
2241: IF l_debug_on THEN
2242: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2243: END IF;
2244: --
2245: wsh_util_core.api_post_call(
2246: p_return_status => l_return_status,
2249: --
2250: -- Debug Statements
2251: --
2252: IF l_debug_on THEN
2253: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_UTIL_PKG.CONVERT_QUANTITY For returned quantity',WSH_DEBUG_SV.C_PROC_LEVEL);
2254: END IF;
2255: --
2256: WSH_INBOUND_UTIL_PKG.convert_quantity(
2257: p_inv_item_id => l_dd_item_id,
2264: --
2265: -- Debug Statements
2266: --
2267: IF l_debug_on THEN
2268: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2269: END IF;
2270: --
2271: wsh_util_core.api_post_call(
2272: p_return_status => l_return_status,
2295: --
2296: -- Debug Statements
2297: --
2298: IF l_debug_on THEN
2299: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_UTIL_PKG.CONVERT_QUANTITY For shipped quantity',WSH_DEBUG_SV.C_PROC_LEVEL);
2300: END IF;
2301: --
2302: WSH_INBOUND_UTIL_PKG.convert_quantity(
2303: p_inv_item_id => l_dd_item_id,
2310: --
2311: -- Debug Statements
2312: --
2313: IF l_debug_on THEN
2314: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2315: END IF;
2316: --
2317: wsh_util_core.api_post_call(
2318: p_return_status => l_return_status,
2336: l_src_requested_qty2 := NULL;
2337: --}
2338: END IF;
2339: IF l_debug_on THEN
2340: WSH_DEBUG_SV.log(l_module_name,'sec shipped quantity', x_shpmt_lines_out_rec.secondary_qty_shipped_tab(l_index));
2341: END IF;
2342: --}
2343: END IF;
2344: --}
2384: --
2385: -- Debug Statements
2386: --
2387: IF l_debug_on THEN
2388: wsh_debug_sv.log(l_module_name, 'x_max_rcv_txn_id',x_max_rcv_txn_id);
2389: --wsh_debug_sv.log(l_module_name, 'Number of records in x_shpmt_lines_out_rec',x_shpmt_lines_out_rec.shipment_line_id_tab.count);
2390: --wsh_debug_sv.log(l_module_name, 'Shipment line id 1 is',x_shpmt_lines_out_rec.shipment_line_id_tab(1));
2391: --wsh_debug_sv.log(l_module_name, 'Received Qty 1 is',x_shpmt_lines_out_rec.primary_qty_received_tab(1));
2392: --wsh_debug_sv.log(l_module_name, 'Received Qty 2 is',x_shpmt_lines_out_rec.primary_qty_received_tab(2));
2385: -- Debug Statements
2386: --
2387: IF l_debug_on THEN
2388: wsh_debug_sv.log(l_module_name, 'x_max_rcv_txn_id',x_max_rcv_txn_id);
2389: --wsh_debug_sv.log(l_module_name, 'Number of records in x_shpmt_lines_out_rec',x_shpmt_lines_out_rec.shipment_line_id_tab.count);
2390: --wsh_debug_sv.log(l_module_name, 'Shipment line id 1 is',x_shpmt_lines_out_rec.shipment_line_id_tab(1));
2391: --wsh_debug_sv.log(l_module_name, 'Received Qty 1 is',x_shpmt_lines_out_rec.primary_qty_received_tab(1));
2392: --wsh_debug_sv.log(l_module_name, 'Received Qty 2 is',x_shpmt_lines_out_rec.primary_qty_received_tab(2));
2393: --wsh_debug_sv.log(l_module_name, 'Returned Qty 1 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(1));
2386: --
2387: IF l_debug_on THEN
2388: wsh_debug_sv.log(l_module_name, 'x_max_rcv_txn_id',x_max_rcv_txn_id);
2389: --wsh_debug_sv.log(l_module_name, 'Number of records in x_shpmt_lines_out_rec',x_shpmt_lines_out_rec.shipment_line_id_tab.count);
2390: --wsh_debug_sv.log(l_module_name, 'Shipment line id 1 is',x_shpmt_lines_out_rec.shipment_line_id_tab(1));
2391: --wsh_debug_sv.log(l_module_name, 'Received Qty 1 is',x_shpmt_lines_out_rec.primary_qty_received_tab(1));
2392: --wsh_debug_sv.log(l_module_name, 'Received Qty 2 is',x_shpmt_lines_out_rec.primary_qty_received_tab(2));
2393: --wsh_debug_sv.log(l_module_name, 'Returned Qty 1 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(1));
2394: --wsh_debug_sv.log(l_module_name, 'Returned Qty 2 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(2));
2387: IF l_debug_on THEN
2388: wsh_debug_sv.log(l_module_name, 'x_max_rcv_txn_id',x_max_rcv_txn_id);
2389: --wsh_debug_sv.log(l_module_name, 'Number of records in x_shpmt_lines_out_rec',x_shpmt_lines_out_rec.shipment_line_id_tab.count);
2390: --wsh_debug_sv.log(l_module_name, 'Shipment line id 1 is',x_shpmt_lines_out_rec.shipment_line_id_tab(1));
2391: --wsh_debug_sv.log(l_module_name, 'Received Qty 1 is',x_shpmt_lines_out_rec.primary_qty_received_tab(1));
2392: --wsh_debug_sv.log(l_module_name, 'Received Qty 2 is',x_shpmt_lines_out_rec.primary_qty_received_tab(2));
2393: --wsh_debug_sv.log(l_module_name, 'Returned Qty 1 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(1));
2394: --wsh_debug_sv.log(l_module_name, 'Returned Qty 2 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(2));
2395: --wsh_debug_sv.log(l_module_name, 'Uom Code is',x_shpmt_lines_out_rec.primary_uom_code_tab(1));
2388: wsh_debug_sv.log(l_module_name, 'x_max_rcv_txn_id',x_max_rcv_txn_id);
2389: --wsh_debug_sv.log(l_module_name, 'Number of records in x_shpmt_lines_out_rec',x_shpmt_lines_out_rec.shipment_line_id_tab.count);
2390: --wsh_debug_sv.log(l_module_name, 'Shipment line id 1 is',x_shpmt_lines_out_rec.shipment_line_id_tab(1));
2391: --wsh_debug_sv.log(l_module_name, 'Received Qty 1 is',x_shpmt_lines_out_rec.primary_qty_received_tab(1));
2392: --wsh_debug_sv.log(l_module_name, 'Received Qty 2 is',x_shpmt_lines_out_rec.primary_qty_received_tab(2));
2393: --wsh_debug_sv.log(l_module_name, 'Returned Qty 1 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(1));
2394: --wsh_debug_sv.log(l_module_name, 'Returned Qty 2 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(2));
2395: --wsh_debug_sv.log(l_module_name, 'Uom Code is',x_shpmt_lines_out_rec.primary_uom_code_tab(1));
2396: --wsh_debug_sv.log(l_module_name, 'Shipment line id 2 is',x_shpmt_lines_out_rec.shipment_line_id_tab(2));
2389: --wsh_debug_sv.log(l_module_name, 'Number of records in x_shpmt_lines_out_rec',x_shpmt_lines_out_rec.shipment_line_id_tab.count);
2390: --wsh_debug_sv.log(l_module_name, 'Shipment line id 1 is',x_shpmt_lines_out_rec.shipment_line_id_tab(1));
2391: --wsh_debug_sv.log(l_module_name, 'Received Qty 1 is',x_shpmt_lines_out_rec.primary_qty_received_tab(1));
2392: --wsh_debug_sv.log(l_module_name, 'Received Qty 2 is',x_shpmt_lines_out_rec.primary_qty_received_tab(2));
2393: --wsh_debug_sv.log(l_module_name, 'Returned Qty 1 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(1));
2394: --wsh_debug_sv.log(l_module_name, 'Returned Qty 2 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(2));
2395: --wsh_debug_sv.log(l_module_name, 'Uom Code is',x_shpmt_lines_out_rec.primary_uom_code_tab(1));
2396: --wsh_debug_sv.log(l_module_name, 'Shipment line id 2 is',x_shpmt_lines_out_rec.shipment_line_id_tab(2));
2397: WSH_DEBUG_SV.pop(l_module_name);
2390: --wsh_debug_sv.log(l_module_name, 'Shipment line id 1 is',x_shpmt_lines_out_rec.shipment_line_id_tab(1));
2391: --wsh_debug_sv.log(l_module_name, 'Received Qty 1 is',x_shpmt_lines_out_rec.primary_qty_received_tab(1));
2392: --wsh_debug_sv.log(l_module_name, 'Received Qty 2 is',x_shpmt_lines_out_rec.primary_qty_received_tab(2));
2393: --wsh_debug_sv.log(l_module_name, 'Returned Qty 1 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(1));
2394: --wsh_debug_sv.log(l_module_name, 'Returned Qty 2 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(2));
2395: --wsh_debug_sv.log(l_module_name, 'Uom Code is',x_shpmt_lines_out_rec.primary_uom_code_tab(1));
2396: --wsh_debug_sv.log(l_module_name, 'Shipment line id 2 is',x_shpmt_lines_out_rec.shipment_line_id_tab(2));
2397: WSH_DEBUG_SV.pop(l_module_name);
2398: END IF;
2391: --wsh_debug_sv.log(l_module_name, 'Received Qty 1 is',x_shpmt_lines_out_rec.primary_qty_received_tab(1));
2392: --wsh_debug_sv.log(l_module_name, 'Received Qty 2 is',x_shpmt_lines_out_rec.primary_qty_received_tab(2));
2393: --wsh_debug_sv.log(l_module_name, 'Returned Qty 1 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(1));
2394: --wsh_debug_sv.log(l_module_name, 'Returned Qty 2 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(2));
2395: --wsh_debug_sv.log(l_module_name, 'Uom Code is',x_shpmt_lines_out_rec.primary_uom_code_tab(1));
2396: --wsh_debug_sv.log(l_module_name, 'Shipment line id 2 is',x_shpmt_lines_out_rec.shipment_line_id_tab(2));
2397: WSH_DEBUG_SV.pop(l_module_name);
2398: END IF;
2399: --
2392: --wsh_debug_sv.log(l_module_name, 'Received Qty 2 is',x_shpmt_lines_out_rec.primary_qty_received_tab(2));
2393: --wsh_debug_sv.log(l_module_name, 'Returned Qty 1 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(1));
2394: --wsh_debug_sv.log(l_module_name, 'Returned Qty 2 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(2));
2395: --wsh_debug_sv.log(l_module_name, 'Uom Code is',x_shpmt_lines_out_rec.primary_uom_code_tab(1));
2396: --wsh_debug_sv.log(l_module_name, 'Shipment line id 2 is',x_shpmt_lines_out_rec.shipment_line_id_tab(2));
2397: WSH_DEBUG_SV.pop(l_module_name);
2398: END IF;
2399: --
2400: --}
2393: --wsh_debug_sv.log(l_module_name, 'Returned Qty 1 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(1));
2394: --wsh_debug_sv.log(l_module_name, 'Returned Qty 2 is',x_shpmt_lines_out_rec.primary_qty_returned_tab(2));
2395: --wsh_debug_sv.log(l_module_name, 'Uom Code is',x_shpmt_lines_out_rec.primary_uom_code_tab(1));
2396: --wsh_debug_sv.log(l_module_name, 'Shipment line id 2 is',x_shpmt_lines_out_rec.shipment_line_id_tab(2));
2397: WSH_DEBUG_SV.pop(l_module_name);
2398: END IF;
2399: --
2400: --}
2401: EXCEPTION
2405: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2406: FND_MESSAGE.SET_NAME('WSH','WSH_IB_TXN_LOCK_ERROR');
2407: wsh_util_core.add_message(x_return_status,l_module_name);
2408: IF l_debug_on THEN
2409: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2410: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2411: END IF;
2412: --
2413: WHEN FND_API.G_EXC_ERROR THEN
2406: FND_MESSAGE.SET_NAME('WSH','WSH_IB_TXN_LOCK_ERROR');
2407: wsh_util_core.add_message(x_return_status,l_module_name);
2408: IF l_debug_on THEN
2409: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2410: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2411: END IF;
2412: --
2413: WHEN FND_API.G_EXC_ERROR THEN
2414: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2423: --
2424: -- Debug Statements
2425: --
2426: IF l_debug_on THEN
2427: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2428: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2429: END IF;
2430: --
2431: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2424: -- Debug Statements
2425: --
2426: IF l_debug_on THEN
2427: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2428: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2429: END IF;
2430: --
2431: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2432: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2441: --
2442: -- Debug Statements
2443: --
2444: IF l_debug_on THEN
2445: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2446: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2447: END IF;
2448: --
2449: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2442: -- Debug Statements
2443: --
2444: IF l_debug_on THEN
2445: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2446: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2447: END IF;
2448: --
2449: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2450: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2459: --
2460: -- Debug Statements
2461: --
2462: IF l_debug_on THEN
2463: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2464: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2465: END IF;
2466: --
2467: WHEN OTHERS THEN
2460: -- Debug Statements
2461: --
2462: IF l_debug_on THEN
2463: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2464: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2465: END IF;
2466: --
2467: WHEN OTHERS THEN
2468: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2479: --
2480: -- Debug Statements
2481: --
2482: IF l_debug_on THEN
2483: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2484: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2485: END IF;
2486: --
2487: END get_shipment_lines;
2480: -- Debug Statements
2481: --
2482: IF l_debug_on THEN
2483: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2484: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2485: END IF;
2486: --
2487: END get_shipment_lines;
2488:
2602: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2603: --
2604: IF l_debug_on IS NULL
2605: THEN
2606: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2607: END IF;
2608: --
2609: --
2610: -- Debug Statements
2609: --
2610: -- Debug Statements
2611: --
2612: IF l_debug_on THEN
2613: WSH_DEBUG_SV.push(l_module_name);
2614: --
2615: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2616: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2617: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2611: --
2612: IF l_debug_on THEN
2613: WSH_DEBUG_SV.push(l_module_name);
2614: --
2615: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2616: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2617: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2618: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
2619: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
2612: IF l_debug_on THEN
2613: WSH_DEBUG_SV.push(l_module_name);
2614: --
2615: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2616: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2617: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2618: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
2619: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
2620: WSH_DEBUG_SV.log(l_module_name,'P_OBJECT_VERSION_NUMBER',P_OBJECT_VERSION_NUMBER);
2613: WSH_DEBUG_SV.push(l_module_name);
2614: --
2615: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2616: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2617: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2618: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
2619: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
2620: WSH_DEBUG_SV.log(l_module_name,'P_OBJECT_VERSION_NUMBER',P_OBJECT_VERSION_NUMBER);
2621: END IF;
2614: --
2615: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2616: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2617: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2618: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
2619: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
2620: WSH_DEBUG_SV.log(l_module_name,'P_OBJECT_VERSION_NUMBER',P_OBJECT_VERSION_NUMBER);
2621: END IF;
2622: --
2615: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2616: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2617: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2618: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
2619: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
2620: WSH_DEBUG_SV.log(l_module_name,'P_OBJECT_VERSION_NUMBER',P_OBJECT_VERSION_NUMBER);
2621: END IF;
2622: --
2623: IF FND_API.to_Boolean(p_init_msg_list) THEN
2616: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2617: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2618: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
2619: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
2620: WSH_DEBUG_SV.log(l_module_name,'P_OBJECT_VERSION_NUMBER',P_OBJECT_VERSION_NUMBER);
2621: END IF;
2622: --
2623: IF FND_API.to_Boolean(p_init_msg_list) THEN
2624: FND_MSG_PUB.initialize;
2636: THEN
2637: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2638: END IF;
2639: IF l_debug_on THEN
2640: WSH_DEBUG_SV.logmsg(l_module_name,'After checking Compatible_API_Call');
2641: END IF;
2642: --
2643: IF l_debug_on THEN
2644: WSH_DEBUG_SV.logmsg(l_module_name,'After initializing the message list');
2640: WSH_DEBUG_SV.logmsg(l_module_name,'After checking Compatible_API_Call');
2641: END IF;
2642: --
2643: IF l_debug_on THEN
2644: WSH_DEBUG_SV.logmsg(l_module_name,'After initializing the message list');
2645: END IF;
2646: -- { IB-Phase-2
2647: -- For manual matching of Receipts, rating of Trips has to be done asynchronously.
2648: WSH_INBOUND_UTIL_PKG.G_ASN_RECEIPT_MATCH_TYPE := 'MANUAL';
2670: --
2671: -- Debug Statements
2672: --
2673: IF l_debug_on THEN
2674: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.CANCEL_ASN',WSH_DEBUG_SV.C_PROC_LEVEL);
2675: END IF;
2676: --
2677: WSH_ASN_RECEIPT_PVT.Cancel_ASN(
2678: p_header_id => p_shipment_header_id,
2683: --
2684: -- Debug Statements
2685: --
2686: IF l_debug_on THEN
2687: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2688: END IF;
2689: --
2690: wsh_util_core.api_post_call(
2691: p_return_status => l_return_status,
2717: --
2718: -- Debug Statements
2719: --
2720: IF l_debug_on THEN
2721: WSH_DEBUG_SV.log(l_module_name,'return status is ', l_return_status);
2722: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2723: END IF;
2724: --
2725: wsh_util_core.api_post_call(
2718: -- Debug Statements
2719: --
2720: IF l_debug_on THEN
2721: WSH_DEBUG_SV.log(l_module_name,'return status is ', l_return_status);
2722: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2723: END IF;
2724: --
2725: wsh_util_core.api_post_call(
2726: p_return_status => l_return_status,
2734: --
2735: -- Debug Statements
2736: --
2737: IF l_debug_on THEN
2738: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2739: END IF;
2740: --
2741: wsh_util_core.api_post_call(
2742: p_return_status => l_return_status,
2760: --
2761: -- Debug Statements
2762: --
2763: IF l_debug_on THEN
2764: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_MULTIPLE_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
2765: END IF;
2766: --
2767: --l_unassign_action_prms.caller := wsh_util_core.C_IB_RECEIPT_PREFIX;
2768: WSH_DELIVERY_DETAILS_ACTIONS.Unassign_Multiple_Details(
2775: --
2776: -- Debug Statements
2777: --
2778: IF l_debug_on THEN
2779: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2780: END IF;
2781: --
2782: wsh_util_core.api_post_call(
2783: p_return_status => l_return_status,
2791: --
2792: -- Debug Statements
2793: --
2794: IF l_debug_on THEN
2795: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PO_CMG_PVT.REAPPROVE_PO',WSH_DEBUG_SV.C_PROC_LEVEL);
2796: END IF;
2797: l_po_action_prms.action_code := 'CANCEL_ASN';
2798: /*
2799: WSH_PO_CMG_PVT.Update_Attributes(
2816: --
2817: -- Debug Statements
2818: --
2819: IF l_debug_on THEN
2820: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling Reapprove_PO is ', l_return_status);
2821: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2822: END IF;
2823: --
2824: wsh_util_core.api_post_call(
2817: -- Debug Statements
2818: --
2819: IF l_debug_on THEN
2820: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling Reapprove_PO is ', l_return_status);
2821: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2822: END IF;
2823: --
2824: wsh_util_core.api_post_call(
2825: p_return_status => l_return_status,
2831: END IF;
2832: --
2833: --
2834: IF l_debug_on THEN
2835: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_TXN_HISTORY_PKG.POST_PROCESS',WSH_DEBUG_SV.C_PROC_LEVEL);
2836: END IF;
2837: --
2838: --
2839: WSH_INBOUND_TXN_HISTORY_PKG.post_process(
2845: x_return_status => l_return_status);
2846: --
2847: --
2848: IF l_debug_on THEN
2849: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling WSH_INBOUND_TXN_HISTORY_PKG.post_process is ', l_return_status);
2850: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2851: END IF;
2852: --
2853: --
2846: --
2847: --
2848: IF l_debug_on THEN
2849: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling WSH_INBOUND_TXN_HISTORY_PKG.post_process is ', l_return_status);
2850: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2851: END IF;
2852: --
2853: --
2854: wsh_util_core.api_post_call(
2857: x_num_errors => l_num_errors);
2858: --
2859: IF l_debug_on THEN
2860: --{
2861: WSH_DEBUG_SV.log(l_module_name,'l_num_warnings', l_num_warnings);
2862: WSH_DEBUG_SV.log(l_module_name,'l_num_errors', l_num_errors);
2863:
2864: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
2865: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
2858: --
2859: IF l_debug_on THEN
2860: --{
2861: WSH_DEBUG_SV.log(l_module_name,'l_num_warnings', l_num_warnings);
2862: WSH_DEBUG_SV.log(l_module_name,'l_num_errors', l_num_errors);
2863:
2864: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
2865: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
2866:
2861: WSH_DEBUG_SV.log(l_module_name,'l_num_warnings', l_num_warnings);
2862: WSH_DEBUG_SV.log(l_module_name,'l_num_errors', l_num_errors);
2863:
2864: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
2865: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
2866:
2867: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
2868: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
2869: x_return_status := wsh_util_core.g_ret_sts_success;
2889:
2890: l_reset_flags := FALSE;
2891:
2892: IF l_debug_on THEN
2893: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
2894: END IF;
2895:
2896: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
2897: x_return_status => l_return_status);
2896: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
2897: x_return_status => l_return_status);
2898:
2899: IF l_debug_on THEN
2900: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2901: END IF;
2902:
2903: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
2904: RAISE FND_API.G_EXC_ERROR;
2923:
2924: IF FND_API.To_Boolean( p_commit ) THEN
2925:
2926: IF l_debug_on THEN
2927: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
2928: END IF;
2929:
2930: WSH_UTIL_CORE.reset_stops_for_load_tender(p_reset_flags => TRUE,
2931: x_return_status => l_return_status);
2932:
2933: ELSE
2934:
2935: IF l_debug_on THEN
2936: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
2937: END IF;
2938:
2939: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
2940: x_return_status => l_return_status);
2941:
2942: END IF;
2943:
2944: IF l_debug_on THEN
2945: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2946: END IF;
2947:
2948: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
2949: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR,
2977: --
2978: -- Debug Statements
2979: --
2980: IF l_debug_on THEN
2981: WSH_DEBUG_SV.pop(l_module_name);
2982: END IF;
2983: --
2984: EXCEPTION
2985: --{
2995: --{
2996: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
2997: --{
2998: IF l_debug_on THEN
2999: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
3000: END IF;
3001:
3002: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
3003: x_return_status => l_return_status);
3003: x_return_status => l_return_status);
3004:
3005:
3006: IF l_debug_on THEN
3007: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3008: END IF;
3009:
3010: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3011: x_return_status := l_return_status;
3027: --
3028: -- Debug Statements
3029: --
3030: IF l_debug_on THEN
3031: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3032: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
3033: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
3034:
3035: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
3029: --
3030: IF l_debug_on THEN
3031: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3032: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
3033: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
3034:
3035: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
3036: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
3037: wsh_util_core.add_message(x_return_status, l_module_name);
3035: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
3036: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
3037: wsh_util_core.add_message(x_return_status, l_module_name);
3038:
3039: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3040: END IF;
3041: --
3042: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3043: ROLLBACK TO REVERT_MATCHING_GRP;
3052: --{
3053: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
3054: --{
3055: IF l_debug_on THEN
3056: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
3057: END IF;
3058:
3059: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
3060: x_return_status => l_return_status);
3060: x_return_status => l_return_status);
3061:
3062:
3063: IF l_debug_on THEN
3064: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3065: END IF;
3066:
3067: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3068: x_return_status := l_return_status;
3082: --
3083: -- Debug Statements
3084: --
3085: IF l_debug_on THEN
3086: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3087: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
3088: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
3089:
3090: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
3084: --
3085: IF l_debug_on THEN
3086: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3087: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
3088: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
3089:
3090: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
3091: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
3092: wsh_util_core.add_message(x_return_status, l_module_name);
3090: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
3091: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
3092: wsh_util_core.add_message(x_return_status, l_module_name);
3093:
3094: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3095: END IF;
3096: --
3097: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
3098: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3105: --{
3106: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
3107: --{
3108: IF l_debug_on THEN
3109: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
3110: END IF;
3111:
3112: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
3113: x_return_status => l_return_status);
3113: x_return_status => l_return_status);
3114:
3115:
3116: IF l_debug_on THEN
3117: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3118: END IF;
3119:
3120: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
3121: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR,
3142: --
3143: -- Debug Statements
3144: --
3145: IF l_debug_on THEN
3146: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3147: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
3148: END IF;
3149: --
3150: WHEN OTHERS THEN
3143: -- Debug Statements
3144: --
3145: IF l_debug_on THEN
3146: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3147: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
3148: END IF;
3149: --
3150: WHEN OTHERS THEN
3151: ROLLBACK TO REVERT_MATCHING_GRP;
3161: --{
3162: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
3163: --{
3164: IF l_debug_on THEN
3165: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
3166: END IF;
3167:
3168: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
3169: x_return_status => l_return_status);
3169: x_return_status => l_return_status);
3170:
3171:
3172: IF l_debug_on THEN
3173: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3174: END IF;
3175:
3176: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3177: x_return_status := l_return_status;
3193: --
3194: -- Debug Statements
3195: --
3196: IF l_debug_on THEN
3197: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3198:
3199: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
3200: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
3201:
3196: IF l_debug_on THEN
3197: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3198:
3199: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
3200: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
3201:
3202: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
3203: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
3204: wsh_util_core.add_message(x_return_status, l_module_name);
3202: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
3203: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
3204: wsh_util_core.add_message(x_return_status, l_module_name);
3205:
3206: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3207: END IF;
3208: --
3209: END revert_matching;
3210:
3383: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3384: --
3385: IF l_debug_on IS NULL
3386: THEN
3387: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3388: END IF;
3389: --
3390: --
3391: -- Debug Statements
3390: --
3391: -- Debug Statements
3392: --
3393: IF l_debug_on THEN
3394: WSH_DEBUG_SV.push(l_module_name);
3395: --
3396: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
3397: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
3398: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
3392: --
3393: IF l_debug_on THEN
3394: WSH_DEBUG_SV.push(l_module_name);
3395: --
3396: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
3397: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
3398: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
3399: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
3400: WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
3393: IF l_debug_on THEN
3394: WSH_DEBUG_SV.push(l_module_name);
3395: --
3396: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
3397: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
3398: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
3399: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
3400: WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
3401: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
3394: WSH_DEBUG_SV.push(l_module_name);
3395: --
3396: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
3397: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
3398: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
3399: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
3400: WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
3401: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
3402: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_ASN_RCV_FLAG',P_PROCESS_ASN_RCV_FLAG);
3395: --
3396: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
3397: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
3398: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
3399: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
3400: WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
3401: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
3402: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_ASN_RCV_FLAG',P_PROCESS_ASN_RCV_FLAG);
3403: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_CORR_RTV_FLAG',P_PROCESS_CORR_RTV_FLAG);
3396: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
3397: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
3398: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
3399: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
3400: WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
3401: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
3402: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_ASN_RCV_FLAG',P_PROCESS_ASN_RCV_FLAG);
3403: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_CORR_RTV_FLAG',P_PROCESS_CORR_RTV_FLAG);
3404: WSH_DEBUG_SV.log(l_module_name,'p_shipment_line_id_tab.count',p_shipment_line_id_tab.count);
3397: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
3398: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
3399: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
3400: WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
3401: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
3402: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_ASN_RCV_FLAG',P_PROCESS_ASN_RCV_FLAG);
3403: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_CORR_RTV_FLAG',P_PROCESS_CORR_RTV_FLAG);
3404: WSH_DEBUG_SV.log(l_module_name,'p_shipment_line_id_tab.count',p_shipment_line_id_tab.count);
3405: WSH_DEBUG_SV.log(l_module_name,'p_max_txn_id_tab.count',p_max_txn_id_tab.count);
3398: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
3399: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
3400: WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
3401: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
3402: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_ASN_RCV_FLAG',P_PROCESS_ASN_RCV_FLAG);
3403: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_CORR_RTV_FLAG',P_PROCESS_CORR_RTV_FLAG);
3404: WSH_DEBUG_SV.log(l_module_name,'p_shipment_line_id_tab.count',p_shipment_line_id_tab.count);
3405: WSH_DEBUG_SV.log(l_module_name,'p_max_txn_id_tab.count',p_max_txn_id_tab.count);
3406: WSH_DEBUG_SV.log(l_module_name,'p_shipment_line_id_tab.count',p_shipment_line_id_tab.count);
3399: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
3400: WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
3401: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
3402: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_ASN_RCV_FLAG',P_PROCESS_ASN_RCV_FLAG);
3403: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_CORR_RTV_FLAG',P_PROCESS_CORR_RTV_FLAG);
3404: WSH_DEBUG_SV.log(l_module_name,'p_shipment_line_id_tab.count',p_shipment_line_id_tab.count);
3405: WSH_DEBUG_SV.log(l_module_name,'p_max_txn_id_tab.count',p_max_txn_id_tab.count);
3406: WSH_DEBUG_SV.log(l_module_name,'p_shipment_line_id_tab.count',p_shipment_line_id_tab.count);
3407: END IF;
3400: WSH_DEBUG_SV.log(l_module_name,'P_MAX_RCV_TXN_ID',P_MAX_RCV_TXN_ID);
3401: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
3402: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_ASN_RCV_FLAG',P_PROCESS_ASN_RCV_FLAG);
3403: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_CORR_RTV_FLAG',P_PROCESS_CORR_RTV_FLAG);
3404: WSH_DEBUG_SV.log(l_module_name,'p_shipment_line_id_tab.count',p_shipment_line_id_tab.count);
3405: WSH_DEBUG_SV.log(l_module_name,'p_max_txn_id_tab.count',p_max_txn_id_tab.count);
3406: WSH_DEBUG_SV.log(l_module_name,'p_shipment_line_id_tab.count',p_shipment_line_id_tab.count);
3407: END IF;
3408: --
3401: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TYPE',P_TRANSACTION_TYPE);
3402: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_ASN_RCV_FLAG',P_PROCESS_ASN_RCV_FLAG);
3403: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_CORR_RTV_FLAG',P_PROCESS_CORR_RTV_FLAG);
3404: WSH_DEBUG_SV.log(l_module_name,'p_shipment_line_id_tab.count',p_shipment_line_id_tab.count);
3405: WSH_DEBUG_SV.log(l_module_name,'p_max_txn_id_tab.count',p_max_txn_id_tab.count);
3406: WSH_DEBUG_SV.log(l_module_name,'p_shipment_line_id_tab.count',p_shipment_line_id_tab.count);
3407: END IF;
3408: --
3409: IF FND_API.to_Boolean(p_init_msg_list) THEN
3402: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_ASN_RCV_FLAG',P_PROCESS_ASN_RCV_FLAG);
3403: WSH_DEBUG_SV.log(l_module_name,'P_PROCESS_CORR_RTV_FLAG',P_PROCESS_CORR_RTV_FLAG);
3404: WSH_DEBUG_SV.log(l_module_name,'p_shipment_line_id_tab.count',p_shipment_line_id_tab.count);
3405: WSH_DEBUG_SV.log(l_module_name,'p_max_txn_id_tab.count',p_max_txn_id_tab.count);
3406: WSH_DEBUG_SV.log(l_module_name,'p_shipment_line_id_tab.count',p_shipment_line_id_tab.count);
3407: END IF;
3408: --
3409: IF FND_API.to_Boolean(p_init_msg_list) THEN
3410: FND_MSG_PUB.initialize;
3439: open l_get_ship_from_of_header_csr;
3440: fetch l_get_ship_from_of_header_csr into l_header_ship_from_loc_id;
3441: close l_get_ship_from_of_header_csr;
3442: IF l_debug_on THEN
3443: WSH_DEBUG_SV.log(l_module_name,'l_header_ship_from_loc_id',l_header_ship_from_loc_id);
3444: END IF;
3445:
3446:
3447: IF l_header_ship_from_loc_id IS NOT NULL
3495:
3496: l_ib_det_count := l_ib_del_det_rec.del_detail_id_tab.count;
3497:
3498: IF l_debug_on THEN
3499: WSH_DEBUG_SV.log(l_module_name,'l_ib_det_count',l_ib_det_count);
3500: i := l_ib_del_det_rec.del_detail_id_tab.first;
3501: WHILE i is not null LOOP
3502: --{
3503: WSH_DEBUG_SV.log(l_module_name,'process_asn_rcv_flag_tab(' || i || ')',l_ib_del_det_rec.process_asn_rcv_flag_tab(i));
3499: WSH_DEBUG_SV.log(l_module_name,'l_ib_det_count',l_ib_det_count);
3500: i := l_ib_del_det_rec.del_detail_id_tab.first;
3501: WHILE i is not null LOOP
3502: --{
3503: WSH_DEBUG_SV.log(l_module_name,'process_asn_rcv_flag_tab(' || i || ')',l_ib_del_det_rec.process_asn_rcv_flag_tab(i));
3504: WSH_DEBUG_SV.log(l_module_name,'process_corr_rtv_flag(' || i || ')',l_ib_del_det_rec.process_corr_rtv_flag_tab(i));
3505: WSH_DEBUG_SV.log(l_module_name,'shipment_line_id(' || i || ')',l_ib_del_det_rec.shipment_line_id_tab(i));
3506: WSH_DEBUG_SV.log(l_module_name,'po_line_location_id(' || i || ')',l_ib_del_det_rec.po_line_location_id_tab(i));
3507: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id(' || i || ')',l_ib_del_det_rec.del_detail_id_tab(i));
3500: i := l_ib_del_det_rec.del_detail_id_tab.first;
3501: WHILE i is not null LOOP
3502: --{
3503: WSH_DEBUG_SV.log(l_module_name,'process_asn_rcv_flag_tab(' || i || ')',l_ib_del_det_rec.process_asn_rcv_flag_tab(i));
3504: WSH_DEBUG_SV.log(l_module_name,'process_corr_rtv_flag(' || i || ')',l_ib_del_det_rec.process_corr_rtv_flag_tab(i));
3505: WSH_DEBUG_SV.log(l_module_name,'shipment_line_id(' || i || ')',l_ib_del_det_rec.shipment_line_id_tab(i));
3506: WSH_DEBUG_SV.log(l_module_name,'po_line_location_id(' || i || ')',l_ib_del_det_rec.po_line_location_id_tab(i));
3507: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id(' || i || ')',l_ib_del_det_rec.del_detail_id_tab(i));
3508: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id(' || i || ')',l_ib_del_det_rec.parent_delivery_detail_id_tab(i));
3501: WHILE i is not null LOOP
3502: --{
3503: WSH_DEBUG_SV.log(l_module_name,'process_asn_rcv_flag_tab(' || i || ')',l_ib_del_det_rec.process_asn_rcv_flag_tab(i));
3504: WSH_DEBUG_SV.log(l_module_name,'process_corr_rtv_flag(' || i || ')',l_ib_del_det_rec.process_corr_rtv_flag_tab(i));
3505: WSH_DEBUG_SV.log(l_module_name,'shipment_line_id(' || i || ')',l_ib_del_det_rec.shipment_line_id_tab(i));
3506: WSH_DEBUG_SV.log(l_module_name,'po_line_location_id(' || i || ')',l_ib_del_det_rec.po_line_location_id_tab(i));
3507: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id(' || i || ')',l_ib_del_det_rec.del_detail_id_tab(i));
3508: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id(' || i || ')',l_ib_del_det_rec.parent_delivery_detail_id_tab(i));
3509: WSH_DEBUG_SV.log(l_module_name,'requested_qty_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty_db_tab(i));
3502: --{
3503: WSH_DEBUG_SV.log(l_module_name,'process_asn_rcv_flag_tab(' || i || ')',l_ib_del_det_rec.process_asn_rcv_flag_tab(i));
3504: WSH_DEBUG_SV.log(l_module_name,'process_corr_rtv_flag(' || i || ')',l_ib_del_det_rec.process_corr_rtv_flag_tab(i));
3505: WSH_DEBUG_SV.log(l_module_name,'shipment_line_id(' || i || ')',l_ib_del_det_rec.shipment_line_id_tab(i));
3506: WSH_DEBUG_SV.log(l_module_name,'po_line_location_id(' || i || ')',l_ib_del_det_rec.po_line_location_id_tab(i));
3507: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id(' || i || ')',l_ib_del_det_rec.del_detail_id_tab(i));
3508: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id(' || i || ')',l_ib_del_det_rec.parent_delivery_detail_id_tab(i));
3509: WSH_DEBUG_SV.log(l_module_name,'requested_qty_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty_db_tab(i));
3510: WSH_DEBUG_SV.log(l_module_name,'requested_qty_tab(' || i || ')',l_ib_del_det_rec.requested_qty_tab(i));
3503: WSH_DEBUG_SV.log(l_module_name,'process_asn_rcv_flag_tab(' || i || ')',l_ib_del_det_rec.process_asn_rcv_flag_tab(i));
3504: WSH_DEBUG_SV.log(l_module_name,'process_corr_rtv_flag(' || i || ')',l_ib_del_det_rec.process_corr_rtv_flag_tab(i));
3505: WSH_DEBUG_SV.log(l_module_name,'shipment_line_id(' || i || ')',l_ib_del_det_rec.shipment_line_id_tab(i));
3506: WSH_DEBUG_SV.log(l_module_name,'po_line_location_id(' || i || ')',l_ib_del_det_rec.po_line_location_id_tab(i));
3507: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id(' || i || ')',l_ib_del_det_rec.del_detail_id_tab(i));
3508: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id(' || i || ')',l_ib_del_det_rec.parent_delivery_detail_id_tab(i));
3509: WSH_DEBUG_SV.log(l_module_name,'requested_qty_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty_db_tab(i));
3510: WSH_DEBUG_SV.log(l_module_name,'requested_qty_tab(' || i || ')',l_ib_del_det_rec.requested_qty_tab(i));
3511: WSH_DEBUG_SV.log(l_module_name,'shipped_qty_tab(' || i || ')',l_ib_del_det_rec.shipped_qty_tab(i));
3504: WSH_DEBUG_SV.log(l_module_name,'process_corr_rtv_flag(' || i || ')',l_ib_del_det_rec.process_corr_rtv_flag_tab(i));
3505: WSH_DEBUG_SV.log(l_module_name,'shipment_line_id(' || i || ')',l_ib_del_det_rec.shipment_line_id_tab(i));
3506: WSH_DEBUG_SV.log(l_module_name,'po_line_location_id(' || i || ')',l_ib_del_det_rec.po_line_location_id_tab(i));
3507: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id(' || i || ')',l_ib_del_det_rec.del_detail_id_tab(i));
3508: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id(' || i || ')',l_ib_del_det_rec.parent_delivery_detail_id_tab(i));
3509: WSH_DEBUG_SV.log(l_module_name,'requested_qty_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty_db_tab(i));
3510: WSH_DEBUG_SV.log(l_module_name,'requested_qty_tab(' || i || ')',l_ib_del_det_rec.requested_qty_tab(i));
3511: WSH_DEBUG_SV.log(l_module_name,'shipped_qty_tab(' || i || ')',l_ib_del_det_rec.shipped_qty_tab(i));
3512: WSH_DEBUG_SV.log(l_module_name,'received_qty_tab(' || i || ')',l_ib_del_det_rec.received_qty_tab(i));
3505: WSH_DEBUG_SV.log(l_module_name,'shipment_line_id(' || i || ')',l_ib_del_det_rec.shipment_line_id_tab(i));
3506: WSH_DEBUG_SV.log(l_module_name,'po_line_location_id(' || i || ')',l_ib_del_det_rec.po_line_location_id_tab(i));
3507: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id(' || i || ')',l_ib_del_det_rec.del_detail_id_tab(i));
3508: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id(' || i || ')',l_ib_del_det_rec.parent_delivery_detail_id_tab(i));
3509: WSH_DEBUG_SV.log(l_module_name,'requested_qty_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty_db_tab(i));
3510: WSH_DEBUG_SV.log(l_module_name,'requested_qty_tab(' || i || ')',l_ib_del_det_rec.requested_qty_tab(i));
3511: WSH_DEBUG_SV.log(l_module_name,'shipped_qty_tab(' || i || ')',l_ib_del_det_rec.shipped_qty_tab(i));
3512: WSH_DEBUG_SV.log(l_module_name,'received_qty_tab(' || i || ')',l_ib_del_det_rec.received_qty_tab(i));
3513: WSH_DEBUG_SV.log(l_module_name,'returned_qty_tab(' || i || ')',l_ib_del_det_rec.returned_qty_tab(i));
3506: WSH_DEBUG_SV.log(l_module_name,'po_line_location_id(' || i || ')',l_ib_del_det_rec.po_line_location_id_tab(i));
3507: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id(' || i || ')',l_ib_del_det_rec.del_detail_id_tab(i));
3508: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id(' || i || ')',l_ib_del_det_rec.parent_delivery_detail_id_tab(i));
3509: WSH_DEBUG_SV.log(l_module_name,'requested_qty_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty_db_tab(i));
3510: WSH_DEBUG_SV.log(l_module_name,'requested_qty_tab(' || i || ')',l_ib_del_det_rec.requested_qty_tab(i));
3511: WSH_DEBUG_SV.log(l_module_name,'shipped_qty_tab(' || i || ')',l_ib_del_det_rec.shipped_qty_tab(i));
3512: WSH_DEBUG_SV.log(l_module_name,'received_qty_tab(' || i || ')',l_ib_del_det_rec.received_qty_tab(i));
3513: WSH_DEBUG_SV.log(l_module_name,'returned_qty_tab(' || i || ')',l_ib_del_det_rec.returned_qty_tab(i));
3514: WSH_DEBUG_SV.log(l_module_name,'child_index_tab(' || i || ')',l_ib_del_det_rec.child_index_tab(i));
3507: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id(' || i || ')',l_ib_del_det_rec.del_detail_id_tab(i));
3508: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id(' || i || ')',l_ib_del_det_rec.parent_delivery_detail_id_tab(i));
3509: WSH_DEBUG_SV.log(l_module_name,'requested_qty_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty_db_tab(i));
3510: WSH_DEBUG_SV.log(l_module_name,'requested_qty_tab(' || i || ')',l_ib_del_det_rec.requested_qty_tab(i));
3511: WSH_DEBUG_SV.log(l_module_name,'shipped_qty_tab(' || i || ')',l_ib_del_det_rec.shipped_qty_tab(i));
3512: WSH_DEBUG_SV.log(l_module_name,'received_qty_tab(' || i || ')',l_ib_del_det_rec.received_qty_tab(i));
3513: WSH_DEBUG_SV.log(l_module_name,'returned_qty_tab(' || i || ')',l_ib_del_det_rec.returned_qty_tab(i));
3514: WSH_DEBUG_SV.log(l_module_name,'child_index_tab(' || i || ')',l_ib_del_det_rec.child_index_tab(i));
3515: WSH_DEBUG_SV.log(l_module_name,'requested_qty_uom_tab(' || i || ')',l_ib_del_det_rec.requested_qty_uom_tab(i));
3508: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id(' || i || ')',l_ib_del_det_rec.parent_delivery_detail_id_tab(i));
3509: WSH_DEBUG_SV.log(l_module_name,'requested_qty_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty_db_tab(i));
3510: WSH_DEBUG_SV.log(l_module_name,'requested_qty_tab(' || i || ')',l_ib_del_det_rec.requested_qty_tab(i));
3511: WSH_DEBUG_SV.log(l_module_name,'shipped_qty_tab(' || i || ')',l_ib_del_det_rec.shipped_qty_tab(i));
3512: WSH_DEBUG_SV.log(l_module_name,'received_qty_tab(' || i || ')',l_ib_del_det_rec.received_qty_tab(i));
3513: WSH_DEBUG_SV.log(l_module_name,'returned_qty_tab(' || i || ')',l_ib_del_det_rec.returned_qty_tab(i));
3514: WSH_DEBUG_SV.log(l_module_name,'child_index_tab(' || i || ')',l_ib_del_det_rec.child_index_tab(i));
3515: WSH_DEBUG_SV.log(l_module_name,'requested_qty_uom_tab(' || i || ')',l_ib_del_det_rec.requested_qty_uom_tab(i));
3516: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id_tab(' || i || ')',l_ib_del_det_rec.ship_from_location_id_tab(i));
3509: WSH_DEBUG_SV.log(l_module_name,'requested_qty_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty_db_tab(i));
3510: WSH_DEBUG_SV.log(l_module_name,'requested_qty_tab(' || i || ')',l_ib_del_det_rec.requested_qty_tab(i));
3511: WSH_DEBUG_SV.log(l_module_name,'shipped_qty_tab(' || i || ')',l_ib_del_det_rec.shipped_qty_tab(i));
3512: WSH_DEBUG_SV.log(l_module_name,'received_qty_tab(' || i || ')',l_ib_del_det_rec.received_qty_tab(i));
3513: WSH_DEBUG_SV.log(l_module_name,'returned_qty_tab(' || i || ')',l_ib_del_det_rec.returned_qty_tab(i));
3514: WSH_DEBUG_SV.log(l_module_name,'child_index_tab(' || i || ')',l_ib_del_det_rec.child_index_tab(i));
3515: WSH_DEBUG_SV.log(l_module_name,'requested_qty_uom_tab(' || i || ')',l_ib_del_det_rec.requested_qty_uom_tab(i));
3516: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id_tab(' || i || ')',l_ib_del_det_rec.ship_from_location_id_tab(i));
3517: WSH_DEBUG_SV.log(l_module_name,'released_status_tab(' || i || ')',l_ib_del_det_rec.released_status_tab(i));
3510: WSH_DEBUG_SV.log(l_module_name,'requested_qty_tab(' || i || ')',l_ib_del_det_rec.requested_qty_tab(i));
3511: WSH_DEBUG_SV.log(l_module_name,'shipped_qty_tab(' || i || ')',l_ib_del_det_rec.shipped_qty_tab(i));
3512: WSH_DEBUG_SV.log(l_module_name,'received_qty_tab(' || i || ')',l_ib_del_det_rec.received_qty_tab(i));
3513: WSH_DEBUG_SV.log(l_module_name,'returned_qty_tab(' || i || ')',l_ib_del_det_rec.returned_qty_tab(i));
3514: WSH_DEBUG_SV.log(l_module_name,'child_index_tab(' || i || ')',l_ib_del_det_rec.child_index_tab(i));
3515: WSH_DEBUG_SV.log(l_module_name,'requested_qty_uom_tab(' || i || ')',l_ib_del_det_rec.requested_qty_uom_tab(i));
3516: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id_tab(' || i || ')',l_ib_del_det_rec.ship_from_location_id_tab(i));
3517: WSH_DEBUG_SV.log(l_module_name,'released_status_tab(' || i || ')',l_ib_del_det_rec.released_status_tab(i));
3518: WSH_DEBUG_SV.log(l_module_name,'delivery_id_tab(' || i || ')',l_ib_del_det_rec.delivery_id_tab(i));
3511: WSH_DEBUG_SV.log(l_module_name,'shipped_qty_tab(' || i || ')',l_ib_del_det_rec.shipped_qty_tab(i));
3512: WSH_DEBUG_SV.log(l_module_name,'received_qty_tab(' || i || ')',l_ib_del_det_rec.received_qty_tab(i));
3513: WSH_DEBUG_SV.log(l_module_name,'returned_qty_tab(' || i || ')',l_ib_del_det_rec.returned_qty_tab(i));
3514: WSH_DEBUG_SV.log(l_module_name,'child_index_tab(' || i || ')',l_ib_del_det_rec.child_index_tab(i));
3515: WSH_DEBUG_SV.log(l_module_name,'requested_qty_uom_tab(' || i || ')',l_ib_del_det_rec.requested_qty_uom_tab(i));
3516: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id_tab(' || i || ')',l_ib_del_det_rec.ship_from_location_id_tab(i));
3517: WSH_DEBUG_SV.log(l_module_name,'released_status_tab(' || i || ')',l_ib_del_det_rec.released_status_tab(i));
3518: WSH_DEBUG_SV.log(l_module_name,'delivery_id_tab(' || i || ')',l_ib_del_det_rec.delivery_id_tab(i));
3519: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_db_tab(i));
3512: WSH_DEBUG_SV.log(l_module_name,'received_qty_tab(' || i || ')',l_ib_del_det_rec.received_qty_tab(i));
3513: WSH_DEBUG_SV.log(l_module_name,'returned_qty_tab(' || i || ')',l_ib_del_det_rec.returned_qty_tab(i));
3514: WSH_DEBUG_SV.log(l_module_name,'child_index_tab(' || i || ')',l_ib_del_det_rec.child_index_tab(i));
3515: WSH_DEBUG_SV.log(l_module_name,'requested_qty_uom_tab(' || i || ')',l_ib_del_det_rec.requested_qty_uom_tab(i));
3516: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id_tab(' || i || ')',l_ib_del_det_rec.ship_from_location_id_tab(i));
3517: WSH_DEBUG_SV.log(l_module_name,'released_status_tab(' || i || ')',l_ib_del_det_rec.released_status_tab(i));
3518: WSH_DEBUG_SV.log(l_module_name,'delivery_id_tab(' || i || ')',l_ib_del_det_rec.delivery_id_tab(i));
3519: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_db_tab(i));
3520: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_tab(i));
3513: WSH_DEBUG_SV.log(l_module_name,'returned_qty_tab(' || i || ')',l_ib_del_det_rec.returned_qty_tab(i));
3514: WSH_DEBUG_SV.log(l_module_name,'child_index_tab(' || i || ')',l_ib_del_det_rec.child_index_tab(i));
3515: WSH_DEBUG_SV.log(l_module_name,'requested_qty_uom_tab(' || i || ')',l_ib_del_det_rec.requested_qty_uom_tab(i));
3516: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id_tab(' || i || ')',l_ib_del_det_rec.ship_from_location_id_tab(i));
3517: WSH_DEBUG_SV.log(l_module_name,'released_status_tab(' || i || ')',l_ib_del_det_rec.released_status_tab(i));
3518: WSH_DEBUG_SV.log(l_module_name,'delivery_id_tab(' || i || ')',l_ib_del_det_rec.delivery_id_tab(i));
3519: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_db_tab(i));
3520: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_tab(i));
3521: WSH_DEBUG_SV.log(l_module_name,'shipped_qty2_tab(' || i || ')',l_ib_del_det_rec.shipped_qty2_tab(i));
3514: WSH_DEBUG_SV.log(l_module_name,'child_index_tab(' || i || ')',l_ib_del_det_rec.child_index_tab(i));
3515: WSH_DEBUG_SV.log(l_module_name,'requested_qty_uom_tab(' || i || ')',l_ib_del_det_rec.requested_qty_uom_tab(i));
3516: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id_tab(' || i || ')',l_ib_del_det_rec.ship_from_location_id_tab(i));
3517: WSH_DEBUG_SV.log(l_module_name,'released_status_tab(' || i || ')',l_ib_del_det_rec.released_status_tab(i));
3518: WSH_DEBUG_SV.log(l_module_name,'delivery_id_tab(' || i || ')',l_ib_del_det_rec.delivery_id_tab(i));
3519: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_db_tab(i));
3520: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_tab(i));
3521: WSH_DEBUG_SV.log(l_module_name,'shipped_qty2_tab(' || i || ')',l_ib_del_det_rec.shipped_qty2_tab(i));
3522: WSH_DEBUG_SV.log(l_module_name,'received_qty2_tab(' || i || ')',l_ib_del_det_rec.received_qty2_tab(i));
3515: WSH_DEBUG_SV.log(l_module_name,'requested_qty_uom_tab(' || i || ')',l_ib_del_det_rec.requested_qty_uom_tab(i));
3516: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id_tab(' || i || ')',l_ib_del_det_rec.ship_from_location_id_tab(i));
3517: WSH_DEBUG_SV.log(l_module_name,'released_status_tab(' || i || ')',l_ib_del_det_rec.released_status_tab(i));
3518: WSH_DEBUG_SV.log(l_module_name,'delivery_id_tab(' || i || ')',l_ib_del_det_rec.delivery_id_tab(i));
3519: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_db_tab(i));
3520: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_tab(i));
3521: WSH_DEBUG_SV.log(l_module_name,'shipped_qty2_tab(' || i || ')',l_ib_del_det_rec.shipped_qty2_tab(i));
3522: WSH_DEBUG_SV.log(l_module_name,'received_qty2_tab(' || i || ')',l_ib_del_det_rec.received_qty2_tab(i));
3523: WSH_DEBUG_SV.log(l_module_name,'returned_qty2_tab(' || i || ')',l_ib_del_det_rec.returned_qty2_tab(i));
3516: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id_tab(' || i || ')',l_ib_del_det_rec.ship_from_location_id_tab(i));
3517: WSH_DEBUG_SV.log(l_module_name,'released_status_tab(' || i || ')',l_ib_del_det_rec.released_status_tab(i));
3518: WSH_DEBUG_SV.log(l_module_name,'delivery_id_tab(' || i || ')',l_ib_del_det_rec.delivery_id_tab(i));
3519: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_db_tab(i));
3520: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_tab(i));
3521: WSH_DEBUG_SV.log(l_module_name,'shipped_qty2_tab(' || i || ')',l_ib_del_det_rec.shipped_qty2_tab(i));
3522: WSH_DEBUG_SV.log(l_module_name,'received_qty2_tab(' || i || ')',l_ib_del_det_rec.received_qty2_tab(i));
3523: WSH_DEBUG_SV.log(l_module_name,'returned_qty2_tab(' || i || ')',l_ib_del_det_rec.returned_qty2_tab(i));
3524: WSH_DEBUG_SV.log(l_module_name,'picked_qty_tab(' || i || ')',l_ib_del_det_rec.picked_qty_tab(i));
3517: WSH_DEBUG_SV.log(l_module_name,'released_status_tab(' || i || ')',l_ib_del_det_rec.released_status_tab(i));
3518: WSH_DEBUG_SV.log(l_module_name,'delivery_id_tab(' || i || ')',l_ib_del_det_rec.delivery_id_tab(i));
3519: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_db_tab(i));
3520: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_tab(i));
3521: WSH_DEBUG_SV.log(l_module_name,'shipped_qty2_tab(' || i || ')',l_ib_del_det_rec.shipped_qty2_tab(i));
3522: WSH_DEBUG_SV.log(l_module_name,'received_qty2_tab(' || i || ')',l_ib_del_det_rec.received_qty2_tab(i));
3523: WSH_DEBUG_SV.log(l_module_name,'returned_qty2_tab(' || i || ')',l_ib_del_det_rec.returned_qty2_tab(i));
3524: WSH_DEBUG_SV.log(l_module_name,'picked_qty_tab(' || i || ')',l_ib_del_det_rec.picked_qty_tab(i));
3525: WSH_DEBUG_SV.log(l_module_name,'picked_qty2_tab(' || i || ')',l_ib_del_det_rec.picked_qty2_tab(i));
3518: WSH_DEBUG_SV.log(l_module_name,'delivery_id_tab(' || i || ')',l_ib_del_det_rec.delivery_id_tab(i));
3519: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_db_tab(i));
3520: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_tab(i));
3521: WSH_DEBUG_SV.log(l_module_name,'shipped_qty2_tab(' || i || ')',l_ib_del_det_rec.shipped_qty2_tab(i));
3522: WSH_DEBUG_SV.log(l_module_name,'received_qty2_tab(' || i || ')',l_ib_del_det_rec.received_qty2_tab(i));
3523: WSH_DEBUG_SV.log(l_module_name,'returned_qty2_tab(' || i || ')',l_ib_del_det_rec.returned_qty2_tab(i));
3524: WSH_DEBUG_SV.log(l_module_name,'picked_qty_tab(' || i || ')',l_ib_del_det_rec.picked_qty_tab(i));
3525: WSH_DEBUG_SV.log(l_module_name,'picked_qty2_tab(' || i || ')',l_ib_del_det_rec.picked_qty2_tab(i));
3526: WSH_DEBUG_SV.log(l_module_name,'last_update_date_tab(' || i || ')',l_ib_del_det_rec.last_update_date_tab(i));
3519: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_db_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_db_tab(i));
3520: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_tab(i));
3521: WSH_DEBUG_SV.log(l_module_name,'shipped_qty2_tab(' || i || ')',l_ib_del_det_rec.shipped_qty2_tab(i));
3522: WSH_DEBUG_SV.log(l_module_name,'received_qty2_tab(' || i || ')',l_ib_del_det_rec.received_qty2_tab(i));
3523: WSH_DEBUG_SV.log(l_module_name,'returned_qty2_tab(' || i || ')',l_ib_del_det_rec.returned_qty2_tab(i));
3524: WSH_DEBUG_SV.log(l_module_name,'picked_qty_tab(' || i || ')',l_ib_del_det_rec.picked_qty_tab(i));
3525: WSH_DEBUG_SV.log(l_module_name,'picked_qty2_tab(' || i || ')',l_ib_del_det_rec.picked_qty2_tab(i));
3526: WSH_DEBUG_SV.log(l_module_name,'last_update_date_tab(' || i || ')',l_ib_del_det_rec.last_update_date_tab(i));
3527: i := l_ib_del_det_rec.del_detail_id_tab.NEXT(i);
3520: WSH_DEBUG_SV.log(l_module_name,'requested_qty2_tab(' || i || ')',l_ib_del_det_rec.requested_qty2_tab(i));
3521: WSH_DEBUG_SV.log(l_module_name,'shipped_qty2_tab(' || i || ')',l_ib_del_det_rec.shipped_qty2_tab(i));
3522: WSH_DEBUG_SV.log(l_module_name,'received_qty2_tab(' || i || ')',l_ib_del_det_rec.received_qty2_tab(i));
3523: WSH_DEBUG_SV.log(l_module_name,'returned_qty2_tab(' || i || ')',l_ib_del_det_rec.returned_qty2_tab(i));
3524: WSH_DEBUG_SV.log(l_module_name,'picked_qty_tab(' || i || ')',l_ib_del_det_rec.picked_qty_tab(i));
3525: WSH_DEBUG_SV.log(l_module_name,'picked_qty2_tab(' || i || ')',l_ib_del_det_rec.picked_qty2_tab(i));
3526: WSH_DEBUG_SV.log(l_module_name,'last_update_date_tab(' || i || ')',l_ib_del_det_rec.last_update_date_tab(i));
3527: i := l_ib_del_det_rec.del_detail_id_tab.NEXT(i);
3528: --}
3521: WSH_DEBUG_SV.log(l_module_name,'shipped_qty2_tab(' || i || ')',l_ib_del_det_rec.shipped_qty2_tab(i));
3522: WSH_DEBUG_SV.log(l_module_name,'received_qty2_tab(' || i || ')',l_ib_del_det_rec.received_qty2_tab(i));
3523: WSH_DEBUG_SV.log(l_module_name,'returned_qty2_tab(' || i || ')',l_ib_del_det_rec.returned_qty2_tab(i));
3524: WSH_DEBUG_SV.log(l_module_name,'picked_qty_tab(' || i || ')',l_ib_del_det_rec.picked_qty_tab(i));
3525: WSH_DEBUG_SV.log(l_module_name,'picked_qty2_tab(' || i || ')',l_ib_del_det_rec.picked_qty2_tab(i));
3526: WSH_DEBUG_SV.log(l_module_name,'last_update_date_tab(' || i || ')',l_ib_del_det_rec.last_update_date_tab(i));
3527: i := l_ib_del_det_rec.del_detail_id_tab.NEXT(i);
3528: --}
3529: END LOOP;
3522: WSH_DEBUG_SV.log(l_module_name,'received_qty2_tab(' || i || ')',l_ib_del_det_rec.received_qty2_tab(i));
3523: WSH_DEBUG_SV.log(l_module_name,'returned_qty2_tab(' || i || ')',l_ib_del_det_rec.returned_qty2_tab(i));
3524: WSH_DEBUG_SV.log(l_module_name,'picked_qty_tab(' || i || ')',l_ib_del_det_rec.picked_qty_tab(i));
3525: WSH_DEBUG_SV.log(l_module_name,'picked_qty2_tab(' || i || ')',l_ib_del_det_rec.picked_qty2_tab(i));
3526: WSH_DEBUG_SV.log(l_module_name,'last_update_date_tab(' || i || ')',l_ib_del_det_rec.last_update_date_tab(i));
3527: i := l_ib_del_det_rec.del_detail_id_tab.NEXT(i);
3528: --}
3529: END LOOP;
3530: END IF;
3554: --
3555: -- Debug Statements
3556: --
3557: IF l_debug_on THEN
3558: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3559: END IF;
3560: --
3561: wsh_util_core.api_post_call(
3562: p_return_status => l_return_status,
3569: --
3570: -- Debug Statements
3571: --
3572: IF l_debug_on THEN
3573: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_RCV_CORR_RTV_TXN_PKG.PROCESS_CORRECTIONS_AND_RTV',WSH_DEBUG_SV.C_PROC_LEVEL);
3574: END IF;
3575: --
3576: l_corr_rtv_action_prms.action_code := p_transaction_type;
3577: WSH_RCV_CORR_RTV_TXN_PKG.process_corrections_and_rtv (
3588: --
3589: -- Debug Statements
3590: --
3591: IF l_debug_on THEN
3592: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3593: END IF;
3594: --
3595: wsh_util_core.api_post_call(
3596: p_return_status => l_return_status,
3603: --
3604: -- Debug Statements
3605: --
3606: IF l_debug_on THEN
3607: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_TXN_HISTORY_PKG.POST_PROCESS',WSH_DEBUG_SV.C_PROC_LEVEL);
3608: WSH_DEBUG_SV.log(l_module_name,'p_shipment_line_id_tab.count', p_shipment_line_id_tab.count);
3609: END IF;
3610: --
3611: -- This was added as a part of the changes to support matching of
3604: -- Debug Statements
3605: --
3606: IF l_debug_on THEN
3607: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_TXN_HISTORY_PKG.POST_PROCESS',WSH_DEBUG_SV.C_PROC_LEVEL);
3608: WSH_DEBUG_SV.log(l_module_name,'p_shipment_line_id_tab.count', p_shipment_line_id_tab.count);
3609: END IF;
3610: --
3611: -- This was added as a part of the changes to support matching of
3612: -- partially matched transactions.
3620: -- can use bulk delete
3621: FOR i in p_shipment_line_id_tab.FIRST..p_shipment_line_id_tab.LAST LOOP
3622: --{
3623: IF l_debug_on THEN
3624: WSH_DEBUG_SV.log(l_module_name,'p_shipment_line_id_tab(i)', p_shipment_line_id_tab(i));
3625: WSH_DEBUG_SV.log(l_module_name,'p_max_txn_id_tab(i)', p_max_txn_id_tab(i));
3626: END IF;
3627: delete from wsh_inbound_txn_history
3628: where shipment_line_id = p_shipment_line_id_tab(i)
3621: FOR i in p_shipment_line_id_tab.FIRST..p_shipment_line_id_tab.LAST LOOP
3622: --{
3623: IF l_debug_on THEN
3624: WSH_DEBUG_SV.log(l_module_name,'p_shipment_line_id_tab(i)', p_shipment_line_id_tab(i));
3625: WSH_DEBUG_SV.log(l_module_name,'p_max_txn_id_tab(i)', p_max_txn_id_tab(i));
3626: END IF;
3627: delete from wsh_inbound_txn_history
3628: where shipment_line_id = p_shipment_line_id_tab(i)
3629: and transaction_type NOT IN ('ASN','RECEIPT')
3647: --
3648: -- Debug Statements
3649: --
3650: IF l_debug_on THEN
3651: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling WSH_INBOUND_TXN_HISTORY_PKG.post_process is ', l_return_status);
3652: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3653: END IF;
3654: --
3655: wsh_util_core.api_post_call(
3648: -- Debug Statements
3649: --
3650: IF l_debug_on THEN
3651: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling WSH_INBOUND_TXN_HISTORY_PKG.post_process is ', l_return_status);
3652: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3653: END IF;
3654: --
3655: wsh_util_core.api_post_call(
3656: p_return_status => l_return_status,
3667: --
3668: -- Debug Statements
3669: --
3670: IF l_debug_on THEN
3671: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling cancel_close_pending_txns 1 is ', l_return_status);
3672: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3673: END IF;
3674: --
3675: wsh_util_core.api_post_call(
3668: -- Debug Statements
3669: --
3670: IF l_debug_on THEN
3671: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling cancel_close_pending_txns 1 is ', l_return_status);
3672: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3673: END IF;
3674: --
3675: wsh_util_core.api_post_call(
3676: p_return_status => l_return_status,
3688: --
3689: -- Debug Statements
3690: --
3691: IF l_debug_on THEN
3692: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling cancel_close_pending_txns 2 is ', l_return_status);
3693: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3694: END IF;
3695: --
3696: wsh_util_core.api_post_call(
3689: -- Debug Statements
3690: --
3691: IF l_debug_on THEN
3692: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling cancel_close_pending_txns 2 is ', l_return_status);
3693: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3694: END IF;
3695: --
3696: wsh_util_core.api_post_call(
3697: p_return_status => l_return_status,
3702:
3703: IF l_debug_on THEN
3704: --{
3705: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
3706: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
3707:
3708: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
3709: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
3710: x_return_status := wsh_util_core.g_ret_sts_success;
3728:
3729: l_reset_flags := FALSE;
3730:
3731: IF l_debug_on THEN
3732: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
3733: END IF;
3734:
3735: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
3736: x_return_status => l_return_status);
3735: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
3736: x_return_status => l_return_status);
3737:
3738: IF l_debug_on THEN
3739: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3740: END IF;
3741:
3742: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
3743: RAISE FND_API.G_EXC_ERROR;
3762:
3763: IF FND_API.To_Boolean( p_commit ) THEN
3764:
3765: IF l_debug_on THEN
3766: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
3767: END IF;
3768:
3769: WSH_UTIL_CORE.reset_stops_for_load_tender(p_reset_flags => TRUE,
3770: x_return_status => l_return_status);
3773: ELSE
3774:
3775:
3776: IF l_debug_on THEN
3777: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
3778: END IF;
3779:
3780: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
3781: x_return_status => l_return_status);
3782:
3783: END IF;
3784:
3785: IF l_debug_on THEN
3786: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3787: END IF;
3788:
3789: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
3790: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR,
3817: --
3818: -- Debug Statements
3819: --
3820: IF l_debug_on THEN
3821: WSH_DEBUG_SV.pop(l_module_name);
3822: END IF;
3823: --
3824: EXCEPTION
3825: --{
3834: --{
3835: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
3836: --{
3837: IF l_debug_on THEN
3838: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
3839: END IF;
3840:
3841: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
3842: x_return_status => l_return_status);
3842: x_return_status => l_return_status);
3843:
3844:
3845: IF l_debug_on THEN
3846: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3847: END IF;
3848:
3849: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3850: x_return_status := l_return_status;
3865: --
3866: -- Debug Statements
3867: --
3868: IF l_debug_on THEN
3869: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3870: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3871: END IF;
3872: --
3873: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3866: -- Debug Statements
3867: --
3868: IF l_debug_on THEN
3869: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3870: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3871: END IF;
3872: --
3873: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3874: ROLLBACK TO MATCH_SHIPMENTS_GRP;
3881: --{
3882: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
3883: --{
3884: IF l_debug_on THEN
3885: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
3886: END IF;
3887:
3888: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
3889: x_return_status => l_return_status);
3889: x_return_status => l_return_status);
3890:
3891:
3892: IF l_debug_on THEN
3893: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3894: END IF;
3895:
3896: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3897: x_return_status := l_return_status;
3911: );
3912: -- Debug Statements
3913: --
3914: IF l_debug_on THEN
3915: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3916:
3917: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
3918: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
3919:
3914: IF l_debug_on THEN
3915: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3916:
3917: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
3918: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
3919:
3920: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
3921: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
3922: wsh_util_core.add_message(x_return_status, l_module_name);
3920: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
3921: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
3922: wsh_util_core.add_message(x_return_status, l_module_name);
3923:
3924: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3925: END IF;
3926: --
3927: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
3928: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3935: --{
3936: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
3937: --{
3938: IF l_debug_on THEN
3939: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
3940: END IF;
3941:
3942: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
3943: x_return_status => l_return_status);
3943: x_return_status => l_return_status);
3944:
3945:
3946: IF l_debug_on THEN
3947: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
3948: END IF;
3949:
3950: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
3951: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR,
3973: );
3974: -- Debug Statements
3975: --
3976: IF l_debug_on THEN
3977: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3978: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
3979: END IF;
3980: --
3981: WHEN OTHERS THEN
3974: -- Debug Statements
3975: --
3976: IF l_debug_on THEN
3977: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3978: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
3979: END IF;
3980: --
3981: WHEN OTHERS THEN
3982: ROLLBACK TO MATCH_SHIPMENTS_GRP;
3990: --{
3991: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
3992: --{
3993: IF l_debug_on THEN
3994: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
3995: END IF;
3996:
3997: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
3998: x_return_status => l_return_status);
3998: x_return_status => l_return_status);
3999:
4000:
4001: IF l_debug_on THEN
4002: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4003: END IF;
4004:
4005: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4006: x_return_status := l_return_status;
4022: --
4023: -- Debug Statements
4024: --
4025: IF l_debug_on THEN
4026: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4027: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
4028: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
4029:
4030: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
4024: --
4025: IF l_debug_on THEN
4026: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4027: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
4028: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
4029:
4030: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
4031: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
4032: wsh_util_core.add_message(x_return_status, l_module_name);
4029:
4030: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
4031: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
4032: wsh_util_core.add_message(x_return_status, l_module_name);
4033: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4034: END IF;
4035: --
4036: END match_shipments;
4037: