[Home] [Help]
77: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
78: --
79: IF l_debug_on IS NULL
80: THEN
81: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
82: END IF;
83: --
84: --
85: -- Debug Statements
84: --
85: -- Debug Statements
86: --
87: IF l_debug_on THEN
88: WSH_DEBUG_SV.push(l_module_name);
89: --
90: WSH_DEBUG_SV.log(l_module_name,'P_key',p_key);
91: WSH_DEBUG_SV.log(l_module_name,'p_value',p_value);
92: END IF;
86: --
87: IF l_debug_on THEN
88: WSH_DEBUG_SV.push(l_module_name);
89: --
90: WSH_DEBUG_SV.log(l_module_name,'P_key',p_key);
91: WSH_DEBUG_SV.log(l_module_name,'p_value',p_value);
92: END IF;
93: --
94: --
87: IF l_debug_on THEN
88: WSH_DEBUG_SV.push(l_module_name);
89: --
90: WSH_DEBUG_SV.log(l_module_name,'P_key',p_key);
91: WSH_DEBUG_SV.log(l_module_name,'p_value',p_value);
92: END IF;
93: --
94: --
95: --
93: --
94: --
95: --
96: IF l_debug_on THEN
97: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-x_cacheTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
98: END IF;
99: --
100: -- Searching the cache tables to find out, if they already have a entry
101: -- for the given key, if so get the corresponding value.
110: );
111: --
112: --
113: IF l_debug_on THEN
114: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
115: WSH_DEBUG_SV.log(l_module_name,'l_value',l_value);
116: END IF;
117: --
118: --
111: --
112: --
113: IF l_debug_on THEN
114: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
115: WSH_DEBUG_SV.log(l_module_name,'l_value',l_value);
116: END IF;
117: --
118: --
119: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
131: l_value := NVL(l_value,0) + NVL(p_value,0);
132: --
133: --
134: IF l_debug_on THEN
135: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-x_cacheTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
136: END IF;
137: --
138: wsh_util_core.get_cached_value
139: (
147: --
148: --
149: --
150: IF l_debug_on THEN
151: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
152: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
153: END IF;
154: --
155: wsh_util_core.api_post_call
148: --
149: --
150: IF l_debug_on THEN
151: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
152: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
153: END IF;
154: --
155: wsh_util_core.api_post_call
156: (
159: x_num_errors => l_num_errors
160: );
161: --
162: IF l_debug_on THEN
163: WSH_DEBUG_SV.logmsg(l_module_name,
164: 'Number of Errors='||l_num_errors||',Number of Warnings='||l_num_warnings);
165: END IF;
166: --
167: IF l_num_errors > 0
176: --
177: -- Debug Statements
178: --
179: IF l_debug_on THEN
180: WSH_DEBUG_SV.pop(l_module_name);
181: END IF;
182: --
183: --}
184: EXCEPTION
188: --
189: -- Debug Statements
190: --
191: IF l_debug_on THEN
192: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
193: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
194: END IF;
195: --
196: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
189: -- Debug Statements
190: --
191: IF l_debug_on THEN
192: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
193: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
194: END IF;
195: --
196: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
197: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
198: --
199: -- Debug Statements
200: --
201: IF l_debug_on THEN
202: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
203: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
204: END IF;
205: --
206: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
199: -- Debug Statements
200: --
201: IF l_debug_on THEN
202: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
203: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
204: END IF;
205: --
206: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
207: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
208: --
209: -- Debug Statements
210: --
211: IF l_debug_on THEN
212: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
213: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
214: END IF;
215: --
216: WHEN OTHERS THEN
209: -- Debug Statements
210: --
211: IF l_debug_on THEN
212: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
213: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
214: END IF;
215: --
216: WHEN OTHERS THEN
217: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
219: --
220: -- Debug Statements
221: --
222: IF l_debug_on THEN
223: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
224: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
225: END IF;
226: --
227: --}
220: -- Debug Statements
221: --
222: IF l_debug_on THEN
223: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
224: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
225: END IF;
226: --
227: --}
228: END addWeightVolume;
320: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
321: --
322: IF l_debug_on IS NULL
323: THEN
324: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
325: END IF;
326: --
327: --
328: -- Debug Statements
327: --
328: -- Debug Statements
329: --
330: IF l_debug_on THEN
331: WSH_DEBUG_SV.push(l_module_name);
332: --
333: WSH_DEBUG_SV.log(l_module_name,'p_delivery_lpn_id',p_delivery_lpn_id);
334: WSH_DEBUG_SV.log(l_module_name,'p_diff_gross_weight',p_diff_gross_weight);
335: WSH_DEBUG_SV.log(l_module_name,'p_diff_net_weight',p_diff_net_weight);
329: --
330: IF l_debug_on THEN
331: WSH_DEBUG_SV.push(l_module_name);
332: --
333: WSH_DEBUG_SV.log(l_module_name,'p_delivery_lpn_id',p_delivery_lpn_id);
334: WSH_DEBUG_SV.log(l_module_name,'p_diff_gross_weight',p_diff_gross_weight);
335: WSH_DEBUG_SV.log(l_module_name,'p_diff_net_weight',p_diff_net_weight);
336: WSH_DEBUG_SV.log(l_module_name,'p_diff_volume',p_diff_volume);
337: END IF;
330: IF l_debug_on THEN
331: WSH_DEBUG_SV.push(l_module_name);
332: --
333: WSH_DEBUG_SV.log(l_module_name,'p_delivery_lpn_id',p_delivery_lpn_id);
334: WSH_DEBUG_SV.log(l_module_name,'p_diff_gross_weight',p_diff_gross_weight);
335: WSH_DEBUG_SV.log(l_module_name,'p_diff_net_weight',p_diff_net_weight);
336: WSH_DEBUG_SV.log(l_module_name,'p_diff_volume',p_diff_volume);
337: END IF;
338: --
331: WSH_DEBUG_SV.push(l_module_name);
332: --
333: WSH_DEBUG_SV.log(l_module_name,'p_delivery_lpn_id',p_delivery_lpn_id);
334: WSH_DEBUG_SV.log(l_module_name,'p_diff_gross_weight',p_diff_gross_weight);
335: WSH_DEBUG_SV.log(l_module_name,'p_diff_net_weight',p_diff_net_weight);
336: WSH_DEBUG_SV.log(l_module_name,'p_diff_volume',p_diff_volume);
337: END IF;
338: --
339: IF p_delivery_lpn_id IS NOT NULL
332: --
333: WSH_DEBUG_SV.log(l_module_name,'p_delivery_lpn_id',p_delivery_lpn_id);
334: WSH_DEBUG_SV.log(l_module_name,'p_diff_gross_weight',p_diff_gross_weight);
335: WSH_DEBUG_SV.log(l_module_name,'p_diff_net_weight',p_diff_net_weight);
336: WSH_DEBUG_SV.log(l_module_name,'p_diff_volume',p_diff_volume);
337: END IF;
338: --
339: IF p_delivery_lpn_id IS NOT NULL
340: THEN
339: IF p_delivery_lpn_id IS NOT NULL
340: THEN
341: --{
342: IF l_debug_on THEN
343: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.addWeightVolume-GWT',WSH_DEBUG_SV.C_PROC_LEVEL);
344: END IF;
345: --
346:
347: --call for changes in gross weight.
356: --
357: --
358: --
359: IF l_debug_on THEN
360: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
361: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
362: END IF;
363: --
364: wsh_util_core.api_post_call
357: --
358: --
359: IF l_debug_on THEN
360: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
361: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
362: END IF;
363: --
364: wsh_util_core.api_post_call
365: (
369: );
370: --
371: --
372: IF l_debug_on THEN
373: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.addWeightVolume-NWT',WSH_DEBUG_SV.C_PROC_LEVEL);
374: END IF;
375: --
376: --call for changes in net weight.
377: WSH_ASN_RECEIPT_PVT.addWeightVolume
385: --
386: --
387: --
388: IF l_debug_on THEN
389: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
390: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
391: END IF;
392: --
393: wsh_util_core.api_post_call
386: --
387: --
388: IF l_debug_on THEN
389: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
390: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
391: END IF;
392: --
393: wsh_util_core.api_post_call
394: (
398: );
399: --
400: --
401: IF l_debug_on THEN
402: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.addWeightVolume-VOL',WSH_DEBUG_SV.C_PROC_LEVEL);
403: END IF;
404: --
405: --call for changes in volume.
406: WSH_ASN_RECEIPT_PVT.addWeightVolume
414: --
415: --
416: --
417: IF l_debug_on THEN
418: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
419: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
420: END IF;
421: --
422: wsh_util_core.api_post_call
415: --
416: --
417: IF l_debug_on THEN
418: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
419: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
420: END IF;
421: --
422: wsh_util_core.api_post_call
423: (
431: --}
432: END IF;
433: --
434: IF l_debug_on THEN
435: WSH_DEBUG_SV.logmsg(l_module_name,
436: 'Number of Errors='||l_num_errors||',Number of Warnings='||l_num_warnings);
437: END IF;
438: --
439: IF l_num_errors > 0
448: --
449: -- Debug Statements
450: --
451: IF l_debug_on THEN
452: WSH_DEBUG_SV.pop(l_module_name);
453: END IF;
454: --
455: --}
456: EXCEPTION
460: --
461: -- Debug Statements
462: --
463: IF l_debug_on THEN
464: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
465: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
466: END IF;
467: --
468: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
461: -- Debug Statements
462: --
463: IF l_debug_on THEN
464: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
465: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
466: END IF;
467: --
468: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
469: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
470: --
471: -- Debug Statements
472: --
473: IF l_debug_on THEN
474: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
475: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
476: END IF;
477: --
478: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
471: -- Debug Statements
472: --
473: IF l_debug_on THEN
474: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
475: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
476: END IF;
477: --
478: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
479: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
480: --
481: -- Debug Statements
482: --
483: IF l_debug_on THEN
484: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
485: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
486: END IF;
487: --
488: WHEN OTHERS THEN
481: -- Debug Statements
482: --
483: IF l_debug_on THEN
484: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
485: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
486: END IF;
487: --
488: WHEN OTHERS THEN
489: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
491: --
492: -- Debug Statements
493: --
494: IF l_debug_on THEN
495: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
496: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
497: END IF;
498: --
499: --}
492: -- Debug Statements
493: --
494: IF l_debug_on THEN
495: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
496: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
497: END IF;
498: --
499: --}
500: END processWeightVolume;
570: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
571: --
572: IF l_debug_on IS NULL
573: THEN
574: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
575: END IF;
576: --
577: --
578: -- Debug Statements
577: --
578: -- Debug Statements
579: --
580: IF l_debug_on THEN
581: WSH_DEBUG_SV.push(l_module_name);
582: WSH_DEBUG_SV.log(l_module_name,'p_key',p_key);
583: END IF;
584: --
585: IF l_debug_on THEN
578: -- Debug Statements
579: --
580: IF l_debug_on THEN
581: WSH_DEBUG_SV.push(l_module_name);
582: WSH_DEBUG_SV.log(l_module_name,'p_key',p_key);
583: END IF;
584: --
585: IF l_debug_on THEN
586: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-x_NWTcacheTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
582: WSH_DEBUG_SV.log(l_module_name,'p_key',p_key);
583: END IF;
584: --
585: IF l_debug_on THEN
586: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-x_NWTcacheTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
587: END IF;
588: --
589: wsh_util_core.get_cached_value
590: (
597: );
598: --
599: --
600: IF l_debug_on THEN
601: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
602: WSH_DEBUG_SV.log(l_module_name,'x_diff_net_weight',x_diff_net_weight);
603: END IF;
604: --
605: --
598: --
599: --
600: IF l_debug_on THEN
601: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
602: WSH_DEBUG_SV.log(l_module_name,'x_diff_net_weight',x_diff_net_weight);
603: END IF;
604: --
605: --
606: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
615: END IF;
616: --
617: --
618: IF l_debug_on THEN
619: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-x_VOLcacheTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
620: END IF;
621: --
622: wsh_util_core.get_cached_value
623: (
630: );
631: --
632: --
633: IF l_debug_on THEN
634: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
635: WSH_DEBUG_SV.log(l_module_name,'x_diff_volume',x_diff_volume);
636: END IF;
637: --
638: --
631: --
632: --
633: IF l_debug_on THEN
634: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
635: WSH_DEBUG_SV.log(l_module_name,'x_diff_volume',x_diff_volume);
636: END IF;
637: --
638: --
639: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
648: END IF;
649: --
650: --
651: IF l_debug_on THEN
652: WSH_DEBUG_SV.logmsg(l_module_name,
653: 'Number of Errors='||l_num_errors||',Number of Warnings='||l_num_warnings);
654: END IF;
655: --
656: IF l_num_errors > 0
665: --
666: -- Debug Statements
667: --
668: IF l_debug_on THEN
669: WSH_DEBUG_SV.pop(l_module_name);
670: END IF;
671: --
672: --}
673: EXCEPTION
677: --
678: -- Debug Statements
679: --
680: IF l_debug_on THEN
681: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
682: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
683: END IF;
684: --
685: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
678: -- Debug Statements
679: --
680: IF l_debug_on THEN
681: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
682: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
683: END IF;
684: --
685: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
686: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
687: --
688: -- Debug Statements
689: --
690: IF l_debug_on THEN
691: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
692: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
693: END IF;
694: --
695: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
688: -- Debug Statements
689: --
690: IF l_debug_on THEN
691: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
692: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
693: END IF;
694: --
695: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
696: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
697: --
698: -- Debug Statements
699: --
700: IF l_debug_on THEN
701: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
702: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
703: END IF;
704: --
705: WHEN OTHERS THEN
698: -- Debug Statements
699: --
700: IF l_debug_on THEN
701: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
702: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
703: END IF;
704: --
705: WHEN OTHERS THEN
706: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
708: --
709: -- Debug Statements
710: --
711: IF l_debug_on THEN
712: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
713: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
714: END IF;
715: --
716: --}
709: -- Debug Statements
710: --
711: IF l_debug_on THEN
712: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
713: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
714: END IF;
715: --
716: --}
717: END getNetWeightVolume;
771: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
772: --
773: IF l_debug_on IS NULL
774: THEN
775: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
776: END IF;
777: --
778: --
779: -- Debug Statements
778: --
779: -- Debug Statements
780: --
781: IF l_debug_on THEN
782: WSH_DEBUG_SV.push(l_module_name);
783: WSH_DEBUG_SV.log(l_module_name,'p_deliveryId',p_deliveryId);
784: WSH_DEBUG_SV.log(l_module_name,'p_diff_gross_weight',p_diff_gross_weight);
785: WSH_DEBUG_SV.log(l_module_name,'p_diff_net_weight',p_diff_net_weight);
786: WSH_DEBUG_SV.log(l_module_name,'p_diff_volume',p_diff_volume);
779: -- Debug Statements
780: --
781: IF l_debug_on THEN
782: WSH_DEBUG_SV.push(l_module_name);
783: WSH_DEBUG_SV.log(l_module_name,'p_deliveryId',p_deliveryId);
784: WSH_DEBUG_SV.log(l_module_name,'p_diff_gross_weight',p_diff_gross_weight);
785: WSH_DEBUG_SV.log(l_module_name,'p_diff_net_weight',p_diff_net_weight);
786: WSH_DEBUG_SV.log(l_module_name,'p_diff_volume',p_diff_volume);
787: END IF;
780: --
781: IF l_debug_on THEN
782: WSH_DEBUG_SV.push(l_module_name);
783: WSH_DEBUG_SV.log(l_module_name,'p_deliveryId',p_deliveryId);
784: WSH_DEBUG_SV.log(l_module_name,'p_diff_gross_weight',p_diff_gross_weight);
785: WSH_DEBUG_SV.log(l_module_name,'p_diff_net_weight',p_diff_net_weight);
786: WSH_DEBUG_SV.log(l_module_name,'p_diff_volume',p_diff_volume);
787: END IF;
788: --
781: IF l_debug_on THEN
782: WSH_DEBUG_SV.push(l_module_name);
783: WSH_DEBUG_SV.log(l_module_name,'p_deliveryId',p_deliveryId);
784: WSH_DEBUG_SV.log(l_module_name,'p_diff_gross_weight',p_diff_gross_weight);
785: WSH_DEBUG_SV.log(l_module_name,'p_diff_net_weight',p_diff_net_weight);
786: WSH_DEBUG_SV.log(l_module_name,'p_diff_volume',p_diff_volume);
787: END IF;
788: --
789: UPDATE wsh_new_deliveries
782: WSH_DEBUG_SV.push(l_module_name);
783: WSH_DEBUG_SV.log(l_module_name,'p_deliveryId',p_deliveryId);
784: WSH_DEBUG_SV.log(l_module_name,'p_diff_gross_weight',p_diff_gross_weight);
785: WSH_DEBUG_SV.log(l_module_name,'p_diff_net_weight',p_diff_net_weight);
786: WSH_DEBUG_SV.log(l_module_name,'p_diff_volume',p_diff_volume);
787: END IF;
788: --
789: UPDATE wsh_new_deliveries
790: SET gross_weight = NVL(gross_weight,0) - NVL(p_diff_gross_weight,0),
796: WHERE delivery_id = p_deliveryId;
797: --
798: --
799: IF l_debug_on THEN
800: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.Del_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
801: END IF;
802: --
803: WSH_WV_UTILS.Del_WV_Post_Process
804: (
810: );
811: --
812: --
813: IF l_debug_on THEN
814: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
815: END IF;
816: --
817: --
818: IF l_debug_on THEN
815: END IF;
816: --
817: --
818: IF l_debug_on THEN
819: WSH_DEBUG_SV.logmsg(l_module_name,
820: 'Number of Errors='||l_num_errors||',Number of Warnings='||l_num_warnings);
821: END IF;
822: --
823: IF l_num_errors > 0
832: --
833: -- Debug Statements
834: --
835: IF l_debug_on THEN
836: WSH_DEBUG_SV.pop(l_module_name);
837: END IF;
838: --
839: --}
840: EXCEPTION
844: --
845: -- Debug Statements
846: --
847: IF l_debug_on THEN
848: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
849: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
850: END IF;
851: --
852: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
845: -- Debug Statements
846: --
847: IF l_debug_on THEN
848: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
849: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
850: END IF;
851: --
852: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
853: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
854: --
855: -- Debug Statements
856: --
857: IF l_debug_on THEN
858: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
859: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
860: END IF;
861: --
862: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
855: -- Debug Statements
856: --
857: IF l_debug_on THEN
858: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
859: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
860: END IF;
861: --
862: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
863: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
864: --
865: -- Debug Statements
866: --
867: IF l_debug_on THEN
868: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
869: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
870: END IF;
871: --
872: WHEN OTHERS THEN
865: -- Debug Statements
866: --
867: IF l_debug_on THEN
868: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
869: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
870: END IF;
871: --
872: WHEN OTHERS THEN
873: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
875: --
876: -- Debug Statements
877: --
878: IF l_debug_on THEN
879: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
880: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
881: END IF;
882: --
883: --}
876: -- Debug Statements
877: --
878: IF l_debug_on THEN
879: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
880: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
881: END IF;
882: --
883: --}
884: END updateDlvyWeightVolume;
938: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
939: --
940: IF l_debug_on IS NULL
941: THEN
942: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
943: END IF;
944: --
945: --
946: -- Debug Statements
945: --
946: -- Debug Statements
947: --
948: IF l_debug_on THEN
949: WSH_DEBUG_SV.push(l_module_name);
950: WSH_DEBUG_SV.log(l_module_name,'p_LPNId',p_LPNId);
951: WSH_DEBUG_SV.log(l_module_name,'p_diff_gross_weight',p_diff_gross_weight);
952: WSH_DEBUG_SV.log(l_module_name,'p_diff_net_weight',p_diff_net_weight);
953: WSH_DEBUG_SV.log(l_module_name,'p_diff_volume',p_diff_volume);
946: -- Debug Statements
947: --
948: IF l_debug_on THEN
949: WSH_DEBUG_SV.push(l_module_name);
950: WSH_DEBUG_SV.log(l_module_name,'p_LPNId',p_LPNId);
951: WSH_DEBUG_SV.log(l_module_name,'p_diff_gross_weight',p_diff_gross_weight);
952: WSH_DEBUG_SV.log(l_module_name,'p_diff_net_weight',p_diff_net_weight);
953: WSH_DEBUG_SV.log(l_module_name,'p_diff_volume',p_diff_volume);
954: END IF;
947: --
948: IF l_debug_on THEN
949: WSH_DEBUG_SV.push(l_module_name);
950: WSH_DEBUG_SV.log(l_module_name,'p_LPNId',p_LPNId);
951: WSH_DEBUG_SV.log(l_module_name,'p_diff_gross_weight',p_diff_gross_weight);
952: WSH_DEBUG_SV.log(l_module_name,'p_diff_net_weight',p_diff_net_weight);
953: WSH_DEBUG_SV.log(l_module_name,'p_diff_volume',p_diff_volume);
954: END IF;
955: --
948: IF l_debug_on THEN
949: WSH_DEBUG_SV.push(l_module_name);
950: WSH_DEBUG_SV.log(l_module_name,'p_LPNId',p_LPNId);
951: WSH_DEBUG_SV.log(l_module_name,'p_diff_gross_weight',p_diff_gross_weight);
952: WSH_DEBUG_SV.log(l_module_name,'p_diff_net_weight',p_diff_net_weight);
953: WSH_DEBUG_SV.log(l_module_name,'p_diff_volume',p_diff_volume);
954: END IF;
955: --
956: UPDATE wsh_delivery_details
949: WSH_DEBUG_SV.push(l_module_name);
950: WSH_DEBUG_SV.log(l_module_name,'p_LPNId',p_LPNId);
951: WSH_DEBUG_SV.log(l_module_name,'p_diff_gross_weight',p_diff_gross_weight);
952: WSH_DEBUG_SV.log(l_module_name,'p_diff_net_weight',p_diff_net_weight);
953: WSH_DEBUG_SV.log(l_module_name,'p_diff_volume',p_diff_volume);
954: END IF;
955: --
956: UPDATE wsh_delivery_details
957: SET gross_weight = NVL(gross_weight,0) - NVL(p_diff_gross_weight,0),
963: WHERE delivery_detail_id = p_LPNId;
964: --
965: --
966: IF l_debug_on THEN
967: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
968: END IF;
969: --
970: WSH_WV_UTILS.DD_WV_Post_Process
971: (
977: );
978: --
979: --
980: IF l_debug_on THEN
981: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
982: END IF;
983: --
984: --
985: IF l_debug_on THEN
982: END IF;
983: --
984: --
985: IF l_debug_on THEN
986: WSH_DEBUG_SV.logmsg(l_module_name,
987: 'Number of Errors='||l_num_errors||',Number of Warnings='||l_num_warnings);
988: END IF;
989: --
990: IF l_num_errors > 0
999: --
1000: -- Debug Statements
1001: --
1002: IF l_debug_on THEN
1003: WSH_DEBUG_SV.pop(l_module_name);
1004: END IF;
1005: --
1006: --}
1007: EXCEPTION
1011: --
1012: -- Debug Statements
1013: --
1014: IF l_debug_on THEN
1015: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1016: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1017: END IF;
1018: --
1019: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1012: -- Debug Statements
1013: --
1014: IF l_debug_on THEN
1015: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1016: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1017: END IF;
1018: --
1019: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1020: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1021: --
1022: -- Debug Statements
1023: --
1024: IF l_debug_on THEN
1025: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1026: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1027: END IF;
1028: --
1029: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1022: -- Debug Statements
1023: --
1024: IF l_debug_on THEN
1025: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1026: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1027: END IF;
1028: --
1029: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1030: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1031: --
1032: -- Debug Statements
1033: --
1034: IF l_debug_on THEN
1035: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1036: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1037: END IF;
1038: --
1039: WHEN OTHERS THEN
1032: -- Debug Statements
1033: --
1034: IF l_debug_on THEN
1035: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1036: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1037: END IF;
1038: --
1039: WHEN OTHERS THEN
1040: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1042: --
1043: -- Debug Statements
1044: --
1045: IF l_debug_on THEN
1046: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1047: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1048: END IF;
1049: --
1050: --}
1043: -- Debug Statements
1044: --
1045: IF l_debug_on THEN
1046: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1047: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1048: END IF;
1049: --
1050: --}
1051: END updateLPNWeightVolume;
1125: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1126: --
1127: IF l_debug_on IS NULL
1128: THEN
1129: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1130: END IF;
1131: --
1132: --
1133: -- Debug Statements
1132: --
1133: -- Debug Statements
1134: --
1135: IF l_debug_on THEN
1136: WSH_DEBUG_SV.push(l_module_name);
1137: WSH_DEBUG_SV.log(l_module_name,'p_entity',p_entity);
1138: END IF;
1139: --
1140: l_index := x_GWTCacheTbl.FIRST;
1133: -- Debug Statements
1134: --
1135: IF l_debug_on THEN
1136: WSH_DEBUG_SV.push(l_module_name);
1137: WSH_DEBUG_SV.log(l_module_name,'p_entity',p_entity);
1138: END IF;
1139: --
1140: l_index := x_GWTCacheTbl.FIRST;
1141: --
1151: l_diff_gross_weight := x_GWTCacheTbl(l_index).value;
1152: --
1153: --
1154: IF l_debug_on THEN
1155: WSH_DEBUG_SV.log(l_module_name,'l_diff_gross_weight',l_diff_gross_weight);
1156: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.getNetWeightVolume',WSH_DEBUG_SV.C_PROC_LEVEL);
1157: END IF;
1158: --
1159: --
1152: --
1153: --
1154: IF l_debug_on THEN
1155: WSH_DEBUG_SV.log(l_module_name,'l_diff_gross_weight',l_diff_gross_weight);
1156: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.getNetWeightVolume',WSH_DEBUG_SV.C_PROC_LEVEL);
1157: END IF;
1158: --
1159: --
1160: -- This API whether the weight/volume has changed for the given
1171: x_return_status => l_return_status
1172: );
1173: --
1174: IF l_debug_on THEN
1175: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1176: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1177: END IF;
1178: --
1179: wsh_util_core.api_post_call
1172: );
1173: --
1174: IF l_debug_on THEN
1175: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1176: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1177: END IF;
1178: --
1179: wsh_util_core.api_post_call
1180: (
1194: IF p_entity = 'DLVY'
1195: THEN
1196: --{
1197: IF l_debug_on THEN
1198: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.updateDlvyWeightVolume',WSH_DEBUG_SV.C_PROC_LEVEL);
1199: END IF;
1200: --
1201: --
1202: WSH_ASN_RECEIPT_PVT.updateDlvyWeightVolume
1211: ELSIF p_entity = 'LPN'
1212: THEN
1213: --{
1214: IF l_debug_on THEN
1215: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.updateLPNWeightVolume',WSH_DEBUG_SV.C_PROC_LEVEL);
1216: END IF;
1217: --
1218: --
1219: WSH_ASN_RECEIPT_PVT.updateLPNWeightVolume
1227: --}
1228: END IF;
1229: --
1230: IF l_debug_on THEN
1231: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1232: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1233: END IF;
1234: --
1235: wsh_util_core.api_post_call
1228: END IF;
1229: --
1230: IF l_debug_on THEN
1231: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1232: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1233: END IF;
1234: --
1235: wsh_util_core.api_post_call
1236: (
1260: l_diff_gross_weight := x_GWTCacheExtTbl(l_index).value;
1261: --
1262: --
1263: IF l_debug_on THEN
1264: WSH_DEBUG_SV.log(l_module_name,'l_diff_gross_weight',l_diff_gross_weight);
1265: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.getNetWeightVolume',WSH_DEBUG_SV.C_PROC_LEVEL);
1266: END IF;
1267: --
1268: --
1261: --
1262: --
1263: IF l_debug_on THEN
1264: WSH_DEBUG_SV.log(l_module_name,'l_diff_gross_weight',l_diff_gross_weight);
1265: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.getNetWeightVolume',WSH_DEBUG_SV.C_PROC_LEVEL);
1266: END IF;
1267: --
1268: --
1269: -- This API whether the weight/volume has changed for the given
1280: x_return_status => l_return_status
1281: );
1282: --
1283: IF l_debug_on THEN
1284: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1285: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1286: END IF;
1287: --
1288: wsh_util_core.api_post_call
1281: );
1282: --
1283: IF l_debug_on THEN
1284: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1285: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1286: END IF;
1287: --
1288: wsh_util_core.api_post_call
1289: (
1303: IF p_entity = 'DLVY'
1304: THEN
1305: --{
1306: IF l_debug_on THEN
1307: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.updateDlvyWeightVolume',WSH_DEBUG_SV.C_PROC_LEVEL);
1308: END IF;
1309: --
1310: --
1311: WSH_ASN_RECEIPT_PVT.updateDlvyWeightVolume
1320: ELSIF p_entity = 'LPN'
1321: THEN
1322: --{
1323: IF l_debug_on THEN
1324: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.updateLPNWeightVolume',WSH_DEBUG_SV.C_PROC_LEVEL);
1325: END IF;
1326: --
1327: --
1328: WSH_ASN_RECEIPT_PVT.updateLPNWeightVolume
1336: --}
1337: END IF;
1338: --
1339: IF l_debug_on THEN
1340: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1341: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1342: END IF;
1343: --
1344: wsh_util_core.api_post_call
1337: END IF;
1338: --
1339: IF l_debug_on THEN
1340: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1341: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1342: END IF;
1343: --
1344: wsh_util_core.api_post_call
1345: (
1357: --
1358: --
1359: --
1360: IF l_debug_on THEN
1361: WSH_DEBUG_SV.logmsg(l_module_name,
1362: 'Number of Errors='||l_num_errors||',Number of Warnings='||l_num_warnings);
1363: END IF;
1364: --
1365: IF l_num_errors > 0
1374: --
1375: -- Debug Statements
1376: --
1377: IF l_debug_on THEN
1378: WSH_DEBUG_SV.pop(l_module_name);
1379: END IF;
1380: --
1381: --}
1382: EXCEPTION
1386: --
1387: -- Debug Statements
1388: --
1389: IF l_debug_on THEN
1390: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1391: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1392: END IF;
1393: --
1394: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1387: -- Debug Statements
1388: --
1389: IF l_debug_on THEN
1390: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1391: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1392: END IF;
1393: --
1394: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1395: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1396: --
1397: -- Debug Statements
1398: --
1399: IF l_debug_on THEN
1400: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1401: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1402: END IF;
1403: --
1404: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1397: -- Debug Statements
1398: --
1399: IF l_debug_on THEN
1400: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1401: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1402: END IF;
1403: --
1404: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1405: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1406: --
1407: -- Debug Statements
1408: --
1409: IF l_debug_on THEN
1410: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1411: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1412: END IF;
1413: --
1414: WHEN OTHERS THEN
1407: -- Debug Statements
1408: --
1409: IF l_debug_on THEN
1410: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1411: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1412: END IF;
1413: --
1414: WHEN OTHERS THEN
1415: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1417: --
1418: -- Debug Statements
1419: --
1420: IF l_debug_on THEN
1421: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1422: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1423: END IF;
1424: --
1425: --}
1418: -- Debug Statements
1419: --
1420: IF l_debug_on THEN
1421: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1422: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1423: END IF;
1424: --
1425: --}
1426: END updateWeightVolume;
1729: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1730: --
1731: IF l_debug_on IS NULL
1732: THEN
1733: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1734: END IF;
1735: --
1736: --
1737: -- Debug Statements
1736: --
1737: -- Debug Statements
1738: --
1739: IF l_debug_on THEN
1740: WSH_DEBUG_SV.push(l_module_name);
1741: --
1742: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
1743: WSH_DEBUG_SV.log(l_module_name,'P_MAX_TXN_ID',P_MAX_TXN_ID);
1744: END IF;
1738: --
1739: IF l_debug_on THEN
1740: WSH_DEBUG_SV.push(l_module_name);
1741: --
1742: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
1743: WSH_DEBUG_SV.log(l_module_name,'P_MAX_TXN_ID',P_MAX_TXN_ID);
1744: END IF;
1745: --
1746: SAVEPOINT Process_Matched_Txns_PVT;
1739: IF l_debug_on THEN
1740: WSH_DEBUG_SV.push(l_module_name);
1741: --
1742: WSH_DEBUG_SV.log(l_module_name,'P_SHIPMENT_HEADER_ID',P_SHIPMENT_HEADER_ID);
1743: WSH_DEBUG_SV.log(l_module_name,'P_MAX_TXN_ID',P_MAX_TXN_ID);
1744: END IF;
1745: --
1746: SAVEPOINT Process_Matched_Txns_PVT;
1747: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1762: l_populate_p_line_rec := 'Y';
1763: END IF;
1764:
1765: IF l_debug_on THEN
1766: WSH_DEBUG_SV.log(l_module_name,'l_populate_p_line_rec',l_populate_p_line_rec);
1767: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.po_shipment_line_id.COUNT',p_line_rec.po_shipment_line_id.COUNT);
1768: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.transaction_type',p_dd_rec.transaction_type);
1769: END IF;
1770: --
1763: END IF;
1764:
1765: IF l_debug_on THEN
1766: WSH_DEBUG_SV.log(l_module_name,'l_populate_p_line_rec',l_populate_p_line_rec);
1767: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.po_shipment_line_id.COUNT',p_line_rec.po_shipment_line_id.COUNT);
1768: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.transaction_type',p_dd_rec.transaction_type);
1769: END IF;
1770: --
1771:
1764:
1765: IF l_debug_on THEN
1766: WSH_DEBUG_SV.log(l_module_name,'l_populate_p_line_rec',l_populate_p_line_rec);
1767: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.po_shipment_line_id.COUNT',p_line_rec.po_shipment_line_id.COUNT);
1768: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.transaction_type',p_dd_rec.transaction_type);
1769: END IF;
1770: --
1771:
1772: IF p_dd_rec.transaction_type = 'ASN' THEN
1793: -- p_dd_rec.shipment_line_id_idx is the link between the two structures viz.p_line_rec
1794: -- and p_dd_rec.
1795:
1796: IF l_debug_on THEN
1797: WSH_DEBUG_SV.log(l_module_name,'p-dd-rec-index i',i);
1798: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.po_line_location_id_tab(i)',p_dd_rec.po_line_location_id_tab(i));
1799: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.shipment_line_id_tab(i)',p_dd_rec.shipment_line_id_tab(i));
1800: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.process_asn_rcv_flag_tab(i)',p_dd_rec.process_asn_rcv_flag_tab(i));
1801: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.child_index_tab(i)',p_dd_rec.child_index_tab(i));
1794: -- and p_dd_rec.
1795:
1796: IF l_debug_on THEN
1797: WSH_DEBUG_SV.log(l_module_name,'p-dd-rec-index i',i);
1798: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.po_line_location_id_tab(i)',p_dd_rec.po_line_location_id_tab(i));
1799: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.shipment_line_id_tab(i)',p_dd_rec.shipment_line_id_tab(i));
1800: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.process_asn_rcv_flag_tab(i)',p_dd_rec.process_asn_rcv_flag_tab(i));
1801: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.child_index_tab(i)',p_dd_rec.child_index_tab(i));
1802: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.del_detail_id_tab(i)',p_dd_rec.del_detail_id_tab(i));
1795:
1796: IF l_debug_on THEN
1797: WSH_DEBUG_SV.log(l_module_name,'p-dd-rec-index i',i);
1798: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.po_line_location_id_tab(i)',p_dd_rec.po_line_location_id_tab(i));
1799: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.shipment_line_id_tab(i)',p_dd_rec.shipment_line_id_tab(i));
1800: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.process_asn_rcv_flag_tab(i)',p_dd_rec.process_asn_rcv_flag_tab(i));
1801: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.child_index_tab(i)',p_dd_rec.child_index_tab(i));
1802: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.del_detail_id_tab(i)',p_dd_rec.del_detail_id_tab(i));
1803: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.delivery_id_tab(i)',p_dd_rec.delivery_id_tab(i));
1796: IF l_debug_on THEN
1797: WSH_DEBUG_SV.log(l_module_name,'p-dd-rec-index i',i);
1798: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.po_line_location_id_tab(i)',p_dd_rec.po_line_location_id_tab(i));
1799: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.shipment_line_id_tab(i)',p_dd_rec.shipment_line_id_tab(i));
1800: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.process_asn_rcv_flag_tab(i)',p_dd_rec.process_asn_rcv_flag_tab(i));
1801: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.child_index_tab(i)',p_dd_rec.child_index_tab(i));
1802: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.del_detail_id_tab(i)',p_dd_rec.del_detail_id_tab(i));
1803: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.delivery_id_tab(i)',p_dd_rec.delivery_id_tab(i));
1804: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.trip_id_tab(i)',p_dd_rec.trip_id_tab(i));
1797: WSH_DEBUG_SV.log(l_module_name,'p-dd-rec-index i',i);
1798: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.po_line_location_id_tab(i)',p_dd_rec.po_line_location_id_tab(i));
1799: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.shipment_line_id_tab(i)',p_dd_rec.shipment_line_id_tab(i));
1800: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.process_asn_rcv_flag_tab(i)',p_dd_rec.process_asn_rcv_flag_tab(i));
1801: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.child_index_tab(i)',p_dd_rec.child_index_tab(i));
1802: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.del_detail_id_tab(i)',p_dd_rec.del_detail_id_tab(i));
1803: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.delivery_id_tab(i)',p_dd_rec.delivery_id_tab(i));
1804: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.trip_id_tab(i)',p_dd_rec.trip_id_tab(i));
1805: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.ship_from_location_id_tab(i)',p_dd_rec.ship_from_location_id_tab(i));
1798: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.po_line_location_id_tab(i)',p_dd_rec.po_line_location_id_tab(i));
1799: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.shipment_line_id_tab(i)',p_dd_rec.shipment_line_id_tab(i));
1800: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.process_asn_rcv_flag_tab(i)',p_dd_rec.process_asn_rcv_flag_tab(i));
1801: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.child_index_tab(i)',p_dd_rec.child_index_tab(i));
1802: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.del_detail_id_tab(i)',p_dd_rec.del_detail_id_tab(i));
1803: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.delivery_id_tab(i)',p_dd_rec.delivery_id_tab(i));
1804: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.trip_id_tab(i)',p_dd_rec.trip_id_tab(i));
1805: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.ship_from_location_id_tab(i)',p_dd_rec.ship_from_location_id_tab(i));
1806: END IF;
1799: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.shipment_line_id_tab(i)',p_dd_rec.shipment_line_id_tab(i));
1800: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.process_asn_rcv_flag_tab(i)',p_dd_rec.process_asn_rcv_flag_tab(i));
1801: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.child_index_tab(i)',p_dd_rec.child_index_tab(i));
1802: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.del_detail_id_tab(i)',p_dd_rec.del_detail_id_tab(i));
1803: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.delivery_id_tab(i)',p_dd_rec.delivery_id_tab(i));
1804: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.trip_id_tab(i)',p_dd_rec.trip_id_tab(i));
1805: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.ship_from_location_id_tab(i)',p_dd_rec.ship_from_location_id_tab(i));
1806: END IF;
1807: --
1800: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.process_asn_rcv_flag_tab(i)',p_dd_rec.process_asn_rcv_flag_tab(i));
1801: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.child_index_tab(i)',p_dd_rec.child_index_tab(i));
1802: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.del_detail_id_tab(i)',p_dd_rec.del_detail_id_tab(i));
1803: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.delivery_id_tab(i)',p_dd_rec.delivery_id_tab(i));
1804: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.trip_id_tab(i)',p_dd_rec.trip_id_tab(i));
1805: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.ship_from_location_id_tab(i)',p_dd_rec.ship_from_location_id_tab(i));
1806: END IF;
1807: --
1808:
1801: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.child_index_tab(i)',p_dd_rec.child_index_tab(i));
1802: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.del_detail_id_tab(i)',p_dd_rec.del_detail_id_tab(i));
1803: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.delivery_id_tab(i)',p_dd_rec.delivery_id_tab(i));
1804: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.trip_id_tab(i)',p_dd_rec.trip_id_tab(i));
1805: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.ship_from_location_id_tab(i)',p_dd_rec.ship_from_location_id_tab(i));
1806: END IF;
1807: --
1808:
1809: l_cache_return_status := wsh_util_core.g_ret_sts_success;
1810:
1811: IF l_populate_p_line_rec = 'Y' THEN
1812: --{
1813: IF l_debug_on THEN
1814: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-p_loc_id_index_cache',WSH_DEBUG_SV.C_PROC_LEVEL);
1815: END IF;
1816: --
1817: IF (p_dd_rec.process_asn_rcv_flag_tab(i) ='Y')
1818: THEN
1825: p_action => 'GET',
1826: x_return_status => l_cache_return_status);
1827:
1828: IF l_debug_on THEN
1829: WSH_DEBUG_SV.log(l_module_name,'pointer to p_line_rec',l_value);
1830: END IF;
1831: --
1832: IF l_cache_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1833: --{
1838: --
1839: -- Debug Statements
1840: --
1841: IF l_debug_on THEN
1842: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_UTIL_PKG.GET_PO_RCV_ATTRIBUTES',WSH_DEBUG_SV.C_PROC_LEVEL);
1843: END IF;
1844: --
1845: WSH_INBOUND_UTIL_PKG.get_po_rcv_attributes(
1846: p_po_line_location_id => p_dd_rec.po_line_location_id_tab(i),
1850: --
1851: -- Debug Statements
1852: --
1853: IF l_debug_on THEN
1854: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1855: END IF;
1856: --
1857: wsh_util_core.api_post_call(
1858: p_return_status => l_return_status,
1860: x_num_errors => l_num_errors);
1861:
1862: l_pline_rec_count := p_line_rec.header_id.COUNT;
1863: IF l_debug_on THEN
1864: WSH_DEBUG_SV.log(l_module_name,'pointer to p_line_rec',l_pline_rec_count);
1865: END IF;
1866: --
1867: p_dd_rec.shpmt_line_id_idx_tab(i) := p_line_rec.header_id.COUNT;
1868:
1871: THEN
1872: -- populate the shipment_line_id to p_dd_rec structure.
1873: --{
1874: IF l_debug_on THEN
1875: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-p_loc_id_index_cache',WSH_DEBUG_SV.C_PROC_LEVEL);
1876: END IF;
1877: --
1878: wsh_util_core.get_cached_value(
1879: p_cache_tbl => p_loc_id_index_cache,
1919:
1920: p_dd_rec.requested_qty_uom2_tab(i);
1921:
1922: IF l_debug_on THEN
1923: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.requested_quantity_uom ---', p_dd_rec.requested_qty_uom_tab(i));
1924: --}
1925: END IF;
1926: END IF;
1927:
1937: l_remaining_qty1 := 0;
1938: l_pending_qty := 0;
1939:
1940: IF l_debug_on THEN
1941: WSH_DEBUG_SV.log(l_module_name,'processing index i in p_dd_rec ---', i);
1942: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.process_asn_rcv_flag_tab(i)', p_dd_rec.process_asn_rcv_flag_tab(i));
1943: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.child_index_tab(i)', p_dd_rec.child_index_tab(i));
1944: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.del_detail_id_tab(i)', p_dd_rec.del_detail_id_tab(i));
1945: END IF;
1938: l_pending_qty := 0;
1939:
1940: IF l_debug_on THEN
1941: WSH_DEBUG_SV.log(l_module_name,'processing index i in p_dd_rec ---', i);
1942: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.process_asn_rcv_flag_tab(i)', p_dd_rec.process_asn_rcv_flag_tab(i));
1943: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.child_index_tab(i)', p_dd_rec.child_index_tab(i));
1944: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.del_detail_id_tab(i)', p_dd_rec.del_detail_id_tab(i));
1945: END IF;
1946:
1939:
1940: IF l_debug_on THEN
1941: WSH_DEBUG_SV.log(l_module_name,'processing index i in p_dd_rec ---', i);
1942: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.process_asn_rcv_flag_tab(i)', p_dd_rec.process_asn_rcv_flag_tab(i));
1943: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.child_index_tab(i)', p_dd_rec.child_index_tab(i));
1944: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.del_detail_id_tab(i)', p_dd_rec.del_detail_id_tab(i));
1945: END IF;
1946:
1947: -- Process_matched_txn api will process only those records for which
1940: IF l_debug_on THEN
1941: WSH_DEBUG_SV.log(l_module_name,'processing index i in p_dd_rec ---', i);
1942: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.process_asn_rcv_flag_tab(i)', p_dd_rec.process_asn_rcv_flag_tab(i));
1943: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.child_index_tab(i)', p_dd_rec.child_index_tab(i));
1944: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.del_detail_id_tab(i)', p_dd_rec.del_detail_id_tab(i));
1945: END IF;
1946:
1947: -- Process_matched_txn api will process only those records for which
1948: -- the process_asn_rcv_flag is set to'Y'.
1986: --
1987: --
1988: --
1989: IF l_debug_on THEN
1990: WSH_DEBUG_SV.logmsg(l_module_name, 'l_line_rec:l_net_wt '||l_line_rec.net_weight||' l_gross_wt '||l_line_rec.gross_weight||' l_vol '||l_line_rec.volume);
1991: WSH_DEBUG_SV.logmsg(l_module_name, 'l_line_rec:dlvy_id '||l_line_rec.delivery_id||' parent_wdd_id '||l_line_rec.parent_delivery_detail_id);
1992: WSH_DEBUG_SV.logmsg(l_module_name, 'l_line_rec:wv_qty '||l_line_rec.wv_qty || ' req qty ' || l_line_rec.requested_quantity);
1993: WSH_DEBUG_SV.logmsg(l_module_name, 'wv_frozen_flag:line '||l_line_rec.wv_frozen_flag||' dlvy '||l_line_rec.dlvy_wv_frozen_flag || ' lpn ' || l_line_rec.lpn_wv_frozen_flag);
1994: END IF;
1987: --
1988: --
1989: IF l_debug_on THEN
1990: WSH_DEBUG_SV.logmsg(l_module_name, 'l_line_rec:l_net_wt '||l_line_rec.net_weight||' l_gross_wt '||l_line_rec.gross_weight||' l_vol '||l_line_rec.volume);
1991: WSH_DEBUG_SV.logmsg(l_module_name, 'l_line_rec:dlvy_id '||l_line_rec.delivery_id||' parent_wdd_id '||l_line_rec.parent_delivery_detail_id);
1992: WSH_DEBUG_SV.logmsg(l_module_name, 'l_line_rec:wv_qty '||l_line_rec.wv_qty || ' req qty ' || l_line_rec.requested_quantity);
1993: WSH_DEBUG_SV.logmsg(l_module_name, 'wv_frozen_flag:line '||l_line_rec.wv_frozen_flag||' dlvy '||l_line_rec.dlvy_wv_frozen_flag || ' lpn ' || l_line_rec.lpn_wv_frozen_flag);
1994: END IF;
1995: --
1988: --
1989: IF l_debug_on THEN
1990: WSH_DEBUG_SV.logmsg(l_module_name, 'l_line_rec:l_net_wt '||l_line_rec.net_weight||' l_gross_wt '||l_line_rec.gross_weight||' l_vol '||l_line_rec.volume);
1991: WSH_DEBUG_SV.logmsg(l_module_name, 'l_line_rec:dlvy_id '||l_line_rec.delivery_id||' parent_wdd_id '||l_line_rec.parent_delivery_detail_id);
1992: WSH_DEBUG_SV.logmsg(l_module_name, 'l_line_rec:wv_qty '||l_line_rec.wv_qty || ' req qty ' || l_line_rec.requested_quantity);
1993: WSH_DEBUG_SV.logmsg(l_module_name, 'wv_frozen_flag:line '||l_line_rec.wv_frozen_flag||' dlvy '||l_line_rec.dlvy_wv_frozen_flag || ' lpn ' || l_line_rec.lpn_wv_frozen_flag);
1994: END IF;
1995: --
1996: --
1989: IF l_debug_on THEN
1990: WSH_DEBUG_SV.logmsg(l_module_name, 'l_line_rec:l_net_wt '||l_line_rec.net_weight||' l_gross_wt '||l_line_rec.gross_weight||' l_vol '||l_line_rec.volume);
1991: WSH_DEBUG_SV.logmsg(l_module_name, 'l_line_rec:dlvy_id '||l_line_rec.delivery_id||' parent_wdd_id '||l_line_rec.parent_delivery_detail_id);
1992: WSH_DEBUG_SV.logmsg(l_module_name, 'l_line_rec:wv_qty '||l_line_rec.wv_qty || ' req qty ' || l_line_rec.requested_quantity);
1993: WSH_DEBUG_SV.logmsg(l_module_name, 'wv_frozen_flag:line '||l_line_rec.wv_frozen_flag||' dlvy '||l_line_rec.dlvy_wv_frozen_flag || ' lpn ' || l_line_rec.lpn_wv_frozen_flag);
1994: END IF;
1995: --
1996: --
1997: IF l_line_rec.wv_frozen_flag = 'Y'
2022: END IF;
2023: --
2024: --
2025: IF l_debug_on THEN
2026: WSH_DEBUG_SV.logmsg(l_module_name, 'Frozen Y l_net_wt_pc '||l_net_wt_pc||' l_gross_wt_pc '||l_gross_wt_pc||' l_vol_pc '||l_vol_pc);
2027: END IF;
2028: --
2029: --
2030: l_old_wv_qty := NVL
2070: END IF;
2071: --
2072: --
2073: IF l_debug_on THEN
2074: WSH_DEBUG_SV.logmsg(l_module_name, 'l_old_dd:l_net_wt '||l_old_dd_net_weight||' l_gross_wt '||l_old_dd_gross_weight||' l_vol '||l_old_dd_volume);
2075: WSH_DEBUG_SV.logmsg(l_module_name, 'l_diff_dd-Orig:l_net_wt '||l_diff_dd_net_weight||' l_gross_wt '||l_diff_dd_gross_weight||' l_vol '||l_diff_dd_volume);
2076: END IF;
2077: --}
2078: END IF;
2071: --
2072: --
2073: IF l_debug_on THEN
2074: WSH_DEBUG_SV.logmsg(l_module_name, 'l_old_dd:l_net_wt '||l_old_dd_net_weight||' l_gross_wt '||l_old_dd_gross_weight||' l_vol '||l_old_dd_volume);
2075: WSH_DEBUG_SV.logmsg(l_module_name, 'l_diff_dd-Orig:l_net_wt '||l_diff_dd_net_weight||' l_gross_wt '||l_diff_dd_gross_weight||' l_vol '||l_diff_dd_volume);
2076: END IF;
2077: --}
2078: END IF;
2079: --}
2093: IF p_dd_rec.del_detail_id_tab(i) IS NOT NULL THEN
2094: -- bulk update those records whose delivery detail id is not null in p_dd_rec.
2095: -- This is done by populating l_update_dd_rec structure which is later used for bulk update.
2096: IF l_debug_on THEN
2097: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit populate_update_dd_rec',WSH_DEBUG_SV.C_PROC_LEVEL);
2098: END IF;
2099: --{
2100: populate_update_dd_rec(
2101: p_dd_rec => p_dd_rec,
2114: --
2115: -- Debug Statements
2116: --
2117: IF l_debug_on THEN
2118: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2119: END IF;
2120: --
2121: wsh_util_core.api_post_call(
2122: p_return_status => l_return_status,
2132: --
2133: -- Debug Statements
2134: --
2135: IF l_debug_on THEN
2136: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PO_CMG_PVT.POPULATE_ADDITIONAL_LINE_INFO',WSH_DEBUG_SV.C_PROC_LEVEL);
2137: END IF;
2138: --
2139: -- calling WSH_PO_CMG_PVT.populate_additional_line_info
2140: WSH_PO_CMG_PVT.populate_additional_line_info(
2146: --
2147: -- Debug Statements
2148: --
2149: IF l_debug_on THEN
2150: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2151: END IF;
2152: --
2153: wsh_util_core.api_post_call(
2154: p_return_status => l_return_status,
2158: --
2159: -- Debug Statements
2160: --
2161: IF l_debug_on THEN
2162: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_BULK_PROCESS_PVT.BULK_INSERT_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
2163: WSH_DEBUG_SV.log(l_module_name,'P_line_rec.requested_quantity is', P_line_rec.requested_quantity(p_dd_rec.shpmt_line_id_idx_tab(i)));
2164: WSH_DEBUG_SV.log(l_module_name,'P_line_rec.received_quantity is', P_line_rec.received_quantity(p_dd_rec.shpmt_line_id_idx_tab(i)));
2165: WSH_DEBUG_SV.log(l_module_name,'P_line_recs index is ', p_dd_rec.shpmt_line_id_idx_tab(i));
2166: END IF;
2159: -- Debug Statements
2160: --
2161: IF l_debug_on THEN
2162: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_BULK_PROCESS_PVT.BULK_INSERT_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
2163: WSH_DEBUG_SV.log(l_module_name,'P_line_rec.requested_quantity is', P_line_rec.requested_quantity(p_dd_rec.shpmt_line_id_idx_tab(i)));
2164: WSH_DEBUG_SV.log(l_module_name,'P_line_rec.received_quantity is', P_line_rec.received_quantity(p_dd_rec.shpmt_line_id_idx_tab(i)));
2165: WSH_DEBUG_SV.log(l_module_name,'P_line_recs index is ', p_dd_rec.shpmt_line_id_idx_tab(i));
2166: END IF;
2167: --
2160: --
2161: IF l_debug_on THEN
2162: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_BULK_PROCESS_PVT.BULK_INSERT_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
2163: WSH_DEBUG_SV.log(l_module_name,'P_line_rec.requested_quantity is', P_line_rec.requested_quantity(p_dd_rec.shpmt_line_id_idx_tab(i)));
2164: WSH_DEBUG_SV.log(l_module_name,'P_line_rec.received_quantity is', P_line_rec.received_quantity(p_dd_rec.shpmt_line_id_idx_tab(i)));
2165: WSH_DEBUG_SV.log(l_module_name,'P_line_recs index is ', p_dd_rec.shpmt_line_id_idx_tab(i));
2166: END IF;
2167: --
2168: l_action_prms.org_id := p_line_rec.org_id(p_dd_rec.shpmt_line_id_idx_tab(i));
2161: IF l_debug_on THEN
2162: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_BULK_PROCESS_PVT.BULK_INSERT_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
2163: WSH_DEBUG_SV.log(l_module_name,'P_line_rec.requested_quantity is', P_line_rec.requested_quantity(p_dd_rec.shpmt_line_id_idx_tab(i)));
2164: WSH_DEBUG_SV.log(l_module_name,'P_line_rec.received_quantity is', P_line_rec.received_quantity(p_dd_rec.shpmt_line_id_idx_tab(i)));
2165: WSH_DEBUG_SV.log(l_module_name,'P_line_recs index is ', p_dd_rec.shpmt_line_id_idx_tab(i));
2166: END IF;
2167: --
2168: l_action_prms.org_id := p_line_rec.org_id(p_dd_rec.shpmt_line_id_idx_tab(i));
2169:
2173: p_line_rec.requested_quantity_uom2(p_dd_rec.shpmt_line_id_idx_tab(i)) :=
2174: p_dd_rec.requested_qty_uom2_tab(i);
2175:
2176: IF l_debug_on THEN
2177: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.requested_quantity_uom 2nd occurance ', p_dd_rec.requested_qty_uom_tab(i));
2178: END IF;
2179: -- Calling WSH_BULK_PROCESS_PVT.bulk_insert_details
2180: WSH_BULK_PROCESS_PVT.bulk_insert_details(
2181: P_line_rec => P_line_rec,
2187: --
2188: -- Debug Statements
2189: --
2190: IF l_debug_on THEN
2191: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2192: END IF;
2193: --
2194: wsh_util_core.api_post_call(
2195: p_return_status => l_return_status,
2199: IF p_dd_rec.delivery_id_tab(i) is NOT NULL THEN
2200: --
2201: --
2202: IF l_debug_on THEN
2203: WSH_DEBUG_SV.logmsg(l_module_name,'updating WDA');
2204: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.delivery_detail_id(p_dd_rec.shpmt_line_id_idx_tab(i))',p_line_rec.delivery_detail_id(p_dd_rec.shpmt_line_id_idx_tab(i)));
2205: END IF;
2206:
2207: -- Updating wsh_delivery_assignments_v after the insert into wsh_delivery_details.
2200: --
2201: --
2202: IF l_debug_on THEN
2203: WSH_DEBUG_SV.logmsg(l_module_name,'updating WDA');
2204: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.delivery_detail_id(p_dd_rec.shpmt_line_id_idx_tab(i))',p_line_rec.delivery_detail_id(p_dd_rec.shpmt_line_id_idx_tab(i)));
2205: END IF;
2206:
2207: -- Updating wsh_delivery_assignments_v after the insert into wsh_delivery_details.
2208:
2222: p_dd_rec.del_detail_id_tab(i) := p_line_rec.delivery_detail_id(p_dd_rec.shpmt_line_id_idx_tab(i));
2223: p_line_rec.delivery_detail_id(p_dd_rec.shpmt_line_id_idx_tab(i)):= NULL;
2224: p_dd_rec.last_update_date_tab(i) := NULL;
2225: IF l_debug_on THEN
2226: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit populate_update_dd_rec',WSH_DEBUG_SV.C_PROC_LEVEL);
2227: END IF;
2228: -- Once delivery_detail_id is populated, populate the update_dd_rec which will be used at the end
2229: -- for bulk update.
2230:
2240: --
2241: -- Debug Statements
2242: --
2243: IF l_debug_on THEN
2244: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2245: END IF;
2246: --
2247: wsh_util_core.api_post_call(
2248: p_return_status => l_return_status,
2258: WHILE p_dd_rec.child_index_tab(k) IS NOT NULL
2259: LOOP
2260:
2261: IF l_debug_on THEN
2262: WSH_DEBUG_SV.log(l_module_name,'k',k);
2263: END IF;
2264: --
2265: IF (p_dd_rec.process_asn_rcv_flag_tab(p_dd_rec.child_index_tab(k)) ='Y')
2266: THEN
2322:
2323: l_child_rtv_qty_to_consolidate := p_dd_rec.returned_qty_tab(p_dd_rec.child_index_tab(k));
2324:
2325: IF l_debug_on THEN
2326: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.requested_quantity', p_dd_info.requested_quantity);
2327: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.received_quantity', p_dd_info.received_quantity);
2328: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.rcv_shipment_line_id',p_dd_info.rcv_shipment_line_id);
2329: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity',p_dd_info.picked_quantity);
2330: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity2',p_dd_info.picked_quantity2);
2323: l_child_rtv_qty_to_consolidate := p_dd_rec.returned_qty_tab(p_dd_rec.child_index_tab(k));
2324:
2325: IF l_debug_on THEN
2326: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.requested_quantity', p_dd_info.requested_quantity);
2327: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.received_quantity', p_dd_info.received_quantity);
2328: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.rcv_shipment_line_id',p_dd_info.rcv_shipment_line_id);
2329: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity',p_dd_info.picked_quantity);
2330: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity2',p_dd_info.picked_quantity2);
2331: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.shipped_quantity',p_dd_info.shipped_quantity);
2324:
2325: IF l_debug_on THEN
2326: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.requested_quantity', p_dd_info.requested_quantity);
2327: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.received_quantity', p_dd_info.received_quantity);
2328: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.rcv_shipment_line_id',p_dd_info.rcv_shipment_line_id);
2329: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity',p_dd_info.picked_quantity);
2330: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity2',p_dd_info.picked_quantity2);
2331: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.shipped_quantity',p_dd_info.shipped_quantity);
2332: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.returned_quantity',p_dd_info.returned_quantity);
2325: IF l_debug_on THEN
2326: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.requested_quantity', p_dd_info.requested_quantity);
2327: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.received_quantity', p_dd_info.received_quantity);
2328: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.rcv_shipment_line_id',p_dd_info.rcv_shipment_line_id);
2329: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity',p_dd_info.picked_quantity);
2330: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity2',p_dd_info.picked_quantity2);
2331: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.shipped_quantity',p_dd_info.shipped_quantity);
2332: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.returned_quantity',p_dd_info.returned_quantity);
2333: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.requested_quantity2',p_dd_info.requested_quantity2);
2326: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.requested_quantity', p_dd_info.requested_quantity);
2327: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.received_quantity', p_dd_info.received_quantity);
2328: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.rcv_shipment_line_id',p_dd_info.rcv_shipment_line_id);
2329: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity',p_dd_info.picked_quantity);
2330: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity2',p_dd_info.picked_quantity2);
2331: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.shipped_quantity',p_dd_info.shipped_quantity);
2332: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.returned_quantity',p_dd_info.returned_quantity);
2333: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.requested_quantity2',p_dd_info.requested_quantity2);
2334: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.shipped_quantity2',p_dd_info.shipped_quantity2);
2327: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.received_quantity', p_dd_info.received_quantity);
2328: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.rcv_shipment_line_id',p_dd_info.rcv_shipment_line_id);
2329: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity',p_dd_info.picked_quantity);
2330: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity2',p_dd_info.picked_quantity2);
2331: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.shipped_quantity',p_dd_info.shipped_quantity);
2332: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.returned_quantity',p_dd_info.returned_quantity);
2333: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.requested_quantity2',p_dd_info.requested_quantity2);
2334: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.shipped_quantity2',p_dd_info.shipped_quantity2);
2335: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.returned_quantity2',p_dd_info.returned_quantity2);
2328: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.rcv_shipment_line_id',p_dd_info.rcv_shipment_line_id);
2329: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity',p_dd_info.picked_quantity);
2330: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity2',p_dd_info.picked_quantity2);
2331: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.shipped_quantity',p_dd_info.shipped_quantity);
2332: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.returned_quantity',p_dd_info.returned_quantity);
2333: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.requested_quantity2',p_dd_info.requested_quantity2);
2334: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.shipped_quantity2',p_dd_info.shipped_quantity2);
2335: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.returned_quantity2',p_dd_info.returned_quantity2);
2336: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.received_quantity2',p_dd_info.received_quantity2);
2329: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity',p_dd_info.picked_quantity);
2330: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity2',p_dd_info.picked_quantity2);
2331: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.shipped_quantity',p_dd_info.shipped_quantity);
2332: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.returned_quantity',p_dd_info.returned_quantity);
2333: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.requested_quantity2',p_dd_info.requested_quantity2);
2334: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.shipped_quantity2',p_dd_info.shipped_quantity2);
2335: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.returned_quantity2',p_dd_info.returned_quantity2);
2336: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.received_quantity2',p_dd_info.received_quantity2);
2337: END IF;
2330: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.picked_quantity2',p_dd_info.picked_quantity2);
2331: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.shipped_quantity',p_dd_info.shipped_quantity);
2332: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.returned_quantity',p_dd_info.returned_quantity);
2333: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.requested_quantity2',p_dd_info.requested_quantity2);
2334: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.shipped_quantity2',p_dd_info.shipped_quantity2);
2335: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.returned_quantity2',p_dd_info.returned_quantity2);
2336: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.received_quantity2',p_dd_info.received_quantity2);
2337: END IF;
2338: -- set the released status to 'C'-Shipped if transaction type is ASN and
2331: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.shipped_quantity',p_dd_info.shipped_quantity);
2332: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.returned_quantity',p_dd_info.returned_quantity);
2333: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.requested_quantity2',p_dd_info.requested_quantity2);
2334: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.shipped_quantity2',p_dd_info.shipped_quantity2);
2335: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.returned_quantity2',p_dd_info.returned_quantity2);
2336: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.received_quantity2',p_dd_info.received_quantity2);
2337: END IF;
2338: -- set the released status to 'C'-Shipped if transaction type is ASN and
2339: -- shipped qty is not null.
2332: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.returned_quantity',p_dd_info.returned_quantity);
2333: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.requested_quantity2',p_dd_info.requested_quantity2);
2334: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.shipped_quantity2',p_dd_info.shipped_quantity2);
2335: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.returned_quantity2',p_dd_info.returned_quantity2);
2336: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.received_quantity2',p_dd_info.received_quantity2);
2337: END IF;
2338: -- set the released status to 'C'-Shipped if transaction type is ASN and
2339: -- shipped qty is not null.
2340: -- set the released status to 'L'-Closed if transaction type is Receipt
2394: END IF;
2395: --}
2396:
2397: IF l_debug_on THEN
2398: WSH_DEBUG_SV.log(l_module_name,'l_child_remaining_qty',l_child_remaining_qty);
2399: END IF;
2400: --
2401: -- if the remaining qty greater than zero, then the requested qty of the child is
2402: -- set to the corresponding shipped qty.Else it is left untouched.
2415: --}
2416: END IF;
2417:
2418: IF l_debug_on THEN
2419: WSH_DEBUG_SV.log(l_module_name,'p_dd_info.requested_quantity',p_dd_info.requested_quantity);
2420: END IF;
2421:
2422: -- Create New Detail from old Delivery detail having the above attributes
2423: -- being different.
2457: END IF;
2458: --
2459: --
2460: IF l_debug_on THEN
2461: WSH_DEBUG_SV.logmsg(l_module_name, 'p_dd_info:l_net_wt '||p_dd_info.net_weight||' l_gross_wt '||p_dd_info.gross_weight||' l_vol '||p_dd_info.volume);
2462: WSH_DEBUG_SV.logmsg(l_module_name, 'l_diff_dd-Curr:l_net_wt '||l_diff_dd_net_weight||' l_gross_wt '||l_diff_dd_gross_weight||' l_vol '||l_diff_dd_volume);
2463: END IF;
2464: --}
2465:
2458: --
2459: --
2460: IF l_debug_on THEN
2461: WSH_DEBUG_SV.logmsg(l_module_name, 'p_dd_info:l_net_wt '||p_dd_info.net_weight||' l_gross_wt '||p_dd_info.gross_weight||' l_vol '||p_dd_info.volume);
2462: WSH_DEBUG_SV.logmsg(l_module_name, 'l_diff_dd-Curr:l_net_wt '||l_diff_dd_net_weight||' l_gross_wt '||l_diff_dd_gross_weight||' l_vol '||l_diff_dd_volume);
2463: END IF;
2464: --}
2465:
2466: --
2466: --
2467: -- Debug Statements
2468: --
2469: IF l_debug_on THEN
2470: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.CREATE_NEW_DETAIL_FROM_OLD',WSH_DEBUG_SV.C_PROC_LEVEL);
2471: END IF;
2472: --
2473: -- Calling WSH_DELIVERY_DETAILS_PKG.CREATE_NEW_DETAIL_FROM_OLD() to create new delivery detail
2474: -- from old.
2484: --
2485: -- Debug Statements
2486: --
2487: IF l_debug_on THEN
2488: WSH_DEBUG_SV.log(l_module_name,'x_delivery_detail_id-new split ddid',x_delivery_detail_id);
2489: WSH_DEBUG_SV.log(l_module_name,'requested qty of record inserted is',p_dd_info.requested_quantity);
2490: WSH_DEBUG_SV.log(l_module_name,'received qty of record inserted is',p_dd_info.received_quantity);
2491: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2492: END IF;
2485: -- Debug Statements
2486: --
2487: IF l_debug_on THEN
2488: WSH_DEBUG_SV.log(l_module_name,'x_delivery_detail_id-new split ddid',x_delivery_detail_id);
2489: WSH_DEBUG_SV.log(l_module_name,'requested qty of record inserted is',p_dd_info.requested_quantity);
2490: WSH_DEBUG_SV.log(l_module_name,'received qty of record inserted is',p_dd_info.received_quantity);
2491: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2492: END IF;
2493: --
2486: --
2487: IF l_debug_on THEN
2488: WSH_DEBUG_SV.log(l_module_name,'x_delivery_detail_id-new split ddid',x_delivery_detail_id);
2489: WSH_DEBUG_SV.log(l_module_name,'requested qty of record inserted is',p_dd_info.requested_quantity);
2490: WSH_DEBUG_SV.log(l_module_name,'received qty of record inserted is',p_dd_info.received_quantity);
2491: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2492: END IF;
2493: --
2494: wsh_util_core.api_post_call(
2487: IF l_debug_on THEN
2488: WSH_DEBUG_SV.log(l_module_name,'x_delivery_detail_id-new split ddid',x_delivery_detail_id);
2489: WSH_DEBUG_SV.log(l_module_name,'requested qty of record inserted is',p_dd_info.requested_quantity);
2490: WSH_DEBUG_SV.log(l_module_name,'received qty of record inserted is',p_dd_info.received_quantity);
2491: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2492: END IF;
2493: --
2494: wsh_util_core.api_post_call(
2495: p_return_status => l_return_status,
2515: --
2516: -- Debug Statements
2517: --
2518: IF l_debug_on THEN
2519: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.CREATE_DELIVERY_ASSIGNMENTS',WSH_DEBUG_SV.C_PROC_LEVEL);
2520: END IF;
2521: --
2522: WSH_DELIVERY_DETAILS_PKG.Create_Delivery_Assignments(
2523: p_delivery_assignments_info => p_dd_assign_info,
2527: --
2528: -- Debug Statements
2529: --
2530: IF l_debug_on THEN
2531: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2532: END IF;
2533: --
2534: wsh_util_core.api_post_call(
2535: p_return_status => l_return_status,
2555: l_remaining_qty := l_remaining_qty + nvl(l_child_rtv_qty_to_consolidate,0);
2556: END IF;
2557:
2558: IF l_debug_on THEN
2559: WSH_DEBUG_SV.log(l_module_name,'l_remaining_qty',l_remaining_qty);
2560: WSH_DEBUG_SV.log(l_module_name,'l_child_rtv_qty_to_consolidate',l_child_rtv_qty_to_consolidate);
2561: END IF;
2562:
2563: --Reset k to the child index of present record.
2556: END IF;
2557:
2558: IF l_debug_on THEN
2559: WSH_DEBUG_SV.log(l_module_name,'l_remaining_qty',l_remaining_qty);
2560: WSH_DEBUG_SV.log(l_module_name,'l_child_rtv_qty_to_consolidate',l_child_rtv_qty_to_consolidate);
2561: END IF;
2562:
2563: --Reset k to the child index of present record.
2564: --}
2569: k := p_dd_rec.child_index_tab(k);
2570: END LOOP; --While loop ends here.
2571:
2572: IF l_debug_on THEN
2573: WSH_DEBUG_SV.logmsg(l_module_name,'outside child index recvursive loop');
2574: END IF;
2575:
2576: --Add Parent rtv quantity to remaining quantity for consolidation.
2577:
2577:
2578: l_remaining_qty := l_remaining_qty + nvl(p_dd_rec.returned_qty_tab(i),0);
2579:
2580: IF l_debug_on THEN
2581: WSH_DEBUG_SV.log(l_module_name,'l_remaining_qty',l_remaining_qty);
2582: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.returned_qty_tab(i)',p_dd_rec.returned_qty_tab(i));
2583: END IF;
2584:
2585: --Check if remaining quantity is greater than zero.
2578: l_remaining_qty := l_remaining_qty + nvl(p_dd_rec.returned_qty_tab(i),0);
2579:
2580: IF l_debug_on THEN
2581: WSH_DEBUG_SV.log(l_module_name,'l_remaining_qty',l_remaining_qty);
2582: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.returned_qty_tab(i)',p_dd_rec.returned_qty_tab(i));
2583: END IF;
2584:
2585: --Check if remaining quantity is greater than zero.
2586:
2588: -- Consolidate all the open quantities agains the same po line location to insert one
2589: -- record at the end into wsh_delivery_details.
2590: --{
2591: IF l_debug_on THEN
2592: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Consolidate_qty',WSH_DEBUG_SV.C_PROC_LEVEL);
2593: END IF;
2594: consolidate_qty(
2595: p_sli_qty_cache => l_sli_qty_cache,
2596: p_sli_qty_ext_cache => l_sli_qty_ext_cache,
2600: --
2601: -- Debug Statements
2602: --
2603: IF l_debug_on THEN
2604: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2605: END IF;
2606: --
2607: wsh_util_core.api_post_call(
2608: p_return_status => l_return_status,
2618: -- bulk update those records whose delivery detail id is not null in p_dd_rec.
2619: -- This is done by populating l_updae_dd_rec structure which is later used for bulk update.
2620: --{
2621: IF l_debug_on THEN
2622: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit populate_update_dd_rec',WSH_DEBUG_SV.C_PROC_LEVEL);
2623: END IF;
2624: populate_update_dd_rec(
2625: p_dd_rec => p_dd_rec,
2626: p_index => i,
2637: --
2638: -- Debug Statements
2639: --
2640: IF l_debug_on THEN
2641: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2642: END IF;
2643: --
2644: wsh_util_core.api_post_call(
2645: p_return_status => l_return_status,
2652: THEN
2653: --{ --- Added by NPARIKH
2654:
2655: IF l_debug_on THEN
2656: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.shipped_qty_tab(i)', p_dd_rec.shipped_qty_tab(i));
2657: END IF;
2658:
2659: --}
2660: ELSIF p_dd_rec.transaction_type = 'RECEIPT'
2662: THEN
2663: --{ --- Added by NPARIKH
2664:
2665: IF l_debug_on THEN
2666: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.received_qty_tab(i)', p_dd_rec.received_qty_tab(i));
2667: END IF;
2668:
2669: --}
2670: ELSE
2673: --
2674: -- Debug Statements
2675: --
2676: IF l_debug_on THEN
2677: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PO_CMG_PVT.POPULATE_ADDITIONAL_LINE_INFO',WSH_DEBUG_SV.C_PROC_LEVEL);
2678: END IF;
2679: --
2680: -- Calling WSH_PO_CMG_PVT.populate_additional_line_info
2681: WSH_PO_CMG_PVT.populate_additional_line_info(
2687: --
2688: -- Debug Statements
2689: --
2690: IF l_debug_on THEN
2691: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2692: END IF;
2693: --
2694: wsh_util_core.api_post_call(
2695: p_return_status => l_return_status,
2699: --
2700: -- Debug Statements
2701: --
2702: IF l_debug_on THEN
2703: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_BULK_PROCESS_PVT.BULK_INSERT_DETAILS - 2 ',WSH_DEBUG_SV.C_PROC_LEVEL);
2704: WSH_DEBUG_SV.log(l_module_name,'P_line_rec.requested_quantity is', P_line_rec.requested_quantity(p_dd_rec.shpmt_line_id_idx_tab(i)));
2705: WSH_DEBUG_SV.log(l_module_name,'P_line_rec.received_quantity is', P_line_rec.received_quantity(p_dd_rec.shpmt_line_id_idx_tab(i)));
2706: WSH_DEBUG_SV.log(l_module_name,'P_line_recs index is ', p_dd_rec.shpmt_line_id_idx_tab(i));
2707: END IF;
2700: -- Debug Statements
2701: --
2702: IF l_debug_on THEN
2703: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_BULK_PROCESS_PVT.BULK_INSERT_DETAILS - 2 ',WSH_DEBUG_SV.C_PROC_LEVEL);
2704: WSH_DEBUG_SV.log(l_module_name,'P_line_rec.requested_quantity is', P_line_rec.requested_quantity(p_dd_rec.shpmt_line_id_idx_tab(i)));
2705: WSH_DEBUG_SV.log(l_module_name,'P_line_rec.received_quantity is', P_line_rec.received_quantity(p_dd_rec.shpmt_line_id_idx_tab(i)));
2706: WSH_DEBUG_SV.log(l_module_name,'P_line_recs index is ', p_dd_rec.shpmt_line_id_idx_tab(i));
2707: END IF;
2708: --
2701: --
2702: IF l_debug_on THEN
2703: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_BULK_PROCESS_PVT.BULK_INSERT_DETAILS - 2 ',WSH_DEBUG_SV.C_PROC_LEVEL);
2704: WSH_DEBUG_SV.log(l_module_name,'P_line_rec.requested_quantity is', P_line_rec.requested_quantity(p_dd_rec.shpmt_line_id_idx_tab(i)));
2705: WSH_DEBUG_SV.log(l_module_name,'P_line_rec.received_quantity is', P_line_rec.received_quantity(p_dd_rec.shpmt_line_id_idx_tab(i)));
2706: WSH_DEBUG_SV.log(l_module_name,'P_line_recs index is ', p_dd_rec.shpmt_line_id_idx_tab(i));
2707: END IF;
2708: --
2709: l_action_prms.org_id := p_line_rec.org_id(p_dd_rec.shpmt_line_id_idx_tab(i));
2702: IF l_debug_on THEN
2703: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_BULK_PROCESS_PVT.BULK_INSERT_DETAILS - 2 ',WSH_DEBUG_SV.C_PROC_LEVEL);
2704: WSH_DEBUG_SV.log(l_module_name,'P_line_rec.requested_quantity is', P_line_rec.requested_quantity(p_dd_rec.shpmt_line_id_idx_tab(i)));
2705: WSH_DEBUG_SV.log(l_module_name,'P_line_rec.received_quantity is', P_line_rec.received_quantity(p_dd_rec.shpmt_line_id_idx_tab(i)));
2706: WSH_DEBUG_SV.log(l_module_name,'P_line_recs index is ', p_dd_rec.shpmt_line_id_idx_tab(i));
2707: END IF;
2708: --
2709: l_action_prms.org_id := p_line_rec.org_id(p_dd_rec.shpmt_line_id_idx_tab(i));
2710:
2713:
2714: p_line_rec.requested_quantity_uom2(p_dd_rec.shpmt_line_id_idx_tab(i)) :=
2715: p_dd_rec.requested_qty_uom2_tab(i);
2716: IF l_debug_on THEN
2717: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.requested_quantity_uom 3rd occurance ', p_dd_rec.requested_qty_uom_tab(i));
2718: END IF;
2719:
2720: -- Calling WSH_BULK_PROCESS_PVT.bulk_insert_details
2721:
2729: --
2730: -- Debug Statements
2731: --
2732: IF l_debug_on THEN
2733: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2734: END IF;
2735: --
2736: wsh_util_core.api_post_call(
2737: p_return_status => l_return_status,
2740:
2741: IF p_dd_rec.delivery_id_tab(i) is NOT NULL THEN
2742: --
2743: IF l_debug_on THEN
2744: WSH_DEBUG_SV.logmsg(l_module_name,'updating WDA-#2');
2745: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.delivery_detail_id(p_dd_rec.shpmt_line_id_idx_tab(i))',p_line_rec.delivery_detail_id(p_dd_rec.shpmt_line_id_idx_tab(i)));
2746: END IF;
2747: -- updating delivery assignments
2748:
2741: IF p_dd_rec.delivery_id_tab(i) is NOT NULL THEN
2742: --
2743: IF l_debug_on THEN
2744: WSH_DEBUG_SV.logmsg(l_module_name,'updating WDA-#2');
2745: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.delivery_detail_id(p_dd_rec.shpmt_line_id_idx_tab(i))',p_line_rec.delivery_detail_id(p_dd_rec.shpmt_line_id_idx_tab(i)));
2746: END IF;
2747: -- updating delivery assignments
2748:
2749: update wsh_delivery_assignments_v
2758: p_line_rec.delivery_detail_id(p_dd_rec.shpmt_line_id_idx_tab(i)):= NULL;
2759: p_dd_rec.last_update_date_tab(i) := NULL;
2760:
2761: IF l_debug_on THEN
2762: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit populate_update_dd_rec',WSH_DEBUG_SV.C_PROC_LEVEL);
2763: END IF;
2764:
2765: -- Once delviery detail is created, populate the l_update_dd_rec to do the bulk_update at the end
2766:
2778: --}
2779: p_dd_rec.process_asn_rcv_flag_tab(i) := 'X';
2780:
2781: IF l_debug_on THEN
2782: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.requested_qty_tab(i)', p_dd_rec.requested_qty_tab(i));
2783: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.received_qty_tab(i)', p_dd_rec.received_qty_tab(i));
2784: END IF;
2785: IF p_dd_rec.transaction_type = 'ASN' THEN
2786: --{
2779: p_dd_rec.process_asn_rcv_flag_tab(i) := 'X';
2780:
2781: IF l_debug_on THEN
2782: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.requested_qty_tab(i)', p_dd_rec.requested_qty_tab(i));
2783: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.received_qty_tab(i)', p_dd_rec.received_qty_tab(i));
2784: END IF;
2785: IF p_dd_rec.transaction_type = 'ASN' THEN
2786: --{
2787: l_pending_qty := (nvl(p_dd_rec.requested_qty_tab(i),0) -
2792: END IF;
2793: --]
2794:
2795: IF l_debug_on THEN
2796: WSH_DEBUG_SV.log(l_module_name,'l_pending_qty',l_pending_qty);
2797: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.returned_qty_tab(i)',p_dd_rec.returned_qty_tab(i));
2798: END IF;
2799:
2800: IF l_pending_qty > 0 THEN
2793: --]
2794:
2795: IF l_debug_on THEN
2796: WSH_DEBUG_SV.log(l_module_name,'l_pending_qty',l_pending_qty);
2797: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.returned_qty_tab(i)',p_dd_rec.returned_qty_tab(i));
2798: END IF;
2799:
2800: IF l_pending_qty > 0 THEN
2801: --{
2804: l_remaining_qty1 := nvl(p_dd_rec.returned_qty_tab(i),0);
2805: END IF;
2806: --}
2807: IF l_debug_on THEN
2808: WSH_DEBUG_SV.log(l_module_name,'l_remaining_qty1',l_remaining_qty1);
2809: END IF;
2810: --
2811: IF nvl(l_remaining_qty1,0) > 0 THEN
2812: -- Consolidate all the open quantities of the same po line location.
2811: IF nvl(l_remaining_qty1,0) > 0 THEN
2812: -- Consolidate all the open quantities of the same po line location.
2813: --{
2814: IF l_debug_on THEN
2815: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit consolidate_qty',WSH_DEBUG_SV.C_PROC_LEVEL);
2816: END IF;
2817: consolidate_qty(
2818: p_sli_qty_cache => l_sli_qty_cache,
2819: p_sli_qty_ext_cache => l_sli_qty_ext_cache,
2824: --
2825: -- Debug Statements
2826: --
2827: IF l_debug_on THEN
2828: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2829: END IF;
2830: --
2831: wsh_util_core.api_post_call(
2832: p_return_status => l_return_status,
2840: --{ --NNP-WV
2841: --
2842: --
2843: IF l_debug_on THEN
2844: WSH_DEBUG_SV.logmsg(l_module_name, 'l_line_rec:wv_frozen_flag '||l_line_rec.wv_frozen_flag);
2845: WSH_DEBUG_SV.logmsg(l_module_name, 'l_diff_dd-final:l_net_wt '||l_diff_dd_net_weight||' l_gross_wt '||l_diff_dd_gross_weight||' l_vol '||l_diff_dd_volume);
2846: END IF;
2847: --
2848: IF l_line_rec.wv_frozen_flag = 'Y'
2841: --
2842: --
2843: IF l_debug_on THEN
2844: WSH_DEBUG_SV.logmsg(l_module_name, 'l_line_rec:wv_frozen_flag '||l_line_rec.wv_frozen_flag);
2845: WSH_DEBUG_SV.logmsg(l_module_name, 'l_diff_dd-final:l_net_wt '||l_diff_dd_net_weight||' l_gross_wt '||l_diff_dd_gross_weight||' l_vol '||l_diff_dd_volume);
2846: END IF;
2847: --
2848: IF l_line_rec.wv_frozen_flag = 'Y'
2849: THEN
2859: IF l_line_rec.lpn_wv_frozen_flag <> 'Y'
2860: THEN
2861: --{
2862: IF l_debug_on THEN
2863: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.processWeightVolume',WSH_DEBUG_SV.C_PROC_LEVEL);
2864: END IF;
2865: --
2866: WSH_ASN_RECEIPT_PVT.processWeightVolume
2867: (
2878: x_return_status => l_return_status
2879: );
2880: --
2881: IF l_debug_on THEN
2882: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2883: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2884: END IF;
2885: --
2886: wsh_util_core.api_post_call
2879: );
2880: --
2881: IF l_debug_on THEN
2882: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2883: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2884: END IF;
2885: --
2886: wsh_util_core.api_post_call
2887: (
2896: AND l_line_rec.dlvy_wv_frozen_flag <> 'Y'
2897: THEN
2898: --{
2899: IF l_debug_on THEN
2900: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.processWeightVolume',WSH_DEBUG_SV.C_PROC_LEVEL);
2901: END IF;
2902: --
2903: WSH_ASN_RECEIPT_PVT.processWeightVolume
2904: (
2915: x_return_status => l_return_status
2916: );
2917: --
2918: IF l_debug_on THEN
2919: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2920: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2921: END IF;
2922: --
2923: wsh_util_core.api_post_call
2916: );
2917: --
2918: IF l_debug_on THEN
2919: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2920: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2921: END IF;
2922: --
2923: wsh_util_core.api_post_call
2924: (
3012:
3013:
3014:
3015: IF l_debug_on THEN
3016: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.transaction_type ',p_dd_rec.transaction_type);
3017: WSH_DEBUG_SV.log(l_module_name,'$$$$$$$$$$$$ ',l_return_status);
3018: WSH_DEBUG_SV.log(l_module_name,'delivery_id ',l_local_dd_rec(kk).delivery_id);
3019: WSH_DEBUG_SV.log(l_module_name,'del_detail_id',l_local_dd_rec(kk).del_detail_id);
3020: WSH_DEBUG_SV.log(l_module_name,'index ',kk);
3013:
3014:
3015: IF l_debug_on THEN
3016: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.transaction_type ',p_dd_rec.transaction_type);
3017: WSH_DEBUG_SV.log(l_module_name,'$$$$$$$$$$$$ ',l_return_status);
3018: WSH_DEBUG_SV.log(l_module_name,'delivery_id ',l_local_dd_rec(kk).delivery_id);
3019: WSH_DEBUG_SV.log(l_module_name,'del_detail_id',l_local_dd_rec(kk).del_detail_id);
3020: WSH_DEBUG_SV.log(l_module_name,'index ',kk);
3021: WSH_DEBUG_SV.log(l_module_name,'trip_id ',l_local_dd_rec(kk).trip_id);
3014:
3015: IF l_debug_on THEN
3016: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.transaction_type ',p_dd_rec.transaction_type);
3017: WSH_DEBUG_SV.log(l_module_name,'$$$$$$$$$$$$ ',l_return_status);
3018: WSH_DEBUG_SV.log(l_module_name,'delivery_id ',l_local_dd_rec(kk).delivery_id);
3019: WSH_DEBUG_SV.log(l_module_name,'del_detail_id',l_local_dd_rec(kk).del_detail_id);
3020: WSH_DEBUG_SV.log(l_module_name,'index ',kk);
3021: WSH_DEBUG_SV.log(l_module_name,'trip_id ',l_local_dd_rec(kk).trip_id);
3022: END IF;
3015: IF l_debug_on THEN
3016: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.transaction_type ',p_dd_rec.transaction_type);
3017: WSH_DEBUG_SV.log(l_module_name,'$$$$$$$$$$$$ ',l_return_status);
3018: WSH_DEBUG_SV.log(l_module_name,'delivery_id ',l_local_dd_rec(kk).delivery_id);
3019: WSH_DEBUG_SV.log(l_module_name,'del_detail_id',l_local_dd_rec(kk).del_detail_id);
3020: WSH_DEBUG_SV.log(l_module_name,'index ',kk);
3021: WSH_DEBUG_SV.log(l_module_name,'trip_id ',l_local_dd_rec(kk).trip_id);
3022: END IF;
3023:
3016: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.transaction_type ',p_dd_rec.transaction_type);
3017: WSH_DEBUG_SV.log(l_module_name,'$$$$$$$$$$$$ ',l_return_status);
3018: WSH_DEBUG_SV.log(l_module_name,'delivery_id ',l_local_dd_rec(kk).delivery_id);
3019: WSH_DEBUG_SV.log(l_module_name,'del_detail_id',l_local_dd_rec(kk).del_detail_id);
3020: WSH_DEBUG_SV.log(l_module_name,'index ',kk);
3021: WSH_DEBUG_SV.log(l_module_name,'trip_id ',l_local_dd_rec(kk).trip_id);
3022: END IF;
3023:
3024: IF p_dd_rec.transaction_type = 'RECEIPT'
3017: WSH_DEBUG_SV.log(l_module_name,'$$$$$$$$$$$$ ',l_return_status);
3018: WSH_DEBUG_SV.log(l_module_name,'delivery_id ',l_local_dd_rec(kk).delivery_id);
3019: WSH_DEBUG_SV.log(l_module_name,'del_detail_id',l_local_dd_rec(kk).del_detail_id);
3020: WSH_DEBUG_SV.log(l_module_name,'index ',kk);
3021: WSH_DEBUG_SV.log(l_module_name,'trip_id ',l_local_dd_rec(kk).trip_id);
3022: END IF;
3023:
3024: IF p_dd_rec.transaction_type = 'RECEIPT'
3025: THEN
3033: END LOOP;
3034: --
3035: --
3036: IF l_debug_on THEN
3037: WSH_DEBUG_SV.log(l_module_name,'l_local_dd_rec(kk).del_detail_id ',l_local_dd_rec(kk).del_detail_id);
3038: WSH_DEBUG_SV.log(l_module_name,'l_parent_wdd_id ',l_parent_wdd_id);
3039: END IF;
3040: --
3041: --
3034: --
3035: --
3036: IF l_debug_on THEN
3037: WSH_DEBUG_SV.log(l_module_name,'l_local_dd_rec(kk).del_detail_id ',l_local_dd_rec(kk).del_detail_id);
3038: WSH_DEBUG_SV.log(l_module_name,'l_parent_wdd_id ',l_parent_wdd_id);
3039: END IF;
3040: --
3041: --
3042: IF l_parent_wdd_id IS NOT NULL
3046: --}
3047: END IF;
3048:
3049: IF l_debug_on THEN
3050: WSH_DEBUG_SV.log(l_module_name,'l_local_dd_rec(kk).lpn_id ',l_local_dd_rec(kk).lpn_id);
3051: END IF;
3052:
3053: IF l_local_dd_rec(kk).lpn_id IS NOT NULL
3054: THEN
3055: --
3056: -- Debug Statements
3057: --
3058: IF l_debug_on THEN
3059: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_UTIL_PKG.GET_OUTERMOST_LPN',WSH_DEBUG_SV.C_PROC_LEVEL);
3060: END IF;
3061: --
3062: -- Goods can me packed in multiple containers.
3063: -- So the lpn id that is passed need not necessary be the outermost lpn.
3073: --
3074: -- Debug Statements
3075: --
3076: IF l_debug_on THEN
3077: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3078: END IF;
3079: --
3080: wsh_util_core.api_post_call(
3081: p_return_status => l_return_status,
3087: l_local_dd_rec(kk).lpn_name := l_outermost_lpn_name;
3088: END IF;
3089:
3090: IF l_debug_on THEN
3091: WSH_DEBUG_SV.log(l_module_name,'l_local_dd_rec(kk).lpn_id ',l_local_dd_rec(kk).lpn_id);
3092: WSH_DEBUG_SV.log(l_module_name,'l_local_dd_rec(kk).lpn_name ',l_local_dd_rec(kk).lpn_name);
3093: END IF;
3094:
3095: END IF;
3088: END IF;
3089:
3090: IF l_debug_on THEN
3091: WSH_DEBUG_SV.log(l_module_name,'l_local_dd_rec(kk).lpn_id ',l_local_dd_rec(kk).lpn_id);
3092: WSH_DEBUG_SV.log(l_module_name,'l_local_dd_rec(kk).lpn_name ',l_local_dd_rec(kk).lpn_name);
3093: END IF;
3094:
3095: END IF;
3096:
3104: --
3105: -- Debug Statements
3106: --
3107: IF l_debug_on THEN
3108: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_index_dd_ids_cache',WSH_DEBUG_SV.C_PROC_LEVEL);
3109: END IF;
3110: --
3111: wsh_util_core.get_cached_value(
3112: p_cache_tbl => l_index_dd_ids_cache,
3137: --
3138: -- Debug Statements
3139: --
3140: IF l_debug_on THEN
3141: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_index_del_ids_cache',WSH_DEBUG_SV.C_PROC_LEVEL);
3142: END IF;
3143: --
3144: wsh_util_core.get_cached_value(
3145: p_cache_tbl => l_index_del_ids_cache,
3160: --
3161: -- Debug Statements
3162: --
3163: IF l_debug_on THEN
3164: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_del_ids_del_ids_cache',WSH_DEBUG_SV.C_PROC_LEVEL);
3165: END IF;
3166: --
3167: wsh_util_core.get_cached_value(
3168: p_cache_tbl => l_del_ids_del_ids_cache,
3191: --
3192: -- Debug Statements
3193: --
3194: IF l_debug_on THEN
3195: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-l_del_reprice_tbl',WSH_DEBUG_SV.C_PROC_LEVEL);
3196: END IF;
3197: --
3198: wsh_util_core.get_cached_value(
3199: p_cache_tbl => l_del_reprice_tbl,
3236: --
3237: -- Debug Statements
3238: --
3239: IF l_debug_on THEN
3240: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
3241: END IF;
3242: --
3243: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
3244: p_entity_type => 'DELIVERY',
3249: --
3250: -- Debug Statements
3251: --
3252: IF l_debug_on THEN
3253: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3254: END IF;
3255: --
3256: wsh_util_core.api_post_call(
3257: p_return_status => l_return_status,
3260:
3261:
3262:
3263: IF l_debug_on THEN
3264: WSH_DEBUG_SV.logmsg(l_module_name,'UPDATING WDD-Main');
3265: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id.COUNT',l_update_dd_rec.delivery_detail_id.COUNT);
3266: l_itemp := l_update_dd_rec.delivery_detail_id.first;
3267: while l_itemp is not null
3268: loop
3261:
3262:
3263: IF l_debug_on THEN
3264: WSH_DEBUG_SV.logmsg(l_module_name,'UPDATING WDD-Main');
3265: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id.COUNT',l_update_dd_rec.delivery_detail_id.COUNT);
3266: l_itemp := l_update_dd_rec.delivery_detail_id.first;
3267: while l_itemp is not null
3268: loop
3269: WSH_DEBUG_SV.log(l_module_name,'l_itemp',l_itemp);
3265: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id.COUNT',l_update_dd_rec.delivery_detail_id.COUNT);
3266: l_itemp := l_update_dd_rec.delivery_detail_id.first;
3267: while l_itemp is not null
3268: loop
3269: WSH_DEBUG_SV.log(l_module_name,'l_itemp',l_itemp);
3270: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.requested_quantity(l_itemp)',l_update_dd_rec.requested_quantity(l_itemp));
3271: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.received_quantity(l_itemp)',l_update_dd_rec.received_quantity(l_itemp));
3272: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id(l_itemp)',l_update_dd_rec.delivery_detail_id(l_itemp));
3273: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status(l_itemp)',l_update_dd_rec.released_status(l_itemp));
3266: l_itemp := l_update_dd_rec.delivery_detail_id.first;
3267: while l_itemp is not null
3268: loop
3269: WSH_DEBUG_SV.log(l_module_name,'l_itemp',l_itemp);
3270: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.requested_quantity(l_itemp)',l_update_dd_rec.requested_quantity(l_itemp));
3271: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.received_quantity(l_itemp)',l_update_dd_rec.received_quantity(l_itemp));
3272: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id(l_itemp)',l_update_dd_rec.delivery_detail_id(l_itemp));
3273: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status(l_itemp)',l_update_dd_rec.released_status(l_itemp));
3274: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status_db(l_itemp)',l_update_dd_rec.released_status_db(l_itemp));
3267: while l_itemp is not null
3268: loop
3269: WSH_DEBUG_SV.log(l_module_name,'l_itemp',l_itemp);
3270: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.requested_quantity(l_itemp)',l_update_dd_rec.requested_quantity(l_itemp));
3271: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.received_quantity(l_itemp)',l_update_dd_rec.received_quantity(l_itemp));
3272: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id(l_itemp)',l_update_dd_rec.delivery_detail_id(l_itemp));
3273: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status(l_itemp)',l_update_dd_rec.released_status(l_itemp));
3274: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status_db(l_itemp)',l_update_dd_rec.released_status_db(l_itemp));
3275: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.gross_weight(l_itemp)',l_update_dd_rec.gross_weight(l_itemp));
3268: loop
3269: WSH_DEBUG_SV.log(l_module_name,'l_itemp',l_itemp);
3270: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.requested_quantity(l_itemp)',l_update_dd_rec.requested_quantity(l_itemp));
3271: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.received_quantity(l_itemp)',l_update_dd_rec.received_quantity(l_itemp));
3272: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id(l_itemp)',l_update_dd_rec.delivery_detail_id(l_itemp));
3273: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status(l_itemp)',l_update_dd_rec.released_status(l_itemp));
3274: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status_db(l_itemp)',l_update_dd_rec.released_status_db(l_itemp));
3275: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.gross_weight(l_itemp)',l_update_dd_rec.gross_weight(l_itemp));
3276: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.net_weight(l_itemp)',l_update_dd_rec.net_weight(l_itemp));
3269: WSH_DEBUG_SV.log(l_module_name,'l_itemp',l_itemp);
3270: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.requested_quantity(l_itemp)',l_update_dd_rec.requested_quantity(l_itemp));
3271: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.received_quantity(l_itemp)',l_update_dd_rec.received_quantity(l_itemp));
3272: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id(l_itemp)',l_update_dd_rec.delivery_detail_id(l_itemp));
3273: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status(l_itemp)',l_update_dd_rec.released_status(l_itemp));
3274: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status_db(l_itemp)',l_update_dd_rec.released_status_db(l_itemp));
3275: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.gross_weight(l_itemp)',l_update_dd_rec.gross_weight(l_itemp));
3276: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.net_weight(l_itemp)',l_update_dd_rec.net_weight(l_itemp));
3277: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.volume(l_itemp)',l_update_dd_rec.volume(l_itemp));
3270: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.requested_quantity(l_itemp)',l_update_dd_rec.requested_quantity(l_itemp));
3271: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.received_quantity(l_itemp)',l_update_dd_rec.received_quantity(l_itemp));
3272: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id(l_itemp)',l_update_dd_rec.delivery_detail_id(l_itemp));
3273: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status(l_itemp)',l_update_dd_rec.released_status(l_itemp));
3274: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status_db(l_itemp)',l_update_dd_rec.released_status_db(l_itemp));
3275: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.gross_weight(l_itemp)',l_update_dd_rec.gross_weight(l_itemp));
3276: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.net_weight(l_itemp)',l_update_dd_rec.net_weight(l_itemp));
3277: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.volume(l_itemp)',l_update_dd_rec.volume(l_itemp));
3278: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.ship_from_location_id(l_itemp)',l_update_dd_rec.ship_from_location_id(l_itemp));
3271: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.received_quantity(l_itemp)',l_update_dd_rec.received_quantity(l_itemp));
3272: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id(l_itemp)',l_update_dd_rec.delivery_detail_id(l_itemp));
3273: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status(l_itemp)',l_update_dd_rec.released_status(l_itemp));
3274: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status_db(l_itemp)',l_update_dd_rec.released_status_db(l_itemp));
3275: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.gross_weight(l_itemp)',l_update_dd_rec.gross_weight(l_itemp));
3276: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.net_weight(l_itemp)',l_update_dd_rec.net_weight(l_itemp));
3277: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.volume(l_itemp)',l_update_dd_rec.volume(l_itemp));
3278: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.ship_from_location_id(l_itemp)',l_update_dd_rec.ship_from_location_id(l_itemp));
3279: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.last_update_date(l_itemp)',l_update_dd_rec.last_update_date(l_itemp));
3272: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id(l_itemp)',l_update_dd_rec.delivery_detail_id(l_itemp));
3273: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status(l_itemp)',l_update_dd_rec.released_status(l_itemp));
3274: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status_db(l_itemp)',l_update_dd_rec.released_status_db(l_itemp));
3275: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.gross_weight(l_itemp)',l_update_dd_rec.gross_weight(l_itemp));
3276: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.net_weight(l_itemp)',l_update_dd_rec.net_weight(l_itemp));
3277: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.volume(l_itemp)',l_update_dd_rec.volume(l_itemp));
3278: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.ship_from_location_id(l_itemp)',l_update_dd_rec.ship_from_location_id(l_itemp));
3279: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.last_update_date(l_itemp)',l_update_dd_rec.last_update_date(l_itemp));
3280: l_itemp := l_update_dd_rec.delivery_detail_id.next(l_itemp);
3273: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status(l_itemp)',l_update_dd_rec.released_status(l_itemp));
3274: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status_db(l_itemp)',l_update_dd_rec.released_status_db(l_itemp));
3275: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.gross_weight(l_itemp)',l_update_dd_rec.gross_weight(l_itemp));
3276: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.net_weight(l_itemp)',l_update_dd_rec.net_weight(l_itemp));
3277: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.volume(l_itemp)',l_update_dd_rec.volume(l_itemp));
3278: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.ship_from_location_id(l_itemp)',l_update_dd_rec.ship_from_location_id(l_itemp));
3279: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.last_update_date(l_itemp)',l_update_dd_rec.last_update_date(l_itemp));
3280: l_itemp := l_update_dd_rec.delivery_detail_id.next(l_itemp);
3281: end loop;
3274: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.released_status_db(l_itemp)',l_update_dd_rec.released_status_db(l_itemp));
3275: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.gross_weight(l_itemp)',l_update_dd_rec.gross_weight(l_itemp));
3276: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.net_weight(l_itemp)',l_update_dd_rec.net_weight(l_itemp));
3277: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.volume(l_itemp)',l_update_dd_rec.volume(l_itemp));
3278: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.ship_from_location_id(l_itemp)',l_update_dd_rec.ship_from_location_id(l_itemp));
3279: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.last_update_date(l_itemp)',l_update_dd_rec.last_update_date(l_itemp));
3280: l_itemp := l_update_dd_rec.delivery_detail_id.next(l_itemp);
3281: end loop;
3282: END IF;
3275: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.gross_weight(l_itemp)',l_update_dd_rec.gross_weight(l_itemp));
3276: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.net_weight(l_itemp)',l_update_dd_rec.net_weight(l_itemp));
3277: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.volume(l_itemp)',l_update_dd_rec.volume(l_itemp));
3278: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.ship_from_location_id(l_itemp)',l_update_dd_rec.ship_from_location_id(l_itemp));
3279: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.last_update_date(l_itemp)',l_update_dd_rec.last_update_date(l_itemp));
3280: l_itemp := l_update_dd_rec.delivery_detail_id.next(l_itemp);
3281: end loop;
3282: END IF;
3283: --
3314: RETURNING delivery_detail_id BULK COLLECT INTO l_detail_tab;
3315:
3316: IF SQL%ROWCOUNT <> l_update_dd_rec.delivery_detail_id.COUNT THEN
3317: IF l_debug_on THEN
3318: WSH_DEBUG_SV.logmsg(l_module_name,'NUMBER OF ROWS UPDATED IS NOT EQUAL TO THE NUMBER OF ROWS THAT HAD TO BE BULK UPDATED');
3319: WSH_DEBUG_SV.log(l_module_name,'SQL%ROWCOUNT',SQL%ROWCOUNT);
3320: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id.COUNT',l_update_dd_rec.delivery_detail_id.COUNT);
3321: END IF;
3322:
3315:
3316: IF SQL%ROWCOUNT <> l_update_dd_rec.delivery_detail_id.COUNT THEN
3317: IF l_debug_on THEN
3318: WSH_DEBUG_SV.logmsg(l_module_name,'NUMBER OF ROWS UPDATED IS NOT EQUAL TO THE NUMBER OF ROWS THAT HAD TO BE BULK UPDATED');
3319: WSH_DEBUG_SV.log(l_module_name,'SQL%ROWCOUNT',SQL%ROWCOUNT);
3320: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id.COUNT',l_update_dd_rec.delivery_detail_id.COUNT);
3321: END IF;
3322:
3323: FND_MESSAGE.SET_NAME('WSH','WSH_DELIVERY_LINES_CHANGED');
3316: IF SQL%ROWCOUNT <> l_update_dd_rec.delivery_detail_id.COUNT THEN
3317: IF l_debug_on THEN
3318: WSH_DEBUG_SV.logmsg(l_module_name,'NUMBER OF ROWS UPDATED IS NOT EQUAL TO THE NUMBER OF ROWS THAT HAD TO BE BULK UPDATED');
3319: WSH_DEBUG_SV.log(l_module_name,'SQL%ROWCOUNT',SQL%ROWCOUNT);
3320: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id.COUNT',l_update_dd_rec.delivery_detail_id.COUNT);
3321: END IF;
3322:
3323: FND_MESSAGE.SET_NAME('WSH','WSH_DELIVERY_LINES_CHANGED');
3324: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,l_module_name);
3329: -- Update of wsh_delivery_details where requested_quantity/released_status
3330: -- are changed, call DBI API after the update.
3331: -- This API will also check for DBI Installed or not
3332: IF l_debug_on THEN
3333: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API. delivery details count l_detail_tab : ',l_detail_tab.count);
3334: END IF;
3335: WSH_INTEGRATION.DBI_Update_Detail_Log
3336: (p_delivery_detail_id_tab => l_detail_tab,
3337: p_dml_type => 'UPDATE',
3337: p_dml_type => 'UPDATE',
3338: x_return_status => l_dbi_rs);
3339:
3340: IF l_debug_on THEN
3341: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
3342: END IF;
3343: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3344: x_return_status := l_dbi_rs;
3345: -- just pass this return status to caller API
3343: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3344: x_return_status := l_dbi_rs;
3345: -- just pass this return status to caller API
3346: IF l_debug_on THEN
3347: WSH_DEBUG_SV.logmsg(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
3348: WSH_DEBUG_SV.pop(l_module_name);
3349: END IF;
3350: ROLLBACK;
3351: return;
3344: x_return_status := l_dbi_rs;
3345: -- just pass this return status to caller API
3346: IF l_debug_on THEN
3347: WSH_DEBUG_SV.logmsg(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
3348: WSH_DEBUG_SV.pop(l_module_name);
3349: END IF;
3350: ROLLBACK;
3351: return;
3352: END IF;
3354: -- End of Code for DBI Project
3355: --
3356:
3357: IF l_debug_on THEN
3358: WSH_DEBUG_SV.log(l_module_name,'l_sli_qty_cache.COUNT',l_sli_qty_cache.COUNT);
3359: END IF;
3360: --
3361: IF l_sli_qty_cache.COUNT > 0
3362: OR l_sli_qty_ext_cache.COUNT > 0 THEN
3366: p_line_rec.consolidate_quantity.EXTEND(p_line_rec.po_shipment_line_id.COUNT);
3367:
3368: l_index := p_line_rec.po_shipment_line_id.FIRST;
3369: IF l_debug_on THEN
3370: WSH_DEBUG_SV.log(l_module_name,'l_index',l_index);
3371: END IF;
3372: WHILE l_index IS NOT NULL
3373: LOOP
3374: l_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3375: --
3376: -- Debug Statements
3377: --
3378: IF l_debug_on THEN
3379: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE',WSH_DEBUG_SV.C_PROC_LEVEL);
3380: END IF;
3381: --
3382: wsh_util_core.get_cached_value(
3383: p_cache_tbl => l_sli_qty_cache,
3387: p_action => 'GET',
3388: x_return_status => l_return_status );
3389:
3390: IF l_debug_on THEN
3391: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.po_shipment_line_id(l_index)',p_line_rec.po_shipment_line_id(l_index));
3392: WSH_DEBUG_SV.log(l_module_name,'sli_qty_cache: l_quantity',l_quantity);
3393: END IF;
3394: --
3395: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3388: x_return_status => l_return_status );
3389:
3390: IF l_debug_on THEN
3391: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.po_shipment_line_id(l_index)',p_line_rec.po_shipment_line_id(l_index));
3392: WSH_DEBUG_SV.log(l_module_name,'sli_qty_cache: l_quantity',l_quantity);
3393: END IF;
3394: --
3395: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3396:
3394: --
3395: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3396:
3397: IF l_debug_on THEN
3398: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE',WSH_DEBUG_SV.C_PROC_LEVEL);
3399: END IF;
3400: --
3401: wsh_util_core.get_cached_value(
3402: p_cache_tbl => l_sli_sli_cache,
3413:
3414: p_line_rec.consolidate_quantity(l_index) := l_quantity;
3415:
3416: IF l_debug_on THEN
3417: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE',WSH_DEBUG_SV.C_PROC_LEVEL);
3418: END IF;
3419: --
3420: wsh_util_core.get_cached_value(
3421: p_cache_tbl => l_sli_sli_cache,
3457: p_line_rec.requested_quantity_uom2(l_index)
3458: := l_src_qty_uom2;
3459:
3460: IF l_debug_on THEN
3461: WSH_DEBUG_SV.log(l_module_name,'l_ratio',l_ratio);
3462: WSH_DEBUG_SV.log(l_module_name,'l_src_qty2',l_src_qty2);
3463: WSH_DEBUG_SV.log(l_module_name,'l_sum_req_qty',l_sum_req_qty);
3464: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.requested_quantity2(l_index)',p_line_rec.requested_quantity2(l_index));
3465: WSH_DEBUG_SV.log(l_module_name,'l_src_qty_uom2',l_src_qty_uom2);
3458: := l_src_qty_uom2;
3459:
3460: IF l_debug_on THEN
3461: WSH_DEBUG_SV.log(l_module_name,'l_ratio',l_ratio);
3462: WSH_DEBUG_SV.log(l_module_name,'l_src_qty2',l_src_qty2);
3463: WSH_DEBUG_SV.log(l_module_name,'l_sum_req_qty',l_sum_req_qty);
3464: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.requested_quantity2(l_index)',p_line_rec.requested_quantity2(l_index));
3465: WSH_DEBUG_SV.log(l_module_name,'l_src_qty_uom2',l_src_qty_uom2);
3466: END IF;
3459:
3460: IF l_debug_on THEN
3461: WSH_DEBUG_SV.log(l_module_name,'l_ratio',l_ratio);
3462: WSH_DEBUG_SV.log(l_module_name,'l_src_qty2',l_src_qty2);
3463: WSH_DEBUG_SV.log(l_module_name,'l_sum_req_qty',l_sum_req_qty);
3464: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.requested_quantity2(l_index)',p_line_rec.requested_quantity2(l_index));
3465: WSH_DEBUG_SV.log(l_module_name,'l_src_qty_uom2',l_src_qty_uom2);
3466: END IF;
3467: --
3460: IF l_debug_on THEN
3461: WSH_DEBUG_SV.log(l_module_name,'l_ratio',l_ratio);
3462: WSH_DEBUG_SV.log(l_module_name,'l_src_qty2',l_src_qty2);
3463: WSH_DEBUG_SV.log(l_module_name,'l_sum_req_qty',l_sum_req_qty);
3464: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.requested_quantity2(l_index)',p_line_rec.requested_quantity2(l_index));
3465: WSH_DEBUG_SV.log(l_module_name,'l_src_qty_uom2',l_src_qty_uom2);
3466: END IF;
3467: --
3468:
3461: WSH_DEBUG_SV.log(l_module_name,'l_ratio',l_ratio);
3462: WSH_DEBUG_SV.log(l_module_name,'l_src_qty2',l_src_qty2);
3463: WSH_DEBUG_SV.log(l_module_name,'l_sum_req_qty',l_sum_req_qty);
3464: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.requested_quantity2(l_index)',p_line_rec.requested_quantity2(l_index));
3465: WSH_DEBUG_SV.log(l_module_name,'l_src_qty_uom2',l_src_qty_uom2);
3466: END IF;
3467: --
3468:
3469: l_index := p_line_rec.po_shipment_line_id.NEXT(l_index);
3474: END IF;
3475: --}
3476:
3477: IF l_debug_on THEN
3478: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.INITIALIZE_TXNS',WSH_DEBUG_SV.C_PROC_LEVEL);
3479: END IF;
3480:
3481:
3482: Initialize_txns(
3495: --
3496: -- Debug Statements
3497: --
3498: IF l_debug_on THEN
3499: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3500: END IF;
3501: --
3502: wsh_util_core.api_post_call(
3503: p_return_status => l_return_status,
3520: --
3521: -- Debug Statements
3522: --
3523: IF l_debug_on THEN
3524: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PO_CMG_PVT.REAPPROVE_PO',WSH_DEBUG_SV.C_PROC_LEVEL);
3525: END IF;
3526: --
3527: WSH_PO_CMG_PVT.Reapprove_PO(
3528: p_line_rec => p_line_rec,
3534: --
3535: -- Debug Statements
3536: --
3537: IF l_debug_on THEN
3538: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3539: END IF;
3540: --
3541: wsh_util_core.api_post_call(
3542: p_return_status => l_return_status,
3546: END IF;
3547: --}
3548:
3549: IF l_debug_on THEN
3550: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.RECONFIGURE_DEL_TRIPS',WSH_DEBUG_SV.C_PROC_LEVEL);
3551: END IF;
3552:
3553:
3554: Reconfigure_del_trips(
3572: --
3573: -- Debug Statements
3574: --
3575: IF l_debug_on THEN
3576: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3577: END IF;
3578: --
3579: wsh_util_core.api_post_call(
3580: p_return_status => l_return_status,
3586:
3587: IF p_action_prms.caller not like 'WSH_IB_MATCH%' THEN
3588: --{
3589: IF l_debug_on THEN
3590: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_TXN_HISTORY_PKG.post_process',WSH_DEBUG_SV.C_PROC_LEVEL);
3591: END IF;
3592:
3593: WSH_INBOUND_TXN_HISTORY_PKG.post_process(
3594: p_shipment_header_id => p_shipment_header_id,
3608:
3609: For h in p_line_rec.header_id.FIRST..p_line_rec.header_id.LAST
3610: LOOP
3611: IF l_debug_on THEN
3612: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.closed_flag(h)',p_line_rec.closed_flag(h));
3613: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.closed_code(h)',p_line_rec.closed_code(h));
3614: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.cancelled_flag(h)',p_line_rec.cancelled_flag(h));
3615: END IF;
3616: --
3609: For h in p_line_rec.header_id.FIRST..p_line_rec.header_id.LAST
3610: LOOP
3611: IF l_debug_on THEN
3612: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.closed_flag(h)',p_line_rec.closed_flag(h));
3613: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.closed_code(h)',p_line_rec.closed_code(h));
3614: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.cancelled_flag(h)',p_line_rec.cancelled_flag(h));
3615: END IF;
3616: --
3617: -- If PO has done a cancel/close operation on a particular record, and due to
3610: LOOP
3611: IF l_debug_on THEN
3612: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.closed_flag(h)',p_line_rec.closed_flag(h));
3613: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.closed_code(h)',p_line_rec.closed_code(h));
3614: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.cancelled_flag(h)',p_line_rec.cancelled_flag(h));
3615: END IF;
3616: --
3617: -- If PO has done a cancel/close operation on a particular record, and due to
3618: -- the fact that the corresponding transaction was in pending status, it could not
3665: --
3666: -- Debug Statements
3667: --
3668: IF l_debug_on THEN
3669: WSH_DEBUG_SV.pop(l_module_name);
3670: END IF;
3671: --
3672:
3673: IF l_num_errors > 0 THEN
3686: --
3687: -- Debug Statements
3688: --
3689: IF l_debug_on THEN
3690: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3691: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3692: END IF;
3693: --
3694: WHEN OTHERS THEN
3687: -- Debug Statements
3688: --
3689: IF l_debug_on THEN
3690: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3691: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3692: END IF;
3693: --
3694: WHEN OTHERS THEN
3695: ROLLBACK TO Process_Matched_Txns_PVT;
3700: --
3701: -- Debug Statements
3702: --
3703: IF l_debug_on THEN
3704: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3705: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3706: END IF;
3707: --
3708: END Process_Matched_Txns;
3701: -- Debug Statements
3702: --
3703: IF l_debug_on THEN
3704: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3705: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3706: END IF;
3707: --
3708: END Process_Matched_Txns;
3709:
3854: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3855: --
3856: IF l_debug_on IS NULL
3857: THEN
3858: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3859: END IF;
3860: --
3861: --
3862: -- Debug Statements
3861: --
3862: -- Debug Statements
3863: --
3864: IF l_debug_on THEN
3865: WSH_DEBUG_SV.push(l_module_name);
3866: --
3867: WSH_DEBUG_SV.log(l_module_name,'P_HEADER_ID',P_HEADER_ID);
3868: END IF;
3869: --
3863: --
3864: IF l_debug_on THEN
3865: WSH_DEBUG_SV.push(l_module_name);
3866: --
3867: WSH_DEBUG_SV.log(l_module_name,'P_HEADER_ID',P_HEADER_ID);
3868: END IF;
3869: --
3870: SAVEPOINT Cancel_ASN_PVT;
3871:
3871:
3872: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3873:
3874: IF l_debug_on THEN
3875: WSH_DEBUG_SV.logmsg(l_module_name,'updating WDD');
3876: END IF;
3877: --
3878: -- Updating the all the records in wsh_delivery_details
3879: -- corresponding to the shipment_header_id that is being passed
3907: FOR i in 1..l_dd_list.delivery_detail_id.count LOOP
3908: l_detail_tab(i) := l_dd_list.delivery_detail_id(i) ;
3909: END LOOP;
3910: IF l_debug_on THEN
3911: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API. delivery detail l_detail_tab count : ',l_detail_tab.count);
3912: END IF;
3913: WSH_INTEGRATION.DBI_Update_Detail_Log
3914: (p_delivery_detail_id_tab => l_detail_tab,
3915: p_dml_type => 'UPDATE',
3914: (p_delivery_detail_id_tab => l_detail_tab,
3915: p_dml_type => 'UPDATE',
3916: x_return_status => l_dbi_rs);
3917: IF l_debug_on THEN
3918: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
3919: END IF;
3920: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3921: x_return_status := l_dbi_rs;
3922: rollback to Cancel_ASN_PVT;
3921: x_return_status := l_dbi_rs;
3922: rollback to Cancel_ASN_PVT;
3923: -- just pass this return status to caller API
3924: IF l_debug_on THEN
3925: WSH_DEBUG_SV.logmsg(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
3926: WSH_DEBUG_SV.pop(l_module_name);
3927: END IF;
3928: return;
3929: END IF;
3922: rollback to Cancel_ASN_PVT;
3923: -- just pass this return status to caller API
3924: IF l_debug_on THEN
3925: WSH_DEBUG_SV.logmsg(l_module_name,'DBI API Returned Unexpected error '||x_return_status);
3926: WSH_DEBUG_SV.pop(l_module_name);
3927: END IF;
3928: return;
3929: END IF;
3930: -- End of Code for DBI Project
3933: --
3934: -- Debug Statements
3935: --
3936: IF l_debug_on THEN
3937: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PO_CMG_PVT.REAPPROVE_PO',WSH_DEBUG_SV.C_PROC_LEVEL);
3938: END IF;
3939: --
3940: l_action_prms.action_code := 'CANCEL_ASN';
3941:
3951: --
3952: -- Debug Statements
3953: --
3954: IF l_debug_on THEN
3955: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3956: END IF;
3957: --
3958: wsh_util_core.api_post_call(
3959: p_return_status => l_return_status,
3967: --
3968: -- Debug Statements
3969: --
3970: IF l_debug_on THEN
3971: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_ACTIONS.UNPACK_INBOUND_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
3972: WSH_DEBUG_SV.log(l_module_name,'delivery id',v_get_deliveries.delivery_id);
3973: END IF;
3974: --
3975: -- unpack the delivery.
3968: -- Debug Statements
3969: --
3970: IF l_debug_on THEN
3971: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_ACTIONS.UNPACK_INBOUND_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
3972: WSH_DEBUG_SV.log(l_module_name,'delivery id',v_get_deliveries.delivery_id);
3973: END IF;
3974: --
3975: -- unpack the delivery.
3976:
3981: --
3982: -- Debug Statements
3983: --
3984: IF l_debug_on THEN
3985: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
3986: END IF;
3987: --
3988: wsh_util_core.api_post_call(
3989: p_return_status => l_return_status,
4009:
4010: IF l_dd_unassigned_tbl.COUNT > 0 THEN
4011:
4012: IF l_debug_on THEN
4013: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_MULTIPLE_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
4014: END IF;
4015:
4016: l_unassign_action_prms := p_action_prms;
4017: --l_unassign_action_prms.caller := wsh_util_core.C_IB_RECEIPT_PREFIX;
4036: --
4037:
4038: --Call Update status by passing list of the deliveries, trips and trip stops.
4039: IF l_debug_on THEN
4040: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.UPDATE_STATUS',WSH_DEBUG_SV.C_PROC_LEVEL);
4041: END IF;
4042:
4043: update_status(
4044: p_action_prms => p_action_prms,
4067: --
4068: -- Debug Statements
4069: --
4070: IF l_debug_on THEN
4071: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4072: END IF;
4073: --
4074: wsh_util_core.api_post_call(
4075: p_return_status => l_return_status,
4081: --
4082: -- Debug Statements
4083: --
4084: IF l_debug_on THEN
4085: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_UTIL_PKG.SETTRIPSTOPSTATUS',WSH_DEBUG_SV.C_PROC_LEVEL);
4086: END IF;
4087: --
4088: WSH_INBOUND_UTIL_PKG.setTripStopStatus(
4089: p_transaction_code => 'ASN',
4131: p_entity_ids => l_delivery_ids,
4132: x_return_status => l_return_status);
4133: --
4134: IF l_debug_on THEN
4135: WSH_DEBUG_SV.log(l_module_name,'Return Status after calling calculate_cont_del_tpdates',l_return_status);
4136: END IF;
4137: --
4138: wsh_util_core.api_post_call(
4139: p_return_status => l_return_status,
4157: --
4158: -- Debug Statements
4159: --
4160: IF l_debug_on THEN
4161: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_TXN_HISTORY_PKG.POST_PROCESS',WSH_DEBUG_SV.C_PROC_LEVEL);
4162: END IF;
4163: --
4164: WSH_INBOUND_TXN_HISTORY_PKG.post_process(
4165: p_shipment_header_id => p_header_id,
4172: --
4173: -- Debug Statements
4174: --
4175: IF l_debug_on THEN
4176: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4177: END IF;
4178: --
4179: wsh_util_core.api_post_call(
4180: p_return_status => l_return_status,
4184: --
4185: -- Debug Statements
4186: --
4187: IF l_debug_on THEN
4188: WSH_DEBUG_SV.pop(l_module_name);
4189: END IF;
4190: --
4191: IF l_num_errors > 0 THEN
4192: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4204: --
4205: -- Debug Statements
4206: --
4207: IF l_debug_on THEN
4208: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4209: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4210: END IF;
4211: --
4212: WHEN OTHERS THEN
4205: -- Debug Statements
4206: --
4207: IF l_debug_on THEN
4208: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4209: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4210: END IF;
4211: --
4212: WHEN OTHERS THEN
4213: ROLLBACK TO Cancel_ASN_PVT;
4217: --
4218: -- Debug Statements
4219: --
4220: IF l_debug_on THEN
4221: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4222: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4223: END IF;
4224: --
4225: END Cancel_ASN;
4218: -- Debug Statements
4219: --
4220: IF l_debug_on THEN
4221: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4222: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4223: END IF;
4224: --
4225: END Cancel_ASN;
4226:
4326: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4327: --
4328: IF l_debug_on IS NULL
4329: THEN
4330: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4331: END IF;
4332: --
4333: --
4334: -- Debug Statements
4333: --
4334: -- Debug Statements
4335: --
4336: IF l_debug_on THEN
4337: WSH_DEBUG_SV.push(l_module_name);
4338: WSH_DEBUG_SV.log(l_module_name,'Caller',p_action_prms.caller);
4339: WSH_DEBUG_SV.log(l_module_name,'Action', p_action_prms.action_code);
4340: WSH_DEBUG_SV.log(l_module_name,'p_del_ids.count',p_del_ids.count);
4341: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
4334: -- Debug Statements
4335: --
4336: IF l_debug_on THEN
4337: WSH_DEBUG_SV.push(l_module_name);
4338: WSH_DEBUG_SV.log(l_module_name,'Caller',p_action_prms.caller);
4339: WSH_DEBUG_SV.log(l_module_name,'Action', p_action_prms.action_code);
4340: WSH_DEBUG_SV.log(l_module_name,'p_del_ids.count',p_del_ids.count);
4341: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
4342: END IF;
4335: --
4336: IF l_debug_on THEN
4337: WSH_DEBUG_SV.push(l_module_name);
4338: WSH_DEBUG_SV.log(l_module_name,'Caller',p_action_prms.caller);
4339: WSH_DEBUG_SV.log(l_module_name,'Action', p_action_prms.action_code);
4340: WSH_DEBUG_SV.log(l_module_name,'p_del_ids.count',p_del_ids.count);
4341: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
4342: END IF;
4343: --
4336: IF l_debug_on THEN
4337: WSH_DEBUG_SV.push(l_module_name);
4338: WSH_DEBUG_SV.log(l_module_name,'Caller',p_action_prms.caller);
4339: WSH_DEBUG_SV.log(l_module_name,'Action', p_action_prms.action_code);
4340: WSH_DEBUG_SV.log(l_module_name,'p_del_ids.count',p_del_ids.count);
4341: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
4342: END IF;
4343: --
4344: l_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4337: WSH_DEBUG_SV.push(l_module_name);
4338: WSH_DEBUG_SV.log(l_module_name,'Caller',p_action_prms.caller);
4339: WSH_DEBUG_SV.log(l_module_name,'Action', p_action_prms.action_code);
4340: WSH_DEBUG_SV.log(l_module_name,'p_del_ids.count',p_del_ids.count);
4341: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
4342: END IF;
4343: --
4344: l_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4345:
4353: FOR v_get_open_dds IN c_get_open_dds(p_del_ids(i)) LOOP
4354: dd_ids_tab(dd_ids_tab.COUNT+1) := v_get_open_dds.delivery_detail_id;
4355:
4356: IF l_debug_on THEN
4357: WSH_DEBUG_SV.log(l_module_name,'DD ID for unassign from dlvy:',v_get_open_dds.delivery_detail_id);
4358: END IF;
4359: --
4360: END LOOP;
4361: END IF;
4365: IF p_action_prms.action_code = 'RECEIPT' THEN
4366: FOR v_get_open_closed_dds IN c_get_open_closed_dds(p_del_ids(i)) LOOP
4367:
4368: IF l_debug_on THEN
4369: WSH_DEBUG_SV.log(l_module_name,'DD ID for unassign from dlvy:',v_get_open_closed_dds.delivery_detail_id);
4370: WSH_DEBUG_SV.log(l_module_name,'container flag for unassign from dlvy:',v_get_open_closed_dds.container_flag);
4371: END IF;
4372: --
4373: IF v_get_open_closed_dds.container_flag = 'Y'
4366: FOR v_get_open_closed_dds IN c_get_open_closed_dds(p_del_ids(i)) LOOP
4367:
4368: IF l_debug_on THEN
4369: WSH_DEBUG_SV.log(l_module_name,'DD ID for unassign from dlvy:',v_get_open_closed_dds.delivery_detail_id);
4370: WSH_DEBUG_SV.log(l_module_name,'container flag for unassign from dlvy:',v_get_open_closed_dds.container_flag);
4371: END IF;
4372: --
4373: IF v_get_open_closed_dds.container_flag = 'Y'
4374: THEN
4383: END LOOP;
4384: --
4385: --
4386: IF l_debug_on THEN
4387: WSH_DEBUG_SV.logmsg(l_module_name,'Find any other deliveries shipped but not recieved');
4388: END IF;
4389: --
4390: --
4391: FOR v_get_shipped_dds IN c_get_shipped_dds(p_shipment_header_id) LOOP
4390: --
4391: FOR v_get_shipped_dds IN c_get_shipped_dds(p_shipment_header_id) LOOP
4392:
4393: IF l_debug_on THEN
4394: WSH_DEBUG_SV.log(l_module_name,'DD ID for unassign from dlvy:',v_get_shipped_dds.delivery_detail_id);
4395: WSH_DEBUG_SV.log(l_module_name,'container flag for unassign from dlvy:',v_get_shipped_dds.container_flag);
4396: END IF;
4397: --
4398: IF v_get_shipped_dds.container_flag = 'Y'
4391: FOR v_get_shipped_dds IN c_get_shipped_dds(p_shipment_header_id) LOOP
4392:
4393: IF l_debug_on THEN
4394: WSH_DEBUG_SV.log(l_module_name,'DD ID for unassign from dlvy:',v_get_shipped_dds.delivery_detail_id);
4395: WSH_DEBUG_SV.log(l_module_name,'container flag for unassign from dlvy:',v_get_shipped_dds.container_flag);
4396: END IF;
4397: --
4398: IF v_get_shipped_dds.container_flag = 'Y'
4399: THEN
4412: i := p_del_ids.NEXT(i);
4413: END LOOP;
4414:
4415: IF l_debug_on THEN
4416: WSH_DEBUG_SV.log(l_module_name,'lpn_ids_tab.count',lpn_ids_tab.count);
4417: END IF;
4418:
4419: -- If true ->There are some LPNs to be unassigned from their respective deliveries.
4420: -- Also the delivery detail IDs for which these are assigned as LPNs(parent delivery detail Id)
4426: DELETE wsh_delivery_assignments_v
4427: WHERE delivery_detail_id = lpn_ids_tab(i);
4428:
4429: IF l_debug_on THEN
4430: WSH_DEBUG_SV.log(l_module_name,'SQL%ROWCOUNT After delete LPN from WDA',SQL%ROWCOUNT);
4431: END IF;
4432:
4433: --Deleting the rows in WSH_DELIVERY_DETAILS corresponding to the selected LPNs.
4434: FORALL i IN lpn_ids_tab.FIRST..lpn_ids_tab.LAST
4435: DELETE WSH_DELIVERY_DETAILS
4436: WHERE delivery_detail_id = lpn_ids_tab(i);
4437:
4438: IF l_debug_on THEN
4439: WSH_DEBUG_SV.log(l_module_name,'SQL%ROWCOUNT After delete LPN from WDD',SQL%ROWCOUNT);
4440: END IF;
4441:
4442: --updating the rows in WDA for which the selected LPNs are parent Delivery Details.
4443: FORALL i IN lpn_ids_tab.FIRST..lpn_ids_tab.LAST
4445: SET parent_delivery_detail_id = NULL
4446: WHERE parent_delivery_detail_id = lpn_ids_tab(i);
4447:
4448: IF l_debug_on THEN
4449: WSH_DEBUG_SV.log(l_module_name,'SQL%ROWCOUNT After update contents on WDD',SQL%ROWCOUNT);
4450: END IF;
4451: --}
4452: END IF;
4453: --
4454: --
4455: -- Debug Statements
4456: --
4457: IF l_debug_on THEN
4458: WSH_DEBUG_SV.log(l_module_name,'dd_ids_tab.count',dd_ids_tab.count);
4459: END IF;
4460: --
4461:
4462: -- If true -> there are delivery details to be unassigned from thier
4463: -- respective deliveries.
4464: IF dd_ids_tab.count > 0 THEN
4465: --{
4466: IF l_debug_on THEN
4467: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS
4468: _ACTIONS.UNASSIGN_MULTIPLE_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
4469: END IF;
4470:
4471: l_unassign_action_prms := p_action_prms;
4464: IF dd_ids_tab.count > 0 THEN
4465: --{
4466: IF l_debug_on THEN
4467: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS
4468: _ACTIONS.UNASSIGN_MULTIPLE_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
4469: END IF;
4470:
4471: l_unassign_action_prms := p_action_prms;
4472: --l_unassign_action_prms.caller := wsh_util_core.C_IB_RECEIPT_PREFIX;
4484: --
4485: -- Debug Statements
4486: --
4487: IF l_debug_on THEN
4488: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4489: END IF;
4490: --
4491: wsh_util_core.api_post_call(
4492: p_return_status => l_return_status,
4500: --
4501: -- Debug Statements
4502: --
4503: IF l_debug_on THEN
4504: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PO_CMG_PVT.LOG_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
4505: END IF;
4506: --
4507: WSH_PO_CMG_PVT.Log_Exception(
4508: p_entity_id => p_del_ids(i),
4513: --
4514: -- Debug Statements
4515: --
4516: IF l_debug_on THEN
4517: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4518: END IF;
4519: --
4520: wsh_util_core.api_post_call(
4521: p_return_status => l_return_status,
4533: --
4534: -- Debug Statements
4535: --
4536: IF l_debug_on THEN
4537: WSH_DEBUG_SV.pop(l_module_name);
4538: END IF;
4539: --
4540: IF l_num_errors > 0 THEN
4541: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4551: --
4552: -- Debug Statements
4553: --
4554: IF l_debug_on THEN
4555: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4556: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4557: END IF;
4558: --
4559: END unassign_open_det_from_del;
4552: -- Debug Statements
4553: --
4554: IF l_debug_on THEN
4555: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4556: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4557: END IF;
4558: --
4559: END unassign_open_det_from_del;
4560:
4726: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4727: --
4728: IF l_debug_on IS NULL
4729: THEN
4730: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4731: END IF;
4732: --
4733: --
4734: -- Debug Statements
4733: --
4734: -- Debug Statements
4735: --
4736: IF l_debug_on THEN
4737: WSH_DEBUG_SV.push(l_module_name);
4738: WSH_DEBUG_SV.log(l_module_name,'Caller',p_action_prms.caller);
4739: WSH_DEBUG_SV.log(l_module_name,'Action', p_action_prms.action_code);
4740: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_cache.count',p_index_dd_ids_cache.count );
4741: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_ext_cache.count',p_index_dd_ids_ext_cache.count );
4734: -- Debug Statements
4735: --
4736: IF l_debug_on THEN
4737: WSH_DEBUG_SV.push(l_module_name);
4738: WSH_DEBUG_SV.log(l_module_name,'Caller',p_action_prms.caller);
4739: WSH_DEBUG_SV.log(l_module_name,'Action', p_action_prms.action_code);
4740: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_cache.count',p_index_dd_ids_cache.count );
4741: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_ext_cache.count',p_index_dd_ids_ext_cache.count );
4742: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_cache.count',p_index_del_ids_cache.count );
4735: --
4736: IF l_debug_on THEN
4737: WSH_DEBUG_SV.push(l_module_name);
4738: WSH_DEBUG_SV.log(l_module_name,'Caller',p_action_prms.caller);
4739: WSH_DEBUG_SV.log(l_module_name,'Action', p_action_prms.action_code);
4740: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_cache.count',p_index_dd_ids_cache.count );
4741: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_ext_cache.count',p_index_dd_ids_ext_cache.count );
4742: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_cache.count',p_index_del_ids_cache.count );
4743: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_ext_cache.count', p_index_del_ids_ext_cache.count);
4736: IF l_debug_on THEN
4737: WSH_DEBUG_SV.push(l_module_name);
4738: WSH_DEBUG_SV.log(l_module_name,'Caller',p_action_prms.caller);
4739: WSH_DEBUG_SV.log(l_module_name,'Action', p_action_prms.action_code);
4740: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_cache.count',p_index_dd_ids_cache.count );
4741: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_ext_cache.count',p_index_dd_ids_ext_cache.count );
4742: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_cache.count',p_index_del_ids_cache.count );
4743: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_ext_cache.count', p_index_del_ids_ext_cache.count);
4744: WSH_DEBUG_SV.log(l_module_name,'p_del_ids_del_ids_cache.count',p_del_ids_del_ids_cache.count );
4737: WSH_DEBUG_SV.push(l_module_name);
4738: WSH_DEBUG_SV.log(l_module_name,'Caller',p_action_prms.caller);
4739: WSH_DEBUG_SV.log(l_module_name,'Action', p_action_prms.action_code);
4740: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_cache.count',p_index_dd_ids_cache.count );
4741: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_ext_cache.count',p_index_dd_ids_ext_cache.count );
4742: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_cache.count',p_index_del_ids_cache.count );
4743: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_ext_cache.count', p_index_del_ids_ext_cache.count);
4744: WSH_DEBUG_SV.log(l_module_name,'p_del_ids_del_ids_cache.count',p_del_ids_del_ids_cache.count );
4745: WSH_DEBUG_SV.log(l_module_name,'p_del_ids_del_ids_ext_cache.count',p_del_ids_del_ids_ext_cache.count);
4738: WSH_DEBUG_SV.log(l_module_name,'Caller',p_action_prms.caller);
4739: WSH_DEBUG_SV.log(l_module_name,'Action', p_action_prms.action_code);
4740: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_cache.count',p_index_dd_ids_cache.count );
4741: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_ext_cache.count',p_index_dd_ids_ext_cache.count );
4742: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_cache.count',p_index_del_ids_cache.count );
4743: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_ext_cache.count', p_index_del_ids_ext_cache.count);
4744: WSH_DEBUG_SV.log(l_module_name,'p_del_ids_del_ids_cache.count',p_del_ids_del_ids_cache.count );
4745: WSH_DEBUG_SV.log(l_module_name,'p_del_ids_del_ids_ext_cache.count',p_del_ids_del_ids_ext_cache.count);
4746: WSH_DEBUG_SV.log(l_module_name,'p_uniq_del_ids_tab.count',p_uniq_del_ids_tab.count);
4739: WSH_DEBUG_SV.log(l_module_name,'Action', p_action_prms.action_code);
4740: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_cache.count',p_index_dd_ids_cache.count );
4741: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_ext_cache.count',p_index_dd_ids_ext_cache.count );
4742: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_cache.count',p_index_del_ids_cache.count );
4743: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_ext_cache.count', p_index_del_ids_ext_cache.count);
4744: WSH_DEBUG_SV.log(l_module_name,'p_del_ids_del_ids_cache.count',p_del_ids_del_ids_cache.count );
4745: WSH_DEBUG_SV.log(l_module_name,'p_del_ids_del_ids_ext_cache.count',p_del_ids_del_ids_ext_cache.count);
4746: WSH_DEBUG_SV.log(l_module_name,'p_uniq_del_ids_tab.count',p_uniq_del_ids_tab.count);
4747: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
4740: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_cache.count',p_index_dd_ids_cache.count );
4741: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_ext_cache.count',p_index_dd_ids_ext_cache.count );
4742: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_cache.count',p_index_del_ids_cache.count );
4743: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_ext_cache.count', p_index_del_ids_ext_cache.count);
4744: WSH_DEBUG_SV.log(l_module_name,'p_del_ids_del_ids_cache.count',p_del_ids_del_ids_cache.count );
4745: WSH_DEBUG_SV.log(l_module_name,'p_del_ids_del_ids_ext_cache.count',p_del_ids_del_ids_ext_cache.count);
4746: WSH_DEBUG_SV.log(l_module_name,'p_uniq_del_ids_tab.count',p_uniq_del_ids_tab.count);
4747: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
4748: END IF;
4741: WSH_DEBUG_SV.log(l_module_name,'p_index_dd_ids_ext_cache.count',p_index_dd_ids_ext_cache.count );
4742: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_cache.count',p_index_del_ids_cache.count );
4743: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_ext_cache.count', p_index_del_ids_ext_cache.count);
4744: WSH_DEBUG_SV.log(l_module_name,'p_del_ids_del_ids_cache.count',p_del_ids_del_ids_cache.count );
4745: WSH_DEBUG_SV.log(l_module_name,'p_del_ids_del_ids_ext_cache.count',p_del_ids_del_ids_ext_cache.count);
4746: WSH_DEBUG_SV.log(l_module_name,'p_uniq_del_ids_tab.count',p_uniq_del_ids_tab.count);
4747: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
4748: END IF;
4749: --
4742: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_cache.count',p_index_del_ids_cache.count );
4743: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_ext_cache.count', p_index_del_ids_ext_cache.count);
4744: WSH_DEBUG_SV.log(l_module_name,'p_del_ids_del_ids_cache.count',p_del_ids_del_ids_cache.count );
4745: WSH_DEBUG_SV.log(l_module_name,'p_del_ids_del_ids_ext_cache.count',p_del_ids_del_ids_ext_cache.count);
4746: WSH_DEBUG_SV.log(l_module_name,'p_uniq_del_ids_tab.count',p_uniq_del_ids_tab.count);
4747: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
4748: END IF;
4749: --
4750: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
4743: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_ext_cache.count', p_index_del_ids_ext_cache.count);
4744: WSH_DEBUG_SV.log(l_module_name,'p_del_ids_del_ids_cache.count',p_del_ids_del_ids_cache.count );
4745: WSH_DEBUG_SV.log(l_module_name,'p_del_ids_del_ids_ext_cache.count',p_del_ids_del_ids_ext_cache.count);
4746: WSH_DEBUG_SV.log(l_module_name,'p_uniq_del_ids_tab.count',p_uniq_del_ids_tab.count);
4747: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
4748: END IF;
4749: --
4750: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
4751:
4751:
4752: l_carrier_id := p_local_dd_rec(p_local_dd_rec.FIRST).rcv_carrier_id;
4753:
4754: IF l_debug_on THEN
4755: WSH_DEBUG_SV.log(l_module_name,'l_carrier_id',l_carrier_id);
4756: END IF;
4757:
4758: --collecting all delivery detaild IDs from the non-contiguous key-value pairs
4759: --p_index_dd_ids_cache and p_index_dd_ids_ext_cache to the contiguous table
4763: l_ind := p_index_dd_ids_cache.FIRST;
4764: WHILE l_ind IS NOT NULL
4765: LOOP
4766: IF l_debug_on THEN
4767: WSH_DEBUG_SV.log(l_module_name,'DD ID for AUTOCREATE_DEL_TRIP:',p_index_dd_ids_cache(l_ind).value);
4768: END IF;
4769: --
4770: l_dd_ids_tab(j) := p_index_dd_ids_cache(l_ind).value;
4771: j := j + 1;
4774: l_ind := p_index_dd_ids_ext_cache.FIRST;
4775: WHILE l_ind IS NOT NULL
4776: LOOP
4777: IF l_debug_on THEN
4778: WSH_DEBUG_SV.log(l_module_name,'DD ID for AUTOCREATE_DEL_TRIP:',p_index_dd_ids_ext_cache(l_ind).value);
4779: END IF;
4780: --
4781: l_dd_ids_tab(j) := p_index_dd_ids_ext_cache(l_ind).value;
4782: j := j + 1;
4791: --
4792: -- Debug Statements
4793: --
4794: IF l_debug_on THEN
4795: WSH_DEBUG_SV.log(l_module_name,'l_dd_ids_tab.count',l_dd_ids_tab.count);
4796: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.AUTOCREATE_DEL_TRIP',WSH_DEBUG_SV.C_PROC_LEVEL);
4797: END IF;
4798: --
4799:
4792: -- Debug Statements
4793: --
4794: IF l_debug_on THEN
4795: WSH_DEBUG_SV.log(l_module_name,'l_dd_ids_tab.count',l_dd_ids_tab.count);
4796: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.AUTOCREATE_DEL_TRIP',WSH_DEBUG_SV.C_PROC_LEVEL);
4797: END IF;
4798: --
4799:
4800:
4808: --
4809: -- Debug Statements
4810: --
4811: IF l_debug_on THEN
4812: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4813: END IF;
4814: --
4815: wsh_util_core.api_post_call(
4816: p_return_status => l_return_status,
4818: x_num_errors => l_num_errors);
4819:
4820:
4821: IF l_debug_on THEN
4822: WSH_DEBUG_SV.logmsg(l_module_name,'populating dlvy and trip');
4823: END IF;
4824: --
4825: j := 1;
4826: l_ind := p_index_dd_ids_cache.FIRST;
4836: INTO
4837: p_local_dd_rec(l_ind).delivery_id,
4838: p_local_dd_rec(l_ind).trip_id;
4839: IF l_debug_on THEN
4840: WSH_DEBUG_SV.log(l_module_name,'WDD_ID',p_index_dd_ids_cache(l_ind).value);
4841: WSH_DEBUG_SV.log(l_module_name,'DLVY_ID',p_local_dd_rec(l_ind).delivery_id);
4842: WSH_DEBUG_SV.log(l_module_name,'TRIP_ID',p_local_dd_rec(l_ind).trip_id);
4843: END IF;
4844: --
4837: p_local_dd_rec(l_ind).delivery_id,
4838: p_local_dd_rec(l_ind).trip_id;
4839: IF l_debug_on THEN
4840: WSH_DEBUG_SV.log(l_module_name,'WDD_ID',p_index_dd_ids_cache(l_ind).value);
4841: WSH_DEBUG_SV.log(l_module_name,'DLVY_ID',p_local_dd_rec(l_ind).delivery_id);
4842: WSH_DEBUG_SV.log(l_module_name,'TRIP_ID',p_local_dd_rec(l_ind).trip_id);
4843: END IF;
4844: --
4845: CLOSE c_get_del_id_trip_id;
4838: p_local_dd_rec(l_ind).trip_id;
4839: IF l_debug_on THEN
4840: WSH_DEBUG_SV.log(l_module_name,'WDD_ID',p_index_dd_ids_cache(l_ind).value);
4841: WSH_DEBUG_SV.log(l_module_name,'DLVY_ID',p_local_dd_rec(l_ind).delivery_id);
4842: WSH_DEBUG_SV.log(l_module_name,'TRIP_ID',p_local_dd_rec(l_ind).trip_id);
4843: END IF;
4844: --
4845: CLOSE c_get_del_id_trip_id;
4846: --
4881: WHILE l_ind IS NOT NULL
4882: LOOP
4883: l_del_rows(j) := p_del_ids_del_ids_cache(l_ind).value;
4884: IF l_debug_on THEN
4885: WSH_DEBUG_SV.log(l_module_name,' l_del_rows(j)', l_del_rows(j));
4886: END IF;
4887: --
4888: j := j + 1;
4889: l_ind := p_del_ids_del_ids_cache.NEXT(l_ind);
4893: WHILE l_ind IS NOT NULL
4894: LOOP
4895: l_del_rows(j) := p_del_ids_del_ids_ext_cache(l_ind).value;
4896: IF l_debug_on THEN
4897: WSH_DEBUG_SV.log(l_module_name,' l_del_rows(j)', l_del_rows(j));
4898: END IF;
4899: --
4900: j := j + 1;
4901: l_ind := p_del_ids_del_ids_ext_cache.NEXT(l_ind);
4909: --
4910: -- Debug Statements
4911: --
4912: IF l_debug_on THEN
4913: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.AUTOCREATE_TRIP_MULTI',WSH_DEBUG_SV.C_PROC_LEVEL);
4914: WSH_DEBUG_SV.log(l_module_name,'l_del_rows.count = ',l_del_rows.count);
4915: END IF;
4916: --
4917:
4910: -- Debug Statements
4911: --
4912: IF l_debug_on THEN
4913: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.AUTOCREATE_TRIP_MULTI',WSH_DEBUG_SV.C_PROC_LEVEL);
4914: WSH_DEBUG_SV.log(l_module_name,'l_del_rows.count = ',l_del_rows.count);
4915: END IF;
4916: --
4917:
4918: WSH_TRIPS_ACTIONS.autocreate_trip_multi(
4924: --
4925: -- Debug Statements
4926: --
4927: IF l_debug_on THEN
4928: WSH_DEBUG_SV.log(l_module_name,'RET STS OF WSH_TRIPS_ACTIONS.autocreate_trip_multi IS :', l_return_status);
4929: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4930: END IF;
4931: --
4932: wsh_util_core.api_post_call(
4925: -- Debug Statements
4926: --
4927: IF l_debug_on THEN
4928: WSH_DEBUG_SV.log(l_module_name,'RET STS OF WSH_TRIPS_ACTIONS.autocreate_trip_multi IS :', l_return_status);
4929: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4930: END IF;
4931: --
4932: wsh_util_core.api_post_call(
4933: p_return_status => l_return_status,
4935: x_num_errors => l_num_errors);
4936:
4937:
4938: IF l_debug_on THEN
4939: WSH_DEBUG_SV.logmsg(l_module_name,'populating trip only');
4940: END IF;
4941: --
4942:
4943: -- populating the dd_rec structure with the newly created trip ids
4954: INTO
4955: p_local_dd_rec(l_ind).trip_id;
4956: CLOSE c_get_trip_id;
4957: IF l_debug_on THEN
4958: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_cache(l_ind).value',p_index_del_ids_cache(l_ind).value);
4959: WSH_DEBUG_SV.log(l_module_name,'p_local_dd_rec(l_ind).trip_id',p_local_dd_rec(l_ind).trip_id);
4960: END IF;
4961: --
4962: --
4955: p_local_dd_rec(l_ind).trip_id;
4956: CLOSE c_get_trip_id;
4957: IF l_debug_on THEN
4958: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_cache(l_ind).value',p_index_del_ids_cache(l_ind).value);
4959: WSH_DEBUG_SV.log(l_module_name,'p_local_dd_rec(l_ind).trip_id',p_local_dd_rec(l_ind).trip_id);
4960: END IF;
4961: --
4962: --
4963: l_new_trip_id_count := NVL(l_new_trip_id_count,0) + 1;
4976: INTO
4977: p_local_dd_rec(l_ind).trip_id;
4978: CLOSE c_get_trip_id;
4979: IF l_debug_on THEN
4980: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_ext_cache(l_ind).value',p_index_del_ids_ext_cache(l_ind).value);
4981: WSH_DEBUG_SV.log(l_module_name,'p_local_dd_rec(l_ind).trip_id',p_local_dd_rec(l_ind).trip_id);
4982: END IF;
4983: --
4984: --
4977: p_local_dd_rec(l_ind).trip_id;
4978: CLOSE c_get_trip_id;
4979: IF l_debug_on THEN
4980: WSH_DEBUG_SV.log(l_module_name,'p_index_del_ids_ext_cache(l_ind).value',p_index_del_ids_ext_cache(l_ind).value);
4981: WSH_DEBUG_SV.log(l_module_name,'p_local_dd_rec(l_ind).trip_id',p_local_dd_rec(l_ind).trip_id);
4982: END IF;
4983: --
4984: --
4985: l_new_trip_id_count := NVL(l_new_trip_id_count,0) + 1;
4993:
4994:
4995:
4996: IF l_debug_on THEN
4997: WSH_DEBUG_SV.logmsg(l_module_name,'updating carrier on trip');
4998: WSH_DEBUG_SV.log(l_module_name,'l_new_trip_id_count',l_new_trip_id_count);
4999: END IF;
5000:
5001: IF l_new_trip_id_count > 0
4994:
4995:
4996: IF l_debug_on THEN
4997: WSH_DEBUG_SV.logmsg(l_module_name,'updating carrier on trip');
4998: WSH_DEBUG_SV.log(l_module_name,'l_new_trip_id_count',l_new_trip_id_count);
4999: END IF;
5000:
5001: IF l_new_trip_id_count > 0
5002: THEN
5028: --
5029: -- Debug Statements
5030: --
5031: IF l_debug_on THEN
5032: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.UNASSIGN_OPEN_DET_FROM_DEL',WSH_DEBUG_SV.C_PROC_LEVEL);
5033: WSH_DEBUG_SV.log(l_module_name,'l_del_ids.count',l_del_ids.count);
5034: END IF;
5035: --
5036: unassign_open_det_from_del(
5029: -- Debug Statements
5030: --
5031: IF l_debug_on THEN
5032: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.UNASSIGN_OPEN_DET_FROM_DEL',WSH_DEBUG_SV.C_PROC_LEVEL);
5033: WSH_DEBUG_SV.log(l_module_name,'l_del_ids.count',l_del_ids.count);
5034: END IF;
5035: --
5036: unassign_open_det_from_del(
5037: p_del_ids => l_del_ids,
5041: --
5042: -- Debug Statements
5043: --
5044: IF l_debug_on THEN
5045: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
5046: END IF;
5047: --
5048: wsh_util_core.api_post_call(
5049: p_return_status => l_return_status,
5056: --
5057: -- Debug Statements
5058: --
5059: IF l_debug_on THEN
5060: WSH_DEBUG_SV.pop(l_module_name);
5061: END IF;
5062: --
5063: IF l_num_errors > 0 THEN
5064: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5075: --
5076: -- Debug Statements
5077: --
5078: IF l_debug_on THEN
5079: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5080: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
5081: END IF;
5082: --
5083: WHEN OTHERS THEN
5076: -- Debug Statements
5077: --
5078: IF l_debug_on THEN
5079: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5080: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
5081: END IF;
5082: --
5083: WHEN OTHERS THEN
5084: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5087: --
5088: -- Debug Statements
5089: --
5090: IF l_debug_on THEN
5091: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5092: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5093: END IF;
5094: --
5095: END initialize_txns;
5088: -- Debug Statements
5089: --
5090: IF l_debug_on THEN
5091: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5092: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5093: END IF;
5094: --
5095: END initialize_txns;
5096:
5296: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5297: --
5298: IF l_debug_on IS NULL
5299: THEN
5300: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5301: END IF;
5302: --
5303: --
5304: -- Debug Statements
5303: --
5304: -- Debug Statements
5305: --
5306: IF l_debug_on THEN
5307: WSH_DEBUG_SV.push(l_module_name);
5308: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
5309: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
5310: END IF;
5311: --
5304: -- Debug Statements
5305: --
5306: IF l_debug_on THEN
5307: WSH_DEBUG_SV.push(l_module_name);
5308: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
5309: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
5310: END IF;
5311: --
5312: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
5305: --
5306: IF l_debug_on THEN
5307: WSH_DEBUG_SV.push(l_module_name);
5308: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
5309: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id',p_shipment_header_id);
5310: END IF;
5311: --
5312: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
5313: l_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
5318: l_local_dd_rec := p_local_dd_rec;
5319:
5320:
5321: IF l_debug_on THEN
5322: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit SORT_DD_REC',WSH_DEBUG_SV.C_PROC_LEVEL);
5323: END IF;
5324: --Arrange the data in p_local_dd_rec in the ascending order of Trip ID,delivery id, BOL and LPN.
5325: sort_dd_rec(
5326: p_local_dd_rec => l_local_dd_rec,
5329: --
5330: -- Debug Statements
5331: --
5332: IF l_debug_on THEN
5333: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
5334: END IF;
5335: --
5336: wsh_util_core.api_post_call(
5337: p_return_status => l_return_status,
5377: FOR i IN 1..l_local_dd_rec.COUNT loop
5378:
5379:
5380: IF l_debug_on THEN
5381: WSH_DEBUG_SV.log(l_module_name,'i',i);
5382: WSH_DEBUG_SV.log(l_module_name,'curr_lpn',curr_lpn);
5383: WSH_DEBUG_SV.log(l_module_name,'curr_lpn_name',curr_lpn_name);
5384: WSH_DEBUG_SV.log(l_module_name,'curr_del',curr_del);
5385: WSH_DEBUG_SV.log(l_module_name,'curr_BOL',curr_BOL);
5378:
5379:
5380: IF l_debug_on THEN
5381: WSH_DEBUG_SV.log(l_module_name,'i',i);
5382: WSH_DEBUG_SV.log(l_module_name,'curr_lpn',curr_lpn);
5383: WSH_DEBUG_SV.log(l_module_name,'curr_lpn_name',curr_lpn_name);
5384: WSH_DEBUG_SV.log(l_module_name,'curr_del',curr_del);
5385: WSH_DEBUG_SV.log(l_module_name,'curr_BOL',curr_BOL);
5386: WSH_DEBUG_SV.log(l_module_name,'curr_del_det',curr_del_det);
5379:
5380: IF l_debug_on THEN
5381: WSH_DEBUG_SV.log(l_module_name,'i',i);
5382: WSH_DEBUG_SV.log(l_module_name,'curr_lpn',curr_lpn);
5383: WSH_DEBUG_SV.log(l_module_name,'curr_lpn_name',curr_lpn_name);
5384: WSH_DEBUG_SV.log(l_module_name,'curr_del',curr_del);
5385: WSH_DEBUG_SV.log(l_module_name,'curr_BOL',curr_BOL);
5386: WSH_DEBUG_SV.log(l_module_name,'curr_del_det',curr_del_det);
5387: WSH_DEBUG_SV.log(l_module_name,'curr_header_id',curr_header_id);
5380: IF l_debug_on THEN
5381: WSH_DEBUG_SV.log(l_module_name,'i',i);
5382: WSH_DEBUG_SV.log(l_module_name,'curr_lpn',curr_lpn);
5383: WSH_DEBUG_SV.log(l_module_name,'curr_lpn_name',curr_lpn_name);
5384: WSH_DEBUG_SV.log(l_module_name,'curr_del',curr_del);
5385: WSH_DEBUG_SV.log(l_module_name,'curr_BOL',curr_BOL);
5386: WSH_DEBUG_SV.log(l_module_name,'curr_del_det',curr_del_det);
5387: WSH_DEBUG_SV.log(l_module_name,'curr_header_id',curr_header_id);
5388: WSH_DEBUG_SV.log(l_module_name,'curr_initial_pickup_date',curr_initial_pickup_date);
5381: WSH_DEBUG_SV.log(l_module_name,'i',i);
5382: WSH_DEBUG_SV.log(l_module_name,'curr_lpn',curr_lpn);
5383: WSH_DEBUG_SV.log(l_module_name,'curr_lpn_name',curr_lpn_name);
5384: WSH_DEBUG_SV.log(l_module_name,'curr_del',curr_del);
5385: WSH_DEBUG_SV.log(l_module_name,'curr_BOL',curr_BOL);
5386: WSH_DEBUG_SV.log(l_module_name,'curr_del_det',curr_del_det);
5387: WSH_DEBUG_SV.log(l_module_name,'curr_header_id',curr_header_id);
5388: WSH_DEBUG_SV.log(l_module_name,'curr_initial_pickup_date',curr_initial_pickup_date);
5389: WSH_DEBUG_SV.log(l_module_name,'curr_expected_receipt_date',curr_expected_receipt_date);
5382: WSH_DEBUG_SV.log(l_module_name,'curr_lpn',curr_lpn);
5383: WSH_DEBUG_SV.log(l_module_name,'curr_lpn_name',curr_lpn_name);
5384: WSH_DEBUG_SV.log(l_module_name,'curr_del',curr_del);
5385: WSH_DEBUG_SV.log(l_module_name,'curr_BOL',curr_BOL);
5386: WSH_DEBUG_SV.log(l_module_name,'curr_del_det',curr_del_det);
5387: WSH_DEBUG_SV.log(l_module_name,'curr_header_id',curr_header_id);
5388: WSH_DEBUG_SV.log(l_module_name,'curr_initial_pickup_date',curr_initial_pickup_date);
5389: WSH_DEBUG_SV.log(l_module_name,'curr_expected_receipt_date',curr_expected_receipt_date);
5390: WSH_DEBUG_SV.log(l_module_name,'l_trigger',l_trigger);
5383: WSH_DEBUG_SV.log(l_module_name,'curr_lpn_name',curr_lpn_name);
5384: WSH_DEBUG_SV.log(l_module_name,'curr_del',curr_del);
5385: WSH_DEBUG_SV.log(l_module_name,'curr_BOL',curr_BOL);
5386: WSH_DEBUG_SV.log(l_module_name,'curr_del_det',curr_del_det);
5387: WSH_DEBUG_SV.log(l_module_name,'curr_header_id',curr_header_id);
5388: WSH_DEBUG_SV.log(l_module_name,'curr_initial_pickup_date',curr_initial_pickup_date);
5389: WSH_DEBUG_SV.log(l_module_name,'curr_expected_receipt_date',curr_expected_receipt_date);
5390: WSH_DEBUG_SV.log(l_module_name,'l_trigger',l_trigger);
5391: WSH_DEBUG_SV.log(l_module_name,'prev_trip_id',prev_trip_id);
5384: WSH_DEBUG_SV.log(l_module_name,'curr_del',curr_del);
5385: WSH_DEBUG_SV.log(l_module_name,'curr_BOL',curr_BOL);
5386: WSH_DEBUG_SV.log(l_module_name,'curr_del_det',curr_del_det);
5387: WSH_DEBUG_SV.log(l_module_name,'curr_header_id',curr_header_id);
5388: WSH_DEBUG_SV.log(l_module_name,'curr_initial_pickup_date',curr_initial_pickup_date);
5389: WSH_DEBUG_SV.log(l_module_name,'curr_expected_receipt_date',curr_expected_receipt_date);
5390: WSH_DEBUG_SV.log(l_module_name,'l_trigger',l_trigger);
5391: WSH_DEBUG_SV.log(l_module_name,'prev_trip_id',prev_trip_id);
5392: WSH_DEBUG_SV.log(l_module_name,'prev_truck_num',prev_truck_num);
5385: WSH_DEBUG_SV.log(l_module_name,'curr_BOL',curr_BOL);
5386: WSH_DEBUG_SV.log(l_module_name,'curr_del_det',curr_del_det);
5387: WSH_DEBUG_SV.log(l_module_name,'curr_header_id',curr_header_id);
5388: WSH_DEBUG_SV.log(l_module_name,'curr_initial_pickup_date',curr_initial_pickup_date);
5389: WSH_DEBUG_SV.log(l_module_name,'curr_expected_receipt_date',curr_expected_receipt_date);
5390: WSH_DEBUG_SV.log(l_module_name,'l_trigger',l_trigger);
5391: WSH_DEBUG_SV.log(l_module_name,'prev_trip_id',prev_trip_id);
5392: WSH_DEBUG_SV.log(l_module_name,'prev_truck_num',prev_truck_num);
5393: WSH_DEBUG_SV.log(l_module_name,'truck_flag',truck_flag);
5386: WSH_DEBUG_SV.log(l_module_name,'curr_del_det',curr_del_det);
5387: WSH_DEBUG_SV.log(l_module_name,'curr_header_id',curr_header_id);
5388: WSH_DEBUG_SV.log(l_module_name,'curr_initial_pickup_date',curr_initial_pickup_date);
5389: WSH_DEBUG_SV.log(l_module_name,'curr_expected_receipt_date',curr_expected_receipt_date);
5390: WSH_DEBUG_SV.log(l_module_name,'l_trigger',l_trigger);
5391: WSH_DEBUG_SV.log(l_module_name,'prev_trip_id',prev_trip_id);
5392: WSH_DEBUG_SV.log(l_module_name,'prev_truck_num',prev_truck_num);
5393: WSH_DEBUG_SV.log(l_module_name,'truck_flag',truck_flag);
5394: WSH_DEBUG_SV.log(l_module_name,'WDD ID',l_local_dd_rec(i).del_detail_id );
5387: WSH_DEBUG_SV.log(l_module_name,'curr_header_id',curr_header_id);
5388: WSH_DEBUG_SV.log(l_module_name,'curr_initial_pickup_date',curr_initial_pickup_date);
5389: WSH_DEBUG_SV.log(l_module_name,'curr_expected_receipt_date',curr_expected_receipt_date);
5390: WSH_DEBUG_SV.log(l_module_name,'l_trigger',l_trigger);
5391: WSH_DEBUG_SV.log(l_module_name,'prev_trip_id',prev_trip_id);
5392: WSH_DEBUG_SV.log(l_module_name,'prev_truck_num',prev_truck_num);
5393: WSH_DEBUG_SV.log(l_module_name,'truck_flag',truck_flag);
5394: WSH_DEBUG_SV.log(l_module_name,'WDD ID',l_local_dd_rec(i).del_detail_id );
5395: END IF;
5388: WSH_DEBUG_SV.log(l_module_name,'curr_initial_pickup_date',curr_initial_pickup_date);
5389: WSH_DEBUG_SV.log(l_module_name,'curr_expected_receipt_date',curr_expected_receipt_date);
5390: WSH_DEBUG_SV.log(l_module_name,'l_trigger',l_trigger);
5391: WSH_DEBUG_SV.log(l_module_name,'prev_trip_id',prev_trip_id);
5392: WSH_DEBUG_SV.log(l_module_name,'prev_truck_num',prev_truck_num);
5393: WSH_DEBUG_SV.log(l_module_name,'truck_flag',truck_flag);
5394: WSH_DEBUG_SV.log(l_module_name,'WDD ID',l_local_dd_rec(i).del_detail_id );
5395: END IF;
5396: --
5389: WSH_DEBUG_SV.log(l_module_name,'curr_expected_receipt_date',curr_expected_receipt_date);
5390: WSH_DEBUG_SV.log(l_module_name,'l_trigger',l_trigger);
5391: WSH_DEBUG_SV.log(l_module_name,'prev_trip_id',prev_trip_id);
5392: WSH_DEBUG_SV.log(l_module_name,'prev_truck_num',prev_truck_num);
5393: WSH_DEBUG_SV.log(l_module_name,'truck_flag',truck_flag);
5394: WSH_DEBUG_SV.log(l_module_name,'WDD ID',l_local_dd_rec(i).del_detail_id );
5395: END IF;
5396: --
5397: --
5390: WSH_DEBUG_SV.log(l_module_name,'l_trigger',l_trigger);
5391: WSH_DEBUG_SV.log(l_module_name,'prev_trip_id',prev_trip_id);
5392: WSH_DEBUG_SV.log(l_module_name,'prev_truck_num',prev_truck_num);
5393: WSH_DEBUG_SV.log(l_module_name,'truck_flag',truck_flag);
5394: WSH_DEBUG_SV.log(l_module_name,'WDD ID',l_local_dd_rec(i).del_detail_id );
5395: END IF;
5396: --
5397: --
5398: l_wdd_tbl(l_wdd_tbl.count + 1) := l_local_dd_rec(i).del_detail_id ;
5415: --The BOL has changed from the previous record, but both records have the
5416: --same delivery.
5417: IF (NVL(curr_BOL,'$$$$$$') <> NVL(l_local_dd_rec(i).BOL,'$$$$$$')) THEN
5418: IF l_debug_on THEN
5419: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit CREATE_UPDATE_WAYBILL_PSNO_BOL 1',WSH_DEBUG_SV.C_PROC_LEVEL);
5420: END IF;
5421: --This API (create_update_waybill_psno_bol) based on the l_trigger (0/1) determines whether
5422: --a new Delivery ID has to be created for the current logical group.
5423: create_update_waybill_psno_bol(
5440: --
5441: -- Debug Statements
5442: --
5443: IF l_debug_on THEN
5444: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
5445: END IF;
5446: --
5447: wsh_util_core.api_post_call(
5448: p_return_status => l_return_status,
5466: --
5467: -- Debug Statements
5468: --
5469: IF l_debug_on THEN
5470: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_ACTIONS.PACK_INBOUND_LINES',WSH_DEBUG_SV.C_PROC_LEVEL);
5471: END IF;
5472: --
5473: --Call wsh_container_actions.pack_inbound_lines to pack lines to LPNs.
5474: wsh_container_actions.pack_inbound_lines(
5482: --
5483: -- Debug Statements
5484: --
5485: IF l_debug_on THEN
5486: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
5487: END IF;
5488: --
5489: wsh_util_core.api_post_call(
5490: p_return_status => l_return_status,
5503: --So things like packing the lines to containers,creating new delivery ID (based on l_trigger value)
5504: --for the logical group etc are taken care by the call to the API CREATE_UPDATE_WAYBILL_PSNO_BOL.
5505: ELSE
5506: IF l_debug_on THEN
5507: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit CREATE_UPDATE_WAYBILL_PSNO_BOL 2',WSH_DEBUG_SV.C_PROC_LEVEL);
5508: END IF;
5509: --Call to API CREATE_UPDATE_WAYBILL_PSNO_BOL.
5510: create_update_waybill_psno_bol(
5511: p_local_dd_rec => l_local_dd_rec,
5527: --
5528: -- Debug Statements
5529: --
5530: IF l_debug_on THEN
5531: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
5532: END IF;
5533: --
5534: wsh_util_core.api_post_call(
5535: p_return_status => l_return_status,
5544:
5545: END IF;
5546:
5547: IF l_debug_on THEN
5548: WSH_DEBUG_SV.log(l_module_name,'l_psno_flag',l_psno_flag);
5549: WSH_DEBUG_SV.log(l_module_name,'l_psno',l_psno);
5550: WSH_DEBUG_SV.log(l_module_name,'l_waybill_flag',l_waybill_flag);
5551: WSH_DEBUG_SV.log(l_module_name,'l_waybill',l_waybill);
5552: END IF;
5545: END IF;
5546:
5547: IF l_debug_on THEN
5548: WSH_DEBUG_SV.log(l_module_name,'l_psno_flag',l_psno_flag);
5549: WSH_DEBUG_SV.log(l_module_name,'l_psno',l_psno);
5550: WSH_DEBUG_SV.log(l_module_name,'l_waybill_flag',l_waybill_flag);
5551: WSH_DEBUG_SV.log(l_module_name,'l_waybill',l_waybill);
5552: END IF;
5553: --
5546:
5547: IF l_debug_on THEN
5548: WSH_DEBUG_SV.log(l_module_name,'l_psno_flag',l_psno_flag);
5549: WSH_DEBUG_SV.log(l_module_name,'l_psno',l_psno);
5550: WSH_DEBUG_SV.log(l_module_name,'l_waybill_flag',l_waybill_flag);
5551: WSH_DEBUG_SV.log(l_module_name,'l_waybill',l_waybill);
5552: END IF;
5553: --
5554:
5547: IF l_debug_on THEN
5548: WSH_DEBUG_SV.log(l_module_name,'l_psno_flag',l_psno_flag);
5549: WSH_DEBUG_SV.log(l_module_name,'l_psno',l_psno);
5550: WSH_DEBUG_SV.log(l_module_name,'l_waybill_flag',l_waybill_flag);
5551: WSH_DEBUG_SV.log(l_module_name,'l_waybill',l_waybill);
5552: END IF;
5553: --
5554:
5555:
5648: --True always, since there will be atleast one left out unprocessed record always.
5649: IF (pack_ids.COUNT > 0) THEN
5650:
5651: IF l_debug_on THEN
5652: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit CREATE_UPDATE_WAYBILL_PSNO_BOL 3',WSH_DEBUG_SV.C_PROC_LEVEL);
5653: END IF;
5654:
5655: --Call to API create_update_waybill_psno_bol
5656: create_update_waybill_psno_bol(
5673: --
5674: -- Debug Statements
5675: --
5676: IF l_debug_on THEN
5677: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
5678: END IF;
5679: --
5680: wsh_util_core.api_post_call(
5681: p_return_status => l_return_status,
5694:
5695: END IF;
5696:
5697: IF l_debug_on THEN
5698: WSH_DEBUG_SV.log(l_module_name,'l_wdd_tbl.count',l_wdd_tbl.count);
5699: WSH_DEBUG_SV.log(l_module_name,'l_wdd_tbl.first',l_wdd_tbl.first);
5700: WSH_DEBUG_SV.log(l_module_name,'l_wdd_tbl.last',l_wdd_tbl.last);
5701: END IF;
5702:
5695: END IF;
5696:
5697: IF l_debug_on THEN
5698: WSH_DEBUG_SV.log(l_module_name,'l_wdd_tbl.count',l_wdd_tbl.count);
5699: WSH_DEBUG_SV.log(l_module_name,'l_wdd_tbl.first',l_wdd_tbl.first);
5700: WSH_DEBUG_SV.log(l_module_name,'l_wdd_tbl.last',l_wdd_tbl.last);
5701: END IF;
5702:
5703:
5696:
5697: IF l_debug_on THEN
5698: WSH_DEBUG_SV.log(l_module_name,'l_wdd_tbl.count',l_wdd_tbl.count);
5699: WSH_DEBUG_SV.log(l_module_name,'l_wdd_tbl.first',l_wdd_tbl.first);
5700: WSH_DEBUG_SV.log(l_module_name,'l_wdd_tbl.last',l_wdd_tbl.last);
5701: END IF;
5702:
5703:
5704: --IF temp_dels.COUNT > 0 THEN
5719: --
5720: -- Debug Statements
5721: --
5722: IF l_debug_on THEN
5723: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
5724: END IF;
5725: --
5726: wsh_util_core.api_post_call(
5727: p_return_status => l_return_status,
5791: --
5792: -- Debug Statements
5793: --
5794: IF l_debug_on THEN
5795: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
5796: END IF;
5797: --
5798: wsh_util_core.api_post_call(
5799: p_return_status => l_return_status,
5821: temp_dels(temp_dels.COUNT + 1) := empty_it_dlvy_rec.delivery_id;
5822: --
5823: --
5824: IF l_debug_on THEN
5825: WSH_DEBUG_SV.log(l_module_name,'empty_it_dlvy_rec.delivery_id',empty_it_dlvy_rec.delivery_id);
5826: WSH_DEBUG_SV.log(l_module_name,'empty_it_dlvy_rec.status_code',empty_it_dlvy_rec.status_code);
5827: WSH_DEBUG_SV.log(l_module_name,'empty_it_dlvy_rec.ultimate_dropoff_date',empty_it_dlvy_rec.ultimate_dropoff_date);
5828: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.setClose',WSH_DEBUG_SV.C_PROC_LEVEL);
5829: END IF;
5822: --
5823: --
5824: IF l_debug_on THEN
5825: WSH_DEBUG_SV.log(l_module_name,'empty_it_dlvy_rec.delivery_id',empty_it_dlvy_rec.delivery_id);
5826: WSH_DEBUG_SV.log(l_module_name,'empty_it_dlvy_rec.status_code',empty_it_dlvy_rec.status_code);
5827: WSH_DEBUG_SV.log(l_module_name,'empty_it_dlvy_rec.ultimate_dropoff_date',empty_it_dlvy_rec.ultimate_dropoff_date);
5828: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.setClose',WSH_DEBUG_SV.C_PROC_LEVEL);
5829: END IF;
5830: --
5823: --
5824: IF l_debug_on THEN
5825: WSH_DEBUG_SV.log(l_module_name,'empty_it_dlvy_rec.delivery_id',empty_it_dlvy_rec.delivery_id);
5826: WSH_DEBUG_SV.log(l_module_name,'empty_it_dlvy_rec.status_code',empty_it_dlvy_rec.status_code);
5827: WSH_DEBUG_SV.log(l_module_name,'empty_it_dlvy_rec.ultimate_dropoff_date',empty_it_dlvy_rec.ultimate_dropoff_date);
5828: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.setClose',WSH_DEBUG_SV.C_PROC_LEVEL);
5829: END IF;
5830: --
5831: WSH_NEW_DELIVERY_ACTIONS.setClose
5824: IF l_debug_on THEN
5825: WSH_DEBUG_SV.log(l_module_name,'empty_it_dlvy_rec.delivery_id',empty_it_dlvy_rec.delivery_id);
5826: WSH_DEBUG_SV.log(l_module_name,'empty_it_dlvy_rec.status_code',empty_it_dlvy_rec.status_code);
5827: WSH_DEBUG_SV.log(l_module_name,'empty_it_dlvy_rec.ultimate_dropoff_date',empty_it_dlvy_rec.ultimate_dropoff_date);
5828: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.setClose',WSH_DEBUG_SV.C_PROC_LEVEL);
5829: END IF;
5830: --
5831: WSH_NEW_DELIVERY_ACTIONS.setClose
5832: (
5836: --
5837: -- Debug Statements
5838: --
5839: IF l_debug_on THEN
5840: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
5841: END IF;
5842: --
5843: wsh_util_core.api_post_call(
5844: p_return_status => l_return_status,
5854: -- trip stop status of the deliveries.
5855: IF temp_dels.COUNT > 0 THEN
5856:
5857: IF l_debug_on THEN
5858: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_UTIL_PKG.SETTRIPSTOPSTATUS',WSH_DEBUG_SV.C_PROC_LEVEL);
5859: END IF;
5860: --
5861:
5862: IF l_debug_on THEN
5859: END IF;
5860: --
5861:
5862: IF l_debug_on THEN
5863: WSH_DEBUG_SV.log(l_module_name,'action code to trip stop :',p_action_prms.action_code);
5864: END IF;
5865:
5866: WSH_INBOUND_UTIL_PKG.setTripStopStatus(
5867: p_transaction_code => l_local_dd_rec(1).transaction_type,
5869: p_delivery_id_tab => temp_dels,
5870: x_return_status => l_return_status);
5871:
5872: IF l_debug_on THEN
5873: WSH_DEBUG_SV.log(l_module_name,'ret sts of trip stop :',l_return_status);
5874: END IF;
5875:
5876: --
5877: -- Debug Statements
5876: --
5877: -- Debug Statements
5878: --
5879: IF l_debug_on THEN
5880: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
5881: END IF;
5882: --
5883: wsh_util_core.api_post_call(
5884: p_return_status => l_return_status,
5890: --
5891: -- Debug Statements
5892: --
5893: IF l_debug_on THEN
5894: WSH_DEBUG_SV.pop(l_module_name);
5895: END IF;
5896: --
5897: IF l_num_errors > 0 THEN
5898: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5910: --
5911: -- Debug Statements
5912: --
5913: IF l_debug_on THEN
5914: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5915: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
5916: END IF;
5917: --
5918: WHEN OTHERS THEN
5911: -- Debug Statements
5912: --
5913: IF l_debug_on THEN
5914: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5915: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
5916: END IF;
5917: --
5918: WHEN OTHERS THEN
5919: ROLLBACK TO RECONFIG_DEL_TRIPS_PVT;
5923: --
5924: -- Debug Statements
5925: --
5926: IF l_debug_on THEN
5927: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5928: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5929: END IF;
5930: --
5931: END reconfigure_del_trips;
5924: -- Debug Statements
5925: --
5926: IF l_debug_on THEN
5927: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5928: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5929: END IF;
5930: --
5931: END reconfigure_del_trips;
5932:
5971: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5972: --
5973: IF l_debug_on IS NULL
5974: THEN
5975: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5976: END IF;
5977: --
5978: --
5979: -- Debug Statements
5978: --
5979: -- Debug Statements
5980: --
5981: IF l_debug_on THEN
5982: WSH_DEBUG_SV.push(l_module_name);
5983: END IF;
5984: --
5985: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5986: l_count := p_local_dd_rec.COUNT;
5985: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5986: l_count := p_local_dd_rec.COUNT;
5987:
5988: IF l_debug_on THEN
5989: WSH_DEBUG_SV.log(l_module_name, 'l_count', l_count);
5990: WSH_DEBUG_SV.logmsg(l_module_name, 'Before the loop - BASED ON TRIP ID');
5991: WSH_DEBUG_SV.log(l_module_name, 'its first index is', p_local_dd_rec.first);
5992: WSH_DEBUG_SV.log(l_module_name, 'its last index is', p_local_dd_rec.last);
5993: END IF;
5986: l_count := p_local_dd_rec.COUNT;
5987:
5988: IF l_debug_on THEN
5989: WSH_DEBUG_SV.log(l_module_name, 'l_count', l_count);
5990: WSH_DEBUG_SV.logmsg(l_module_name, 'Before the loop - BASED ON TRIP ID');
5991: WSH_DEBUG_SV.log(l_module_name, 'its first index is', p_local_dd_rec.first);
5992: WSH_DEBUG_SV.log(l_module_name, 'its last index is', p_local_dd_rec.last);
5993: END IF;
5994:
5987:
5988: IF l_debug_on THEN
5989: WSH_DEBUG_SV.log(l_module_name, 'l_count', l_count);
5990: WSH_DEBUG_SV.logmsg(l_module_name, 'Before the loop - BASED ON TRIP ID');
5991: WSH_DEBUG_SV.log(l_module_name, 'its first index is', p_local_dd_rec.first);
5992: WSH_DEBUG_SV.log(l_module_name, 'its last index is', p_local_dd_rec.last);
5993: END IF;
5994:
5995: --BUBBLE SORT BASED ON TRIP ID
5988: IF l_debug_on THEN
5989: WSH_DEBUG_SV.log(l_module_name, 'l_count', l_count);
5990: WSH_DEBUG_SV.logmsg(l_module_name, 'Before the loop - BASED ON TRIP ID');
5991: WSH_DEBUG_SV.log(l_module_name, 'its first index is', p_local_dd_rec.first);
5992: WSH_DEBUG_SV.log(l_module_name, 'its last index is', p_local_dd_rec.last);
5993: END IF;
5994:
5995: --BUBBLE SORT BASED ON TRIP ID
5996: FOR i in 1..(l_count-1) LOOP
6005:
6006:
6007:
6008: IF l_debug_on THEN
6009: WSH_DEBUG_SV.logmsg(l_module_name, 'Before the loop - BASED ON TRIP ID,DEL_ID');
6010: END IF;
6011:
6012: --BUBBLE SORT BASED ON TRIP ID,DELIVERY ID
6013: l_ub := 1;
6032: END LOOP;
6033:
6034:
6035: IF l_debug_on THEN
6036: WSH_DEBUG_SV.logmsg(l_module_name, 'Before the loop - BASED ON TRIP ID,DELIVERY ID,BOL');
6037: END IF;
6038:
6039: l_ub := 1;
6040: --BUBBLE SORT BASED ON TRIP ID,DELIVERY ID,BOL IN THAT ORDER.
6059: l_ub := l_ub + 1;
6060: END LOOP;
6061:
6062: IF l_debug_on THEN
6063: WSH_DEBUG_SV.logmsg(l_module_name, 'Before the loop - BASED ON TRIP ID,DEL_ID,BOL,LPNS');
6064: END IF;
6065:
6066:
6067:
6090: l_ub := l_ub + 1;
6091: END LOOP;
6092:
6093: IF l_debug_on THEN
6094: WSH_DEBUG_SV.logmsg(l_module_name, 'After the loop - BASED ON TRIP ID,DEL_ID,BOL,LPNS');
6095: END IF;
6096: --
6097: -- Debug Statements
6098: --
6096: --
6097: -- Debug Statements
6098: --
6099: IF l_debug_on THEN
6100: WSH_DEBUG_SV.pop(l_module_name);
6101: END IF;
6102: --
6103: IF l_num_errors > 0 THEN
6104: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6114: --
6115: -- Debug Statements
6116: --
6117: IF l_debug_on THEN
6118: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6119: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6120: END IF;
6121: --
6122: END sort_dd_rec;
6115: -- Debug Statements
6116: --
6117: IF l_debug_on THEN
6118: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6119: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6120: END IF;
6121: --
6122: END sort_dd_rec;
6123:
6181: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6182: --
6183: IF l_debug_on IS NULL
6184: THEN
6185: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6186: END IF;
6187: --
6188: --
6189: -- Debug Statements
6188: --
6189: -- Debug Statements
6190: --
6191: IF l_debug_on THEN
6192: WSH_DEBUG_SV.push(l_module_name);
6193: --
6194: WSH_DEBUG_SV.log(l_module_name,'P_DEL_ID',P_DEL_ID);
6195: WSH_DEBUG_SV.log(l_module_name,'P_BOL',P_BOL);
6196: END IF;
6190: --
6191: IF l_debug_on THEN
6192: WSH_DEBUG_SV.push(l_module_name);
6193: --
6194: WSH_DEBUG_SV.log(l_module_name,'P_DEL_ID',P_DEL_ID);
6195: WSH_DEBUG_SV.log(l_module_name,'P_BOL',P_BOL);
6196: END IF;
6197: --
6198: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6191: IF l_debug_on THEN
6192: WSH_DEBUG_SV.push(l_module_name);
6193: --
6194: WSH_DEBUG_SV.log(l_module_name,'P_DEL_ID',P_DEL_ID);
6195: WSH_DEBUG_SV.log(l_module_name,'P_BOL',P_BOL);
6196: END IF;
6197: --
6198: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6199: OPEN c_BOL(p_del_id);
6202: l_bol;
6203:
6204: --
6205: IF l_debug_on THEN
6206: WSH_DEBUG_SV.log(l_module_name,'l_delivery_leg_id',l_delivery_leg_id);
6207: WSH_DEBUG_SV.log(l_module_name,'l_bol',l_bol);
6208: END IF;
6209: --
6210:
6203:
6204: --
6205: IF l_debug_on THEN
6206: WSH_DEBUG_SV.log(l_module_name,'l_delivery_leg_id',l_delivery_leg_id);
6207: WSH_DEBUG_SV.log(l_module_name,'l_bol',l_bol);
6208: END IF;
6209: --
6210:
6211:
6231: ELSIF (c_BOL%NOTFOUND) AND (p_bol IS NOT NULL) THEN
6232:
6233:
6234: IF l_debug_on THEN
6235: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.CREATE_UPDATE_INBOUND_DOCUMENT',WSH_DEBUG_SV.C_PROC_LEVEL);
6236: END IF;
6237:
6238:
6239: create_update_inbound_document (
6245: --
6246: -- Debug Statements
6247: --
6248: IF l_debug_on THEN
6249: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6250: END IF;
6251: --
6252: wsh_util_core.api_post_call(
6253: p_return_status => l_return_status,
6258:
6259: CLOSE c_bol;
6260:
6261: IF l_debug_on THEN
6262: WSH_DEBUG_SV.log(l_module_name,'ret sts at synch bols',x_return_status);
6263: END IF;
6264:
6265: --
6266: -- Debug Statements
6265: --
6266: -- Debug Statements
6267: --
6268: IF l_debug_on THEN
6269: WSH_DEBUG_SV.pop(l_module_name);
6270: END IF;
6271: --
6272: IF l_num_errors > 0 THEN
6273: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6284: --
6285: -- Debug Statements
6286: --
6287: IF l_debug_on THEN
6288: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6289: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6290: END IF;
6291: --
6292: WHEN OTHERS THEN
6285: -- Debug Statements
6286: --
6287: IF l_debug_on THEN
6288: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6289: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6290: END IF;
6291: --
6292: WHEN OTHERS THEN
6293: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
6296: --
6297: -- Debug Statements
6298: --
6299: IF l_debug_on THEN
6300: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6301: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6302: END IF;
6303: --
6304: END synch_bols;
6297: -- Debug Statements
6298: --
6299: IF l_debug_on THEN
6300: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6301: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6302: END IF;
6303: --
6304: END synch_bols;
6305:
6401: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6402: --
6403: IF l_debug_on IS NULL
6404: THEN
6405: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6406: END IF;
6407: --
6408: --
6409: -- Debug Statements
6408: --
6409: -- Debug Statements
6410: --
6411: IF l_debug_on THEN
6412: WSH_DEBUG_SV.push(l_module_name);
6413: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
6414: WSH_DEBUG_SV.log(l_module_name,'p_del_ids.COUNT',p_del_ids.COUNT);
6415: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.COUNT',p_trip_ids.COUNT);
6416: WSH_DEBUG_SV.log(l_module_name,'p_stop_ids.COUNT',p_stop_ids.COUNT);
6409: -- Debug Statements
6410: --
6411: IF l_debug_on THEN
6412: WSH_DEBUG_SV.push(l_module_name);
6413: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
6414: WSH_DEBUG_SV.log(l_module_name,'p_del_ids.COUNT',p_del_ids.COUNT);
6415: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.COUNT',p_trip_ids.COUNT);
6416: WSH_DEBUG_SV.log(l_module_name,'p_stop_ids.COUNT',p_stop_ids.COUNT);
6417: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id_tab.COUNT',p_shipment_header_id_tab.COUNT);
6410: --
6411: IF l_debug_on THEN
6412: WSH_DEBUG_SV.push(l_module_name);
6413: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
6414: WSH_DEBUG_SV.log(l_module_name,'p_del_ids.COUNT',p_del_ids.COUNT);
6415: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.COUNT',p_trip_ids.COUNT);
6416: WSH_DEBUG_SV.log(l_module_name,'p_stop_ids.COUNT',p_stop_ids.COUNT);
6417: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id_tab.COUNT',p_shipment_header_id_tab.COUNT);
6418: WSH_DEBUG_SV.log(l_module_name,'p_initial_pickup_date_tab.COUNT',p_initial_pickup_date_tab.COUNT);
6411: IF l_debug_on THEN
6412: WSH_DEBUG_SV.push(l_module_name);
6413: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
6414: WSH_DEBUG_SV.log(l_module_name,'p_del_ids.COUNT',p_del_ids.COUNT);
6415: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.COUNT',p_trip_ids.COUNT);
6416: WSH_DEBUG_SV.log(l_module_name,'p_stop_ids.COUNT',p_stop_ids.COUNT);
6417: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id_tab.COUNT',p_shipment_header_id_tab.COUNT);
6418: WSH_DEBUG_SV.log(l_module_name,'p_initial_pickup_date_tab.COUNT',p_initial_pickup_date_tab.COUNT);
6419: WSH_DEBUG_SV.log(l_module_name,'p_expected_receipt_date_tab.COUNT',p_expected_receipt_date_tab.COUNT);
6412: WSH_DEBUG_SV.push(l_module_name);
6413: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
6414: WSH_DEBUG_SV.log(l_module_name,'p_del_ids.COUNT',p_del_ids.COUNT);
6415: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.COUNT',p_trip_ids.COUNT);
6416: WSH_DEBUG_SV.log(l_module_name,'p_stop_ids.COUNT',p_stop_ids.COUNT);
6417: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id_tab.COUNT',p_shipment_header_id_tab.COUNT);
6418: WSH_DEBUG_SV.log(l_module_name,'p_initial_pickup_date_tab.COUNT',p_initial_pickup_date_tab.COUNT);
6419: WSH_DEBUG_SV.log(l_module_name,'p_expected_receipt_date_tab.COUNT',p_expected_receipt_date_tab.COUNT);
6420: WSH_DEBUG_SV.log(l_module_name,'p_rcv_carrier_id_tab.COUNT',p_rcv_carrier_id_tab.COUNT);
6413: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
6414: WSH_DEBUG_SV.log(l_module_name,'p_del_ids.COUNT',p_del_ids.COUNT);
6415: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.COUNT',p_trip_ids.COUNT);
6416: WSH_DEBUG_SV.log(l_module_name,'p_stop_ids.COUNT',p_stop_ids.COUNT);
6417: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id_tab.COUNT',p_shipment_header_id_tab.COUNT);
6418: WSH_DEBUG_SV.log(l_module_name,'p_initial_pickup_date_tab.COUNT',p_initial_pickup_date_tab.COUNT);
6419: WSH_DEBUG_SV.log(l_module_name,'p_expected_receipt_date_tab.COUNT',p_expected_receipt_date_tab.COUNT);
6420: WSH_DEBUG_SV.log(l_module_name,'p_rcv_carrier_id_tab.COUNT',p_rcv_carrier_id_tab.COUNT);
6421: END IF;
6414: WSH_DEBUG_SV.log(l_module_name,'p_del_ids.COUNT',p_del_ids.COUNT);
6415: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.COUNT',p_trip_ids.COUNT);
6416: WSH_DEBUG_SV.log(l_module_name,'p_stop_ids.COUNT',p_stop_ids.COUNT);
6417: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id_tab.COUNT',p_shipment_header_id_tab.COUNT);
6418: WSH_DEBUG_SV.log(l_module_name,'p_initial_pickup_date_tab.COUNT',p_initial_pickup_date_tab.COUNT);
6419: WSH_DEBUG_SV.log(l_module_name,'p_expected_receipt_date_tab.COUNT',p_expected_receipt_date_tab.COUNT);
6420: WSH_DEBUG_SV.log(l_module_name,'p_rcv_carrier_id_tab.COUNT',p_rcv_carrier_id_tab.COUNT);
6421: END IF;
6422: --
6415: WSH_DEBUG_SV.log(l_module_name,'p_trip_ids.COUNT',p_trip_ids.COUNT);
6416: WSH_DEBUG_SV.log(l_module_name,'p_stop_ids.COUNT',p_stop_ids.COUNT);
6417: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id_tab.COUNT',p_shipment_header_id_tab.COUNT);
6418: WSH_DEBUG_SV.log(l_module_name,'p_initial_pickup_date_tab.COUNT',p_initial_pickup_date_tab.COUNT);
6419: WSH_DEBUG_SV.log(l_module_name,'p_expected_receipt_date_tab.COUNT',p_expected_receipt_date_tab.COUNT);
6420: WSH_DEBUG_SV.log(l_module_name,'p_rcv_carrier_id_tab.COUNT',p_rcv_carrier_id_tab.COUNT);
6421: END IF;
6422: --
6423: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6416: WSH_DEBUG_SV.log(l_module_name,'p_stop_ids.COUNT',p_stop_ids.COUNT);
6417: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id_tab.COUNT',p_shipment_header_id_tab.COUNT);
6418: WSH_DEBUG_SV.log(l_module_name,'p_initial_pickup_date_tab.COUNT',p_initial_pickup_date_tab.COUNT);
6419: WSH_DEBUG_SV.log(l_module_name,'p_expected_receipt_date_tab.COUNT',p_expected_receipt_date_tab.COUNT);
6420: WSH_DEBUG_SV.log(l_module_name,'p_rcv_carrier_id_tab.COUNT',p_rcv_carrier_id_tab.COUNT);
6421: END IF;
6422: --
6423: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6424: SAVEPOINT UPDATE_STATUS_PVT;
6426: IF p_del_ids.COUNT > 0 THEN
6427: FOR i IN 1..p_del_ids.COUNT LOOP
6428:
6429: IF l_debug_on THEN
6430: WSH_DEBUG_SV.log(l_module_name,'p_del_ids(i)',p_del_ids(i));
6431: END IF;
6432: --
6433: IF ( p_action_prms.action_code IN ('ASN', 'RECEIPT')) THEN
6434: --{
6450:
6451: IF p_action_prms.action_code ='ASN' THEN
6452:
6453: IF l_debug_on THEN
6454: WSH_DEBUG_SV.log(l_module_name,'p_del_ids(i)',p_del_ids(i));
6455: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id_tab(i)',p_shipment_header_id_tab(i));
6456: WSH_DEBUG_SV.log(l_module_name,'p_initial_pickup_date_tab(i)',p_initial_pickup_date_tab(i));
6457: END IF;
6458:
6451: IF p_action_prms.action_code ='ASN' THEN
6452:
6453: IF l_debug_on THEN
6454: WSH_DEBUG_SV.log(l_module_name,'p_del_ids(i)',p_del_ids(i));
6455: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id_tab(i)',p_shipment_header_id_tab(i));
6456: WSH_DEBUG_SV.log(l_module_name,'p_initial_pickup_date_tab(i)',p_initial_pickup_date_tab(i));
6457: END IF;
6458:
6459: UPDATE WSH_NEW_DELIVERIES
6452:
6453: IF l_debug_on THEN
6454: WSH_DEBUG_SV.log(l_module_name,'p_del_ids(i)',p_del_ids(i));
6455: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id_tab(i)',p_shipment_header_id_tab(i));
6456: WSH_DEBUG_SV.log(l_module_name,'p_initial_pickup_date_tab(i)',p_initial_pickup_date_tab(i));
6457: END IF;
6458:
6459: UPDATE WSH_NEW_DELIVERIES
6460: SET status_code = 'IT',
6500: p_organization_id => l_organization_id ,
6501: x_return_status => l_wf_rs ) ;
6502: --Error Handling to be done in WSH_WF_STD.Raise_Event itself
6503: IF l_debug_on THEN
6504: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
6505: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', p_del_ids(i));
6506: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
6507: END IF;
6508: --Done Raise Event: Pick To Pod Workflow
6501: x_return_status => l_wf_rs ) ;
6502: --Error Handling to be done in WSH_WF_STD.Raise_Event itself
6503: IF l_debug_on THEN
6504: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
6505: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', p_del_ids(i));
6506: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
6507: END IF;
6508: --Done Raise Event: Pick To Pod Workflow
6509: */
6502: --Error Handling to be done in WSH_WF_STD.Raise_Event itself
6503: IF l_debug_on THEN
6504: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
6505: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', p_del_ids(i));
6506: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
6507: END IF;
6508: --Done Raise Event: Pick To Pod Workflow
6509: */
6510: ELSIF p_action_prms.action_code = 'CANCEL_ASN' or p_action_prms.action_code = 'REVERT_ASN' then
6526: p_organization_id => l_organization_id ,
6527: x_return_status => l_wf_rs ) ;
6528: --Error Handling to be done in WSH_WF_STD.Raise_Event itself
6529: IF l_debug_on THEN
6530: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
6531: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', p_del_ids(i));
6532: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
6533: END IF;
6534: --Done Raise Event: Pick To Pod Workflow
6527: x_return_status => l_wf_rs ) ;
6528: --Error Handling to be done in WSH_WF_STD.Raise_Event itself
6529: IF l_debug_on THEN
6530: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
6531: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', p_del_ids(i));
6532: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
6533: END IF;
6534: --Done Raise Event: Pick To Pod Workflow
6535: */
6528: --Error Handling to be done in WSH_WF_STD.Raise_Event itself
6529: IF l_debug_on THEN
6530: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
6531: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', p_del_ids(i));
6532: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
6533: END IF;
6534: --Done Raise Event: Pick To Pod Workflow
6535: */
6536: ELSIF p_action_prms.action_code = 'RECEIPT' THEN
6535: */
6536: ELSIF p_action_prms.action_code = 'RECEIPT' THEN
6537:
6538: IF l_debug_on THEN
6539: WSH_DEBUG_SV.log(l_module_name,'p_del_ids(i)',p_del_ids(i));
6540: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id_tab(i)',p_shipment_header_id_tab(i));
6541: WSH_DEBUG_SV.log(l_module_name,'p_expected_receipt_date_tab(i)',p_expected_receipt_date_tab(i));
6542: END IF;
6543:
6536: ELSIF p_action_prms.action_code = 'RECEIPT' THEN
6537:
6538: IF l_debug_on THEN
6539: WSH_DEBUG_SV.log(l_module_name,'p_del_ids(i)',p_del_ids(i));
6540: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id_tab(i)',p_shipment_header_id_tab(i));
6541: WSH_DEBUG_SV.log(l_module_name,'p_expected_receipt_date_tab(i)',p_expected_receipt_date_tab(i));
6542: END IF;
6543:
6544: UPDATE WSH_NEW_DELIVERIES
6537:
6538: IF l_debug_on THEN
6539: WSH_DEBUG_SV.log(l_module_name,'p_del_ids(i)',p_del_ids(i));
6540: WSH_DEBUG_SV.log(l_module_name,'p_shipment_header_id_tab(i)',p_shipment_header_id_tab(i));
6541: WSH_DEBUG_SV.log(l_module_name,'p_expected_receipt_date_tab(i)',p_expected_receipt_date_tab(i));
6542: END IF;
6543:
6544: UPDATE WSH_NEW_DELIVERIES
6545: SET status_code = 'CL',
6598: p_organization_id => l_organization_id ,
6599: x_return_status => l_wf_rs ) ;
6600: --Error Handling to be done in WSH_WF_STD.Raise_Event itself
6601: IF l_debug_on THEN
6602: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
6603: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', p_del_ids(i));
6604: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
6605: END IF;
6606: --Done Raise Event: Pick To Pod Workflow
6599: x_return_status => l_wf_rs ) ;
6600: --Error Handling to be done in WSH_WF_STD.Raise_Event itself
6601: IF l_debug_on THEN
6602: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
6603: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', p_del_ids(i));
6604: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
6605: END IF;
6606: --Done Raise Event: Pick To Pod Workflow
6607: */
6600: --Error Handling to be done in WSH_WF_STD.Raise_Event itself
6601: IF l_debug_on THEN
6602: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
6603: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', p_del_ids(i));
6604: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
6605: END IF;
6606: --Done Raise Event: Pick To Pod Workflow
6607: */
6608:
6623: --
6624: -- Debug Statements
6625: --
6626: IF l_debug_on THEN
6627: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.POPULATE_RECORD',WSH_DEBUG_SV.C_PROC_LEVEL);
6628: END IF;
6629: --
6630: WSH_NEW_DELIVERIES_PVT.Populate_Record
6631: (p_delivery_id => p_del_ids(p_del_ids.FIRST),
6634: --
6635: -- Debug Statements
6636: --
6637: IF l_debug_on THEN
6638: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6639: END IF;
6640: --
6641: wsh_util_core.api_post_call(
6642: p_return_status => l_return_status,
6650: --
6651: -- Debug Statements
6652: --
6653: IF l_debug_on THEN
6654: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.UPDATE_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
6655: END IF;
6656: --
6657: WSH_NEW_DELIVERIES_PVT.Update_Delivery
6658: (p_rowid => l_delivery_info.ROWID,
6661: --
6662: -- Debug Statements
6663: --
6664: IF l_debug_on THEN
6665: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6666: END IF;
6667: --
6668: wsh_util_core.api_post_call(
6669: p_return_status => l_return_status,
6674: --
6675: --
6676: --{ --NNP-WV
6677: IF l_debug_on THEN
6678: WSH_DEBUG_SV.log(l_module_name,'l_flag',l_flag);
6679: END IF;
6680:
6681: IF ( NOT(l_flag) AND(p_action_prms.action_code ='ASN' OR p_action_prms.action_code ='RECEIPT') )
6682: THEN
6681: IF ( NOT(l_flag) AND(p_action_prms.action_code ='ASN' OR p_action_prms.action_code ='RECEIPT') )
6682: THEN
6683: --{
6684: IF l_debug_on THEN
6685: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.updateWeightVolume',WSH_DEBUG_SV.C_PROC_LEVEL);
6686: END IF;
6687: --
6688: --
6689: WSH_ASN_RECEIPT_PVT.updateWeightVolume
6698: x_return_status => l_return_status
6699: );
6700: --
6701: IF l_debug_on THEN
6702: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6703: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6704: END IF;
6705: --
6706: wsh_util_core.api_post_call
6699: );
6700: --
6701: IF l_debug_on THEN
6702: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6703: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6704: END IF;
6705: --
6706: wsh_util_core.api_post_call
6707: (
6710: x_num_errors => l_num_errors
6711: );
6712: --
6713: IF l_debug_on THEN
6714: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.updateWeightVolume',WSH_DEBUG_SV.C_PROC_LEVEL);
6715: END IF;
6716: --
6717: --
6718: WSH_ASN_RECEIPT_PVT.updateWeightVolume
6727: x_return_status => l_return_status
6728: );
6729: --
6730: IF l_debug_on THEN
6731: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6732: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6733: END IF;
6734: --
6735: wsh_util_core.api_post_call
6728: );
6729: --
6730: IF l_debug_on THEN
6731: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6732: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6733: END IF;
6734: --
6735: wsh_util_core.api_post_call
6736: (
6748: --
6749: -- Debug Statements
6750: --
6751: IF l_debug_on THEN
6752: WSH_DEBUG_SV.pop(l_module_name);
6753: END IF;
6754: --
6755: IF l_num_errors > 0 THEN
6756: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6768: --
6769: -- Debug Statements
6770: --
6771: IF l_debug_on THEN
6772: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6773: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6774: END IF;
6775: --
6776: END Update_status;
6769: -- Debug Statements
6770: --
6771: IF l_debug_on THEN
6772: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6773: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6774: END IF;
6775: --
6776: END Update_status;
6777:
6837: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6838: --
6839: IF l_debug_on IS NULL
6840: THEN
6841: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6842: END IF;
6843: --
6844: --
6845: -- Debug Statements
6844: --
6845: -- Debug Statements
6846: --
6847: IF l_debug_on THEN
6848: WSH_DEBUG_SV.push(l_module_name);
6849: --
6850: WSH_DEBUG_SV.log(l_module_name,'P_REMAINING_QTY',P_REMAINING_QTY);
6851: WSH_DEBUG_SV.log(l_module_name,'PO_SHIPMENT_LINE_ID',PO_SHIPMENT_LINE_ID);
6852: WSH_DEBUG_SV.log(l_module_name,'p_sli_qty_cache.count',p_sli_qty_cache.count);
6846: --
6847: IF l_debug_on THEN
6848: WSH_DEBUG_SV.push(l_module_name);
6849: --
6850: WSH_DEBUG_SV.log(l_module_name,'P_REMAINING_QTY',P_REMAINING_QTY);
6851: WSH_DEBUG_SV.log(l_module_name,'PO_SHIPMENT_LINE_ID',PO_SHIPMENT_LINE_ID);
6852: WSH_DEBUG_SV.log(l_module_name,'p_sli_qty_cache.count',p_sli_qty_cache.count);
6853: WSH_DEBUG_SV.log(l_module_name,'p_sli_qty_ext_cache.count',p_sli_qty_ext_cache.count);
6854: END IF;
6847: IF l_debug_on THEN
6848: WSH_DEBUG_SV.push(l_module_name);
6849: --
6850: WSH_DEBUG_SV.log(l_module_name,'P_REMAINING_QTY',P_REMAINING_QTY);
6851: WSH_DEBUG_SV.log(l_module_name,'PO_SHIPMENT_LINE_ID',PO_SHIPMENT_LINE_ID);
6852: WSH_DEBUG_SV.log(l_module_name,'p_sli_qty_cache.count',p_sli_qty_cache.count);
6853: WSH_DEBUG_SV.log(l_module_name,'p_sli_qty_ext_cache.count',p_sli_qty_ext_cache.count);
6854: END IF;
6855: --
6848: WSH_DEBUG_SV.push(l_module_name);
6849: --
6850: WSH_DEBUG_SV.log(l_module_name,'P_REMAINING_QTY',P_REMAINING_QTY);
6851: WSH_DEBUG_SV.log(l_module_name,'PO_SHIPMENT_LINE_ID',PO_SHIPMENT_LINE_ID);
6852: WSH_DEBUG_SV.log(l_module_name,'p_sli_qty_cache.count',p_sli_qty_cache.count);
6853: WSH_DEBUG_SV.log(l_module_name,'p_sli_qty_ext_cache.count',p_sli_qty_ext_cache.count);
6854: END IF;
6855: --
6856: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6849: --
6850: WSH_DEBUG_SV.log(l_module_name,'P_REMAINING_QTY',P_REMAINING_QTY);
6851: WSH_DEBUG_SV.log(l_module_name,'PO_SHIPMENT_LINE_ID',PO_SHIPMENT_LINE_ID);
6852: WSH_DEBUG_SV.log(l_module_name,'p_sli_qty_cache.count',p_sli_qty_cache.count);
6853: WSH_DEBUG_SV.log(l_module_name,'p_sli_qty_ext_cache.count',p_sli_qty_ext_cache.count);
6854: END IF;
6855: --
6856: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6857: l_new_qty := p_remaining_qty;
6859: --
6860: -- Debug Statements
6861: --
6862: IF l_debug_on THEN
6863: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-p_sli_qty_cache',WSH_DEBUG_SV.C_PROC_LEVEL);
6864: END IF;
6865: --
6866: wsh_util_core.get_cached_value(
6867: p_cache_tbl => p_sli_qty_cache,
6871: p_action => 'GET',
6872: x_return_status => l_return_status );
6873:
6874: IF l_debug_on THEN
6875: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6876: WSH_DEBUG_SV.log(l_module_name,'after get-p_remaining_qty',p_remaining_qty);
6877: END IF;
6878: --
6879:
6872: x_return_status => l_return_status );
6873:
6874: IF l_debug_on THEN
6875: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6876: WSH_DEBUG_SV.log(l_module_name,'after get-p_remaining_qty',p_remaining_qty);
6877: END IF;
6878: --
6879:
6880: --MEANS THE PO_LINE_LOCATION_ID IS NOT THERE IN THE CACHE
6893: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6894: END IF;
6895:
6896: IF l_debug_on THEN
6897: WSH_DEBUG_SV.log(l_module_name,'final-p_remaining_qty',p_remaining_qty);
6898: END IF;
6899: --
6900: --
6901: -- Debug Statements
6900: --
6901: -- Debug Statements
6902: --
6903: IF l_debug_on THEN
6904: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-p_sli_qty_cache',WSH_DEBUG_SV.C_PROC_LEVEL);
6905: END IF;
6906: --
6907: wsh_util_core.get_cached_value(
6908: p_cache_tbl => p_sli_qty_cache,
6921:
6922:
6923:
6924: IF l_debug_on THEN
6925: WSH_DEBUG_SV.pop(l_module_name);
6926: END IF;
6927: --
6928: IF l_num_errors > 0 THEN
6929: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6940: --
6941: -- Debug Statements
6942: --
6943: IF l_debug_on THEN
6944: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6945: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6946: END IF;
6947: --
6948: END consolidate_qty;
6941: -- Debug Statements
6942: --
6943: IF l_debug_on THEN
6944: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6945: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6946: END IF;
6947: --
6948: END consolidate_qty;
6949:
7040: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7041: --
7042: IF l_debug_on IS NULL
7043: THEN
7044: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7045: END IF;
7046: --
7047: --
7048: -- Debug Statements
7047: --
7048: -- Debug Statements
7049: --
7050: IF l_debug_on THEN
7051: WSH_DEBUG_SV.push(l_module_name);
7052: --
7053: WSH_DEBUG_SV.log(l_module_name,'P_INDEX',P_INDEX);
7054: WSH_DEBUG_SV.log(l_module_name,'P_gross_weight',P_gross_weight);
7055: WSH_DEBUG_SV.log(l_module_name,'P_net_weight',P_net_weight);
7049: --
7050: IF l_debug_on THEN
7051: WSH_DEBUG_SV.push(l_module_name);
7052: --
7053: WSH_DEBUG_SV.log(l_module_name,'P_INDEX',P_INDEX);
7054: WSH_DEBUG_SV.log(l_module_name,'P_gross_weight',P_gross_weight);
7055: WSH_DEBUG_SV.log(l_module_name,'P_net_weight',P_net_weight);
7056: WSH_DEBUG_SV.log(l_module_name,'P_volume',P_volume);
7057: WSH_DEBUG_SV.log(l_module_name,'X_RELEASE_STATUS',X_RELEASE_STATUS);
7050: IF l_debug_on THEN
7051: WSH_DEBUG_SV.push(l_module_name);
7052: --
7053: WSH_DEBUG_SV.log(l_module_name,'P_INDEX',P_INDEX);
7054: WSH_DEBUG_SV.log(l_module_name,'P_gross_weight',P_gross_weight);
7055: WSH_DEBUG_SV.log(l_module_name,'P_net_weight',P_net_weight);
7056: WSH_DEBUG_SV.log(l_module_name,'P_volume',P_volume);
7057: WSH_DEBUG_SV.log(l_module_name,'X_RELEASE_STATUS',X_RELEASE_STATUS);
7058: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id.COUNT',l_update_dd_rec.delivery_detail_id.COUNT);
7051: WSH_DEBUG_SV.push(l_module_name);
7052: --
7053: WSH_DEBUG_SV.log(l_module_name,'P_INDEX',P_INDEX);
7054: WSH_DEBUG_SV.log(l_module_name,'P_gross_weight',P_gross_weight);
7055: WSH_DEBUG_SV.log(l_module_name,'P_net_weight',P_net_weight);
7056: WSH_DEBUG_SV.log(l_module_name,'P_volume',P_volume);
7057: WSH_DEBUG_SV.log(l_module_name,'X_RELEASE_STATUS',X_RELEASE_STATUS);
7058: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id.COUNT',l_update_dd_rec.delivery_detail_id.COUNT);
7059: END IF;
7052: --
7053: WSH_DEBUG_SV.log(l_module_name,'P_INDEX',P_INDEX);
7054: WSH_DEBUG_SV.log(l_module_name,'P_gross_weight',P_gross_weight);
7055: WSH_DEBUG_SV.log(l_module_name,'P_net_weight',P_net_weight);
7056: WSH_DEBUG_SV.log(l_module_name,'P_volume',P_volume);
7057: WSH_DEBUG_SV.log(l_module_name,'X_RELEASE_STATUS',X_RELEASE_STATUS);
7058: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id.COUNT',l_update_dd_rec.delivery_detail_id.COUNT);
7059: END IF;
7060: --
7053: WSH_DEBUG_SV.log(l_module_name,'P_INDEX',P_INDEX);
7054: WSH_DEBUG_SV.log(l_module_name,'P_gross_weight',P_gross_weight);
7055: WSH_DEBUG_SV.log(l_module_name,'P_net_weight',P_net_weight);
7056: WSH_DEBUG_SV.log(l_module_name,'P_volume',P_volume);
7057: WSH_DEBUG_SV.log(l_module_name,'X_RELEASE_STATUS',X_RELEASE_STATUS);
7058: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id.COUNT',l_update_dd_rec.delivery_detail_id.COUNT);
7059: END IF;
7060: --
7061: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7054: WSH_DEBUG_SV.log(l_module_name,'P_gross_weight',P_gross_weight);
7055: WSH_DEBUG_SV.log(l_module_name,'P_net_weight',P_net_weight);
7056: WSH_DEBUG_SV.log(l_module_name,'P_volume',P_volume);
7057: WSH_DEBUG_SV.log(l_module_name,'X_RELEASE_STATUS',X_RELEASE_STATUS);
7058: WSH_DEBUG_SV.log(l_module_name,'l_update_dd_rec.delivery_detail_id.COUNT',l_update_dd_rec.delivery_detail_id.COUNT);
7059: END IF;
7060: --
7061: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7062:
7093: l_shp_rcv_qty2 := p_dd_rec.received_qty2_tab(p_index); -- NNP
7094: END IF;
7095:
7096: IF l_debug_on THEN
7097: WSH_DEBUG_SV.log(l_module_name,'l_shp_rcv_quantity',l_shp_rcv_qty);
7098: WSH_DEBUG_SV.log(l_module_name,'l_shp_rcv_quantity2',l_shp_rcv_qty2);
7099: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.requested_qty_tab(p_index)',p_dd_rec.requested_qty_tab(p_index));
7100: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.ship_from_location_id_tab(p_index)',p_dd_rec.ship_from_location_id_tab(p_index));
7101: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.last_update_date_tab(p_index)',p_dd_rec.last_update_date_tab(p_index));
7094: END IF;
7095:
7096: IF l_debug_on THEN
7097: WSH_DEBUG_SV.log(l_module_name,'l_shp_rcv_quantity',l_shp_rcv_qty);
7098: WSH_DEBUG_SV.log(l_module_name,'l_shp_rcv_quantity2',l_shp_rcv_qty2);
7099: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.requested_qty_tab(p_index)',p_dd_rec.requested_qty_tab(p_index));
7100: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.ship_from_location_id_tab(p_index)',p_dd_rec.ship_from_location_id_tab(p_index));
7101: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.last_update_date_tab(p_index)',p_dd_rec.last_update_date_tab(p_index));
7102: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.shipped_date(l_index)',p_line_rec.shipped_date(l_index));
7095:
7096: IF l_debug_on THEN
7097: WSH_DEBUG_SV.log(l_module_name,'l_shp_rcv_quantity',l_shp_rcv_qty);
7098: WSH_DEBUG_SV.log(l_module_name,'l_shp_rcv_quantity2',l_shp_rcv_qty2);
7099: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.requested_qty_tab(p_index)',p_dd_rec.requested_qty_tab(p_index));
7100: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.ship_from_location_id_tab(p_index)',p_dd_rec.ship_from_location_id_tab(p_index));
7101: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.last_update_date_tab(p_index)',p_dd_rec.last_update_date_tab(p_index));
7102: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.shipped_date(l_index)',p_line_rec.shipped_date(l_index));
7103: END IF;
7096: IF l_debug_on THEN
7097: WSH_DEBUG_SV.log(l_module_name,'l_shp_rcv_quantity',l_shp_rcv_qty);
7098: WSH_DEBUG_SV.log(l_module_name,'l_shp_rcv_quantity2',l_shp_rcv_qty2);
7099: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.requested_qty_tab(p_index)',p_dd_rec.requested_qty_tab(p_index));
7100: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.ship_from_location_id_tab(p_index)',p_dd_rec.ship_from_location_id_tab(p_index));
7101: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.last_update_date_tab(p_index)',p_dd_rec.last_update_date_tab(p_index));
7102: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.shipped_date(l_index)',p_line_rec.shipped_date(l_index));
7103: END IF;
7104:
7097: WSH_DEBUG_SV.log(l_module_name,'l_shp_rcv_quantity',l_shp_rcv_qty);
7098: WSH_DEBUG_SV.log(l_module_name,'l_shp_rcv_quantity2',l_shp_rcv_qty2);
7099: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.requested_qty_tab(p_index)',p_dd_rec.requested_qty_tab(p_index));
7100: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.ship_from_location_id_tab(p_index)',p_dd_rec.ship_from_location_id_tab(p_index));
7101: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.last_update_date_tab(p_index)',p_dd_rec.last_update_date_tab(p_index));
7102: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.shipped_date(l_index)',p_line_rec.shipped_date(l_index));
7103: END IF;
7104:
7105: l_update_dd_rec.delivery_detail_id(i) := p_dd_rec.del_detail_id_tab(p_index);
7098: WSH_DEBUG_SV.log(l_module_name,'l_shp_rcv_quantity2',l_shp_rcv_qty2);
7099: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.requested_qty_tab(p_index)',p_dd_rec.requested_qty_tab(p_index));
7100: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.ship_from_location_id_tab(p_index)',p_dd_rec.ship_from_location_id_tab(p_index));
7101: WSH_DEBUG_SV.log(l_module_name,'p_dd_rec.last_update_date_tab(p_index)',p_dd_rec.last_update_date_tab(p_index));
7102: WSH_DEBUG_SV.log(l_module_name,'p_line_rec.shipped_date(l_index)',p_line_rec.shipped_date(l_index));
7103: END IF;
7104:
7105: l_update_dd_rec.delivery_detail_id(i) := p_dd_rec.del_detail_id_tab(p_index);
7106: l_update_dd_rec.requested_quantity(i) := least(p_dd_rec.requested_qty_tab(p_index),l_shp_rcv_qty);
7140: --
7141: CLOSE lpn_csr;
7142: --
7143: IF l_debug_on THEN
7144: WSH_DEBUG_SV.log(l_module_name,'l_lpn_id',l_lpn_id);
7145: WSH_DEBUG_SV.log(l_module_name,'l_lpn_lasT_update_date',l_lpn_last_update_date);
7146: WSH_DEBUG_SV.log(l_module_name,'contents - WDD ID ',l_update_dd_rec.delivery_detail_id(i));
7147: END IF;
7148: --
7141: CLOSE lpn_csr;
7142: --
7143: IF l_debug_on THEN
7144: WSH_DEBUG_SV.log(l_module_name,'l_lpn_id',l_lpn_id);
7145: WSH_DEBUG_SV.log(l_module_name,'l_lpn_lasT_update_date',l_lpn_last_update_date);
7146: WSH_DEBUG_SV.log(l_module_name,'contents - WDD ID ',l_update_dd_rec.delivery_detail_id(i));
7147: END IF;
7148: --
7149:
7142: --
7143: IF l_debug_on THEN
7144: WSH_DEBUG_SV.log(l_module_name,'l_lpn_id',l_lpn_id);
7145: WSH_DEBUG_SV.log(l_module_name,'l_lpn_lasT_update_date',l_lpn_last_update_date);
7146: WSH_DEBUG_SV.log(l_module_name,'contents - WDD ID ',l_update_dd_rec.delivery_detail_id(i));
7147: END IF;
7148: --
7149:
7150: --If true, it implies that the current delivery detail has an LPN associated with it.
7151: IF l_lpn_id IS NOT NULL
7152: THEN
7153: --{
7154: IF l_debug_on THEN
7155: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-x_lpnIdcacheTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
7156: END IF;
7157: --
7158:
7159: --Check whether the LPN is already there in the cache table. If the LPN is
7169: );
7170: --
7171: --
7172: IF l_debug_on THEN
7173: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7174: END IF;
7175: --
7176: --
7177: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
7183: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
7184: THEN
7185: --{
7186: IF l_debug_on THEN
7187: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_CACHED_VALUE-x_cacheTbl',WSH_DEBUG_SV.C_PROC_LEVEL);
7188: END IF;
7189: --
7190:
7191: --Add the LPN ID into this table as it is not existing till now.
7200: );
7201: --
7202: --
7203: IF l_debug_on THEN
7204: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7205: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7206: END IF;
7207: --
7208: wsh_util_core.api_post_call
7201: --
7202: --
7203: IF l_debug_on THEN
7204: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7205: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7206: END IF;
7207: --
7208: wsh_util_core.api_post_call
7209: (
7269: --
7270: -- Debug Statements
7271: --
7272: IF l_debug_on THEN
7273: WSH_DEBUG_SV.pop(l_module_name);
7274: END IF;
7275: --
7276:
7277: IF l_num_errors > 0 THEN
7289: --
7290: -- Debug Statements
7291: --
7292: IF l_debug_on THEN
7293: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7294: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7295: END IF;
7296: --
7297:
7290: -- Debug Statements
7291: --
7292: IF l_debug_on THEN
7293: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7294: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7295: END IF;
7296: --
7297:
7298:
7433: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7434: --
7435: IF l_debug_on IS NULL
7436: THEN
7437: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7438: END IF;
7439: --
7440: --
7441: -- Debug Statements
7440: --
7441: -- Debug Statements
7442: --
7443: IF l_debug_on THEN
7444: WSH_DEBUG_SV.push(l_module_name);
7445: --
7446: WSH_DEBUG_SV.log(l_module_name,'L_LOOP_INDEX',L_LOOP_INDEX);
7447: WSH_DEBUG_SV.log(l_module_name,'CURR_DEL',CURR_DEL);
7448: WSH_DEBUG_SV.log(l_module_name,'CURR_BOL',CURR_BOL);
7442: --
7443: IF l_debug_on THEN
7444: WSH_DEBUG_SV.push(l_module_name);
7445: --
7446: WSH_DEBUG_SV.log(l_module_name,'L_LOOP_INDEX',L_LOOP_INDEX);
7447: WSH_DEBUG_SV.log(l_module_name,'CURR_DEL',CURR_DEL);
7448: WSH_DEBUG_SV.log(l_module_name,'CURR_BOL',CURR_BOL);
7449: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN',CURR_LPN);
7450: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN_NAME',CURR_LPN_NAME);
7443: IF l_debug_on THEN
7444: WSH_DEBUG_SV.push(l_module_name);
7445: --
7446: WSH_DEBUG_SV.log(l_module_name,'L_LOOP_INDEX',L_LOOP_INDEX);
7447: WSH_DEBUG_SV.log(l_module_name,'CURR_DEL',CURR_DEL);
7448: WSH_DEBUG_SV.log(l_module_name,'CURR_BOL',CURR_BOL);
7449: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN',CURR_LPN);
7450: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN_NAME',CURR_LPN_NAME);
7451: WSH_DEBUG_SV.log(l_module_name,'CURR_DEL_DET',CURR_DEL_DET);
7444: WSH_DEBUG_SV.push(l_module_name);
7445: --
7446: WSH_DEBUG_SV.log(l_module_name,'L_LOOP_INDEX',L_LOOP_INDEX);
7447: WSH_DEBUG_SV.log(l_module_name,'CURR_DEL',CURR_DEL);
7448: WSH_DEBUG_SV.log(l_module_name,'CURR_BOL',CURR_BOL);
7449: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN',CURR_LPN);
7450: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN_NAME',CURR_LPN_NAME);
7451: WSH_DEBUG_SV.log(l_module_name,'CURR_DEL_DET',CURR_DEL_DET);
7452: WSH_DEBUG_SV.log(l_module_name,'L_PSNO',L_PSNO);
7445: --
7446: WSH_DEBUG_SV.log(l_module_name,'L_LOOP_INDEX',L_LOOP_INDEX);
7447: WSH_DEBUG_SV.log(l_module_name,'CURR_DEL',CURR_DEL);
7448: WSH_DEBUG_SV.log(l_module_name,'CURR_BOL',CURR_BOL);
7449: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN',CURR_LPN);
7450: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN_NAME',CURR_LPN_NAME);
7451: WSH_DEBUG_SV.log(l_module_name,'CURR_DEL_DET',CURR_DEL_DET);
7452: WSH_DEBUG_SV.log(l_module_name,'L_PSNO',L_PSNO);
7453: WSH_DEBUG_SV.log(l_module_name,'L_WAYBILL',L_WAYBILL);
7446: WSH_DEBUG_SV.log(l_module_name,'L_LOOP_INDEX',L_LOOP_INDEX);
7447: WSH_DEBUG_SV.log(l_module_name,'CURR_DEL',CURR_DEL);
7448: WSH_DEBUG_SV.log(l_module_name,'CURR_BOL',CURR_BOL);
7449: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN',CURR_LPN);
7450: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN_NAME',CURR_LPN_NAME);
7451: WSH_DEBUG_SV.log(l_module_name,'CURR_DEL_DET',CURR_DEL_DET);
7452: WSH_DEBUG_SV.log(l_module_name,'L_PSNO',L_PSNO);
7453: WSH_DEBUG_SV.log(l_module_name,'L_WAYBILL',L_WAYBILL);
7454: WSH_DEBUG_SV.log(l_module_name,'L_PSNO_FLAG',L_PSNO_FLAG);
7447: WSH_DEBUG_SV.log(l_module_name,'CURR_DEL',CURR_DEL);
7448: WSH_DEBUG_SV.log(l_module_name,'CURR_BOL',CURR_BOL);
7449: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN',CURR_LPN);
7450: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN_NAME',CURR_LPN_NAME);
7451: WSH_DEBUG_SV.log(l_module_name,'CURR_DEL_DET',CURR_DEL_DET);
7452: WSH_DEBUG_SV.log(l_module_name,'L_PSNO',L_PSNO);
7453: WSH_DEBUG_SV.log(l_module_name,'L_WAYBILL',L_WAYBILL);
7454: WSH_DEBUG_SV.log(l_module_name,'L_PSNO_FLAG',L_PSNO_FLAG);
7455: WSH_DEBUG_SV.log(l_module_name,'L_TRIGGER',L_TRIGGER);
7448: WSH_DEBUG_SV.log(l_module_name,'CURR_BOL',CURR_BOL);
7449: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN',CURR_LPN);
7450: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN_NAME',CURR_LPN_NAME);
7451: WSH_DEBUG_SV.log(l_module_name,'CURR_DEL_DET',CURR_DEL_DET);
7452: WSH_DEBUG_SV.log(l_module_name,'L_PSNO',L_PSNO);
7453: WSH_DEBUG_SV.log(l_module_name,'L_WAYBILL',L_WAYBILL);
7454: WSH_DEBUG_SV.log(l_module_name,'L_PSNO_FLAG',L_PSNO_FLAG);
7455: WSH_DEBUG_SV.log(l_module_name,'L_TRIGGER',L_TRIGGER);
7456: WSH_DEBUG_SV.log(l_module_name,'L_WAYBILL_FLAG',L_WAYBILL_FLAG);
7449: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN',CURR_LPN);
7450: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN_NAME',CURR_LPN_NAME);
7451: WSH_DEBUG_SV.log(l_module_name,'CURR_DEL_DET',CURR_DEL_DET);
7452: WSH_DEBUG_SV.log(l_module_name,'L_PSNO',L_PSNO);
7453: WSH_DEBUG_SV.log(l_module_name,'L_WAYBILL',L_WAYBILL);
7454: WSH_DEBUG_SV.log(l_module_name,'L_PSNO_FLAG',L_PSNO_FLAG);
7455: WSH_DEBUG_SV.log(l_module_name,'L_TRIGGER',L_TRIGGER);
7456: WSH_DEBUG_SV.log(l_module_name,'L_WAYBILL_FLAG',L_WAYBILL_FLAG);
7457: WSH_DEBUG_SV.log(l_module_name,'pack_ids.COUNT',pack_ids.COUNT);
7450: WSH_DEBUG_SV.log(l_module_name,'CURR_LPN_NAME',CURR_LPN_NAME);
7451: WSH_DEBUG_SV.log(l_module_name,'CURR_DEL_DET',CURR_DEL_DET);
7452: WSH_DEBUG_SV.log(l_module_name,'L_PSNO',L_PSNO);
7453: WSH_DEBUG_SV.log(l_module_name,'L_WAYBILL',L_WAYBILL);
7454: WSH_DEBUG_SV.log(l_module_name,'L_PSNO_FLAG',L_PSNO_FLAG);
7455: WSH_DEBUG_SV.log(l_module_name,'L_TRIGGER',L_TRIGGER);
7456: WSH_DEBUG_SV.log(l_module_name,'L_WAYBILL_FLAG',L_WAYBILL_FLAG);
7457: WSH_DEBUG_SV.log(l_module_name,'pack_ids.COUNT',pack_ids.COUNT);
7458: END IF;
7451: WSH_DEBUG_SV.log(l_module_name,'CURR_DEL_DET',CURR_DEL_DET);
7452: WSH_DEBUG_SV.log(l_module_name,'L_PSNO',L_PSNO);
7453: WSH_DEBUG_SV.log(l_module_name,'L_WAYBILL',L_WAYBILL);
7454: WSH_DEBUG_SV.log(l_module_name,'L_PSNO_FLAG',L_PSNO_FLAG);
7455: WSH_DEBUG_SV.log(l_module_name,'L_TRIGGER',L_TRIGGER);
7456: WSH_DEBUG_SV.log(l_module_name,'L_WAYBILL_FLAG',L_WAYBILL_FLAG);
7457: WSH_DEBUG_SV.log(l_module_name,'pack_ids.COUNT',pack_ids.COUNT);
7458: END IF;
7459: --
7452: WSH_DEBUG_SV.log(l_module_name,'L_PSNO',L_PSNO);
7453: WSH_DEBUG_SV.log(l_module_name,'L_WAYBILL',L_WAYBILL);
7454: WSH_DEBUG_SV.log(l_module_name,'L_PSNO_FLAG',L_PSNO_FLAG);
7455: WSH_DEBUG_SV.log(l_module_name,'L_TRIGGER',L_TRIGGER);
7456: WSH_DEBUG_SV.log(l_module_name,'L_WAYBILL_FLAG',L_WAYBILL_FLAG);
7457: WSH_DEBUG_SV.log(l_module_name,'pack_ids.COUNT',pack_ids.COUNT);
7458: END IF;
7459: --
7460:
7453: WSH_DEBUG_SV.log(l_module_name,'L_WAYBILL',L_WAYBILL);
7454: WSH_DEBUG_SV.log(l_module_name,'L_PSNO_FLAG',L_PSNO_FLAG);
7455: WSH_DEBUG_SV.log(l_module_name,'L_TRIGGER',L_TRIGGER);
7456: WSH_DEBUG_SV.log(l_module_name,'L_WAYBILL_FLAG',L_WAYBILL_FLAG);
7457: WSH_DEBUG_SV.log(l_module_name,'pack_ids.COUNT',pack_ids.COUNT);
7458: END IF;
7459: --
7460:
7461:
7466: --
7467: -- Debug Statements
7468: --
7469: IF l_debug_on THEN
7470: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_ACTIONS.PACK_INBOUND_LINES',WSH_DEBUG_SV.C_PROC_LEVEL);
7471: END IF;
7472: --
7473: --Call to API wsh_container_actions.pack_inbound_lines
7474: wsh_container_actions.pack_inbound_lines(
7482: --
7483: -- Debug Statements
7484: --
7485: IF l_debug_on THEN
7486: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7487: END IF;
7488: --
7489: wsh_util_core.api_post_call(
7490: p_return_status => l_return_status,
7504: --
7505: -- Debug Statements
7506: --
7507: IF l_debug_on THEN
7508: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INBOUND_UTIL_PKG.SPLIT_INBOUND_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
7509: END IF;
7510: --
7511: --Call to API WSH_INBOUND_UTIL_PKG.split_inbound_delivery
7512: WSH_INBOUND_UTIL_PKG.split_inbound_delivery(
7517: --
7518: -- Debug Statements
7519: --
7520: IF l_debug_on THEN
7521: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7522: END IF;
7523: --
7524: wsh_util_core.api_post_call(
7525: p_return_status => l_return_status,
7535: -- with the BOL number curr_bol for the current Delivery.
7536: IF (c_get_last_leg%FOUND) AND (curr_bol IS NOT NULL) THEN
7537:
7538: IF l_debug_on THEN
7539: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.CREATE_UPDATE_INBOUND_DOCUMENT ',WSH_DEBUG_SV.C_PROC_LEVEL);
7540: END IF;
7541:
7542: --Call to API create_update_inbound_document
7543: create_update_inbound_document (
7550: --
7551: -- Debug Statements
7552: --
7553: IF l_debug_on THEN
7554: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7555: END IF;
7556: --
7557: wsh_util_core.api_post_call(
7558: p_return_status => l_return_status,
7575:
7576: IF c_get_last_leg%FOUND THEN
7577:
7578: IF l_debug_on THEN
7579: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.SYNCH_BOLS',WSH_DEBUG_SV.C_PROC_LEVEL);
7580: END IF;
7581:
7582: --API to update/synch the BOL.
7583: synch_bols(
7589: --
7590: -- Debug Statements
7591: --
7592: IF l_debug_on THEN
7593: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7594: END IF;
7595: --
7596:
7597: wsh_util_core.api_post_call(
7633:
7634: IF SQL%NOTFOUND THEN
7635:
7636: IF l_debug_on THEN
7637: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ASN_RECEIPT_PVT.CREATE_UPDATE_INBOUND_DOCUMENT',WSH_DEBUG_SV.C_PROC_LEVEL);
7638: END IF;
7639:
7640: create_update_inbound_document (
7641: p_document_number => l_psno,
7647: --
7648: -- Debug Statements
7649: --
7650: IF l_debug_on THEN
7651: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7652: END IF;
7653: --
7654: wsh_util_core.api_post_call(
7655: p_return_status => l_return_status,
7689: --
7690: -- Debug Statements
7691: --
7692: IF l_debug_on THEN
7693: WSH_DEBUG_SV.pop(l_module_name);
7694: END IF;
7695: --
7696: IF l_num_errors > 0 THEN
7697: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7708: --
7709: -- Debug Statements
7710: --
7711: IF l_debug_on THEN
7712: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7713: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7714: END IF;
7715: --
7716: WHEN OTHERS THEN
7709: -- Debug Statements
7710: --
7711: IF l_debug_on THEN
7712: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7713: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7714: END IF;
7715: --
7716: WHEN OTHERS THEN
7717: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
7720: --
7721: -- Debug Statements
7722: --
7723: IF l_debug_on THEN
7724: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7725: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7726: END IF;
7727: --
7728: END create_update_waybill_psno_bol;
7721: -- Debug Statements
7722: --
7723: IF l_debug_on THEN
7724: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7725: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7726: END IF;
7727: --
7728: END create_update_waybill_psno_bol;
7729:
7847: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7848: --
7849: IF l_debug_on IS NULL
7850: THEN
7851: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7852: END IF;
7853: --
7854: --
7855: -- Debug Statements
7854: --
7855: -- Debug Statements
7856: --
7857: IF l_debug_on THEN
7858: WSH_DEBUG_SV.push(l_module_name);
7859: --
7860: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',p_delivery_id);
7861: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_NUMBER',p_document_number);
7862: WSH_DEBUG_SV.log(l_module_name,'p_entity_name',p_entity_name);
7856: --
7857: IF l_debug_on THEN
7858: WSH_DEBUG_SV.push(l_module_name);
7859: --
7860: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',p_delivery_id);
7861: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_NUMBER',p_document_number);
7862: WSH_DEBUG_SV.log(l_module_name,'p_entity_name',p_entity_name);
7863: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type',p_transaction_type);
7864: END IF;
7857: IF l_debug_on THEN
7858: WSH_DEBUG_SV.push(l_module_name);
7859: --
7860: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',p_delivery_id);
7861: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_NUMBER',p_document_number);
7862: WSH_DEBUG_SV.log(l_module_name,'p_entity_name',p_entity_name);
7863: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type',p_transaction_type);
7864: END IF;
7865: --
7858: WSH_DEBUG_SV.push(l_module_name);
7859: --
7860: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',p_delivery_id);
7861: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_NUMBER',p_document_number);
7862: WSH_DEBUG_SV.log(l_module_name,'p_entity_name',p_entity_name);
7863: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type',p_transaction_type);
7864: END IF;
7865: --
7866:
7859: --
7860: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',p_delivery_id);
7861: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_NUMBER',p_document_number);
7862: WSH_DEBUG_SV.log(l_module_name,'p_entity_name',p_entity_name);
7863: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type',p_transaction_type);
7864: END IF;
7865: --
7866:
7867: OPEN get_delivery_info;
7920: FETCH c_bol_psno_exists INTO l_temp;
7921:
7922:
7923: IF l_debug_on THEN
7924: WSH_DEBUG_SV.log(l_module_name,'l_temp',l_temp);
7925: END IF;
7926:
7927:
7928: --True if record already exists in wsh_document_instances for this delivery leg id
8038: --
8039: -- Debug Statements
8040: --
8041: IF l_debug_on THEN
8042: WSH_DEBUG_SV.pop(l_module_name);
8043: END IF;
8044: --
8045: IF l_num_errors > 0 THEN
8046: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8057: --
8058: -- Debug Statements
8059: --
8060: IF l_debug_on THEN
8061: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8062: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
8063: END IF;
8064: --
8065: WHEN OTHERS THEN
8058: -- Debug Statements
8059: --
8060: IF l_debug_on THEN
8061: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8062: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
8063: END IF;
8064: --
8065: WHEN OTHERS THEN
8066: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
8068: --
8069: -- Debug Statements
8070: --
8071: IF l_debug_on THEN
8072: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8073: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8074: END IF;
8075: --
8076: end create_update_inbound_document ;
8069: -- Debug Statements
8070: --
8071: IF l_debug_on THEN
8072: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8073: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8074: END IF;
8075: --
8076: end create_update_inbound_document ;
8077:
8129: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8130: --
8131: IF l_debug_on IS NULL
8132: THEN
8133: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8134: END IF;
8135: --
8136: --
8137: -- Debug Statements
8136: --
8137: -- Debug Statements
8138: --
8139: IF l_debug_on THEN
8140: WSH_DEBUG_SV.push(l_module_name);
8141: WSH_DEBUG_SV.log(l_module_name, 'l_action_prms.action_code',l_action_prms.action_code);
8142: WSH_DEBUG_SV.log(l_module_name, 'p_po_cancel_rec.header_id.COUNT',p_po_cancel_rec.header_id.COUNT);
8143: WSH_DEBUG_SV.log(l_module_name, 'p_po_close_rec.header_id.COUNT',p_po_close_rec.header_id.COUNT);
8144: END IF;
8137: -- Debug Statements
8138: --
8139: IF l_debug_on THEN
8140: WSH_DEBUG_SV.push(l_module_name);
8141: WSH_DEBUG_SV.log(l_module_name, 'l_action_prms.action_code',l_action_prms.action_code);
8142: WSH_DEBUG_SV.log(l_module_name, 'p_po_cancel_rec.header_id.COUNT',p_po_cancel_rec.header_id.COUNT);
8143: WSH_DEBUG_SV.log(l_module_name, 'p_po_close_rec.header_id.COUNT',p_po_close_rec.header_id.COUNT);
8144: END IF;
8145: --
8138: --
8139: IF l_debug_on THEN
8140: WSH_DEBUG_SV.push(l_module_name);
8141: WSH_DEBUG_SV.log(l_module_name, 'l_action_prms.action_code',l_action_prms.action_code);
8142: WSH_DEBUG_SV.log(l_module_name, 'p_po_cancel_rec.header_id.COUNT',p_po_cancel_rec.header_id.COUNT);
8143: WSH_DEBUG_SV.log(l_module_name, 'p_po_close_rec.header_id.COUNT',p_po_close_rec.header_id.COUNT);
8144: END IF;
8145: --
8146:
8139: IF l_debug_on THEN
8140: WSH_DEBUG_SV.push(l_module_name);
8141: WSH_DEBUG_SV.log(l_module_name, 'l_action_prms.action_code',l_action_prms.action_code);
8142: WSH_DEBUG_SV.log(l_module_name, 'p_po_cancel_rec.header_id.COUNT',p_po_cancel_rec.header_id.COUNT);
8143: WSH_DEBUG_SV.log(l_module_name, 'p_po_close_rec.header_id.COUNT',p_po_close_rec.header_id.COUNT);
8144: END IF;
8145: --
8146:
8147: -- True if there are any lines(Delivery_detail_id s) to be Cancelled.Typically these are the
8150: --
8151: -- Debug Statements
8152: --
8153: IF l_debug_on THEN
8154: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PO_CMG_PVT.CANCEL_CLOSE_PO',WSH_DEBUG_SV.C_PROC_LEVEL);
8155:
8156: END IF;
8157: --
8158: l_action_prms.action_code := 'CANCEL_PO';
8164: --
8165: -- Debug Statements
8166: --
8167: IF l_debug_on THEN
8168: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8169: END IF;
8170: --
8171: wsh_util_core.api_post_call(
8172: p_return_status => l_return_status,
8181: --
8182: -- Debug Statements
8183: --
8184: IF l_debug_on THEN
8185: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PO_CMG_PVT.CANCEL_CLOSE_PO',WSH_DEBUG_SV.C_PROC_LEVEL);
8186: END IF;
8187: --
8188: l_action_prms.action_code := 'CLOSE_PO';
8189: --
8195: --
8196: -- Debug Statements
8197: --
8198: IF l_debug_on THEN
8199: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
8200: END IF;
8201: --
8202: wsh_util_core.api_post_call(
8203: p_return_status => l_return_status,
8211: --
8212: -- Debug Statements
8213: --
8214: IF l_debug_on THEN
8215: WSH_DEBUG_SV.pop(l_module_name);
8216: END IF;
8217: --
8218: IF l_num_errors > 0 THEN
8219: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8230: --
8231: -- Debug Statements
8232: --
8233: IF l_debug_on THEN
8234: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8235: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
8236: END IF;
8237: --
8238: WHEN OTHERS THEN
8231: -- Debug Statements
8232: --
8233: IF l_debug_on THEN
8234: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8235: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
8236: END IF;
8237: --
8238: WHEN OTHERS THEN
8239: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
8242: --
8243: -- Debug Statements
8244: --
8245: IF l_debug_on THEN
8246: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8247: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8248: END IF;
8249: --
8250: END cancel_close_pending_txns;
8243: -- Debug Statements
8244: --
8245: IF l_debug_on THEN
8246: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8247: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8248: END IF;
8249: --
8250: END cancel_close_pending_txns;
8251: