[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;
149: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
150: --
151: IF l_debug_on IS NULL
152: THEN
153: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
154: END IF;
155: --
156: IF l_debug_on THEN
157: wsh_debug_sv.push (l_module_name);
153: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
154: END IF;
155: --
156: IF l_debug_on THEN
157: wsh_debug_sv.push (l_module_name);
158: WSH_DEBUG_SV.log(l_module_name,'p_trip_id', p_trip_id);
159: WSH_DEBUG_SV.log(l_module_name,'p_trip_name', p_trip_name);
160: END IF;
161:
154: END IF;
155: --
156: IF l_debug_on THEN
157: wsh_debug_sv.push (l_module_name);
158: WSH_DEBUG_SV.log(l_module_name,'p_trip_id', p_trip_id);
159: WSH_DEBUG_SV.log(l_module_name,'p_trip_name', p_trip_name);
160: END IF;
161:
162: x_return_status := wsh_util_core.g_ret_sts_success;
155: --
156: IF l_debug_on THEN
157: wsh_debug_sv.push (l_module_name);
158: WSH_DEBUG_SV.log(l_module_name,'p_trip_id', p_trip_id);
159: WSH_DEBUG_SV.log(l_module_name,'p_trip_name', p_trip_name);
160: END IF;
161:
162: x_return_status := wsh_util_core.g_ret_sts_success;
163:
242: end if;
243: end if;
244:
245: IF l_debug_on THEN
246: WSH_DEBUG_SV.pop(l_module_name);
247: END IF;
248:
249: EXCEPTION
250:
251: WHEN e_trip_confirm_exception THEN
252: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
253: wsh_util_core.add_message(x_return_status,l_module_name);
254: IF l_debug_on THEN
255: wsh_debug_sv.log (l_module_name,'G_EXC_ERROR');
256: WSH_DEBUG_SV.pop(l_module_name);
257: END IF;
258:
259: WHEN OTHERS THEN
252: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
253: wsh_util_core.add_message(x_return_status,l_module_name);
254: IF l_debug_on THEN
255: wsh_debug_sv.log (l_module_name,'G_EXC_ERROR');
256: WSH_DEBUG_SV.pop(l_module_name);
257: END IF;
258:
259: WHEN OTHERS THEN
260:
261: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.Get_Trip_Defaults');
262:
263: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
264: IF l_debug_on THEN
265: wsh_debug_sv.log (l_module_name,'Others',substr(sqlerrm,1,200));
266: WSH_DEBUG_SV.pop(l_module_name);
267: END IF;
268:
269:
262:
263: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
264: IF l_debug_on THEN
265: wsh_debug_sv.log (l_module_name,'Others',substr(sqlerrm,1,200));
266: WSH_DEBUG_SV.pop(l_module_name);
267: END IF;
268:
269:
270: END Get_Trip_Defaults;
363: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
364: --
365: IF l_debug_on IS NULL
366: THEN
367: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
368: END IF;
369: --
370: --
371: IF l_debug_on THEN
368: END IF;
369: --
370: --
371: IF l_debug_on THEN
372: WSH_DEBUG_SV.push(l_module_name);
373: --
374: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
375: WSH_DEBUG_SV.log(l_module_name,'P_ACTION_FLAG',P_ACTION_FLAG);
376: WSH_DEBUG_SV.log(l_module_name,'P_INTRANSIT_FLAG',P_INTRANSIT_FLAG);
370: --
371: IF l_debug_on THEN
372: WSH_DEBUG_SV.push(l_module_name);
373: --
374: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
375: WSH_DEBUG_SV.log(l_module_name,'P_ACTION_FLAG',P_ACTION_FLAG);
376: WSH_DEBUG_SV.log(l_module_name,'P_INTRANSIT_FLAG',P_INTRANSIT_FLAG);
377: WSH_DEBUG_SV.log(l_module_name,'P_CLOSE_FLAG',P_CLOSE_FLAG);
378: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
371: IF l_debug_on THEN
372: WSH_DEBUG_SV.push(l_module_name);
373: --
374: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
375: WSH_DEBUG_SV.log(l_module_name,'P_ACTION_FLAG',P_ACTION_FLAG);
376: WSH_DEBUG_SV.log(l_module_name,'P_INTRANSIT_FLAG',P_INTRANSIT_FLAG);
377: WSH_DEBUG_SV.log(l_module_name,'P_CLOSE_FLAG',P_CLOSE_FLAG);
378: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
379: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
372: WSH_DEBUG_SV.push(l_module_name);
373: --
374: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
375: WSH_DEBUG_SV.log(l_module_name,'P_ACTION_FLAG',P_ACTION_FLAG);
376: WSH_DEBUG_SV.log(l_module_name,'P_INTRANSIT_FLAG',P_INTRANSIT_FLAG);
377: WSH_DEBUG_SV.log(l_module_name,'P_CLOSE_FLAG',P_CLOSE_FLAG);
378: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
379: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
380: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
373: --
374: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
375: WSH_DEBUG_SV.log(l_module_name,'P_ACTION_FLAG',P_ACTION_FLAG);
376: WSH_DEBUG_SV.log(l_module_name,'P_INTRANSIT_FLAG',P_INTRANSIT_FLAG);
377: WSH_DEBUG_SV.log(l_module_name,'P_CLOSE_FLAG',P_CLOSE_FLAG);
378: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
379: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
380: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
381: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
374: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
375: WSH_DEBUG_SV.log(l_module_name,'P_ACTION_FLAG',P_ACTION_FLAG);
376: WSH_DEBUG_SV.log(l_module_name,'P_INTRANSIT_FLAG',P_INTRANSIT_FLAG);
377: WSH_DEBUG_SV.log(l_module_name,'P_CLOSE_FLAG',P_CLOSE_FLAG);
378: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
379: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
380: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
381: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
382: WSH_DEBUG_SV.log(l_module_name,'P_BOL_FLAG',P_BOL_FLAG);
375: WSH_DEBUG_SV.log(l_module_name,'P_ACTION_FLAG',P_ACTION_FLAG);
376: WSH_DEBUG_SV.log(l_module_name,'P_INTRANSIT_FLAG',P_INTRANSIT_FLAG);
377: WSH_DEBUG_SV.log(l_module_name,'P_CLOSE_FLAG',P_CLOSE_FLAG);
378: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
379: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
380: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
381: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
382: WSH_DEBUG_SV.log(l_module_name,'P_BOL_FLAG',P_BOL_FLAG);
383: WSH_DEBUG_SV.log(l_module_name,'P_DEFER_INTERFACE_FLAG',P_DEFER_INTERFACE_FLAG);
376: WSH_DEBUG_SV.log(l_module_name,'P_INTRANSIT_FLAG',P_INTRANSIT_FLAG);
377: WSH_DEBUG_SV.log(l_module_name,'P_CLOSE_FLAG',P_CLOSE_FLAG);
378: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
379: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
380: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
381: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
382: WSH_DEBUG_SV.log(l_module_name,'P_BOL_FLAG',P_BOL_FLAG);
383: WSH_DEBUG_SV.log(l_module_name,'P_DEFER_INTERFACE_FLAG',P_DEFER_INTERFACE_FLAG);
384: WSH_DEBUG_SV.log(l_module_name,'P_MBOL_FLAG',P_MBOL_FLAG);
377: WSH_DEBUG_SV.log(l_module_name,'P_CLOSE_FLAG',P_CLOSE_FLAG);
378: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
379: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
380: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
381: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
382: WSH_DEBUG_SV.log(l_module_name,'P_BOL_FLAG',P_BOL_FLAG);
383: WSH_DEBUG_SV.log(l_module_name,'P_DEFER_INTERFACE_FLAG',P_DEFER_INTERFACE_FLAG);
384: WSH_DEBUG_SV.log(l_module_name,'P_MBOL_FLAG',P_MBOL_FLAG);
385:
378: WSH_DEBUG_SV.log(l_module_name,'P_STAGE_DEL_FLAG',P_STAGE_DEL_FLAG);
379: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
380: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
381: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
382: WSH_DEBUG_SV.log(l_module_name,'P_BOL_FLAG',P_BOL_FLAG);
383: WSH_DEBUG_SV.log(l_module_name,'P_DEFER_INTERFACE_FLAG',P_DEFER_INTERFACE_FLAG);
384: WSH_DEBUG_SV.log(l_module_name,'P_MBOL_FLAG',P_MBOL_FLAG);
385:
386: END IF;
379: WSH_DEBUG_SV.log(l_module_name,'P_REPORT_SET_ID',P_REPORT_SET_ID);
380: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
381: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
382: WSH_DEBUG_SV.log(l_module_name,'P_BOL_FLAG',P_BOL_FLAG);
383: WSH_DEBUG_SV.log(l_module_name,'P_DEFER_INTERFACE_FLAG',P_DEFER_INTERFACE_FLAG);
384: WSH_DEBUG_SV.log(l_module_name,'P_MBOL_FLAG',P_MBOL_FLAG);
385:
386: END IF;
387: --
380: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
381: WSH_DEBUG_SV.log(l_module_name,'P_ACTUAL_DEP_DATE',P_ACTUAL_DEP_DATE);
382: WSH_DEBUG_SV.log(l_module_name,'P_BOL_FLAG',P_BOL_FLAG);
383: WSH_DEBUG_SV.log(l_module_name,'P_DEFER_INTERFACE_FLAG',P_DEFER_INTERFACE_FLAG);
384: WSH_DEBUG_SV.log(l_module_name,'P_MBOL_FLAG',P_MBOL_FLAG);
385:
386: END IF;
387: --
388:
408:
409: -- Check for Exceptions against Trip and its contents, only if trip is being set to In-Transit or Closed
410: IF p_intransit_flag = 'Y' OR p_close_flag = 'Y' THEN
411: IF l_debug_on THEN
412: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.Check_Exceptions',WSH_DEBUG_SV.C_PROC_LEVEL);
413: END IF;
414: l_exceptions_tab.delete;
415: l_exp_logged := FALSE;
416: WSH_XC_UTIL.Check_Exceptions (
480: END IF;
481:
482: --
483: IF l_debug_on THEN
484: WSH_DEBUG_SV.log(l_module_name,'L_STOP_ID',L_STOP_ID);
485: END IF;
486: --
487:
488: g_rate_trip_id := null;
513: END IF;
514:
515: --
516: IF l_debug_on THEN
517: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_ACTIONS.Confirm_Stop',WSH_DEBUG_SV.C_PROC_LEVEL);
518: END IF;
519: --
520: WSH_TRIP_STOPS_ACTIONS.Confirm_Stop (
521: p_stop_id => stop_rec.stop_id,
564: FETCH c_trip_status INTO l_trip_status;
565: IF c_trip_status%NOTFOUND THEN
566: CLOSE c_trip_status;
567: IF l_debug_on THEN
568: WSH_DEBUG_SV.logmsg(l_module_name,'Trip not found :'||p_trip_id,WSH_DEBUG_SV.C_PROC_LEVEL);
569: END IF;
570: raise no_data_found;
571: END IF;
572: CLOSE c_trip_status;
572: CLOSE c_trip_status;
573:
574: IF l_trip_status = 'CL' THEN
575: IF l_debug_on THEN
576: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.Close_Exceptions',WSH_DEBUG_SV.C_PROC_LEVEL);
577: END IF;
578: WSH_XC_UTIL.Close_Exceptions (
579: p_api_version => 1.0,
580: x_return_status => l_return_status,
606: END IF;
607:
608: --Bug# 2867209 - Start
609: IF l_debug_on THEN
610: WSH_DEBUG_SV.log(l_module_name,'l_is_action_not_performed',l_is_action_not_performed);
611: END IF;
612:
613: IF x_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS AND P_CLOSE_FLAG = 'N' AND l_is_action_not_performed THEN
614: FND_MESSAGE.SET_NAME('WSH','WSH_NO_CHANGE_ACTION');
618: --
619:
620: --Raise Event: Pick To Pod Workflow
621: IF l_debug_on THEN
622: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.RAISE_EVENT',WSH_DEBUG_SV.C_PROC_LEVEL);
623: END IF;
624:
625: WSH_WF_STD.Raise_Event(
626: p_entity_type => 'TRIP',
628: p_event => 'oracle.apps.wsh.trip.gen.shipconfirmed' ,
629: x_return_status => l_wf_rs ) ;
630:
631: IF l_debug_on THEN
632: WSH_DEBUG_SV.log(l_module_name,'Trip ID is ', p_trip_id );
633: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
634: END IF;
635: --Done Raise Event: Pick To Pod Workflow
636:
629: x_return_status => l_wf_rs ) ;
630:
631: IF l_debug_on THEN
632: WSH_DEBUG_SV.log(l_module_name,'Trip ID is ', p_trip_id );
633: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
634: END IF;
635: --Done Raise Event: Pick To Pod Workflow
636:
637: -- Debug Statements
636:
637: -- Debug Statements
638: --
639: IF l_debug_on THEN
640: WSH_DEBUG_SV.pop(l_module_name);
641: END IF;
642: --
643:
644:
645: EXCEPTION
646: WHEN trip_confirm_error THEN
647: --
648: IF l_debug_on THEN
649: WSH_DEBUG_SV.logmsg(l_module_name,'trip_confirm_error exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
650: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:trip_confirm_error');
651: END IF;
652: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_CONFIRM_ERROR');
653: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
646: WHEN trip_confirm_error THEN
647: --
648: IF l_debug_on THEN
649: WSH_DEBUG_SV.logmsg(l_module_name,'trip_confirm_error exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
650: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:trip_confirm_error');
651: END IF;
652: FND_MESSAGE.SET_NAME('WSH','WSH_TRIP_CONFIRM_ERROR');
653: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
654: wsh_util_core.add_message(x_return_status);
655: --
656: WHEN check_exceptions THEN
657: --
658: IF l_debug_on THEN
659: WSH_DEBUG_SV.logmsg(l_module_name,'Check_Exceptions exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
660: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:Check_Exceptions');
661: END IF;
662: --
663: WSH_UTIL_CORE.get_messages('N', l_msg_summary, l_msg_details, x_msg_count);
656: WHEN check_exceptions THEN
657: --
658: IF l_debug_on THEN
659: WSH_DEBUG_SV.logmsg(l_module_name,'Check_Exceptions exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
660: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:Check_Exceptions');
661: END IF;
662: --
663: WSH_UTIL_CORE.get_messages('N', l_msg_summary, l_msg_details, x_msg_count);
664: --
662: --
663: WSH_UTIL_CORE.get_messages('N', l_msg_summary, l_msg_details, x_msg_count);
664: --
665: IF l_debug_on THEN
666: WSH_DEBUG_SV.logmsg(l_module_name, L_MSG_SUMMARY );
667: END IF;
668: --
669: if x_msg_count > 1 then
670: x_msg_data := l_msg_summary || l_msg_details;
678: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
679: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.CONFIRM_TRIP');
680: --
681: IF l_debug_on THEN
682: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
683: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
684: END IF;
685: --
686: WSH_UTIL_CORE.get_messages('N', l_msg_summary, l_msg_details, x_msg_count);
679: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.CONFIRM_TRIP');
680: --
681: IF l_debug_on THEN
682: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
683: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
684: END IF;
685: --
686: WSH_UTIL_CORE.get_messages('N', l_msg_summary, l_msg_details, x_msg_count);
687: --
685: --
686: WSH_UTIL_CORE.get_messages('N', l_msg_summary, l_msg_details, x_msg_count);
687: --
688: IF l_debug_on THEN
689: WSH_DEBUG_SV.logmsg(l_module_name, L_MSG_SUMMARY );
690: END IF;
691: --
692: if x_msg_count > 1 then
693: x_msg_data := l_msg_summary || l_msg_details;
748: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
749: --
750: IF l_debug_on IS NULL
751: THEN
752: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
753: END IF;
754: --
755: IF l_debug_on THEN
756: WSH_DEBUG_SV.push(l_module_name);
752: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
753: END IF;
754: --
755: IF l_debug_on THEN
756: WSH_DEBUG_SV.push(l_module_name);
757: --
758: WSH_DEBUG_SV.log(l_module_name,'P_ACTION',P_ACTION);
759: END IF;
760: --
754: --
755: IF l_debug_on THEN
756: WSH_DEBUG_SV.push(l_module_name);
757: --
758: WSH_DEBUG_SV.log(l_module_name,'P_ACTION',P_ACTION);
759: END IF;
760: --
761: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
762:
773: --
774: -- Debug Statements
775: --
776: IF l_debug_on THEN
777: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_VALIDATIONS.CHECK_PLAN',WSH_DEBUG_SV.C_PROC_LEVEL);
778: END IF;
779: --
780: wsh_trip_validations.check_plan(p_trip_rows(i), x_return_status);
781: ELSIF (p_action='UNPLAN') THEN
782: --
783: -- Debug Statements
784: --
785: IF l_debug_on THEN
786: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_VALIDATIONS.CHECK_UNPLAN',WSH_DEBUG_SV.C_PROC_LEVEL);
787: END IF;
788: --
789: wsh_trip_validations.check_unplan(p_trip_rows(i), x_return_status);
790: END IF;
842: --
843: -- Debug Statements
844: --
845: IF l_debug_on THEN
846: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
847: END IF;
848: --
849: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_rows(i)));
850: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
890: --
891: -- Debug Statements
892: --
893: IF l_debug_on THEN
894: WSH_DEBUG_SV.pop(l_module_name);
895: END IF;
896: --
897: EXCEPTION
898: WHEN others THEN
902: --
903: -- Debug Statements
904: --
905: IF l_debug_on THEN
906: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
907: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
908: END IF;
909: --
910: END Plan;
903: -- Debug Statements
904: --
905: IF l_debug_on THEN
906: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
907: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
908: END IF;
909: --
910: END Plan;
911:
945: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
946: --
947: IF l_debug_on IS NULL
948: THEN
949: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
950: END IF;
951: --
952: IF l_debug_on THEN
953: WSH_DEBUG_SV.push(l_module_name);
949: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
950: END IF;
951: --
952: IF l_debug_on THEN
953: WSH_DEBUG_SV.push(l_module_name);
954: --
955: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
956: WSH_DEBUG_SV.log(l_module_name,'P_STATUS_CODE',P_STATUS_CODE);
957: END IF;
951: --
952: IF l_debug_on THEN
953: WSH_DEBUG_SV.push(l_module_name);
954: --
955: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
956: WSH_DEBUG_SV.log(l_module_name,'P_STATUS_CODE',P_STATUS_CODE);
957: END IF;
958:
959: /**
952: IF l_debug_on THEN
953: WSH_DEBUG_SV.push(l_module_name);
954: --
955: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
956: WSH_DEBUG_SV.log(l_module_name,'P_STATUS_CODE',P_STATUS_CODE);
957: END IF;
958:
959: /**
960: -- J-IB-NPARIKH-{
968:
969: -- Check for Exceptions if p_status_code = 'CL' or 'IT'
970: IF p_status_code IN ('IT','CL') THEN
971: IF l_debug_on THEN
972: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.Check_Exceptions',WSH_DEBUG_SV.C_PROC_LEVEL);
973: END IF;
974: l_exceptions_tab.delete;
975: l_exp_logged := FALSE;
976: WSH_XC_UTIL.Check_Exceptions (
1030: --
1031: -- Debug Statements
1032: --
1033: IF l_debug_on THEN
1034: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_GRP.GET_TRIP_DETAILS_PVT',WSH_DEBUG_SV.C_PROC_LEVEL);
1035: END IF;
1036: --
1037: wsh_trips_grp.get_trip_details_pvt
1038: (p_trip_id => p_trip_id,
1044: --
1045: -- Debug Statements
1046: --
1047: IF l_debug_on THEN
1048: WSH_DEBUG_SV.pop(l_module_name);
1049: END IF;
1050: --
1051: RETURN;
1052: END IF;
1055: --
1056: -- Debug Statements
1057: --
1058: IF l_debug_on THEN
1059: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FTE_INTEGRATION.TRIP_STOP_VALIDATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
1060: END IF;
1061: --
1062: wsh_fte_integration.trip_stop_validations
1063: (p_stop_rec => l_stop_rec,
1073: --
1074: -- Debug Statements
1075: --
1076: IF l_debug_on THEN
1077: WSH_DEBUG_SV.pop(l_module_name);
1078: END IF;
1079: --
1080: RETURN;
1081: END IF;
1098: --
1099: -- Debug Statements
1100: --
1101: IF l_debug_on THEN
1102: WSH_DEBUG_SV.pop(l_module_name);
1103: END IF;
1104: --
1105: RETURN;
1106: END IF;
1107:
1108: -- Close Exceptions for the Trip and its contents
1109: IF p_status_code IN ('IT','CL') THEN
1110: IF l_debug_on THEN
1111: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.Close_Exceptions',WSH_DEBUG_SV.C_PROC_LEVEL);
1112: END IF;
1113: WSH_XC_UTIL.Close_Exceptions (
1114: p_api_version => 1.0,
1115: x_return_status => l_return_status,
1137:
1138: -- Debug Statements
1139: --
1140: IF l_debug_on THEN
1141: WSH_DEBUG_SV.pop(l_module_name);
1142: END IF;
1143: --
1144:
1145: EXCEPTION
1146: WHEN check_exceptions THEN
1147: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1148: --
1149: IF l_debug_on THEN
1150: WSH_DEBUG_SV.logmsg(l_module_name,'Check_Exceptions exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1151: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:Check_Exceptions');
1152: END IF;
1153: --
1154:
1147: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1148: --
1149: IF l_debug_on THEN
1150: WSH_DEBUG_SV.logmsg(l_module_name,'Check_Exceptions exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1151: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:Check_Exceptions');
1152: END IF;
1153: --
1154:
1155: WHEN others THEN
1156: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.CHANGE_STATUS');
1157: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1158: --
1159: IF l_debug_on THEN
1160: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1161: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1162: END IF;
1163: --
1164:
1157: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1158: --
1159: IF l_debug_on THEN
1160: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1161: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1162: END IF;
1163: --
1164:
1165: END Change_Status;
1234: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1235: --
1236: IF l_debug_on IS NULL
1237: THEN
1238: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1239: END IF;
1240: --
1241: IF l_debug_on THEN
1242: WSH_DEBUG_SV.push(l_module_name);
1238: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1239: END IF;
1240: --
1241: IF l_debug_on THEN
1242: WSH_DEBUG_SV.push(l_module_name);
1243: --
1244: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.trip_id ', p_in_rec.trip_id );
1245: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
1246: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.new_Status_code ', p_in_rec.new_Status_code );
1240: --
1241: IF l_debug_on THEN
1242: WSH_DEBUG_SV.push(l_module_name);
1243: --
1244: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.trip_id ', p_in_rec.trip_id );
1245: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
1246: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.new_Status_code ', p_in_rec.new_Status_code );
1247: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages ', p_in_rec.put_messages );
1248: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
1241: IF l_debug_on THEN
1242: WSH_DEBUG_SV.push(l_module_name);
1243: --
1244: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.trip_id ', p_in_rec.trip_id );
1245: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
1246: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.new_Status_code ', p_in_rec.new_Status_code );
1247: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages ', p_in_rec.put_messages );
1248: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
1249: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
1242: WSH_DEBUG_SV.push(l_module_name);
1243: --
1244: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.trip_id ', p_in_rec.trip_id );
1245: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
1246: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.new_Status_code ', p_in_rec.new_Status_code );
1247: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages ', p_in_rec.put_messages );
1248: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
1249: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
1250: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
1243: --
1244: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.trip_id ', p_in_rec.trip_id );
1245: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
1246: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.new_Status_code ', p_in_rec.new_Status_code );
1247: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages ', p_in_rec.put_messages );
1248: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
1249: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
1250: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
1251: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
1244: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.trip_id ', p_in_rec.trip_id );
1245: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
1246: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.new_Status_code ', p_in_rec.new_Status_code );
1247: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages ', p_in_rec.put_messages );
1248: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
1249: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
1250: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
1251: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
1252: END IF;
1245: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.name ', p_in_rec.name );
1246: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.new_Status_code ', p_in_rec.new_Status_code );
1247: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages ', p_in_rec.put_messages );
1248: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
1249: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
1250: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
1251: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
1252: END IF;
1253: --
1246: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.new_Status_code ', p_in_rec.new_Status_code );
1247: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages ', p_in_rec.put_messages );
1248: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
1249: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
1250: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
1251: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
1252: END IF;
1253: --
1254: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1247: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.put_messages ', p_in_rec.put_messages );
1248: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.manual_flag ', p_in_rec.manual_flag );
1249: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.caller ', p_in_rec.caller );
1250: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.actual_date ', p_in_rec.actual_date );
1251: wsh_debug_sv.LOG(l_module_name, 'p_in_rec.stop_id ', p_in_rec.stop_id );
1252: END IF;
1253: --
1254: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1255: l_num_warnings := 0;
1276: --
1277: -- Debug Statements
1278: --
1279: IF l_debug_on THEN
1280: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_GRP.GET_TRIP_DETAILS_PVT',WSH_DEBUG_SV.C_PROC_LEVEL);
1281: END IF;
1282: --
1283: wsh_trips_grp.get_trip_details_pvt
1284: (p_trip_id => p_in_rec.trip_id,
1297: --
1298: -- Debug Statements
1299: --
1300: IF l_debug_on THEN
1301: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FTE_INTEGRATION.TRIP_STOP_VALIDATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
1302: END IF;
1303: --
1304: wsh_fte_integration.trip_stop_validations
1305: (p_stop_rec => l_stop_rec,
1335: -- Workflow Project
1336: IF p_in_rec.new_status_code = 'IT' THEN
1337: -- Raise Initial Pickup Stop Closed Event
1338: IF l_debug_on THEN
1339: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.RAISE_EVENT',WSH_DEBUG_SV.C_PROC_LEVEL);
1340: END IF;
1341:
1342: WSH_WF_STD.RAISE_EVENT( p_entity_type => 'TRIP',
1343: p_entity_id => p_in_rec.trip_id,
1344: p_event => 'oracle.apps.wsh.trip.gen.initialpickupstopclosed',
1345: x_return_status => l_wf_rs
1346: );
1347: IF l_debug_on THEN
1348: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_WF_STD.RAISE_EVENT => ',l_wf_rs);
1349: END IF;
1350: ELSIF p_in_rec.new_status_code = 'CL' THEN
1351: -- Raise Ultimate Dropoff Stop Closed Event
1352: IF l_debug_on THEN
1349: END IF;
1350: ELSIF p_in_rec.new_status_code = 'CL' THEN
1351: -- Raise Ultimate Dropoff Stop Closed Event
1352: IF l_debug_on THEN
1353: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.RAISE_EVENT',WSH_DEBUG_SV.C_PROC_LEVEL);
1354: END IF;
1355:
1356: WSH_WF_STD.RAISE_EVENT( p_entity_type => 'TRIP',
1357: p_entity_id => p_in_rec.trip_id,
1358: p_event => 'oracle.apps.wsh.trip.gen.ultimatedropoffstopclosed',
1359: x_return_status => l_wf_rs
1360: );
1361: IF l_debug_on THEN
1362: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_WF_STD.RAISE_EVENT => ',l_wf_rs);
1363: END IF;
1364: END IF;
1365: -- End of code for Workflow Project
1366:
1369: IF WSH_UTIL_CORE.TP_IS_INSTALLED='Y' AND l_trip_rec.ship_method_code is not null THEN
1370: IF l_trip_rec.mode_of_transport ='TRUCK' and l_trip_rec.vehicle_item_id is null THEN
1371: --if mode is truck, we can't plan/firm trip.
1372: IF l_debug_on THEN
1373: WSH_DEBUG_SV.logmsg(l_module_name,'Not trying to firm trip/delivery because mode is truck');
1374: END IF;
1375: ELSE -- mode and vehicle
1376: IF p_in_rec.new_status_code = 'IT' THEN
1377:
1409: END IF;
1410: ELSIF WSH_UTIL_CORE.TP_IS_INSTALLED='Y' AND l_trip_rec.ship_method_code is null THEN
1411: --TP is installed and ship method is null, cannot make the trip as firmed
1412: IF l_debug_on THEN
1413: WSH_DEBUG_SV.logmsg(l_module_name,'Not trying to firm trip/delivery because ship method is null');
1414: END IF;
1415: END IF;
1416: --
1417: -- Close Exceptions for the Trip and its contents, if new status = 'CL' or 'IT'
1416: --
1417: -- Close Exceptions for the Trip and its contents, if new status = 'CL' or 'IT'
1418: IF p_in_rec.new_status_code IN ('IT','CL') THEN
1419: IF l_debug_on THEN
1420: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.Close_Exceptions',WSH_DEBUG_SV.C_PROC_LEVEL);
1421: END IF;
1422: WSH_XC_UTIL.Close_Exceptions (
1423: p_api_version => 1.0,
1424: x_return_status => l_return_status,
1453: --
1454: -- Debug Statements
1455: --
1456: IF l_debug_on THEN
1457: WSH_DEBUG_SV.pop(l_module_name);
1458: END IF;
1459: --
1460: --}
1461: EXCEPTION
1466: --
1467: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1468: --
1469: IF l_debug_on THEN
1470: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1471: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1472: END IF;
1473: --
1474: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1467: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1468: --
1469: IF l_debug_on THEN
1470: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1471: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1472: END IF;
1473: --
1474: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1475:
1477: --
1478: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1479: --
1480: IF l_debug_on THEN
1481: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1482: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1483: END IF;
1484: --
1485: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1478: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1479: --
1480: IF l_debug_on THEN
1481: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1482: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1483: END IF;
1484: --
1485: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1486: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1485: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1486: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1487: --
1488: IF l_debug_on THEN
1489: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1490: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1491: END IF;
1492: WHEN others THEN
1493: wsh_util_core.default_handler('WSH_NEW_DELIVERY_ACTIONS.changeStatus',l_module_name);
1486: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1487: --
1488: IF l_debug_on THEN
1489: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1490: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1491: END IF;
1492: WHEN others THEN
1493: wsh_util_core.default_handler('WSH_NEW_DELIVERY_ACTIONS.changeStatus',l_module_name);
1494: --
1498: --
1499: -- Debug Statements
1500: --
1501: IF l_debug_on THEN
1502: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1503: END IF;
1504: --
1505: --}
1506: END changeStatus;
1574: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1575: --
1576: IF l_debug_on IS NULL
1577: THEN
1578: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1579: END IF;
1580: --
1581: --
1582: -- Debug Statements
1581: --
1582: -- Debug Statements
1583: --
1584: IF l_debug_on THEN
1585: WSH_DEBUG_SV.push(l_module_name);
1586: wsh_debug_sv.log (l_module_name,'action_code',p_action_prms.action_code);
1587: wsh_debug_sv.log (l_module_name,'caller',p_action_prms.caller);
1588: wsh_debug_sv.log (l_module_name,'COUNT',p_rec_attr_tab.COUNT);
1589: END IF;
1582: -- Debug Statements
1583: --
1584: IF l_debug_on THEN
1585: WSH_DEBUG_SV.push(l_module_name);
1586: wsh_debug_sv.log (l_module_name,'action_code',p_action_prms.action_code);
1587: wsh_debug_sv.log (l_module_name,'caller',p_action_prms.caller);
1588: wsh_debug_sv.log (l_module_name,'COUNT',p_rec_attr_tab.COUNT);
1589: END IF;
1590: --
1583: --
1584: IF l_debug_on THEN
1585: WSH_DEBUG_SV.push(l_module_name);
1586: wsh_debug_sv.log (l_module_name,'action_code',p_action_prms.action_code);
1587: wsh_debug_sv.log (l_module_name,'caller',p_action_prms.caller);
1588: wsh_debug_sv.log (l_module_name,'COUNT',p_rec_attr_tab.COUNT);
1589: END IF;
1590: --
1591: --
1584: IF l_debug_on THEN
1585: WSH_DEBUG_SV.push(l_module_name);
1586: wsh_debug_sv.log (l_module_name,'action_code',p_action_prms.action_code);
1587: wsh_debug_sv.log (l_module_name,'caller',p_action_prms.caller);
1588: wsh_debug_sv.log (l_module_name,'COUNT',p_rec_attr_tab.COUNT);
1589: END IF;
1590: --
1591: --
1592: l_cnt := 0;
1601: l_cnt := 0;
1602: l_trip_name := NULL;
1603: --
1604: IF l_debug_on THEN
1605: wsh_debug_sv.log (l_module_name,'l_index',l_index);
1606: wsh_debug_sv.log (l_module_name,'trip_id',p_rec_attr_tab(l_index).trip_id);
1607: END IF;
1608: --
1609: -- Get deliveries which have initial pickup location on the input trip
1602: l_trip_name := NULL;
1603: --
1604: IF l_debug_on THEN
1605: wsh_debug_sv.log (l_module_name,'l_index',l_index);
1606: wsh_debug_sv.log (l_module_name,'trip_id',p_rec_attr_tab(l_index).trip_id);
1607: END IF;
1608: --
1609: -- Get deliveries which have initial pickup location on the input trip
1610: --
1615: l_cnt := l_cnt + 1;
1616: --
1617: --
1618: IF l_debug_on THEN
1619: wsh_debug_sv.log (l_module_name,'dlvy_rec.delivery_id',dlvy_rec.delivery_id);
1620: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_deliveryIdTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
1621: END IF;
1622: --
1623: -- Build a cache of unique delivery IDs
1616: --
1617: --
1618: IF l_debug_on THEN
1619: wsh_debug_sv.log (l_module_name,'dlvy_rec.delivery_id',dlvy_rec.delivery_id);
1620: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_deliveryIdTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
1621: END IF;
1622: --
1623: -- Build a cache of unique delivery IDs
1624: --
1633: );
1634: --
1635: --
1636: IF l_debug_on THEN
1637: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1638: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1639: END IF;
1640: --
1641: wsh_util_core.api_post_call
1634: --
1635: --
1636: IF l_debug_on THEN
1637: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1638: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1639: END IF;
1640: --
1641: wsh_util_core.api_post_call
1642: (
1677: END LOOP;
1678: --
1679: --
1680: IF l_debug_on THEN
1681: wsh_debug_sv.log (l_module_name,'l_totalCnt',l_totalCnt);
1682: END IF;
1683: --
1684: --
1685: -- None of the trips have any delivery with initial pickup location
1722: END LOOP;
1723: --
1724: --
1725: IF l_debug_on THEN
1726: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit wsh_interface_grp.Delivery_Action',WSH_DEBUG_SV.C_PROC_LEVEL);
1727: END IF;
1728: --
1729: l_action_prms.caller := p_action_prms.caller;
1730: l_action_prms.phase := p_action_prms.phase;
1744: x_msg_data => l_msg_data);
1745: --
1746: --
1747: IF l_debug_on THEN
1748: wsh_debug_sv.log(l_module_name,'Return Status After Calling generate_routing_response',l_return_status);
1749: END IF;
1750: --
1751: wsh_util_core.api_post_call(
1752: p_return_status => l_return_status,
1757: END IF;
1758: --
1759: --
1760: IF l_debug_on THEN
1761: WSH_DEBUG_SV.logmsg(l_module_name,
1762: 'Number of Errors='||l_num_errors||',Number of Warnings='||l_num_warnings);
1763: END IF;
1764: --
1765: IF l_num_errors > 0
1774: --
1775: -- Debug Statements
1776: --
1777: IF l_debug_on THEN
1778: WSH_DEBUG_SV.pop(l_module_name);
1779: END IF;
1780: --
1781: --}
1782: EXCEPTION
1786: --
1787: -- Debug Statements
1788: --
1789: IF l_debug_on THEN
1790: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1791: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1792: END IF;
1793: --
1794: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1787: -- Debug Statements
1788: --
1789: IF l_debug_on THEN
1790: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1791: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1792: END IF;
1793: --
1794: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1795: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1796: --
1797: -- Debug Statements
1798: --
1799: IF l_debug_on THEN
1800: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1801: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1802: END IF;
1803: --
1804: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1797: -- Debug Statements
1798: --
1799: IF l_debug_on THEN
1800: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1801: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1802: END IF;
1803: --
1804: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1805: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1806: --
1807: -- Debug Statements
1808: --
1809: IF l_debug_on THEN
1810: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1811: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1812: END IF;
1813: --
1814: WHEN OTHERS THEN
1807: -- Debug Statements
1808: --
1809: IF l_debug_on THEN
1810: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1811: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1812: END IF;
1813: --
1814: WHEN OTHERS THEN
1815: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1817: --
1818: -- Debug Statements
1819: --
1820: IF l_debug_on THEN
1821: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1822: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1823: END IF;
1824: --
1825: --}
1818: -- Debug Statements
1819: --
1820: IF l_debug_on THEN
1821: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1822: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1823: END IF;
1824: --
1825: --}
1826: END generateRoutingResponse;
1884: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1885: --
1886: IF l_debug_on IS NULL
1887: THEN
1888: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1889: END IF;
1890: --
1891: IF l_debug_on THEN
1892: wsh_debug_sv.push(l_module_name);
1888: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1889: END IF;
1890: --
1891: IF l_debug_on THEN
1892: wsh_debug_sv.push(l_module_name);
1893: wsh_debug_sv.log(l_module_name, 'p_del_tbl.COUNT', p_del_tbl.delivery_id.COUNT);
1894: END IF;
1895: --
1896:
1889: END IF;
1890: --
1891: IF l_debug_on THEN
1892: wsh_debug_sv.push(l_module_name);
1893: wsh_debug_sv.log(l_module_name, 'p_del_tbl.COUNT', p_del_tbl.delivery_id.COUNT);
1894: END IF;
1895: --
1896:
1897: IF (WSH_UTIL_CORE.FTE_IS_INSTALLED = 'Y') THEN
1928: (NVL(p_del_tbl.carrier_id(i),'~') <>
1929: NVL(l_carrier_id,'~'))
1930: THEN --{
1931: IF l_debug_on THEN
1932: wsh_debug_sv.log(l_module_name, 'SM l_delivery_id', l_delivery_id);
1933: wsh_debug_sv.log(l_module_name, 'p_del_tbl.delivery_id', p_del_tbl.delivery_id(i));
1934: END IF;
1935: EXIT;
1936: END IF; --}
1929: NVL(l_carrier_id,'~'))
1930: THEN --{
1931: IF l_debug_on THEN
1932: wsh_debug_sv.log(l_module_name, 'SM l_delivery_id', l_delivery_id);
1933: wsh_debug_sv.log(l_module_name, 'p_del_tbl.delivery_id', p_del_tbl.delivery_id(i));
1934: END IF;
1935: EXIT;
1936: END IF; --}
1937:
1949: )
1950: )
1951: THEN
1952: IF l_debug_on THEN
1953: wsh_debug_sv.log(l_module_name, 'SF/ST l_delivery_id', l_delivery_id);
1954: wsh_debug_sv.log(l_module_name, 'p_del_tbl.delivery_id', p_del_tbl.delivery_id(i));
1955: END IF;
1956: EXIT;
1957: END IF;
1950: )
1951: THEN
1952: IF l_debug_on THEN
1953: wsh_debug_sv.log(l_module_name, 'SF/ST l_delivery_id', l_delivery_id);
1954: wsh_debug_sv.log(l_module_name, 'p_del_tbl.delivery_id', p_del_tbl.delivery_id(i));
1955: END IF;
1956: EXIT;
1957: END IF;
1958:
1958:
1959: x_idx := x_idx + 1;
1960: x_del_rows(l_counter) := p_del_tbl.delivery_id(i);
1961: IF l_debug_on THEN
1962: wsh_debug_sv.log(l_module_name, 'p_del_tbl.delivery_id(i)',
1963: p_del_tbl.delivery_id(i));
1964: END IF;
1965: l_counter := l_counter + 1;
1966:
1968: END IF; --}
1969: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1970:
1971: IF l_debug_on THEN
1972: wsh_debug_sv.log(l_module_name, 'x_idx', x_idx);
1973: WSH_DEBUG_SV.pop(l_module_name);
1974: END IF;
1975: --
1976: EXCEPTION
1969: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1970:
1971: IF l_debug_on THEN
1972: wsh_debug_sv.log(l_module_name, 'x_idx', x_idx);
1973: WSH_DEBUG_SV.pop(l_module_name);
1974: END IF;
1975: --
1976: EXCEPTION
1977: --
1980: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.GET_NEXT_DEL_ROWS');
1981: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1982: --
1983: IF l_debug_on THEN
1984: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1985: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1986: END IF;
1987: --
1988: END get_next_del_rows;
1981: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1982: --
1983: IF l_debug_on THEN
1984: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1985: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1986: END IF;
1987: --
1988: END get_next_del_rows;
1989:
2030: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2031: --
2032: IF l_debug_on IS NULL
2033: THEN
2034: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2035: END IF;
2036: --
2037: IF l_debug_on THEN
2038: wsh_debug_sv.push(l_module_name);
2034: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2035: END IF;
2036: --
2037: IF l_debug_on THEN
2038: wsh_debug_sv.push(l_module_name);
2039: wsh_debug_sv.log(l_module_name, 'p_del_tbl.delivery_id.COUNT', p_del_tbl.delivery_id.COUNT);
2040: END IF;
2041: --
2042: IF p_del_tbl.delivery_id.COUNT < 1 THEN
2035: END IF;
2036: --
2037: IF l_debug_on THEN
2038: wsh_debug_sv.push(l_module_name);
2039: wsh_debug_sv.log(l_module_name, 'p_del_tbl.delivery_id.COUNT', p_del_tbl.delivery_id.COUNT);
2040: END IF;
2041: --
2042: IF p_del_tbl.delivery_id.COUNT < 1 THEN
2043: RAISE e_invalid_count;
2078:
2079: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2080:
2081: IF l_debug_on THEN
2082: wsh_debug_sv.log(l_module_name, 'x_del_tbl.COUNT', x_del_tbl.delivery_id.COUNT);
2083: WSH_DEBUG_SV.pop(l_module_name);
2084: END IF;
2085: --
2086: EXCEPTION
2079: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2080:
2081: IF l_debug_on THEN
2082: wsh_debug_sv.log(l_module_name, 'x_del_tbl.COUNT', x_del_tbl.delivery_id.COUNT);
2083: WSH_DEBUG_SV.pop(l_module_name);
2084: END IF;
2085: --
2086: EXCEPTION
2087: --
2088: WHEN e_invalid_count THEN
2089: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2090: --
2091: IF l_debug_on THEN
2092: WSH_DEBUG_SV.logmsg(l_module_name,'The input table is empty.' ,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2093: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_invalid_count');
2094: END IF;
2095: --
2096: WHEN others THEN
2089: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2090: --
2091: IF l_debug_on THEN
2092: WSH_DEBUG_SV.logmsg(l_module_name,'The input table is empty.' ,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2093: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_invalid_count');
2094: END IF;
2095: --
2096: WHEN others THEN
2097: --
2098: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.SORT_DEL');
2099: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2100: --
2101: IF l_debug_on THEN
2102: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2103: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2104: END IF;
2105: --
2106: END sort_del;
2099: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2100: --
2101: IF l_debug_on THEN
2102: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2103: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2104: END IF;
2105: --
2106: END sort_del;
2107:
2164: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2165: --
2166: IF l_debug_on IS NULL
2167: THEN
2168: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2169: END IF;
2170: --
2171: IF l_debug_on THEN
2172: wsh_debug_sv.push(l_module_name);
2168: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2169: END IF;
2170: --
2171: IF l_debug_on THEN
2172: wsh_debug_sv.push(l_module_name);
2173: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2174: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2175: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2176: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2169: END IF;
2170: --
2171: IF l_debug_on THEN
2172: wsh_debug_sv.push(l_module_name);
2173: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2174: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2175: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2176: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2177: wsh_debug_sv.log(l_module_name, 'p_del_rows.count', p_del_rows.count);
2170: --
2171: IF l_debug_on THEN
2172: wsh_debug_sv.push(l_module_name);
2173: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2174: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2175: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2176: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2177: wsh_debug_sv.log(l_module_name, 'p_del_rows.count', p_del_rows.count);
2178: END IF;
2171: IF l_debug_on THEN
2172: wsh_debug_sv.push(l_module_name);
2173: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2174: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2175: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2176: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2177: wsh_debug_sv.log(l_module_name, 'p_del_rows.count', p_del_rows.count);
2178: END IF;
2179: --
2172: wsh_debug_sv.push(l_module_name);
2173: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2174: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2175: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2176: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2177: wsh_debug_sv.log(l_module_name, 'p_del_rows.count', p_del_rows.count);
2178: END IF;
2179: --
2180: l_idx := p_del_rows.FIRST;
2173: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2174: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2175: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2176: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2177: wsh_debug_sv.log(l_module_name, 'p_del_rows.count', p_del_rows.count);
2178: END IF;
2179: --
2180: l_idx := p_del_rows.FIRST;
2181:
2255: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING ;
2256: END IF;
2257:
2258: IF l_debug_on THEN
2259: WSH_DEBUG_SV.pop(l_module_name);
2260: END IF;
2261: --
2262: EXCEPTION
2263: --
2266: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.AUTOCREATE_TRIP_WRP');
2267: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2268: --
2269: IF l_debug_on THEN
2270: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2271: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2272: END IF;
2273: --
2274: END autocreate_trip_wrp;
2267: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2268: --
2269: IF l_debug_on THEN
2270: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2271: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2272: END IF;
2273: --
2274: END autocreate_trip_wrp;
2275:
2323: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2324: --
2325: IF l_debug_on IS NULL
2326: THEN
2327: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2328: END IF;
2329: --
2330: IF l_debug_on THEN
2331: WSH_DEBUG_SV.push(l_module_name);
2327: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2328: END IF;
2329: --
2330: IF l_debug_on THEN
2331: WSH_DEBUG_SV.push(l_module_name);
2332: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2333: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2334: END IF;
2335: --
2328: END IF;
2329: --
2330: IF l_debug_on THEN
2331: WSH_DEBUG_SV.push(l_module_name);
2332: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2333: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2334: END IF;
2335: --
2336: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2329: --
2330: IF l_debug_on THEN
2331: WSH_DEBUG_SV.push(l_module_name);
2332: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2333: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2334: END IF;
2335: --
2336: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2337:
2397: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_ERROR);
2398: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2399: x_return_status := l_return_status;
2400: IF l_debug_on THEN
2401: WSH_DEBUG_SV.log(l_module_name, 'Count of Errors', l_count_error);
2402: WSH_DEBUG_SV.pop(l_module_name);
2403: END IF;
2404: RETURN;
2405: ELSE
2398: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2399: x_return_status := l_return_status;
2400: IF l_debug_on THEN
2401: WSH_DEBUG_SV.log(l_module_name, 'Count of Errors', l_count_error);
2402: WSH_DEBUG_SV.pop(l_module_name);
2403: END IF;
2404: RETURN;
2405: ELSE
2406: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_WARNING);
2420:
2421: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2422: x_return_status:=l_return_status;
2423: IF l_debug_on THEN
2424: WSH_DEBUG_SV.pop(l_module_name);
2425: END IF;
2426: RETURN;
2427: END IF;
2428: IF l_trip_ids.COUNT > 0 THEN
2446:
2447: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
2448: x_return_status:=l_return_status; -- Bug#3884302
2449: IF l_debug_on THEN
2450: WSH_DEBUG_SV.pop(l_module_name);
2451: END IF;
2452: RETURN;
2453: END IF;
2454: IF l_trip_ids.COUNT > 0 THEN
2468: --
2469: -- Debug Statements
2470: --
2471: IF l_debug_on THEN
2472: WSH_DEBUG_SV.pop(l_module_name);
2473: END IF;
2474: --
2475:
2476: EXCEPTION
2481: --
2482: -- Debug Statements
2483: --
2484: IF l_debug_on THEN
2485: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2486: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2487: END IF;
2488: --
2489: END autocreate_trip_multi;
2482: -- Debug Statements
2483: --
2484: IF l_debug_on THEN
2485: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2486: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2487: END IF;
2488: --
2489: END autocreate_trip_multi;
2490:
2593: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2594: --
2595: IF l_debug_on IS NULL
2596: THEN
2597: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2598: END IF;
2599: --
2600: IF l_debug_on THEN
2601: wsh_debug_sv.push(l_module_name);
2597: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2598: END IF;
2599: --
2600: IF l_debug_on THEN
2601: wsh_debug_sv.push(l_module_name);
2602: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2603: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2604: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2605: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2598: END IF;
2599: --
2600: IF l_debug_on THEN
2601: wsh_debug_sv.push(l_module_name);
2602: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2603: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2604: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2605: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2606: END IF;
2599: --
2600: IF l_debug_on THEN
2601: wsh_debug_sv.push(l_module_name);
2602: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2603: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2604: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2605: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2606: END IF;
2607: --
2600: IF l_debug_on THEN
2601: wsh_debug_sv.push(l_module_name);
2602: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2603: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2604: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2605: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2606: END IF;
2607: --
2608:
2601: wsh_debug_sv.push(l_module_name);
2602: wsh_debug_sv.log(l_module_name, 'p_entity', p_entity);
2603: wsh_debug_sv.log(l_module_name, 'p_del_rows.COUNT', p_del_rows.COUNT);
2604: wsh_debug_sv.log(l_module_name, 'p_sc_pickup_date', p_sc_pickup_date);
2605: wsh_debug_sv.log(l_module_name, 'p_sc_dropoff_date', p_sc_dropoff_date);
2606: END IF;
2607: --
2608:
2609: --OTM R12, glog proj, use Global Variable
2655: CLOSE check_ship_method;
2656:
2657: --OTM R12, glog proj
2658: IF l_debug_on THEN
2659: WSH_DEBUG_SV.log(l_module_name,'l_gc3_is_installed',l_gc3_is_installed);
2660: WSH_DEBUG_SV.log(l_module_name,'l_ignore_for_planning',l_ignore_for_planning);
2661: END IF;
2662:
2663: IF l_gc3_is_installed = 'Y' AND l_ignore_for_planning = 'N' THEN--{
2656:
2657: --OTM R12, glog proj
2658: IF l_debug_on THEN
2659: WSH_DEBUG_SV.log(l_module_name,'l_gc3_is_installed',l_gc3_is_installed);
2660: WSH_DEBUG_SV.log(l_module_name,'l_ignore_for_planning',l_ignore_for_planning);
2661: END IF;
2662:
2663: IF l_gc3_is_installed = 'Y' AND l_ignore_for_planning = 'N' THEN--{
2664: -- Raise a new generic error message here, just trip creation will not happen.
2679: END IF; --}
2680: --
2681: -- Bug 3413364, skip the delivery if it does not have both initial pickup date and ultimate dropoff date
2682: IF l_debug_on THEN
2683: WSH_DEBUG_SV.log(l_module_name,'l_shipment_direction',l_shipment_direction);
2684: END IF;
2685:
2686: IF (l_initial_pickup_date is NULL or l_ultimate_dropoff_date is NULL)
2687: AND nvl(l_shipment_direction,'O') IN ('O', 'IO') THEN--{
2744: IF l_count_error = p_del_rows.count THEN
2745: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2746: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_ERROR);
2747: IF l_debug_on THEN
2748: WSH_DEBUG_SV.log(l_module_name, 'Count of Errors', l_count_error);
2749: WSH_DEBUG_SV.pop(l_module_name);
2750: END IF;
2751: RETURN;
2752: ELSE -- x_return_status is populated at the end
2745: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2746: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_ERROR);
2747: IF l_debug_on THEN
2748: WSH_DEBUG_SV.log(l_module_name, 'Count of Errors', l_count_error);
2749: WSH_DEBUG_SV.pop(l_module_name);
2750: END IF;
2751: RETURN;
2752: ELSE -- x_return_status is populated at the end
2753: WSH_UTIL_CORE.ADD_MESSAGE(WSH_UTIL_CORE.G_RET_STS_WARNING);
2776: /* H integration */
2777: /* The trip level call should have been made at parent level */
2778: --
2779: IF l_debug_on THEN
2780: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.CREATE_TRIP',WSH_DEBUG_SV.C_PROC_LEVEL);
2781: END IF;
2782: --
2783: wsh_trips_pvt.create_trip(l_trip_info, l_rowid, x_trip_id, x_trip_name,x_return_status);
2784: --
2784: --
2785: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2786: --
2787: IF l_debug_on THEN
2788: wsh_debug_sv.log(l_module_name, 'Return Status after calling create_trip', x_return_Status);
2789: WSH_DEBUG_SV.pop(l_module_name);
2790: END IF;
2791: --
2792: RETURN;
2785: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2786: --
2787: IF l_debug_on THEN
2788: wsh_debug_sv.log(l_module_name, 'Return Status after calling create_trip', x_return_Status);
2789: WSH_DEBUG_SV.pop(l_module_name);
2790: END IF;
2791: --
2792: RETURN;
2793: --
2793: --
2794: END IF;
2795: --
2796: IF l_debug_on THEN
2797: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.ASSIGN_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
2798: END IF;
2799: --
2800: wsh_delivery_legs_actions.assign_deliveries(
2801: p_del_rows => l_good_dels,
2812:
2813: IF x_return_status in ( WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2814: --
2815: IF l_debug_on THEN
2816: wsh_debug_sv.log(l_module_name, 'Return Status after calling wsh_delivery_legs_actions.assign_deliveries', x_return_Status);
2817: WSH_DEBUG_SV.pop(l_module_name);
2818: END IF;
2819: --
2820: RETURN;
2813: IF x_return_status in ( WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2814: --
2815: IF l_debug_on THEN
2816: wsh_debug_sv.log(l_module_name, 'Return Status after calling wsh_delivery_legs_actions.assign_deliveries', x_return_Status);
2817: WSH_DEBUG_SV.pop(l_module_name);
2818: END IF;
2819: --
2820: RETURN;
2821: --
2840: -- H integration
2841: -- Get pvt type record structure for stop
2842: --
2843: IF l_debug_on THEN
2844: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_GRP.GET_STOP_DETAILS_PVT',WSH_DEBUG_SV.C_PROC_LEVEL);
2845: END IF;
2846: --
2847: wsh_trip_stops_grp.get_stop_details_pvt
2848: (p_stop_id => st.stop_id,
2853: --
2854: x_return_status := l_return_status;
2855: --
2856: IF l_debug_on THEN
2857: WSH_DEBUG_SV.pop(l_module_name);
2858: END IF;
2859: --
2860: RETURN;
2861: --
2865: --
2866: l_stop_rec.planned_departure_date := nvl(l_stop_rec.planned_arrival_date,SYSDATE);
2867: --
2868: IF l_debug_on THEN
2869: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FTE_INTEGRATION.TRIP_STOP_VALIDATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
2870: END IF;
2871: --
2872: wsh_fte_integration.trip_stop_validations
2873: (p_stop_rec => l_stop_rec,
2882: ELSE
2883: x_return_status := l_return_status;
2884: --
2885: IF l_debug_on THEN
2886: WSH_DEBUG_SV.pop(l_module_name);
2887: END IF;
2888: --
2889: RETURN;
2890: END IF;
2908: -- H integration
2909: -- Get pvt type record structure for stop
2910: --
2911: IF l_debug_on THEN
2912: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_GRP.GET_STOP_DETAILS_PVT',WSH_DEBUG_SV.C_PROC_LEVEL);
2913: END IF;
2914: --
2915: wsh_trip_stops_grp.get_stop_details_pvt
2916: (p_stop_id => st.stop_id,
2920: IF x_return_status in ( WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2921: x_return_status := l_return_status;
2922: --
2923: IF l_debug_on THEN
2924: WSH_DEBUG_SV.pop(l_module_name);
2925: END IF;
2926: --
2927: RETURN;
2928: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2931: --
2932: l_stop_rec.planned_arrival_date := nvl(l_stop_rec.planned_departure_date,SYSDATE);
2933: --
2934: IF l_debug_on THEN
2935: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FTE_INTEGRATION.TRIP_STOP_VALIDATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
2936: END IF;
2937: --
2938: wsh_fte_integration.trip_stop_validations
2939: (p_stop_rec => l_stop_rec,
2948: ELSE
2949: x_return_status := l_return_status;
2950: --
2951: IF l_debug_on THEN
2952: WSH_DEBUG_SV.pop(l_module_name);
2953: END IF;
2954: --
2955: RETURN;
2956: END IF;
2968: -- Updating WSH_TRIP_STOPS.
2969: -- Call DBI API after the Update.
2970: -- This API will also check for DBI Installed or not
2971: IF l_debug_on THEN
2972: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Stop id -',st.stop_id);
2973: END IF;
2974: l_stop_tab(1) := st.stop_id;
2975: WSH_INTEGRATION.DBI_Update_Trip_Stop_Log
2976: (p_stop_id_tab => l_stop_tab,
2977: p_dml_type => 'UPDATE',
2978: x_return_status => l_dbi_rs);
2979:
2980: IF l_debug_on THEN
2981: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
2982: END IF;
2983: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
2984: x_return_status := l_dbi_rs;
2985: -- just pass this return status to caller API
2983: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
2984: x_return_status := l_dbi_rs;
2985: -- just pass this return status to caller API
2986: IF l_debug_on THEN
2987: WSH_DEBUG_SV.log(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
2988: WSH_DEBUG_SV.pop(l_module_name);
2989: END IF;
2990: return;
2991: END IF;
2984: x_return_status := l_dbi_rs;
2985: -- just pass this return status to caller API
2986: IF l_debug_on THEN
2987: WSH_DEBUG_SV.log(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
2988: WSH_DEBUG_SV.pop(l_module_name);
2989: END IF;
2990: return;
2991: END IF;
2992: -- End of Code for DBI Project
3013: ELSE
3014: x_return_status := l_return_status;
3015: --
3016: IF l_debug_on THEN
3017: WSH_DEBUG_SV.pop(l_module_name);
3018: END IF;
3019: --
3020: RETURN;
3021: END IF;
3031: IF l_return_status in (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
3032: x_return_status := l_return_status;
3033: --
3034: IF l_debug_on THEN
3035: WSH_DEBUG_SV.pop(l_module_name);
3036: END IF;
3037: --
3038: RETURN;
3039: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3044: END IF;
3045: --}
3046: END IF; /* if good_dels.COUNT */
3047: IF l_debug_on THEN
3048: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES',WSH_DEBUG_SV.C_PROC_LEVEL);
3049: END IF;
3050: -- for bug 5948562, to populate values in additional trip information flexfield, when auto creating a trip
3051: wsh_flexfield_utils.WRITE_DFF_ATTRIBUTES
3052: (p_table_name => 'WSH_TRIPS',
3054: x_return_status => x_return_status);
3055:
3056: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3057: IF l_debug_on THEN
3058: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES RETURNED ERROR' );
3059: END IF;
3060: IF l_debug_on THEN
3061: WSH_DEBUG_SV.pop(l_module_name);
3062: END IF;
3057: IF l_debug_on THEN
3058: WSH_DEBUG_SV.logmsg(l_module_name, 'PROC WSH_FLEXFIELD_UTILS.WRITE_DFF_ATTRIBUTES RETURNED ERROR' );
3059: END IF;
3060: IF l_debug_on THEN
3061: WSH_DEBUG_SV.pop(l_module_name);
3062: END IF;
3063: RETURN;
3064: END IF;
3065: --
3078: wsh_util_core.add_message(x_return_status);
3079: END IF;
3080: --
3081: IF l_debug_on THEN
3082: WSH_DEBUG_SV.pop(l_module_name);
3083: END IF;
3084: --
3085: EXCEPTION
3086: --
3089: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.AUTOCREATE_TRIP');
3090: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3091: --
3092: IF l_debug_on THEN
3093: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3094: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3095: END IF;
3096: --
3097: END autocreate_trip;
3090: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3091: --
3092: IF l_debug_on THEN
3093: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3094: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3095: END IF;
3096: --
3097: END autocreate_trip;
3098:
3190: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3191: --
3192: IF l_debug_on IS NULL--{
3193: THEN
3194: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3195: END IF;--}
3196: --
3197: IF l_debug_on THEN--{
3198: WSH_DEBUG_SV.push(l_module_name);
3194: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3195: END IF;--}
3196: --
3197: IF l_debug_on THEN--{
3198: WSH_DEBUG_SV.push(l_module_name);
3199: --
3200: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
3201: END IF;--}
3202: --
3196: --
3197: IF l_debug_on THEN--{
3198: WSH_DEBUG_SV.push(l_module_name);
3199: --
3200: WSH_DEBUG_SV.log(l_module_name,'P_MAX_DETAIL_COMMIT',P_MAX_DETAIL_COMMIT);
3201: END IF;--}
3202: --
3203: --
3204: -- Debug Statements
3203: --
3204: -- Debug Statements
3205: --
3206: IF l_debug_on THEN--{
3207: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DEL_ACROSS_ORGS',WSH_DEBUG_SV.C_PROC_LEVEL);
3208: END IF;--}
3209: --
3210: --Compatibility Changes
3211: IF wsh_util_core.fte_is_installed = 'Y' THEN--{
3230: x_msg_data => l_msg_data,
3231: x_return_status => x_return_status);
3232:
3233: IF l_debug_on THEN--{
3234: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3235: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3236: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3237: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3238: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3231: x_return_status => x_return_status);
3232:
3233: IF l_debug_on THEN--{
3234: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3235: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3236: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3237: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3238: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3239: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3232:
3233: IF l_debug_on THEN--{
3234: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3235: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3236: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3237: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3238: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3239: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3240: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3233: IF l_debug_on THEN--{
3234: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3235: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3236: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3237: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3238: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3239: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3240: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3241: END IF;--}
3234: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3235: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3236: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3237: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3238: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3239: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3240: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3241: END IF;--}
3242: --
3235: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3236: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3237: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3238: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3239: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3240: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3241: END IF;--}
3242: --
3243:
3236: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3237: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3238: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3239: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3240: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3241: END IF;--}
3242: --
3243:
3244:
3248: --
3249: -- Debug Statements
3250: --
3251: IF l_debug_on THEN--{
3252: WSH_DEBUG_SV.pop(l_module_name);
3253: END IF;--}
3254: --
3255: RETURN;
3256: END IF;--}
3256: END IF;--}
3257:
3258: IF l_cc_failed_records.COUNT>0 AND x_return_status=wsh_util_core.g_ret_sts_error THEN--{
3259: IF l_debug_on THEN--{
3260: WSH_DEBUG_SV.logmsg(l_module_name,'All dels have failed compatibility -> delivery and Trip not created');
3261: END IF;--}
3262: -- if one one delivery fails for auto create trip, all the lines should
3263: -- should be unassigned from the deliveries and the action should
3264: -- fail for all the lines. (pack J 2862777)
3265: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3266: fnd_message.set_name('WSH', 'WSH_COMP_ACT_FAIL');
3267: wsh_util_core.add_message(x_return_status);
3268: IF l_debug_on THEN--{
3269: WSH_DEBUG_SV.pop(l_module_name);
3270: END IF;--}
3271: --
3272: RETURN;
3273: ELSIF l_cc_line_groups.COUNT>0 AND x_return_status=wsh_util_core.g_ret_sts_error THEN--}{
3302: END LOOP;--}
3303:
3304: --
3305: IF l_debug_on THEN--{
3306: wsh_debug_sv.log(l_module_name,'id_tab_temp count ',l_id_tab_temp.COUNT);
3307: END IF;--}
3308:
3309:
3310: wsh_delivery_autocreate.autocreate_del_across_orgs(
3330: END LOOP;--}
3331: END IF;--}
3332:
3333: IF l_debug_on THEN--{
3334: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3335: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3336: wsh_debug_sv.log(l_module_name,'l_delivery_ids_tbl.COUNT ',x_del_rows.COUNT);
3337: wsh_debug_sv.log(l_module_name,'l_grouping_tbl.COUNT ',l_grouping_rows.COUNT);
3338: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',x_return_status);
3331: END IF;--}
3332:
3333: IF l_debug_on THEN--{
3334: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3335: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3336: wsh_debug_sv.log(l_module_name,'l_delivery_ids_tbl.COUNT ',x_del_rows.COUNT);
3337: wsh_debug_sv.log(l_module_name,'l_grouping_tbl.COUNT ',l_grouping_rows.COUNT);
3338: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',x_return_status);
3339: END IF;--}
3332:
3333: IF l_debug_on THEN--{
3334: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3335: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3336: wsh_debug_sv.log(l_module_name,'l_delivery_ids_tbl.COUNT ',x_del_rows.COUNT);
3337: wsh_debug_sv.log(l_module_name,'l_grouping_tbl.COUNT ',l_grouping_rows.COUNT);
3338: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',x_return_status);
3339: END IF;--}
3340:
3333: IF l_debug_on THEN--{
3334: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3335: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3336: wsh_debug_sv.log(l_module_name,'l_delivery_ids_tbl.COUNT ',x_del_rows.COUNT);
3337: wsh_debug_sv.log(l_module_name,'l_grouping_tbl.COUNT ',l_grouping_rows.COUNT);
3338: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',x_return_status);
3339: END IF;--}
3340:
3341: IF l_cc_upd_dlvy_intmed_ship_to='N' OR l_cc_upd_dlvy_ship_method='N' THEN--{
3334: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3335: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3336: wsh_debug_sv.log(l_module_name,'l_delivery_ids_tbl.COUNT ',x_del_rows.COUNT);
3337: wsh_debug_sv.log(l_module_name,'l_grouping_tbl.COUNT ',l_grouping_rows.COUNT);
3338: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',x_return_status);
3339: END IF;--}
3340:
3341: IF l_cc_upd_dlvy_intmed_ship_to='N' OR l_cc_upd_dlvy_ship_method='N' THEN--{
3342: IF l_id_tab_temp.COUNT>0 THEN--{
3399: x_del_rows:=l_cc_del_rows;
3400: x_return_status:=l_cc_return_status;
3401:
3402: IF l_debug_on THEN--{
3403: wsh_debug_sv.log(l_module_name,'l_delivery_ids_tbl.COUNT after loop ',x_del_rows.COUNT);
3404: wsh_debug_sv.log(l_module_name,'l_grouping_tbl.COUNT after loop',l_grouping_rows.COUNT);
3405: END IF;--}
3406:
3407: ELSE -- line_group>0 }{
3400: x_return_status:=l_cc_return_status;
3401:
3402: IF l_debug_on THEN--{
3403: wsh_debug_sv.log(l_module_name,'l_delivery_ids_tbl.COUNT after loop ',x_del_rows.COUNT);
3404: wsh_debug_sv.log(l_module_name,'l_grouping_tbl.COUNT after loop',l_grouping_rows.COUNT);
3405: END IF;--}
3406:
3407: ELSE -- line_group>0 }{
3408:
3418: x_return_status => x_return_status);
3419:
3420: --bug 2729742
3421: IF l_debug_on THEN--{
3422: wsh_debug_sv.log(l_module_name,'l_cc_group_info.COUNT ',l_cc_group_info.COUNT);
3423: END IF;--}
3424:
3425: IF l_cc_group_info.COUNT>0 THEN--{
3426: --set the intermediate ship to, ship method to null if group rec from constraint validation has these as 'N'
3430: l_cc_upd_dlvy_ship_method:=l_cc_group_info(1).upd_dlvy_ship_method;
3431:
3432: IF l_debug_on THEN--{
3433:
3434: wsh_debug_sv.log(l_module_name,'l_cc_group_info.COUNT ',l_cc_group_info.COUNT);
3435: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3436: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3437: END IF;--}
3438:
3431:
3432: IF l_debug_on THEN--{
3433:
3434: wsh_debug_sv.log(l_module_name,'l_cc_group_info.COUNT ',l_cc_group_info.COUNT);
3435: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3436: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3437: END IF;--}
3438:
3439: IF l_cc_upd_dlvy_intmed_ship_to='N' OR l_cc_upd_dlvy_ship_method='N' THEN--{
3432: IF l_debug_on THEN--{
3433:
3434: wsh_debug_sv.log(l_module_name,'l_cc_group_info.COUNT ',l_cc_group_info.COUNT);
3435: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3436: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3437: END IF;--}
3438:
3439: IF l_cc_upd_dlvy_intmed_ship_to='N' OR l_cc_upd_dlvy_ship_method='N' THEN--{
3440: IF x_del_rows.COUNT>0 THEN--{
3481: --Compatibility Changes
3482:
3483: --
3484: IF l_debug_on THEN--{
3485: wsh_debug_sv.log(l_module_name,'Return Status After Calling Autocreate_Del_across_orgs',x_return_status);
3486: END IF;--}
3487:
3488:
3489: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) OR
3491: --
3492: -- Debug Statements
3493: --
3494: IF l_debug_on THEN--{
3495: WSH_DEBUG_SV.pop(l_module_name);
3496: END IF;--}
3497: --
3498: RETURN;
3499: END IF;--}
3527: x_msg_data => l_msg_data,
3528: x_return_status => x_return_status);
3529:
3530: IF l_debug_on THEN--{
3531: wsh_debug_sv.logmsg(l_module_name,'For autocreate_trip');
3532: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3533: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3534: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3535: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3528: x_return_status => x_return_status);
3529:
3530: IF l_debug_on THEN--{
3531: wsh_debug_sv.logmsg(l_module_name,'For autocreate_trip');
3532: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3533: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3534: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3535: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3536: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3529:
3530: IF l_debug_on THEN--{
3531: wsh_debug_sv.logmsg(l_module_name,'For autocreate_trip');
3532: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3533: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3534: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3535: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3536: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3537: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3530: IF l_debug_on THEN--{
3531: wsh_debug_sv.logmsg(l_module_name,'For autocreate_trip');
3532: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3533: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3534: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3535: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3536: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3537: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3538: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3531: wsh_debug_sv.logmsg(l_module_name,'For autocreate_trip');
3532: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3533: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3534: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3535: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3536: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3537: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3538: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3539: END IF;--}
3532: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',x_return_status);
3533: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3534: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3535: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3536: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3537: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3538: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3539: END IF;--}
3540: --
3533: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
3534: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3535: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3536: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3537: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3538: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3539: END IF;--}
3540: --
3541:
3534: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
3535: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
3536: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
3537: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
3538: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
3539: END IF;--}
3540: --
3541:
3542: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN--{
3543: --
3544: -- Debug Statements
3545: --
3546: IF l_debug_on THEN--{
3547: WSH_DEBUG_SV.pop(l_module_name);
3548: END IF;--}
3549: --
3550: RETURN;
3551: END IF;--}
3552:
3553: --do nothing if all dels have errored out (deliveries shud be created and trip shud not be
3554: IF (x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR AND l_cc_failed_records.COUNT > 0) THEN--{
3555: IF l_debug_on THEN--{
3556: WSH_DEBUG_SV.logmsg(l_module_name,'All dels have failed compatibility -> Trip not created');
3557: END IF;--}
3558: -- if one one delivery fails for auto create trip, all the lines should
3559: -- should be unassigned from the deliveries and the action should
3560: -- fail for all the lines. (pack J 2862777)
3561: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3562: fnd_message.set_name('WSH', 'WSH_COMP_ACT_FAIL');
3563: wsh_util_core.add_message(x_return_status);
3564: IF l_debug_on THEN--{
3565: WSH_DEBUG_SV.pop(l_module_name);
3566: END IF;--}
3567: --
3568: RETURN;
3569: ELSIF l_cc_line_groups.COUNT>0 AND x_return_status=wsh_util_core.g_ret_sts_error THEN--}{
3598: END LOOP;--}
3599:
3600: --
3601: IF l_debug_on THEN--{
3602: wsh_debug_sv.log(l_module_name,'id_tab_temp count ',l_id_tab_temp.COUNT);
3603: wsh_debug_sv.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.Adjust_Planned_Flag ');
3604: END IF;--}
3605:
3606: -- deliveryMerge
3599:
3600: --
3601: IF l_debug_on THEN--{
3602: wsh_debug_sv.log(l_module_name,'id_tab_temp count ',l_id_tab_temp.COUNT);
3603: wsh_debug_sv.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.Adjust_Planned_Flag ');
3604: END IF;--}
3605:
3606: -- deliveryMerge
3607: WSH_NEW_DELIVERY_ACTIONS.Adjust_Planned_Flag(
3612: p_event => NULL,
3613: x_return_status => l_return_status);
3614:
3615: IF l_debug_on THEN --{
3616: wsh_debug_sv.log(l_module_name,'Return status from WSH_NEW_DELIVERY_ACTIONS.Adjust_Planned_Flag ', l_return_status);
3617: END IF;--}
3618:
3619: IF l_return_status in (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN--{
3620: raise Adjust_Planned_Flag_Err;
3638: END LOOP;--}
3639: END IF;--}
3640:
3641: IF l_debug_on THEN--{
3642: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3643: wsh_debug_sv.log(l_module_name,'l_trip_id ',l_trip_ids(1));
3644: wsh_debug_sv.log(l_module_name,'l_trip_name ',l_trip_names(1));
3645: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_trip in comp ',x_return_status);
3646: END IF;--}
3639: END IF;--}
3640:
3641: IF l_debug_on THEN--{
3642: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3643: wsh_debug_sv.log(l_module_name,'l_trip_id ',l_trip_ids(1));
3644: wsh_debug_sv.log(l_module_name,'l_trip_name ',l_trip_names(1));
3645: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_trip in comp ',x_return_status);
3646: END IF;--}
3647:
3640:
3641: IF l_debug_on THEN--{
3642: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3643: wsh_debug_sv.log(l_module_name,'l_trip_id ',l_trip_ids(1));
3644: wsh_debug_sv.log(l_module_name,'l_trip_name ',l_trip_names(1));
3645: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_trip in comp ',x_return_status);
3646: END IF;--}
3647:
3648: /* J TP Release */
3641: IF l_debug_on THEN--{
3642: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3643: wsh_debug_sv.log(l_module_name,'l_trip_id ',l_trip_ids(1));
3644: wsh_debug_sv.log(l_module_name,'l_trip_name ',l_trip_names(1));
3645: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_trip in comp ',x_return_status);
3646: END IF;--}
3647:
3648: /* J TP Release */
3649: IF l_trip_ids is not null AND l_trip_ids.COUNT>0 THEN--{
3676: l_trip_id_tab:=l_cc_trip_id;
3677: x_return_status:=l_cc_return_status;
3678:
3679: IF l_debug_on THEN--{
3680: wsh_debug_sv.log(l_module_name,'l_trip_id_tab.COUNT after loop ',l_trip_id_tab.COUNT);
3681: END IF;--}
3682:
3683: ELSE --line_groups --}{
3684: --
3691: p_event => NULL,
3692: x_return_status => l_return_status);
3693:
3694: IF l_debug_on THEN --{
3695: wsh_debug_sv.log(l_module_name,'Return status from WSH_NEW_DELIVERY_ACTIONS.Adjust_Planned_Flag ', l_return_status);
3696: END IF;--}
3697:
3698: IF l_return_status in (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN--{
3699: raise Adjust_Planned_Flag_Err;
3709:
3710: --bug 2729742
3711: --set the intermediate ship to, ship method to null if group rec from constraint validation has these as 'N'
3712: IF l_debug_on THEN--{
3713: wsh_debug_sv.log(l_module_name,'l_cc_group_info.COUNT ',l_cc_group_info.COUNT);
3714: END IF;--}
3715:
3716: IF l_cc_group_info.COUNT>0 THEN--{
3717:
3719: l_cc_upd_dlvy_ship_method:=l_cc_group_info(1).upd_dlvy_ship_method;
3720:
3721: IF l_debug_on THEN--{
3722:
3723: wsh_debug_sv.log(l_module_name,'l_cc_group_info.COUNT ',l_cc_group_info.COUNT);
3724: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3725: END IF;--}
3726:
3727: IF l_cc_upd_dlvy_ship_method='N' and l_trip_id_tab is not null and l_trip_id_tab.COUNT>0 THEN--{
3720:
3721: IF l_debug_on THEN--{
3722:
3723: wsh_debug_sv.log(l_module_name,'l_cc_group_info.COUNT ',l_cc_group_info.COUNT);
3724: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3725: END IF;--}
3726:
3727: IF l_cc_upd_dlvy_ship_method='N' and l_trip_id_tab is not null and l_trip_id_tab.COUNT>0 THEN--{
3728: FOR l_tripindex IN l_trip_id_tab.FIRST..l_trip_id_tab.LAST LOOP--{
3754: p_event => NULL,
3755: x_return_status => l_return_status);
3756:
3757: IF l_debug_on THEN --{
3758: wsh_debug_sv.log(l_module_name,'Return status from WSH_NEW_DELIVERY_ACTIONS.Adjust_Planned_Flag ', l_return_status);
3759: END IF;--}
3760:
3761: IF l_return_status in (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN--{
3762: raise Adjust_Planned_Flag_Err;
3781: --
3782: -- Debug Statements
3783: --
3784: IF l_debug_on THEN--{
3785: WSH_DEBUG_SV.pop(l_module_name);
3786: END IF;--}
3787: --
3788: RETURN;
3789: END IF;--}
3793: --
3794: -- Debug Statements
3795: --
3796: IF l_debug_on THEN--{
3797: WSH_DEBUG_SV.pop(l_module_name);
3798: END IF;--}
3799: --
3800:
3801: EXCEPTION
3806: WSH_UTIL_CORE.add_message(l_return_status,l_module_name);
3807: x_return_status := l_return_status;
3808:
3809: IF l_debug_on THEN--{
3810: WSH_DEBUG_SV.logmsg(l_module_name,'Adjust_Planned_Flag_Err exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3811: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:Adjust_Planned_Flag_Err');
3812: END IF;--}
3813:
3814: WHEN others THEN
3807: x_return_status := l_return_status;
3808:
3809: IF l_debug_on THEN--{
3810: WSH_DEBUG_SV.logmsg(l_module_name,'Adjust_Planned_Flag_Err exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3811: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:Adjust_Planned_Flag_Err');
3812: END IF;--}
3813:
3814: WHEN others THEN
3815: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.AUTOCREATE_DEL_TRIP');
3819: --
3820: -- Debug Statements
3821: --
3822: IF l_debug_on THEN--{
3823: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3824: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3825: END IF;--}
3826: --
3827: END autocreate_del_trip;
3820: -- Debug Statements
3821: --
3822: IF l_debug_on THEN--{
3823: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3824: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3825: END IF;--}
3826: --
3827: END autocreate_del_trip;
3828:
3851: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3852: --
3853: IF l_debug_on IS NULL
3854: THEN
3855: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3856: END IF;
3857: --
3858: IF l_debug_on THEN
3859: WSH_DEBUG_SV.push(l_module_name);
3855: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3856: END IF;
3857: --
3858: IF l_debug_on THEN
3859: WSH_DEBUG_SV.push(l_module_name);
3860: --
3861: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
3862: END IF;
3863: --
3857: --
3858: IF l_debug_on THEN
3859: WSH_DEBUG_SV.push(l_module_name);
3860: --
3861: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
3862: END IF;
3863: --
3864: --
3865: -- Debug Statements
3864: --
3865: -- Debug Statements
3866: --
3867: IF l_debug_on THEN
3868: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DEL_ACROSS_ORGS',WSH_DEBUG_SV.C_PROC_LEVEL);
3869: END IF;
3870: --
3871: wsh_delivery_autocreate.autocreate_del_across_orgs(
3872: p_line_rows => p_line_rows,
3883: --
3884: -- Debug Statements
3885: --
3886: IF l_debug_on THEN
3887: WSH_DEBUG_SV.pop(l_module_name);
3888: END IF;
3889: --
3890: RETURN;
3891: END IF;
3893: --
3894: -- Debug Statements
3895: --
3896: IF l_debug_on THEN
3897: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.ASSIGN_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
3898: END IF;
3899: --
3900: wsh_delivery_legs_actions.assign_deliveries(
3901: p_del_rows => x_del_rows,
3910: --
3911: -- Debug Statements
3912: --
3913: IF l_debug_on THEN
3914: WSH_DEBUG_SV.pop(l_module_name);
3915: END IF;
3916: --
3917: RETURN;
3918: END IF;
3923: --
3924: -- Debug Statements
3925: --
3926: IF l_debug_on THEN
3927: WSH_DEBUG_SV.pop(l_module_name);
3928: END IF;
3929: --
3930: EXCEPTION
3931: WHEN reprice_required_err THEN
3935: --
3936: -- Debug Statements
3937: --
3938: IF l_debug_on THEN
3939: WSH_DEBUG_SV.logmsg(l_module_name,'REPRICE_REQUIRED_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3940: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REPRICE_REQUIRED_ERR');
3941: END IF;
3942: --
3943: WHEN others THEN
3936: -- Debug Statements
3937: --
3938: IF l_debug_on THEN
3939: WSH_DEBUG_SV.logmsg(l_module_name,'REPRICE_REQUIRED_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3940: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REPRICE_REQUIRED_ERR');
3941: END IF;
3942: --
3943: WHEN others THEN
3944: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.ASSIGN_TRIP');
3947: --
3948: -- Debug Statements
3949: --
3950: IF l_debug_on THEN
3951: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3952: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3953: END IF;
3954: --
3955: END assign_trip;
3948: -- Debug Statements
3949: --
3950: IF l_debug_on THEN
3951: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3952: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3953: END IF;
3954: --
3955: END assign_trip;
3956:
4012: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4013: --
4014: IF l_debug_on IS NULL
4015: THEN
4016: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4017: END IF;
4018: --
4019: IF l_debug_on THEN
4020: WSH_DEBUG_SV.push(l_module_name);
4016: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4017: END IF;
4018: --
4019: IF l_debug_on THEN
4020: WSH_DEBUG_SV.push(l_module_name);
4021: --
4022: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4023: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4024: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4018: --
4019: IF l_debug_on THEN
4020: WSH_DEBUG_SV.push(l_module_name);
4021: --
4022: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4023: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4024: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4025: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4026: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4019: IF l_debug_on THEN
4020: WSH_DEBUG_SV.push(l_module_name);
4021: --
4022: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4023: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4024: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4025: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4026: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4027: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4020: WSH_DEBUG_SV.push(l_module_name);
4021: --
4022: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4023: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4024: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4025: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4026: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4027: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4028: -- Pack J csun Stop Sequence Change
4021: --
4022: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4023: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4024: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4025: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4026: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4027: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4028: -- Pack J csun Stop Sequence Change
4029: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4022: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4023: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4024: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4025: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4026: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4027: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4028: -- Pack J csun Stop Sequence Change
4029: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4030: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4023: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4024: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4025: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4026: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4027: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4028: -- Pack J csun Stop Sequence Change
4029: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4030: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4031: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4025: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4026: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4027: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4028: -- Pack J csun Stop Sequence Change
4029: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4030: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4031: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4032: END IF;
4033: --
4026: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4027: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4028: -- Pack J csun Stop Sequence Change
4029: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4030: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4031: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4032: END IF;
4033: --
4034: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4027: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4028: -- Pack J csun Stop Sequence Change
4029: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4030: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4031: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4032: END IF;
4033: --
4034: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4035:
4040: --
4041: -- Debug Statements
4042: --
4043: IF l_debug_on THEN
4044: WSH_DEBUG_SV.pop(l_module_name);
4045: END IF;
4046: --
4047: RETURN;
4048: END IF;
4067: --
4068: -- Debug Statements
4069: --
4070: IF l_debug_on THEN
4071: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4072: END IF;
4073: --
4074: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
4075: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4079: --
4080: -- Debug Statements
4081: --
4082: IF l_debug_on THEN
4083: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_PVT.DELETE_DELIVERY_LEG',WSH_DEBUG_SV.C_PROC_LEVEL);
4084: END IF;
4085: --
4086: wsh_delivery_legs_pvt.delete_delivery_leg(NULL, l_delivery_leg_id, x_return_status);
4087:
4100: --
4101: -- Debug Statements
4102: --
4103: IF l_debug_on THEN
4104: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4105: END IF;
4106: --
4107: FND_MESSAGE.SET_TOKEN('DEL_NAME',wsh_new_deliveries_pvt.get_name(p_del_rows(i)));
4108: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4112: --
4113: -- Debug Statements
4114: --
4115: IF l_debug_on THEN
4116: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_PVT.DELETE_DELIVERY_LEG',WSH_DEBUG_SV.C_PROC_LEVEL);
4117: END IF;
4118: --
4119: wsh_delivery_legs_pvt.delete_delivery_leg(NULL, l_delivery_leg_id, x_return_status);
4120:
4125: --
4126: -- Debug Statements
4127: --
4128: IF l_debug_on THEN
4129: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.CHECK_ASSIGN_TRIP',WSH_DEBUG_SV.C_PROC_LEVEL);
4130: END IF;
4131: --
4132: wsh_delivery_validations.check_assign_trip(
4133: p_delivery_id => p_del_rows(i),
4143: --
4144: -- Debug Statements
4145: --
4146: IF l_debug_on THEN
4147: WSH_DEBUG_SV.pop(l_module_name);
4148: END IF;
4149: --
4150: RETURN;
4151: END IF;
4166: --
4167: -- Debug Statements
4168: --
4169: IF l_debug_on THEN
4170: WSH_DEBUG_SV.pop(l_module_name);
4171: END IF;
4172: --
4173: EXCEPTION
4174: WHEN others THEN
4178: --
4179: -- Debug Statements
4180: --
4181: IF l_debug_on THEN
4182: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4183: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4184: END IF;
4185: --
4186: END check_assign_trip;
4179: -- Debug Statements
4180: --
4181: IF l_debug_on THEN
4182: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4183: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4184: END IF;
4185: --
4186: END check_assign_trip;
4187:
4323: ORDER BY ts2.stop_sequence_number;
4324: l_ssn NUMBER;
4325: BEGIN
4326: IF l_debug_on THEN
4327: WSH_DEBUG_SV.log(l_module_name, 'entering internal function derive_next_ssn, p_stop_id ', p_stop_id);
4328: END IF;
4329:
4330: l_ssn := NULL;
4331:
4343: END IF;
4344: END LOOP;
4345:
4346: IF l_debug_on THEN
4347: WSH_DEBUG_SV.log(l_module_name, 'exiting internal function derive_next_ssn, returning l_ssn', l_ssn);
4348: END IF;
4349: RETURN l_ssn;
4350:
4351: EXCEPTION
4350:
4351: EXCEPTION
4352: WHEN OTHERS THEN
4353: IF l_debug_on THEN
4354: WSH_DEBUG_SV.log(l_module_name, 'exiting internal function derive_next_ssn, unhandled exception');
4355: END IF;
4356: RETURN 0;
4357: END;
4358:
4359: BEGIN
4360: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4361: --
4362: IF l_debug_on IS NULL THEN
4363: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4364: END IF;
4365:
4366: IF l_debug_on THEN
4367: WSH_DEBUG_SV.push(l_module_name);
4363: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4364: END IF;
4365:
4366: IF l_debug_on THEN
4367: WSH_DEBUG_SV.push(l_module_name);
4368: WSH_DEBUG_SV.log(l_module_name, 'p_caller', p_caller);
4369: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_stop_id', p_pickup_stop_id);
4370: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_location_id', p_pickup_location_id);
4371: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_stop_id', p_dropoff_stop_id);
4364: END IF;
4365:
4366: IF l_debug_on THEN
4367: WSH_DEBUG_SV.push(l_module_name);
4368: WSH_DEBUG_SV.log(l_module_name, 'p_caller', p_caller);
4369: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_stop_id', p_pickup_stop_id);
4370: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_location_id', p_pickup_location_id);
4371: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_stop_id', p_dropoff_stop_id);
4372: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_location_id', p_dropoff_location_id);
4365:
4366: IF l_debug_on THEN
4367: WSH_DEBUG_SV.push(l_module_name);
4368: WSH_DEBUG_SV.log(l_module_name, 'p_caller', p_caller);
4369: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_stop_id', p_pickup_stop_id);
4370: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_location_id', p_pickup_location_id);
4371: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_stop_id', p_dropoff_stop_id);
4372: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_location_id', p_dropoff_location_id);
4373: END IF;
4366: IF l_debug_on THEN
4367: WSH_DEBUG_SV.push(l_module_name);
4368: WSH_DEBUG_SV.log(l_module_name, 'p_caller', p_caller);
4369: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_stop_id', p_pickup_stop_id);
4370: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_location_id', p_pickup_location_id);
4371: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_stop_id', p_dropoff_stop_id);
4372: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_location_id', p_dropoff_location_id);
4373: END IF;
4374: --
4367: WSH_DEBUG_SV.push(l_module_name);
4368: WSH_DEBUG_SV.log(l_module_name, 'p_caller', p_caller);
4369: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_stop_id', p_pickup_stop_id);
4370: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_location_id', p_pickup_location_id);
4371: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_stop_id', p_dropoff_stop_id);
4372: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_location_id', p_dropoff_location_id);
4373: END IF;
4374: --
4375: --
4368: WSH_DEBUG_SV.log(l_module_name, 'p_caller', p_caller);
4369: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_stop_id', p_pickup_stop_id);
4370: WSH_DEBUG_SV.log(l_module_name, 'p_pickup_location_id', p_pickup_location_id);
4371: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_stop_id', p_dropoff_stop_id);
4372: WSH_DEBUG_SV.log(l_module_name, 'p_dropoff_location_id', p_dropoff_location_id);
4373: END IF;
4374: --
4375: --
4376: x_return_status :=WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4415: x_return_status:=l_return_status;
4416: RETURN;
4417: END IF;
4418: IF l_debug_on THEN
4419: WSH_DEBUG_SV.log(l_module_name,'l_phys_trip_pickup_loc_id',l_phys_trip_pickup_loc_id);
4420: END IF;
4421: END IF;
4422:
4423: --b) only in ASSIGN-TRIP cases we need to check for internal locs
4463: IF l_physical_stop_id IS NOT NULL THEN
4464: --if we find a stop with same physical location in the
4465: --trip, we use that for pickup
4466: IF l_debug_on THEN
4467: WSH_DEBUG_SV.log(l_module_name,'Caller is FTE/TP using pickup stop l_physical_stop_id',l_physical_stop_id);
4468: END IF;
4469: x_pickup_stop_id:=l_physical_stop_id;
4470: ELSE --l_physical_stop_id IS NULL
4471: --make pickup loc = l_phys_trip_pickup_loc_id if there
4474: FETCH c_any_activity_exists INTO l_find_leg;
4475:
4476: IF c_any_activity_exists%NOTFOUND THEN
4477: IF l_debug_on THEN
4478: WSH_DEBUG_SV.logmsg(l_module_name,'Caller is FTE/TP changing pickup loc to be l_phys_trip_pickup_loc_id');
4479: END IF;
4480:
4481: UPDATE wsh_trip_stops
4482: SET stop_location_id= l_phys_trip_pickup_loc_id,
4490: ELSE
4491: --there is a leg associated with internal stop and user is trying to use this for pickup as well.
4492: --in this case we create new stop with l_phys_trip_pickup_loc_id
4493: IF l_debug_on THEN
4494: 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');
4495: END IF;
4496: x_pickup_stop_id:=null;
4497: x_pickup_location_id:=l_phys_trip_pickup_loc_id;
4498: END IF;
4503:
4504: ELSE --p_pickup_stop_id is null
4505: --set l_pickup_location_id as the physical location so that this loc will be used to create stop
4506: IF l_debug_on THEN
4507: WSH_DEBUG_SV.logmsg(l_module_name,'Caller is FTE/TP create new pickup stop with l_phys_trip_pickup_loc_id');
4508: END IF;
4509: x_pickup_location_id:=l_phys_trip_pickup_loc_id;
4510: END IF;
4511:
4512: ELSE--caller is WSH
4513: x_return_status:=WSH_UTIL_CORE.G_RET_STS_ERROR;
4514: FND_MESSAGE.SET_NAME('WSH','WSH_CANNOT_USE_DUMMY_PICKUP');
4515: IF l_debug_on THEN
4516: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.get_location_description',WSH_DEBUG_SV.C_PROC_LEVEL);
4517: END IF;
4518: FND_MESSAGE.SET_TOKEN('STOP_NAME',SUBSTR(WSH_UTIL_CORE.get_location_description(l_phys_trip_pickup_loc_id, 'NEW UI CODE'),1,60));
4519: wsh_util_core.add_message(x_return_status,l_module_name);
4520: IF l_debug_on THEN
4517: END IF;
4518: FND_MESSAGE.SET_TOKEN('STOP_NAME',SUBSTR(WSH_UTIL_CORE.get_location_description(l_phys_trip_pickup_loc_id, 'NEW UI CODE'),1,60));
4519: wsh_util_core.add_message(x_return_status,l_module_name);
4520: IF l_debug_on THEN
4521: WSH_DEBUG_SV.pop(l_module_name);
4522: END IF;
4523: RETURN;
4524: END IF;
4525: END IF; --p_pickpu_stop_id is not null
4528: --2. Process the deliveries
4529: FOR i IN 1..p_del_rows.count LOOP
4530:
4531: IF l_debug_on THEN
4532: wsh_debug_sv.log(l_module_name, 'p_del_rows(i)', p_del_rows(i));
4533: END IF;
4534:
4535: l_pickup_location_id := NULL;
4536: l_dropoff_location_id := NULL;
4542: CLOSE delivery_info;
4543:
4544: --
4545: IF l_debug_on THEN
4546: wsh_debug_sv.log(l_module_name, 'l_pickup_location_id', l_pickup_location_id);
4547: wsh_debug_sv.log(l_module_name, 'l_dropoff_location_id', l_dropoff_location_id);
4548: END IF;
4549:
4550:
4543:
4544: --
4545: IF l_debug_on THEN
4546: wsh_debug_sv.log(l_module_name, 'l_pickup_location_id', l_pickup_location_id);
4547: wsh_debug_sv.log(l_module_name, 'l_dropoff_location_id', l_dropoff_location_id);
4548: END IF;
4549:
4550:
4551: --Check if del's pickup and dropoff are same location
4581: --we do not need to repeat the steps again for later deliveries
4582:
4583: IF l_phys_del_dropoff_loc_id IS NOT NULL AND l_phys_del_dropoff_loc_id=l_trip_dropoff_loc_id THEN
4584: IF l_debug_on THEN
4585: WSH_DEBUG_SV.log(l_module_name,'l_phys_del_dropoff_loc_id',l_phys_del_dropoff_loc_id);
4586: END IF;
4587: l_find_stop:=null;
4588: l_internal_del_id_count:=l_internal_del_id_count+1;
4589: l_internal_del_ids(l_internal_del_id_count):=p_del_rows(i);
4616:
4617: --see if you can find stop with del's dropoff loc
4618: IF l_find_stop IS NOT NULL THEN
4619: IF l_debug_on THEN
4620: WSH_DEBUG_SV.log(l_module_name,'existing stop used as dropoff',l_find_stop);
4621: END IF;
4622: x_dropoff_stop_id:=l_find_stop;
4623: --set the l_trip_dropoff_loc_id to point to the new value
4624: x_dropoff_location_id:=l_dropoff_location_id;
4643: END IF;
4644:
4645: IF NOT(b_checkstopupdate) THEN
4646: IF l_debug_on THEN
4647: 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);
4648: END IF;
4649:
4650: IF WSH_TRIPS_ACTIONS.GET_STOP_SEQ_MODE = WSH_INTERFACE_GRP.G_STOP_SEQ_MODE_SSN THEN
4651: x_dropoff_seq_num := derive_next_ssn(p_trip_id, x_dropoff_stop_id);
4649:
4650: IF WSH_TRIPS_ACTIONS.GET_STOP_SEQ_MODE = WSH_INTERFACE_GRP.G_STOP_SEQ_MODE_SSN THEN
4651: x_dropoff_seq_num := derive_next_ssn(p_trip_id, x_dropoff_stop_id);
4652: IF l_debug_on THEN
4653: WSH_DEBUG_SV.log(l_module_name,'x_dropoff_seq_num adjusted', x_dropoff_seq_num);
4654: END IF;
4655: END IF; -- SSN mode
4656:
4657: x_dropoff_stop_id:=null;
4657: x_dropoff_stop_id:=null;
4658: x_dropoff_location_id:=l_dropoff_location_id;
4659: ELSE
4660: IF l_debug_on THEN
4661: WSH_DEBUG_SV.log(l_module_name,'changing stop location to internal location l_dropoff_location_id',l_dropoff_location_id);
4662: END IF;
4663:
4664: UPDATE wsh_trip_stops
4665: SET stop_location_id= l_dropoff_location_id,
4672: x_dropoff_location_id:=l_dropoff_location_id;
4673: END IF;
4674: ELSE
4675: IF l_debug_on THEN
4676: WSH_DEBUG_SV.log(l_module_name,'Have to create new internal stop as existing physical stop has activities',l_dropoff_location_id);
4677: END IF;
4678:
4679: IF WSH_TRIPS_ACTIONS.GET_STOP_SEQ_MODE = WSH_INTERFACE_GRP.G_STOP_SEQ_MODE_SSN THEN
4680: x_dropoff_seq_num := derive_next_ssn(p_trip_id, x_dropoff_stop_id);
4678:
4679: IF WSH_TRIPS_ACTIONS.GET_STOP_SEQ_MODE = WSH_INTERFACE_GRP.G_STOP_SEQ_MODE_SSN THEN
4680: x_dropoff_seq_num := derive_next_ssn(p_trip_id, x_dropoff_stop_id);
4681: IF l_debug_on THEN
4682: WSH_DEBUG_SV.log(l_module_name,'x_dropoff_seq_num adjusted', x_dropoff_seq_num);
4683: END IF;
4684: END IF;
4685:
4686: x_dropoff_stop_id:=null;
4703: END IF;--p_dropoff_stop_id is not null
4704: END LOOP;
4705:
4706: IF l_debug_on THEN
4707: WSH_DEBUG_SV.log(l_module_name, 'x_del_ids count', l_del_id_count);
4708: WSH_DEBUG_SV.log(l_module_name, 'x_internal_del_ids count', l_internal_del_id_count);
4709: END IF;
4710:
4711: x_internal_del_ids:=l_internal_del_ids;
4704: END LOOP;
4705:
4706: IF l_debug_on THEN
4707: WSH_DEBUG_SV.log(l_module_name, 'x_del_ids count', l_del_id_count);
4708: WSH_DEBUG_SV.log(l_module_name, 'x_internal_del_ids count', l_internal_del_id_count);
4709: END IF;
4710:
4711: x_internal_del_ids:=l_internal_del_ids;
4712: x_del_ids:=l_del_ids;
4713:
4714: --
4715: --
4716: IF l_debug_on THEN
4717: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4718: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_stop_id', x_pickup_stop_id);
4719: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_location_id', x_pickup_location_id);
4720: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_stop_id', x_dropoff_stop_id);
4721: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_location_id', x_dropoff_location_id);
4714: --
4715: --
4716: IF l_debug_on THEN
4717: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4718: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_stop_id', x_pickup_stop_id);
4719: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_location_id', x_pickup_location_id);
4720: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_stop_id', x_dropoff_stop_id);
4721: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_location_id', x_dropoff_location_id);
4722: WSH_DEBUG_SV.pop(l_module_name);
4715: --
4716: IF l_debug_on THEN
4717: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4718: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_stop_id', x_pickup_stop_id);
4719: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_location_id', x_pickup_location_id);
4720: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_stop_id', x_dropoff_stop_id);
4721: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_location_id', x_dropoff_location_id);
4722: WSH_DEBUG_SV.pop(l_module_name);
4723: END IF;
4716: IF l_debug_on THEN
4717: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4718: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_stop_id', x_pickup_stop_id);
4719: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_location_id', x_pickup_location_id);
4720: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_stop_id', x_dropoff_stop_id);
4721: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_location_id', x_dropoff_location_id);
4722: WSH_DEBUG_SV.pop(l_module_name);
4723: END IF;
4724:
4717: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
4718: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_stop_id', x_pickup_stop_id);
4719: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_location_id', x_pickup_location_id);
4720: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_stop_id', x_dropoff_stop_id);
4721: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_location_id', x_dropoff_location_id);
4722: WSH_DEBUG_SV.pop(l_module_name);
4723: END IF;
4724:
4725: EXCEPTION
4718: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_stop_id', x_pickup_stop_id);
4719: WSH_DEBUG_SV.log(l_module_name, 'x_pickup_location_id', x_pickup_location_id);
4720: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_stop_id', x_dropoff_stop_id);
4721: WSH_DEBUG_SV.log(l_module_name, 'x_dropoff_location_id', x_dropoff_location_id);
4722: WSH_DEBUG_SV.pop(l_module_name);
4723: END IF;
4724:
4725: EXCEPTION
4726: WHEN bad_trip_stop THEN
4733: --
4734: -- Debug Statements
4735: --
4736: IF l_debug_on THEN
4737: WSH_DEBUG_SV.logmsg(l_module_name,'BAD_TRIP_STOP exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4738: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:BAD_TRIP_STOP');
4739: END IF;
4740: --
4741: WHEN OTHERS THEN
4734: -- Debug Statements
4735: --
4736: IF l_debug_on THEN
4737: WSH_DEBUG_SV.logmsg(l_module_name,'BAD_TRIP_STOP exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4738: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:BAD_TRIP_STOP');
4739: END IF;
4740: --
4741: WHEN OTHERS THEN
4742: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4744: 'WSH_TRIPS_ACTIONS.process_dels_for_internal_locs',
4745: l_module_name);
4746:
4747: IF l_debug_on THEN
4748: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4749: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4750: END IF;
4751:
4752: END process_dels_for_internal_locs;
4745: l_module_name);
4746:
4747: IF l_debug_on THEN
4748: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4749: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4750: END IF;
4751:
4752: END process_dels_for_internal_locs;
4753:
4834: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4835: --
4836: IF l_debug_on IS NULL
4837: THEN
4838: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4839: END IF;
4840: --
4841: l_stop_seq_mode := WSH_TRIPS_ACTIONS.GET_STOP_SEQ_MODE;
4842:
4840: --
4841: l_stop_seq_mode := WSH_TRIPS_ACTIONS.GET_STOP_SEQ_MODE;
4842:
4843: IF l_debug_on THEN
4844: WSH_DEBUG_SV.push(l_module_name);
4845: --
4846: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4847: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4848: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_SEQ',P_PICKUP_STOP_SEQ);
4842:
4843: IF l_debug_on THEN
4844: WSH_DEBUG_SV.push(l_module_name);
4845: --
4846: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4847: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4848: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_SEQ',P_PICKUP_STOP_SEQ);
4849: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4850: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_SEQ',P_DROPOFF_STOP_SEQ);
4843: IF l_debug_on THEN
4844: WSH_DEBUG_SV.push(l_module_name);
4845: --
4846: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4847: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4848: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_SEQ',P_PICKUP_STOP_SEQ);
4849: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4850: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_SEQ',P_DROPOFF_STOP_SEQ);
4851: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4844: WSH_DEBUG_SV.push(l_module_name);
4845: --
4846: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4847: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4848: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_SEQ',P_PICKUP_STOP_SEQ);
4849: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4850: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_SEQ',P_DROPOFF_STOP_SEQ);
4851: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4852: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4845: --
4846: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4847: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4848: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_SEQ',P_PICKUP_STOP_SEQ);
4849: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4850: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_SEQ',P_DROPOFF_STOP_SEQ);
4851: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4852: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4853: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4846: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
4847: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4848: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_SEQ',P_PICKUP_STOP_SEQ);
4849: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4850: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_SEQ',P_DROPOFF_STOP_SEQ);
4851: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4852: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4853: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4854: -- Pack J csun Stop Sequence Change
4847: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_ID',P_PICKUP_STOP_ID);
4848: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_SEQ',P_PICKUP_STOP_SEQ);
4849: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4850: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_SEQ',P_DROPOFF_STOP_SEQ);
4851: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4852: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4853: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4854: -- Pack J csun Stop Sequence Change
4855: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4848: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_STOP_SEQ',P_PICKUP_STOP_SEQ);
4849: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4850: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_SEQ',P_DROPOFF_STOP_SEQ);
4851: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4852: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4853: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4854: -- Pack J csun Stop Sequence Change
4855: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4856: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4849: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_ID',P_DROPOFF_STOP_ID);
4850: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_STOP_SEQ',P_DROPOFF_STOP_SEQ);
4851: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4852: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4853: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4854: -- Pack J csun Stop Sequence Change
4855: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4856: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4857: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4851: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_LOCATION_ID',P_PICKUP_LOCATION_ID);
4852: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4853: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4854: -- Pack J csun Stop Sequence Change
4855: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4856: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4857: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4858: WSH_DEBUG_SV.log(l_module_name,'STOP SEQUENCE MODE',l_stop_seq_mode);
4859:
4852: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_LOCATION_ID',P_DROPOFF_LOCATION_ID);
4853: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4854: -- Pack J csun Stop Sequence Change
4855: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4856: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4857: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4858: WSH_DEBUG_SV.log(l_module_name,'STOP SEQUENCE MODE',l_stop_seq_mode);
4859:
4860: END IF;
4853: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_ARR_DATE',P_PICKUP_ARR_DATE);
4854: -- Pack J csun Stop Sequence Change
4855: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4856: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4857: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4858: WSH_DEBUG_SV.log(l_module_name,'STOP SEQUENCE MODE',l_stop_seq_mode);
4859:
4860: END IF;
4861: --
4854: -- Pack J csun Stop Sequence Change
4855: WSH_DEBUG_SV.log(l_module_name,'P_PICKUP_DEP_DATE',P_PICKUP_DEP_DATE);
4856: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_ARR_DATE',P_DROPOFF_ARR_DATE);
4857: WSH_DEBUG_SV.log(l_module_name,'P_DROPOFF_DEP_DATE',P_DROPOFF_DEP_DATE);
4858: WSH_DEBUG_SV.log(l_module_name,'STOP SEQUENCE MODE',l_stop_seq_mode);
4859:
4860: END IF;
4861: --
4862: IF (p_del_rows.count = 0) THEN
4893: --
4894: -- Debug Statements
4895: --
4896: IF l_debug_on THEN
4897: WSH_DEBUG_SV.pop(l_module_name);
4898: END IF;
4899: --
4900: RETURN;
4901: END IF;
4922: --
4923: -- Debug Statements
4924: --
4925: IF l_debug_on THEN
4926: WSH_DEBUG_SV.pop(l_module_name);
4927: END IF;
4928: --
4929: RETURN;
4930: END IF;
4942: x_del_old_carrier_ids => l_del_old_carrier_ids,
4943: x_return_status => l_wf_rs);
4944: */
4945: IF l_debug_on THEN
4946: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit process_dels_for_internal_locs',WSH_DEBUG_SV.C_PROC_LEVEL);
4947: END IF;
4948: process_dels_for_internal_locs(
4949: p_del_rows => p_del_rows,
4950: p_trip_id => p_trip_id,
4963: x_internal_del_ids => l_internal_del_ids);
4964:
4965: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
4966: IF l_debug_on THEN
4967: WSH_DEBUG_SV.log(l_module_name,'process_dels_for_internal_locs return_status',x_return_status);
4968: WSH_DEBUG_SV.pop(l_module_name);
4969: END IF;
4970: RETURN;
4971: END IF;
4964:
4965: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
4966: IF l_debug_on THEN
4967: WSH_DEBUG_SV.log(l_module_name,'process_dels_for_internal_locs return_status',x_return_status);
4968: WSH_DEBUG_SV.pop(l_module_name);
4969: END IF;
4970: RETURN;
4971: END IF;
4972:
4981: -- end of SSN Change, add conditional check
4982:
4983: IF l_internal_del_ids IS NOT NULL and l_internal_del_ids.count>0 THEN
4984: IF l_debug_on THEN
4985: 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);
4986: END IF;
4987: wsh_delivery_legs_actions.assign_deliveries(
4988: p_del_rows => l_internal_del_ids,
4989: p_trip_id => p_trip_id,
5002: p_dropoff_arr_date => p_dropoff_arr_date,
5003: p_dropoff_dep_date => p_dropoff_dep_date);
5004:
5005: IF l_debug_on THEN
5006: WSH_DEBUG_SV.log(l_module_name,'wsh_delivery_legs_actions.assign_deliveries return_status',l_return_status);
5007: END IF;
5008:
5009: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5010: x_return_status := l_return_status;
5008:
5009: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5010: x_return_status := l_return_status;
5011: IF l_debug_on THEN
5012: WSH_DEBUG_SV.pop(l_module_name);
5013: END IF;
5014: RETURN;
5015: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5016: x_return_status := l_return_status;
5019:
5020:
5021: IF l_del_ids IS NOT NULL and l_del_ids.count>0 THEN
5022: IF l_debug_on THEN
5023: 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);
5024: END IF;
5025: wsh_delivery_legs_actions.assign_deliveries(
5026: p_del_rows => l_del_ids,
5027: p_trip_id => p_trip_id,
5040: p_dropoff_arr_date => p_dropoff_arr_date,
5041: p_dropoff_dep_date => p_dropoff_dep_date);
5042:
5043: IF l_debug_on THEN
5044: WSH_DEBUG_SV.log(l_module_name,'wsh_delivery_legs_actions.assign_deliveries return_status',l_return_status);
5045: END IF;
5046:
5047: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5048: x_return_status := l_return_status;
5046:
5047: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5048: x_return_status := l_return_status;
5049: IF l_debug_on THEN
5050: WSH_DEBUG_SV.pop(l_module_name);
5051: END IF;
5052: RETURN;
5053: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5054: x_return_status := l_return_status;
5069: p_stop_details_rec => l_stop_details_rec,
5070: x_return_status => l_return_status );
5071:
5072: IF l_debug_on THEN
5073: WSH_DEBUG_SV.log(l_module_name,'return status from WSH_TRIP_STOPS_ACTIONS.RESET_STOP_SEQ_NUMBERS',l_return_status);
5074: END IF;
5075:
5076: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5077: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5081: --
5082: -- Debug Statements
5083: --
5084: IF l_debug_on THEN
5085: WSH_DEBUG_SV.pop(l_module_name);
5086: END IF;
5087: --
5088: RETURN;
5089: END IF;
5099: p_caller => p_caller
5100: );
5101:
5102: IF l_debug_on THEN
5103: 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);
5104: END IF;
5105:
5106: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5107: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5111: --
5112: -- Debug Statements
5113: --
5114: IF l_debug_on THEN
5115: WSH_DEBUG_SV.pop(l_module_name);
5116: END IF;
5117: --
5118: RETURN;
5119: END IF;
5136: --
5137: -- Debug Statements
5138: --
5139: IF l_debug_on THEN
5140: WSH_DEBUG_SV.pop(l_module_name);
5141: END IF;
5142: --
5143: EXCEPTION
5144: WHEN stop_not_found THEN
5148: --
5149: -- Debug Statements
5150: --
5151: IF l_debug_on THEN
5152: WSH_DEBUG_SV.logmsg(l_module_name,'STOP_NOT_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5153: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:STOP_NOT_FOUND');
5154: END IF;
5155: --
5156: WHEN others THEN
5149: -- Debug Statements
5150: --
5151: IF l_debug_on THEN
5152: WSH_DEBUG_SV.logmsg(l_module_name,'STOP_NOT_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5153: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:STOP_NOT_FOUND');
5154: END IF;
5155: --
5156: WHEN others THEN
5157: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.ASSIGN_TRIP');
5160: --
5161: -- Debug Statements
5162: --
5163: IF l_debug_on THEN
5164: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5165: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5166: END IF;
5167: --
5168: END assign_trip;
5161: -- Debug Statements
5162: --
5163: IF l_debug_on THEN
5164: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5165: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5166: END IF;
5167: --
5168: END assign_trip;
5169:
5252: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5253: --
5254: IF l_debug_on IS NULL
5255: THEN
5256: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5257: END IF;
5258: --
5259: IF l_debug_on THEN
5260: WSH_DEBUG_SV.push(l_module_name);
5256: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5257: END IF;
5258: --
5259: IF l_debug_on THEN
5260: WSH_DEBUG_SV.push(l_module_name);
5261: --
5262: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
5263: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
5264: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
5258: --
5259: IF l_debug_on THEN
5260: WSH_DEBUG_SV.push(l_module_name);
5261: --
5262: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
5263: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
5264: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
5265: END IF;
5266: --
5259: IF l_debug_on THEN
5260: WSH_DEBUG_SV.push(l_module_name);
5261: --
5262: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
5263: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
5264: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
5265: END IF;
5266: --
5267: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5260: WSH_DEBUG_SV.push(l_module_name);
5261: --
5262: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
5263: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
5264: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
5265: END IF;
5266: --
5267: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5268:
5268:
5269: -- Return if stop is null or if W/V is null
5270: IF p_stop_id is NULL OR (p_gross_weight is NULL AND p_volume is NULL) THEN
5271: IF l_debug_on THEN
5272: WSH_DEBUG_SV.pop(l_module_name);
5273: END IF;
5274: return;
5275: END IF;
5276:
5278: OPEN c_get_stop_trip(p_stop_id);
5279: FETCH c_get_stop_trip INTO l_trip_id, l_stop_wt_uom, l_stop_vol_uom;
5280: IF c_get_stop_trip%NOTFOUND THEN
5281: IF l_debug_on THEN
5282: WSH_DEBUG_SV.logmsg(l_module_name,'Stop '||p_stop_id||' not found');
5283: WSH_DEBUG_SV.pop(l_module_name);
5284: END IF;
5285: CLOSE c_get_stop_trip;
5286: return;
5279: FETCH c_get_stop_trip INTO l_trip_id, l_stop_wt_uom, l_stop_vol_uom;
5280: IF c_get_stop_trip%NOTFOUND THEN
5281: IF l_debug_on THEN
5282: WSH_DEBUG_SV.logmsg(l_module_name,'Stop '||p_stop_id||' not found');
5283: WSH_DEBUG_SV.pop(l_module_name);
5284: END IF;
5285: CLOSE c_get_stop_trip;
5286: return;
5287: END IF;
5324: CLOSE org_info;
5325: END IF;
5326:
5327: IF l_debug_on THEN
5328: 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);
5329: 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);
5330: END IF;
5331:
5332:
5325: END IF;
5326:
5327: IF l_debug_on THEN
5328: 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);
5329: 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);
5330: END IF;
5331:
5332:
5333: -- Calculate the fill%
5334: IF (l_vehicle_item_id IS NOT NULL) AND (l_vehicle_org_id IS NOT NULL) THEN
5335:
5336: IF (l_fill_basis = 'W') AND (l_trip_max_weight IS NOT NULL) AND (l_trip_weight_uom IS NOT NULL) THEN
5337: IF l_debug_on THEN
5338: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5339: END IF;
5340: --
5341: l_wt_vol_tmp := wsh_wv_utils.convert_uom(l_trip_weight_uom, l_stop_wt_uom, l_trip_max_weight);
5342: IF (l_wt_vol_tmp > 0) THEN
5344: END IF;
5345: ELSIF (l_fill_basis = 'V') AND (l_trip_max_volume IS NOT NULL) AND (l_trip_volume_uom IS NOT NULL) THEN
5346:
5347: IF l_debug_on THEN
5348: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5349: END IF;
5350: --
5351: l_wt_vol_tmp := wsh_wv_utils.convert_uom(l_trip_volume_uom, l_stop_vol_uom, l_trip_max_volume);
5352: IF (l_wt_vol_tmp > 0) THEN
5358:
5359: END IF;
5360:
5361: IF l_debug_on THEN
5362: WSH_DEBUG_SV.logmsg(l_module_name,'x_stop_fill_percent '||x_stop_fill_percent||' x_return_status '||x_return_status);
5363: WSH_DEBUG_SV.pop(l_module_name);
5364: END IF;
5365:
5366: EXCEPTION
5359: END IF;
5360:
5361: IF l_debug_on THEN
5362: WSH_DEBUG_SV.logmsg(l_module_name,'x_stop_fill_percent '||x_stop_fill_percent||' x_return_status '||x_return_status);
5363: WSH_DEBUG_SV.pop(l_module_name);
5364: END IF;
5365:
5366: EXCEPTION
5367: WHEN others THEN
5380: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.CALC_STOP_FILL_PERCENT');
5381: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5382:
5383: IF l_debug_on THEN
5384: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5385: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5386: END IF;
5387:
5388: END calc_stop_fill_percent;
5381: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5382:
5383: IF l_debug_on THEN
5384: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5385: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5386: END IF;
5387:
5388: END calc_stop_fill_percent;
5389:
5574: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5575: --
5576: IF l_debug_on IS NULL
5577: THEN
5578: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5579: END IF;
5580: --
5581: IF l_debug_on THEN
5582: WSH_DEBUG_SV.push(l_module_name);
5578: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5579: END IF;
5580: --
5581: IF l_debug_on THEN
5582: WSH_DEBUG_SV.push(l_module_name);
5583: --
5584: WSH_DEBUG_SV.log(l_module_name,'P_OVERRIDE_FLAG',P_OVERRIDE_FLAG);
5585: WSH_DEBUG_SV.log(l_module_name,'P_CALC_WV_IF_FROZEN',P_CALC_WV_IF_FROZEN);
5586: WSH_DEBUG_SV.log(l_module_name,'P_START_DEPARTURE_DATE',P_START_DEPARTURE_DATE);
5580: --
5581: IF l_debug_on THEN
5582: WSH_DEBUG_SV.push(l_module_name);
5583: --
5584: WSH_DEBUG_SV.log(l_module_name,'P_OVERRIDE_FLAG',P_OVERRIDE_FLAG);
5585: WSH_DEBUG_SV.log(l_module_name,'P_CALC_WV_IF_FROZEN',P_CALC_WV_IF_FROZEN);
5586: WSH_DEBUG_SV.log(l_module_name,'P_START_DEPARTURE_DATE',P_START_DEPARTURE_DATE);
5587: WSH_DEBUG_SV.log(l_module_name,'P_CALC_DEL_WV',P_CALC_DEL_WV);
5588: WSH_DEBUG_SV.log(l_module_name,'P_SUPPRESS_ERRORS',P_SUPPRESS_ERRORS);
5581: IF l_debug_on THEN
5582: WSH_DEBUG_SV.push(l_module_name);
5583: --
5584: WSH_DEBUG_SV.log(l_module_name,'P_OVERRIDE_FLAG',P_OVERRIDE_FLAG);
5585: WSH_DEBUG_SV.log(l_module_name,'P_CALC_WV_IF_FROZEN',P_CALC_WV_IF_FROZEN);
5586: WSH_DEBUG_SV.log(l_module_name,'P_START_DEPARTURE_DATE',P_START_DEPARTURE_DATE);
5587: WSH_DEBUG_SV.log(l_module_name,'P_CALC_DEL_WV',P_CALC_DEL_WV);
5588: WSH_DEBUG_SV.log(l_module_name,'P_SUPPRESS_ERRORS',P_SUPPRESS_ERRORS);
5589: END IF;
5582: WSH_DEBUG_SV.push(l_module_name);
5583: --
5584: WSH_DEBUG_SV.log(l_module_name,'P_OVERRIDE_FLAG',P_OVERRIDE_FLAG);
5585: WSH_DEBUG_SV.log(l_module_name,'P_CALC_WV_IF_FROZEN',P_CALC_WV_IF_FROZEN);
5586: WSH_DEBUG_SV.log(l_module_name,'P_START_DEPARTURE_DATE',P_START_DEPARTURE_DATE);
5587: WSH_DEBUG_SV.log(l_module_name,'P_CALC_DEL_WV',P_CALC_DEL_WV);
5588: WSH_DEBUG_SV.log(l_module_name,'P_SUPPRESS_ERRORS',P_SUPPRESS_ERRORS);
5589: END IF;
5590: --
5583: --
5584: WSH_DEBUG_SV.log(l_module_name,'P_OVERRIDE_FLAG',P_OVERRIDE_FLAG);
5585: WSH_DEBUG_SV.log(l_module_name,'P_CALC_WV_IF_FROZEN',P_CALC_WV_IF_FROZEN);
5586: WSH_DEBUG_SV.log(l_module_name,'P_START_DEPARTURE_DATE',P_START_DEPARTURE_DATE);
5587: WSH_DEBUG_SV.log(l_module_name,'P_CALC_DEL_WV',P_CALC_DEL_WV);
5588: WSH_DEBUG_SV.log(l_module_name,'P_SUPPRESS_ERRORS',P_SUPPRESS_ERRORS);
5589: END IF;
5590: --
5591: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5584: WSH_DEBUG_SV.log(l_module_name,'P_OVERRIDE_FLAG',P_OVERRIDE_FLAG);
5585: WSH_DEBUG_SV.log(l_module_name,'P_CALC_WV_IF_FROZEN',P_CALC_WV_IF_FROZEN);
5586: WSH_DEBUG_SV.log(l_module_name,'P_START_DEPARTURE_DATE',P_START_DEPARTURE_DATE);
5587: WSH_DEBUG_SV.log(l_module_name,'P_CALC_DEL_WV',P_CALC_DEL_WV);
5588: WSH_DEBUG_SV.log(l_module_name,'P_SUPPRESS_ERRORS',P_SUPPRESS_ERRORS);
5589: END IF;
5590: --
5591: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5592: IF (p_trip_rows.count = 0) THEN
5632: --
5633: -- Debug Statements
5634: --
5635: IF l_debug_on THEN
5636: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ORG_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5637: END IF;
5638: --
5639: FND_MESSAGE.SET_TOKEN('l_vehicle_org', WSH_UTIL_CORE.Get_Org_Name(l_vehicle_org_id));
5640: --End of Bug 2415809
5661: --
5662: -- Debug Statements
5663: --
5664: IF l_debug_on THEN
5665: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5666: END IF;
5667: --
5668: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_rows(i)));
5669: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5685: --
5686: -- Debug Statements
5687: --
5688: IF l_debug_on THEN
5689: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5690: END IF;
5691: --
5692: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_rows(i)));
5693: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5722: --
5723: -- Debug Statements
5724: --
5725: IF l_debug_on THEN
5726: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5727: END IF;
5728: --
5729: FND_MESSAGE.SET_TOKEN('stop_name',wsh_trip_stops_pvt.get_name(l_start_stop_id,p_caller));
5730: -- bug 2732503 , need a warning message only when FTE is installed
5742: --increment l_stop_num_warn for this stop loop so that for each trip, l_num_warn will get updated max by 1
5743: LOOP
5744:
5745: IF l_debug_on THEN
5746: WSH_DEBUG_SV.logmsg(l_module_name,'*** Processing Stop '||l_stop_id||' ***');
5747: END IF;
5748:
5749: l_total_pick_up_weight := 0;
5750: l_total_drop_off_weight := 0;
5761: l_prev_wt_uom := l_stop_wt_uom;
5762: l_prev_vol_uom := l_stop_vol_uom;
5763:
5764: IF l_debug_on THEN
5765: 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);
5766: WSH_DEBUG_SV.logmsg(l_module_name,'WV Frozen '||l_wv_frozen_flag||'. Skipping the Stop W/V calculation.');
5767: END IF;
5768: --R12 MDC
5769: --Removing the goto statement because code needs to update the new pick_up/drop_off weight/volume columns even if frozen flag is Y
5762: l_prev_vol_uom := l_stop_vol_uom;
5763:
5764: IF l_debug_on THEN
5765: 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);
5766: WSH_DEBUG_SV.logmsg(l_module_name,'WV Frozen '||l_wv_frozen_flag||'. Skipping the Stop W/V calculation.');
5767: END IF;
5768: --R12 MDC
5769: --Removing the goto statement because code needs to update the new pick_up/drop_off weight/volume columns even if frozen flag is Y
5770: -- Code has been added before the update statement to check the frozen flag
5791: --
5792: -- Debug Statements
5793: --
5794: IF l_debug_on THEN
5795: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5796: END IF;
5797: --
5798: FND_MESSAGE.SET_TOKEN('stop_name',wsh_trip_stops_pvt.get_name(l_stop_id,p_caller));
5799: -- bug 2732503 , need a warning message only when FTE is installed
5812: --
5813: -- Debug Statements
5814: --
5815: IF l_debug_on THEN
5816: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5817: END IF;
5818: --
5819: l_total_net_weight := wsh_wv_utils.convert_uom(l_prev_wt_uom, l_stop_wt_uom, l_total_net_weight);
5820: --
5820: --
5821: -- Debug Statements
5822: --
5823: IF l_debug_on THEN
5824: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5825: END IF;
5826: --
5827: l_total_gross_weight := wsh_wv_utils.convert_uom(l_prev_wt_uom, l_stop_wt_uom, l_total_gross_weight);
5828: --
5828: --
5829: -- Debug Statements
5830: --
5831: IF l_debug_on THEN
5832: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5833: END IF;
5834: --
5835: l_volume := wsh_wv_utils.convert_uom(l_prev_vol_uom, l_stop_vol_uom, l_total_volume);
5836:
5836:
5837: g_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5838:
5839: IF l_debug_on THEN
5840: WSH_DEBUG_SV.logmsg(l_module_name,'Processing Pickup Deliveries ...');
5841: END IF;
5842:
5843: FOR pkup_dl IN pickup_deliveries (l_stop_id) LOOP
5844:
5846: --
5847: -- Debug Statements
5848: --
5849: IF l_debug_on THEN
5850: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DELIVERY_WEIGHT_VOLUME',WSH_DEBUG_SV.C_PROC_LEVEL);
5851: END IF;
5852: --
5853: wsh_wv_utils.delivery_weight_volume(
5854: p_delivery_id => pkup_dl.d_id,
5865: --
5866: -- Debug Statements
5867: --
5868: IF l_debug_on THEN
5869: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5870: END IF;
5871: --
5872: FND_MESSAGE.SET_TOKEN('del_name',wsh_new_deliveries_pvt.get_name(pkup_dl.d_id));
5873: g_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5897: -- J: W/V Changes
5898: IF l_net_weight >= 0 THEN
5899: IF pkup_dl.wt_uom <> l_stop_wt_uom THEN
5900: IF l_debug_on THEN
5901: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5902: END IF;
5903: --
5904: IF l_net_weight > 0
5905: THEN
5914:
5915: IF l_gross_weight >= 0 THEN
5916: IF pkup_dl.wt_uom <> l_stop_wt_uom THEN
5917: IF l_debug_on THEN
5918: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5919: END IF;
5920: --
5921: IF l_gross_weight > 0
5922: THEN
5937:
5938: IF l_volume >= 0 THEN
5939: IF pkup_dl.vol_uom <> l_stop_vol_uom THEN
5940: IF l_debug_on THEN
5941: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5942: END IF;
5943: --
5944: IF l_volume > 0
5945: THEN
5958: END IF;
5959: END IF;
5960:
5961: IF l_debug_on THEN
5962: 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);
5963: END IF;
5964:
5965:
5966: END LOOP;
5970: l_stop_num_warn := l_stop_num_warn + 1;
5971: END IF;
5972:
5973: IF l_debug_on THEN
5974: WSH_DEBUG_SV.logmsg(l_module_name,'After Pickup LOOP, Gross '||l_total_gross_weight||' Net '||l_total_net_weight||' Vol '||l_total_volume);
5975: WSH_DEBUG_SV.logmsg(l_module_name,'Processing Dropoff Deliveries ...');
5976: END IF;
5977:
5978:
5971: END IF;
5972:
5973: IF l_debug_on THEN
5974: WSH_DEBUG_SV.logmsg(l_module_name,'After Pickup LOOP, Gross '||l_total_gross_weight||' Net '||l_total_net_weight||' Vol '||l_total_volume);
5975: WSH_DEBUG_SV.logmsg(l_module_name,'Processing Dropoff Deliveries ...');
5976: END IF;
5977:
5978:
5979: FOR dpoff_dl IN dropoff_deliveries (l_stop_id) LOOP
5985: -- J: W/V Changes
5986: IF pickup_del_tab(l_dpoff_dl_id_mod).net_weight > 0 THEN
5987: IF pickup_del_tab(l_dpoff_dl_id_mod).wt_uom <> l_stop_wt_uom THEN
5988: IF l_debug_on THEN
5989: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
5990: END IF;
5991: --
5992: l_total_net_weight := l_total_net_weight - wsh_wv_utils.convert_uom(pickup_del_tab(l_dpoff_dl_id_mod).wt_uom, l_stop_wt_uom , pickup_del_tab(l_dpoff_dl_id_mod).net_weight);
5993: ELSE
5998:
5999: IF pickup_del_tab(l_dpoff_dl_id_mod).gross_weight > 0 THEN
6000: IF pickup_del_tab(l_dpoff_dl_id_mod).wt_uom <> l_stop_wt_uom THEN
6001: IF l_debug_on THEN
6002: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
6003: END IF;
6004: --
6005: IF l_stop_id <> l_last_stop_id THEN
6006: l_total_gross_weight := l_total_gross_weight - wsh_wv_utils.convert_uom(pickup_del_tab(l_dpoff_dl_id_mod).wt_uom, l_stop_wt_uom, pickup_del_tab(l_dpoff_dl_id_mod).gross_weight);
6018:
6019: IF pickup_del_tab(l_dpoff_dl_id_mod).volume > 0 THEN
6020: IF pickup_del_tab(l_dpoff_dl_id_mod).vol_uom <> l_stop_vol_uom THEN
6021: IF l_debug_on THEN
6022: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
6023: END IF;
6024: --
6025: IF l_stop_id <> l_last_stop_id THEN
6026: l_total_volume := l_total_volume - wsh_wv_utils.convert_uom(pickup_del_tab(l_dpoff_dl_id_mod).vol_uom, l_stop_vol_uom, pickup_del_tab(l_dpoff_dl_id_mod).volume);
6036: END IF;
6037: END IF;
6038:
6039: IF l_debug_on THEN
6040: 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);
6041: END IF;
6042:
6043: END IF;
6044: END IF;
6044: END IF;
6045: END LOOP;
6046:
6047: IF l_debug_on THEN
6048: WSH_DEBUG_SV.logmsg(l_module_name,'After Dropoff, LOOP, Gross '||l_total_gross_weight||' Net '||l_total_net_weight||' Vol '||l_total_volume);
6049: END IF;
6050:
6051: IF l_stop_id <> l_last_stop_id THEN
6052: -- Calculate fill_percent of stop
6056: --
6057: -- Debug Statements
6058: --
6059: IF l_debug_on THEN
6060: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
6061: END IF;
6062: --
6063: l_wt_vol_tmp := wsh_wv_utils.convert_uom(l_trip_weight_uom, l_stop_wt_uom, l_trip_max_weight);
6064: IF (l_wt_vol_tmp > 0) THEN
6069: --
6070: -- Debug Statements
6071: --
6072: IF l_debug_on THEN
6073: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
6074: END IF;
6075: --
6076: l_wt_vol_tmp := wsh_wv_utils.convert_uom(l_trip_volume_uom, l_stop_vol_uom, l_trip_max_volume);
6077: IF (l_wt_vol_tmp > 0) THEN
6086: --
6087: -- Debug Statements
6088: --
6089: IF l_debug_on THEN
6090: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6091: END IF;
6092: --
6093: FND_MESSAGE.SET_TOKEN('STOP_NAME',wsh_trip_stops_pvt.get_name(l_stop_id,p_caller));
6094: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6100: ELSE
6101: -- as this is the last stop for the trip, weight/volume/fill percent are 0
6102: -- pickup w/v also 0.
6103: IF l_debug_on THEN
6104: 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;
6105: --
6106: l_total_net_weight := 0;
6107: l_total_gross_weight := 0;
6108: l_total_volume := 0;
6120:
6121: /* H integration - J: W/V Changes */
6122: IF WSH_UTIL_CORE.FTE_IS_INSTALLED = 'Y' AND p_override_flag = 'Y' THEN
6123: IF l_debug_on THEN
6124: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6125: END IF;
6126: Fte_Load_Tender(
6127: p_stop_id => l_stop_id,
6128: p_gross_weight => l_total_gross_weight,
6136: l_stop_num_warn := l_stop_num_warn + 1;
6137: ELSE
6138: x_return_status := l_return_status;
6139: IF l_debug_on THEN
6140: WSH_DEBUG_SV.pop(l_module_name);
6141: END IF;
6142: --
6143: RETURN;
6144: END IF;
6155: --R12 MDC
6156: --UPDATE new columns pickup/dropoff weight/volume first
6157:
6158: IF l_debug_on THEN
6159: WSH_DEBUG_SV.log(l_module_name,'l_total_pick_up_weight', l_total_pick_up_weight);
6160: WSH_DEBUG_SV.log(l_module_name,'l_total_drop_off_weight', l_total_drop_off_weight);
6161: WSH_DEBUG_SV.log(l_module_name,'l_total_pick_up_volume', l_total_pick_up_volume);
6162: WSH_DEBUG_SV.log(l_module_name,'l_total_drop_off_volume', l_total_drop_off_volume);
6163: END IF;
6156: --UPDATE new columns pickup/dropoff weight/volume first
6157:
6158: IF l_debug_on THEN
6159: WSH_DEBUG_SV.log(l_module_name,'l_total_pick_up_weight', l_total_pick_up_weight);
6160: WSH_DEBUG_SV.log(l_module_name,'l_total_drop_off_weight', l_total_drop_off_weight);
6161: WSH_DEBUG_SV.log(l_module_name,'l_total_pick_up_volume', l_total_pick_up_volume);
6162: WSH_DEBUG_SV.log(l_module_name,'l_total_drop_off_volume', l_total_drop_off_volume);
6163: END IF;
6164:
6157:
6158: IF l_debug_on THEN
6159: WSH_DEBUG_SV.log(l_module_name,'l_total_pick_up_weight', l_total_pick_up_weight);
6160: WSH_DEBUG_SV.log(l_module_name,'l_total_drop_off_weight', l_total_drop_off_weight);
6161: WSH_DEBUG_SV.log(l_module_name,'l_total_pick_up_volume', l_total_pick_up_volume);
6162: WSH_DEBUG_SV.log(l_module_name,'l_total_drop_off_volume', l_total_drop_off_volume);
6163: END IF;
6164:
6165:
6158: IF l_debug_on THEN
6159: WSH_DEBUG_SV.log(l_module_name,'l_total_pick_up_weight', l_total_pick_up_weight);
6160: WSH_DEBUG_SV.log(l_module_name,'l_total_drop_off_weight', l_total_drop_off_weight);
6161: WSH_DEBUG_SV.log(l_module_name,'l_total_pick_up_volume', l_total_pick_up_volume);
6162: WSH_DEBUG_SV.log(l_module_name,'l_total_drop_off_volume', l_total_drop_off_volume);
6163: END IF;
6164:
6165:
6166: UPDATE wsh_trip_stops
6240: --
6241: -- Debug Statements
6242: --
6243: IF l_debug_on THEN
6244: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6245: END IF;
6246: --
6247: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_rows(i)));
6248: wsh_util_core.add_message(x_return_status);
6265: END LOOP;
6266: /*********TRIP LOOP END*********/
6267:
6268: IF l_debug_on THEN
6269: WSH_DEBUG_SV.log(l_module_name,'RET STATUS-'||x_return_status);
6270: WSH_DEBUG_SV.log(l_module_name,'NUM WARN-'||l_num_warn);
6271: WSH_DEBUG_SV.log(l_module_name,'NUM ERR-'||l_num_error);
6272: WSH_DEBUG_SV.log(l_module_name,'TRIP ROW COUNT-'||p_trip_rows.count);
6273: END IF;
6266: /*********TRIP LOOP END*********/
6267:
6268: IF l_debug_on THEN
6269: WSH_DEBUG_SV.log(l_module_name,'RET STATUS-'||x_return_status);
6270: WSH_DEBUG_SV.log(l_module_name,'NUM WARN-'||l_num_warn);
6271: WSH_DEBUG_SV.log(l_module_name,'NUM ERR-'||l_num_error);
6272: WSH_DEBUG_SV.log(l_module_name,'TRIP ROW COUNT-'||p_trip_rows.count);
6273: END IF;
6274: IF (l_num_error > 0) OR (l_num_warn > 0) THEN
6267:
6268: IF l_debug_on THEN
6269: WSH_DEBUG_SV.log(l_module_name,'RET STATUS-'||x_return_status);
6270: WSH_DEBUG_SV.log(l_module_name,'NUM WARN-'||l_num_warn);
6271: WSH_DEBUG_SV.log(l_module_name,'NUM ERR-'||l_num_error);
6272: WSH_DEBUG_SV.log(l_module_name,'TRIP ROW COUNT-'||p_trip_rows.count);
6273: END IF;
6274: IF (l_num_error > 0) OR (l_num_warn > 0) THEN
6275: -- Bug 3688384 Display separate message for one trip .
6268: IF l_debug_on THEN
6269: WSH_DEBUG_SV.log(l_module_name,'RET STATUS-'||x_return_status);
6270: WSH_DEBUG_SV.log(l_module_name,'NUM WARN-'||l_num_warn);
6271: WSH_DEBUG_SV.log(l_module_name,'NUM ERR-'||l_num_error);
6272: WSH_DEBUG_SV.log(l_module_name,'TRIP ROW COUNT-'||p_trip_rows.count);
6273: END IF;
6274: IF (l_num_error > 0) OR (l_num_warn > 0) THEN
6275: -- Bug 3688384 Display separate message for one trip .
6276: IF (p_trip_rows.count = 1) and (l_num_error = 0) and (l_num_warn > 0) THEN
6298: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6299: END IF;
6300:
6301: IF l_debug_on THEN
6302: WSH_DEBUG_SV.log(l_module_name,'RET STATUS-'||x_return_status);
6303: WSH_DEBUG_SV.log(l_module_name,'NUM WARN-'||l_num_warn);
6304: WSH_DEBUG_SV.log(l_module_name,'NUM ERR-'||l_num_error);
6305: END IF;
6306: --
6299: END IF;
6300:
6301: IF l_debug_on THEN
6302: WSH_DEBUG_SV.log(l_module_name,'RET STATUS-'||x_return_status);
6303: WSH_DEBUG_SV.log(l_module_name,'NUM WARN-'||l_num_warn);
6304: WSH_DEBUG_SV.log(l_module_name,'NUM ERR-'||l_num_error);
6305: END IF;
6306: --
6307: -- Debug Statements
6300:
6301: IF l_debug_on THEN
6302: WSH_DEBUG_SV.log(l_module_name,'RET STATUS-'||x_return_status);
6303: WSH_DEBUG_SV.log(l_module_name,'NUM WARN-'||l_num_warn);
6304: WSH_DEBUG_SV.log(l_module_name,'NUM ERR-'||l_num_error);
6305: END IF;
6306: --
6307: -- Debug Statements
6308: --
6306: --
6307: -- Debug Statements
6308: --
6309: IF l_debug_on THEN
6310: WSH_DEBUG_SV.pop(l_module_name);
6311: END IF;
6312: --
6313: EXCEPTION
6314: WHEN others THEN
6321: --
6322: -- Debug Statements
6323: --
6324: IF l_debug_on THEN
6325: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6326: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6327: END IF;
6328: --
6329: END trip_weight_volume;
6322: -- Debug Statements
6323: --
6324: IF l_debug_on THEN
6325: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6326: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6327: END IF;
6328: --
6329: END trip_weight_volume;
6330:
6362: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6363: --
6364: IF l_debug_on IS NULL
6365: THEN
6366: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6367: END IF;
6368: --
6369: IF l_debug_on THEN
6370: WSH_DEBUG_SV.push(l_module_name);
6366: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6367: END IF;
6368: --
6369: IF l_debug_on THEN
6370: WSH_DEBUG_SV.push(l_module_name);
6371: --
6372: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
6373: END IF;
6374: --
6368: --
6369: IF l_debug_on THEN
6370: WSH_DEBUG_SV.push(l_module_name);
6371: --
6372: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
6373: END IF;
6374: --
6375: FOR s IN stops LOOP
6376:
6404: --
6405: -- Debug Statements
6406: --
6407: IF l_debug_on THEN
6408: WSH_DEBUG_SV.pop(l_module_name);
6409: END IF;
6410: --
6411: EXCEPTION
6412: WHEN invalid_sequence THEN
6414: --
6415: -- Debug Statements
6416: --
6417: IF l_debug_on THEN
6418: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6419: END IF;
6420: --
6421: FND_MESSAGE.SET_TOKEN('TRIP_NAME',wsh_trips_pvt.get_name(p_trip_id));
6422: wsh_util_core.add_message(x_return_status);
6423: --
6424: -- Debug Statements
6425: --
6426: IF l_debug_on THEN
6427: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_SEQUENCE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6428: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_SEQUENCE');
6429: END IF;
6430: --
6431: WHEN others THEN
6424: -- Debug Statements
6425: --
6426: IF l_debug_on THEN
6427: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_SEQUENCE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6428: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_SEQUENCE');
6429: END IF;
6430: --
6431: WHEN others THEN
6432: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.VALIDATE_STOP_SEQUENCE');
6435: --
6436: -- Debug Statements
6437: --
6438: IF l_debug_on THEN
6439: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6440: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6441: END IF;
6442: --
6443: END validate_stop_sequence;
6436: -- Debug Statements
6437: --
6438: IF l_debug_on THEN
6439: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6440: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6441: END IF;
6442: --
6443: END validate_stop_sequence;
6444:
6473: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6474: --
6475: IF l_debug_on IS NULL
6476: THEN
6477: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6478: END IF;
6479: --
6480: IF l_debug_on THEN
6481: WSH_DEBUG_SV.push(l_module_name);
6477: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6478: END IF;
6479: --
6480: IF l_debug_on THEN
6481: WSH_DEBUG_SV.push(l_module_name);
6482: END IF;
6483: --
6484: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6485:
6522: --
6523: -- Debug Statements
6524: --
6525: IF l_debug_on THEN
6526: WSH_DEBUG_SV.pop(l_module_name);
6527: END IF;
6528: --
6529: EXCEPTION
6530: WHEN others THEN
6534: --
6535: -- Debug Statements
6536: --
6537: IF l_debug_on THEN
6538: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6539: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6540: END IF;
6541: --
6542: END Check_Unassign_Trip;
6535: -- Debug Statements
6536: --
6537: IF l_debug_on THEN
6538: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6539: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6540: END IF;
6541: --
6542: END Check_Unassign_Trip;
6543:
6591: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6592: --
6593: IF l_debug_on IS NULL
6594: THEN
6595: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6596: END IF;
6597: --
6598: IF l_debug_on THEN
6599: WSH_DEBUG_SV.push(l_module_name);
6595: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6596: END IF;
6597: --
6598: IF l_debug_on THEN
6599: WSH_DEBUG_SV.push(l_module_name);
6600: --
6601: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
6602: END IF;
6603: --
6597: --
6598: IF l_debug_on THEN
6599: WSH_DEBUG_SV.push(l_module_name);
6600: --
6601: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
6602: END IF;
6603: --
6604: OPEN get_trip_info(p_trip_id);
6605: FETCH get_trip_info INTO l_trip_name, l_planned_flag;
6656: --
6657: -- Debug Statements
6658: --
6659: IF l_debug_on THEN
6660: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.UNASSIGN_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
6661: END IF;
6662: --
6663: wsh_delivery_legs_actions.unassign_deliveries( p_del_rows, p_trip_id, NULL, NULL, l_return_status);
6664: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
6680: --
6681: -- Debug Statements
6682: --
6683: IF l_debug_on THEN
6684: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
6685: END IF;
6686: --
6687: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
6688: p_entity_type => 'TRIP',
6700: --
6701: -- Debug Statements
6702: --
6703: IF l_debug_on THEN
6704: WSH_DEBUG_SV.pop(l_module_name);
6705: END IF;
6706: --
6707: EXCEPTION
6708:
6714: --
6715: -- Debug Statements
6716: --
6717: IF l_debug_on THEN
6718: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_NOT_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6719: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_NOT_FOUND');
6720: END IF;
6721: --
6722: WHEN unassign_deliveries_err THEN
6715: -- Debug Statements
6716: --
6717: IF l_debug_on THEN
6718: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_NOT_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6719: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_NOT_FOUND');
6720: END IF;
6721: --
6722: WHEN unassign_deliveries_err THEN
6723: x_return_status := l_return_status;
6728: --
6729: -- Debug Statements
6730: --
6731: IF l_debug_on THEN
6732: WSH_DEBUG_SV.logmsg(l_module_name,'UNASSIGN_DELIVERIES_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6733: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:UNASSIGN_DELIVERIES_ERR');
6734: END IF;
6735: --
6736: WHEN reprice_required_err THEN
6729: -- Debug Statements
6730: --
6731: IF l_debug_on THEN
6732: WSH_DEBUG_SV.logmsg(l_module_name,'UNASSIGN_DELIVERIES_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6733: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:UNASSIGN_DELIVERIES_ERR');
6734: END IF;
6735: --
6736: WHEN reprice_required_err THEN
6737: x_return_status := l_return_status;
6741: --
6742: -- Debug Statements
6743: --
6744: IF l_debug_on THEN
6745: WSH_DEBUG_SV.logmsg(l_module_name,'REPRICE_REQUIRED_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6746: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REPRICE_REQUIRED_ERR');
6747: END IF;
6748: --
6749: WHEN trip_planned THEN
6742: -- Debug Statements
6743: --
6744: IF l_debug_on THEN
6745: WSH_DEBUG_SV.logmsg(l_module_name,'REPRICE_REQUIRED_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6746: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REPRICE_REQUIRED_ERR');
6747: END IF;
6748: --
6749: WHEN trip_planned THEN
6750: x_return_status := l_return_status;
6755: --
6756: -- Debug Statements
6757: --
6758: IF l_debug_on THEN
6759: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_PLANNED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6760: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_PLANNED');
6761: END IF;
6762: --
6763: WHEN others THEN
6756: -- Debug Statements
6757: --
6758: IF l_debug_on THEN
6759: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_PLANNED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6760: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_PLANNED');
6761: END IF;
6762: --
6763: WHEN others THEN
6764: IF get_trip_info%ISOPEN THEN
6770: --
6771: -- Debug Statements
6772: --
6773: IF l_debug_on THEN
6774: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6775: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6776: END IF;
6777: --
6778: END Unassign_Trip;
6771: -- Debug Statements
6772: --
6773: IF l_debug_on THEN
6774: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6775: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6776: END IF;
6777: --
6778: END Unassign_Trip;
6779:
6817: BEGIN
6818:
6819: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6820: IF l_debug_on IS NULL THEN
6821: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6822: END IF;
6823: --
6824: IF l_debug_on THEN
6825: WSH_DEBUG_SV.push(l_module_name);
6821: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6822: END IF;
6823: --
6824: IF l_debug_on THEN
6825: WSH_DEBUG_SV.push(l_module_name);
6826: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
6827: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
6828: WSH_DEBUG_SV.log(l_module_name,'P_NET_WEIGHT',P_NET_WEIGHT);
6829: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
6822: END IF;
6823: --
6824: IF l_debug_on THEN
6825: WSH_DEBUG_SV.push(l_module_name);
6826: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
6827: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
6828: WSH_DEBUG_SV.log(l_module_name,'P_NET_WEIGHT',P_NET_WEIGHT);
6829: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
6830: WSH_DEBUG_SV.log(l_module_name,'P_FILL_PERCENT',P_FILL_PERCENT);
6823: --
6824: IF l_debug_on THEN
6825: WSH_DEBUG_SV.push(l_module_name);
6826: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
6827: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
6828: WSH_DEBUG_SV.log(l_module_name,'P_NET_WEIGHT',P_NET_WEIGHT);
6829: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
6830: WSH_DEBUG_SV.log(l_module_name,'P_FILL_PERCENT',P_FILL_PERCENT);
6831: END IF;
6824: IF l_debug_on THEN
6825: WSH_DEBUG_SV.push(l_module_name);
6826: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
6827: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
6828: WSH_DEBUG_SV.log(l_module_name,'P_NET_WEIGHT',P_NET_WEIGHT);
6829: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
6830: WSH_DEBUG_SV.log(l_module_name,'P_FILL_PERCENT',P_FILL_PERCENT);
6831: END IF;
6832: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6825: WSH_DEBUG_SV.push(l_module_name);
6826: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
6827: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
6828: WSH_DEBUG_SV.log(l_module_name,'P_NET_WEIGHT',P_NET_WEIGHT);
6829: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
6830: WSH_DEBUG_SV.log(l_module_name,'P_FILL_PERCENT',P_FILL_PERCENT);
6831: END IF;
6832: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6833:
6826: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
6827: WSH_DEBUG_SV.log(l_module_name,'P_GROSS_WEIGHT',P_GROSS_WEIGHT);
6828: WSH_DEBUG_SV.log(l_module_name,'P_NET_WEIGHT',P_NET_WEIGHT);
6829: WSH_DEBUG_SV.log(l_module_name,'P_VOLUME',P_VOLUME);
6830: WSH_DEBUG_SV.log(l_module_name,'P_FILL_PERCENT',P_FILL_PERCENT);
6831: END IF;
6832: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6833:
6834: -- Get pvt type record structure for stop
6832: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6833:
6834: -- Get pvt type record structure for stop
6835: IF l_debug_on THEN
6836: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_GRP.GET_STOP_DETAILS_PVT',WSH_DEBUG_SV.C_PROC_LEVEL);
6837: END IF;
6838: --
6839: wsh_trip_stops_grp.get_stop_details_pvt(
6840: p_stop_id => p_stop_id,
6844: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6845: x_return_status := l_return_status;
6846:
6847: IF l_debug_on THEN
6848: WSH_DEBUG_SV.pop(l_module_name);
6849: END IF;
6850: --
6851: RETURN;
6852: END IF;
6856: l_stop_rec.departure_volume := p_volume;
6857: l_stop_rec.departure_fill_percent := p_fill_percent;
6858:
6859: IF l_debug_on THEN
6860: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FTE_INTEGRATION.TRIP_STOP_VALIDATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
6861: END IF;
6862: --
6863: WSH_FTE_INTEGRATION.trip_stop_validations(
6864: p_stop_rec => l_stop_rec,
6868:
6869: x_return_status := l_return_status;
6870:
6871: IF l_debug_on THEN
6872: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
6873: WSH_DEBUG_SV.pop(l_module_name);
6874: END IF;
6875:
6876: EXCEPTION
6869: x_return_status := l_return_status;
6870:
6871: IF l_debug_on THEN
6872: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
6873: WSH_DEBUG_SV.pop(l_module_name);
6874: END IF;
6875:
6876: EXCEPTION
6877: WHEN others THEN
6878: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.Fte_Load_Tender');
6879: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6880:
6881: IF l_debug_on THEN
6882: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6883: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6884: END IF;
6885: END Fte_Load_Tender;
6886:
6879: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6880:
6881: IF l_debug_on THEN
6882: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6883: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6884: END IF;
6885: END Fte_Load_Tender;
6886:
6887:
6962: l_warn_num := 0;
6963: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6964: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6965: IF l_debug_on IS NULL THEN
6966: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6967: END IF;
6968: --
6969: IF l_debug_on THEN
6970: WSH_DEBUG_SV.push(l_module_name);
6966: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6967: END IF;
6968: --
6969: IF l_debug_on THEN
6970: WSH_DEBUG_SV.push(l_module_name);
6971: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.count ', p_trip_ids.count);
6972: END IF;
6973:
6974: IF p_trip_ids.count = 0 THEN
6967: END IF;
6968: --
6969: IF l_debug_on THEN
6970: WSH_DEBUG_SV.push(l_module_name);
6971: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.count ', p_trip_ids.count);
6972: END IF;
6973:
6974: IF p_trip_ids.count = 0 THEN
6975: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6973:
6974: IF p_trip_ids.count = 0 THEN
6975: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6976: IF l_debug_on THEN
6977: WSH_DEBUG_SV.logmsg(l_module_name,' p_trip_ids.count is zero');
6978: WSH_DEBUG_SV.pop(l_module_name);
6979: END IF;
6980: return;
6981: END IF;
6974: IF p_trip_ids.count = 0 THEN
6975: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6976: IF l_debug_on THEN
6977: WSH_DEBUG_SV.logmsg(l_module_name,' p_trip_ids.count is zero');
6978: WSH_DEBUG_SV.pop(l_module_name);
6979: END IF;
6980: return;
6981: END IF;
6982:
6985: savepoint start_of_the_trip;
6986: l_trip_error := FALSE;
6987: l_first_stop := TRUE;
6988: IF l_debug_on THEN
6989: WSH_DEBUG_SV.logmsg(l_module_name,'p_trip_ids('||i||') ==> '||p_trip_ids(i));
6990: END IF;
6991: OPEN c_trip_stops(p_trip_ids(i));
6992: LOOP
6993: FETCH c_trip_stops INTO l_stop_rec;
6994: EXIT WHEN c_trip_stops%NOTFOUND;
6995: l_update_flag := FALSE;
6996:
6997: IF l_debug_on THEN
6998: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_sequence_number', l_stop_rec.stop_sequence_number);
6999: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_id', l_stop_rec.stop_id);
7000: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.status_code', l_stop_rec.status_code);
7001: 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'));
7002: 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'));
6995: l_update_flag := FALSE;
6996:
6997: IF l_debug_on THEN
6998: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_sequence_number', l_stop_rec.stop_sequence_number);
6999: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_id', l_stop_rec.stop_id);
7000: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.status_code', l_stop_rec.status_code);
7001: 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'));
7002: 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'));
7003: 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'));
6996:
6997: IF l_debug_on THEN
6998: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_sequence_number', l_stop_rec.stop_sequence_number);
6999: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_id', l_stop_rec.stop_id);
7000: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.status_code', l_stop_rec.status_code);
7001: 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'));
7002: 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'));
7003: 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'));
7004: 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'));
6997: IF l_debug_on THEN
6998: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_sequence_number', l_stop_rec.stop_sequence_number);
6999: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_id', l_stop_rec.stop_id);
7000: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.status_code', l_stop_rec.status_code);
7001: 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'));
7002: 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'));
7003: 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'));
7004: 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'));
7005: END IF;
6998: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_sequence_number', l_stop_rec.stop_sequence_number);
6999: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_id', l_stop_rec.stop_id);
7000: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.status_code', l_stop_rec.status_code);
7001: 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'));
7002: 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'));
7003: 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'));
7004: 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'));
7005: END IF;
7006:
6999: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.stop_id', l_stop_rec.stop_id);
7000: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.status_code', l_stop_rec.status_code);
7001: 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'));
7002: 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'));
7003: 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'));
7004: 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'));
7005: END IF;
7006:
7007:
7000: WSH_DEBUG_SV.log(l_module_name,'l_stop_rec.status_code', l_stop_rec.status_code);
7001: 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'));
7002: 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'));
7003: 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'));
7004: 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'));
7005: END IF;
7006:
7007:
7008:
7053: -- Updating WSH_TRIP_STOPS.
7054: -- Call DBI API after the Update.
7055: -- This API will also check for DBI Installed or not
7056: IF l_debug_on THEN
7057: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Stop id -',l_stop_rec.stop_id);
7058: END IF;
7059: l_stop_tab(1) := l_stop_rec.stop_id;
7060: WSH_INTEGRATION.DBI_Update_Trip_Stop_Log
7061: (p_stop_id_tab => l_stop_tab,
7062: p_dml_type => 'UPDATE',
7063: x_return_status => l_dbi_rs);
7064:
7065: IF l_debug_on THEN
7066: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
7067: END IF;
7068: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
7069: x_return_status := l_dbi_rs;
7070: -- just pass this return status to caller API
7068: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
7069: x_return_status := l_dbi_rs;
7070: -- just pass this return status to caller API
7071: IF l_debug_on THEN
7072: WSH_DEBUG_SV.log(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
7073: WSH_DEBUG_SV.pop(l_module_name);
7074: END IF;
7075: return;
7076: END IF;
7069: x_return_status := l_dbi_rs;
7070: -- just pass this return status to caller API
7071: IF l_debug_on THEN
7072: WSH_DEBUG_SV.log(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
7073: WSH_DEBUG_SV.pop(l_module_name);
7074: END IF;
7075: return;
7076: END IF;
7077: -- End of Code for DBI Project
7084: CLOSE lock_stop;
7085: END IF;
7086: --
7087: IF l_debug_on THEN
7088: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR: stop is locked, cannot update it');
7089: END IF;
7090: --
7091: l_trip_error := TRUE;
7092: exit;
7141:
7142: END IF;
7143:
7144: IF l_debug_on THEN
7145: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
7146: WSH_DEBUG_SV.log(l_module_name,'l_warn_num ', l_warn_num);
7147: WSH_DEBUG_SV.pop(l_module_name);
7148: END IF;
7149:
7142: END IF;
7143:
7144: IF l_debug_on THEN
7145: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
7146: WSH_DEBUG_SV.log(l_module_name,'l_warn_num ', l_warn_num);
7147: WSH_DEBUG_SV.pop(l_module_name);
7148: END IF;
7149:
7150: EXCEPTION
7143:
7144: IF l_debug_on THEN
7145: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
7146: WSH_DEBUG_SV.log(l_module_name,'l_warn_num ', l_warn_num);
7147: WSH_DEBUG_SV.pop(l_module_name);
7148: END IF;
7149:
7150: EXCEPTION
7151:
7160: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.reset_stop_planned_dates');
7161: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7162:
7163: IF l_debug_on THEN
7164: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7165: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7166: END IF;
7167:
7168: END reset_stop_planned_dates;
7161: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7162:
7163: IF l_debug_on THEN
7164: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7165: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7166: END IF;
7167:
7168: END reset_stop_planned_dates;
7169:
7203:
7204: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7205: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7206: IF l_debug_on IS NULL THEN
7207: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7208: END IF;
7209: --
7210: IF l_debug_on THEN
7211: WSH_DEBUG_SV.push(l_module_name);
7207: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7208: END IF;
7209: --
7210: IF l_debug_on THEN
7211: WSH_DEBUG_SV.push(l_module_name);
7212: WSH_DEBUG_SV.log(l_module_name,'p_trip_id ', p_trip_id);
7213: END IF;
7214:
7215: IF p_trip_id is NULL THEN
7208: END IF;
7209: --
7210: IF l_debug_on THEN
7211: WSH_DEBUG_SV.push(l_module_name);
7212: WSH_DEBUG_SV.log(l_module_name,'p_trip_id ', p_trip_id);
7213: END IF;
7214:
7215: IF p_trip_id is NULL THEN
7216: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7214:
7215: IF p_trip_id is NULL THEN
7216: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7217: IF l_debug_on THEN
7218: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR: Trip ID is NULL');
7219: WSH_DEBUG_SV.pop(l_module_name);
7220: END IF;
7221: return;
7222: END IF;
7215: IF p_trip_id is NULL THEN
7216: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7217: IF l_debug_on THEN
7218: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR: Trip ID is NULL');
7219: WSH_DEBUG_SV.pop(l_module_name);
7220: END IF;
7221: return;
7222: END IF;
7223: l_trip_ids(1) := p_trip_id;
7232: x_return_status := l_return_status;
7233: END IF;
7234:
7235: IF l_debug_on THEN
7236: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
7237: WSH_DEBUG_SV.pop(l_module_name);
7238: END IF;
7239:
7240: EXCEPTION
7233: END IF;
7234:
7235: IF l_debug_on THEN
7236: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
7237: WSH_DEBUG_SV.pop(l_module_name);
7238: END IF;
7239:
7240: EXCEPTION
7241:
7243: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.reset_stop_planned_dates');
7244: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7245:
7246: IF l_debug_on THEN
7247: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7248: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7249: END IF;
7250:
7251: END reset_stop_planned_dates;
7244: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7245:
7246: IF l_debug_on THEN
7247: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7248: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7249: END IF;
7250:
7251: END reset_stop_planned_dates;
7252:
7611: l_stop_seq_mode := WSH_TRIPS_ACTIONS.GET_STOP_SEQ_MODE;
7612:
7613: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7614: IF l_debug_on IS NULL THEN
7615: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7616: END IF;
7617: --
7618: IF l_debug_on THEN
7619: WSH_DEBUG_SV.push(l_module_name);
7615: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7616: END IF;
7617: --
7618: IF l_debug_on THEN
7619: WSH_DEBUG_SV.push(l_module_name);
7620: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.count ', p_trip_ids.count);
7621: WSH_DEBUG_SV.log(l_module_name,'p_caller ', p_caller);
7622: END IF;
7623:
7616: END IF;
7617: --
7618: IF l_debug_on THEN
7619: WSH_DEBUG_SV.push(l_module_name);
7620: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.count ', p_trip_ids.count);
7621: WSH_DEBUG_SV.log(l_module_name,'p_caller ', p_caller);
7622: END IF;
7623:
7624: IF p_trip_ids.count = 0 THEN
7617: --
7618: IF l_debug_on THEN
7619: WSH_DEBUG_SV.push(l_module_name);
7620: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.count ', p_trip_ids.count);
7621: WSH_DEBUG_SV.log(l_module_name,'p_caller ', p_caller);
7622: END IF;
7623:
7624: IF p_trip_ids.count = 0 THEN
7625: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7623:
7624: IF p_trip_ids.count = 0 THEN
7625: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7626: IF l_debug_on THEN
7627: WSH_DEBUG_SV.logmsg(l_module_name,' p_trip_ids.count is zero');
7628: WSH_DEBUG_SV.pop(l_module_name);
7629: END IF;
7630: return;
7631: END IF;
7624: IF p_trip_ids.count = 0 THEN
7625: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7626: IF l_debug_on THEN
7627: WSH_DEBUG_SV.logmsg(l_module_name,' p_trip_ids.count is zero');
7628: WSH_DEBUG_SV.pop(l_module_name);
7629: END IF;
7630: return;
7631: END IF;
7632:
7635: SAVEPOINT start_of_the_trip;
7636: BEGIN
7637: l_update_flag := FALSE;
7638: IF l_debug_on THEN
7639: WSH_DEBUG_SV.logmsg(l_module_name,'p_trip_ids('||i||') ==> '||p_trip_ids(i));
7640: END IF;
7641:
7642: IF l_stop_seq_mode = WSH_INTERFACE_GRP.G_STOP_SEQ_MODE_PAD THEN
7643:
7672: CLOSE c_get_stops_SSN;
7673: END IF;
7674:
7675: IF l_debug_on THEN
7676: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id.count', l_getstops_stop_id.count);
7677: END IF;
7678: IF l_getstops_stop_id.count > 0 THEN
7679: FOR j in l_getstops_stop_id.first .. l_getstops_stop_id.last LOOP
7680: IF l_debug_on THEN
7677: END IF;
7678: IF l_getstops_stop_id.count > 0 THEN
7679: FOR j in l_getstops_stop_id.first .. l_getstops_stop_id.last LOOP
7680: IF l_debug_on THEN
7681: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id('||j||')', l_getstops_stop_id(j));
7682: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_loc_id('||j||')', l_getstops_stop_loc_id(j));
7683: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_loc_id('||j||')', l_getstops_phys_loc_id(j));
7684: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id('||j||')', l_getstops_phys_stop_id(j));
7685: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7678: IF l_getstops_stop_id.count > 0 THEN
7679: FOR j in l_getstops_stop_id.first .. l_getstops_stop_id.last LOOP
7680: IF l_debug_on THEN
7681: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id('||j||')', l_getstops_stop_id(j));
7682: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_loc_id('||j||')', l_getstops_stop_loc_id(j));
7683: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_loc_id('||j||')', l_getstops_phys_loc_id(j));
7684: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id('||j||')', l_getstops_phys_stop_id(j));
7685: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7686: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7679: FOR j in l_getstops_stop_id.first .. l_getstops_stop_id.last LOOP
7680: IF l_debug_on THEN
7681: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id('||j||')', l_getstops_stop_id(j));
7682: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_loc_id('||j||')', l_getstops_stop_loc_id(j));
7683: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_loc_id('||j||')', l_getstops_phys_loc_id(j));
7684: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id('||j||')', l_getstops_phys_stop_id(j));
7685: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7686: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7687: 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'));
7680: IF l_debug_on THEN
7681: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id('||j||')', l_getstops_stop_id(j));
7682: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_loc_id('||j||')', l_getstops_stop_loc_id(j));
7683: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_loc_id('||j||')', l_getstops_phys_loc_id(j));
7684: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id('||j||')', l_getstops_phys_stop_id(j));
7685: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7686: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7687: 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'));
7688: 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'));
7681: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id('||j||')', l_getstops_stop_id(j));
7682: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_loc_id('||j||')', l_getstops_stop_loc_id(j));
7683: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_loc_id('||j||')', l_getstops_phys_loc_id(j));
7684: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id('||j||')', l_getstops_phys_stop_id(j));
7685: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7686: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7687: 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'));
7688: 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'));
7689: 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'));
7682: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_loc_id('||j||')', l_getstops_stop_loc_id(j));
7683: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_loc_id('||j||')', l_getstops_phys_loc_id(j));
7684: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id('||j||')', l_getstops_phys_stop_id(j));
7685: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7686: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7687: 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'));
7688: 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'));
7689: 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'));
7690: 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'));
7683: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_loc_id('||j||')', l_getstops_phys_loc_id(j));
7684: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id('||j||')', l_getstops_phys_stop_id(j));
7685: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7686: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7687: 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'));
7688: 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'));
7689: 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'));
7690: 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'));
7691: WSH_DEBUG_SV.log(l_module_name,'l_getstops_status_code('||j||')', l_getstops_status_code(j));
7684: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id('||j||')', l_getstops_phys_stop_id(j));
7685: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7686: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7687: 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'));
7688: 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'));
7689: 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'));
7690: 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'));
7691: WSH_DEBUG_SV.log(l_module_name,'l_getstops_status_code('||j||')', l_getstops_status_code(j));
7692: WSH_DEBUG_SV.log(l_module_name,'l_getstops_break_link_flags('||j||')', l_getstops_break_link_flags(j));
7685: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num('||j||')', l_getstops_stop_seq_num(j));
7686: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7687: 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'));
7688: 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'));
7689: 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'));
7690: 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'));
7691: WSH_DEBUG_SV.log(l_module_name,'l_getstops_status_code('||j||')', l_getstops_status_code(j));
7692: WSH_DEBUG_SV.log(l_module_name,'l_getstops_break_link_flags('||j||')', l_getstops_break_link_flags(j));
7693: END IF;
7686: WSH_DEBUG_SV.log(l_module_name,'l_getstops_org_stop_seq_num('||j||')', l_getstops_org_stop_seq_num(j));
7687: 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'));
7688: 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'));
7689: 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'));
7690: 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'));
7691: WSH_DEBUG_SV.log(l_module_name,'l_getstops_status_code('||j||')', l_getstops_status_code(j));
7692: WSH_DEBUG_SV.log(l_module_name,'l_getstops_break_link_flags('||j||')', l_getstops_break_link_flags(j));
7693: END IF;
7694: IF p_caller = 'WSH_TRIP_UPGRADE' THEN
7687: 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'));
7688: 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'));
7689: 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'));
7690: 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'));
7691: WSH_DEBUG_SV.log(l_module_name,'l_getstops_status_code('||j||')', l_getstops_status_code(j));
7692: WSH_DEBUG_SV.log(l_module_name,'l_getstops_break_link_flags('||j||')', l_getstops_break_link_flags(j));
7693: END IF;
7694: IF p_caller = 'WSH_TRIP_UPGRADE' THEN
7695: WSH_LOCATIONS_PKG.Convert_internal_cust_location(
7688: 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'));
7689: 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'));
7690: 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'));
7691: WSH_DEBUG_SV.log(l_module_name,'l_getstops_status_code('||j||')', l_getstops_status_code(j));
7692: WSH_DEBUG_SV.log(l_module_name,'l_getstops_break_link_flags('||j||')', l_getstops_break_link_flags(j));
7693: END IF;
7694: IF p_caller = 'WSH_TRIP_UPGRADE' THEN
7695: WSH_LOCATIONS_PKG.Convert_internal_cust_location(
7696: p_internal_cust_location_id => l_getstops_stop_loc_id(j),
7709: -- check if unlinking is necessary
7710:
7711: IF l_getstops_break_link_flags(j) = 'Y' THEN
7712: IF l_debug_on THEN
7713: WSH_DEBUG_SV.log(l_module_name,'unlink stop', l_getstops_stop_id(j));
7714: END IF;
7715: l_getstops_phys_stop_id(j) := NULL;
7716: l_update_flag := TRUE;
7717: END IF;
7724: AND l_getstops_phys_loc_id(j) = l_getstops_stop_loc_id(j+1) THEN
7725:
7726: -- link to next stop
7727: IF l_debug_on THEN
7728: WSH_DEBUG_SV.log(l_module_name,'link to next stop at stop', l_getstops_stop_id(j));
7729: END IF;
7730: l_getstops_phys_stop_id(j) := l_getstops_stop_id(j+1);
7731: l_getstops_pl_arr_date(j) := l_getstops_pl_arr_date(j+1) - WSH_TRIPS_ACTIONS.C_TEN_SECONDS;
7732: l_getstops_pl_dep_date(j) := l_getstops_pl_arr_date(j);
7746: OPEN c_flip_disallowed(l_getstops_stop_id(j), l_getstops_stop_id(j-1));
7747: FETCH c_flip_disallowed INTO l_delivery_leg_id;
7748: IF c_flip_disallowed%NOTFOUND THEN
7749: IF l_debug_on THEN
7750: WSH_DEBUG_SV.log(l_module_name,'flip and link at stop', l_getstops_stop_id(j));
7751: END IF;
7752: -- flip these two stops
7753:
7754: l_getstops_tmp.stop_id := l_getstops_stop_id(j);
7798: END IF;
7799:
7800: FOR j IN l_getstops_stop_id.first .. l_getstops_stop_id.last LOOP
7801: IF l_debug_on THEN
7802: WSH_DEBUG_SV.log(l_module_name,'j ', j );
7803: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id(j)' , l_getstops_stop_id(j));
7804: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num(j)' , l_getstops_stop_seq_num(j));
7805: 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'));
7806: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id(j) ' , l_getstops_phys_stop_id(j) );
7799:
7800: FOR j IN l_getstops_stop_id.first .. l_getstops_stop_id.last LOOP
7801: IF l_debug_on THEN
7802: WSH_DEBUG_SV.log(l_module_name,'j ', j );
7803: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id(j)' , l_getstops_stop_id(j));
7804: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num(j)' , l_getstops_stop_seq_num(j));
7805: 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'));
7806: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id(j) ' , l_getstops_phys_stop_id(j) );
7807: END IF;
7800: FOR j IN l_getstops_stop_id.first .. l_getstops_stop_id.last LOOP
7801: IF l_debug_on THEN
7802: WSH_DEBUG_SV.log(l_module_name,'j ', j );
7803: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id(j)' , l_getstops_stop_id(j));
7804: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num(j)' , l_getstops_stop_seq_num(j));
7805: 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'));
7806: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id(j) ' , l_getstops_phys_stop_id(j) );
7807: END IF;
7808: END LOOP;
7801: IF l_debug_on THEN
7802: WSH_DEBUG_SV.log(l_module_name,'j ', j );
7803: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id(j)' , l_getstops_stop_id(j));
7804: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num(j)' , l_getstops_stop_seq_num(j));
7805: 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'));
7806: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id(j) ' , l_getstops_phys_stop_id(j) );
7807: END IF;
7808: END LOOP;
7809:
7802: WSH_DEBUG_SV.log(l_module_name,'j ', j );
7803: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id(j)' , l_getstops_stop_id(j));
7804: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_seq_num(j)' , l_getstops_stop_seq_num(j));
7805: 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'));
7806: WSH_DEBUG_SV.log(l_module_name,'l_getstops_phys_stop_id(j) ' , l_getstops_phys_stop_id(j) );
7807: END IF;
7808: END LOOP;
7809:
7810: IF l_debug_on THEN
7807: END IF;
7808: END LOOP;
7809:
7810: IF l_debug_on THEN
7811: WSH_DEBUG_SV.logmsg(l_module_name,'loop backward checking for date or SSN conflict');
7812: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id.last', l_getstops_stop_id.last);
7813: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id.first' , l_getstops_stop_id.first);
7814: END IF;
7815:
7808: END LOOP;
7809:
7810: IF l_debug_on THEN
7811: WSH_DEBUG_SV.logmsg(l_module_name,'loop backward checking for date or SSN conflict');
7812: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id.last', l_getstops_stop_id.last);
7813: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id.first' , l_getstops_stop_id.first);
7814: END IF;
7815:
7816: l_push_date_allowed := FALSE;
7809:
7810: IF l_debug_on THEN
7811: WSH_DEBUG_SV.logmsg(l_module_name,'loop backward checking for date or SSN conflict');
7812: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id.last', l_getstops_stop_id.last);
7813: WSH_DEBUG_SV.log(l_module_name,'l_getstops_stop_id.first' , l_getstops_stop_id.first);
7814: END IF;
7815:
7816: l_push_date_allowed := FALSE;
7817: l_push_ssn_allowed := FALSE;
7830: IF l_stop_seq_mode = WSH_INTERFACE_GRP.G_STOP_SEQ_MODE_PAD THEN
7831:
7832: IF l_getstops_pl_arr_date(j-1) >= l_getstops_pl_arr_date(j) THEN
7833: IF l_debug_on THEN
7834: WSH_DEBUG_SV.log(l_module_name,'arr date of prev stop conflict at stop' , l_getstops_stop_id(j));
7835: END IF;
7836: IF l_push_date_allowed or
7837: (l_getstops_pl_arr_date(j) <> l_getstops_org_pl_arr_date(j) and
7838: l_getstops_phys_stop_id(j) is not NULL ) THEN
7846: raise invalid_stop_date;
7847: END IF;
7848: ELSIF l_getstops_pl_dep_date(j-1) >= l_getstops_pl_arr_date(j) THEN
7849: IF l_debug_on THEN
7850: WSH_DEBUG_SV.log(l_module_name,'dep date of prev stop conflict at stop' , l_getstops_stop_id(j-1));
7851: END IF;
7852: l_getstops_pl_dep_date(j-1) := l_getstops_pl_arr_date(j-1);
7853: l_update_flag := TRUE;
7854: END IF;
7856: ELSE -- mode is SSN
7857:
7858: IF l_getstops_stop_seq_num(j-1) >= l_getstops_stop_seq_num(j) THEN
7859: IF l_debug_on THEN
7860: WSH_DEBUG_SV.log(l_module_name,'SSN of prev stop conflict at stop' , l_getstops_stop_id(j));
7861: END IF;
7862: IF l_push_ssn_allowed or
7863: (l_getstops_stop_seq_num(j) <> l_getstops_org_stop_seq_num(j) and
7864: l_getstops_phys_stop_id(j) is not NULL ) THEN
7898: END IF;
7899:
7900: IF l_update_flag or p_caller = 'WSH_CREATE_TRIP_STOP' THEN
7901: IF l_debug_on THEN
7902: WSH_DEBUG_SV.log(l_module_name,'updating stops ' , l_getstops_stop_id.count);
7903: END IF;
7904: FORALL j IN l_getstops_stop_id.first..l_getstops_stop_id.last
7905: UPDATE WSH_TRIP_STOPS
7906: SET
7913: last_updated_by = FND_GLOBAL.USER_ID,
7914: last_update_login = FND_GLOBAL.LOGIN_ID
7915: WHERE STOP_ID = l_getstops_stop_id(j);
7916: IF l_debug_on THEN
7917: WSH_DEBUG_SV.log(l_module_name,'done update' , l_getstops_stop_id.count);
7918: END IF;
7919: --
7920: -- DBI Project
7921: -- Updating WSH_TRIP_STOPS.
7921: -- Updating WSH_TRIP_STOPS.
7922: -- Call DBI API after the Update.
7923: -- This API will also check for DBI Installed or not
7924: IF l_debug_on THEN
7925: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Stop count -',l_getstops_stop_id.count);
7926: END IF;
7927: WSH_INTEGRATION.DBI_Update_Trip_Stop_Log
7928: (p_stop_id_tab => l_getstops_stop_id,
7929: p_dml_type => 'UPDATE',
7929: p_dml_type => 'UPDATE',
7930: x_return_status => l_dbi_rs);
7931:
7932: IF l_debug_on THEN
7933: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
7934: END IF;
7935: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
7936: x_return_status := l_dbi_rs;
7937: rollback to start_of_the_trip;
7936: x_return_status := l_dbi_rs;
7937: rollback to start_of_the_trip;
7938: -- just pass this return status to caller API
7939: IF l_debug_on THEN
7940: WSH_DEBUG_SV.log(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
7941: WSH_DEBUG_SV.pop(l_module_name);
7942: END IF;
7943: return;
7944: END IF;
7937: rollback to start_of_the_trip;
7938: -- just pass this return status to caller API
7939: IF l_debug_on THEN
7940: WSH_DEBUG_SV.log(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
7941: WSH_DEBUG_SV.pop(l_module_name);
7942: END IF;
7943: return;
7944: END IF;
7945:
7957: p_stop_details_rec => l_stop_details_rec,
7958: x_return_status => l_return_status);
7959:
7960: IF l_debug_on THEN
7961: 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);
7962: END IF;
7963:
7964: IF l_return_status in ( WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
7965: raise reset_stop_seq_number_error;
7971: p_trip_id => p_trip_ids(i),
7972: x_return_status => l_return_status);
7973:
7974: IF l_debug_on THEN
7975: 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);
7976: END IF;
7977:
7978: IF l_return_status in ( WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
7979: raise validate_stop_date_error;
8063: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8064: END IF;
8065:
8066: IF l_debug_on THEN
8067: WSH_DEBUG_SV.log(l_module_name,'x_success_trip_ids.count', x_success_trip_ids.count);
8068: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
8069: WSH_DEBUG_SV.pop(l_module_name);
8070: END IF;
8071:
8064: END IF;
8065:
8066: IF l_debug_on THEN
8067: WSH_DEBUG_SV.log(l_module_name,'x_success_trip_ids.count', x_success_trip_ids.count);
8068: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
8069: WSH_DEBUG_SV.pop(l_module_name);
8070: END IF;
8071:
8072: EXCEPTION
8065:
8066: IF l_debug_on THEN
8067: WSH_DEBUG_SV.log(l_module_name,'x_success_trip_ids.count', x_success_trip_ids.count);
8068: WSH_DEBUG_SV.logmsg(l_module_name,'x_return_status '||x_return_status);
8069: WSH_DEBUG_SV.pop(l_module_name);
8070: END IF;
8071:
8072: EXCEPTION
8073:
8082: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.LINK_TO_REGULAR_STOPS');
8083: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8084:
8085: IF l_debug_on THEN
8086: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8087: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8088: END IF;
8089:
8090: END Handle_Internal_Stops;
8083: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8084:
8085: IF l_debug_on THEN
8086: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8087: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8088: END IF;
8089:
8090: END Handle_Internal_Stops;
8091:
8267: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8268: --
8269: IF l_debug_on IS NULL
8270: THEN
8271: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8272: END IF;
8273: --
8274:
8275: IF l_debug_on THEN
8272: END IF;
8273: --
8274:
8275: IF l_debug_on THEN
8276: wsh_debug_sv.push(l_module_name);
8277: WSH_DEBUG_SV.logmsg(l_module_name,'p_init_msg_list : '||p_init_msg_list);
8278: WSH_DEBUG_SV.logmsg(l_module_name,'P_CALLER : '||P_CALLER);
8279: END IF;
8280: --
8273: --
8274:
8275: IF l_debug_on THEN
8276: wsh_debug_sv.push(l_module_name);
8277: WSH_DEBUG_SV.logmsg(l_module_name,'p_init_msg_list : '||p_init_msg_list);
8278: WSH_DEBUG_SV.logmsg(l_module_name,'P_CALLER : '||P_CALLER);
8279: END IF;
8280: --
8281: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8274:
8275: IF l_debug_on THEN
8276: wsh_debug_sv.push(l_module_name);
8277: WSH_DEBUG_SV.logmsg(l_module_name,'p_init_msg_list : '||p_init_msg_list);
8278: WSH_DEBUG_SV.logmsg(l_module_name,'P_CALLER : '||P_CALLER);
8279: END IF;
8280: --
8281: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8282:
8301: l_total_pickup_volume := 0;
8302: l_base_volume_uom := NULL;
8303:
8304: IF l_debug_on THEN
8305: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| p_trip_id_tab(i));
8306: END IF;
8307:
8308: OPEN c_get_trip_details(p_trip_id_tab(i));
8309: FETCH c_get_trip_details INTO l_cs_trip_rec;
8381: l_total_pickup_volume := l_total_pickup_volume + l_pickup_volume_convert;
8382: END IF;
8383:
8384: IF l_debug_on THEN
8385: WSH_DEBUG_SV.logmsg(l_module_name,'stop_id '|| l_cs_tripstops_tab(j).stop_id);
8386: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_weight_convert '|| l_pickup_weight_convert);
8387: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_volume_convert '|| l_pickup_volume_convert);
8388: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_tripstops_tab(j).volume_uom_code);
8389: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_volume_uom '|| l_base_volume_uom);
8382: END IF;
8383:
8384: IF l_debug_on THEN
8385: WSH_DEBUG_SV.logmsg(l_module_name,'stop_id '|| l_cs_tripstops_tab(j).stop_id);
8386: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_weight_convert '|| l_pickup_weight_convert);
8387: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_volume_convert '|| l_pickup_volume_convert);
8388: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_tripstops_tab(j).volume_uom_code);
8389: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_volume_uom '|| l_base_volume_uom);
8390: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_tripstops_tab(j).weight_uom_code);
8383:
8384: IF l_debug_on THEN
8385: WSH_DEBUG_SV.logmsg(l_module_name,'stop_id '|| l_cs_tripstops_tab(j).stop_id);
8386: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_weight_convert '|| l_pickup_weight_convert);
8387: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_volume_convert '|| l_pickup_volume_convert);
8388: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_tripstops_tab(j).volume_uom_code);
8389: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_volume_uom '|| l_base_volume_uom);
8390: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_tripstops_tab(j).weight_uom_code);
8391: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_weight_uom '|| l_base_weight_uom);
8384: IF l_debug_on THEN
8385: WSH_DEBUG_SV.logmsg(l_module_name,'stop_id '|| l_cs_tripstops_tab(j).stop_id);
8386: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_weight_convert '|| l_pickup_weight_convert);
8387: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_volume_convert '|| l_pickup_volume_convert);
8388: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_tripstops_tab(j).volume_uom_code);
8389: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_volume_uom '|| l_base_volume_uom);
8390: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_tripstops_tab(j).weight_uom_code);
8391: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_weight_uom '|| l_base_weight_uom);
8392: END IF;
8385: WSH_DEBUG_SV.logmsg(l_module_name,'stop_id '|| l_cs_tripstops_tab(j).stop_id);
8386: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_weight_convert '|| l_pickup_weight_convert);
8387: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_volume_convert '|| l_pickup_volume_convert);
8388: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_tripstops_tab(j).volume_uom_code);
8389: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_volume_uom '|| l_base_volume_uom);
8390: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_tripstops_tab(j).weight_uom_code);
8391: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_weight_uom '|| l_base_weight_uom);
8392: END IF;
8393: -- triporigin_internalorg_id is that of first stop / any delivery being picked up at the first stop of the trip
8386: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_weight_convert '|| l_pickup_weight_convert);
8387: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_volume_convert '|| l_pickup_volume_convert);
8388: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_tripstops_tab(j).volume_uom_code);
8389: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_volume_uom '|| l_base_volume_uom);
8390: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_tripstops_tab(j).weight_uom_code);
8391: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_weight_uom '|| l_base_weight_uom);
8392: END IF;
8393: -- triporigin_internalorg_id is that of first stop / any delivery being picked up at the first stop of the trip
8394: -- organization_id is that of last stop / any delivery being dropped off at the last stop of the trip
8387: WSH_DEBUG_SV.logmsg(l_module_name,'l_pickup_volume_convert '|| l_pickup_volume_convert);
8388: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_tripstops_tab(j).volume_uom_code);
8389: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_volume_uom '|| l_base_volume_uom);
8390: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_tripstops_tab(j).weight_uom_code);
8391: WSH_DEBUG_SV.logmsg(l_module_name,'l_base_weight_uom '|| l_base_weight_uom);
8392: END IF;
8393: -- triporigin_internalorg_id is that of first stop / any delivery being picked up at the first stop of the trip
8394: -- organization_id is that of last stop / any delivery being dropped off at the last stop of the trip
8395:
8550: l_cs_input_tab(inp_itr).volume := l_total_pickup_volume;
8551: l_cs_input_tab(inp_itr).volume_uom_code := l_base_volume_uom;
8552:
8553: IF l_debug_on THEN
8554: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_cs_input_tab(inp_itr).trip_id);
8555: WSH_DEBUG_SV.logmsg(l_module_name,'name '|| l_cs_input_tab(inp_itr).trip_name);
8556: --WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_input_tab(inp_itr).freight_terms_code);
8557: WSH_DEBUG_SV.logmsg(l_module_name,'triporigin_internalorg_id '|| l_cs_input_tab(inp_itr).triporigin_internalorg_id);
8558: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8551: l_cs_input_tab(inp_itr).volume_uom_code := l_base_volume_uom;
8552:
8553: IF l_debug_on THEN
8554: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_cs_input_tab(inp_itr).trip_id);
8555: WSH_DEBUG_SV.logmsg(l_module_name,'name '|| l_cs_input_tab(inp_itr).trip_name);
8556: --WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_input_tab(inp_itr).freight_terms_code);
8557: WSH_DEBUG_SV.logmsg(l_module_name,'triporigin_internalorg_id '|| l_cs_input_tab(inp_itr).triporigin_internalorg_id);
8558: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8559: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8552:
8553: IF l_debug_on THEN
8554: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_cs_input_tab(inp_itr).trip_id);
8555: WSH_DEBUG_SV.logmsg(l_module_name,'name '|| l_cs_input_tab(inp_itr).trip_name);
8556: --WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_input_tab(inp_itr).freight_terms_code);
8557: WSH_DEBUG_SV.logmsg(l_module_name,'triporigin_internalorg_id '|| l_cs_input_tab(inp_itr).triporigin_internalorg_id);
8558: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8559: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8560: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8553: IF l_debug_on THEN
8554: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_cs_input_tab(inp_itr).trip_id);
8555: WSH_DEBUG_SV.logmsg(l_module_name,'name '|| l_cs_input_tab(inp_itr).trip_name);
8556: --WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_input_tab(inp_itr).freight_terms_code);
8557: WSH_DEBUG_SV.logmsg(l_module_name,'triporigin_internalorg_id '|| l_cs_input_tab(inp_itr).triporigin_internalorg_id);
8558: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8559: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8560: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8561: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8554: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_cs_input_tab(inp_itr).trip_id);
8555: WSH_DEBUG_SV.logmsg(l_module_name,'name '|| l_cs_input_tab(inp_itr).trip_name);
8556: --WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_input_tab(inp_itr).freight_terms_code);
8557: WSH_DEBUG_SV.logmsg(l_module_name,'triporigin_internalorg_id '|| l_cs_input_tab(inp_itr).triporigin_internalorg_id);
8558: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8559: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8560: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8561: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8562: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8555: WSH_DEBUG_SV.logmsg(l_module_name,'name '|| l_cs_input_tab(inp_itr).trip_name);
8556: --WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_input_tab(inp_itr).freight_terms_code);
8557: WSH_DEBUG_SV.logmsg(l_module_name,'triporigin_internalorg_id '|| l_cs_input_tab(inp_itr).triporigin_internalorg_id);
8558: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8559: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8560: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8561: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8562: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8563: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8556: --WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_input_tab(inp_itr).freight_terms_code);
8557: WSH_DEBUG_SV.logmsg(l_module_name,'triporigin_internalorg_id '|| l_cs_input_tab(inp_itr).triporigin_internalorg_id);
8558: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8559: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8560: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8561: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8562: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8563: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8564: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8557: WSH_DEBUG_SV.logmsg(l_module_name,'triporigin_internalorg_id '|| l_cs_input_tab(inp_itr).triporigin_internalorg_id);
8558: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8559: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8560: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8561: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8562: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8563: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8564: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8565: WSH_DEBUG_SV.logmsg(l_module_name,'gross_weight '|| l_cs_input_tab(inp_itr).gross_weight);
8558: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_loc_id '|| l_cs_input_tab(inp_itr).initial_pickup_loc_id);
8559: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8560: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8561: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8562: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8563: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8564: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8565: WSH_DEBUG_SV.logmsg(l_module_name,'gross_weight '|| l_cs_input_tab(inp_itr).gross_weight);
8566: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_input_tab(inp_itr).weight_uom_code);
8559: WSH_DEBUG_SV.logmsg(l_module_name,'initial_pickup_date '|| l_cs_input_tab(inp_itr).initial_pickup_date);
8560: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8561: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8562: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8563: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8564: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8565: WSH_DEBUG_SV.logmsg(l_module_name,'gross_weight '|| l_cs_input_tab(inp_itr).gross_weight);
8566: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_input_tab(inp_itr).weight_uom_code);
8567: WSH_DEBUG_SV.logmsg(l_module_name,'volume '|| l_cs_input_tab(inp_itr).volume);
8560: WSH_DEBUG_SV.logmsg(l_module_name,'customer_site_id '|| l_cs_input_tab(inp_itr).customer_site_id);
8561: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8562: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8563: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8564: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8565: WSH_DEBUG_SV.logmsg(l_module_name,'gross_weight '|| l_cs_input_tab(inp_itr).gross_weight);
8566: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_input_tab(inp_itr).weight_uom_code);
8567: WSH_DEBUG_SV.logmsg(l_module_name,'volume '|| l_cs_input_tab(inp_itr).volume);
8568: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_input_tab(inp_itr).volume_uom_code);
8561: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_loc_id '|| l_cs_input_tab(inp_itr).ultimate_dropoff_loc_id);
8562: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8563: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8564: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8565: WSH_DEBUG_SV.logmsg(l_module_name,'gross_weight '|| l_cs_input_tab(inp_itr).gross_weight);
8566: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_input_tab(inp_itr).weight_uom_code);
8567: WSH_DEBUG_SV.logmsg(l_module_name,'volume '|| l_cs_input_tab(inp_itr).volume);
8568: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_input_tab(inp_itr).volume_uom_code);
8569: END IF;
8562: WSH_DEBUG_SV.logmsg(l_module_name,'customer_id '|| l_cs_input_tab(inp_itr).customer_id);
8563: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8564: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8565: WSH_DEBUG_SV.logmsg(l_module_name,'gross_weight '|| l_cs_input_tab(inp_itr).gross_weight);
8566: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_input_tab(inp_itr).weight_uom_code);
8567: WSH_DEBUG_SV.logmsg(l_module_name,'volume '|| l_cs_input_tab(inp_itr).volume);
8568: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_input_tab(inp_itr).volume_uom_code);
8569: END IF;
8570:
8563: WSH_DEBUG_SV.logmsg(l_module_name,'organization_id '|| l_cs_input_tab(inp_itr).organization_id);
8564: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8565: WSH_DEBUG_SV.logmsg(l_module_name,'gross_weight '|| l_cs_input_tab(inp_itr).gross_weight);
8566: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_input_tab(inp_itr).weight_uom_code);
8567: WSH_DEBUG_SV.logmsg(l_module_name,'volume '|| l_cs_input_tab(inp_itr).volume);
8568: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_input_tab(inp_itr).volume_uom_code);
8569: END IF;
8570:
8571: END IF; -- l_rg_trip
8564: WSH_DEBUG_SV.logmsg(l_module_name,'ultimate_dropoff_date '|| l_cs_input_tab(inp_itr).ultimate_dropoff_date);
8565: WSH_DEBUG_SV.logmsg(l_module_name,'gross_weight '|| l_cs_input_tab(inp_itr).gross_weight);
8566: WSH_DEBUG_SV.logmsg(l_module_name,'weight_uom_code '|| l_cs_input_tab(inp_itr).weight_uom_code);
8567: WSH_DEBUG_SV.logmsg(l_module_name,'volume '|| l_cs_input_tab(inp_itr).volume);
8568: WSH_DEBUG_SV.logmsg(l_module_name,'volume_uom_code '|| l_cs_input_tab(inp_itr).volume_uom_code);
8569: END IF;
8570:
8571: END IF; -- l_rg_trip
8572: END IF;
8597:
8598: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,WSH_UTIL_CORE.G_RET_STS_WARNING)) THEN
8599:
8600: IF l_debug_on THEN
8601: WSH_DEBUG_SV.logmsg(l_module_name,'l_cs_result_tab.COUNT is '|| l_cs_result_tab.COUNT);
8602: END IF;
8603: IF (l_cs_result_tab.COUNT > 0) THEN
8604:
8605: rec_cnt := l_cs_result_tab.FIRST;
8617: --{
8618: l_trip_id := l_cs_result_tab(rec_cnt).trip_id;
8619: l_trip_result_type := l_cs_result_tab(rec_cnt).result_type;
8620: IF l_debug_on THEN
8621: WSH_DEBUG_SV.logmsg(l_module_name,'l_trip_id is '|| l_trip_id);
8622: WSH_DEBUG_SV.logmsg(l_module_name,'l_trip_result_type is '|| l_trip_result_type);
8623: WSH_DEBUG_SV.logmsg(l_module_name,'rule_id is '|| l_cs_result_tab(rec_cnt).rule_id);
8624: END IF;
8625:
8618: l_trip_id := l_cs_result_tab(rec_cnt).trip_id;
8619: l_trip_result_type := l_cs_result_tab(rec_cnt).result_type;
8620: IF l_debug_on THEN
8621: WSH_DEBUG_SV.logmsg(l_module_name,'l_trip_id is '|| l_trip_id);
8622: WSH_DEBUG_SV.logmsg(l_module_name,'l_trip_result_type is '|| l_trip_result_type);
8623: WSH_DEBUG_SV.logmsg(l_module_name,'rule_id is '|| l_cs_result_tab(rec_cnt).rule_id);
8624: END IF;
8625:
8626: IF l_trip_result_type = 'MULTILEG' THEN
8619: l_trip_result_type := l_cs_result_tab(rec_cnt).result_type;
8620: IF l_debug_on THEN
8621: WSH_DEBUG_SV.logmsg(l_module_name,'l_trip_id is '|| l_trip_id);
8622: WSH_DEBUG_SV.logmsg(l_module_name,'l_trip_result_type is '|| l_trip_result_type);
8623: WSH_DEBUG_SV.logmsg(l_module_name,'rule_id is '|| l_cs_result_tab(rec_cnt).rule_id);
8624: END IF;
8625:
8626: IF l_trip_result_type = 'MULTILEG' THEN
8627: IF l_trip_id <> l_prev_trip_id THEN
8642: FND_MESSAGE.SET_NAME('WSH','WSH_FTE_CS_UPD_TRIP_RANK_LIST');
8643: FND_MESSAGE.SET_TOKEN('TRIPID',l_trip_id);
8644: --FND_MSG_PUB.ADD;
8645: IF l_debug_on THEN
8646: WSH_DEBUG_SV.logmsg(l_module_name,'Trip already has a ranked list ');
8647: END IF;
8648: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8649: WSH_UTIL_CORE.add_message(x_return_status);
8650: END IF;
8725: l_ranked_list(list_cnt).IS_CURRENT := 'N';
8726: END IF;
8727:
8728: IF l_debug_on THEN
8729: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_trip_id);
8730: WSH_DEBUG_SV.logmsg(l_module_name,'rank sequence '|| l_cs_result_tab(rec_cnt).rank);
8731: WSH_DEBUG_SV.logmsg(l_module_name,'carrier_id '|| l_cs_result_tab(rec_cnt).carrier_id);
8732: WSH_DEBUG_SV.logmsg(l_module_name,'service_level '|| l_cs_result_tab(rec_cnt).service_level);
8733: WSH_DEBUG_SV.logmsg(l_module_name,'mode_of_transport '|| l_cs_result_tab(rec_cnt).mode_of_transport);
8726: END IF;
8727:
8728: IF l_debug_on THEN
8729: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_trip_id);
8730: WSH_DEBUG_SV.logmsg(l_module_name,'rank sequence '|| l_cs_result_tab(rec_cnt).rank);
8731: WSH_DEBUG_SV.logmsg(l_module_name,'carrier_id '|| l_cs_result_tab(rec_cnt).carrier_id);
8732: WSH_DEBUG_SV.logmsg(l_module_name,'service_level '|| l_cs_result_tab(rec_cnt).service_level);
8733: WSH_DEBUG_SV.logmsg(l_module_name,'mode_of_transport '|| l_cs_result_tab(rec_cnt).mode_of_transport);
8734: WSH_DEBUG_SV.logmsg(l_module_name,'consignee_carrier_ac_no '|| l_cs_result_tab(rec_cnt).consignee_carrier_ac_no);
8727:
8728: IF l_debug_on THEN
8729: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_trip_id);
8730: WSH_DEBUG_SV.logmsg(l_module_name,'rank sequence '|| l_cs_result_tab(rec_cnt).rank);
8731: WSH_DEBUG_SV.logmsg(l_module_name,'carrier_id '|| l_cs_result_tab(rec_cnt).carrier_id);
8732: WSH_DEBUG_SV.logmsg(l_module_name,'service_level '|| l_cs_result_tab(rec_cnt).service_level);
8733: WSH_DEBUG_SV.logmsg(l_module_name,'mode_of_transport '|| l_cs_result_tab(rec_cnt).mode_of_transport);
8734: WSH_DEBUG_SV.logmsg(l_module_name,'consignee_carrier_ac_no '|| l_cs_result_tab(rec_cnt).consignee_carrier_ac_no);
8735: WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_result_tab(rec_cnt).freight_terms_code);
8728: IF l_debug_on THEN
8729: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_trip_id);
8730: WSH_DEBUG_SV.logmsg(l_module_name,'rank sequence '|| l_cs_result_tab(rec_cnt).rank);
8731: WSH_DEBUG_SV.logmsg(l_module_name,'carrier_id '|| l_cs_result_tab(rec_cnt).carrier_id);
8732: WSH_DEBUG_SV.logmsg(l_module_name,'service_level '|| l_cs_result_tab(rec_cnt).service_level);
8733: WSH_DEBUG_SV.logmsg(l_module_name,'mode_of_transport '|| l_cs_result_tab(rec_cnt).mode_of_transport);
8734: WSH_DEBUG_SV.logmsg(l_module_name,'consignee_carrier_ac_no '|| l_cs_result_tab(rec_cnt).consignee_carrier_ac_no);
8735: WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_result_tab(rec_cnt).freight_terms_code);
8736: END IF;
8729: WSH_DEBUG_SV.logmsg(l_module_name,'trip_id '|| l_trip_id);
8730: WSH_DEBUG_SV.logmsg(l_module_name,'rank sequence '|| l_cs_result_tab(rec_cnt).rank);
8731: WSH_DEBUG_SV.logmsg(l_module_name,'carrier_id '|| l_cs_result_tab(rec_cnt).carrier_id);
8732: WSH_DEBUG_SV.logmsg(l_module_name,'service_level '|| l_cs_result_tab(rec_cnt).service_level);
8733: WSH_DEBUG_SV.logmsg(l_module_name,'mode_of_transport '|| l_cs_result_tab(rec_cnt).mode_of_transport);
8734: WSH_DEBUG_SV.logmsg(l_module_name,'consignee_carrier_ac_no '|| l_cs_result_tab(rec_cnt).consignee_carrier_ac_no);
8735: WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_result_tab(rec_cnt).freight_terms_code);
8736: END IF;
8737: -- For the last record in l_cs_result_tab attach ranked list here
8730: WSH_DEBUG_SV.logmsg(l_module_name,'rank sequence '|| l_cs_result_tab(rec_cnt).rank);
8731: WSH_DEBUG_SV.logmsg(l_module_name,'carrier_id '|| l_cs_result_tab(rec_cnt).carrier_id);
8732: WSH_DEBUG_SV.logmsg(l_module_name,'service_level '|| l_cs_result_tab(rec_cnt).service_level);
8733: WSH_DEBUG_SV.logmsg(l_module_name,'mode_of_transport '|| l_cs_result_tab(rec_cnt).mode_of_transport);
8734: WSH_DEBUG_SV.logmsg(l_module_name,'consignee_carrier_ac_no '|| l_cs_result_tab(rec_cnt).consignee_carrier_ac_no);
8735: WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_result_tab(rec_cnt).freight_terms_code);
8736: END IF;
8737: -- For the last record in l_cs_result_tab attach ranked list here
8738:
8731: WSH_DEBUG_SV.logmsg(l_module_name,'carrier_id '|| l_cs_result_tab(rec_cnt).carrier_id);
8732: WSH_DEBUG_SV.logmsg(l_module_name,'service_level '|| l_cs_result_tab(rec_cnt).service_level);
8733: WSH_DEBUG_SV.logmsg(l_module_name,'mode_of_transport '|| l_cs_result_tab(rec_cnt).mode_of_transport);
8734: WSH_DEBUG_SV.logmsg(l_module_name,'consignee_carrier_ac_no '|| l_cs_result_tab(rec_cnt).consignee_carrier_ac_no);
8735: WSH_DEBUG_SV.logmsg(l_module_name,'freight_terms_code '|| l_cs_result_tab(rec_cnt).freight_terms_code);
8736: END IF;
8737: -- For the last record in l_cs_result_tab attach ranked list here
8738:
8739: -- Replace ranked list if the trip already had a ranked list attached
8781: --
8782: -- Debug Statements
8783: --
8784: IF l_debug_on THEN
8785: WSH_DEBUG_SV.logmsg(l_module_name, 'NO RANKED RESULT FOUND FROM PROCESS CARRIER SELECTION ' );
8786: END IF;
8787: --
8788:
8789: END IF;
8797: --
8798: -- Debug Statements
8799: --
8800: IF l_debug_on THEN
8801: WSH_DEBUG_SV.logmsg(l_module_name, 'NO CARRIER FOUND FROM PROCESS CARRIER SELECTION ' );
8802: END IF;
8803: --
8804: END IF;
8805: ELSE
8813: --
8814: -- Debug Statements
8815: --
8816: IF l_debug_on THEN
8817: WSH_DEBUG_SV.logmsg(l_module_name, 'NO VALID TRIP FOUND FOR PROCESS CARRIER SELECTION ' );
8818: END IF;
8819: --
8820: END IF;
8821:
8827: p_data => x_msg_data ,
8828: p_encoded => FND_API.G_FALSE );
8829:
8830: IF l_debug_on THEN
8831: wsh_debug_sv.log (l_module_name,'No. of messages stacked : ',to_char(x_msg_count));
8832: wsh_debug_sv.pop(l_module_name);
8833: END IF;
8834:
8835: --
8828: p_encoded => FND_API.G_FALSE );
8829:
8830: IF l_debug_on THEN
8831: wsh_debug_sv.log (l_module_name,'No. of messages stacked : ',to_char(x_msg_count));
8832: wsh_debug_sv.pop(l_module_name);
8833: END IF;
8834:
8835: --
8836:
8840: ROLLBACK TO before_trip_update;
8841: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
8842: --
8843: IF l_debug_on THEN
8844: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8845: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
8846: END IF;
8847: --
8848:
8841: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
8842: --
8843: IF l_debug_on THEN
8844: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8845: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
8846: END IF;
8847: --
8848:
8849: WHEN others THEN
8873: wsh_util_core.default_handler('WSH_TRIPS_ACTIONS.PROCESS_CARRIER_SELECTION');
8874: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8875:
8876: IF l_debug_on THEN
8877: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8878: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8879: END IF;
8880:
8881: END PROCESS_CARRIER_SELECTION;
8874: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8875:
8876: IF l_debug_on THEN
8877: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8878: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8879: END IF;
8880:
8881: END PROCESS_CARRIER_SELECTION;
8882:
8934: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8935: --
8936: IF l_debug_on IS NULL
8937: THEN
8938: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8939: END IF;
8940: --
8941: IF l_debug_on THEN
8942: wsh_debug_sv.push (l_module_name);
8938: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8939: END IF;
8940: --
8941: IF l_debug_on THEN
8942: wsh_debug_sv.push (l_module_name);
8943: WSH_DEBUG_SV.log(l_module_name,'p_unassign_all', p_unassign_all);
8944: WSH_DEBUG_SV.log(l_module_name,'p_caller', p_caller);
8945: END IF;
8946:
8939: END IF;
8940: --
8941: IF l_debug_on THEN
8942: wsh_debug_sv.push (l_module_name);
8943: WSH_DEBUG_SV.log(l_module_name,'p_unassign_all', p_unassign_all);
8944: WSH_DEBUG_SV.log(l_module_name,'p_caller', p_caller);
8945: END IF;
8946:
8947: FOR i in 1..p_trip_id_tab.count LOOP
8940: --
8941: IF l_debug_on THEN
8942: wsh_debug_sv.push (l_module_name);
8943: WSH_DEBUG_SV.log(l_module_name,'p_unassign_all', p_unassign_all);
8944: WSH_DEBUG_SV.log(l_module_name,'p_caller', p_caller);
8945: END IF;
8946:
8947: FOR i in 1..p_trip_id_tab.count LOOP
8948:
8946:
8947: FOR i in 1..p_trip_id_tab.count LOOP
8948:
8949: IF l_debug_on THEN
8950: WSH_DEBUG_SV.log(l_module_name,'p_trip_id_tab', p_trip_id_tab(i));
8951: END IF;
8952: -- separate the consol deliveries from the content deliveries
8953: -- that are directly assigned to the trip
8954: l_delivery_tab.delete;
8974:
8975: FOR i in 1..l_consol_delivery_tab.count LOOP
8976:
8977: IF l_debug_on THEN
8978: 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);
8979: END IF;
8980: WSH_NEW_DELIVERY_ACTIONS.Unassign_Dels_from_Consol_Del(
8981: p_parent_del => l_consol_delivery_tab(i),
8982: p_caller => p_caller,
8998: IF l_delivery_tab.count = 0 THEN
8999: RAISE WSH_INVALID_ACTION;
9000: END IF;
9001: IF l_debug_on THEN
9002: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_Trips_Actions.Unassign_Trip',WSH_DEBUG_SV.C_PROC_LEVEL);
9003: END IF;
9004:
9005: WSH_Trips_Actions.Unassign_Trip(
9006: p_del_rows => l_delivery_tab,
9029: --
9030: -- Debug Statements
9031: --
9032: IF l_debug_on THEN
9033: WSH_DEBUG_SV.pop(l_module_name);
9034: END IF;
9035: EXCEPTION
9036: WHEN WSH_INVALID_ACTION THEN
9037: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9039: -- Debug Statements
9040: FND_MESSAGE.SET_NAME('WSH','WSH_REMOVE_CONSOL_ERR');
9041: wsh_util_core.add_message(x_return_status);
9042: IF l_debug_on THEN
9043: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_INVALID_ACTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9044: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INVALID_ACTION');
9045: END IF;
9046:
9047: WHEN FND_API.G_EXC_ERROR THEN
9040: FND_MESSAGE.SET_NAME('WSH','WSH_REMOVE_CONSOL_ERR');
9041: wsh_util_core.add_message(x_return_status);
9042: IF l_debug_on THEN
9043: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_INVALID_ACTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9044: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INVALID_ACTION');
9045: END IF;
9046:
9047: WHEN FND_API.G_EXC_ERROR THEN
9048: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9049: --
9050: -- Debug Statements
9051: --
9052: IF l_debug_on THEN
9053: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9054: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9055: END IF;
9056: WHEN OTHERS THEN
9057: wsh_util_core.default_handler('wsh_trips_actions',l_module_name);
9050: -- Debug Statements
9051: --
9052: IF l_debug_on THEN
9053: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9054: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9055: END IF;
9056: WHEN OTHERS THEN
9057: wsh_util_core.default_handler('wsh_trips_actions',l_module_name);
9058: --
9056: WHEN OTHERS THEN
9057: wsh_util_core.default_handler('wsh_trips_actions',l_module_name);
9058: --
9059: IF l_debug_on THEN
9060: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
9061: END IF;
9062:
9063: END Remove_Consolidation;
9064: --