[Home] [Help]
37: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
38: --
39: IF l_debug_on IS NULL
40: THEN
41: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
42: END IF;
43: IF l_debug_on THEN
44: WSH_DEBUG_SV.push(l_module_name);
45: END IF;
40: THEN
41: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
42: END IF;
43: IF l_debug_on THEN
44: WSH_DEBUG_SV.push(l_module_name);
45: END IF;
46:
47: --OTM R12, glog proj, use Global Variable
48: l_gc3_is_installed := WSH_UTIL_CORE.G_GC3_IS_INSTALLED;
69: END IF;
70: END IF;--}
71:
72: IF l_debug_on THEN
73: WSH_DEBUG_SV.log(l_module_name,'Internal Value of Sequence Mode',g_stop_seq_mode);
74: WSH_DEBUG_SV.pop(l_module_name);
75: END IF;
76: Return G_STOP_SEQ_MODE;
77:
70: END IF;--}
71:
72: IF l_debug_on THEN
73: WSH_DEBUG_SV.log(l_module_name,'Internal Value of Sequence Mode',g_stop_seq_mode);
74: WSH_DEBUG_SV.pop(l_module_name);
75: END IF;
76: Return G_STOP_SEQ_MODE;
77:
78: EXCEPTION
77:
78: EXCEPTION
79: WHEN OTHERS THEN
80: IF l_debug_on THEN
81: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
82: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
83: END IF;
84: -- Bug 4253334, default value is SSN mode
85: RETURN nvl(G_STOP_SEQ_MODE, WSH_INTERFACE_GRP.G_STOP_SEQ_MODE_SSN);
78: EXCEPTION
79: WHEN OTHERS THEN
80: IF l_debug_on THEN
81: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
82: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
83: END IF;
84: -- Bug 4253334, default value is SSN mode
85: RETURN nvl(G_STOP_SEQ_MODE, WSH_INTERFACE_GRP.G_STOP_SEQ_MODE_SSN);
86: END get_stop_seq_mode;
148: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
149: --
150: IF l_debug_on IS NULL
151: THEN
152: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
153: END IF;
154: --
155: IF l_debug_on THEN
156: wsh_debug_sv.push (l_module_name);
152: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
153: END IF;
154: --
155: IF l_debug_on THEN
156: wsh_debug_sv.push (l_module_name);
157: WSH_DEBUG_SV.log(l_module_name,'p_trip_id', p_trip_id);
158: WSH_DEBUG_SV.log(l_module_name,'p_trip_name', p_trip_name);
159: END IF;
160:
153: END IF;
154: --
155: IF l_debug_on THEN
156: wsh_debug_sv.push (l_module_name);
157: WSH_DEBUG_SV.log(l_module_name,'p_trip_id', p_trip_id);
158: WSH_DEBUG_SV.log(l_module_name,'p_trip_name', p_trip_name);
159: END IF;
160:
161: x_return_status := wsh_util_core.g_ret_sts_success;
154: --
155: IF l_debug_on THEN
156: wsh_debug_sv.push (l_module_name);
157: WSH_DEBUG_SV.log(l_module_name,'p_trip_id', p_trip_id);
158: WSH_DEBUG_SV.log(l_module_name,'p_trip_name', p_trip_name);
159: END IF;
160:
161: x_return_status := wsh_util_core.g_ret_sts_success;
162:
240: end if;
241: end if;
242:
243: IF l_debug_on THEN
244: WSH_DEBUG_SV.pop(l_module_name);
245: END IF;
246:
247: EXCEPTION
248:
249: WHEN e_trip_confirm_exception THEN
250: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
251: wsh_util_core.add_message(x_return_status,l_module_name);
252: IF l_debug_on THEN
253: wsh_debug_sv.log (l_module_name,'G_EXC_ERROR');
254: WSH_DEBUG_SV.pop(l_module_name);
255: END IF;
256:
257: WHEN OTHERS THEN
250: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
251: wsh_util_core.add_message(x_return_status,l_module_name);
252: IF l_debug_on THEN
253: wsh_debug_sv.log (l_module_name,'G_EXC_ERROR');
254: WSH_DEBUG_SV.pop(l_module_name);
255: END IF;
256:
257: WHEN OTHERS THEN
258:
259: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.Get_Trip_Defaults');
260:
261: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
262: IF l_debug_on THEN
263: wsh_debug_sv.log (l_module_name,'Others',substr(sqlerrm,1,200));
264: WSH_DEBUG_SV.pop(l_module_name);
265: END IF;
266:
267:
260:
261: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
262: IF l_debug_on THEN
263: wsh_debug_sv.log (l_module_name,'Others',substr(sqlerrm,1,200));
264: WSH_DEBUG_SV.pop(l_module_name);
265: END IF;
266:
267:
268: END Get_Trip_Defaults;
361: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
362: --
363: IF l_debug_on IS NULL
364: THEN
365: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
366: END IF;
367: --
368: --
369: IF l_debug_on THEN
366: END IF;
367: --
368: --
369: IF l_debug_on THEN
370: WSH_DEBUG_SV.push(l_module_name);
371: --
372: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
373: WSH_DEBUG_SV.log(l_module_name,'P_ACTION_FLAG',P_ACTION_FLAG);
374: WSH_DEBUG_SV.log(l_module_name,'P_INTRANSIT_FLAG',P_INTRANSIT_FLAG);
368: --
369: IF l_debug_on THEN
370: WSH_DEBUG_SV.push(l_module_name);
371: --
372: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
373: WSH_DEBUG_SV.log(l_module_name,'P_ACTION_FLAG',P_ACTION_FLAG);
374: WSH_DEBUG_SV.log(l_module_name,'P_INTRANSIT_FLAG',P_INTRANSIT_FLAG);
375: WSH_DEBUG_SV.log(l_module_name,'P_CLOSE_FLAG',P_CLOSE_FLAG);
376: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
369: IF l_debug_on THEN
370: WSH_DEBUG_SV.push(l_module_name);
371: --
372: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
373: WSH_DEBUG_SV.log(l_module_name,'P_ACTION_FLAG',P_ACTION_FLAG);
374: WSH_DEBUG_SV.log(l_module_name,'P_INTRANSIT_FLAG',P_INTRANSIT_FLAG);
375: WSH_DEBUG_SV.log(l_module_name,'P_CLOSE_FLAG',P_CLOSE_FLAG);
376: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
377: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
370: WSH_DEBUG_SV.push(l_module_name);
371: --
372: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
373: WSH_DEBUG_SV.log(l_module_name,'P_ACTION_FLAG',P_ACTION_FLAG);
374: WSH_DEBUG_SV.log(l_module_name,'P_INTRANSIT_FLAG',P_INTRANSIT_FLAG);
375: WSH_DEBUG_SV.log(l_module_name,'P_CLOSE_FLAG',P_CLOSE_FLAG);
376: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
377: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
378: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
371: --
372: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
373: WSH_DEBUG_SV.log(l_module_name,'P_ACTION_FLAG',P_ACTION_FLAG);
374: WSH_DEBUG_SV.log(l_module_name,'P_INTRANSIT_FLAG',P_INTRANSIT_FLAG);
375: WSH_DEBUG_SV.log(l_module_name,'P_CLOSE_FLAG',P_CLOSE_FLAG);
376: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
377: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
378: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
379: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
372: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
373: WSH_DEBUG_SV.log(l_module_name,'P_ACTION_FLAG',P_ACTION_FLAG);
374: WSH_DEBUG_SV.log(l_module_name,'P_INTRANSIT_FLAG',P_INTRANSIT_FLAG);
375: WSH_DEBUG_SV.log(l_module_name,'P_CLOSE_FLAG',P_CLOSE_FLAG);
376: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
377: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
378: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
379: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
380: WSH_DEBUG_SV.log(l_module_name,'P_BOL_FLAG',P_BOL_FLAG);
373: WSH_DEBUG_SV.log(l_module_name,'P_ACTION_FLAG',P_ACTION_FLAG);
374: WSH_DEBUG_SV.log(l_module_name,'P_INTRANSIT_FLAG',P_INTRANSIT_FLAG);
375: WSH_DEBUG_SV.log(l_module_name,'P_CLOSE_FLAG',P_CLOSE_FLAG);
376: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
377: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
378: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
379: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
380: WSH_DEBUG_SV.log(l_module_name,'P_BOL_FLAG',P_BOL_FLAG);
381: WSH_DEBUG_SV.log(l_module_name,'P_DEFER_INTERFACE_FLAG',P_DEFER_INTERFACE_FLAG);
374: WSH_DEBUG_SV.log(l_module_name,'P_INTRANSIT_FLAG',P_INTRANSIT_FLAG);
375: WSH_DEBUG_SV.log(l_module_name,'P_CLOSE_FLAG',P_CLOSE_FLAG);
376: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
377: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
378: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
379: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
380: WSH_DEBUG_SV.log(l_module_name,'P_BOL_FLAG',P_BOL_FLAG);
381: WSH_DEBUG_SV.log(l_module_name,'P_DEFER_INTERFACE_FLAG',P_DEFER_INTERFACE_FLAG);
382: WSH_DEBUG_SV.log(l_module_name,'P_MBOL_FLAG',P_MBOL_FLAG);
375: WSH_DEBUG_SV.log(l_module_name,'P_CLOSE_FLAG',P_CLOSE_FLAG);
376: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
377: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
378: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
379: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
380: WSH_DEBUG_SV.log(l_module_name,'P_BOL_FLAG',P_BOL_FLAG);
381: WSH_DEBUG_SV.log(l_module_name,'P_DEFER_INTERFACE_FLAG',P_DEFER_INTERFACE_FLAG);
382: WSH_DEBUG_SV.log(l_module_name,'P_MBOL_FLAG',P_MBOL_FLAG);
383:
376: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
377: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
378: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
379: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
380: WSH_DEBUG_SV.log(l_module_name,'P_BOL_FLAG',P_BOL_FLAG);
381: WSH_DEBUG_SV.log(l_module_name,'P_DEFER_INTERFACE_FLAG',P_DEFER_INTERFACE_FLAG);
382: WSH_DEBUG_SV.log(l_module_name,'P_MBOL_FLAG',P_MBOL_FLAG);
383:
384: END IF;
377: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
378: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
379: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
380: WSH_DEBUG_SV.log(l_module_name,'P_BOL_FLAG',P_BOL_FLAG);
381: WSH_DEBUG_SV.log(l_module_name,'P_DEFER_INTERFACE_FLAG',P_DEFER_INTERFACE_FLAG);
382: WSH_DEBUG_SV.log(l_module_name,'P_MBOL_FLAG',P_MBOL_FLAG);
383:
384: END IF;
385: --
378: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
379: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
380: WSH_DEBUG_SV.log(l_module_name,'P_BOL_FLAG',P_BOL_FLAG);
381: WSH_DEBUG_SV.log(l_module_name,'P_DEFER_INTERFACE_FLAG',P_DEFER_INTERFACE_FLAG);
382: WSH_DEBUG_SV.log(l_module_name,'P_MBOL_FLAG',P_MBOL_FLAG);
383:
384: END IF;
385: --
386:
406:
407: -- Check for Exceptions against Trip and its contents, only if trip is being set to In-Transit or Closed
408: IF p_intransit_flag = 'Y' OR p_close_flag = 'Y' THEN
409: IF l_debug_on THEN
410: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.Check_Exceptions',WSH_DEBUG_SV.C_PROC_LEVEL);
411: END IF;
412: l_exceptions_tab.delete;
413: l_exp_logged := FALSE;
414: WSH_XC_UTIL.Check_Exceptions (
478: END IF;
479:
480: --
481: IF l_debug_on THEN
482: WSH_DEBUG_SV.log(l_module_name,'L_STOP_ID',L_STOP_ID);
483: END IF;
484: --
485:
486: g_rate_trip_id := null;
511: END IF;
512:
513: --
514: IF l_debug_on THEN
515: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_ACTIONS.Confirm_Stop',WSH_DEBUG_SV.C_PROC_LEVEL);
516: END IF;
517: --
518: WSH_TRIP_STOPS_ACTIONS.Confirm_Stop (
519: p_stop_id => stop_rec.stop_id,
562: FETCH c_trip_status INTO l_trip_status;
563: IF c_trip_status%NOTFOUND THEN
564: CLOSE c_trip_status;
565: IF l_debug_on THEN
566: WSH_DEBUG_SV.logmsg(l_module_name,'Trip not found :'||p_trip_id,WSH_DEBUG_SV.C_PROC_LEVEL);
567: END IF;
568: raise no_data_found;
569: END IF;
570: CLOSE c_trip_status;
570: CLOSE c_trip_status;
571:
572: IF l_trip_status = 'CL' THEN
573: IF l_debug_on THEN
574: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.Close_Exceptions',WSH_DEBUG_SV.C_PROC_LEVEL);
575: END IF;
576: WSH_XC_UTIL.Close_Exceptions (
577: p_api_version => 1.0,
578: x_return_status => l_return_status,
604: END IF;
605:
606: --Bug# 2867209 - Start
607: IF l_debug_on THEN
608: WSH_DEBUG_SV.log(l_module_name,'l_is_action_not_performed',l_is_action_not_performed);
609: END IF;
610:
611: IF x_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS AND P_CLOSE_FLAG = 'N' AND l_is_action_not_performed THEN
612: FND_MESSAGE.SET_NAME('WSH','WSH_NO_CHANGE_ACTION');
616: --
617:
618: --Raise Event: Pick To Pod Workflow
619: IF l_debug_on THEN
620: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.RAISE_EVENT',WSH_DEBUG_SV.C_PROC_LEVEL);
621: END IF;
622:
623: WSH_WF_STD.Raise_Event(
624: p_entity_type => 'TRIP',
626: p_event => 'oracle.apps.wsh.trip.gen.shipconfirmed' ,
627: x_return_status => l_wf_rs ) ;
628:
629: IF l_debug_on THEN
630: WSH_DEBUG_SV.log(l_module_name,'Trip ID is ', p_trip_id );
631: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
632: END IF;
633: --Done Raise Event: Pick To Pod Workflow
634:
627: x_return_status => l_wf_rs ) ;
628:
629: IF l_debug_on THEN
630: WSH_DEBUG_SV.log(l_module_name,'Trip ID is ', p_trip_id );
631: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
632: END IF;
633: --Done Raise Event: Pick To Pod Workflow
634:
635: -- Debug Statements
634:
635: -- Debug Statements
636: --
637: IF l_debug_on THEN
638: WSH_DEBUG_SV.pop(l_module_name);
639: END IF;
640: --
641:
642:
643: EXCEPTION
644: WHEN trip_confirm_error THEN
645: --
646: IF l_debug_on THEN
647: WSH_DEBUG_SV.logmsg(l_module_name,'trip_confirm_error exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
648: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:trip_confirm_error');
649: END IF;
650: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_CONFIRM_ERROR');
651: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
644: WHEN trip_confirm_error THEN
645: --
646: IF l_debug_on THEN
647: WSH_DEBUG_SV.logmsg(l_module_name,'trip_confirm_error exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
648: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:trip_confirm_error');
649: END IF;
650: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_CONFIRM_ERROR');
651: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
652: wsh_util_core.add_message(x_return_status);
653: --
654: WHEN check_exceptions THEN
655: --
656: IF l_debug_on THEN
657: WSH_DEBUG_SV.logmsg(l_module_name,'Check_Exceptions exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
658: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:Check_Exceptions');
659: END IF;
660: --
661: WSH_UTIL_CORE.get_messages('N', l_msg_summary, l_msg_details, x_msg_count);
654: WHEN check_exceptions THEN
655: --
656: IF l_debug_on THEN
657: WSH_DEBUG_SV.logmsg(l_module_name,'Check_Exceptions exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
658: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:Check_Exceptions');
659: END IF;
660: --
661: WSH_UTIL_CORE.get_messages('N', l_msg_summary, l_msg_details, x_msg_count);
662: --
660: --
661: WSH_UTIL_CORE.get_messages('N', l_msg_summary, l_msg_details, x_msg_count);
662: --
663: IF l_debug_on THEN
664: WSH_DEBUG_SV.logmsg(l_module_name, L_MSG_SUMMARY );
665: END IF;
666: --
667: if x_msg_count > 1 then
668: x_msg_data := l_msg_summary || l_msg_details;
676: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
677: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.CONFIRM_TRIP');
678: --
679: IF l_debug_on THEN
680: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
681: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
682: END IF;
683: --
684: WSH_UTIL_CORE.get_messages('N', l_msg_summary, l_msg_details, x_msg_count);
677: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.CONFIRM_TRIP');
678: --
679: IF l_debug_on THEN
680: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
681: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
682: END IF;
683: --
684: WSH_UTIL_CORE.get_messages('N', l_msg_summary, l_msg_details, x_msg_count);
685: --
683: --
684: WSH_UTIL_CORE.get_messages('N', l_msg_summary, l_msg_details, x_msg_count);
685: --
686: IF l_debug_on THEN
687: WSH_DEBUG_SV.logmsg(l_module_name, L_MSG_SUMMARY );
688: END IF;
689: --
690: if x_msg_count > 1 then
691: x_msg_data := l_msg_summary || l_msg_details;
746: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
747: --
748: IF l_debug_on IS NULL
749: THEN
750: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
751: END IF;
752: --
753: IF l_debug_on THEN
754: WSH_DEBUG_SV.push(l_module_name);
750: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
751: END IF;
752: --
753: IF l_debug_on THEN
754: WSH_DEBUG_SV.push(l_module_name);
755: --
756: WSH_DEBUG_SV.log(l_module_name,'P_ACTION',P_ACTION);
757: END IF;
758: --
752: --
753: IF l_debug_on THEN
754: WSH_DEBUG_SV.push(l_module_name);
755: --
756: WSH_DEBUG_SV.log(l_module_name,'P_ACTION',P_ACTION);
757: END IF;
758: --
759: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
760:
771: --
772: -- Debug Statements
773: --
774: IF l_debug_on THEN
775: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_VALIDATIONS.CHECK_PLAN',WSH_DEBUG_SV.C_PROC_LEVEL);
776: END IF;
777: --
778: wsh_trip_validations.check_plan(p_trip_rows(i), x_return_status);
779: ELSIF (p_action='UNPLAN') THEN
780: --
781: -- Debug Statements
782: --
783: IF l_debug_on THEN
784: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_VALIDATIONS.CHECK_UNPLAN',WSH_DEBUG_SV.C_PROC_LEVEL);
785: END IF;
786: --
787: wsh_trip_validations.check_unplan(p_trip_rows(i), x_return_status);
788: END IF;
840: --
841: -- Debug Statements
842: --
843: IF l_debug_on THEN
844: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
845: END IF;
846: --
847: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_rows(i)));
848: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
888: --
889: -- Debug Statements
890: --
891: IF l_debug_on THEN
892: WSH_DEBUG_SV.pop(l_module_name);
893: END IF;
894: --
895: EXCEPTION
896: WHEN others THEN
900: --
901: -- Debug Statements
902: --
903: IF l_debug_on THEN
904: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
905: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
906: END IF;
907: --
908: END Plan;
901: -- Debug Statements
902: --
903: IF l_debug_on THEN
904: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
905: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
906: END IF;
907: --
908: END Plan;
909:
943: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
944: --
945: IF l_debug_on IS NULL
946: THEN
947: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
948: END IF;
949: --
950: IF l_debug_on THEN
951: WSH_DEBUG_SV.push(l_module_name);
947: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
948: END IF;
949: --
950: IF l_debug_on THEN
951: WSH_DEBUG_SV.push(l_module_name);
952: --
953: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
954: WSH_DEBUG_SV.log(l_module_name,'P_STATUS_CODE',P_STATUS_CODE);
955: END IF;
949: --
950: IF l_debug_on THEN
951: WSH_DEBUG_SV.push(l_module_name);
952: --
953: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
954: WSH_DEBUG_SV.log(l_module_name,'P_STATUS_CODE',P_STATUS_CODE);
955: END IF;
956:
957: /**
950: IF l_debug_on THEN
951: WSH_DEBUG_SV.push(l_module_name);
952: --
953: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
954: WSH_DEBUG_SV.log(l_module_name,'P_STATUS_CODE',P_STATUS_CODE);
955: END IF;
956:
957: /**
958: -- J-IB-NPARIKH-{
966:
967: -- Check for Exceptions if p_status_code = 'CL' or 'IT'
968: IF p_status_code IN ('IT','CL') THEN
969: IF l_debug_on THEN
970: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.Check_Exceptions',WSH_DEBUG_SV.C_PROC_LEVEL);
971: END IF;
972: l_exceptions_tab.delete;
973: l_exp_logged := FALSE;
974: WSH_XC_UTIL.Check_Exceptions (
1028: --
1029: -- Debug Statements
1030: --
1031: IF l_debug_on THEN
1032: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_GRP.GET_TRIP_DETAILS_PVT',WSH_DEBUG_SV.C_PROC_LEVEL);
1033: END IF;
1034: --
1035: wsh_trips_grp.get_trip_details_pvt
1036: (p_trip_id => p_trip_id,
1042: --
1043: -- Debug Statements
1044: --
1045: IF l_debug_on THEN
1046: WSH_DEBUG_SV.pop(l_module_name);
1047: END IF;
1048: --
1049: RETURN;
1050: END IF;
1053: --
1054: -- Debug Statements
1055: --
1056: IF l_debug_on THEN
1057: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FTE_INTEGRATION.TRIP_STOP_VALIDATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
1058: END IF;
1059: --
1060: wsh_fte_integration.trip_stop_validations
1061: (p_stop_rec => l_stop_rec,
1071: --
1072: -- Debug Statements
1073: --
1074: IF l_debug_on THEN
1075: WSH_DEBUG_SV.pop(l_module_name);
1076: END IF;
1077: --
1078: RETURN;
1079: END IF;
1096: --
1097: -- Debug Statements
1098: --
1099: IF l_debug_on THEN
1100: WSH_DEBUG_SV.pop(l_module_name);
1101: END IF;
1102: --
1103: RETURN;
1104: END IF;
1105:
1106: -- Close Exceptions for the Trip and its contents
1107: IF p_status_code IN ('IT','CL') THEN
1108: IF l_debug_on THEN
1109: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.Close_Exceptions',WSH_DEBUG_SV.C_PROC_LEVEL);
1110: END IF;
1111: WSH_XC_UTIL.Close_Exceptions (
1112: p_api_version => 1.0,
1113: x_return_status => l_return_status,
1135:
1136: -- Debug Statements
1137: --
1138: IF l_debug_on THEN
1139: WSH_DEBUG_SV.pop(l_module_name);
1140: END IF;
1141: --
1142:
1143: EXCEPTION
1144: WHEN check_exceptions THEN
1145: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1146: --
1147: IF l_debug_on THEN
1148: WSH_DEBUG_SV.logmsg(l_module_name,'Check_Exceptions exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1149: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:Check_Exceptions');
1150: END IF;
1151: --
1152:
1145: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1146: --
1147: IF l_debug_on THEN
1148: WSH_DEBUG_SV.logmsg(l_module_name,'Check_Exceptions exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1149: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:Check_Exceptions');
1150: END IF;
1151: --
1152:
1153: WHEN others THEN
1154: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.CHANGE_STATUS');
1155: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1156: --
1157: IF l_debug_on THEN
1158: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1159: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1160: END IF;
1161: --
1162:
1155: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1156: --
1157: IF l_debug_on THEN
1158: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1159: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1160: END IF;
1161: --
1162:
1163: END Change_Status;
1232: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1233: --
1234: IF l_debug_on IS NULL
1235: THEN
1236: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1237: END IF;
1238: --
1239: IF l_debug_on THEN
1240: WSH_DEBUG_SV.push(l_module_name);
1236: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1237: END IF;
1238: --
1239: IF l_debug_on THEN
1240: WSH_DEBUG_SV.push(l_module_name);
1241: --
1242: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.trip_id ', p_in_rec.trip_id );
1243: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
1244: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.new_Status_code ', p_in_rec.new_Status_code );
1238: --
1239: IF l_debug_on THEN
1240: WSH_DEBUG_SV.push(l_module_name);
1241: --
1242: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.trip_id ', p_in_rec.trip_id );
1243: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
1244: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.new_Status_code ', p_in_rec.new_Status_code );
1245: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages ', p_in_rec.put_messages );
1246: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
1239: IF l_debug_on THEN
1240: WSH_DEBUG_SV.push(l_module_name);
1241: --
1242: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.trip_id ', p_in_rec.trip_id );
1243: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
1244: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.new_Status_code ', p_in_rec.new_Status_code );
1245: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages ', p_in_rec.put_messages );
1246: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
1247: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
1240: WSH_DEBUG_SV.push(l_module_name);
1241: --
1242: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.trip_id ', p_in_rec.trip_id );
1243: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
1244: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.new_Status_code ', p_in_rec.new_Status_code );
1245: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages ', p_in_rec.put_messages );
1246: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
1247: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
1248: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
1241: --
1242: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.trip_id ', p_in_rec.trip_id );
1243: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
1244: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.new_Status_code ', p_in_rec.new_Status_code );
1245: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages ', p_in_rec.put_messages );
1246: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
1247: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
1248: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
1249: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
1242: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.trip_id ', p_in_rec.trip_id );
1243: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
1244: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.new_Status_code ', p_in_rec.new_Status_code );
1245: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages ', p_in_rec.put_messages );
1246: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
1247: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
1248: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
1249: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
1250: END IF;
1243: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
1244: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.new_Status_code ', p_in_rec.new_Status_code );
1245: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages ', p_in_rec.put_messages );
1246: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
1247: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
1248: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
1249: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
1250: END IF;
1251: --
1244: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.new_Status_code ', p_in_rec.new_Status_code );
1245: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages ', p_in_rec.put_messages );
1246: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
1247: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
1248: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
1249: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
1250: END IF;
1251: --
1252: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1245: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages ', p_in_rec.put_messages );
1246: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
1247: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
1248: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
1249: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
1250: END IF;
1251: --
1252: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1253: l_num_warnings := 0;
1274: --
1275: -- Debug Statements
1276: --
1277: IF l_debug_on THEN
1278: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_GRP.GET_TRIP_DETAILS_PVT',WSH_DEBUG_SV.C_PROC_LEVEL);
1279: END IF;
1280: --
1281: wsh_trips_grp.get_trip_details_pvt
1282: (p_trip_id => p_in_rec.trip_id,
1295: --
1296: -- Debug Statements
1297: --
1298: IF l_debug_on THEN
1299: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FTE_INTEGRATION.TRIP_STOP_VALIDATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
1300: END IF;
1301: --
1302: wsh_fte_integration.trip_stop_validations
1303: (p_stop_rec => l_stop_rec,
1333: -- Workflow Project
1334: IF p_in_rec.new_status_code = 'IT' THEN
1335: -- Raise Initial Pickup Stop Closed Event
1336: IF l_debug_on THEN
1337: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.RAISE_EVENT',WSH_DEBUG_SV.C_PROC_LEVEL);
1338: END IF;
1339:
1340: WSH_WF_STD.RAISE_EVENT( p_entity_type => 'TRIP',
1341: p_entity_id => p_in_rec.trip_id,
1342: p_event => 'oracle.apps.wsh.trip.gen.initialpickupstopclosed',
1343: x_return_status => l_wf_rs
1344: );
1345: IF l_debug_on THEN
1346: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_WF_STD.RAISE_EVENT => ',l_wf_rs);
1347: END IF;
1348: ELSIF p_in_rec.new_status_code = 'CL' THEN
1349: -- Raise Ultimate Dropoff Stop Closed Event
1350: IF l_debug_on THEN
1347: END IF;
1348: ELSIF p_in_rec.new_status_code = 'CL' THEN
1349: -- Raise Ultimate Dropoff Stop Closed Event
1350: IF l_debug_on THEN
1351: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.RAISE_EVENT',WSH_DEBUG_SV.C_PROC_LEVEL);
1352: END IF;
1353:
1354: WSH_WF_STD.RAISE_EVENT( p_entity_type => 'TRIP',
1355: p_entity_id => p_in_rec.trip_id,
1356: p_event => 'oracle.apps.wsh.trip.gen.ultimatedropoffstopclosed',
1357: x_return_status => l_wf_rs
1358: );
1359: IF l_debug_on THEN
1360: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_WF_STD.RAISE_EVENT => ',l_wf_rs);
1361: END IF;
1362: END IF;
1363: -- End of code for Workflow Project
1364:
1367: IF WSH_UTIL_CORE.TP_IS_INSTALLED='Y' AND l_trip_rec.ship_method_code is not null THEN
1368: IF l_trip_rec.mode_of_transport ='TRUCK' and l_trip_rec.vehicle_item_id is null THEN
1369: --if mode is truck, we can't plan/firm trip.
1370: IF l_debug_on THEN
1371: WSH_DEBUG_SV.logmsg(l_module_name,'Not trying to firm trip/delivery because mode is truck');
1372: END IF;
1373: ELSE -- mode and vehicle
1374: IF p_in_rec.new_status_code = 'IT' THEN
1375:
1407: END IF;
1408: ELSIF WSH_UTIL_CORE.TP_IS_INSTALLED='Y' AND l_trip_rec.ship_method_code is null THEN
1409: --TP is installed and ship method is null, cannot make the trip as firmed
1410: IF l_debug_on THEN
1411: WSH_DEBUG_SV.logmsg(l_module_name,'Not trying to firm trip/delivery because ship method is null');
1412: END IF;
1413: END IF;
1414: --
1415: -- Close Exceptions for the Trip and its contents, if new status = 'CL' or 'IT'
1414: --
1415: -- Close Exceptions for the Trip and its contents, if new status = 'CL' or 'IT'
1416: IF p_in_rec.new_status_code IN ('IT','CL') THEN
1417: IF l_debug_on THEN
1418: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.Close_Exceptions',WSH_DEBUG_SV.C_PROC_LEVEL);
1419: END IF;
1420: WSH_XC_UTIL.Close_Exceptions (
1421: p_api_version => 1.0,
1422: x_return_status => l_return_status,
1451: --
1452: -- Debug Statements
1453: --
1454: IF l_debug_on THEN
1455: WSH_DEBUG_SV.pop(l_module_name);
1456: END IF;
1457: --
1458: --}
1459: EXCEPTION
1464: --
1465: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1466: --
1467: IF l_debug_on THEN
1468: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1469: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1470: END IF;
1471: --
1472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1465: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1466: --
1467: IF l_debug_on THEN
1468: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1469: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1470: END IF;
1471: --
1472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1473:
1475: --
1476: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1477: --
1478: IF l_debug_on THEN
1479: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1480: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1481: END IF;
1482: --
1483: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1476: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1477: --
1478: IF l_debug_on THEN
1479: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1480: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1481: END IF;
1482: --
1483: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1484: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1483: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1484: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1485: --
1486: IF l_debug_on THEN
1487: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1488: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1489: END IF;
1490: WHEN others THEN
1491: wsh_util_core.default_handler('WSH_NEW_DELIVERY_ACTIONS.changeStatus',l_module_name);
1484: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1485: --
1486: IF l_debug_on THEN
1487: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1488: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1489: END IF;
1490: WHEN others THEN
1491: wsh_util_core.default_handler('WSH_NEW_DELIVERY_ACTIONS.changeStatus',l_module_name);
1492: --
1496: --
1497: -- Debug Statements
1498: --
1499: IF l_debug_on THEN
1500: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1501: END IF;
1502: --
1503: --}
1504: END changeStatus;
1572: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1573: --
1574: IF l_debug_on IS NULL
1575: THEN
1576: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1577: END IF;
1578: --
1579: --
1580: -- Debug Statements
1579: --
1580: -- Debug Statements
1581: --
1582: IF l_debug_on THEN
1583: WSH_DEBUG_SV.push(l_module_name);
1584: wsh_debug_sv.log (l_module_name,'action_code',p_action_prms.action_code);
1585: wsh_debug_sv.log (l_module_name,'caller',p_action_prms.caller);
1586: wsh_debug_sv.log (l_module_name,'COUNT',p_rec_attr_tab.COUNT);
1587: END IF;
1580: -- Debug Statements
1581: --
1582: IF l_debug_on THEN
1583: WSH_DEBUG_SV.push(l_module_name);
1584: wsh_debug_sv.log (l_module_name,'action_code',p_action_prms.action_code);
1585: wsh_debug_sv.log (l_module_name,'caller',p_action_prms.caller);
1586: wsh_debug_sv.log (l_module_name,'COUNT',p_rec_attr_tab.COUNT);
1587: END IF;
1588: --
1581: --
1582: IF l_debug_on THEN
1583: WSH_DEBUG_SV.push(l_module_name);
1584: wsh_debug_sv.log (l_module_name,'action_code',p_action_prms.action_code);
1585: wsh_debug_sv.log (l_module_name,'caller',p_action_prms.caller);
1586: wsh_debug_sv.log (l_module_name,'COUNT',p_rec_attr_tab.COUNT);
1587: END IF;
1588: --
1589: --
1582: IF l_debug_on THEN
1583: WSH_DEBUG_SV.push(l_module_name);
1584: wsh_debug_sv.log (l_module_name,'action_code',p_action_prms.action_code);
1585: wsh_debug_sv.log (l_module_name,'caller',p_action_prms.caller);
1586: wsh_debug_sv.log (l_module_name,'COUNT',p_rec_attr_tab.COUNT);
1587: END IF;
1588: --
1589: --
1590: l_cnt := 0;
1599: l_cnt := 0;
1600: l_trip_name := NULL;
1601: --
1602: IF l_debug_on THEN
1603: wsh_debug_sv.log (l_module_name,'l_index',l_index);
1604: wsh_debug_sv.log (l_module_name,'trip_id',p_rec_attr_tab(l_index).trip_id);
1605: END IF;
1606: --
1607: -- Get deliveries which have initial pickup location on the input trip
1600: l_trip_name := NULL;
1601: --
1602: IF l_debug_on THEN
1603: wsh_debug_sv.log (l_module_name,'l_index',l_index);
1604: wsh_debug_sv.log (l_module_name,'trip_id',p_rec_attr_tab(l_index).trip_id);
1605: END IF;
1606: --
1607: -- Get deliveries which have initial pickup location on the input trip
1608: --
1613: l_cnt := l_cnt + 1;
1614: --
1615: --
1616: IF l_debug_on THEN
1617: wsh_debug_sv.log (l_module_name,'dlvy_rec.delivery_id',dlvy_rec.delivery_id);
1618: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_deliveryIdTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
1619: END IF;
1620: --
1621: -- Build a cache of unique delivery IDs
1614: --
1615: --
1616: IF l_debug_on THEN
1617: wsh_debug_sv.log (l_module_name,'dlvy_rec.delivery_id',dlvy_rec.delivery_id);
1618: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_deliveryIdTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
1619: END IF;
1620: --
1621: -- Build a cache of unique delivery IDs
1622: --
1631: );
1632: --
1633: --
1634: IF l_debug_on THEN
1635: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1636: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1637: END IF;
1638: --
1639: wsh_util_core.api_post_call
1632: --
1633: --
1634: IF l_debug_on THEN
1635: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1636: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1637: END IF;
1638: --
1639: wsh_util_core.api_post_call
1640: (
1675: END LOOP;
1676: --
1677: --
1678: IF l_debug_on THEN
1679: wsh_debug_sv.log (l_module_name,'l_totalCnt',l_totalCnt);
1680: END IF;
1681: --
1682: --
1683: -- None of the trips have any delivery with initial pickup location
1720: END LOOP;
1721: --
1722: --
1723: IF l_debug_on THEN
1724: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_interface_grp.Delivery_Action',WSH_DEBUG_SV.C_PROC_LEVEL);
1725: END IF;
1726: --
1727: l_action_prms.caller := p_action_prms.caller;
1728: l_action_prms.phase := p_action_prms.phase;
1742: x_msg_data => l_msg_data);
1743: --
1744: --
1745: IF l_debug_on THEN
1746: wsh_debug_sv.log(l_module_name,'Return Status After Calling generate_routing_response',l_return_status);
1747: END IF;
1748: --
1749: wsh_util_core.api_post_call(
1750: p_return_status => l_return_status,
1755: END IF;
1756: --
1757: --
1758: IF l_debug_on THEN
1759: WSH_DEBUG_SV.logmsg(l_module_name,
1760: 'Number of Errors='||l_num_errors||',Number of Warnings='||l_num_warnings);
1761: END IF;
1762: --
1763: IF l_num_errors > 0
1772: --
1773: -- Debug Statements
1774: --
1775: IF l_debug_on THEN
1776: WSH_DEBUG_SV.pop(l_module_name);
1777: END IF;
1778: --
1779: --}
1780: EXCEPTION
1784: --
1785: -- Debug Statements
1786: --
1787: IF l_debug_on THEN
1788: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1789: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1790: END IF;
1791: --
1792: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1785: -- Debug Statements
1786: --
1787: IF l_debug_on THEN
1788: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1789: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1790: END IF;
1791: --
1792: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1793: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1794: --
1795: -- Debug Statements
1796: --
1797: IF l_debug_on THEN
1798: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1799: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1800: END IF;
1801: --
1802: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1795: -- Debug Statements
1796: --
1797: IF l_debug_on THEN
1798: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1799: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1800: END IF;
1801: --
1802: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1803: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1804: --
1805: -- Debug Statements
1806: --
1807: IF l_debug_on THEN
1808: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1809: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1810: END IF;
1811: --
1812: WHEN OTHERS THEN
1805: -- Debug Statements
1806: --
1807: IF l_debug_on THEN
1808: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1809: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1810: END IF;
1811: --
1812: WHEN OTHERS THEN
1813: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1815: --
1816: -- Debug Statements
1817: --
1818: IF l_debug_on THEN
1819: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1820: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1821: END IF;
1822: --
1823: --}
1816: -- Debug Statements
1817: --
1818: IF l_debug_on THEN
1819: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1820: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1821: END IF;
1822: --
1823: --}
1824: END generateRoutingResponse;
1882: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1883: --
1884: IF l_debug_on IS NULL
1885: THEN
1886: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1887: END IF;
1888: --
1889: IF l_debug_on THEN
1890: wsh_debug_sv.push(l_module_name);
1886: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1887: END IF;
1888: --
1889: IF l_debug_on THEN
1890: wsh_debug_sv.push(l_module_name);
1891: wsh_debug_sv.log(l_module_name, 'p_del_tbl.COUNT', p_del_tbl.delivery_id.COUNT);
1892: END IF;
1893: --
1894:
1887: END IF;
1888: --
1889: IF l_debug_on THEN
1890: wsh_debug_sv.push(l_module_name);
1891: wsh_debug_sv.log(l_module_name, 'p_del_tbl.COUNT', p_del_tbl.delivery_id.COUNT);
1892: END IF;
1893: --
1894:
1895: IF (WSH_UTIL_CORE.FTE_IS_INSTALLED = 'Y') THEN
1926: (NVL(p_del_tbl.carrier_id(i),'~') <>
1927: NVL(l_carrier_id,'~'))
1928: THEN --{
1929: IF l_debug_on THEN
1930: wsh_debug_sv.log(l_module_name, 'SM l_delivery_id', l_delivery_id);
1931: wsh_debug_sv.log(l_module_name, 'p_del_tbl.delivery_id', p_del_tbl.delivery_id(i));
1932: END IF;
1933: EXIT;
1934: END IF; --}
1927: NVL(l_carrier_id,'~'))
1928: THEN --{
1929: IF l_debug_on THEN
1930: wsh_debug_sv.log(l_module_name, 'SM l_delivery_id', l_delivery_id);
1931: wsh_debug_sv.log(l_module_name, 'p_del_tbl.delivery_id', p_del_tbl.delivery_id(i));
1932: END IF;
1933: EXIT;
1934: END IF; --}
1935:
1947: )
1948: )
1949: THEN
1950: IF l_debug_on THEN
1951: wsh_debug_sv.log(l_module_name, 'SF/ST l_delivery_id', l_delivery_id);
1952: wsh_debug_sv.log(l_module_name, 'p_del_tbl.delivery_id', p_del_tbl.delivery_id(i));
1953: END IF;
1954: EXIT;
1955: END IF;
1948: )
1949: THEN
1950: IF l_debug_on THEN
1951: wsh_debug_sv.log(l_module_name, 'SF/ST l_delivery_id', l_delivery_id);
1952: wsh_debug_sv.log(l_module_name, 'p_del_tbl.delivery_id', p_del_tbl.delivery_id(i));
1953: END IF;
1954: EXIT;
1955: END IF;
1956:
1956:
1957: x_idx := x_idx + 1;
1958: x_del_rows(l_counter) := p_del_tbl.delivery_id(i);
1959: IF l_debug_on THEN
1960: wsh_debug_sv.log(l_module_name, 'p_del_tbl.delivery_id(i)',
1961: p_del_tbl.delivery_id(i));
1962: END IF;
1963: l_counter := l_counter + 1;
1964:
1966: END IF; --}
1967: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1968:
1969: IF l_debug_on THEN
1970: wsh_debug_sv.log(l_module_name, 'x_idx', x_idx);
1971: WSH_DEBUG_SV.pop(l_module_name);
1972: END IF;
1973: --
1974: EXCEPTION
1967: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1968:
1969: IF l_debug_on THEN
1970: wsh_debug_sv.log(l_module_name, 'x_idx', x_idx);
1971: WSH_DEBUG_SV.pop(l_module_name);
1972: END IF;
1973: --
1974: EXCEPTION
1975: --
1978: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.GET_NEXT_DEL_ROWS');
1979: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1980: --
1981: IF l_debug_on THEN
1982: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1983: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1984: END IF;
1985: --
1986: END get_next_del_rows;
1979: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1980: --
1981: IF l_debug_on THEN
1982: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1983: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1984: END IF;
1985: --
1986: END get_next_del_rows;
1987:
2028: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2029: --
2030: IF l_debug_on IS NULL
2031: THEN
2032: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2033: END IF;
2034: --
2035: IF l_debug_on THEN
2036: wsh_debug_sv.push(l_module_name);
2032: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2033: END IF;
2034: --
2035: IF l_debug_on THEN
2036: wsh_debug_sv.push(l_module_name);
2037: wsh_debug_sv.log(l_module_name, 'p_del_tbl.delivery_id.COUNT', p_del_tbl.delivery_id.COUNT);
2038: END IF;
2039: --
2040: IF p_del_tbl.delivery_id.COUNT < 1 THEN
2033: END IF;
2034: --
2035: IF l_debug_on THEN
2036: wsh_debug_sv.push(l_module_name);
2037: wsh_debug_sv.log(l_module_name, 'p_del_tbl.delivery_id.COUNT', p_del_tbl.delivery_id.COUNT);
2038: END IF;
2039: --
2040: IF p_del_tbl.delivery_id.COUNT < 1 THEN
2041: RAISE e_invalid_count;
2076:
2077: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2078:
2079: IF l_debug_on THEN
2080: wsh_debug_sv.log(l_module_name, 'x_del_tbl.COUNT', x_del_tbl.delivery_id.COUNT);
2081: WSH_DEBUG_SV.pop(l_module_name);
2082: END IF;
2083: --
2084: EXCEPTION
2077: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2078:
2079: IF l_debug_on THEN
2080: wsh_debug_sv.log(l_module_name, 'x_del_tbl.COUNT', x_del_tbl.delivery_id.COUNT);
2081: WSH_DEBUG_SV.pop(l_module_name);
2082: END IF;
2083: --
2084: EXCEPTION
2085: --
2086: WHEN e_invalid_count THEN
2087: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2088: --
2089: IF l_debug_on THEN
2090: WSH_DEBUG_SV.logmsg(l_module_name,'The input table is empty.' ,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2091: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_invalid_count');
2092: END IF;
2093: --
2094: WHEN others THEN
2087: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2088: --
2089: IF l_debug_on THEN
2090: WSH_DEBUG_SV.logmsg(l_module_name,'The input table is empty.' ,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2091: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_invalid_count');
2092: END IF;
2093: --
2094: WHEN others THEN
2095: --
2096: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.SORT_DEL');
2097: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2098: --
2099: IF l_debug_on THEN
2100: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2101: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2102: END IF;
2103: --
2104: END sort_del;
2097: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2098: --
2099: IF l_debug_on THEN
2100: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2101: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2102: END IF;
2103: --
2104: END sort_del;
2105:
2162: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2163: --
2164: IF l_debug_on IS NULL
2165: THEN
2166: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2167: END IF;
2168: --
2169: IF l_debug_on THEN
2170: wsh_debug_sv.push(l_module_name);
2166: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2167: END IF;
2168: --
2169: IF l_debug_on THEN
2170: wsh_debug_sv.push(l_module_name);
2171: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2172: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2173: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2174: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2167: END IF;
2168: --
2169: IF l_debug_on THEN
2170: wsh_debug_sv.push(l_module_name);
2171: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2172: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2173: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2174: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2175: wsh_debug_sv.log(l_module_name, 'p_del_rows.count', p_del_rows.count);
2168: --
2169: IF l_debug_on THEN
2170: wsh_debug_sv.push(l_module_name);
2171: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2172: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2173: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2174: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2175: wsh_debug_sv.log(l_module_name, 'p_del_rows.count', p_del_rows.count);
2176: END IF;
2169: IF l_debug_on THEN
2170: wsh_debug_sv.push(l_module_name);
2171: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2172: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2173: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2174: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2175: wsh_debug_sv.log(l_module_name, 'p_del_rows.count', p_del_rows.count);
2176: END IF;
2177: --
2170: wsh_debug_sv.push(l_module_name);
2171: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2172: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2173: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2174: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2175: wsh_debug_sv.log(l_module_name, 'p_del_rows.count', p_del_rows.count);
2176: END IF;
2177: --
2178: l_idx := p_del_rows.FIRST;
2171: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2172: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2173: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2174: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2175: wsh_debug_sv.log(l_module_name, 'p_del_rows.count', p_del_rows.count);
2176: END IF;
2177: --
2178: l_idx := p_del_rows.FIRST;
2179:
2253: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING ;
2254: END IF;
2255:
2256: IF l_debug_on THEN
2257: WSH_DEBUG_SV.pop(l_module_name);
2258: END IF;
2259: --
2260: EXCEPTION
2261: --
2264: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.AUTOCREATE_TRIP_WRP');
2265: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2266: --
2267: IF l_debug_on THEN
2268: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2269: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2270: END IF;
2271: --
2272: END autocreate_trip_wrp;
2265: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2266: --
2267: IF l_debug_on THEN
2268: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2269: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2270: END IF;
2271: --
2272: END autocreate_trip_wrp;
2273:
2321: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2322: --
2323: IF l_debug_on IS NULL
2324: THEN
2325: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2326: END IF;
2327: --
2328: IF l_debug_on THEN
2329: WSH_DEBUG_SV.push(l_module_name);
2325: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2326: END IF;
2327: --
2328: IF l_debug_on THEN
2329: WSH_DEBUG_SV.push(l_module_name);
2330: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2331: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2332: END IF;
2333: --
2326: END IF;
2327: --
2328: IF l_debug_on THEN
2329: WSH_DEBUG_SV.push(l_module_name);
2330: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2331: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2332: END IF;
2333: --
2334: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2327: --
2328: IF l_debug_on THEN
2329: WSH_DEBUG_SV.push(l_module_name);
2330: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2331: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2332: END IF;
2333: --
2334: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2335:
2395: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_ERROR);
2396: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2397: x_return_status := l_return_status;
2398: IF l_debug_on THEN
2399: WSH_DEBUG_SV.log(l_module_name, 'Count of Errors', l_count_error);
2400: WSH_DEBUG_SV.pop(l_module_name);
2401: END IF;
2402: RETURN;
2403: ELSE
2396: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2397: x_return_status := l_return_status;
2398: IF l_debug_on THEN
2399: WSH_DEBUG_SV.log(l_module_name, 'Count of Errors', l_count_error);
2400: WSH_DEBUG_SV.pop(l_module_name);
2401: END IF;
2402: RETURN;
2403: ELSE
2404: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_WARNING);
2418:
2419: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2420: x_return_status:=l_return_status;
2421: IF l_debug_on THEN
2422: WSH_DEBUG_SV.pop(l_module_name);
2423: END IF;
2424: RETURN;
2425: END IF;
2426: IF l_trip_ids.COUNT > 0 THEN
2444:
2445: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2446: x_return_status:=l_return_status; -- Bug#3884302
2447: IF l_debug_on THEN
2448: WSH_DEBUG_SV.pop(l_module_name);
2449: END IF;
2450: RETURN;
2451: END IF;
2452: IF l_trip_ids.COUNT > 0 THEN
2466: --
2467: -- Debug Statements
2468: --
2469: IF l_debug_on THEN
2470: WSH_DEBUG_SV.pop(l_module_name);
2471: END IF;
2472: --
2473:
2474: EXCEPTION
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 autocreate_trip_multi;
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 autocreate_trip_multi;
2488:
2591: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2592: --
2593: IF l_debug_on IS NULL
2594: THEN
2595: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2596: END IF;
2597: --
2598: IF l_debug_on THEN
2599: wsh_debug_sv.push(l_module_name);
2595: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2596: END IF;
2597: --
2598: IF l_debug_on THEN
2599: wsh_debug_sv.push(l_module_name);
2600: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2601: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2602: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2603: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2596: END IF;
2597: --
2598: IF l_debug_on THEN
2599: wsh_debug_sv.push(l_module_name);
2600: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2601: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2602: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2603: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2604: END IF;
2597: --
2598: IF l_debug_on THEN
2599: wsh_debug_sv.push(l_module_name);
2600: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2601: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2602: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2603: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2604: END IF;
2605: --
2598: IF l_debug_on THEN
2599: wsh_debug_sv.push(l_module_name);
2600: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2601: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2602: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2603: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2604: END IF;
2605: --
2606:
2599: wsh_debug_sv.push(l_module_name);
2600: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2601: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2602: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2603: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2604: END IF;
2605: --
2606:
2607: --OTM R12, glog proj, use Global Variable
2653: CLOSE check_ship_method;
2654:
2655: --OTM R12, glog proj
2656: IF l_debug_on THEN
2657: WSH_DEBUG_SV.log(l_module_name,'l_gc3_is_installed',l_gc3_is_installed);
2658: WSH_DEBUG_SV.log(l_module_name,'l_ignore_for_planning',l_ignore_for_planning);
2659: END IF;
2660:
2661: IF l_gc3_is_installed = 'Y' AND l_ignore_for_planning = 'N' THEN--{
2654:
2655: --OTM R12, glog proj
2656: IF l_debug_on THEN
2657: WSH_DEBUG_SV.log(l_module_name,'l_gc3_is_installed',l_gc3_is_installed);
2658: WSH_DEBUG_SV.log(l_module_name,'l_ignore_for_planning',l_ignore_for_planning);
2659: END IF;
2660:
2661: IF l_gc3_is_installed = 'Y' AND l_ignore_for_planning = 'N' THEN--{
2662: -- Raise a new generic error message here, just trip creation will not happen.
2677: END IF; --}
2678: --
2679: -- Bug 3413364, skip the delivery if it does not have both initial pickup date and ultimate dropoff date
2680: IF l_debug_on THEN
2681: WSH_DEBUG_SV.log(l_module_name,'l_shipment_direction',l_shipment_direction);
2682: END IF;
2683:
2684: IF (l_initial_pickup_date is NULL or l_ultimate_dropoff_date is NULL)
2685: AND nvl(l_shipment_direction,'O') IN ('O', 'IO') THEN--{
2742: IF l_count_error = p_del_rows.count THEN
2743: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2744: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_ERROR);
2745: IF l_debug_on THEN
2746: WSH_DEBUG_SV.log(l_module_name, 'Count of Errors', l_count_error);
2747: WSH_DEBUG_SV.pop(l_module_name);
2748: END IF;
2749: RETURN;
2750: ELSE -- x_return_status is populated at the end
2743: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2744: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_ERROR);
2745: IF l_debug_on THEN
2746: WSH_DEBUG_SV.log(l_module_name, 'Count of Errors', l_count_error);
2747: WSH_DEBUG_SV.pop(l_module_name);
2748: END IF;
2749: RETURN;
2750: ELSE -- x_return_status is populated at the end
2751: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_WARNING);
2774: /* H integration */
2775: /* The trip level call should have been made at parent level */
2776: --
2777: IF l_debug_on THEN
2778: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.CREATE_TRIP',WSH_DEBUG_SV.C_PROC_LEVEL);
2779: END IF;
2780: --
2781: wsh_trips_pvt.create_trip(l_trip_info, l_rowid, x_trip_id, x_trip_name,x_return_status);
2782: --
2782: --
2783: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2784: --
2785: IF l_debug_on THEN
2786: wsh_debug_sv.log(l_module_name, 'Return Status after calling create_trip', x_return_Status);
2787: WSH_DEBUG_SV.pop(l_module_name);
2788: END IF;
2789: --
2790: RETURN;
2783: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2784: --
2785: IF l_debug_on THEN
2786: wsh_debug_sv.log(l_module_name, 'Return Status after calling create_trip', x_return_Status);
2787: WSH_DEBUG_SV.pop(l_module_name);
2788: END IF;
2789: --
2790: RETURN;
2791: --
2791: --
2792: END IF;
2793: --
2794: IF l_debug_on THEN
2795: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.ASSIGN_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
2796: END IF;
2797: --
2798: wsh_delivery_legs_actions.assign_deliveries(
2799: p_del_rows => l_good_dels,
2810:
2811: IF x_return_status in ( WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2812: --
2813: IF l_debug_on THEN
2814: wsh_debug_sv.log(l_module_name, 'Return Status after calling wsh_delivery_legs_actions.assign_deliveries', x_return_Status);
2815: WSH_DEBUG_SV.pop(l_module_name);
2816: END IF;
2817: --
2818: RETURN;
2811: IF x_return_status in ( WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2812: --
2813: IF l_debug_on THEN
2814: wsh_debug_sv.log(l_module_name, 'Return Status after calling wsh_delivery_legs_actions.assign_deliveries', x_return_Status);
2815: WSH_DEBUG_SV.pop(l_module_name);
2816: END IF;
2817: --
2818: RETURN;
2819: --
2838: -- H integration
2839: -- Get pvt type record structure for stop
2840: --
2841: IF l_debug_on THEN
2842: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_GRP.GET_STOP_DETAILS_PVT',WSH_DEBUG_SV.C_PROC_LEVEL);
2843: END IF;
2844: --
2845: wsh_trip_stops_grp.get_stop_details_pvt
2846: (p_stop_id => st.stop_id,
2851: --
2852: x_return_status := l_return_status;
2853: --
2854: IF l_debug_on THEN
2855: WSH_DEBUG_SV.pop(l_module_name);
2856: END IF;
2857: --
2858: RETURN;
2859: --
2863: --
2864: l_stop_rec.planned_departure_date := nvl(l_stop_rec.planned_arrival_date,SYSDATE);
2865: --
2866: IF l_debug_on THEN
2867: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FTE_INTEGRATION.TRIP_STOP_VALIDATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
2868: END IF;
2869: --
2870: wsh_fte_integration.trip_stop_validations
2871: (p_stop_rec => l_stop_rec,
2880: ELSE
2881: x_return_status := l_return_status;
2882: --
2883: IF l_debug_on THEN
2884: WSH_DEBUG_SV.pop(l_module_name);
2885: END IF;
2886: --
2887: RETURN;
2888: END IF;
2906: -- H integration
2907: -- Get pvt type record structure for stop
2908: --
2909: IF l_debug_on THEN
2910: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_GRP.GET_STOP_DETAILS_PVT',WSH_DEBUG_SV.C_PROC_LEVEL);
2911: END IF;
2912: --
2913: wsh_trip_stops_grp.get_stop_details_pvt
2914: (p_stop_id => st.stop_id,
2918: IF x_return_status in ( WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2919: x_return_status := l_return_status;
2920: --
2921: IF l_debug_on THEN
2922: WSH_DEBUG_SV.pop(l_module_name);
2923: END IF;
2924: --
2925: RETURN;
2926: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2929: --
2930: l_stop_rec.planned_arrival_date := nvl(l_stop_rec.planned_departure_date,SYSDATE);
2931: --
2932: IF l_debug_on THEN
2933: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FTE_INTEGRATION.TRIP_STOP_VALIDATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
2934: END IF;
2935: --
2936: wsh_fte_integration.trip_stop_validations
2937: (p_stop_rec => l_stop_rec,
2946: ELSE
2947: x_return_status := l_return_status;
2948: --
2949: IF l_debug_on THEN
2950: WSH_DEBUG_SV.pop(l_module_name);
2951: END IF;
2952: --
2953: RETURN;
2954: END IF;
2966: -- Updating WSH_TRIP_STOPS.
2967: -- Call DBI API after the Update.
2968: -- This API will also check for DBI Installed or not
2969: IF l_debug_on THEN
2970: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Stop id -',st.stop_id);
2971: END IF;
2972: l_stop_tab(1) := st.stop_id;
2973: WSH_INTEGRATION.DBI_Update_Trip_Stop_Log
2974: (p_stop_id_tab => l_stop_tab,
2975: p_dml_type => 'UPDATE',
2976: x_return_status => l_dbi_rs);
2977:
2978: IF l_debug_on THEN
2979: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
2980: END IF;
2981: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
2982: x_return_status := l_dbi_rs;
2983: -- just pass this return status to caller API
2981: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
2982: x_return_status := l_dbi_rs;
2983: -- just pass this return status to caller API
2984: IF l_debug_on THEN
2985: WSH_DEBUG_SV.log(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
2986: WSH_DEBUG_SV.pop(l_module_name);
2987: END IF;
2988: return;
2989: END IF;
2982: x_return_status := l_dbi_rs;
2983: -- just pass this return status to caller API
2984: IF l_debug_on THEN
2985: WSH_DEBUG_SV.log(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
2986: WSH_DEBUG_SV.pop(l_module_name);
2987: END IF;
2988: return;
2989: END IF;
2990: -- End of Code for DBI Project
3011: ELSE
3012: x_return_status := l_return_status;
3013: --
3014: IF l_debug_on THEN
3015: WSH_DEBUG_SV.pop(l_module_name);
3016: END IF;
3017: --
3018: RETURN;
3019: END IF;
3029: IF l_return_status in (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
3030: x_return_status := l_return_status;
3031: --
3032: IF l_debug_on THEN
3033: WSH_DEBUG_SV.pop(l_module_name);
3034: END IF;
3035: --
3036: RETURN;
3037: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3042: END IF;
3043: --}
3044: END IF; /* if good_dels.COUNT */
3045: IF l_debug_on THEN
3046: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES',WSH_DEBUG_SV.C_PROC_LEVEL);
3047: END IF;
3048: -- for bug 5948562, to populate values in additional trip information flexfield, when auto creating a trip
3049: wsh_flexfield_utils.WRITE_DFF_ATTRIBUTES
3050: (p_table_name => 'WSH_TRIPS',
3052: x_return_status => x_return_status);
3053:
3054: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3055: IF l_debug_on THEN
3056: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES RETURNED ERROR' );
3057: END IF;
3058: IF l_debug_on THEN
3059: WSH_DEBUG_SV.pop(l_module_name);
3060: END IF;
3055: IF l_debug_on THEN
3056: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES RETURNED ERROR' );
3057: END IF;
3058: IF l_debug_on THEN
3059: WSH_DEBUG_SV.pop(l_module_name);
3060: END IF;
3061: RETURN;
3062: END IF;
3063: --
3076: wsh_util_core.add_message(x_return_status);
3077: END IF;
3078: --
3079: IF l_debug_on THEN
3080: WSH_DEBUG_SV.pop(l_module_name);
3081: END IF;
3082: --
3083: EXCEPTION
3084: --
3087: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.AUTOCREATE_TRIP');
3088: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3089: --
3090: IF l_debug_on THEN
3091: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3092: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3093: END IF;
3094: --
3095: END autocreate_trip;
3088: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3089: --
3090: IF l_debug_on THEN
3091: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3092: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3093: END IF;
3094: --
3095: END autocreate_trip;
3096:
3188: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3189: --
3190: IF l_debug_on IS NULL--{
3191: THEN
3192: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3193: END IF;--}
3194: --
3195: IF l_debug_on THEN--{
3196: WSH_DEBUG_SV.push(l_module_name);
3192: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3193: END IF;--}
3194: --
3195: IF l_debug_on THEN--{
3196: WSH_DEBUG_SV.push(l_module_name);
3197: --
3198: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
3199: END IF;--}
3200: --
3194: --
3195: IF l_debug_on THEN--{
3196: WSH_DEBUG_SV.push(l_module_name);
3197: --
3198: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
3199: END IF;--}
3200: --
3201: --
3202: -- Debug Statements
3201: --
3202: -- Debug Statements
3203: --
3204: IF l_debug_on THEN--{
3205: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DEL_ACROSS_ORGS',WSH_DEBUG_SV.C_PROC_LEVEL);
3206: END IF;--}
3207: --
3208: --Compatibility Changes
3209: IF wsh_util_core.fte_is_installed = 'Y' THEN--{
3228: x_msg_data => l_msg_data,
3229: x_return_status => x_return_status);
3230:
3231: IF l_debug_on THEN--{
3232: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3233: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3234: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3235: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3236: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3229: x_return_status => x_return_status);
3230:
3231: IF l_debug_on THEN--{
3232: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3233: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3234: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3235: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3236: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3237: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3230:
3231: IF l_debug_on THEN--{
3232: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3233: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3234: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3235: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3236: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3237: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3238: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3231: IF l_debug_on THEN--{
3232: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3233: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3234: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3235: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3236: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3237: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3238: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3239: END IF;--}
3232: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3233: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3234: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3235: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3236: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3237: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3238: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3239: END IF;--}
3240: --
3233: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3234: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3235: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3236: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3237: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3238: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3239: END IF;--}
3240: --
3241:
3234: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3235: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3236: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3237: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3238: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3239: END IF;--}
3240: --
3241:
3242:
3246: --
3247: -- Debug Statements
3248: --
3249: IF l_debug_on THEN--{
3250: WSH_DEBUG_SV.pop(l_module_name);
3251: END IF;--}
3252: --
3253: RETURN;
3254: END IF;--}
3254: END IF;--}
3255:
3256: IF l_cc_failed_records.COUNT>0 AND x_return_status=wsh_util_core.g_ret_sts_error THEN--{
3257: IF l_debug_on THEN--{
3258: WSH_DEBUG_SV.logmsg(l_module_name,'All dels have failed compatibility -> delivery and Trip not created');
3259: END IF;--}
3260: -- if one one delivery fails for auto create trip, all the lines should
3261: -- should be unassigned from the deliveries and the action should
3262: -- fail for all the lines. (pack J 2862777)
3263: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3264: fnd_message.set_name('WSH', 'WSH_COMP_ACT_FAIL');
3265: wsh_util_core.add_message(x_return_status);
3266: IF l_debug_on THEN--{
3267: WSH_DEBUG_SV.pop(l_module_name);
3268: END IF;--}
3269: --
3270: RETURN;
3271: ELSIF l_cc_line_groups.COUNT>0 AND x_return_status=wsh_util_core.g_ret_sts_error THEN--}{
3300: END LOOP;--}
3301:
3302: --
3303: IF l_debug_on THEN--{
3304: wsh_debug_sv.log(l_module_name,'id_tab_temp count ',l_id_tab_temp.COUNT);
3305: END IF;--}
3306:
3307:
3308: wsh_delivery_autocreate.autocreate_del_across_orgs(
3328: END LOOP;--}
3329: END IF;--}
3330:
3331: IF l_debug_on THEN--{
3332: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3333: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3334: wsh_debug_sv.log(l_module_name,'l_delivery_ids_tbl.COUNT ',x_del_rows.COUNT);
3335: wsh_debug_sv.log(l_module_name,'l_grouping_tbl.COUNT ',l_grouping_rows.COUNT);
3336: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',x_return_status);
3329: END IF;--}
3330:
3331: IF l_debug_on THEN--{
3332: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3333: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3334: wsh_debug_sv.log(l_module_name,'l_delivery_ids_tbl.COUNT ',x_del_rows.COUNT);
3335: wsh_debug_sv.log(l_module_name,'l_grouping_tbl.COUNT ',l_grouping_rows.COUNT);
3336: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',x_return_status);
3337: END IF;--}
3330:
3331: IF l_debug_on THEN--{
3332: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3333: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3334: wsh_debug_sv.log(l_module_name,'l_delivery_ids_tbl.COUNT ',x_del_rows.COUNT);
3335: wsh_debug_sv.log(l_module_name,'l_grouping_tbl.COUNT ',l_grouping_rows.COUNT);
3336: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',x_return_status);
3337: END IF;--}
3338:
3331: IF l_debug_on THEN--{
3332: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3333: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3334: wsh_debug_sv.log(l_module_name,'l_delivery_ids_tbl.COUNT ',x_del_rows.COUNT);
3335: wsh_debug_sv.log(l_module_name,'l_grouping_tbl.COUNT ',l_grouping_rows.COUNT);
3336: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',x_return_status);
3337: END IF;--}
3338:
3339: IF l_cc_upd_dlvy_intmed_ship_to='N' OR l_cc_upd_dlvy_ship_method='N' THEN--{
3332: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3333: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3334: wsh_debug_sv.log(l_module_name,'l_delivery_ids_tbl.COUNT ',x_del_rows.COUNT);
3335: wsh_debug_sv.log(l_module_name,'l_grouping_tbl.COUNT ',l_grouping_rows.COUNT);
3336: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',x_return_status);
3337: END IF;--}
3338:
3339: IF l_cc_upd_dlvy_intmed_ship_to='N' OR l_cc_upd_dlvy_ship_method='N' THEN--{
3340: IF l_id_tab_temp.COUNT>0 THEN--{
3397: x_del_rows:=l_cc_del_rows;
3398: x_return_status:=l_cc_return_status;
3399:
3400: IF l_debug_on THEN--{
3401: wsh_debug_sv.log(l_module_name,'l_delivery_ids_tbl.COUNT after loop ',x_del_rows.COUNT);
3402: wsh_debug_sv.log(l_module_name,'l_grouping_tbl.COUNT after loop',l_grouping_rows.COUNT);
3403: END IF;--}
3404:
3405: ELSE -- line_group>0 }{
3398: x_return_status:=l_cc_return_status;
3399:
3400: IF l_debug_on THEN--{
3401: wsh_debug_sv.log(l_module_name,'l_delivery_ids_tbl.COUNT after loop ',x_del_rows.COUNT);
3402: wsh_debug_sv.log(l_module_name,'l_grouping_tbl.COUNT after loop',l_grouping_rows.COUNT);
3403: END IF;--}
3404:
3405: ELSE -- line_group>0 }{
3406:
3416: x_return_status => x_return_status);
3417:
3418: --bug 2729742
3419: IF l_debug_on THEN--{
3420: wsh_debug_sv.log(l_module_name,'l_cc_group_info.COUNT ',l_cc_group_info.COUNT);
3421: END IF;--}
3422:
3423: IF l_cc_group_info.COUNT>0 THEN--{
3424: --set the intermediate ship to, ship method to null if group rec from constraint validation has these as 'N'
3428: l_cc_upd_dlvy_ship_method:=l_cc_group_info(1).upd_dlvy_ship_method;
3429:
3430: IF l_debug_on THEN--{
3431:
3432: wsh_debug_sv.log(l_module_name,'l_cc_group_info.COUNT ',l_cc_group_info.COUNT);
3433: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3434: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3435: END IF;--}
3436:
3429:
3430: IF l_debug_on THEN--{
3431:
3432: wsh_debug_sv.log(l_module_name,'l_cc_group_info.COUNT ',l_cc_group_info.COUNT);
3433: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3434: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3435: END IF;--}
3436:
3437: IF l_cc_upd_dlvy_intmed_ship_to='N' OR l_cc_upd_dlvy_ship_method='N' THEN--{
3430: IF l_debug_on THEN--{
3431:
3432: wsh_debug_sv.log(l_module_name,'l_cc_group_info.COUNT ',l_cc_group_info.COUNT);
3433: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3434: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3435: END IF;--}
3436:
3437: IF l_cc_upd_dlvy_intmed_ship_to='N' OR l_cc_upd_dlvy_ship_method='N' THEN--{
3438: IF x_del_rows.COUNT>0 THEN--{
3479: --Compatibility Changes
3480:
3481: --
3482: IF l_debug_on THEN--{
3483: wsh_debug_sv.log(l_module_name,'Return Status After Calling Autocreate_Del_across_orgs',x_return_status);
3484: END IF;--}
3485:
3486:
3487: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) OR
3489: --
3490: -- Debug Statements
3491: --
3492: IF l_debug_on THEN--{
3493: WSH_DEBUG_SV.pop(l_module_name);
3494: END IF;--}
3495: --
3496: RETURN;
3497: END IF;--}
3525: x_msg_data => l_msg_data,
3526: x_return_status => x_return_status);
3527:
3528: IF l_debug_on THEN--{
3529: wsh_debug_sv.logmsg(l_module_name,'For autocreate_trip');
3530: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3531: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3532: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3533: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3526: x_return_status => x_return_status);
3527:
3528: IF l_debug_on THEN--{
3529: wsh_debug_sv.logmsg(l_module_name,'For autocreate_trip');
3530: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3531: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3532: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3533: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3534: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3527:
3528: IF l_debug_on THEN--{
3529: wsh_debug_sv.logmsg(l_module_name,'For autocreate_trip');
3530: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3531: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3532: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3533: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3534: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3535: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3528: IF l_debug_on THEN--{
3529: wsh_debug_sv.logmsg(l_module_name,'For autocreate_trip');
3530: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3531: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3532: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3533: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3534: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3535: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3536: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3529: wsh_debug_sv.logmsg(l_module_name,'For autocreate_trip');
3530: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3531: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3532: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3533: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3534: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3535: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3536: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3537: END IF;--}
3530: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3531: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3532: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3533: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3534: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3535: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3536: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3537: END IF;--}
3538: --
3531: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3532: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3533: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3534: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3535: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3536: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3537: END IF;--}
3538: --
3539:
3532: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3533: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3534: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3535: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3536: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3537: END IF;--}
3538: --
3539:
3540: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN--{
3541: --
3542: -- Debug Statements
3543: --
3544: IF l_debug_on THEN--{
3545: WSH_DEBUG_SV.pop(l_module_name);
3546: END IF;--}
3547: --
3548: RETURN;
3549: END IF;--}
3550:
3551: --do nothing if all dels have errored out (deliveries shud be created and trip shud not be
3552: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR AND l_cc_failed_records.COUNT > 0) THEN--{
3553: IF l_debug_on THEN--{
3554: WSH_DEBUG_SV.logmsg(l_module_name,'All dels have failed compatibility -> Trip not created');
3555: END IF;--}
3556: -- if one one delivery fails for auto create trip, all the lines should
3557: -- should be unassigned from the deliveries and the action should
3558: -- fail for all the lines. (pack J 2862777)
3559: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3560: fnd_message.set_name('WSH', 'WSH_COMP_ACT_FAIL');
3561: wsh_util_core.add_message(x_return_status);
3562: IF l_debug_on THEN--{
3563: WSH_DEBUG_SV.pop(l_module_name);
3564: END IF;--}
3565: --
3566: RETURN;
3567: ELSIF l_cc_line_groups.COUNT>0 AND x_return_status=wsh_util_core.g_ret_sts_error THEN--}{
3596: END LOOP;--}
3597:
3598: --
3599: IF l_debug_on THEN--{
3600: wsh_debug_sv.log(l_module_name,'id_tab_temp count ',l_id_tab_temp.COUNT);
3601: wsh_debug_sv.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.Adjust_Planned_Flag ');
3602: END IF;--}
3603:
3604: -- deliveryMerge
3597:
3598: --
3599: IF l_debug_on THEN--{
3600: wsh_debug_sv.log(l_module_name,'id_tab_temp count ',l_id_tab_temp.COUNT);
3601: wsh_debug_sv.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.Adjust_Planned_Flag ');
3602: END IF;--}
3603:
3604: -- deliveryMerge
3605: WSH_NEW_DELIVERY_ACTIONS.Adjust_Planned_Flag(
3610: p_event => NULL,
3611: x_return_status => l_return_status);
3612:
3613: IF l_debug_on THEN --{
3614: wsh_debug_sv.log(l_module_name,'Return status from WSH_NEW_DELIVERY_ACTIONS.Adjust_Planned_Flag ', l_return_status);
3615: END IF;--}
3616:
3617: IF l_return_status in (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN--{
3618: raise Adjust_Planned_Flag_Err;
3636: END LOOP;--}
3637: END IF;--}
3638:
3639: IF l_debug_on THEN--{
3640: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3641: wsh_debug_sv.log(l_module_name,'l_trip_id ',l_trip_ids(1));
3642: wsh_debug_sv.log(l_module_name,'l_trip_name ',l_trip_names(1));
3643: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_trip in comp ',x_return_status);
3644: END IF;--}
3637: END IF;--}
3638:
3639: IF l_debug_on THEN--{
3640: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3641: wsh_debug_sv.log(l_module_name,'l_trip_id ',l_trip_ids(1));
3642: wsh_debug_sv.log(l_module_name,'l_trip_name ',l_trip_names(1));
3643: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_trip in comp ',x_return_status);
3644: END IF;--}
3645:
3638:
3639: IF l_debug_on THEN--{
3640: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3641: wsh_debug_sv.log(l_module_name,'l_trip_id ',l_trip_ids(1));
3642: wsh_debug_sv.log(l_module_name,'l_trip_name ',l_trip_names(1));
3643: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_trip in comp ',x_return_status);
3644: END IF;--}
3645:
3646: /* J TP Release */
3639: IF l_debug_on THEN--{
3640: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3641: wsh_debug_sv.log(l_module_name,'l_trip_id ',l_trip_ids(1));
3642: wsh_debug_sv.log(l_module_name,'l_trip_name ',l_trip_names(1));
3643: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_trip in comp ',x_return_status);
3644: END IF;--}
3645:
3646: /* J TP Release */
3647: IF l_trip_ids is not null AND l_trip_ids.COUNT>0 THEN--{
3674: l_trip_id_tab:=l_cc_trip_id;
3675: x_return_status:=l_cc_return_status;
3676:
3677: IF l_debug_on THEN--{
3678: wsh_debug_sv.log(l_module_name,'l_trip_id_tab.COUNT after loop ',l_trip_id_tab.COUNT);
3679: END IF;--}
3680:
3681: ELSE --line_groups --}{
3682: --
3689: p_event => NULL,
3690: x_return_status => l_return_status);
3691:
3692: IF l_debug_on THEN --{
3693: wsh_debug_sv.log(l_module_name,'Return status from WSH_NEW_DELIVERY_ACTIONS.Adjust_Planned_Flag ', l_return_status);
3694: END IF;--}
3695:
3696: IF l_return_status in (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN--{
3697: raise Adjust_Planned_Flag_Err;
3707:
3708: --bug 2729742
3709: --set the intermediate ship to, ship method to null if group rec from constraint validation has these as 'N'
3710: IF l_debug_on THEN--{
3711: wsh_debug_sv.log(l_module_name,'l_cc_group_info.COUNT ',l_cc_group_info.COUNT);
3712: END IF;--}
3713:
3714: IF l_cc_group_info.COUNT>0 THEN--{
3715:
3717: l_cc_upd_dlvy_ship_method:=l_cc_group_info(1).upd_dlvy_ship_method;
3718:
3719: IF l_debug_on THEN--{
3720:
3721: wsh_debug_sv.log(l_module_name,'l_cc_group_info.COUNT ',l_cc_group_info.COUNT);
3722: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3723: END IF;--}
3724:
3725: IF l_cc_upd_dlvy_ship_method='N' and l_trip_id_tab is not null and l_trip_id_tab.COUNT>0 THEN--{
3718:
3719: IF l_debug_on THEN--{
3720:
3721: wsh_debug_sv.log(l_module_name,'l_cc_group_info.COUNT ',l_cc_group_info.COUNT);
3722: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3723: END IF;--}
3724:
3725: IF l_cc_upd_dlvy_ship_method='N' and l_trip_id_tab is not null and l_trip_id_tab.COUNT>0 THEN--{
3726: FOR l_tripindex IN l_trip_id_tab.FIRST..l_trip_id_tab.LAST LOOP--{
3752: p_event => NULL,
3753: x_return_status => l_return_status);
3754:
3755: IF l_debug_on THEN --{
3756: wsh_debug_sv.log(l_module_name,'Return status from WSH_NEW_DELIVERY_ACTIONS.Adjust_Planned_Flag ', l_return_status);
3757: END IF;--}
3758:
3759: IF l_return_status in (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN--{
3760: raise Adjust_Planned_Flag_Err;
3779: --
3780: -- Debug Statements
3781: --
3782: IF l_debug_on THEN--{
3783: WSH_DEBUG_SV.pop(l_module_name);
3784: END IF;--}
3785: --
3786: RETURN;
3787: END IF;--}
3791: --
3792: -- Debug Statements
3793: --
3794: IF l_debug_on THEN--{
3795: WSH_DEBUG_SV.pop(l_module_name);
3796: END IF;--}
3797: --
3798:
3799: EXCEPTION
3804: WSH_UTIL_CORE.add_message(l_return_status,l_module_name);
3805: x_return_status := l_return_status;
3806:
3807: IF l_debug_on THEN--{
3808: WSH_DEBUG_SV.logmsg(l_module_name,'Adjust_Planned_Flag_Err exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3809: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:Adjust_Planned_Flag_Err');
3810: END IF;--}
3811:
3812: WHEN others THEN
3805: x_return_status := l_return_status;
3806:
3807: IF l_debug_on THEN--{
3808: WSH_DEBUG_SV.logmsg(l_module_name,'Adjust_Planned_Flag_Err exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3809: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:Adjust_Planned_Flag_Err');
3810: END IF;--}
3811:
3812: WHEN others THEN
3813: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.AUTOCREATE_DEL_TRIP');
3817: --
3818: -- Debug Statements
3819: --
3820: IF l_debug_on THEN--{
3821: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3822: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3823: END IF;--}
3824: --
3825: END autocreate_del_trip;
3818: -- Debug Statements
3819: --
3820: IF l_debug_on THEN--{
3821: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3822: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3823: END IF;--}
3824: --
3825: END autocreate_del_trip;
3826:
3849: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3850: --
3851: IF l_debug_on IS NULL
3852: THEN
3853: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3854: END IF;
3855: --
3856: IF l_debug_on THEN
3857: WSH_DEBUG_SV.push(l_module_name);
3853: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3854: END IF;
3855: --
3856: IF l_debug_on THEN
3857: WSH_DEBUG_SV.push(l_module_name);
3858: --
3859: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
3860: END IF;
3861: --
3855: --
3856: IF l_debug_on THEN
3857: WSH_DEBUG_SV.push(l_module_name);
3858: --
3859: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
3860: END IF;
3861: --
3862: --
3863: -- Debug Statements
3862: --
3863: -- Debug Statements
3864: --
3865: IF l_debug_on THEN
3866: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DEL_ACROSS_ORGS',WSH_DEBUG_SV.C_PROC_LEVEL);
3867: END IF;
3868: --
3869: wsh_delivery_autocreate.autocreate_del_across_orgs(
3870: p_line_rows => p_line_rows,
3881: --
3882: -- Debug Statements
3883: --
3884: IF l_debug_on THEN
3885: WSH_DEBUG_SV.pop(l_module_name);
3886: END IF;
3887: --
3888: RETURN;
3889: END IF;
3891: --
3892: -- Debug Statements
3893: --
3894: IF l_debug_on THEN
3895: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.ASSIGN_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
3896: END IF;
3897: --
3898: wsh_delivery_legs_actions.assign_deliveries(
3899: p_del_rows => x_del_rows,
3908: --
3909: -- Debug Statements
3910: --
3911: IF l_debug_on THEN
3912: WSH_DEBUG_SV.pop(l_module_name);
3913: END IF;
3914: --
3915: RETURN;
3916: END IF;
3921: --
3922: -- Debug Statements
3923: --
3924: IF l_debug_on THEN
3925: WSH_DEBUG_SV.pop(l_module_name);
3926: END IF;
3927: --
3928: EXCEPTION
3929: WHEN reprice_required_err THEN
3933: --
3934: -- Debug Statements
3935: --
3936: IF l_debug_on THEN
3937: WSH_DEBUG_SV.logmsg(l_module_name,'REPRICE_REQUIRED_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3938: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REPRICE_REQUIRED_ERR');
3939: END IF;
3940: --
3941: WHEN others THEN
3934: -- Debug Statements
3935: --
3936: IF l_debug_on THEN
3937: WSH_DEBUG_SV.logmsg(l_module_name,'REPRICE_REQUIRED_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3938: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REPRICE_REQUIRED_ERR');
3939: END IF;
3940: --
3941: WHEN others THEN
3942: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.ASSIGN_TRIP');
3945: --
3946: -- Debug Statements
3947: --
3948: IF l_debug_on THEN
3949: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3950: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3951: END IF;
3952: --
3953: END assign_trip;
3946: -- Debug Statements
3947: --
3948: IF l_debug_on THEN
3949: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3950: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3951: END IF;
3952: --
3953: END assign_trip;
3954:
4010: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4011: --
4012: IF l_debug_on IS NULL
4013: THEN
4014: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4015: END IF;
4016: --
4017: IF l_debug_on THEN
4018: WSH_DEBUG_SV.push(l_module_name);
4014: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4015: END IF;
4016: --
4017: IF l_debug_on THEN
4018: WSH_DEBUG_SV.push(l_module_name);
4019: --
4020: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4021: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4022: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4016: --
4017: IF l_debug_on THEN
4018: WSH_DEBUG_SV.push(l_module_name);
4019: --
4020: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4021: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4022: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4023: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4024: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4017: IF l_debug_on THEN
4018: WSH_DEBUG_SV.push(l_module_name);
4019: --
4020: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4021: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4022: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4023: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4024: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4025: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4018: WSH_DEBUG_SV.push(l_module_name);
4019: --
4020: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4021: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4022: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4023: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4024: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4025: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4026: -- Pack J csun Stop Sequence Change
4019: --
4020: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4021: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4022: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4023: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4024: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4025: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4026: -- Pack J csun Stop Sequence Change
4027: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4020: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4021: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4022: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4023: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4024: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4025: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4026: -- Pack J csun Stop Sequence Change
4027: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4028: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4021: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4022: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4023: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4024: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4025: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4026: -- Pack J csun Stop Sequence Change
4027: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4028: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4029: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4023: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4024: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4025: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4026: -- Pack J csun Stop Sequence Change
4027: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4028: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4029: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4030: END IF;
4031: --
4024: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4025: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4026: -- Pack J csun Stop Sequence Change
4027: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4028: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4029: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4030: END IF;
4031: --
4032: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4025: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4026: -- Pack J csun Stop Sequence Change
4027: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4028: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4029: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4030: END IF;
4031: --
4032: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4033:
4038: --
4039: -- Debug Statements
4040: --
4041: IF l_debug_on THEN
4042: WSH_DEBUG_SV.pop(l_module_name);
4043: END IF;
4044: --
4045: RETURN;
4046: END IF;
4065: --
4066: -- Debug Statements
4067: --
4068: IF l_debug_on THEN
4069: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4070: END IF;
4071: --
4072: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
4073: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4077: --
4078: -- Debug Statements
4079: --
4080: IF l_debug_on THEN
4081: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_PVT.DELETE_DELIVERY_LEG',WSH_DEBUG_SV.C_PROC_LEVEL);
4082: END IF;
4083: --
4084: wsh_delivery_legs_pvt.delete_delivery_leg(NULL, l_delivery_leg_id, x_return_status);
4085:
4098: --
4099: -- Debug Statements
4100: --
4101: IF l_debug_on THEN
4102: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4103: END IF;
4104: --
4105: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
4106: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4110: --
4111: -- Debug Statements
4112: --
4113: IF l_debug_on THEN
4114: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_PVT.DELETE_DELIVERY_LEG',WSH_DEBUG_SV.C_PROC_LEVEL);
4115: END IF;
4116: --
4117: wsh_delivery_legs_pvt.delete_delivery_leg(NULL, l_delivery_leg_id, x_return_status);
4118:
4123: --
4124: -- Debug Statements
4125: --
4126: IF l_debug_on THEN
4127: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.CHECK_ASSIGN_TRIP',WSH_DEBUG_SV.C_PROC_LEVEL);
4128: END IF;
4129: --
4130: wsh_delivery_validations.check_assign_trip(
4131: p_delivery_id => p_del_rows(i),
4141: --
4142: -- Debug Statements
4143: --
4144: IF l_debug_on THEN
4145: WSH_DEBUG_SV.pop(l_module_name);
4146: END IF;
4147: --
4148: RETURN;
4149: END IF;
4164: --
4165: -- Debug Statements
4166: --
4167: IF l_debug_on THEN
4168: WSH_DEBUG_SV.pop(l_module_name);
4169: END IF;
4170: --
4171: EXCEPTION
4172: WHEN others THEN
4176: --
4177: -- Debug Statements
4178: --
4179: IF l_debug_on THEN
4180: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4181: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4182: END IF;
4183: --
4184: END check_assign_trip;
4177: -- Debug Statements
4178: --
4179: IF l_debug_on THEN
4180: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4181: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4182: END IF;
4183: --
4184: END check_assign_trip;
4185:
4321: ORDER BY ts2.stop_sequence_number;
4322: l_ssn NUMBER;
4323: BEGIN
4324: IF l_debug_on THEN
4325: WSH_DEBUG_SV.log(l_module_name, 'entering internal function derive_next_ssn, p_stop_id ', p_stop_id);
4326: END IF;
4327:
4328: l_ssn := NULL;
4329:
4341: END IF;
4342: END LOOP;
4343:
4344: IF l_debug_on THEN
4345: WSH_DEBUG_SV.log(l_module_name, 'exiting internal function derive_next_ssn, returning l_ssn', l_ssn);
4346: END IF;
4347: RETURN l_ssn;
4348:
4349: EXCEPTION
4348:
4349: EXCEPTION
4350: WHEN OTHERS THEN
4351: IF l_debug_on THEN
4352: WSH_DEBUG_SV.log(l_module_name, 'exiting internal function derive_next_ssn, unhandled exception');
4353: END IF;
4354: RETURN 0;
4355: END;
4356:
4357: BEGIN
4358: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4359: --
4360: IF l_debug_on IS NULL THEN
4361: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4362: END IF;
4363:
4364: IF l_debug_on THEN
4365: WSH_DEBUG_SV.push(l_module_name);
4361: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4362: END IF;
4363:
4364: IF l_debug_on THEN
4365: WSH_DEBUG_SV.push(l_module_name);
4366: WSH_DEBUG_SV.log(l_module_name, 'p_caller', p_caller);
4367: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_stop_id', p_pickup_stop_id);
4368: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_location_id', p_pickup_location_id);
4369: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_stop_id', p_dropoff_stop_id);
4362: END IF;
4363:
4364: IF l_debug_on THEN
4365: WSH_DEBUG_SV.push(l_module_name);
4366: WSH_DEBUG_SV.log(l_module_name, 'p_caller', p_caller);
4367: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_stop_id', p_pickup_stop_id);
4368: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_location_id', p_pickup_location_id);
4369: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_stop_id', p_dropoff_stop_id);
4370: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_location_id', p_dropoff_location_id);
4363:
4364: IF l_debug_on THEN
4365: WSH_DEBUG_SV.push(l_module_name);
4366: WSH_DEBUG_SV.log(l_module_name, 'p_caller', p_caller);
4367: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_stop_id', p_pickup_stop_id);
4368: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_location_id', p_pickup_location_id);
4369: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_stop_id', p_dropoff_stop_id);
4370: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_location_id', p_dropoff_location_id);
4371: END IF;
4364: IF l_debug_on THEN
4365: WSH_DEBUG_SV.push(l_module_name);
4366: WSH_DEBUG_SV.log(l_module_name, 'p_caller', p_caller);
4367: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_stop_id', p_pickup_stop_id);
4368: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_location_id', p_pickup_location_id);
4369: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_stop_id', p_dropoff_stop_id);
4370: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_location_id', p_dropoff_location_id);
4371: END IF;
4372: --
4365: WSH_DEBUG_SV.push(l_module_name);
4366: WSH_DEBUG_SV.log(l_module_name, 'p_caller', p_caller);
4367: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_stop_id', p_pickup_stop_id);
4368: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_location_id', p_pickup_location_id);
4369: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_stop_id', p_dropoff_stop_id);
4370: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_location_id', p_dropoff_location_id);
4371: END IF;
4372: --
4373: --
4366: WSH_DEBUG_SV.log(l_module_name, 'p_caller', p_caller);
4367: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_stop_id', p_pickup_stop_id);
4368: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_location_id', p_pickup_location_id);
4369: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_stop_id', p_dropoff_stop_id);
4370: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_location_id', p_dropoff_location_id);
4371: END IF;
4372: --
4373: --
4374: x_return_status :=WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4413: x_return_status:=l_return_status;
4414: RETURN;
4415: END IF;
4416: IF l_debug_on THEN
4417: WSH_DEBUG_SV.log(l_module_name,'l_phys_trip_pickup_loc_id',l_phys_trip_pickup_loc_id);
4418: END IF;
4419: END IF;
4420:
4421: --b) only in ASSIGN-TRIP cases we need to check for internal locs
4461: IF l_physical_stop_id IS NOT NULL THEN
4462: --if we find a stop with same physical location in the
4463: --trip, we use that for pickup
4464: IF l_debug_on THEN
4465: WSH_DEBUG_SV.log(l_module_name,'Caller is FTE/TP using pickup stop l_physical_stop_id',l_physical_stop_id);
4466: END IF;
4467: x_pickup_stop_id:=l_physical_stop_id;
4468: ELSE --l_physical_stop_id IS NULL
4469: --make pickup loc = l_phys_trip_pickup_loc_id if there
4472: FETCH c_any_activity_exists INTO l_find_leg;
4473:
4474: IF c_any_activity_exists%NOTFOUND THEN
4475: IF l_debug_on THEN
4476: WSH_DEBUG_SV.logmsg(l_module_name,'Caller is FTE/TP changing pickup loc to be l_phys_trip_pickup_loc_id');
4477: END IF;
4478:
4479: UPDATE wsh_trip_stops
4480: SET stop_location_id= l_phys_trip_pickup_loc_id,
4488: ELSE
4489: --there is a leg associated with internal stop and user is trying to use this for pickup as well.
4490: --in this case we create new stop with l_phys_trip_pickup_loc_id
4491: IF l_debug_on THEN
4492: WSH_DEBUG_SV.logmsg(l_module_name,'Caller is FTE/TP changing pickup stop to create new pickup stop with l_phys_trip_pickup_loc_id');
4493: END IF;
4494: x_pickup_stop_id:=null;
4495: x_pickup_location_id:=l_phys_trip_pickup_loc_id;
4496: END IF;
4501:
4502: ELSE --p_pickup_stop_id is null
4503: --set l_pickup_location_id as the physical location so that this loc will be used to create stop
4504: IF l_debug_on THEN
4505: WSH_DEBUG_SV.logmsg(l_module_name,'Caller is FTE/TP create new pickup stop with l_phys_trip_pickup_loc_id');
4506: END IF;
4507: x_pickup_location_id:=l_phys_trip_pickup_loc_id;
4508: END IF;
4509:
4510: ELSE--caller is WSH
4511: x_return_status:=WSH_UTIL_CORE.G_RET_STS_ERROR;
4512: FND_MESSAGE.SET_NAME('WSH','WSH_CANNOT_USE_DUMMY_PICKUP');
4513: IF l_debug_on THEN
4514: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.get_location_description',WSH_DEBUG_SV.C_PROC_LEVEL);
4515: END IF;
4516: FND_MESSAGE.SET_TOKEN('STOP_NAME',SUBSTR(WSH_UTIL_CORE.get_location_description(l_phys_trip_pickup_loc_id, 'NEW UI CODE'),1,60));
4517: wsh_util_core.add_message(x_return_status,l_module_name);
4518: IF l_debug_on THEN
4515: END IF;
4516: FND_MESSAGE.SET_TOKEN('STOP_NAME',SUBSTR(WSH_UTIL_CORE.get_location_description(l_phys_trip_pickup_loc_id, 'NEW UI CODE'),1,60));
4517: wsh_util_core.add_message(x_return_status,l_module_name);
4518: IF l_debug_on THEN
4519: WSH_DEBUG_SV.pop(l_module_name);
4520: END IF;
4521: RETURN;
4522: END IF;
4523: END IF; --p_pickpu_stop_id is not null
4526: --2. Process the deliveries
4527: FOR i IN 1..p_del_rows.count LOOP
4528:
4529: IF l_debug_on THEN
4530: wsh_debug_sv.log(l_module_name, 'p_del_rows(i)', p_del_rows(i));
4531: END IF;
4532:
4533: l_pickup_location_id := NULL;
4534: l_dropoff_location_id := NULL;
4540: CLOSE delivery_info;
4541:
4542: --
4543: IF l_debug_on THEN
4544: wsh_debug_sv.log(l_module_name, 'l_pickup_location_id', l_pickup_location_id);
4545: wsh_debug_sv.log(l_module_name, 'l_dropoff_location_id', l_dropoff_location_id);
4546: END IF;
4547:
4548:
4541:
4542: --
4543: IF l_debug_on THEN
4544: wsh_debug_sv.log(l_module_name, 'l_pickup_location_id', l_pickup_location_id);
4545: wsh_debug_sv.log(l_module_name, 'l_dropoff_location_id', l_dropoff_location_id);
4546: END IF;
4547:
4548:
4549: --Check if del's pickup and dropoff are same location
4579: --we do not need to repeat the steps again for later deliveries
4580:
4581: IF l_phys_del_dropoff_loc_id IS NOT NULL AND l_phys_del_dropoff_loc_id=l_trip_dropoff_loc_id THEN
4582: IF l_debug_on THEN
4583: WSH_DEBUG_SV.log(l_module_name,'l_phys_del_dropoff_loc_id',l_phys_del_dropoff_loc_id);
4584: END IF;
4585: l_find_stop:=null;
4586: l_internal_del_id_count:=l_internal_del_id_count+1;
4587: l_internal_del_ids(l_internal_del_id_count):=p_del_rows(i);
4614:
4615: --see if you can find stop with del's dropoff loc
4616: IF l_find_stop IS NOT NULL THEN
4617: IF l_debug_on THEN
4618: WSH_DEBUG_SV.log(l_module_name,'existing stop used as dropoff',l_find_stop);
4619: END IF;
4620: x_dropoff_stop_id:=l_find_stop;
4621: --set the l_trip_dropoff_loc_id to point to the new value
4622: x_dropoff_location_id:=l_dropoff_location_id;
4641: END IF;
4642:
4643: IF NOT(b_checkstopupdate) THEN
4644: IF l_debug_on THEN
4645: WSH_DEBUG_SV.log(l_module_name,'Have to create new internal stop as del with physical dropoff has been passed',l_dropoff_location_id);
4646: END IF;
4647:
4648: IF WSH_TRIPS_ACTIONS.GET_STOP_SEQ_MODE = WSH_INTERFACE_GRP.G_STOP_SEQ_MODE_SSN THEN
4649: x_dropoff_seq_num := derive_next_ssn(p_trip_id, x_dropoff_stop_id);
4647:
4648: IF WSH_TRIPS_ACTIONS.GET_STOP_SEQ_MODE = WSH_INTERFACE_GRP.G_STOP_SEQ_MODE_SSN THEN
4649: x_dropoff_seq_num := derive_next_ssn(p_trip_id, x_dropoff_stop_id);
4650: IF l_debug_on THEN
4651: WSH_DEBUG_SV.log(l_module_name,'x_dropoff_seq_num adjusted', x_dropoff_seq_num);
4652: END IF;
4653: END IF; -- SSN mode
4654:
4655: x_dropoff_stop_id:=null;
4655: x_dropoff_stop_id:=null;
4656: x_dropoff_location_id:=l_dropoff_location_id;
4657: ELSE
4658: IF l_debug_on THEN
4659: WSH_DEBUG_SV.log(l_module_name,'changing stop location to internal location l_dropoff_location_id',l_dropoff_location_id);
4660: END IF;
4661:
4662: UPDATE wsh_trip_stops
4663: SET stop_location_id= l_dropoff_location_id,
4670: x_dropoff_location_id:=l_dropoff_location_id;
4671: END IF;
4672: ELSE
4673: IF l_debug_on THEN
4674: WSH_DEBUG_SV.log(l_module_name,'Have to create new internal stop as existing physical stop has activities',l_dropoff_location_id);
4675: END IF;
4676:
4677: IF WSH_TRIPS_ACTIONS.GET_STOP_SEQ_MODE = WSH_INTERFACE_GRP.G_STOP_SEQ_MODE_SSN THEN
4678: x_dropoff_seq_num := derive_next_ssn(p_trip_id, x_dropoff_stop_id);
4676:
4677: IF WSH_TRIPS_ACTIONS.GET_STOP_SEQ_MODE = WSH_INTERFACE_GRP.G_STOP_SEQ_MODE_SSN THEN
4678: x_dropoff_seq_num := derive_next_ssn(p_trip_id, x_dropoff_stop_id);
4679: IF l_debug_on THEN
4680: WSH_DEBUG_SV.log(l_module_name,'x_dropoff_seq_num adjusted', x_dropoff_seq_num);
4681: END IF;
4682: END IF;
4683:
4684: x_dropoff_stop_id:=null;
4701: END IF;--p_dropoff_stop_id is not null
4702: END LOOP;
4703:
4704: IF l_debug_on THEN
4705: WSH_DEBUG_SV.log(l_module_name, 'x_del_ids count', l_del_id_count);
4706: WSH_DEBUG_SV.log(l_module_name, 'x_internal_del_ids count', l_internal_del_id_count);
4707: END IF;
4708:
4709: x_internal_del_ids:=l_internal_del_ids;
4702: END LOOP;
4703:
4704: IF l_debug_on THEN
4705: WSH_DEBUG_SV.log(l_module_name, 'x_del_ids count', l_del_id_count);
4706: WSH_DEBUG_SV.log(l_module_name, 'x_internal_del_ids count', l_internal_del_id_count);
4707: END IF;
4708:
4709: x_internal_del_ids:=l_internal_del_ids;
4710: x_del_ids:=l_del_ids;
4711:
4712: --
4713: --
4714: IF l_debug_on THEN
4715: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4716: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_stop_id', x_pickup_stop_id);
4717: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_location_id', x_pickup_location_id);
4718: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_stop_id', x_dropoff_stop_id);
4719: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_location_id', x_dropoff_location_id);
4712: --
4713: --
4714: IF l_debug_on THEN
4715: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4716: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_stop_id', x_pickup_stop_id);
4717: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_location_id', x_pickup_location_id);
4718: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_stop_id', x_dropoff_stop_id);
4719: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_location_id', x_dropoff_location_id);
4720: WSH_DEBUG_SV.pop(l_module_name);
4713: --
4714: IF l_debug_on THEN
4715: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4716: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_stop_id', x_pickup_stop_id);
4717: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_location_id', x_pickup_location_id);
4718: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_stop_id', x_dropoff_stop_id);
4719: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_location_id', x_dropoff_location_id);
4720: WSH_DEBUG_SV.pop(l_module_name);
4721: END IF;
4714: IF l_debug_on THEN
4715: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4716: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_stop_id', x_pickup_stop_id);
4717: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_location_id', x_pickup_location_id);
4718: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_stop_id', x_dropoff_stop_id);
4719: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_location_id', x_dropoff_location_id);
4720: WSH_DEBUG_SV.pop(l_module_name);
4721: END IF;
4722:
4715: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4716: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_stop_id', x_pickup_stop_id);
4717: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_location_id', x_pickup_location_id);
4718: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_stop_id', x_dropoff_stop_id);
4719: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_location_id', x_dropoff_location_id);
4720: WSH_DEBUG_SV.pop(l_module_name);
4721: END IF;
4722:
4723: EXCEPTION
4716: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_stop_id', x_pickup_stop_id);
4717: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_location_id', x_pickup_location_id);
4718: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_stop_id', x_dropoff_stop_id);
4719: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_location_id', x_dropoff_location_id);
4720: WSH_DEBUG_SV.pop(l_module_name);
4721: END IF;
4722:
4723: EXCEPTION
4724: WHEN bad_trip_stop THEN
4731: --
4732: -- Debug Statements
4733: --
4734: IF l_debug_on THEN
4735: WSH_DEBUG_SV.logmsg(l_module_name,'BAD_TRIP_STOP exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4736: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:BAD_TRIP_STOP');
4737: END IF;
4738: --
4739: WHEN OTHERS THEN
4732: -- Debug Statements
4733: --
4734: IF l_debug_on THEN
4735: WSH_DEBUG_SV.logmsg(l_module_name,'BAD_TRIP_STOP exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4736: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:BAD_TRIP_STOP');
4737: END IF;
4738: --
4739: WHEN OTHERS THEN
4740: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4742: 'WSH_TRIPS_ACTIONS.process_dels_for_internal_locs',
4743: l_module_name);
4744:
4745: IF l_debug_on THEN
4746: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4747: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4748: END IF;
4749:
4750: END process_dels_for_internal_locs;
4743: l_module_name);
4744:
4745: IF l_debug_on THEN
4746: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4747: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4748: END IF;
4749:
4750: END process_dels_for_internal_locs;
4751:
4832: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4833: --
4834: IF l_debug_on IS NULL
4835: THEN
4836: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4837: END IF;
4838: --
4839: l_stop_seq_mode := WSH_TRIPS_ACTIONS.GET_STOP_SEQ_MODE;
4840:
4838: --
4839: l_stop_seq_mode := WSH_TRIPS_ACTIONS.GET_STOP_SEQ_MODE;
4840:
4841: IF l_debug_on THEN
4842: WSH_DEBUG_SV.push(l_module_name);
4843: --
4844: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4845: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4846: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_SEQ',P_PICKUP_STOP_SEQ);
4840:
4841: IF l_debug_on THEN
4842: WSH_DEBUG_SV.push(l_module_name);
4843: --
4844: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4845: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4846: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_SEQ',P_PICKUP_STOP_SEQ);
4847: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4848: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_SEQ',P_DROPOFF_STOP_SEQ);
4841: IF l_debug_on THEN
4842: WSH_DEBUG_SV.push(l_module_name);
4843: --
4844: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4845: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4846: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_SEQ',P_PICKUP_STOP_SEQ);
4847: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4848: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_SEQ',P_DROPOFF_STOP_SEQ);
4849: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4842: WSH_DEBUG_SV.push(l_module_name);
4843: --
4844: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4845: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4846: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_SEQ',P_PICKUP_STOP_SEQ);
4847: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4848: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_SEQ',P_DROPOFF_STOP_SEQ);
4849: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4850: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4843: --
4844: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4845: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4846: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_SEQ',P_PICKUP_STOP_SEQ);
4847: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4848: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_SEQ',P_DROPOFF_STOP_SEQ);
4849: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4850: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4851: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4844: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4845: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4846: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_SEQ',P_PICKUP_STOP_SEQ);
4847: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4848: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_SEQ',P_DROPOFF_STOP_SEQ);
4849: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4850: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4851: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4852: -- Pack J csun Stop Sequence Change
4845: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4846: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_SEQ',P_PICKUP_STOP_SEQ);
4847: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4848: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_SEQ',P_DROPOFF_STOP_SEQ);
4849: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4850: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4851: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4852: -- Pack J csun Stop Sequence Change
4853: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4846: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_SEQ',P_PICKUP_STOP_SEQ);
4847: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4848: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_SEQ',P_DROPOFF_STOP_SEQ);
4849: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4850: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4851: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4852: -- Pack J csun Stop Sequence Change
4853: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4854: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4847: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4848: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_SEQ',P_DROPOFF_STOP_SEQ);
4849: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4850: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4851: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4852: -- Pack J csun Stop Sequence Change
4853: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4854: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4855: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4849: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4850: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4851: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4852: -- Pack J csun Stop Sequence Change
4853: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4854: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4855: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4856: WSH_DEBUG_SV.log(l_module_name,'STOP SEQUENCE MODE',l_stop_seq_mode);
4857:
4850: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4851: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4852: -- Pack J csun Stop Sequence Change
4853: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4854: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4855: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4856: WSH_DEBUG_SV.log(l_module_name,'STOP SEQUENCE MODE',l_stop_seq_mode);
4857:
4858: END IF;
4851: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4852: -- Pack J csun Stop Sequence Change
4853: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4854: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4855: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4856: WSH_DEBUG_SV.log(l_module_name,'STOP SEQUENCE MODE',l_stop_seq_mode);
4857:
4858: END IF;
4859: --
4852: -- Pack J csun Stop Sequence Change
4853: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4854: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4855: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4856: WSH_DEBUG_SV.log(l_module_name,'STOP SEQUENCE MODE',l_stop_seq_mode);
4857:
4858: END IF;
4859: --
4860: IF (p_del_rows.count = 0) THEN
4891: --
4892: -- Debug Statements
4893: --
4894: IF l_debug_on THEN
4895: WSH_DEBUG_SV.pop(l_module_name);
4896: END IF;
4897: --
4898: RETURN;
4899: END IF;
4920: --
4921: -- Debug Statements
4922: --
4923: IF l_debug_on THEN
4924: WSH_DEBUG_SV.pop(l_module_name);
4925: END IF;
4926: --
4927: RETURN;
4928: END IF;
4940: x_del_old_carrier_ids => l_del_old_carrier_ids,
4941: x_return_status => l_wf_rs);
4942: */
4943: IF l_debug_on THEN
4944: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit process_dels_for_internal_locs',WSH_DEBUG_SV.C_PROC_LEVEL);
4945: END IF;
4946: process_dels_for_internal_locs(
4947: p_del_rows => p_del_rows,
4948: p_trip_id => p_trip_id,
4961: x_internal_del_ids => l_internal_del_ids);
4962:
4963: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
4964: IF l_debug_on THEN
4965: WSH_DEBUG_SV.log(l_module_name,'process_dels_for_internal_locs return_status',x_return_status);
4966: WSH_DEBUG_SV.pop(l_module_name);
4967: END IF;
4968: RETURN;
4969: END IF;
4962:
4963: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
4964: IF l_debug_on THEN
4965: WSH_DEBUG_SV.log(l_module_name,'process_dels_for_internal_locs return_status',x_return_status);
4966: WSH_DEBUG_SV.pop(l_module_name);
4967: END IF;
4968: RETURN;
4969: END IF;
4970:
4979: -- end of SSN Change, add conditional check
4980:
4981: IF l_internal_del_ids IS NOT NULL and l_internal_del_ids.count>0 THEN
4982: IF l_debug_on THEN
4983: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.ASSIGN_DELIVERIES for internal deliveries',WSH_DEBUG_SV.C_PROC_LEVEL);
4984: END IF;
4985: wsh_delivery_legs_actions.assign_deliveries(
4986: p_del_rows => l_internal_del_ids,
4987: p_trip_id => p_trip_id,
5000: p_dropoff_arr_date => p_dropoff_arr_date,
5001: p_dropoff_dep_date => p_dropoff_dep_date);
5002:
5003: IF l_debug_on THEN
5004: WSH_DEBUG_SV.log(l_module_name,'wsh_delivery_legs_actions.assign_deliveries return_status',l_return_status);
5005: END IF;
5006:
5007: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5008: x_return_status := l_return_status;
5006:
5007: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5008: x_return_status := l_return_status;
5009: IF l_debug_on THEN
5010: WSH_DEBUG_SV.pop(l_module_name);
5011: END IF;
5012: RETURN;
5013: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5014: x_return_status := l_return_status;
5017:
5018:
5019: IF l_del_ids IS NOT NULL and l_del_ids.count>0 THEN
5020: IF l_debug_on THEN
5021: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.ASSIGN_DELIVERIES for regular deliveries',WSH_DEBUG_SV.C_PROC_LEVEL);
5022: END IF;
5023: wsh_delivery_legs_actions.assign_deliveries(
5024: p_del_rows => l_del_ids,
5025: p_trip_id => p_trip_id,
5038: p_dropoff_arr_date => p_dropoff_arr_date,
5039: p_dropoff_dep_date => p_dropoff_dep_date);
5040:
5041: IF l_debug_on THEN
5042: WSH_DEBUG_SV.log(l_module_name,'wsh_delivery_legs_actions.assign_deliveries return_status',l_return_status);
5043: END IF;
5044:
5045: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5046: x_return_status := l_return_status;
5044:
5045: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5046: x_return_status := l_return_status;
5047: IF l_debug_on THEN
5048: WSH_DEBUG_SV.pop(l_module_name);
5049: END IF;
5050: RETURN;
5051: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5052: x_return_status := l_return_status;
5067: p_stop_details_rec => l_stop_details_rec,
5068: x_return_status => l_return_status );
5069:
5070: IF l_debug_on THEN
5071: WSH_DEBUG_SV.log(l_module_name,'return status from WSH_TRIP_STOPS_ACTIONS.RESET_STOP_SEQ_NUMBERS',l_return_status);
5072: END IF;
5073:
5074: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5075: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5079: --
5080: -- Debug Statements
5081: --
5082: IF l_debug_on THEN
5083: WSH_DEBUG_SV.pop(l_module_name);
5084: END IF;
5085: --
5086: RETURN;
5087: END IF;
5097: p_caller => p_caller
5098: );
5099:
5100: IF l_debug_on THEN
5101: wsh_debug_sv.log(l_module_name,'Return Status From WSH_TRIP_STOPS_VALIDATIONS.Validate_Stop_Dates for trip '||p_trip_id ,l_return_status);
5102: END IF;
5103:
5104: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5105: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5109: --
5110: -- Debug Statements
5111: --
5112: IF l_debug_on THEN
5113: WSH_DEBUG_SV.pop(l_module_name);
5114: END IF;
5115: --
5116: RETURN;
5117: END IF;
5134: --
5135: -- Debug Statements
5136: --
5137: IF l_debug_on THEN
5138: WSH_DEBUG_SV.pop(l_module_name);
5139: END IF;
5140: --
5141: EXCEPTION
5142: WHEN stop_not_found THEN
5146: --
5147: -- Debug Statements
5148: --
5149: IF l_debug_on THEN
5150: WSH_DEBUG_SV.logmsg(l_module_name,'STOP_NOT_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5151: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:STOP_NOT_FOUND');
5152: END IF;
5153: --
5154: WHEN others THEN
5147: -- Debug Statements
5148: --
5149: IF l_debug_on THEN
5150: WSH_DEBUG_SV.logmsg(l_module_name,'STOP_NOT_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5151: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:STOP_NOT_FOUND');
5152: END IF;
5153: --
5154: WHEN others THEN
5155: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.ASSIGN_TRIP');
5158: --
5159: -- Debug Statements
5160: --
5161: IF l_debug_on THEN
5162: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5163: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5164: END IF;
5165: --
5166: END assign_trip;
5159: -- Debug Statements
5160: --
5161: IF l_debug_on THEN
5162: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5163: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5164: END IF;
5165: --
5166: END assign_trip;
5167:
5250: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5251: --
5252: IF l_debug_on IS NULL
5253: THEN
5254: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5255: END IF;
5256: --
5257: IF l_debug_on THEN
5258: WSH_DEBUG_SV.push(l_module_name);
5254: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5255: END IF;
5256: --
5257: IF l_debug_on THEN
5258: WSH_DEBUG_SV.push(l_module_name);
5259: --
5260: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
5261: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
5262: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
5256: --
5257: IF l_debug_on THEN
5258: WSH_DEBUG_SV.push(l_module_name);
5259: --
5260: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
5261: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
5262: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
5263: END IF;
5264: --
5257: IF l_debug_on THEN
5258: WSH_DEBUG_SV.push(l_module_name);
5259: --
5260: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
5261: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
5262: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
5263: END IF;
5264: --
5265: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5258: WSH_DEBUG_SV.push(l_module_name);
5259: --
5260: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
5261: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
5262: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
5263: END IF;
5264: --
5265: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5266:
5266:
5267: -- Return if stop is null or if W/V is null
5268: IF p_stop_id is NULL OR (p_gross_weight is NULL AND p_volume is NULL) THEN
5269: IF l_debug_on THEN
5270: WSH_DEBUG_SV.pop(l_module_name);
5271: END IF;
5272: return;
5273: END IF;
5274:
5276: OPEN c_get_stop_trip(p_stop_id);
5277: FETCH c_get_stop_trip INTO l_trip_id, l_stop_wt_uom, l_stop_vol_uom;
5278: IF c_get_stop_trip%NOTFOUND THEN
5279: IF l_debug_on THEN
5280: WSH_DEBUG_SV.logmsg(l_module_name,'Stop '||p_stop_id||' not found');
5281: WSH_DEBUG_SV.pop(l_module_name);
5282: END IF;
5283: CLOSE c_get_stop_trip;
5284: return;
5277: FETCH c_get_stop_trip INTO l_trip_id, l_stop_wt_uom, l_stop_vol_uom;
5278: IF c_get_stop_trip%NOTFOUND THEN
5279: IF l_debug_on THEN
5280: WSH_DEBUG_SV.logmsg(l_module_name,'Stop '||p_stop_id||' not found');
5281: WSH_DEBUG_SV.pop(l_module_name);
5282: END IF;
5283: CLOSE c_get_stop_trip;
5284: return;
5285: END IF;
5322: CLOSE org_info;
5323: END IF;
5324:
5325: IF l_debug_on THEN
5326: WSH_DEBUG_SV.logmsg(l_module_name,'l_vehicle_item_id '||l_vehicle_item_id||' l_vehicle_org_id '||l_vehicle_org_id||' l_fill_basis '||l_fill_basis);
5327: WSH_DEBUG_SV.logmsg(l_module_name,'l_trip_max_weight '||l_trip_max_weight||' l_trip_weight_uom '||l_trip_weight_uom||' l_trip_max_volume '||l_trip_max_volume||' l_trip_volume_uom '||l_trip_volume_uom);
5328: END IF;
5329:
5330:
5323: END IF;
5324:
5325: IF l_debug_on THEN
5326: WSH_DEBUG_SV.logmsg(l_module_name,'l_vehicle_item_id '||l_vehicle_item_id||' l_vehicle_org_id '||l_vehicle_org_id||' l_fill_basis '||l_fill_basis);
5327: WSH_DEBUG_SV.logmsg(l_module_name,'l_trip_max_weight '||l_trip_max_weight||' l_trip_weight_uom '||l_trip_weight_uom||' l_trip_max_volume '||l_trip_max_volume||' l_trip_volume_uom '||l_trip_volume_uom);
5328: END IF;
5329:
5330:
5331: -- Calculate the fill%
5332: IF (l_vehicle_item_id IS NOT NULL) AND (l_vehicle_org_id IS NOT NULL) THEN
5333:
5334: IF (l_fill_basis = 'W') AND (l_trip_max_weight IS NOT NULL) AND (l_trip_weight_uom IS NOT NULL) THEN
5335: IF l_debug_on THEN
5336: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5337: END IF;
5338: --
5339: l_wt_vol_tmp := wsh_wv_utils.convert_uom(l_trip_weight_uom, l_stop_wt_uom, l_trip_max_weight);
5340: IF (l_wt_vol_tmp > 0) THEN
5342: END IF;
5343: ELSIF (l_fill_basis = 'V') AND (l_trip_max_volume IS NOT NULL) AND (l_trip_volume_uom IS NOT NULL) THEN
5344:
5345: IF l_debug_on THEN
5346: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5347: END IF;
5348: --
5349: l_wt_vol_tmp := wsh_wv_utils.convert_uom(l_trip_volume_uom, l_stop_vol_uom, l_trip_max_volume);
5350: IF (l_wt_vol_tmp > 0) THEN
5356:
5357: END IF;
5358:
5359: IF l_debug_on THEN
5360: WSH_DEBUG_SV.logmsg(l_module_name,'x_stop_fill_percent '||x_stop_fill_percent||' x_return_status '||x_return_status);
5361: WSH_DEBUG_SV.pop(l_module_name);
5362: END IF;
5363:
5364: EXCEPTION
5357: END IF;
5358:
5359: IF l_debug_on THEN
5360: WSH_DEBUG_SV.logmsg(l_module_name,'x_stop_fill_percent '||x_stop_fill_percent||' x_return_status '||x_return_status);
5361: WSH_DEBUG_SV.pop(l_module_name);
5362: END IF;
5363:
5364: EXCEPTION
5365: WHEN others THEN
5378: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.CALC_STOP_FILL_PERCENT');
5379: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5380:
5381: IF l_debug_on THEN
5382: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5383: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5384: END IF;
5385:
5386: END calc_stop_fill_percent;
5379: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5380:
5381: IF l_debug_on THEN
5382: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5383: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5384: END IF;
5385:
5386: END calc_stop_fill_percent;
5387:
5568: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5569: --
5570: IF l_debug_on IS NULL
5571: THEN
5572: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5573: END IF;
5574: --
5575: IF l_debug_on THEN
5576: WSH_DEBUG_SV.push(l_module_name);
5572: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5573: END IF;
5574: --
5575: IF l_debug_on THEN
5576: WSH_DEBUG_SV.push(l_module_name);
5577: --
5578: WSH_DEBUG_SV.log(l_module_name,'P_OVERRIDE_FLAG',P_OVERRIDE_FLAG);
5579: WSH_DEBUG_SV.log(l_module_name,'P_CALC_WV_IF_FROZEN',P_CALC_WV_IF_FROZEN);
5580: WSH_DEBUG_SV.log(l_module_name,'P_START_DEPARTURE_DATE',P_START_DEPARTURE_DATE);
5574: --
5575: IF l_debug_on THEN
5576: WSH_DEBUG_SV.push(l_module_name);
5577: --
5578: WSH_DEBUG_SV.log(l_module_name,'P_OVERRIDE_FLAG',P_OVERRIDE_FLAG);
5579: WSH_DEBUG_SV.log(l_module_name,'P_CALC_WV_IF_FROZEN',P_CALC_WV_IF_FROZEN);
5580: WSH_DEBUG_SV.log(l_module_name,'P_START_DEPARTURE_DATE',P_START_DEPARTURE_DATE);
5581: WSH_DEBUG_SV.log(l_module_name,'P_CALC_DEL_WV',P_CALC_DEL_WV);
5582: WSH_DEBUG_SV.log(l_module_name,'P_SUPPRESS_ERRORS',P_SUPPRESS_ERRORS);
5575: IF l_debug_on THEN
5576: WSH_DEBUG_SV.push(l_module_name);
5577: --
5578: WSH_DEBUG_SV.log(l_module_name,'P_OVERRIDE_FLAG',P_OVERRIDE_FLAG);
5579: WSH_DEBUG_SV.log(l_module_name,'P_CALC_WV_IF_FROZEN',P_CALC_WV_IF_FROZEN);
5580: WSH_DEBUG_SV.log(l_module_name,'P_START_DEPARTURE_DATE',P_START_DEPARTURE_DATE);
5581: WSH_DEBUG_SV.log(l_module_name,'P_CALC_DEL_WV',P_CALC_DEL_WV);
5582: WSH_DEBUG_SV.log(l_module_name,'P_SUPPRESS_ERRORS',P_SUPPRESS_ERRORS);
5583: END IF;
5576: WSH_DEBUG_SV.push(l_module_name);
5577: --
5578: WSH_DEBUG_SV.log(l_module_name,'P_OVERRIDE_FLAG',P_OVERRIDE_FLAG);
5579: WSH_DEBUG_SV.log(l_module_name,'P_CALC_WV_IF_FROZEN',P_CALC_WV_IF_FROZEN);
5580: WSH_DEBUG_SV.log(l_module_name,'P_START_DEPARTURE_DATE',P_START_DEPARTURE_DATE);
5581: WSH_DEBUG_SV.log(l_module_name,'P_CALC_DEL_WV',P_CALC_DEL_WV);
5582: WSH_DEBUG_SV.log(l_module_name,'P_SUPPRESS_ERRORS',P_SUPPRESS_ERRORS);
5583: END IF;
5584: --
5577: --
5578: WSH_DEBUG_SV.log(l_module_name,'P_OVERRIDE_FLAG',P_OVERRIDE_FLAG);
5579: WSH_DEBUG_SV.log(l_module_name,'P_CALC_WV_IF_FROZEN',P_CALC_WV_IF_FROZEN);
5580: WSH_DEBUG_SV.log(l_module_name,'P_START_DEPARTURE_DATE',P_START_DEPARTURE_DATE);
5581: WSH_DEBUG_SV.log(l_module_name,'P_CALC_DEL_WV',P_CALC_DEL_WV);
5582: WSH_DEBUG_SV.log(l_module_name,'P_SUPPRESS_ERRORS',P_SUPPRESS_ERRORS);
5583: END IF;
5584: --
5585: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5578: WSH_DEBUG_SV.log(l_module_name,'P_OVERRIDE_FLAG',P_OVERRIDE_FLAG);
5579: WSH_DEBUG_SV.log(l_module_name,'P_CALC_WV_IF_FROZEN',P_CALC_WV_IF_FROZEN);
5580: WSH_DEBUG_SV.log(l_module_name,'P_START_DEPARTURE_DATE',P_START_DEPARTURE_DATE);
5581: WSH_DEBUG_SV.log(l_module_name,'P_CALC_DEL_WV',P_CALC_DEL_WV);
5582: WSH_DEBUG_SV.log(l_module_name,'P_SUPPRESS_ERRORS',P_SUPPRESS_ERRORS);
5583: END IF;
5584: --
5585: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5586: IF (p_trip_rows.count = 0) THEN
5626: --
5627: -- Debug Statements
5628: --
5629: IF l_debug_on THEN
5630: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ORG_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5631: END IF;
5632: --
5633: FND_MESSAGE.SET_TOKEN('l_vehicle_org', WSH_UTIL_CORE.Get_Org_Name(l_vehicle_org_id));
5634: --End of Bug 2415809
5655: --
5656: -- Debug Statements
5657: --
5658: IF l_debug_on THEN
5659: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5660: END IF;
5661: --
5662: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_rows(i)));
5663: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5679: --
5680: -- Debug Statements
5681: --
5682: IF l_debug_on THEN
5683: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5684: END IF;
5685: --
5686: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_rows(i)));
5687: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5716: --
5717: -- Debug Statements
5718: --
5719: IF l_debug_on THEN
5720: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5721: END IF;
5722: --
5723: FND_MESSAGE.SET_TOKEN('stop_name',wsh_trip_stops_pvt.get_name(l_start_stop_id,p_caller));
5724: -- bug 2732503 , need a warning message only when FTE is installed
5736: --increment l_stop_num_warn for this stop loop so that for each trip, l_num_warn will get updated max by 1
5737: LOOP
5738:
5739: IF l_debug_on THEN
5740: WSH_DEBUG_SV.logmsg(l_module_name,'*** Processing Stop '||l_stop_id||' ***');
5741: END IF;
5742:
5743: l_total_pick_up_weight := 0;
5744: l_total_drop_off_weight := 0;
5755: l_prev_wt_uom := l_stop_wt_uom;
5756: l_prev_vol_uom := l_stop_vol_uom;
5757:
5758: IF l_debug_on THEN
5759: WSH_DEBUG_SV.logmsg(l_module_name,'Accumulated W/V after conversions are Gross '||l_total_gross_weight||' Net '||l_total_net_weight||' Vol '||l_total_volume);
5760: WSH_DEBUG_SV.logmsg(l_module_name,'WV Frozen '||l_wv_frozen_flag||'. Skipping the Stop W/V calculation.');
5761: END IF;
5762: --R12 MDC
5763: --Removing the goto statement because code needs to update the new pick_up/drop_off weight/volume columns even if frozen flag is Y
5756: l_prev_vol_uom := l_stop_vol_uom;
5757:
5758: IF l_debug_on THEN
5759: WSH_DEBUG_SV.logmsg(l_module_name,'Accumulated W/V after conversions are Gross '||l_total_gross_weight||' Net '||l_total_net_weight||' Vol '||l_total_volume);
5760: WSH_DEBUG_SV.logmsg(l_module_name,'WV Frozen '||l_wv_frozen_flag||'. Skipping the Stop W/V calculation.');
5761: END IF;
5762: --R12 MDC
5763: --Removing the goto statement because code needs to update the new pick_up/drop_off weight/volume columns even if frozen flag is Y
5764: -- Code has been added before the update statement to check the frozen flag
5785: --
5786: -- Debug Statements
5787: --
5788: IF l_debug_on THEN
5789: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5790: END IF;
5791: --
5792: FND_MESSAGE.SET_TOKEN('stop_name',wsh_trip_stops_pvt.get_name(l_stop_id,p_caller));
5793: -- bug 2732503 , need a warning message only when FTE is installed
5806: --
5807: -- Debug Statements
5808: --
5809: IF l_debug_on THEN
5810: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5811: END IF;
5812: --
5813: l_total_net_weight := wsh_wv_utils.convert_uom(l_prev_wt_uom, l_stop_wt_uom, l_total_net_weight);
5814: --
5814: --
5815: -- Debug Statements
5816: --
5817: IF l_debug_on THEN
5818: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5819: END IF;
5820: --
5821: l_total_gross_weight := wsh_wv_utils.convert_uom(l_prev_wt_uom, l_stop_wt_uom, l_total_gross_weight);
5822: --
5822: --
5823: -- Debug Statements
5824: --
5825: IF l_debug_on THEN
5826: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5827: END IF;
5828: --
5829: l_volume := wsh_wv_utils.convert_uom(l_prev_vol_uom, l_stop_vol_uom, l_total_volume);
5830:
5830:
5831: g_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5832:
5833: IF l_debug_on THEN
5834: WSH_DEBUG_SV.logmsg(l_module_name,'Processing Pickup Deliveries ...');
5835: END IF;
5836:
5837: FOR pkup_dl IN pickup_deliveries (l_stop_id) LOOP
5838:
5840: --
5841: -- Debug Statements
5842: --
5843: IF l_debug_on THEN
5844: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DELIVERY_WEIGHT_VOLUME',WSH_DEBUG_SV.C_PROC_LEVEL);
5845: END IF;
5846: --
5847: wsh_wv_utils.delivery_weight_volume(
5848: p_delivery_id => pkup_dl.d_id,
5859: --
5860: -- Debug Statements
5861: --
5862: IF l_debug_on THEN
5863: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5864: END IF;
5865: --
5866: FND_MESSAGE.SET_TOKEN('del_name',wsh_new_deliveries_pvt.get_name(pkup_dl.d_id));
5867: g_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5888: -- J: W/V Changes
5889: IF l_net_weight >= 0 THEN
5890: IF pkup_dl.wt_uom <> l_stop_wt_uom THEN
5891: IF l_debug_on THEN
5892: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5893: END IF;
5894: --
5895: IF l_net_weight > 0
5896: THEN
5905:
5906: IF l_gross_weight >= 0 THEN
5907: IF pkup_dl.wt_uom <> l_stop_wt_uom THEN
5908: IF l_debug_on THEN
5909: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5910: END IF;
5911: --
5912: IF l_gross_weight > 0
5913: THEN
5928:
5929: IF l_volume >= 0 THEN
5930: IF pkup_dl.vol_uom <> l_stop_vol_uom THEN
5931: IF l_debug_on THEN
5932: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5933: END IF;
5934: --
5935: IF l_volume > 0
5936: THEN
5949: END IF;
5950: END IF;
5951:
5952: IF l_debug_on THEN
5953: WSH_DEBUG_SV.logmsg(l_module_name,'Accumulated W/V after conversions are Gross '||l_total_gross_weight||' Net '||l_total_net_weight||' Vol '||l_total_volume);
5954: END IF;
5955:
5956:
5957: END LOOP;
5961: l_stop_num_warn := l_stop_num_warn + 1;
5962: END IF;
5963:
5964: IF l_debug_on THEN
5965: WSH_DEBUG_SV.logmsg(l_module_name,'After Pickup LOOP, Gross '||l_total_gross_weight||' Net '||l_total_net_weight||' Vol '||l_total_volume);
5966: WSH_DEBUG_SV.logmsg(l_module_name,'Processing Dropoff Deliveries ...');
5967: END IF;
5968:
5969:
5962: END IF;
5963:
5964: IF l_debug_on THEN
5965: WSH_DEBUG_SV.logmsg(l_module_name,'After Pickup LOOP, Gross '||l_total_gross_weight||' Net '||l_total_net_weight||' Vol '||l_total_volume);
5966: WSH_DEBUG_SV.logmsg(l_module_name,'Processing Dropoff Deliveries ...');
5967: END IF;
5968:
5969:
5970: FOR dpoff_dl IN dropoff_deliveries (l_stop_id) LOOP
5974: -- J: W/V Changes
5975: IF pickup_del_tab(dpoff_dl.d_id).net_weight > 0 THEN
5976: IF pickup_del_tab(dpoff_dl.d_id).wt_uom <> l_stop_wt_uom THEN
5977: IF l_debug_on THEN
5978: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5979: END IF;
5980: --
5981: l_total_net_weight := l_total_net_weight - wsh_wv_utils.convert_uom(pickup_del_tab(dpoff_dl.d_id).wt_uom, l_stop_wt_uom , pickup_del_tab(dpoff_dl.d_id).net_weight);
5982: ELSE
5987:
5988: IF pickup_del_tab(dpoff_dl.d_id).gross_weight > 0 THEN
5989: IF pickup_del_tab(dpoff_dl.d_id).wt_uom <> l_stop_wt_uom THEN
5990: IF l_debug_on THEN
5991: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5992: END IF;
5993: --
5994: IF l_stop_id <> l_last_stop_id THEN
5995: l_total_gross_weight := l_total_gross_weight - wsh_wv_utils.convert_uom(pickup_del_tab(dpoff_dl.d_id).wt_uom, l_stop_wt_uom, pickup_del_tab(dpoff_dl.d_id).gross_weight);
6007:
6008: IF pickup_del_tab(dpoff_dl.d_id).volume > 0 THEN
6009: IF pickup_del_tab(dpoff_dl.d_id).vol_uom <> l_stop_vol_uom THEN
6010: IF l_debug_on THEN
6011: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
6012: END IF;
6013: --
6014: IF l_stop_id <> l_last_stop_id THEN
6015: l_total_volume := l_total_volume - wsh_wv_utils.convert_uom(pickup_del_tab(dpoff_dl.d_id).vol_uom, l_stop_vol_uom, pickup_del_tab(dpoff_dl.d_id).volume);
6025: END IF;
6026: END IF;
6027:
6028: IF l_debug_on THEN
6029: WSH_DEBUG_SV.logmsg(l_module_name,'Accumulated W/V after conversions are Gross '||l_total_gross_weight||' Net '||l_total_net_weight||' Vol '||l_total_volume);
6030: END IF;
6031:
6032: END IF;
6033: END IF;
6033: END IF;
6034: END LOOP;
6035:
6036: IF l_debug_on THEN
6037: WSH_DEBUG_SV.logmsg(l_module_name,'After Dropoff, LOOP, Gross '||l_total_gross_weight||' Net '||l_total_net_weight||' Vol '||l_total_volume);
6038: END IF;
6039:
6040: IF l_stop_id <> l_last_stop_id THEN
6041: -- Calculate fill_percent of stop
6045: --
6046: -- Debug Statements
6047: --
6048: IF l_debug_on THEN
6049: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
6050: END IF;
6051: --
6052: l_wt_vol_tmp := wsh_wv_utils.convert_uom(l_trip_weight_uom, l_stop_wt_uom, l_trip_max_weight);
6053: IF (l_wt_vol_tmp > 0) THEN
6058: --
6059: -- Debug Statements
6060: --
6061: IF l_debug_on THEN
6062: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
6063: END IF;
6064: --
6065: l_wt_vol_tmp := wsh_wv_utils.convert_uom(l_trip_volume_uom, l_stop_vol_uom, l_trip_max_volume);
6066: IF (l_wt_vol_tmp > 0) THEN
6075: --
6076: -- Debug Statements
6077: --
6078: IF l_debug_on THEN
6079: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6080: END IF;
6081: --
6082: FND_MESSAGE.SET_TOKEN('STOP_NAME',wsh_trip_stops_pvt.get_name(l_stop_id,p_caller));
6083: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6089: ELSE
6090: -- as this is the last stop for the trip, weight/volume/fill percent are 0
6091: -- pickup w/v also 0.
6092: IF l_debug_on THEN
6093: WSH_DEBUG_SV.logmsg(l_module_name,'For last stop, assigning weight/volume/fill percent as zero ',WSH_DEBUG_SV.C_PROC_LEVEL); END IF;
6094: --
6095: l_total_net_weight := 0;
6096: l_total_gross_weight := 0;
6097: l_total_volume := 0;
6109:
6110: /* H integration - J: W/V Changes */
6111: IF WSH_UTIL_CORE.FTE_IS_INSTALLED = 'Y' AND p_override_flag = 'Y' THEN
6112: IF l_debug_on THEN
6113: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6114: END IF;
6115: Fte_Load_Tender(
6116: p_stop_id => l_stop_id,
6117: p_gross_weight => l_total_gross_weight,
6125: l_stop_num_warn := l_stop_num_warn + 1;
6126: ELSE
6127: x_return_status := l_return_status;
6128: IF l_debug_on THEN
6129: WSH_DEBUG_SV.pop(l_module_name);
6130: END IF;
6131: --
6132: RETURN;
6133: END IF;
6144: --R12 MDC
6145: --UPDATE new columns pickup/dropoff weight/volume first
6146:
6147: IF l_debug_on THEN
6148: WSH_DEBUG_SV.log(l_module_name,'l_total_pick_up_weight', l_total_pick_up_weight);
6149: WSH_DEBUG_SV.log(l_module_name,'l_total_drop_off_weight', l_total_drop_off_weight);
6150: WSH_DEBUG_SV.log(l_module_name,'l_total_pick_up_volume', l_total_pick_up_volume);
6151: WSH_DEBUG_SV.log(l_module_name,'l_total_drop_off_volume', l_total_drop_off_volume);
6152: END IF;
6145: --UPDATE new columns pickup/dropoff weight/volume first
6146:
6147: IF l_debug_on THEN
6148: WSH_DEBUG_SV.log(l_module_name,'l_total_pick_up_weight', l_total_pick_up_weight);
6149: WSH_DEBUG_SV.log(l_module_name,'l_total_drop_off_weight', l_total_drop_off_weight);
6150: WSH_DEBUG_SV.log(l_module_name,'l_total_pick_up_volume', l_total_pick_up_volume);
6151: WSH_DEBUG_SV.log(l_module_name,'l_total_drop_off_volume', l_total_drop_off_volume);
6152: END IF;
6153:
6146:
6147: IF l_debug_on THEN
6148: WSH_DEBUG_SV.log(l_module_name,'l_total_pick_up_weight', l_total_pick_up_weight);
6149: WSH_DEBUG_SV.log(l_module_name,'l_total_drop_off_weight', l_total_drop_off_weight);
6150: WSH_DEBUG_SV.log(l_module_name,'l_total_pick_up_volume', l_total_pick_up_volume);
6151: WSH_DEBUG_SV.log(l_module_name,'l_total_drop_off_volume', l_total_drop_off_volume);
6152: END IF;
6153:
6154:
6147: IF l_debug_on THEN
6148: WSH_DEBUG_SV.log(l_module_name,'l_total_pick_up_weight', l_total_pick_up_weight);
6149: WSH_DEBUG_SV.log(l_module_name,'l_total_drop_off_weight', l_total_drop_off_weight);
6150: WSH_DEBUG_SV.log(l_module_name,'l_total_pick_up_volume', l_total_pick_up_volume);
6151: WSH_DEBUG_SV.log(l_module_name,'l_total_drop_off_volume', l_total_drop_off_volume);
6152: END IF;
6153:
6154:
6155: UPDATE wsh_trip_stops
6229: --
6230: -- Debug Statements
6231: --
6232: IF l_debug_on THEN
6233: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6234: END IF;
6235: --
6236: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_rows(i)));
6237: wsh_util_core.add_message(x_return_status);
6254: END LOOP;
6255: /*********TRIP LOOP END*********/
6256:
6257: IF l_debug_on THEN
6258: WSH_DEBUG_SV.log(l_module_name,'RET STATUS-'||x_return_status);
6259: WSH_DEBUG_SV.log(l_module_name,'NUM WARN-'||l_num_warn);
6260: WSH_DEBUG_SV.log(l_module_name,'NUM ERR-'||l_num_error);
6261: WSH_DEBUG_SV.log(l_module_name,'TRIP ROW COUNT-'||p_trip_rows.count);
6262: END IF;
6255: /*********TRIP LOOP END*********/
6256:
6257: IF l_debug_on THEN
6258: WSH_DEBUG_SV.log(l_module_name,'RET STATUS-'||x_return_status);
6259: WSH_DEBUG_SV.log(l_module_name,'NUM WARN-'||l_num_warn);
6260: WSH_DEBUG_SV.log(l_module_name,'NUM ERR-'||l_num_error);
6261: WSH_DEBUG_SV.log(l_module_name,'TRIP ROW COUNT-'||p_trip_rows.count);
6262: END IF;
6263: IF (l_num_error > 0) OR (l_num_warn > 0) THEN
6256:
6257: IF l_debug_on THEN
6258: WSH_DEBUG_SV.log(l_module_name,'RET STATUS-'||x_return_status);
6259: WSH_DEBUG_SV.log(l_module_name,'NUM WARN-'||l_num_warn);
6260: WSH_DEBUG_SV.log(l_module_name,'NUM ERR-'||l_num_error);
6261: WSH_DEBUG_SV.log(l_module_name,'TRIP ROW COUNT-'||p_trip_rows.count);
6262: END IF;
6263: IF (l_num_error > 0) OR (l_num_warn > 0) THEN
6264: -- Bug 3688384 Display separate message for one trip .
6257: IF l_debug_on THEN
6258: WSH_DEBUG_SV.log(l_module_name,'RET STATUS-'||x_return_status);
6259: WSH_DEBUG_SV.log(l_module_name,'NUM WARN-'||l_num_warn);
6260: WSH_DEBUG_SV.log(l_module_name,'NUM ERR-'||l_num_error);
6261: WSH_DEBUG_SV.log(l_module_name,'TRIP ROW COUNT-'||p_trip_rows.count);
6262: END IF;
6263: IF (l_num_error > 0) OR (l_num_warn > 0) THEN
6264: -- Bug 3688384 Display separate message for one trip .
6265: IF (p_trip_rows.count = 1) and (l_num_error = 0) and (l_num_warn > 0) THEN
6287: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6288: END IF;
6289:
6290: IF l_debug_on THEN
6291: WSH_DEBUG_SV.log(l_module_name,'RET STATUS-'||x_return_status);
6292: WSH_DEBUG_SV.log(l_module_name,'NUM WARN-'||l_num_warn);
6293: WSH_DEBUG_SV.log(l_module_name,'NUM ERR-'||l_num_error);
6294: END IF;
6295: --
6288: END IF;
6289:
6290: IF l_debug_on THEN
6291: WSH_DEBUG_SV.log(l_module_name,'RET STATUS-'||x_return_status);
6292: WSH_DEBUG_SV.log(l_module_name,'NUM WARN-'||l_num_warn);
6293: WSH_DEBUG_SV.log(l_module_name,'NUM ERR-'||l_num_error);
6294: END IF;
6295: --
6296: -- Debug Statements
6289:
6290: IF l_debug_on THEN
6291: WSH_DEBUG_SV.log(l_module_name,'RET STATUS-'||x_return_status);
6292: WSH_DEBUG_SV.log(l_module_name,'NUM WARN-'||l_num_warn);
6293: WSH_DEBUG_SV.log(l_module_name,'NUM ERR-'||l_num_error);
6294: END IF;
6295: --
6296: -- Debug Statements
6297: --
6295: --
6296: -- Debug Statements
6297: --
6298: IF l_debug_on THEN
6299: WSH_DEBUG_SV.pop(l_module_name);
6300: END IF;
6301: --
6302: EXCEPTION
6303: WHEN others THEN
6310: --
6311: -- Debug Statements
6312: --
6313: IF l_debug_on THEN
6314: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6315: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6316: END IF;
6317: --
6318: END trip_weight_volume;
6311: -- Debug Statements
6312: --
6313: IF l_debug_on THEN
6314: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6315: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6316: END IF;
6317: --
6318: END trip_weight_volume;
6319:
6351: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6352: --
6353: IF l_debug_on IS NULL
6354: THEN
6355: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6356: END IF;
6357: --
6358: IF l_debug_on THEN
6359: WSH_DEBUG_SV.push(l_module_name);
6355: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6356: END IF;
6357: --
6358: IF l_debug_on THEN
6359: WSH_DEBUG_SV.push(l_module_name);
6360: --
6361: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
6362: END IF;
6363: --
6357: --
6358: IF l_debug_on THEN
6359: WSH_DEBUG_SV.push(l_module_name);
6360: --
6361: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
6362: END IF;
6363: --
6364: FOR s IN stops LOOP
6365:
6393: --
6394: -- Debug Statements
6395: --
6396: IF l_debug_on THEN
6397: WSH_DEBUG_SV.pop(l_module_name);
6398: END IF;
6399: --
6400: EXCEPTION
6401: WHEN invalid_sequence THEN
6403: --
6404: -- Debug Statements
6405: --
6406: IF l_debug_on THEN
6407: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6408: END IF;
6409: --
6410: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
6411: wsh_util_core.add_message(x_return_status);
6412: --
6413: -- Debug Statements
6414: --
6415: IF l_debug_on THEN
6416: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_SEQUENCE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6417: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_SEQUENCE');
6418: END IF;
6419: --
6420: WHEN others THEN
6413: -- Debug Statements
6414: --
6415: IF l_debug_on THEN
6416: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_SEQUENCE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6417: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_SEQUENCE');
6418: END IF;
6419: --
6420: WHEN others THEN
6421: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.VALIDATE_STOP_SEQUENCE');
6424: --
6425: -- Debug Statements
6426: --
6427: IF l_debug_on THEN
6428: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6429: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6430: END IF;
6431: --
6432: END validate_stop_sequence;
6425: -- Debug Statements
6426: --
6427: IF l_debug_on THEN
6428: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6429: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6430: END IF;
6431: --
6432: END validate_stop_sequence;
6433:
6462: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6463: --
6464: IF l_debug_on IS NULL
6465: THEN
6466: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6467: END IF;
6468: --
6469: IF l_debug_on THEN
6470: WSH_DEBUG_SV.push(l_module_name);
6466: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6467: END IF;
6468: --
6469: IF l_debug_on THEN
6470: WSH_DEBUG_SV.push(l_module_name);
6471: END IF;
6472: --
6473: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6474:
6511: --
6512: -- Debug Statements
6513: --
6514: IF l_debug_on THEN
6515: WSH_DEBUG_SV.pop(l_module_name);
6516: END IF;
6517: --
6518: EXCEPTION
6519: WHEN others THEN
6523: --
6524: -- Debug Statements
6525: --
6526: IF l_debug_on THEN
6527: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6528: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6529: END IF;
6530: --
6531: END Check_Unassign_Trip;
6524: -- Debug Statements
6525: --
6526: IF l_debug_on THEN
6527: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6528: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6529: END IF;
6530: --
6531: END Check_Unassign_Trip;
6532:
6580: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6581: --
6582: IF l_debug_on IS NULL
6583: THEN
6584: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6585: END IF;
6586: --
6587: IF l_debug_on THEN
6588: WSH_DEBUG_SV.push(l_module_name);
6584: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6585: END IF;
6586: --
6587: IF l_debug_on THEN
6588: WSH_DEBUG_SV.push(l_module_name);
6589: --
6590: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
6591: END IF;
6592: --
6586: --
6587: IF l_debug_on THEN
6588: WSH_DEBUG_SV.push(l_module_name);
6589: --
6590: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
6591: END IF;
6592: --
6593: OPEN get_trip_info(p_trip_id);
6594: FETCH get_trip_info INTO l_trip_name, l_planned_flag;
6645: --
6646: -- Debug Statements
6647: --
6648: IF l_debug_on THEN
6649: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.UNASSIGN_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
6650: END IF;
6651: --
6652: wsh_delivery_legs_actions.unassign_deliveries( p_del_rows, p_trip_id, NULL, NULL, l_return_status);
6653: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
6669: --
6670: -- Debug Statements
6671: --
6672: IF l_debug_on THEN
6673: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
6674: END IF;
6675: --
6676: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
6677: p_entity_type => 'TRIP',
6689: --
6690: -- Debug Statements
6691: --
6692: IF l_debug_on THEN
6693: WSH_DEBUG_SV.pop(l_module_name);
6694: END IF;
6695: --
6696: EXCEPTION
6697:
6703: --
6704: -- Debug Statements
6705: --
6706: IF l_debug_on THEN
6707: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_NOT_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6708: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_NOT_FOUND');
6709: END IF;
6710: --
6711: WHEN unassign_deliveries_err THEN
6704: -- Debug Statements
6705: --
6706: IF l_debug_on THEN
6707: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_NOT_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6708: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_NOT_FOUND');
6709: END IF;
6710: --
6711: WHEN unassign_deliveries_err THEN
6712: x_return_status := l_return_status;
6717: --
6718: -- Debug Statements
6719: --
6720: IF l_debug_on THEN
6721: WSH_DEBUG_SV.logmsg(l_module_name,'UNASSIGN_DELIVERIES_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6722: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:UNASSIGN_DELIVERIES_ERR');
6723: END IF;
6724: --
6725: WHEN reprice_required_err THEN
6718: -- Debug Statements
6719: --
6720: IF l_debug_on THEN
6721: WSH_DEBUG_SV.logmsg(l_module_name,'UNASSIGN_DELIVERIES_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6722: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:UNASSIGN_DELIVERIES_ERR');
6723: END IF;
6724: --
6725: WHEN reprice_required_err THEN
6726: x_return_status := l_return_status;
6730: --
6731: -- Debug Statements
6732: --
6733: IF l_debug_on THEN
6734: WSH_DEBUG_SV.logmsg(l_module_name,'REPRICE_REQUIRED_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6735: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REPRICE_REQUIRED_ERR');
6736: END IF;
6737: --
6738: WHEN trip_planned THEN
6731: -- Debug Statements
6732: --
6733: IF l_debug_on THEN
6734: WSH_DEBUG_SV.logmsg(l_module_name,'REPRICE_REQUIRED_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6735: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REPRICE_REQUIRED_ERR');
6736: END IF;
6737: --
6738: WHEN trip_planned THEN
6739: x_return_status := l_return_status;
6744: --
6745: -- Debug Statements
6746: --
6747: IF l_debug_on THEN
6748: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_PLANNED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6749: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_PLANNED');
6750: END IF;
6751: --
6752: WHEN others THEN
6745: -- Debug Statements
6746: --
6747: IF l_debug_on THEN
6748: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_PLANNED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6749: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_PLANNED');
6750: END IF;
6751: --
6752: WHEN others THEN
6753: IF get_trip_info%ISOPEN THEN
6759: --
6760: -- Debug Statements
6761: --
6762: IF l_debug_on THEN
6763: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6764: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6765: END IF;
6766: --
6767: END Unassign_Trip;
6760: -- Debug Statements
6761: --
6762: IF l_debug_on THEN
6763: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6764: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6765: END IF;
6766: --
6767: END Unassign_Trip;
6768:
6806: BEGIN
6807:
6808: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6809: IF l_debug_on IS NULL THEN
6810: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6811: END IF;
6812: --
6813: IF l_debug_on THEN
6814: WSH_DEBUG_SV.push(l_module_name);
6810: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6811: END IF;
6812: --
6813: IF l_debug_on THEN
6814: WSH_DEBUG_SV.push(l_module_name);
6815: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
6816: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
6817: WSH_DEBUG_SV.log(l_module_name,'P_NET_WEIGHT',P_NET_WEIGHT);
6818: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
6811: END IF;
6812: --
6813: IF l_debug_on THEN
6814: WSH_DEBUG_SV.push(l_module_name);
6815: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
6816: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
6817: WSH_DEBUG_SV.log(l_module_name,'P_NET_WEIGHT',P_NET_WEIGHT);
6818: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
6819: WSH_DEBUG_SV.log(l_module_name,'P_FILL_PERCENT',P_FILL_PERCENT);
6812: --
6813: IF l_debug_on THEN
6814: WSH_DEBUG_SV.push(l_module_name);
6815: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
6816: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
6817: WSH_DEBUG_SV.log(l_module_name,'P_NET_WEIGHT',P_NET_WEIGHT);
6818: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
6819: WSH_DEBUG_SV.log(l_module_name,'P_FILL_PERCENT',P_FILL_PERCENT);
6820: END IF;
6813: IF l_debug_on THEN
6814: WSH_DEBUG_SV.push(l_module_name);
6815: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
6816: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
6817: WSH_DEBUG_SV.log(l_module_name,'P_NET_WEIGHT',P_NET_WEIGHT);
6818: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
6819: WSH_DEBUG_SV.log(l_module_name,'P_FILL_PERCENT',P_FILL_PERCENT);
6820: END IF;
6821: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6814: WSH_DEBUG_SV.push(l_module_name);
6815: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
6816: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
6817: WSH_DEBUG_SV.log(l_module_name,'P_NET_WEIGHT',P_NET_WEIGHT);
6818: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
6819: WSH_DEBUG_SV.log(l_module_name,'P_FILL_PERCENT',P_FILL_PERCENT);
6820: END IF;
6821: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6822:
6815: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
6816: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
6817: WSH_DEBUG_SV.log(l_module_name,'P_NET_WEIGHT',P_NET_WEIGHT);
6818: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
6819: WSH_DEBUG_SV.log(l_module_name,'P_FILL_PERCENT',P_FILL_PERCENT);
6820: END IF;
6821: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6822:
6823: -- Get pvt type record structure for stop
6821: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6822:
6823: -- Get pvt type record structure for stop
6824: IF l_debug_on THEN
6825: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_GRP.GET_STOP_DETAILS_PVT',WSH_DEBUG_SV.C_PROC_LEVEL);
6826: END IF;
6827: --
6828: wsh_trip_stops_grp.get_stop_details_pvt(
6829: p_stop_id => p_stop_id,
6833: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6834: x_return_status := l_return_status;
6835:
6836: IF l_debug_on THEN
6837: WSH_DEBUG_SV.pop(l_module_name);
6838: END IF;
6839: --
6840: RETURN;
6841: END IF;
6845: l_stop_rec.departure_volume := p_volume;
6846: l_stop_rec.departure_fill_percent := p_fill_percent;
6847:
6848: IF l_debug_on THEN
6849: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FTE_INTEGRATION.TRIP_STOP_VALIDATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
6850: END IF;
6851: --
6852: WSH_FTE_INTEGRATION.trip_stop_validations(
6853: p_stop_rec => l_stop_rec,
6857:
6858: x_return_status := l_return_status;
6859:
6860: IF l_debug_on THEN
6861: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
6862: WSH_DEBUG_SV.pop(l_module_name);
6863: END IF;
6864:
6865: EXCEPTION
6858: x_return_status := l_return_status;
6859:
6860: IF l_debug_on THEN
6861: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
6862: WSH_DEBUG_SV.pop(l_module_name);
6863: END IF;
6864:
6865: EXCEPTION
6866: WHEN others THEN
6867: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.Fte_Load_Tender');
6868: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6869:
6870: IF l_debug_on THEN
6871: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6872: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6873: END IF;
6874: END Fte_Load_Tender;
6875:
6868: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6869:
6870: IF l_debug_on THEN
6871: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6872: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6873: END IF;
6874: END Fte_Load_Tender;
6875:
6876:
6951: l_warn_num := 0;
6952: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6953: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6954: IF l_debug_on IS NULL THEN
6955: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6956: END IF;
6957: --
6958: IF l_debug_on THEN
6959: WSH_DEBUG_SV.push(l_module_name);
6955: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6956: END IF;
6957: --
6958: IF l_debug_on THEN
6959: WSH_DEBUG_SV.push(l_module_name);
6960: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.count ', p_trip_ids.count);
6961: END IF;
6962:
6963: IF p_trip_ids.count = 0 THEN
6956: END IF;
6957: --
6958: IF l_debug_on THEN
6959: WSH_DEBUG_SV.push(l_module_name);
6960: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.count ', p_trip_ids.count);
6961: END IF;
6962:
6963: IF p_trip_ids.count = 0 THEN
6964: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6962:
6963: IF p_trip_ids.count = 0 THEN
6964: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6965: IF l_debug_on THEN
6966: WSH_DEBUG_SV.logmsg(l_module_name,' p_trip_ids.count is zero');
6967: WSH_DEBUG_SV.pop(l_module_name);
6968: END IF;
6969: return;
6970: END IF;
6963: IF p_trip_ids.count = 0 THEN
6964: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6965: IF l_debug_on THEN
6966: WSH_DEBUG_SV.logmsg(l_module_name,' p_trip_ids.count is zero');
6967: WSH_DEBUG_SV.pop(l_module_name);
6968: END IF;
6969: return;
6970: END IF;
6971:
6974: savepoint start_of_the_trip;
6975: l_trip_error := FALSE;
6976: l_first_stop := TRUE;
6977: IF l_debug_on THEN
6978: WSH_DEBUG_SV.logmsg(l_module_name,'p_trip_ids('||i||') ==> '||p_trip_ids(i));
6979: END IF;
6980: OPEN c_trip_stops(p_trip_ids(i));
6981: LOOP
6982: FETCH c_trip_stops INTO l_stop_rec;
6983: EXIT WHEN c_trip_stops%NOTFOUND;
6984: l_update_flag := FALSE;
6985:
6986: IF l_debug_on THEN
6987: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_sequence_number', l_stop_rec.stop_sequence_number);
6988: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_id', l_stop_rec.stop_id);
6989: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.status_code', l_stop_rec.status_code);
6990: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.planned_arrival_date', to_char(l_stop_rec.planned_arrival_date, 'DD-MON-YYYY HH24:MI:SS'));
6991: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.planned_departure_date', to_char(l_stop_rec.planned_departure_date,'DD-MON-YYYY HH24:MI:SS'));
6984: l_update_flag := FALSE;
6985:
6986: IF l_debug_on THEN
6987: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_sequence_number', l_stop_rec.stop_sequence_number);
6988: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_id', l_stop_rec.stop_id);
6989: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.status_code', l_stop_rec.status_code);
6990: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.planned_arrival_date', to_char(l_stop_rec.planned_arrival_date, 'DD-MON-YYYY HH24:MI:SS'));
6991: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.planned_departure_date', to_char(l_stop_rec.planned_departure_date,'DD-MON-YYYY HH24:MI:SS'));
6992: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.actual_arrival_date', to_char(l_stop_rec.actual_arrival_date,'DD-MON-YYYY HH24:MI:SS'));
6985:
6986: IF l_debug_on THEN
6987: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_sequence_number', l_stop_rec.stop_sequence_number);
6988: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_id', l_stop_rec.stop_id);
6989: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.status_code', l_stop_rec.status_code);
6990: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.planned_arrival_date', to_char(l_stop_rec.planned_arrival_date, 'DD-MON-YYYY HH24:MI:SS'));
6991: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.planned_departure_date', to_char(l_stop_rec.planned_departure_date,'DD-MON-YYYY HH24:MI:SS'));
6992: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.actual_arrival_date', to_char(l_stop_rec.actual_arrival_date,'DD-MON-YYYY HH24:MI:SS'));
6993: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.actual_departure_date', to_char(l_stop_rec.actual_departure_date,'DD-MON-YYYY HH24:MI:SS'));
6986: IF l_debug_on THEN
6987: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_sequence_number', l_stop_rec.stop_sequence_number);
6988: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_id', l_stop_rec.stop_id);
6989: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.status_code', l_stop_rec.status_code);
6990: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.planned_arrival_date', to_char(l_stop_rec.planned_arrival_date, 'DD-MON-YYYY HH24:MI:SS'));
6991: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.planned_departure_date', to_char(l_stop_rec.planned_departure_date,'DD-MON-YYYY HH24:MI:SS'));
6992: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.actual_arrival_date', to_char(l_stop_rec.actual_arrival_date,'DD-MON-YYYY HH24:MI:SS'));
6993: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.actual_departure_date', to_char(l_stop_rec.actual_departure_date,'DD-MON-YYYY HH24:MI:SS'));
6994: END IF;
6987: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_sequence_number', l_stop_rec.stop_sequence_number);
6988: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_id', l_stop_rec.stop_id);
6989: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.status_code', l_stop_rec.status_code);
6990: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.planned_arrival_date', to_char(l_stop_rec.planned_arrival_date, 'DD-MON-YYYY HH24:MI:SS'));
6991: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.planned_departure_date', to_char(l_stop_rec.planned_departure_date,'DD-MON-YYYY HH24:MI:SS'));
6992: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.actual_arrival_date', to_char(l_stop_rec.actual_arrival_date,'DD-MON-YYYY HH24:MI:SS'));
6993: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.actual_departure_date', to_char(l_stop_rec.actual_departure_date,'DD-MON-YYYY HH24:MI:SS'));
6994: END IF;
6995:
6988: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_id', l_stop_rec.stop_id);
6989: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.status_code', l_stop_rec.status_code);
6990: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.planned_arrival_date', to_char(l_stop_rec.planned_arrival_date, 'DD-MON-YYYY HH24:MI:SS'));
6991: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.planned_departure_date', to_char(l_stop_rec.planned_departure_date,'DD-MON-YYYY HH24:MI:SS'));
6992: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.actual_arrival_date', to_char(l_stop_rec.actual_arrival_date,'DD-MON-YYYY HH24:MI:SS'));
6993: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.actual_departure_date', to_char(l_stop_rec.actual_departure_date,'DD-MON-YYYY HH24:MI:SS'));
6994: END IF;
6995:
6996:
6989: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.status_code', l_stop_rec.status_code);
6990: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.planned_arrival_date', to_char(l_stop_rec.planned_arrival_date, 'DD-MON-YYYY HH24:MI:SS'));
6991: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.planned_departure_date', to_char(l_stop_rec.planned_departure_date,'DD-MON-YYYY HH24:MI:SS'));
6992: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.actual_arrival_date', to_char(l_stop_rec.actual_arrival_date,'DD-MON-YYYY HH24:MI:SS'));
6993: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.actual_departure_date', to_char(l_stop_rec.actual_departure_date,'DD-MON-YYYY HH24:MI:SS'));
6994: END IF;
6995:
6996:
6997:
7042: -- Updating WSH_TRIP_STOPS.
7043: -- Call DBI API after the Update.
7044: -- This API will also check for DBI Installed or not
7045: IF l_debug_on THEN
7046: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Stop id -',l_stop_rec.stop_id);
7047: END IF;
7048: l_stop_tab(1) := l_stop_rec.stop_id;
7049: WSH_INTEGRATION.DBI_Update_Trip_Stop_Log
7050: (p_stop_id_tab => l_stop_tab,
7051: p_dml_type => 'UPDATE',
7052: x_return_status => l_dbi_rs);
7053:
7054: IF l_debug_on THEN
7055: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
7056: END IF;
7057: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
7058: x_return_status := l_dbi_rs;
7059: -- just pass this return status to caller API
7057: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
7058: x_return_status := l_dbi_rs;
7059: -- just pass this return status to caller API
7060: IF l_debug_on THEN
7061: WSH_DEBUG_SV.log(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
7062: WSH_DEBUG_SV.pop(l_module_name);
7063: END IF;
7064: return;
7065: END IF;
7058: x_return_status := l_dbi_rs;
7059: -- just pass this return status to caller API
7060: IF l_debug_on THEN
7061: WSH_DEBUG_SV.log(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
7062: WSH_DEBUG_SV.pop(l_module_name);
7063: END IF;
7064: return;
7065: END IF;
7066: -- End of Code for DBI Project
7073: CLOSE lock_stop;
7074: END IF;
7075: --
7076: IF l_debug_on THEN
7077: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR: stop is locked, cannot update it');
7078: END IF;
7079: --
7080: l_trip_error := TRUE;
7081: exit;
7130:
7131: END IF;
7132:
7133: IF l_debug_on THEN
7134: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
7135: WSH_DEBUG_SV.log(l_module_name,'l_warn_num ', l_warn_num);
7136: WSH_DEBUG_SV.pop(l_module_name);
7137: END IF;
7138:
7131: END IF;
7132:
7133: IF l_debug_on THEN
7134: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
7135: WSH_DEBUG_SV.log(l_module_name,'l_warn_num ', l_warn_num);
7136: WSH_DEBUG_SV.pop(l_module_name);
7137: END IF;
7138:
7139: EXCEPTION
7132:
7133: IF l_debug_on THEN
7134: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
7135: WSH_DEBUG_SV.log(l_module_name,'l_warn_num ', l_warn_num);
7136: WSH_DEBUG_SV.pop(l_module_name);
7137: END IF;
7138:
7139: EXCEPTION
7140:
7149: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.reset_stop_planned_dates');
7150: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7151:
7152: IF l_debug_on THEN
7153: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7154: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7155: END IF;
7156:
7157: END reset_stop_planned_dates;
7150: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7151:
7152: IF l_debug_on THEN
7153: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7154: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7155: END IF;
7156:
7157: END reset_stop_planned_dates;
7158:
7192:
7193: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7194: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7195: IF l_debug_on IS NULL THEN
7196: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7197: END IF;
7198: --
7199: IF l_debug_on THEN
7200: WSH_DEBUG_SV.push(l_module_name);
7196: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7197: END IF;
7198: --
7199: IF l_debug_on THEN
7200: WSH_DEBUG_SV.push(l_module_name);
7201: WSH_DEBUG_SV.log(l_module_name,'p_trip_id ', p_trip_id);
7202: END IF;
7203:
7204: IF p_trip_id is NULL THEN
7197: END IF;
7198: --
7199: IF l_debug_on THEN
7200: WSH_DEBUG_SV.push(l_module_name);
7201: WSH_DEBUG_SV.log(l_module_name,'p_trip_id ', p_trip_id);
7202: END IF;
7203:
7204: IF p_trip_id is NULL THEN
7205: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7203:
7204: IF p_trip_id is NULL THEN
7205: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7206: IF l_debug_on THEN
7207: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR: Trip ID is NULL');
7208: WSH_DEBUG_SV.pop(l_module_name);
7209: END IF;
7210: return;
7211: END IF;
7204: IF p_trip_id is NULL THEN
7205: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7206: IF l_debug_on THEN
7207: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR: Trip ID is NULL');
7208: WSH_DEBUG_SV.pop(l_module_name);
7209: END IF;
7210: return;
7211: END IF;
7212: l_trip_ids(1) := p_trip_id;
7221: x_return_status := l_return_status;
7222: END IF;
7223:
7224: IF l_debug_on THEN
7225: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
7226: WSH_DEBUG_SV.pop(l_module_name);
7227: END IF;
7228:
7229: EXCEPTION
7222: END IF;
7223:
7224: IF l_debug_on THEN
7225: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
7226: WSH_DEBUG_SV.pop(l_module_name);
7227: END IF;
7228:
7229: EXCEPTION
7230:
7232: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.reset_stop_planned_dates');
7233: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7234:
7235: IF l_debug_on THEN
7236: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7237: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7238: END IF;
7239:
7240: END reset_stop_planned_dates;
7233: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7234:
7235: IF l_debug_on THEN
7236: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7237: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7238: END IF;
7239:
7240: END reset_stop_planned_dates;
7241:
7600: l_stop_seq_mode := WSH_TRIPS_ACTIONS.GET_STOP_SEQ_MODE;
7601:
7602: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7603: IF l_debug_on IS NULL THEN
7604: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7605: END IF;
7606: --
7607: IF l_debug_on THEN
7608: WSH_DEBUG_SV.push(l_module_name);
7604: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7605: END IF;
7606: --
7607: IF l_debug_on THEN
7608: WSH_DEBUG_SV.push(l_module_name);
7609: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.count ', p_trip_ids.count);
7610: WSH_DEBUG_SV.log(l_module_name,'p_caller ', p_caller);
7611: END IF;
7612:
7605: END IF;
7606: --
7607: IF l_debug_on THEN
7608: WSH_DEBUG_SV.push(l_module_name);
7609: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.count ', p_trip_ids.count);
7610: WSH_DEBUG_SV.log(l_module_name,'p_caller ', p_caller);
7611: END IF;
7612:
7613: IF p_trip_ids.count = 0 THEN
7606: --
7607: IF l_debug_on THEN
7608: WSH_DEBUG_SV.push(l_module_name);
7609: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.count ', p_trip_ids.count);
7610: WSH_DEBUG_SV.log(l_module_name,'p_caller ', p_caller);
7611: END IF;
7612:
7613: IF p_trip_ids.count = 0 THEN
7614: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7612:
7613: IF p_trip_ids.count = 0 THEN
7614: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7615: IF l_debug_on THEN
7616: WSH_DEBUG_SV.logmsg(l_module_name,' p_trip_ids.count is zero');
7617: WSH_DEBUG_SV.pop(l_module_name);
7618: END IF;
7619: return;
7620: END IF;
7613: IF p_trip_ids.count = 0 THEN
7614: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7615: IF l_debug_on THEN
7616: WSH_DEBUG_SV.logmsg(l_module_name,' p_trip_ids.count is zero');
7617: WSH_DEBUG_SV.pop(l_module_name);
7618: END IF;
7619: return;
7620: END IF;
7621:
7624: SAVEPOINT start_of_the_trip;
7625: BEGIN
7626: l_update_flag := FALSE;
7627: IF l_debug_on THEN
7628: WSH_DEBUG_SV.logmsg(l_module_name,'p_trip_ids('||i||') ==> '||p_trip_ids(i));
7629: END IF;
7630:
7631: IF l_stop_seq_mode = WSH_INTERFACE_GRP.G_STOP_SEQ_MODE_PAD THEN
7632:
7661: CLOSE c_get_stops_SSN;
7662: END IF;
7663:
7664: IF l_debug_on THEN
7665: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id.count', l_getstops_stop_id.count);
7666: END IF;
7667: IF l_getstops_stop_id.count > 0 THEN
7668: FOR j in l_getstops_stop_id.first .. l_getstops_stop_id.last LOOP
7669: IF l_debug_on THEN
7666: END IF;
7667: IF l_getstops_stop_id.count > 0 THEN
7668: FOR j in l_getstops_stop_id.first .. l_getstops_stop_id.last LOOP
7669: IF l_debug_on THEN
7670: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id('||j||')', l_getstops_stop_id(j));
7671: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_loc_id('||j||')', l_getstops_stop_loc_id(j));
7672: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_loc_id('||j||')', l_getstops_phys_loc_id(j));
7673: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id('||j||')', l_getstops_phys_stop_id(j));
7674: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7667: IF l_getstops_stop_id.count > 0 THEN
7668: FOR j in l_getstops_stop_id.first .. l_getstops_stop_id.last LOOP
7669: IF l_debug_on THEN
7670: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id('||j||')', l_getstops_stop_id(j));
7671: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_loc_id('||j||')', l_getstops_stop_loc_id(j));
7672: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_loc_id('||j||')', l_getstops_phys_loc_id(j));
7673: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id('||j||')', l_getstops_phys_stop_id(j));
7674: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7675: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7668: FOR j in l_getstops_stop_id.first .. l_getstops_stop_id.last LOOP
7669: IF l_debug_on THEN
7670: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id('||j||')', l_getstops_stop_id(j));
7671: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_loc_id('||j||')', l_getstops_stop_loc_id(j));
7672: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_loc_id('||j||')', l_getstops_phys_loc_id(j));
7673: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id('||j||')', l_getstops_phys_stop_id(j));
7674: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7675: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7676: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_arr_date('||j||')', to_char(l_getstops_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7669: IF l_debug_on THEN
7670: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id('||j||')', l_getstops_stop_id(j));
7671: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_loc_id('||j||')', l_getstops_stop_loc_id(j));
7672: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_loc_id('||j||')', l_getstops_phys_loc_id(j));
7673: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id('||j||')', l_getstops_phys_stop_id(j));
7674: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7675: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7676: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_arr_date('||j||')', to_char(l_getstops_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7677: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_dep_date('||j||')', to_char(l_getstops_pl_dep_date(j),'DD-MON-YYYY HH24:MI:SS'));
7670: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id('||j||')', l_getstops_stop_id(j));
7671: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_loc_id('||j||')', l_getstops_stop_loc_id(j));
7672: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_loc_id('||j||')', l_getstops_phys_loc_id(j));
7673: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id('||j||')', l_getstops_phys_stop_id(j));
7674: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7675: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7676: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_arr_date('||j||')', to_char(l_getstops_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7677: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_dep_date('||j||')', to_char(l_getstops_pl_dep_date(j),'DD-MON-YYYY HH24:MI:SS'));
7678: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_pl_arr_date('||j||')', to_char(l_getstops_org_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7671: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_loc_id('||j||')', l_getstops_stop_loc_id(j));
7672: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_loc_id('||j||')', l_getstops_phys_loc_id(j));
7673: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id('||j||')', l_getstops_phys_stop_id(j));
7674: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7675: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7676: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_arr_date('||j||')', to_char(l_getstops_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7677: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_dep_date('||j||')', to_char(l_getstops_pl_dep_date(j),'DD-MON-YYYY HH24:MI:SS'));
7678: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_pl_arr_date('||j||')', to_char(l_getstops_org_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7679: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_pl_dep_date('||j||')', to_char(l_getstops_org_pl_dep_date(j),'DD-MON-YYYY HH24:MI:SS'));
7672: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_loc_id('||j||')', l_getstops_phys_loc_id(j));
7673: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id('||j||')', l_getstops_phys_stop_id(j));
7674: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7675: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7676: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_arr_date('||j||')', to_char(l_getstops_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7677: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_dep_date('||j||')', to_char(l_getstops_pl_dep_date(j),'DD-MON-YYYY HH24:MI:SS'));
7678: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_pl_arr_date('||j||')', to_char(l_getstops_org_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7679: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_pl_dep_date('||j||')', to_char(l_getstops_org_pl_dep_date(j),'DD-MON-YYYY HH24:MI:SS'));
7680: WSH_DEBUG_SV.log(l_module_name,'l_getstops_status_code('||j||')', l_getstops_status_code(j));
7673: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id('||j||')', l_getstops_phys_stop_id(j));
7674: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7675: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7676: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_arr_date('||j||')', to_char(l_getstops_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7677: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_dep_date('||j||')', to_char(l_getstops_pl_dep_date(j),'DD-MON-YYYY HH24:MI:SS'));
7678: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_pl_arr_date('||j||')', to_char(l_getstops_org_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7679: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_pl_dep_date('||j||')', to_char(l_getstops_org_pl_dep_date(j),'DD-MON-YYYY HH24:MI:SS'));
7680: WSH_DEBUG_SV.log(l_module_name,'l_getstops_status_code('||j||')', l_getstops_status_code(j));
7681: WSH_DEBUG_SV.log(l_module_name,'l_getstops_break_link_flags('||j||')', l_getstops_break_link_flags(j));
7674: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7675: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7676: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_arr_date('||j||')', to_char(l_getstops_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7677: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_dep_date('||j||')', to_char(l_getstops_pl_dep_date(j),'DD-MON-YYYY HH24:MI:SS'));
7678: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_pl_arr_date('||j||')', to_char(l_getstops_org_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7679: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_pl_dep_date('||j||')', to_char(l_getstops_org_pl_dep_date(j),'DD-MON-YYYY HH24:MI:SS'));
7680: WSH_DEBUG_SV.log(l_module_name,'l_getstops_status_code('||j||')', l_getstops_status_code(j));
7681: WSH_DEBUG_SV.log(l_module_name,'l_getstops_break_link_flags('||j||')', l_getstops_break_link_flags(j));
7682: END IF;
7675: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7676: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_arr_date('||j||')', to_char(l_getstops_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7677: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_dep_date('||j||')', to_char(l_getstops_pl_dep_date(j),'DD-MON-YYYY HH24:MI:SS'));
7678: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_pl_arr_date('||j||')', to_char(l_getstops_org_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7679: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_pl_dep_date('||j||')', to_char(l_getstops_org_pl_dep_date(j),'DD-MON-YYYY HH24:MI:SS'));
7680: WSH_DEBUG_SV.log(l_module_name,'l_getstops_status_code('||j||')', l_getstops_status_code(j));
7681: WSH_DEBUG_SV.log(l_module_name,'l_getstops_break_link_flags('||j||')', l_getstops_break_link_flags(j));
7682: END IF;
7683: IF p_caller = 'WSH_TRIP_UPGRADE' THEN
7676: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_arr_date('||j||')', to_char(l_getstops_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7677: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_dep_date('||j||')', to_char(l_getstops_pl_dep_date(j),'DD-MON-YYYY HH24:MI:SS'));
7678: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_pl_arr_date('||j||')', to_char(l_getstops_org_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7679: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_pl_dep_date('||j||')', to_char(l_getstops_org_pl_dep_date(j),'DD-MON-YYYY HH24:MI:SS'));
7680: WSH_DEBUG_SV.log(l_module_name,'l_getstops_status_code('||j||')', l_getstops_status_code(j));
7681: WSH_DEBUG_SV.log(l_module_name,'l_getstops_break_link_flags('||j||')', l_getstops_break_link_flags(j));
7682: END IF;
7683: IF p_caller = 'WSH_TRIP_UPGRADE' THEN
7684: WSH_LOCATIONS_PKG.Convert_internal_cust_location(
7677: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_dep_date('||j||')', to_char(l_getstops_pl_dep_date(j),'DD-MON-YYYY HH24:MI:SS'));
7678: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_pl_arr_date('||j||')', to_char(l_getstops_org_pl_arr_date(j),'DD-MON-YYYY HH24:MI:SS'));
7679: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_pl_dep_date('||j||')', to_char(l_getstops_org_pl_dep_date(j),'DD-MON-YYYY HH24:MI:SS'));
7680: WSH_DEBUG_SV.log(l_module_name,'l_getstops_status_code('||j||')', l_getstops_status_code(j));
7681: WSH_DEBUG_SV.log(l_module_name,'l_getstops_break_link_flags('||j||')', l_getstops_break_link_flags(j));
7682: END IF;
7683: IF p_caller = 'WSH_TRIP_UPGRADE' THEN
7684: WSH_LOCATIONS_PKG.Convert_internal_cust_location(
7685: p_internal_cust_location_id => l_getstops_stop_loc_id(j),
7698: -- check if unlinking is necessary
7699:
7700: IF l_getstops_break_link_flags(j) = 'Y' THEN
7701: IF l_debug_on THEN
7702: WSH_DEBUG_SV.log(l_module_name,'unlink stop', l_getstops_stop_id(j));
7703: END IF;
7704: l_getstops_phys_stop_id(j) := NULL;
7705: l_update_flag := TRUE;
7706: END IF;
7713: AND l_getstops_phys_loc_id(j) = l_getstops_stop_loc_id(j+1) THEN
7714:
7715: -- link to next stop
7716: IF l_debug_on THEN
7717: WSH_DEBUG_SV.log(l_module_name,'link to next stop at stop', l_getstops_stop_id(j));
7718: END IF;
7719: l_getstops_phys_stop_id(j) := l_getstops_stop_id(j+1);
7720: l_getstops_pl_arr_date(j) := l_getstops_pl_arr_date(j+1) - WSH_TRIPS_ACTIONS.C_TEN_SECONDS;
7721: l_getstops_pl_dep_date(j) := l_getstops_pl_arr_date(j);
7735: OPEN c_flip_disallowed(l_getstops_stop_id(j), l_getstops_stop_id(j-1));
7736: FETCH c_flip_disallowed INTO l_delivery_leg_id;
7737: IF c_flip_disallowed%NOTFOUND THEN
7738: IF l_debug_on THEN
7739: WSH_DEBUG_SV.log(l_module_name,'flip and link at stop', l_getstops_stop_id(j));
7740: END IF;
7741: -- flip these two stops
7742:
7743: l_getstops_tmp.stop_id := l_getstops_stop_id(j);
7787: END IF;
7788:
7789: FOR j IN l_getstops_stop_id.first .. l_getstops_stop_id.last LOOP
7790: IF l_debug_on THEN
7791: WSH_DEBUG_SV.log(l_module_name,'j ', j );
7792: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id(j)' , l_getstops_stop_id(j));
7793: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num(j)' , l_getstops_stop_seq_num(j));
7794: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_arr_date(j)' , to_char(l_getstops_pl_arr_date(j), 'DD-MON-YYYY HH24:MI:SS'));
7795: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id(j) ' , l_getstops_phys_stop_id(j) );
7788:
7789: FOR j IN l_getstops_stop_id.first .. l_getstops_stop_id.last LOOP
7790: IF l_debug_on THEN
7791: WSH_DEBUG_SV.log(l_module_name,'j ', j );
7792: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id(j)' , l_getstops_stop_id(j));
7793: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num(j)' , l_getstops_stop_seq_num(j));
7794: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_arr_date(j)' , to_char(l_getstops_pl_arr_date(j), 'DD-MON-YYYY HH24:MI:SS'));
7795: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id(j) ' , l_getstops_phys_stop_id(j) );
7796: END IF;
7789: FOR j IN l_getstops_stop_id.first .. l_getstops_stop_id.last LOOP
7790: IF l_debug_on THEN
7791: WSH_DEBUG_SV.log(l_module_name,'j ', j );
7792: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id(j)' , l_getstops_stop_id(j));
7793: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num(j)' , l_getstops_stop_seq_num(j));
7794: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_arr_date(j)' , to_char(l_getstops_pl_arr_date(j), 'DD-MON-YYYY HH24:MI:SS'));
7795: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id(j) ' , l_getstops_phys_stop_id(j) );
7796: END IF;
7797: END LOOP;
7790: IF l_debug_on THEN
7791: WSH_DEBUG_SV.log(l_module_name,'j ', j );
7792: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id(j)' , l_getstops_stop_id(j));
7793: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num(j)' , l_getstops_stop_seq_num(j));
7794: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_arr_date(j)' , to_char(l_getstops_pl_arr_date(j), 'DD-MON-YYYY HH24:MI:SS'));
7795: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id(j) ' , l_getstops_phys_stop_id(j) );
7796: END IF;
7797: END LOOP;
7798:
7791: WSH_DEBUG_SV.log(l_module_name,'j ', j );
7792: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id(j)' , l_getstops_stop_id(j));
7793: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num(j)' , l_getstops_stop_seq_num(j));
7794: WSH_DEBUG_SV.log(l_module_name,'l_getstops_pl_arr_date(j)' , to_char(l_getstops_pl_arr_date(j), 'DD-MON-YYYY HH24:MI:SS'));
7795: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id(j) ' , l_getstops_phys_stop_id(j) );
7796: END IF;
7797: END LOOP;
7798:
7799: IF l_debug_on THEN
7796: END IF;
7797: END LOOP;
7798:
7799: IF l_debug_on THEN
7800: WSH_DEBUG_SV.logmsg(l_module_name,'loop backward checking for date or SSN conflict');
7801: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id.last', l_getstops_stop_id.last);
7802: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id.first' , l_getstops_stop_id.first);
7803: END IF;
7804:
7797: END LOOP;
7798:
7799: IF l_debug_on THEN
7800: WSH_DEBUG_SV.logmsg(l_module_name,'loop backward checking for date or SSN conflict');
7801: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id.last', l_getstops_stop_id.last);
7802: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id.first' , l_getstops_stop_id.first);
7803: END IF;
7804:
7805: l_push_date_allowed := FALSE;
7798:
7799: IF l_debug_on THEN
7800: WSH_DEBUG_SV.logmsg(l_module_name,'loop backward checking for date or SSN conflict');
7801: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id.last', l_getstops_stop_id.last);
7802: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id.first' , l_getstops_stop_id.first);
7803: END IF;
7804:
7805: l_push_date_allowed := FALSE;
7806: l_push_ssn_allowed := FALSE;
7819: IF l_stop_seq_mode = WSH_INTERFACE_GRP.G_STOP_SEQ_MODE_PAD THEN
7820:
7821: IF l_getstops_pl_arr_date(j-1) >= l_getstops_pl_arr_date(j) THEN
7822: IF l_debug_on THEN
7823: WSH_DEBUG_SV.log(l_module_name,'arr date of prev stop conflict at stop' , l_getstops_stop_id(j));
7824: END IF;
7825: IF l_push_date_allowed or
7826: (l_getstops_pl_arr_date(j) <> l_getstops_org_pl_arr_date(j) and
7827: l_getstops_phys_stop_id(j) is not NULL ) THEN
7835: raise invalid_stop_date;
7836: END IF;
7837: ELSIF l_getstops_pl_dep_date(j-1) >= l_getstops_pl_arr_date(j) THEN
7838: IF l_debug_on THEN
7839: WSH_DEBUG_SV.log(l_module_name,'dep date of prev stop conflict at stop' , l_getstops_stop_id(j-1));
7840: END IF;
7841: l_getstops_pl_dep_date(j-1) := l_getstops_pl_arr_date(j-1);
7842: l_update_flag := TRUE;
7843: END IF;
7845: ELSE -- mode is SSN
7846:
7847: IF l_getstops_stop_seq_num(j-1) >= l_getstops_stop_seq_num(j) THEN
7848: IF l_debug_on THEN
7849: WSH_DEBUG_SV.log(l_module_name,'SSN of prev stop conflict at stop' , l_getstops_stop_id(j));
7850: END IF;
7851: IF l_push_ssn_allowed or
7852: (l_getstops_stop_seq_num(j) <> l_getstops_org_stop_seq_num(j) and
7853: l_getstops_phys_stop_id(j) is not NULL ) THEN
7887: END IF;
7888:
7889: IF l_update_flag or p_caller = 'WSH_CREATE_TRIP_STOP' THEN
7890: IF l_debug_on THEN
7891: WSH_DEBUG_SV.log(l_module_name,'updating stops ' , l_getstops_stop_id.count);
7892: END IF;
7893: FORALL j IN l_getstops_stop_id.first..l_getstops_stop_id.last
7894: UPDATE WSH_TRIP_STOPS
7895: SET
7902: last_updated_by = FND_GLOBAL.USER_ID,
7903: last_update_login = FND_GLOBAL.LOGIN_ID
7904: WHERE STOP_ID = l_getstops_stop_id(j);
7905: IF l_debug_on THEN
7906: WSH_DEBUG_SV.log(l_module_name,'done update' , l_getstops_stop_id.count);
7907: END IF;
7908: --
7909: -- DBI Project
7910: -- Updating WSH_TRIP_STOPS.
7910: -- Updating WSH_TRIP_STOPS.
7911: -- Call DBI API after the Update.
7912: -- This API will also check for DBI Installed or not
7913: IF l_debug_on THEN
7914: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Stop count -',l_getstops_stop_id.count);
7915: END IF;
7916: WSH_INTEGRATION.DBI_Update_Trip_Stop_Log
7917: (p_stop_id_tab => l_getstops_stop_id,
7918: p_dml_type => 'UPDATE',
7918: p_dml_type => 'UPDATE',
7919: x_return_status => l_dbi_rs);
7920:
7921: IF l_debug_on THEN
7922: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
7923: END IF;
7924: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
7925: x_return_status := l_dbi_rs;
7926: rollback to start_of_the_trip;
7925: x_return_status := l_dbi_rs;
7926: rollback to start_of_the_trip;
7927: -- just pass this return status to caller API
7928: IF l_debug_on THEN
7929: WSH_DEBUG_SV.log(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
7930: WSH_DEBUG_SV.pop(l_module_name);
7931: END IF;
7932: return;
7933: END IF;
7926: rollback to start_of_the_trip;
7927: -- just pass this return status to caller API
7928: IF l_debug_on THEN
7929: WSH_DEBUG_SV.log(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
7930: WSH_DEBUG_SV.pop(l_module_name);
7931: END IF;
7932: return;
7933: END IF;
7934:
7946: p_stop_details_rec => l_stop_details_rec,
7947: x_return_status => l_return_status);
7948:
7949: IF l_debug_on THEN
7950: wsh_debug_sv.log(l_module_name,'Return Status From WWSH_TRIP_STOPS_ACTIONS.RESET_STOP_SEQ_NUMBERS for trip '||p_trip_ids(i) ,l_return_status);
7951: END IF;
7952:
7953: IF l_return_status in ( WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
7954: raise reset_stop_seq_number_error;
7960: p_trip_id => p_trip_ids(i),
7961: x_return_status => l_return_status);
7962:
7963: IF l_debug_on THEN
7964: wsh_debug_sv.log(l_module_name,'Return Status From WSH_TRIP_STOPS_VALIDATIONS.Validate_Stop_Dates for trip '||p_trip_ids(i) ,l_return_status);
7965: END IF;
7966:
7967: IF l_return_status in ( WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
7968: raise validate_stop_date_error;
8052: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8053: END IF;
8054:
8055: IF l_debug_on THEN
8056: WSH_DEBUG_SV.log(l_module_name,'x_success_trip_ids.count', x_success_trip_ids.count);
8057: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
8058: WSH_DEBUG_SV.pop(l_module_name);
8059: END IF;
8060:
8053: END IF;
8054:
8055: IF l_debug_on THEN
8056: WSH_DEBUG_SV.log(l_module_name,'x_success_trip_ids.count', x_success_trip_ids.count);
8057: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
8058: WSH_DEBUG_SV.pop(l_module_name);
8059: END IF;
8060:
8061: EXCEPTION
8054:
8055: IF l_debug_on THEN
8056: WSH_DEBUG_SV.log(l_module_name,'x_success_trip_ids.count', x_success_trip_ids.count);
8057: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
8058: WSH_DEBUG_SV.pop(l_module_name);
8059: END IF;
8060:
8061: EXCEPTION
8062:
8071: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.LINK_TO_REGULAR_STOPS');
8072: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8073:
8074: IF l_debug_on THEN
8075: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8076: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8077: END IF;
8078:
8079: END Handle_Internal_Stops;
8072: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8073:
8074: IF l_debug_on THEN
8075: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8076: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8077: END IF;
8078:
8079: END Handle_Internal_Stops;
8080:
8256: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8257: --
8258: IF l_debug_on IS NULL
8259: THEN
8260: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8261: END IF;
8262: --
8263:
8264: IF l_debug_on THEN
8261: END IF;
8262: --
8263:
8264: IF l_debug_on THEN
8265: wsh_debug_sv.push(l_module_name);
8266: WSH_DEBUG_SV.logmsg(l_module_name,'p_init_msg_list : '||p_init_msg_list);
8267: WSH_DEBUG_SV.logmsg(l_module_name,'P_CALLER : '||P_CALLER);
8268: END IF;
8269: --
8262: --
8263:
8264: IF l_debug_on THEN
8265: wsh_debug_sv.push(l_module_name);
8266: WSH_DEBUG_SV.logmsg(l_module_name,'p_init_msg_list : '||p_init_msg_list);
8267: WSH_DEBUG_SV.logmsg(l_module_name,'P_CALLER : '||P_CALLER);
8268: END IF;
8269: --
8270: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8263:
8264: IF l_debug_on THEN
8265: wsh_debug_sv.push(l_module_name);
8266: WSH_DEBUG_SV.logmsg(l_module_name,'p_init_msg_list : '||p_init_msg_list);
8267: WSH_DEBUG_SV.logmsg(l_module_name,'P_CALLER : '||P_CALLER);
8268: END IF;
8269: --
8270: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8271:
8290: l_total_pickup_volume := 0;
8291: l_base_volume_uom := NULL;
8292:
8293: IF l_debug_on THEN
8294: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| p_trip_id_tab(i));
8295: END IF;
8296:
8297: OPEN c_get_trip_details(p_trip_id_tab(i));
8298: FETCH c_get_trip_details INTO l_cs_trip_rec;
8370: l_total_pickup_volume := l_total_pickup_volume + l_pickup_volume_convert;
8371: END IF;
8372:
8373: IF l_debug_on THEN
8374: WSH_DEBUG_SV.logmsg(l_module_name,'stop_id '|| l_cs_tripstops_tab(j).stop_id);
8375: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_weight_convert '|| l_pickup_weight_convert);
8376: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_volume_convert '|| l_pickup_volume_convert);
8377: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_tripstops_tab(j).volume_uom_code);
8378: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_volume_uom '|| l_base_volume_uom);
8371: END IF;
8372:
8373: IF l_debug_on THEN
8374: WSH_DEBUG_SV.logmsg(l_module_name,'stop_id '|| l_cs_tripstops_tab(j).stop_id);
8375: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_weight_convert '|| l_pickup_weight_convert);
8376: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_volume_convert '|| l_pickup_volume_convert);
8377: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_tripstops_tab(j).volume_uom_code);
8378: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_volume_uom '|| l_base_volume_uom);
8379: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_tripstops_tab(j).weight_uom_code);
8372:
8373: IF l_debug_on THEN
8374: WSH_DEBUG_SV.logmsg(l_module_name,'stop_id '|| l_cs_tripstops_tab(j).stop_id);
8375: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_weight_convert '|| l_pickup_weight_convert);
8376: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_volume_convert '|| l_pickup_volume_convert);
8377: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_tripstops_tab(j).volume_uom_code);
8378: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_volume_uom '|| l_base_volume_uom);
8379: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_tripstops_tab(j).weight_uom_code);
8380: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_weight_uom '|| l_base_weight_uom);
8373: IF l_debug_on THEN
8374: WSH_DEBUG_SV.logmsg(l_module_name,'stop_id '|| l_cs_tripstops_tab(j).stop_id);
8375: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_weight_convert '|| l_pickup_weight_convert);
8376: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_volume_convert '|| l_pickup_volume_convert);
8377: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_tripstops_tab(j).volume_uom_code);
8378: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_volume_uom '|| l_base_volume_uom);
8379: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_tripstops_tab(j).weight_uom_code);
8380: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_weight_uom '|| l_base_weight_uom);
8381: END IF;
8374: WSH_DEBUG_SV.logmsg(l_module_name,'stop_id '|| l_cs_tripstops_tab(j).stop_id);
8375: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_weight_convert '|| l_pickup_weight_convert);
8376: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_volume_convert '|| l_pickup_volume_convert);
8377: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_tripstops_tab(j).volume_uom_code);
8378: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_volume_uom '|| l_base_volume_uom);
8379: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_tripstops_tab(j).weight_uom_code);
8380: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_weight_uom '|| l_base_weight_uom);
8381: END IF;
8382: -- triporigin_internalorg_id is that of first stop / any delivery being picked up at the first stop of the trip
8375: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_weight_convert '|| l_pickup_weight_convert);
8376: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_volume_convert '|| l_pickup_volume_convert);
8377: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_tripstops_tab(j).volume_uom_code);
8378: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_volume_uom '|| l_base_volume_uom);
8379: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_tripstops_tab(j).weight_uom_code);
8380: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_weight_uom '|| l_base_weight_uom);
8381: END IF;
8382: -- triporigin_internalorg_id is that of first stop / any delivery being picked up at the first stop of the trip
8383: -- organization_id is that of last stop / any delivery being dropped off at the last stop of the trip
8376: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_volume_convert '|| l_pickup_volume_convert);
8377: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_tripstops_tab(j).volume_uom_code);
8378: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_volume_uom '|| l_base_volume_uom);
8379: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_tripstops_tab(j).weight_uom_code);
8380: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_weight_uom '|| l_base_weight_uom);
8381: END IF;
8382: -- triporigin_internalorg_id is that of first stop / any delivery being picked up at the first stop of the trip
8383: -- organization_id is that of last stop / any delivery being dropped off at the last stop of the trip
8384:
8539: l_cs_input_tab(inp_itr).volume := l_total_pickup_volume;
8540: l_cs_input_tab(inp_itr).volume_uom_code := l_base_volume_uom;
8541:
8542: IF l_debug_on THEN
8543: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_cs_input_tab(inp_itr).trip_id);
8544: WSH_DEBUG_SV.logmsg(l_module_name,'name '|| l_cs_input_tab(inp_itr).trip_name);
8545: --WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_input_tab(inp_itr).freight_terms_code);
8546: WSH_DEBUG_SV.logmsg(l_module_name,'triporigin_internalorg_id '|| l_cs_input_tab(inp_itr).triporigin_internalorg_id);
8547: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8540: l_cs_input_tab(inp_itr).volume_uom_code := l_base_volume_uom;
8541:
8542: IF l_debug_on THEN
8543: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_cs_input_tab(inp_itr).trip_id);
8544: WSH_DEBUG_SV.logmsg(l_module_name,'name '|| l_cs_input_tab(inp_itr).trip_name);
8545: --WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_input_tab(inp_itr).freight_terms_code);
8546: WSH_DEBUG_SV.logmsg(l_module_name,'triporigin_internalorg_id '|| l_cs_input_tab(inp_itr).triporigin_internalorg_id);
8547: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8548: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8541:
8542: IF l_debug_on THEN
8543: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_cs_input_tab(inp_itr).trip_id);
8544: WSH_DEBUG_SV.logmsg(l_module_name,'name '|| l_cs_input_tab(inp_itr).trip_name);
8545: --WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_input_tab(inp_itr).freight_terms_code);
8546: WSH_DEBUG_SV.logmsg(l_module_name,'triporigin_internalorg_id '|| l_cs_input_tab(inp_itr).triporigin_internalorg_id);
8547: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8548: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8549: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8542: IF l_debug_on THEN
8543: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_cs_input_tab(inp_itr).trip_id);
8544: WSH_DEBUG_SV.logmsg(l_module_name,'name '|| l_cs_input_tab(inp_itr).trip_name);
8545: --WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_input_tab(inp_itr).freight_terms_code);
8546: WSH_DEBUG_SV.logmsg(l_module_name,'triporigin_internalorg_id '|| l_cs_input_tab(inp_itr).triporigin_internalorg_id);
8547: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8548: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8549: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8550: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8543: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_cs_input_tab(inp_itr).trip_id);
8544: WSH_DEBUG_SV.logmsg(l_module_name,'name '|| l_cs_input_tab(inp_itr).trip_name);
8545: --WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_input_tab(inp_itr).freight_terms_code);
8546: WSH_DEBUG_SV.logmsg(l_module_name,'triporigin_internalorg_id '|| l_cs_input_tab(inp_itr).triporigin_internalorg_id);
8547: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8548: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8549: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8550: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8551: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8544: WSH_DEBUG_SV.logmsg(l_module_name,'name '|| l_cs_input_tab(inp_itr).trip_name);
8545: --WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_input_tab(inp_itr).freight_terms_code);
8546: WSH_DEBUG_SV.logmsg(l_module_name,'triporigin_internalorg_id '|| l_cs_input_tab(inp_itr).triporigin_internalorg_id);
8547: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8548: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8549: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8550: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8551: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8552: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8545: --WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_input_tab(inp_itr).freight_terms_code);
8546: WSH_DEBUG_SV.logmsg(l_module_name,'triporigin_internalorg_id '|| l_cs_input_tab(inp_itr).triporigin_internalorg_id);
8547: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8548: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8549: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8550: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8551: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8552: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8553: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8546: WSH_DEBUG_SV.logmsg(l_module_name,'triporigin_internalorg_id '|| l_cs_input_tab(inp_itr).triporigin_internalorg_id);
8547: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8548: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8549: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8550: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8551: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8552: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8553: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8554: WSH_DEBUG_SV.logmsg(l_module_name,'gross_weight '|| l_cs_input_tab(inp_itr).gross_weight);
8547: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8548: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8549: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8550: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8551: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8552: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8553: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8554: WSH_DEBUG_SV.logmsg(l_module_name,'gross_weight '|| l_cs_input_tab(inp_itr).gross_weight);
8555: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_input_tab(inp_itr).weight_uom_code);
8548: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8549: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8550: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8551: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8552: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8553: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8554: WSH_DEBUG_SV.logmsg(l_module_name,'gross_weight '|| l_cs_input_tab(inp_itr).gross_weight);
8555: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_input_tab(inp_itr).weight_uom_code);
8556: WSH_DEBUG_SV.logmsg(l_module_name,'volume '|| l_cs_input_tab(inp_itr).volume);
8549: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8550: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8551: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8552: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8553: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8554: WSH_DEBUG_SV.logmsg(l_module_name,'gross_weight '|| l_cs_input_tab(inp_itr).gross_weight);
8555: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_input_tab(inp_itr).weight_uom_code);
8556: WSH_DEBUG_SV.logmsg(l_module_name,'volume '|| l_cs_input_tab(inp_itr).volume);
8557: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_input_tab(inp_itr).volume_uom_code);
8550: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8551: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8552: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8553: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8554: WSH_DEBUG_SV.logmsg(l_module_name,'gross_weight '|| l_cs_input_tab(inp_itr).gross_weight);
8555: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_input_tab(inp_itr).weight_uom_code);
8556: WSH_DEBUG_SV.logmsg(l_module_name,'volume '|| l_cs_input_tab(inp_itr).volume);
8557: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_input_tab(inp_itr).volume_uom_code);
8558: END IF;
8551: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8552: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8553: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8554: WSH_DEBUG_SV.logmsg(l_module_name,'gross_weight '|| l_cs_input_tab(inp_itr).gross_weight);
8555: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_input_tab(inp_itr).weight_uom_code);
8556: WSH_DEBUG_SV.logmsg(l_module_name,'volume '|| l_cs_input_tab(inp_itr).volume);
8557: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_input_tab(inp_itr).volume_uom_code);
8558: END IF;
8559:
8552: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8553: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8554: WSH_DEBUG_SV.logmsg(l_module_name,'gross_weight '|| l_cs_input_tab(inp_itr).gross_weight);
8555: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_input_tab(inp_itr).weight_uom_code);
8556: WSH_DEBUG_SV.logmsg(l_module_name,'volume '|| l_cs_input_tab(inp_itr).volume);
8557: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_input_tab(inp_itr).volume_uom_code);
8558: END IF;
8559:
8560: END IF; -- l_rg_trip
8553: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8554: WSH_DEBUG_SV.logmsg(l_module_name,'gross_weight '|| l_cs_input_tab(inp_itr).gross_weight);
8555: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_input_tab(inp_itr).weight_uom_code);
8556: WSH_DEBUG_SV.logmsg(l_module_name,'volume '|| l_cs_input_tab(inp_itr).volume);
8557: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_input_tab(inp_itr).volume_uom_code);
8558: END IF;
8559:
8560: END IF; -- l_rg_trip
8561: END IF;
8586:
8587: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,WSH_UTIL_CORE.G_RET_STS_WARNING)) THEN
8588:
8589: IF l_debug_on THEN
8590: WSH_DEBUG_SV.logmsg(l_module_name,'l_cs_result_tab.COUNT is '|| l_cs_result_tab.COUNT);
8591: END IF;
8592: IF (l_cs_result_tab.COUNT > 0) THEN
8593:
8594: rec_cnt := l_cs_result_tab.FIRST;
8606: --{
8607: l_trip_id := l_cs_result_tab(rec_cnt).trip_id;
8608: l_trip_result_type := l_cs_result_tab(rec_cnt).result_type;
8609: IF l_debug_on THEN
8610: WSH_DEBUG_SV.logmsg(l_module_name,'l_trip_id is '|| l_trip_id);
8611: WSH_DEBUG_SV.logmsg(l_module_name,'l_trip_result_type is '|| l_trip_result_type);
8612: WSH_DEBUG_SV.logmsg(l_module_name,'rule_id is '|| l_cs_result_tab(rec_cnt).rule_id);
8613: END IF;
8614:
8607: l_trip_id := l_cs_result_tab(rec_cnt).trip_id;
8608: l_trip_result_type := l_cs_result_tab(rec_cnt).result_type;
8609: IF l_debug_on THEN
8610: WSH_DEBUG_SV.logmsg(l_module_name,'l_trip_id is '|| l_trip_id);
8611: WSH_DEBUG_SV.logmsg(l_module_name,'l_trip_result_type is '|| l_trip_result_type);
8612: WSH_DEBUG_SV.logmsg(l_module_name,'rule_id is '|| l_cs_result_tab(rec_cnt).rule_id);
8613: END IF;
8614:
8615: IF l_trip_result_type = 'MULTILEG' THEN
8608: l_trip_result_type := l_cs_result_tab(rec_cnt).result_type;
8609: IF l_debug_on THEN
8610: WSH_DEBUG_SV.logmsg(l_module_name,'l_trip_id is '|| l_trip_id);
8611: WSH_DEBUG_SV.logmsg(l_module_name,'l_trip_result_type is '|| l_trip_result_type);
8612: WSH_DEBUG_SV.logmsg(l_module_name,'rule_id is '|| l_cs_result_tab(rec_cnt).rule_id);
8613: END IF;
8614:
8615: IF l_trip_result_type = 'MULTILEG' THEN
8616: IF l_trip_id <> l_prev_trip_id THEN
8631: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_UPD_TRIP_RANK_LIST');
8632: FND_MESSAGE.SET_TOKEN('TRIPID',l_trip_id);
8633: --FND_MSG_PUB.ADD;
8634: IF l_debug_on THEN
8635: WSH_DEBUG_SV.logmsg(l_module_name,'Trip already has a ranked list ');
8636: END IF;
8637: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8638: WSH_UTIL_CORE.add_message(x_return_status);
8639: END IF;
8714: l_ranked_list(list_cnt).IS_CURRENT := 'N';
8715: END IF;
8716:
8717: IF l_debug_on THEN
8718: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_trip_id);
8719: WSH_DEBUG_SV.logmsg(l_module_name,'rank sequence '|| l_cs_result_tab(rec_cnt).rank);
8720: WSH_DEBUG_SV.logmsg(l_module_name,'carrier_id '|| l_cs_result_tab(rec_cnt).carrier_id);
8721: WSH_DEBUG_SV.logmsg(l_module_name,'service_level '|| l_cs_result_tab(rec_cnt).service_level);
8722: WSH_DEBUG_SV.logmsg(l_module_name,'mode_of_transport '|| l_cs_result_tab(rec_cnt).mode_of_transport);
8715: END IF;
8716:
8717: IF l_debug_on THEN
8718: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_trip_id);
8719: WSH_DEBUG_SV.logmsg(l_module_name,'rank sequence '|| l_cs_result_tab(rec_cnt).rank);
8720: WSH_DEBUG_SV.logmsg(l_module_name,'carrier_id '|| l_cs_result_tab(rec_cnt).carrier_id);
8721: WSH_DEBUG_SV.logmsg(l_module_name,'service_level '|| l_cs_result_tab(rec_cnt).service_level);
8722: WSH_DEBUG_SV.logmsg(l_module_name,'mode_of_transport '|| l_cs_result_tab(rec_cnt).mode_of_transport);
8723: WSH_DEBUG_SV.logmsg(l_module_name,'consignee_carrier_ac_no '|| l_cs_result_tab(rec_cnt).consignee_carrier_ac_no);
8716:
8717: IF l_debug_on THEN
8718: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_trip_id);
8719: WSH_DEBUG_SV.logmsg(l_module_name,'rank sequence '|| l_cs_result_tab(rec_cnt).rank);
8720: WSH_DEBUG_SV.logmsg(l_module_name,'carrier_id '|| l_cs_result_tab(rec_cnt).carrier_id);
8721: WSH_DEBUG_SV.logmsg(l_module_name,'service_level '|| l_cs_result_tab(rec_cnt).service_level);
8722: WSH_DEBUG_SV.logmsg(l_module_name,'mode_of_transport '|| l_cs_result_tab(rec_cnt).mode_of_transport);
8723: WSH_DEBUG_SV.logmsg(l_module_name,'consignee_carrier_ac_no '|| l_cs_result_tab(rec_cnt).consignee_carrier_ac_no);
8724: WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_result_tab(rec_cnt).freight_terms_code);
8717: IF l_debug_on THEN
8718: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_trip_id);
8719: WSH_DEBUG_SV.logmsg(l_module_name,'rank sequence '|| l_cs_result_tab(rec_cnt).rank);
8720: WSH_DEBUG_SV.logmsg(l_module_name,'carrier_id '|| l_cs_result_tab(rec_cnt).carrier_id);
8721: WSH_DEBUG_SV.logmsg(l_module_name,'service_level '|| l_cs_result_tab(rec_cnt).service_level);
8722: WSH_DEBUG_SV.logmsg(l_module_name,'mode_of_transport '|| l_cs_result_tab(rec_cnt).mode_of_transport);
8723: WSH_DEBUG_SV.logmsg(l_module_name,'consignee_carrier_ac_no '|| l_cs_result_tab(rec_cnt).consignee_carrier_ac_no);
8724: WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_result_tab(rec_cnt).freight_terms_code);
8725: END IF;
8718: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_trip_id);
8719: WSH_DEBUG_SV.logmsg(l_module_name,'rank sequence '|| l_cs_result_tab(rec_cnt).rank);
8720: WSH_DEBUG_SV.logmsg(l_module_name,'carrier_id '|| l_cs_result_tab(rec_cnt).carrier_id);
8721: WSH_DEBUG_SV.logmsg(l_module_name,'service_level '|| l_cs_result_tab(rec_cnt).service_level);
8722: WSH_DEBUG_SV.logmsg(l_module_name,'mode_of_transport '|| l_cs_result_tab(rec_cnt).mode_of_transport);
8723: WSH_DEBUG_SV.logmsg(l_module_name,'consignee_carrier_ac_no '|| l_cs_result_tab(rec_cnt).consignee_carrier_ac_no);
8724: WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_result_tab(rec_cnt).freight_terms_code);
8725: END IF;
8726: -- For the last record in l_cs_result_tab attach ranked list here
8719: WSH_DEBUG_SV.logmsg(l_module_name,'rank sequence '|| l_cs_result_tab(rec_cnt).rank);
8720: WSH_DEBUG_SV.logmsg(l_module_name,'carrier_id '|| l_cs_result_tab(rec_cnt).carrier_id);
8721: WSH_DEBUG_SV.logmsg(l_module_name,'service_level '|| l_cs_result_tab(rec_cnt).service_level);
8722: WSH_DEBUG_SV.logmsg(l_module_name,'mode_of_transport '|| l_cs_result_tab(rec_cnt).mode_of_transport);
8723: WSH_DEBUG_SV.logmsg(l_module_name,'consignee_carrier_ac_no '|| l_cs_result_tab(rec_cnt).consignee_carrier_ac_no);
8724: WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_result_tab(rec_cnt).freight_terms_code);
8725: END IF;
8726: -- For the last record in l_cs_result_tab attach ranked list here
8727:
8720: WSH_DEBUG_SV.logmsg(l_module_name,'carrier_id '|| l_cs_result_tab(rec_cnt).carrier_id);
8721: WSH_DEBUG_SV.logmsg(l_module_name,'service_level '|| l_cs_result_tab(rec_cnt).service_level);
8722: WSH_DEBUG_SV.logmsg(l_module_name,'mode_of_transport '|| l_cs_result_tab(rec_cnt).mode_of_transport);
8723: WSH_DEBUG_SV.logmsg(l_module_name,'consignee_carrier_ac_no '|| l_cs_result_tab(rec_cnt).consignee_carrier_ac_no);
8724: WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_result_tab(rec_cnt).freight_terms_code);
8725: END IF;
8726: -- For the last record in l_cs_result_tab attach ranked list here
8727:
8728: -- Replace ranked list if the trip already had a ranked list attached
8770: --
8771: -- Debug Statements
8772: --
8773: IF l_debug_on THEN
8774: WSH_DEBUG_SV.logmsg(l_module_name, 'NO RANKED RESULT FOUND FROM PROCESS CARRIER SELECTION ' );
8775: END IF;
8776: --
8777:
8778: END IF;
8786: --
8787: -- Debug Statements
8788: --
8789: IF l_debug_on THEN
8790: WSH_DEBUG_SV.logmsg(l_module_name, 'NO CARRIER FOUND FROM PROCESS CARRIER SELECTION ' );
8791: END IF;
8792: --
8793: END IF;
8794: ELSE
8802: --
8803: -- Debug Statements
8804: --
8805: IF l_debug_on THEN
8806: WSH_DEBUG_SV.logmsg(l_module_name, 'NO VALID TRIP FOUND FOR PROCESS CARRIER SELECTION ' );
8807: END IF;
8808: --
8809: END IF;
8810:
8816: p_data => x_msg_data ,
8817: p_encoded => FND_API.G_FALSE );
8818:
8819: IF l_debug_on THEN
8820: wsh_debug_sv.log (l_module_name,'No. of messages stacked : ',to_char(x_msg_count));
8821: wsh_debug_sv.pop(l_module_name);
8822: END IF;
8823:
8824: --
8817: p_encoded => FND_API.G_FALSE );
8818:
8819: IF l_debug_on THEN
8820: wsh_debug_sv.log (l_module_name,'No. of messages stacked : ',to_char(x_msg_count));
8821: wsh_debug_sv.pop(l_module_name);
8822: END IF;
8823:
8824: --
8825:
8829: ROLLBACK TO before_trip_update;
8830: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
8831: --
8832: IF l_debug_on THEN
8833: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8834: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
8835: END IF;
8836: --
8837:
8830: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
8831: --
8832: IF l_debug_on THEN
8833: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8834: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
8835: END IF;
8836: --
8837:
8838: WHEN others THEN
8862: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.PROCESS_CARRIER_SELECTION');
8863: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8864:
8865: IF l_debug_on THEN
8866: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8867: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8868: END IF;
8869:
8870: END PROCESS_CARRIER_SELECTION;
8863: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8864:
8865: IF l_debug_on THEN
8866: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8867: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8868: END IF;
8869:
8870: END PROCESS_CARRIER_SELECTION;
8871:
8923: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8924: --
8925: IF l_debug_on IS NULL
8926: THEN
8927: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8928: END IF;
8929: --
8930: IF l_debug_on THEN
8931: wsh_debug_sv.push (l_module_name);
8927: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8928: END IF;
8929: --
8930: IF l_debug_on THEN
8931: wsh_debug_sv.push (l_module_name);
8932: WSH_DEBUG_SV.log(l_module_name,'p_unassign_all', p_unassign_all);
8933: WSH_DEBUG_SV.log(l_module_name,'p_caller', p_caller);
8934: END IF;
8935:
8928: END IF;
8929: --
8930: IF l_debug_on THEN
8931: wsh_debug_sv.push (l_module_name);
8932: WSH_DEBUG_SV.log(l_module_name,'p_unassign_all', p_unassign_all);
8933: WSH_DEBUG_SV.log(l_module_name,'p_caller', p_caller);
8934: END IF;
8935:
8936: FOR i in 1..p_trip_id_tab.count LOOP
8929: --
8930: IF l_debug_on THEN
8931: wsh_debug_sv.push (l_module_name);
8932: WSH_DEBUG_SV.log(l_module_name,'p_unassign_all', p_unassign_all);
8933: WSH_DEBUG_SV.log(l_module_name,'p_caller', p_caller);
8934: END IF;
8935:
8936: FOR i in 1..p_trip_id_tab.count LOOP
8937:
8935:
8936: FOR i in 1..p_trip_id_tab.count LOOP
8937:
8938: IF l_debug_on THEN
8939: WSH_DEBUG_SV.log(l_module_name,'p_trip_id_tab', p_trip_id_tab(i));
8940: END IF;
8941: -- separate the consol deliveries from the content deliveries
8942: -- that are directly assigned to the trip
8943: l_delivery_tab.delete;
8963:
8964: FOR i in 1..l_consol_delivery_tab.count LOOP
8965:
8966: IF l_debug_on THEN
8967: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.Unassign_Dels_from_Consol_Del',WSH_DEBUG_SV.C_PROC_LEVEL);
8968: END IF;
8969: WSH_NEW_DELIVERY_ACTIONS.Unassign_Dels_from_Consol_Del(
8970: p_parent_del => l_consol_delivery_tab(i),
8971: p_caller => p_caller,
8987: IF l_delivery_tab.count = 0 THEN
8988: RAISE WSH_INVALID_ACTION;
8989: END IF;
8990: IF l_debug_on THEN
8991: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_Trips_Actions.Unassign_Trip',WSH_DEBUG_SV.C_PROC_LEVEL);
8992: END IF;
8993:
8994: WSH_Trips_Actions.Unassign_Trip(
8995: p_del_rows => l_delivery_tab,
9018: --
9019: -- Debug Statements
9020: --
9021: IF l_debug_on THEN
9022: WSH_DEBUG_SV.pop(l_module_name);
9023: END IF;
9024: EXCEPTION
9025: WHEN WSH_INVALID_ACTION THEN
9026: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9028: -- Debug Statements
9029: FND_MESSAGE.SET_NAME('WSH','WSH_REMOVE_CONSOL_ERR');
9030: wsh_util_core.add_message(x_return_status);
9031: IF l_debug_on THEN
9032: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_INVALID_ACTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9033: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INVALID_ACTION');
9034: END IF;
9035:
9036: WHEN FND_API.G_EXC_ERROR THEN
9029: FND_MESSAGE.SET_NAME('WSH','WSH_REMOVE_CONSOL_ERR');
9030: wsh_util_core.add_message(x_return_status);
9031: IF l_debug_on THEN
9032: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_INVALID_ACTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9033: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INVALID_ACTION');
9034: END IF;
9035:
9036: WHEN FND_API.G_EXC_ERROR THEN
9037: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9038: --
9039: -- Debug Statements
9040: --
9041: IF l_debug_on THEN
9042: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9043: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9044: END IF;
9045: WHEN OTHERS THEN
9046: wsh_util_core.default_handler('wsh_trips_actions',l_module_name);
9039: -- Debug Statements
9040: --
9041: IF l_debug_on THEN
9042: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9043: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9044: END IF;
9045: WHEN OTHERS THEN
9046: wsh_util_core.default_handler('wsh_trips_actions',l_module_name);
9047: --
9045: WHEN OTHERS THEN
9046: wsh_util_core.default_handler('wsh_trips_actions',l_module_name);
9047: --
9048: IF l_debug_on THEN
9049: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
9050: END IF;
9051:
9052: END Remove_Consolidation;
9053: --