[Home] [Help]
244: l_debug_on := wsh_debug_interface.g_debug;
245:
246: --
247: IF l_debug_on IS NULL THEN
248: l_debug_on := wsh_debug_sv.is_debug_enabled;
249: END IF;
250:
251: --
252: SAVEPOINT detail_to_delivery_grp;
255: --
256: -- Debug Statements
257: --
258: IF l_debug_on THEN
259: wsh_debug_sv.push(l_module_name);
260: --
261: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
262: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
263: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
257: --
258: IF l_debug_on THEN
259: wsh_debug_sv.push(l_module_name);
260: --
261: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
262: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
263: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
264: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
265: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
258: IF l_debug_on THEN
259: wsh_debug_sv.push(l_module_name);
260: --
261: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
262: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
263: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
264: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
265: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
266: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
259: wsh_debug_sv.push(l_module_name);
260: --
261: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
262: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
263: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
264: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
265: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
266: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
267: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
260: --
261: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
262: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
263: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
264: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
265: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
266: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
267: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
268: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
261: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
262: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
263: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
264: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
265: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
266: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
267: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
268: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
269: END IF;
262: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
263: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
264: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
265: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
266: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
267: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
268: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
269: END IF;
270:
263: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
264: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
265: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
266: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
267: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
268: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
269: END IF;
270:
271: --
264: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
265: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
266: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
267: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
268: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
269: END IF;
270:
271: --
272: l_adjust_planned_del_tab.delete;
339: -- l_delivery_id := p_delivery_id;
340: END IF;
341:
342: IF l_debug_on THEN
343: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DLVB_COMMON_ACTIONS.ASSIGN_DETAILS', wsh_debug_sv.c_proc_level);
344: END IF;
345:
346: --
347:
348: /* Patchset I : Harmonization Project Begin
349: Instead of the old call to Assign_Multiple_Details
350: We now have call to wsh_dlvb_common_actions.assign_details */
351: IF l_debug_on THEN
352: wsh_debug_sv.logmsg(l_module_name, ' befor assign_details');
353: END IF;
354: wsh_dlvb_common_actions.assign_details(
355: p_detail_tab => l_tabofdeldets,
356: p_parent_detail_id => NULL,
377: -- deliveryMerge, collect the delivery ids for adjust_planned_flag call
378:
379: l_adjust_planned_del_tab(l_adjust_planned_del_tab.count+1) := p_delivery_id;
380: IF l_debug_on THEN
381: wsh_debug_sv.logmsg(l_module_name, ' added delivery '||p_delivery_id ||' for adjustment');
382: END IF;
383:
384: ELSE
385: /* no delivery id is passed for action assign */
387: END IF;
388: ELSE
389: /* unassign */
390: IF l_debug_on THEN
391: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_UNASSIGN_FROM_DELIVERY', wsh_debug_sv.c_proc_level);
392: END IF;
393:
394: wsh_details_validations.check_unassign_from_delivery(
395: p_detail_rows => l_tabofdeldets,
400: x_num_warnings => l_number_of_warnings,
401: x_num_errors => l_number_of_errors);
402:
403: IF l_debug_on THEN
404: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DLVB_COMMON_ACTIONS.UNASSIGN_DETAILS', wsh_debug_sv.c_proc_level);
405: END IF;
406:
407: /* Patchset I : Harmonization Project Begin
408: Instead of the old call to WSH_DELIVERY_DETAILS_ACTIONS.Unassign_Multiple_Details We now have call to wsh_dlvb_common_actions.unassign_details */
459: p_call_lcss => 'Y',
460: x_return_status => l_return_status);
461:
462: IF l_debug_on THEN
463: WSH_DEBUG_SV.log(l_module_name,'Adjust_Planned_Flag returns ',l_return_status);
464: END IF;
465:
466: wsh_util_core.api_post_call(
467: p_return_status => l_return_status,
471: END IF;
472:
473: IF l_number_of_warnings > 0 THEN
474: IF l_debug_on THEN
475: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
476: END IF;
477:
478: RAISE wsh_util_core.g_exc_warning;
479: END IF;
488: COMMIT WORK;
489: END IF;
490:
491: IF l_debug_on THEN
492: wsh_debug_sv.pop(l_module_name);
493: END IF;
494: --
495: EXCEPTION
496: WHEN fnd_api.g_exc_error THEN
502: p_encoded => fnd_api.g_false);
503:
504: --
505: IF l_debug_on THEN
506: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
507: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
508: END IF;
509: --
510: WHEN fnd_api.g_exc_unexpected_error THEN
503:
504: --
505: IF l_debug_on THEN
506: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
507: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
508: END IF;
509: --
510: WHEN fnd_api.g_exc_unexpected_error THEN
511: ROLLBACK TO detail_to_delivery_grp;
514: p_encoded => fnd_api.g_false);
515:
516: --
517: IF l_debug_on THEN
518: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
519: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
520: END IF;
521: --
522: WHEN wsh_util_core.g_exc_warning THEN
515:
516: --
517: IF l_debug_on THEN
518: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
519: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
520: END IF;
521: --
522: WHEN wsh_util_core.g_exc_warning THEN
523: x_return_status := wsh_util_core.g_ret_sts_warning;
525: p_encoded => fnd_api.g_false);
526:
527: --
528: IF l_debug_on THEN
529: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
530: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
531: END IF;
532:
533: WHEN wsh_invalid_action THEN
526:
527: --
528: IF l_debug_on THEN
529: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
530: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
531: END IF;
532:
533: WHEN wsh_invalid_action THEN
534: ROLLBACK TO detail_to_delivery_grp;
538: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
539: p_encoded => fnd_api.g_false);
540:
541: IF l_debug_on THEN
542: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_ACTION exception has occured.', wsh_debug_sv.c_excep_level);
543: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_ACTION');
544: END IF;
545:
546: WHEN wsh_no_del_det_tbl THEN
539: p_encoded => fnd_api.g_false);
540:
541: IF l_debug_on THEN
542: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_ACTION exception has occured.', wsh_debug_sv.c_excep_level);
543: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_ACTION');
544: END IF;
545:
546: WHEN wsh_no_del_det_tbl THEN
547: ROLLBACK TO detail_to_delivery_grp;
551: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
552: p_encoded => fnd_api.g_false);
553:
554: IF l_debug_on THEN
555: wsh_debug_sv.logmsg(l_module_name, 'WSH_NO_DEL_DET_TBL exception has occured.', wsh_debug_sv.c_excep_level);
556: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_NO_DEL_DET_TBL');
557: END IF;
558: --
559: WHEN wsh_no_delivery_id THEN
552: p_encoded => fnd_api.g_false);
553:
554: IF l_debug_on THEN
555: wsh_debug_sv.logmsg(l_module_name, 'WSH_NO_DEL_DET_TBL exception has occured.', wsh_debug_sv.c_excep_level);
556: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_NO_DEL_DET_TBL');
557: END IF;
558: --
559: WHEN wsh_no_delivery_id THEN
560: ROLLBACK TO detail_to_delivery_grp;
564: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
565: p_encoded => fnd_api.g_false);
566:
567: IF l_debug_on THEN
568: wsh_debug_sv.logmsg(l_module_name, 'WSH_NO_DELIVERY_ID exception has occured.', wsh_debug_sv.c_excep_level);
569: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_NO_DELIVERY_ID');
570: END IF;
571: --
572:
565: p_encoded => fnd_api.g_false);
566:
567: IF l_debug_on THEN
568: wsh_debug_sv.logmsg(l_module_name, 'WSH_NO_DELIVERY_ID exception has occured.', wsh_debug_sv.c_excep_level);
569: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_NO_DELIVERY_ID');
570: END IF;
571: --
572:
573: /*Start of 2777869*/
581: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
582: p_encoded => fnd_api.g_false);
583:
584: IF l_debug_on THEN
585: wsh_debug_sv.logmsg(l_module_name, 'WSH_NO_DELIVERY exception has occured.', wsh_debug_sv.c_excep_level);
586: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_NO_DELIVERY');
587: END IF;
588: --
589: WHEN wsh_invalid_delivery_id THEN
582: p_encoded => fnd_api.g_false);
583:
584: IF l_debug_on THEN
585: wsh_debug_sv.logmsg(l_module_name, 'WSH_NO_DELIVERY exception has occured.', wsh_debug_sv.c_excep_level);
586: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_NO_DELIVERY');
587: END IF;
588: --
589: WHEN wsh_invalid_delivery_id THEN
590: ROLLBACK TO detail_to_delivery_grp;
595: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
596: p_encoded => fnd_api.g_false);
597:
598: IF l_debug_on THEN
599: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_DELIVERY_ID exception has occured.', wsh_debug_sv.c_excep_level);
600: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_DELIVERY_ID');
601: END IF;
602:
603: /* End of 2777869*/
596: p_encoded => fnd_api.g_false);
597:
598: IF l_debug_on THEN
599: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_DELIVERY_ID exception has occured.', wsh_debug_sv.c_excep_level);
600: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_DELIVERY_ID');
601: END IF;
602:
603: /* End of 2777869*/
604: --
610: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
611: p_encoded => fnd_api.g_false);
612:
613: IF l_debug_on THEN
614: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is ' || SQLERRM, wsh_debug_sv.c_unexpec_err_level);
615: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
616: END IF;
617: --
618: END detail_to_delivery;
611: p_encoded => fnd_api.g_false);
612:
613: IF l_debug_on THEN
614: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is ' || SQLERRM, wsh_debug_sv.c_unexpec_err_level);
615: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
616: END IF;
617: --
618: END detail_to_delivery;
619:
646: l_debug_on := wsh_debug_interface.g_debug;
647:
648: --
649: IF l_debug_on IS NULL THEN
650: l_debug_on := wsh_debug_sv.is_debug_enabled;
651: END IF;
652:
653:
654: -- Debug Statements
653:
654: -- Debug Statements
655: --
656: IF l_debug_on THEN
657: wsh_debug_sv.push(l_module_name);
658: --
659: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
660: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
661: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
655: --
656: IF l_debug_on THEN
657: wsh_debug_sv.push(l_module_name);
658: --
659: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
660: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
661: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
662: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
663: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
656: IF l_debug_on THEN
657: wsh_debug_sv.push(l_module_name);
658: --
659: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
660: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
661: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
662: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
663: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
664: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
657: wsh_debug_sv.push(l_module_name);
658: --
659: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
660: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
661: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
662: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
663: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
664: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
665: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
658: --
659: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
660: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
661: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
662: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
663: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
664: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
665: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
666: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
659: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
660: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
661: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
662: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
663: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
664: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
665: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
666: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
667: END IF;
660: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
661: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
662: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
663: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
664: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
665: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
666: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
667: END IF;
668:
661: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
662: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
663: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
664: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
665: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
666: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
667: END IF;
668:
669:
662: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
663: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
664: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
665: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
666: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
667: END IF;
668:
669:
670: IF l_debug_on THEN
667: END IF;
668:
669:
670: IF l_debug_on THEN
671: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_GRP.DETAIL_TO_DELIVERY', wsh_debug_sv.c_proc_level);
672: END IF;
673:
674: DETAIL_TO_DELIVERY
675: (
686: p_delivery_name ,
687: l_action_prms
688: );
689: IF l_debug_on THEN
690: wsh_debug_sv.pop(l_module_name);
691: END IF;
692: --
693: EXCEPTION
694:
698: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
699: p_encoded => fnd_api.g_false);
700:
701: IF l_debug_on THEN
702: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
703: END IF;
704: --
705: END detail_to_delivery;
706:
785: l_debug_on := wsh_debug_interface.g_debug;
786:
787: --
788: IF l_debug_on IS NULL THEN
789: l_debug_on := wsh_debug_sv.is_debug_enabled;
790: END IF;
791:
792: --
793: SAVEPOINT split_line_grp;
793: SAVEPOINT split_line_grp;
794:
795: -- Standard begin of API savepoint
796: IF l_debug_on THEN
797: wsh_debug_sv.push(l_module_name);
798: --
799: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
800: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
801: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
795: -- Standard begin of API savepoint
796: IF l_debug_on THEN
797: wsh_debug_sv.push(l_module_name);
798: --
799: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
800: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
801: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
802: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
803: wsh_debug_sv.LOG(l_module_name, 'P_FROM_DETAIL_ID', p_from_detail_id);
796: IF l_debug_on THEN
797: wsh_debug_sv.push(l_module_name);
798: --
799: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
800: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
801: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
802: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
803: wsh_debug_sv.LOG(l_module_name, 'P_FROM_DETAIL_ID', p_from_detail_id);
804: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
797: wsh_debug_sv.push(l_module_name);
798: --
799: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
800: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
801: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
802: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
803: wsh_debug_sv.LOG(l_module_name, 'P_FROM_DETAIL_ID', p_from_detail_id);
804: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
805: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY2', x_split_quantity2);
798: --
799: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
800: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
801: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
802: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
803: wsh_debug_sv.LOG(l_module_name, 'P_FROM_DETAIL_ID', p_from_detail_id);
804: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
805: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY2', x_split_quantity2);
806: END IF;
799: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
800: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
801: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
802: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
803: wsh_debug_sv.LOG(l_module_name, 'P_FROM_DETAIL_ID', p_from_detail_id);
804: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
805: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY2', x_split_quantity2);
806: END IF;
807:
800: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
801: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
802: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
803: wsh_debug_sv.LOG(l_module_name, 'P_FROM_DETAIL_ID', p_from_detail_id);
804: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
805: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY2', x_split_quantity2);
806: END IF;
807:
808: --
801: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
802: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
803: wsh_debug_sv.LOG(l_module_name, 'P_FROM_DETAIL_ID', p_from_detail_id);
804: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
805: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY2', x_split_quantity2);
806: END IF;
807:
808: --
809:
876: -- HW Harmonization project. Added p_organization_id
877: -- HW OPMCONV - Removed branching
878:
879: IF l_debug_on THEN
880: wsh_debug_sv.LOG(l_module_name, 'Inv item id', l_inv_item_id);
881: wsh_debug_sv.LOG(l_module_name, 'Org id', l_organization_id);
882: wsh_debug_sv.LOG(l_module_name, 'Req qty uom', l_requested_quantity_uom);
883: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_DECIMAL_QUANTITY', wsh_debug_sv.c_proc_level);
884: END IF;
877: -- HW OPMCONV - Removed branching
878:
879: IF l_debug_on THEN
880: wsh_debug_sv.LOG(l_module_name, 'Inv item id', l_inv_item_id);
881: wsh_debug_sv.LOG(l_module_name, 'Org id', l_organization_id);
882: wsh_debug_sv.LOG(l_module_name, 'Req qty uom', l_requested_quantity_uom);
883: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_DECIMAL_QUANTITY', wsh_debug_sv.c_proc_level);
884: END IF;
885:
878:
879: IF l_debug_on THEN
880: wsh_debug_sv.LOG(l_module_name, 'Inv item id', l_inv_item_id);
881: wsh_debug_sv.LOG(l_module_name, 'Org id', l_organization_id);
882: wsh_debug_sv.LOG(l_module_name, 'Req qty uom', l_requested_quantity_uom);
883: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_DECIMAL_QUANTITY', wsh_debug_sv.c_proc_level);
884: END IF;
885:
886: wsh_details_validations.check_decimal_quantity(
879: IF l_debug_on THEN
880: wsh_debug_sv.LOG(l_module_name, 'Inv item id', l_inv_item_id);
881: wsh_debug_sv.LOG(l_module_name, 'Org id', l_organization_id);
882: wsh_debug_sv.LOG(l_module_name, 'Req qty uom', l_requested_quantity_uom);
883: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_DECIMAL_QUANTITY', wsh_debug_sv.c_proc_level);
884: END IF;
885:
886: wsh_details_validations.check_decimal_quantity(
887: p_item_id => l_inv_item_id,
893: p_top_model_line_id => l_top_model_line_id -- bug 3524851
894: );
895:
896: IF l_debug_on THEN
897: wsh_debug_sv.LOG(l_module_name, 'Return Status after check decimal', l_return_status);
898: wsh_debug_sv.LOG(l_module_name, 'Output qty after check decimal', l_output_quantity);
899: END IF;
900:
901: -- UT Bug fix 2650839
894: );
895:
896: IF l_debug_on THEN
897: wsh_debug_sv.LOG(l_module_name, 'Return Status after check decimal', l_return_status);
898: wsh_debug_sv.LOG(l_module_name, 'Output qty after check decimal', l_output_quantity);
899: END IF;
900:
901: -- UT Bug fix 2650839
902: --IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
911:
912: END IF;
913:
914: IF l_debug_on THEN
915: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS', wsh_debug_sv.c_proc_level);
916: END IF;
917:
918: --
919: -- HW added p_converted_flag
932: x_num_errors => l_number_of_errors);
933:
934: IF l_number_of_warnings > 0 THEN
935: IF l_debug_on THEN
936: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
937: END IF;
938:
939: RAISE wsh_util_core.g_exc_warning;
940: END IF;
944: p_data => x_msg_data,
945: p_encoded => fnd_api.g_false);
946:
947: IF l_debug_on THEN
948: wsh_debug_sv.LOG(l_module_name, 'X_NEW_DETAIL_ID', x_new_detail_id);
949: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
950: wsh_debug_sv.pop(l_module_name);
951: END IF;
952: --
945: p_encoded => fnd_api.g_false);
946:
947: IF l_debug_on THEN
948: wsh_debug_sv.LOG(l_module_name, 'X_NEW_DETAIL_ID', x_new_detail_id);
949: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
950: wsh_debug_sv.pop(l_module_name);
951: END IF;
952: --
953: EXCEPTION
946:
947: IF l_debug_on THEN
948: wsh_debug_sv.LOG(l_module_name, 'X_NEW_DETAIL_ID', x_new_detail_id);
949: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
950: wsh_debug_sv.pop(l_module_name);
951: END IF;
952: --
953: EXCEPTION
954: WHEN fnd_api.g_exc_error THEN
960: p_encoded => fnd_api.g_false);
961:
962: --
963: IF l_debug_on THEN
964: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
965: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
966: END IF;
967: --
968: WHEN fnd_api.g_exc_unexpected_error THEN
961:
962: --
963: IF l_debug_on THEN
964: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
965: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
966: END IF;
967: --
968: WHEN fnd_api.g_exc_unexpected_error THEN
969: ROLLBACK TO split_line_grp;
974: p_encoded => fnd_api.g_false);
975:
976: --
977: IF l_debug_on THEN
978: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
979: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
980: END IF;
981: --
982: WHEN wsh_util_core.g_exc_warning THEN
975:
976: --
977: IF l_debug_on THEN
978: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
979: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
980: END IF;
981: --
982: WHEN wsh_util_core.g_exc_warning THEN
983: x_return_status := wsh_util_core.g_ret_sts_warning;
987: p_encoded => fnd_api.g_false);
988:
989: --
990: IF l_debug_on THEN
991: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
992: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
993: END IF;
994: WHEN wsh_inalid_detail_id THEN
995: ROLLBACK TO split_line_grp;
988:
989: --
990: IF l_debug_on THEN
991: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
992: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
993: END IF;
994: WHEN wsh_inalid_detail_id THEN
995: ROLLBACK TO split_line_grp;
996: x_return_status := wsh_util_core.g_ret_sts_error;
1007: p_data => x_msg_data,
1008: p_encoded => fnd_api.g_false);
1009:
1010: IF l_debug_on THEN
1011: wsh_debug_sv.logmsg(l_module_name, 'WSH_INALID_DETAIL_ID exception has occured.', wsh_debug_sv.c_excep_level);
1012: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INALID_DETAIL_ID');
1013: END IF;
1014: --
1015: WHEN wsh_invalid_split_qty THEN
1008: p_encoded => fnd_api.g_false);
1009:
1010: IF l_debug_on THEN
1011: wsh_debug_sv.logmsg(l_module_name, 'WSH_INALID_DETAIL_ID exception has occured.', wsh_debug_sv.c_excep_level);
1012: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INALID_DETAIL_ID');
1013: END IF;
1014: --
1015: WHEN wsh_invalid_split_qty THEN
1016: ROLLBACK TO split_line_grp;
1023: p_data => x_msg_data,
1024: p_encoded => fnd_api.g_false);
1025:
1026: IF l_debug_on THEN
1027: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_SPLIT_QTY exception has occured.', wsh_debug_sv.c_excep_level);
1028: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_SPLIT_QTY');
1029: END IF;
1030: --
1031: WHEN wsh_invalid_split_qty2 THEN /* OPM changes. NC - Added */
1024: p_encoded => fnd_api.g_false);
1025:
1026: IF l_debug_on THEN
1027: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_SPLIT_QTY exception has occured.', wsh_debug_sv.c_excep_level);
1028: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_SPLIT_QTY');
1029: END IF;
1030: --
1031: WHEN wsh_invalid_split_qty2 THEN /* OPM changes. NC - Added */
1032: ROLLBACK TO split_line_grp;
1039: p_data => x_msg_data,
1040: p_encoded => fnd_api.g_false);
1041:
1042: IF l_debug_on THEN
1043: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_SPLIT_QTY2 exception has occured.', wsh_debug_sv.c_excep_level);
1044: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_SPLIT_QTY2');
1045: END IF;
1046: --
1047: WHEN OTHERS THEN
1040: p_encoded => fnd_api.g_false);
1041:
1042: IF l_debug_on THEN
1043: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_SPLIT_QTY2 exception has occured.', wsh_debug_sv.c_excep_level);
1044: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_SPLIT_QTY2');
1045: END IF;
1046: --
1047: WHEN OTHERS THEN
1048: ROLLBACK TO split_line_grp;
1055: p_data => x_msg_data,
1056: p_encoded => fnd_api.g_false);
1057: --
1058: IF l_debug_on THEN
1059: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is ' || SQLERRM, wsh_debug_sv.c_unexpec_err_level);
1060: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
1061: END IF;
1062: --
1063: END split_line;
1056: p_encoded => fnd_api.g_false);
1057: --
1058: IF l_debug_on THEN
1059: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is ' || SQLERRM, wsh_debug_sv.c_unexpec_err_level);
1060: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
1061: END IF;
1062: --
1063: END split_line;
1064:
1149: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1150: --
1151: IF l_debug_on IS NULL
1152: THEN
1153: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1154: END IF;
1155: --
1156: SAVEPOINT UPDATE_SHIPPING_ATTR_GRP;
1157: --
1157: --
1158: -- Debug Statements
1159: --
1160: IF l_debug_on THEN
1161: WSH_DEBUG_SV.push(l_module_name);
1162: --
1163: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1164: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1165: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1159: --
1160: IF l_debug_on THEN
1161: WSH_DEBUG_SV.push(l_module_name);
1162: --
1163: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1164: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1165: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1166: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1167: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
1160: IF l_debug_on THEN
1161: WSH_DEBUG_SV.push(l_module_name);
1162: --
1163: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1164: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1165: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1166: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1167: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
1168: WSH_DEBUG_SV.log(l_module_name,'Table Count',p_changed_attributes.COUNT);
1161: WSH_DEBUG_SV.push(l_module_name);
1162: --
1163: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1164: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1165: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1166: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1167: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
1168: WSH_DEBUG_SV.log(l_module_name,'Table Count',p_changed_attributes.COUNT);
1169:
1162: --
1163: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1164: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1165: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1166: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1167: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
1168: WSH_DEBUG_SV.log(l_module_name,'Table Count',p_changed_attributes.COUNT);
1169:
1170: END IF;
1163: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1164: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1165: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1166: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1167: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
1168: WSH_DEBUG_SV.log(l_module_name,'Table Count',p_changed_attributes.COUNT);
1169:
1170: END IF;
1171: --
1164: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1165: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1166: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1167: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
1168: WSH_DEBUG_SV.log(l_module_name,'Table Count',p_changed_attributes.COUNT);
1169:
1170: END IF;
1171: --
1172: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1365: l_index := p_changed_attributes.NEXT(l_index);
1366: END LOOP;
1367:
1368: IF l_debug_on THEN
1369: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTERFACE_GRP.CREATE_UPDATE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
1370: END IF;
1371:
1372: wsh_interface_grp.Create_Update_Delivery_Detail
1373: (
1382: x_OUT_rec => l_detail_out_rec
1383: );
1384:
1385: IF l_debug_on THEN
1386: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1387: END IF;
1388: --
1389: wsh_util_core.api_post_call(
1390: p_return_status => l_return_status,
1408: --
1409: -- Debug Statements
1410: --
1411: IF l_debug_on THEN
1412: WSH_DEBUG_SV.pop(l_module_name);
1413: END IF;
1414: --
1415: EXCEPTION
1416: WHEN mark_reprice_error then
1426: --
1427: -- Debug Statements
1428: --
1429: IF l_debug_on THEN
1430: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1431: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
1432: END IF;
1433: --
1434: WHEN invalid_source_code THEN
1427: -- Debug Statements
1428: --
1429: IF l_debug_on THEN
1430: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1431: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
1432: END IF;
1433: --
1434: WHEN invalid_source_code THEN
1435: ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
1444: --
1445: -- Debug Statements
1446: --
1447: IF l_debug_on THEN
1448: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_SOURCE_CODE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1449: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_SOURCE_CODE');
1450: END IF;
1451: --
1452: WHEN update_failed THEN
1445: -- Debug Statements
1446: --
1447: IF l_debug_on THEN
1448: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_SOURCE_CODE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1449: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_SOURCE_CODE');
1450: END IF;
1451: --
1452: WHEN update_failed THEN
1453: ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
1464: );
1465:
1466: -- Bug fix 2154602
1467: IF l_debug_on THEN
1468: WSH_DEBUG_SV.logmsg(l_module_name,'UPDATE_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1469: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:UPDATE_FAILED');
1470: END IF;
1471: --
1472: WHEN invalid_released_status THEN
1465:
1466: -- Bug fix 2154602
1467: IF l_debug_on THEN
1468: WSH_DEBUG_SV.logmsg(l_module_name,'UPDATE_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1469: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:UPDATE_FAILED');
1470: END IF;
1471: --
1472: WHEN invalid_released_status THEN
1473: ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
1480: );
1481: -- End of Bug fix 2154602
1482:
1483: IF l_debug_on THEN
1484: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_RELEASED_STATUS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1485: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_RELEASED_STATUS');
1486: END IF;
1487: --
1488: WHEN Others THEN
1481: -- End of Bug fix 2154602
1482:
1483: IF l_debug_on THEN
1484: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_RELEASED_STATUS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1485: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_RELEASED_STATUS');
1486: END IF;
1487: --
1488: WHEN Others THEN
1489: IF get_org%isopen THEN
1498: p_data => x_msg_data,
1499: p_encoded => FND_API.G_FALSE
1500: );
1501: IF l_debug_on THEN
1502: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1503: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1504: END IF;
1505: --
1506: END Update_Shipping_Attributes;
1499: p_encoded => FND_API.G_FALSE
1500: );
1501: IF l_debug_on THEN
1502: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1503: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1504: END IF;
1505: --
1506: END Update_Shipping_Attributes;
1507:
1538: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1539: --
1540: IF l_debug_on IS NULL
1541: THEN
1542: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1543: END IF;
1544: --
1545: IF l_debug_on THEN
1546: WSH_DEBUG_SV.push(l_module_name);
1542: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1543: END IF;
1544: --
1545: IF l_debug_on THEN
1546: WSH_DEBUG_SV.push(l_module_name);
1547: --
1548: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1549: END IF;
1550: --
1544: --
1545: IF l_debug_on THEN
1546: WSH_DEBUG_SV.push(l_module_name);
1547: --
1548: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1549: END IF;
1550: --
1551: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1552:
1582: x_msg_data := l_msg_summary;
1583: end if;
1584: */
1585: IF l_debug_on THEN
1586: WSH_DEBUG_SV.log(l_module_name,'X_LINE_STATUS',x_line_status);
1587: WSH_DEBUG_SV.pop(l_module_name);
1588: END IF;
1589: --
1590: END get_detail_status;
1583: end if;
1584: */
1585: IF l_debug_on THEN
1586: WSH_DEBUG_SV.log(l_module_name,'X_LINE_STATUS',x_line_status);
1587: WSH_DEBUG_SV.pop(l_module_name);
1588: END IF;
1589: --
1590: END get_detail_status;
1591:
1642: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1643: --
1644: IF l_debug_on IS NULL
1645: THEN
1646: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1647: END IF;
1648: --
1649: SAVEPOINT AUTOCREATE_DEL_GRP;
1650:
1649: SAVEPOINT AUTOCREATE_DEL_GRP;
1650:
1651: -- Standard begin of API savepoint
1652: IF l_debug_on THEN
1653: WSH_DEBUG_SV.push(l_module_name);
1654: --
1655: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1656: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1657: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1651: -- Standard begin of API savepoint
1652: IF l_debug_on THEN
1653: WSH_DEBUG_SV.push(l_module_name);
1654: --
1655: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1656: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1657: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1658: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
1659: END IF;
1652: IF l_debug_on THEN
1653: WSH_DEBUG_SV.push(l_module_name);
1654: --
1655: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1656: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1657: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1658: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
1659: END IF;
1660: --
1653: WSH_DEBUG_SV.push(l_module_name);
1654: --
1655: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1656: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1657: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1658: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
1659: END IF;
1660: --
1661:
1654: --
1655: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1656: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1657: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1658: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
1659: END IF;
1660: --
1661:
1662: IF NOT FND_API.compatible_api_call(
1673: END IF;
1674: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1675:
1676: IF l_debug_on THEN
1677: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DEL_ACROSS_ORGS',WSH_DEBUG_SV.C_PROC_LEVEL);
1678: END IF;
1679: --
1680: wsh_delivery_autocreate.autocreate_del_across_orgs(
1681: p_line_rows => p_line_rows,
1697: );
1698:
1699: IF l_number_of_warnings > 0 THEN
1700: IF l_debug_on THEN
1701: wsh_debug_sv.log(l_module_name,'Number of warnings', l_number_of_warnings);
1702: END IF;
1703: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
1704: END IF;
1705:
1709: -- Start code for Bugfix 4070732
1710: --
1711: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1712: IF l_debug_on THEN
1713: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1714: END IF;
1715: l_reset_flags := FALSE;
1716:
1717: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
1717: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
1718: x_return_status => l_return_status);
1719:
1720: IF l_debug_on THEN
1721: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1722: END IF;
1723:
1724: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
1725: RAISE FND_API.G_EXC_ERROR;
1746:
1747: IF FND_API.TO_BOOLEAN(p_commit) THEN
1748:
1749: IF l_debug_on THEN
1750: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1751: END IF;
1752:
1753: WSH_UTIL_CORE.reset_stops_for_load_tender(p_reset_flags => TRUE,
1754: x_return_status => l_return_status);
1755:
1756: ELSE
1757:
1758: IF l_debug_on THEN
1759: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1760: END IF;
1761:
1762: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
1763: x_return_status => l_return_status);
1763: x_return_status => l_return_status);
1764: END IF;
1765:
1766: IF l_debug_on THEN
1767: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1768: END IF;
1769:
1770: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1771: x_return_status := l_return_status;
1792: );
1793:
1794:
1795: IF l_debug_on THEN
1796: WSH_DEBUG_SV.log(l_module_name,'X_DEL_ROWS.COUNT',x_del_rows.count);
1797: WSH_DEBUG_SV.pop(l_module_name);
1798: END IF;
1799: --
1800: EXCEPTION
1793:
1794:
1795: IF l_debug_on THEN
1796: WSH_DEBUG_SV.log(l_module_name,'X_DEL_ROWS.COUNT',x_del_rows.count);
1797: WSH_DEBUG_SV.pop(l_module_name);
1798: END IF;
1799: --
1800: EXCEPTION
1801: WHEN FND_API.G_EXC_ERROR THEN
1809: --{
1810: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1811: --{
1812: IF l_debug_on THEN
1813: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1814: END IF;
1815:
1816: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1817: x_return_status => l_return_status);
1816: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1817: x_return_status => l_return_status);
1818:
1819: IF l_debug_on THEN
1820: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1821: END IF;
1822:
1823: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1824: x_return_status := l_return_status;
1838: );
1839:
1840:
1841: IF l_debug_on THEN
1842: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1843: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1844: END IF;
1845: --
1846:
1839:
1840:
1841: IF l_debug_on THEN
1842: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1843: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1844: END IF;
1845: --
1846:
1847: WHEN autocreate_delivery_failed THEN
1856: --{
1857: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1858: --{
1859: IF l_debug_on THEN
1860: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1861: END IF;
1862:
1863: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1864: x_return_status => l_return_status);
1863: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1864: x_return_status => l_return_status);
1865:
1866: IF l_debug_on THEN
1867: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1868: END IF;
1869:
1870: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1871: x_return_status := l_return_status;
1886: );
1887:
1888:
1889: IF l_debug_on THEN
1890: WSH_DEBUG_SV.logmsg(l_module_name,'AUTOCREATE_DELIVERY_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1891: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:AUTOCREATE_DELIVERY_FAILED');
1892: END IF;
1893:
1894: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1887:
1888:
1889: IF l_debug_on THEN
1890: WSH_DEBUG_SV.logmsg(l_module_name,'AUTOCREATE_DELIVERY_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1891: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:AUTOCREATE_DELIVERY_FAILED');
1892: END IF;
1893:
1894: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1895: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1906: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
1907: x_return_status => l_return_status);
1908:
1909: IF l_debug_on THEN
1910: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1911: END IF;
1912:
1913: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1914: x_return_status := l_return_status;
1934: );
1935:
1936:
1937: IF l_debug_on THEN
1938: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1939: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1940: END IF;
1941: --
1942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1935:
1936:
1937: IF l_debug_on THEN
1938: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1939: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1940: END IF;
1941: --
1942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1943: ROLLBACK TO AUTOCREATE_DEL_GRP;
1947: --
1948: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
1949: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1950: IF l_debug_on THEN
1951: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1952: END IF;
1953:
1954: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1955: x_return_status => l_return_status);
1955: x_return_status => l_return_status);
1956:
1957:
1958: IF l_debug_on THEN
1959: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1960: END IF;
1961:
1962: END IF;
1963: END IF;
1971: p_encoded => FND_API.G_FALSE
1972: );
1973: --
1974: IF l_debug_on THEN
1975: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1976: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1977: END IF;
1978: --
1979: WHEN OTHERS THEN
1972: );
1973: --
1974: IF l_debug_on THEN
1975: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1976: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1977: END IF;
1978: --
1979: WHEN OTHERS THEN
1980: ROLLBACK TO AUTOCREATE_DEL_GRP;
1986: --
1987: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
1988: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1989: IF l_debug_on THEN
1990: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1991: END IF;
1992:
1993: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1994: x_return_status => l_return_status);
1994: x_return_status => l_return_status);
1995:
1996:
1997: IF l_debug_on THEN
1998: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1999: END IF;
2000:
2001: END IF;
2002: END IF;
2010: p_encoded => FND_API.G_FALSE
2011: );
2012: --
2013: IF l_debug_on THEN
2014: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2015: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2016: END IF;
2017: --
2018: END Autocreate_Deliveries;
2011: );
2012: --
2013: IF l_debug_on THEN
2014: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2015: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2016: END IF;
2017: --
2018: END Autocreate_Deliveries;
2019:
2050: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2051: --
2052: IF l_debug_on IS NULL
2053: THEN
2054: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2055: END IF;
2056: --
2057: SAVEPOINT AUTOCREATE_TRIP_GRP;
2058: -- Standard begin of API savepoint
2057: SAVEPOINT AUTOCREATE_TRIP_GRP;
2058: -- Standard begin of API savepoint
2059:
2060: IF l_debug_on THEN
2061: WSH_DEBUG_SV.push(l_module_name);
2062: --
2063: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2064: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2065: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2059:
2060: IF l_debug_on THEN
2061: WSH_DEBUG_SV.push(l_module_name);
2062: --
2063: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2064: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2065: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2066: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
2067: END IF;
2060: IF l_debug_on THEN
2061: WSH_DEBUG_SV.push(l_module_name);
2062: --
2063: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2064: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2065: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2066: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
2067: END IF;
2068: --
2061: WSH_DEBUG_SV.push(l_module_name);
2062: --
2063: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2064: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2065: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2066: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
2067: END IF;
2068: --
2069:
2062: --
2063: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2064: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2065: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2066: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
2067: END IF;
2068: --
2069:
2070: IF NOT FND_API.compatible_api_call(
2081: END IF;
2082: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2083:
2084: IF l_debug_on THEN
2085: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.AUTOCREATE_DEL_TRIP',WSH_DEBUG_SV.C_PROC_LEVEL);
2086: END IF;
2087: --
2088: WSH_TRIPS_ACTIONS.autocreate_del_trip(
2089: p_line_rows => p_line_rows,
2101:
2102:
2103: IF l_number_of_warnings > 0 THEN
2104: IF l_debug_on THEN
2105: wsh_debug_sv.log(l_module_name,'Number of warnings', l_number_of_warnings);
2106: END IF;
2107: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
2108: END IF;
2109:
2119: COMMIT WORK;
2120: END IF;
2121:
2122: IF l_debug_on THEN
2123: WSH_DEBUG_SV.log(l_module_name,'X_DEL_ROWS.COUNT',x_del_rows.count);
2124: WSH_DEBUG_SV.log(l_module_name, 'X trip rows.count', x_trip_rows.count);
2125: WSH_DEBUG_SV.pop(l_module_name);
2126: END IF;
2127: --
2120: END IF;
2121:
2122: IF l_debug_on THEN
2123: WSH_DEBUG_SV.log(l_module_name,'X_DEL_ROWS.COUNT',x_del_rows.count);
2124: WSH_DEBUG_SV.log(l_module_name, 'X trip rows.count', x_trip_rows.count);
2125: WSH_DEBUG_SV.pop(l_module_name);
2126: END IF;
2127: --
2128: EXCEPTION
2121:
2122: IF l_debug_on THEN
2123: WSH_DEBUG_SV.log(l_module_name,'X_DEL_ROWS.COUNT',x_del_rows.count);
2124: WSH_DEBUG_SV.log(l_module_name, 'X trip rows.count', x_trip_rows.count);
2125: WSH_DEBUG_SV.pop(l_module_name);
2126: END IF;
2127: --
2128: EXCEPTION
2129: WHEN FND_API.G_EXC_ERROR THEN
2136: p_encoded => FND_API.G_FALSE
2137: );
2138:
2139: IF l_debug_on THEN
2140: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2141: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2142: END IF;
2143: --
2144: WHEN autocreate_trip_failed THEN
2137: );
2138:
2139: IF l_debug_on THEN
2140: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2141: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2142: END IF;
2143: --
2144: WHEN autocreate_trip_failed THEN
2145: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2151: p_data => x_msg_data,
2152: p_encoded => FND_API.G_FALSE
2153: );
2154: IF l_debug_on THEN
2155: WSH_DEBUG_SV.logmsg(l_module_name,'AUTOCREATE_TRIP_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2156: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:AUTOCREATE_TRIP_FAILED');
2157: END IF;
2158: --
2159: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2152: p_encoded => FND_API.G_FALSE
2153: );
2154: IF l_debug_on THEN
2155: WSH_DEBUG_SV.logmsg(l_module_name,'AUTOCREATE_TRIP_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2156: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:AUTOCREATE_TRIP_FAILED');
2157: END IF;
2158: --
2159: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2160: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2165: p_encoded => FND_API.G_FALSE
2166: );
2167: --
2168: IF l_debug_on THEN
2169: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2170: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2171: END IF;
2172: --
2173: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2166: );
2167: --
2168: IF l_debug_on THEN
2169: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2170: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2171: END IF;
2172: --
2173: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2174: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2181: );
2182: --
2183:
2184: IF l_debug_on THEN
2185: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2186: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2187: END IF;
2188: --
2189: WHEN OTHERS THEN
2182: --
2183:
2184: IF l_debug_on THEN
2185: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2186: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2187: END IF;
2188: --
2189: WHEN OTHERS THEN
2190: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2198: p_encoded => FND_API.G_FALSE
2199: );
2200: --
2201: IF l_debug_on THEN
2202: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2203: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2204: END IF;
2205:
2206: --
2199: );
2200: --
2201: IF l_debug_on THEN
2202: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2203: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2204: END IF;
2205:
2206: --
2207: END Autocreate_del_trip;
2479: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2480: --
2481: IF l_debug_on IS NULL
2482: THEN
2483: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2484: END IF;
2485: --
2486: SAVEPOINT DELIVERY_DETAIL_ACTION_GRP;
2487:
2494: --
2495: -- Debug Statements
2496: --
2497: IF l_debug_on THEN
2498: WSH_DEBUG_SV.push(l_module_name);
2499: --
2500: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2501: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2502: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2496: --
2497: IF l_debug_on THEN
2498: WSH_DEBUG_SV.push(l_module_name);
2499: --
2500: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2501: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2502: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2503: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_action_prms.caller);
2504: WSH_DEBUG_SV.log(l_module_name, 'Phase', p_action_prms.phase);
2497: IF l_debug_on THEN
2498: WSH_DEBUG_SV.push(l_module_name);
2499: --
2500: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2501: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2502: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2503: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_action_prms.caller);
2504: WSH_DEBUG_SV.log(l_module_name, 'Phase', p_action_prms.phase);
2505: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_action_prms.action_code);
2498: WSH_DEBUG_SV.push(l_module_name);
2499: --
2500: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2501: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2502: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2503: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_action_prms.caller);
2504: WSH_DEBUG_SV.log(l_module_name, 'Phase', p_action_prms.phase);
2505: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_action_prms.action_code);
2506: WSH_DEBUG_SV.log(l_module_name, 'Input Table count', p_rec_attr_tab.count);
2499: --
2500: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2501: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2502: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2503: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_action_prms.caller);
2504: WSH_DEBUG_SV.log(l_module_name, 'Phase', p_action_prms.phase);
2505: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_action_prms.action_code);
2506: WSH_DEBUG_SV.log(l_module_name, 'Input Table count', p_rec_attr_tab.count);
2507: END IF;
2500: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2501: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2502: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2503: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_action_prms.caller);
2504: WSH_DEBUG_SV.log(l_module_name, 'Phase', p_action_prms.phase);
2505: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_action_prms.action_code);
2506: WSH_DEBUG_SV.log(l_module_name, 'Input Table count', p_rec_attr_tab.count);
2507: END IF;
2508: --
2501: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2502: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2503: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_action_prms.caller);
2504: WSH_DEBUG_SV.log(l_module_name, 'Phase', p_action_prms.phase);
2505: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_action_prms.action_code);
2506: WSH_DEBUG_SV.log(l_module_name, 'Input Table count', p_rec_attr_tab.count);
2507: END IF;
2508: --
2509: -- Initialize message list if p_init_msg_list is set to TRUE.
2502: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2503: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_action_prms.caller);
2504: WSH_DEBUG_SV.log(l_module_name, 'Phase', p_action_prms.phase);
2505: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_action_prms.action_code);
2506: WSH_DEBUG_SV.log(l_module_name, 'Input Table count', p_rec_attr_tab.count);
2507: END IF;
2508: --
2509: -- Initialize message list if p_init_msg_list is set to TRUE.
2510: --
2530: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
2531: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CALLER');
2532: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2533: IF l_debug_on THEN
2534: wsh_debug_sv.logmsg(l_module_name,'Null Caller');
2535: END IF;
2536: RAISE FND_API.G_EXC_ERROR;
2537: ELSIF(p_action_prms.action_code IS NULL) THEN
2538: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
2538: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
2539: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'ACTION_CODE');
2540: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2541: IF l_debug_on THEN
2542: wsh_debug_sv.logmsg(l_module_name,'WSH_INVALID_ACTION_CODE');
2543: END IF;
2544: RAISE FND_API.G_EXC_ERROR;
2545: END IF;
2546:
2545: END IF;
2546:
2547: IF(p_rec_attr_tab.count = 0) THEN
2548: IF l_debug_on THEN
2549: wsh_debug_sv.logmsg(l_module_name,'Table count zero');
2550: END IF;
2551: RAISE FND_API.G_EXC_ERROR;
2552: END IF;
2553: --
2639: --
2640: --
2641: -- Set validation level
2642: IF l_debug_on THEN
2643: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ACTIONS_LEVELS.SET_VALIDATION_LEVEL',WSH_DEBUG_SV.C_PROC_LEVEL);
2644: WSH_DEBUG_SV.log(l_module_name,'l_action_code',l_action_code);
2645: END IF;
2646: --
2647: wsh_actions_levels.set_validation_level(
2640: --
2641: -- Set validation level
2642: IF l_debug_on THEN
2643: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ACTIONS_LEVELS.SET_VALIDATION_LEVEL',WSH_DEBUG_SV.C_PROC_LEVEL);
2644: WSH_DEBUG_SV.log(l_module_name,'l_action_code',l_action_code);
2645: END IF;
2646: --
2647: wsh_actions_levels.set_validation_level(
2648: p_entity => 'DLVB',
2653: );
2654:
2655: --
2656: IF l_debug_on THEN
2657: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2658: END IF;
2659: --
2660: wsh_util_core.api_post_call(
2661: p_return_status => l_return_status,
2701: -- Call Is_Action_Enabled API depending on validation level
2702: IF l_validation_level_tab(wsh_actions_levels.C_ACTION_ENABLED_LVL) = 1 THEN
2703: --
2704: IF l_debug_on THEN
2705: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.IS_ACTION_ENABLED',WSH_DEBUG_SV.C_PROC_LEVEL);
2706: END IF;
2707: --
2708: WSH_DETAILS_VALIDATIONS.Is_Action_Enabled(
2709: p_del_detail_rec_tab => l_detail_rec_tab,
2716: x_valid_index_tab => l_valid_index_tab
2717: );
2718:
2719: IF l_debug_on THEN
2720: wsh_debug_sv.log(l_module_name,'Is_Action_Enabled returns',
2721: l_return_status);
2722: END IF;
2723: --
2724: wsh_util_core.api_post_call(
2737: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2738: END IF;
2739: --
2740: IF l_debug_on THEN
2741: wsh_debug_sv.logmsg(l_module_name, 'WSH_DISABLE_ACTION');
2742: END IF;
2743: --
2744: raise FND_API.G_EXC_ERROR;
2745: --}
2762: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_DELIVERY');
2763: FND_MESSAGE.SET_TOKEN('DELIVERY', p_action_prms.delivery_id);
2764: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2765: IF l_debug_on THEN
2766: wsh_debug_sv.logmsg(l_module_name, 'Delivery does not exist');
2767: END IF;
2768: RAISE FND_API.G_EXC_ERROR;
2769: END IF;
2770: CLOSE del_cur;
2772: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
2773: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'DELIVERY_ID');
2774: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2775: IF l_debug_on THEN
2776: wsh_debug_sv.logmsg(l_module_name, 'Null Delivery Id');
2777: END IF;
2778: RAISE FND_API.G_EXC_ERROR;
2779: END IF;
2780:
2793:
2794: --
2795:
2796: IF l_debug_on THEN
2797: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.IS_ACTION_ENABLED',WSH_DEBUG_SV.C_PROC_LEVEL);
2798: END IF;
2799: --
2800: wsh_delivery_validations.Is_Action_Enabled(
2801: p_dlvy_rec_tab => l_dlvy_rec_tab,
2828:
2829: -- we need to send only the valid records to lock procedure
2830: -- Build the table using the valid index output from Is_Action_Enabled
2831: IF l_debug_on THEN
2832: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.LOCK_DELIVERY_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
2833: END IF;
2834: IF NOT ( p_action_prms.caller = 'WSH_FSTRX'
2835: AND p_action_prms.action_code = 'DELETE'
2836: ) THEN --BUG 4354579
2859: IF(l_number_of_errors >0 ) THEN
2860: FND_MESSAGE.SET_NAME('WSH', 'WSH_DISABLE_ACTION');
2861: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2862: IF l_debug_on THEN
2863: wsh_debug_sv.logmsg(l_module_name, 'WSH_DISABLE_ACTION');
2864: END IF;
2865: RAISE FND_API.G_EXC_ERROR;
2866: END IF;
2867: --
2869:
2870: FND_MESSAGE.SET_NAME('WSH', 'WSH_DISABLE_ACTION_WARN');
2871: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2872: IF l_debug_on THEN
2873: wsh_debug_sv.logmsg(l_module_name, 'WSH_DISABLE_ACTION_WARN');
2874: END IF;
2875:
2876: IF(p_action_prms.caller = 'WSH_FSTRX') THEN
2877: x_action_out_rec.selection_issue_flag := 'Y';
2877: x_action_out_rec.selection_issue_flag := 'Y';
2878: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
2879: ELSE
2880: IF l_debug_on THEN
2881: wsh_debug_sv.log(l_module_name,'Number of warnings', l_number_of_warnings);
2882: END IF;
2883: RAISE FND_API.G_EXC_ERROR;
2884: END IF;
2885: END IF;
2915: x_msg_data => l_msg_data,
2916: x_return_status => l_return_status);
2917:
2918: IF l_debug_on THEN
2919: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',l_return_status);
2920: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
2921: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
2922: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
2923: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
2916: x_return_status => l_return_status);
2917:
2918: IF l_debug_on THEN
2919: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',l_return_status);
2920: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
2921: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
2922: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
2923: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
2924: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
2917:
2918: IF l_debug_on THEN
2919: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',l_return_status);
2920: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
2921: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
2922: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
2923: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
2924: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
2925: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
2918: IF l_debug_on THEN
2919: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',l_return_status);
2920: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
2921: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
2922: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
2923: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
2924: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
2925: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
2926: END IF;
2919: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',l_return_status);
2920: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
2921: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
2922: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
2923: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
2924: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
2925: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
2926: END IF;
2927: --
2920: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
2921: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
2922: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
2923: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
2924: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
2925: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
2926: END IF;
2927: --
2928:
2921: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
2922: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
2923: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
2924: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
2925: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
2926: END IF;
2927: --
2928:
2929: IF l_return_status=wsh_util_core.g_ret_sts_error THEN
2930: --fix p_rec_attr_tab to have only successful records
2931: l_cc_count_success:=1;
2932:
2933: IF l_debug_on THEN
2934: wsh_debug_sv.log(l_module_name,'p_rec_attr_tab count before removing failed lines',p_rec_attr_tab.COUNT);
2935: END IF;
2936:
2937: IF l_cc_failed_records.COUNT>0 AND p_rec_attr_tab.COUNT>0 THEN
2938:
2968: IF l_id_tab_t.COUNT>0 THEN
2969: l_id_tab:=l_id_tab_t;
2970: ELSE
2971: IF l_debug_on THEN
2972: wsh_debug_sv.logmsg(l_module_name,'all lines errored in compatibility check');
2973: END IF;
2974: wsh_util_core.api_post_call(
2975: p_return_status => l_return_status,
2976: x_num_warnings => l_number_of_warnings,
2978: p_msg_data => l_msg_data);
2979: END IF;
2980:
2981: IF l_debug_on THEN
2982: wsh_debug_sv.log(l_module_name,'l_id_tab count after removing failed lines',l_id_tab.COUNT);
2983: END IF;
2984:
2985: END IF;
2986:
3068: IF(p_rec_attr_tab.count > 1) THEN
3069: FND_MESSAGE.SET_NAME('WSH','WSH_UI_MULTI_SELECTION');
3070: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3071: IF l_debug_on THEN
3072: wsh_debug_sv.logmsg(l_module_name,'WSH_UI_MULTI_SELECTION');
3073: END IF;
3074: RAISE FND_API.G_EXC_ERROR;
3075: END IF;
3076: END IF;
3075: END IF;
3076: END IF;
3077:
3078: IF l_debug_on THEN
3079: wsh_debug_sv.log(l_module_name, 'Id Tab Count', l_id_tab.count);
3080: END IF;
3081:
3082: IF p_action_prms.action_code IN('ASSIGN', 'UNASSIGN') THEN
3083:
3082: IF p_action_prms.action_code IN('ASSIGN', 'UNASSIGN') THEN
3083:
3084: IF(p_action_prms.action_code = 'ASSIGN' AND nvl(p_action_prms.phase,1) = 1) THEN
3085: IF l_debug_on THEN
3086: WSH_DEBUG_SV.log(l_module_name, 'Delivery Id', p_action_prms.delivery_id);
3087: WSH_DEBUG_SV.log(l_module_name, 'Delivery Name', p_action_prms.delivery_name);
3088: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_ASSIGN_DEL_MULTI',WSH_DEBUG_SV.C_PROC_LEVEL);
3089: END IF;
3090:
3083:
3084: IF(p_action_prms.action_code = 'ASSIGN' AND nvl(p_action_prms.phase,1) = 1) THEN
3085: IF l_debug_on THEN
3086: WSH_DEBUG_SV.log(l_module_name, 'Delivery Id', p_action_prms.delivery_id);
3087: WSH_DEBUG_SV.log(l_module_name, 'Delivery Name', p_action_prms.delivery_name);
3088: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_ASSIGN_DEL_MULTI',WSH_DEBUG_SV.C_PROC_LEVEL);
3089: END IF;
3090:
3091: wsh_details_validations.check_assign_del_multi(
3084: IF(p_action_prms.action_code = 'ASSIGN' AND nvl(p_action_prms.phase,1) = 1) THEN
3085: IF l_debug_on THEN
3086: WSH_DEBUG_SV.log(l_module_name, 'Delivery Id', p_action_prms.delivery_id);
3087: WSH_DEBUG_SV.log(l_module_name, 'Delivery Name', p_action_prms.delivery_name);
3088: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_ASSIGN_DEL_MULTI',WSH_DEBUG_SV.C_PROC_LEVEL);
3089: END IF;
3090:
3091: wsh_details_validations.check_assign_del_multi(
3092: p_detail_rows => l_id_tab,
3093: x_del_params => l_detail_group_params,
3094: x_return_status => l_return_status);
3095:
3096: IF l_debug_on THEN
3097: WSH_DEBUG_SV.log(l_module_name, 'return status after calling check_assign_del_multi', l_return_status);
3098: WSH_DEBUG_SV.log(l_module_name, 'group id', l_detail_group_params.group_id);
3099: END IF;
3100: wsh_util_core.api_post_call(
3101: p_return_status => l_return_status,
3094: x_return_status => l_return_status);
3095:
3096: IF l_debug_on THEN
3097: WSH_DEBUG_SV.log(l_module_name, 'return status after calling check_assign_del_multi', l_return_status);
3098: WSH_DEBUG_SV.log(l_module_name, 'group id', l_detail_group_params.group_id);
3099: END IF;
3100: wsh_util_core.api_post_call(
3101: p_return_status => l_return_status,
3102: x_num_warnings => l_number_of_warnings,
3143: l_index := l_id_tab.NEXT(l_index);
3144: END LOOP;
3145: --
3146: IF l_debug_on THEN
3147: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_GRP.DETAIL_TO_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
3148: END IF;
3149: --
3150: WSH_DELIVERY_DETAILS_GRP.detail_to_delivery(
3151: p_api_version => l_api_version,
3172:
3173: IF (l_return_status in (WSH_UTIL_CORE.G_RET_STS_SUCCESS, WSH_UTIL_CORE.G_RET_STS_WARNING)
3174: AND p_action_prms.action_code = 'ASSIGN' ) THEN
3175: IF l_debug_on THEN
3176: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.ASSIGN_DELIVERY_UPDATE',WSH_DEBUG_SV.C_PROC_LEVEL);
3177: END IF;
3178:
3179: wsh_new_delivery_actions.assign_delivery_update(
3180: p_delivery_id => p_action_prms.delivery_id,
3201: IF(nvl(p_action_prms.split_quantity,0) =0) THEN
3202: FND_MESSAGE.SET_NAME('WSH', 'WSH_NO_ZERO_NUM');
3203: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3204: IF l_debug_on THEN
3205: wsh_debug_sv.logmsg(l_module_name,'Zero or Null split quantity');
3206: END IF;
3207: RAISE FND_API.G_EXC_ERROR;
3208: END IF;
3209:
3208: END IF;
3209:
3210: --
3211: IF l_debug_on THEN
3212: wsh_debug_sv.log(l_module_name, 'Split Quantity', p_action_prms.split_quantity);
3213: END IF;
3214:
3215: l_split_quantity := p_action_prms.split_quantity;
3216: l_split_quantity2 := p_action_prms.split_quantity2;
3231: AND l_requested_quantity_uom2 <> FND_API.G_MISS_CHAR) THEN
3232:
3233: --{
3234: IF l_debug_on THEN
3235: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.validate_secondary_quantity',WSH_DEBUG_SV.C_PROC_LEVEL);
3236: END IF;
3237: --
3238: -- J-IB-NPARIKH-{
3239: --
3277:
3278: -- HW Harmonization project forOPM. Added p_manual_split parameter
3279: -- HW added p_converted_flag
3280: IF l_debug_on THEN
3281: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_GRP.SPLIT_LINE',WSH_DEBUG_SV.C_PROC_LEVEL);
3282: END IF;
3283: WSH_DELIVERY_DETAILS_GRP.split_line(
3284: p_api_version => l_api_version,
3285: p_init_msg_list => FND_API.G_FALSE,
3309: --
3310: ELSIF p_action_prms.action_code = 'AUTOCREATE-DEL' THEN
3311: --
3312: IF l_debug_on THEN
3313: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_GRP.AUTOCREATE_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
3314: END IF;
3315: --
3316: --Compatibility Changes
3317: IF wsh_util_core.fte_is_installed = 'Y' AND l_cc_line_groups.COUNT>0 THEN
3345: END IF;
3346: END LOOP;
3347:
3348: IF l_debug_on THEN
3349: wsh_debug_sv.log(l_module_name,'id_tab_temp count ',l_id_tab_temp.COUNT);
3350: END IF;
3351:
3352: WSH_DELIVERY_DETAILS_GRP.Autocreate_Deliveries(
3353: p_api_version_number => l_api_version,
3374: END LOOP;
3375: END IF;
3376:
3377: IF l_debug_on THEN
3378: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3379: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3380: wsh_debug_sv.log(l_module_name,'x_action_out_rec.delivery_id_tab.COUNT ',x_action_out_rec.delivery_id_tab.COUNT);
3381: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',l_return_status);
3382: END IF;
3375: END IF;
3376:
3377: IF l_debug_on THEN
3378: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3379: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3380: wsh_debug_sv.log(l_module_name,'x_action_out_rec.delivery_id_tab.COUNT ',x_action_out_rec.delivery_id_tab.COUNT);
3381: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',l_return_status);
3382: END IF;
3383:
3376:
3377: IF l_debug_on THEN
3378: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3379: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3380: wsh_debug_sv.log(l_module_name,'x_action_out_rec.delivery_id_tab.COUNT ',x_action_out_rec.delivery_id_tab.COUNT);
3381: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',l_return_status);
3382: END IF;
3383:
3384: IF l_cc_upd_dlvy_intmed_ship_to='N' OR l_cc_upd_dlvy_ship_method='N' THEN
3377: IF l_debug_on THEN
3378: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3379: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3380: wsh_debug_sv.log(l_module_name,'x_action_out_rec.delivery_id_tab.COUNT ',x_action_out_rec.delivery_id_tab.COUNT);
3381: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',l_return_status);
3382: END IF;
3383:
3384: IF l_cc_upd_dlvy_intmed_ship_to='N' OR l_cc_upd_dlvy_ship_method='N' THEN
3385: IF x_action_out_rec.delivery_id_tab.COUNT>0 THEN
3434: l_return_status:=l_cc_return_status;
3435: x_action_out_rec.delivery_id_tab:=l_cc_del_rows;
3436:
3437: IF l_debug_on THEN
3438: wsh_debug_sv.log(l_module_name,'x_action_out_rec.delivery_id_tab.COUNT after loop ',x_action_out_rec.delivery_id_tab.COUNT);
3439: END IF;
3440:
3441: ELSE
3442:
3456: --Compatibility Changes
3457:
3458: --
3459: IF l_debug_on THEN
3460: wsh_debug_sv.log(l_module_name,'Return Status After Calling Autocreate_Deliveries',l_return_status);
3461: END IF;
3462:
3463: --
3464: wsh_util_core.api_post_call(
3485: --
3486: ELSIF p_action_prms.action_code = 'AUTOCREATE-TRIP' THEN
3487: --
3488: IF l_debug_on THEN
3489: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_GRP.AUTOCREATE_DEL_TRIP',WSH_DEBUG_SV.C_PROC_LEVEL);
3490: END IF;
3491: --
3492: WSH_DELIVERY_DETAILS_GRP.Autocreate_del_trip(
3493: p_api_version_number => l_api_version,
3515: p_action_code => p_action_prms.action_code,
3516: x_return_status => l_return_status);
3517: --
3518: IF l_debug_on THEN
3519: wsh_debug_sv.log(l_module_name,'Return Status After Calling change_ignoreplan_status ',l_return_status);
3520: END IF;
3521: --
3522: wsh_util_core.api_post_call(
3523: p_return_status => l_return_status,
3527:
3528: ELSIF p_action_prms.action_code = 'PICK-RELEASE' THEN
3529: --
3530: IF l_debug_on THEN
3531: wsh_debug_sv.log(l_module_name, 'Id Tab Count', l_id_tab.count);
3532: END IF;
3533:
3534: IF l_debug_on THEN
3535: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICK_LIST.LAUNCH_PICK_RELEASE',WSH_DEBUG_SV.C_PROC_LEVEL);
3531: wsh_debug_sv.log(l_module_name, 'Id Tab Count', l_id_tab.count);
3532: END IF;
3533:
3534: IF l_debug_on THEN
3535: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICK_LIST.LAUNCH_PICK_RELEASE',WSH_DEBUG_SV.C_PROC_LEVEL);
3536: END IF;
3537: --
3538:
3539: wsh_pick_list.launch_pick_release(
3555: --
3556: ELSIF p_action_prms.action_code = 'PICK-PACK-SHIP' THEN
3557: --
3558: IF l_debug_on THEN
3559: wsh_debug_sv.log(l_module_name, 'Id Tab Count', l_id_tab.count);
3560: END IF;
3561:
3562: IF l_debug_on THEN
3563: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICK_LIST.LAUNCH_PICK_RELEASE',WSH_DEBUG_SV.C_PROC_LEVEL);
3559: wsh_debug_sv.log(l_module_name, 'Id Tab Count', l_id_tab.count);
3560: END IF;
3561:
3562: IF l_debug_on THEN
3563: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICK_LIST.LAUNCH_PICK_RELEASE',WSH_DEBUG_SV.C_PROC_LEVEL);
3564: END IF;
3565: --
3566: wsh_pick_list.launch_pick_release(
3567: p_trip_ids => l_dummy_ids,
3582: --
3583: ELSIF p_action_prms.action_code = 'PICK-SHIP' THEN
3584: --
3585: IF l_debug_on THEN
3586: wsh_debug_sv.log(l_module_name, 'Id Tab Count', l_id_tab.count);
3587: END IF;
3588:
3589: IF l_debug_on THEN
3590: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICK_LIST.LAUNCH_PICK_RELEASE',WSH_DEBUG_SV.C_PROC_LEVEL);
3586: wsh_debug_sv.log(l_module_name, 'Id Tab Count', l_id_tab.count);
3587: END IF;
3588:
3589: IF l_debug_on THEN
3590: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICK_LIST.LAUNCH_PICK_RELEASE',WSH_DEBUG_SV.C_PROC_LEVEL);
3591: END IF;
3592: --
3593: wsh_pick_list.launch_pick_release(
3594: p_trip_ids => l_dummy_ids,
3625: END IF;
3626: -- End of OTM R12 : packing ECO
3627:
3628: IF l_debug_on THEN
3629: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DETAIL_WEIGHT_VOLUME',WSH_DEBUG_SV.C_PROC_LEVEL);
3630: END IF;
3631: --
3632: wsh_wv_utils.detail_weight_volume (
3633: p_detail_rows => l_id_tab ,
3656: l_delivery_flag := 'N';
3657:
3658: --
3659: IF l_debug_on THEN
3660: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_action_prms.container_name);
3661: WSH_DEBUG_SV.log(l_module_name, 'Container Instance Id', p_action_prms.container_instance_id);
3662: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_GRP.CONTAINER_ACTIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
3663: END IF;
3664:
3657:
3658: --
3659: IF l_debug_on THEN
3660: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_action_prms.container_name);
3661: WSH_DEBUG_SV.log(l_module_name, 'Container Instance Id', p_action_prms.container_instance_id);
3662: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_GRP.CONTAINER_ACTIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
3663: END IF;
3664:
3665: wsh_container_grp.Container_Actions(
3658: --
3659: IF l_debug_on THEN
3660: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_action_prms.container_name);
3661: WSH_DEBUG_SV.log(l_module_name, 'Container Instance Id', p_action_prms.container_instance_id);
3662: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_GRP.CONTAINER_ACTIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
3663: END IF;
3664:
3665: wsh_container_grp.Container_Actions(
3666: p_api_version => l_api_version,
3722: p_call_lcss => 'Y',
3723: x_return_status => l_return_status);
3724:
3725: IF l_debug_on THEN
3726: WSH_DEBUG_SV.log(l_module_name,'Adjust_Planned_Flag returns ',l_return_status);
3727: END IF;
3728: END IF;
3729:
3730: wsh_util_core.api_post_call(
3740: l_entity_type := 'L';
3741:
3742: --
3743: IF l_debug_on THEN
3744: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_GRP.AUTO_PACK',WSH_DEBUG_SV.C_PROC_LEVEL);
3745: END IF;
3746: wsh_container_grp.Auto_Pack (
3747: p_api_version => l_api_version,
3748: p_init_msg_list => FND_API.G_FALSE,
3773: l_entity_type := 'L';
3774:
3775: --
3776: IF l_debug_on THEN
3777: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_GRP.AUTO_PACK',WSH_DEBUG_SV.C_PROC_LEVEL);
3778: END IF;
3779: wsh_container_grp.Auto_Pack (
3780: p_api_version => p_api_version_number,
3781: p_init_msg_list => FND_API.G_FALSE,
3834: END LOOP;
3835:
3836:
3837: IF l_debug_on THEN
3838: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_GRP.CONTAINER_ACTIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
3839: END IF;
3840: wsh_container_grp.Container_Actions(
3841: p_api_version => l_api_version,
3842: p_init_msg_list => FND_API.G_FALSE,
3870: p_call_lcss => 'Y',
3871: x_return_status => l_return_status);
3872:
3873: IF l_debug_on THEN
3874: WSH_DEBUG_SV.log(l_module_name,'Adjust_Planned_Flag returns ',l_return_status);
3875: END IF;
3876: END IF;
3877:
3878: wsh_util_core.api_post_call(
3902:
3903: IF cycle_count_cur%NOTFOUND THEN
3904: CLOSE cycle_count_cur;
3905: IF l_debug_on THEN
3906: wsh_debug_sv.logmsg(l_module_name,'Detail not found');
3907: END IF;
3908: RAISE FND_API.G_EXC_ERROR;
3909: END IF;
3910:
3914: IF l_released_status = 'Y' AND NVL(l_picked_quantity, l_requested_quantity) > NVL(l_shipped_quantity, 0) THEN
3915: NULL;
3916: ELSE
3917: IF l_debug_on THEN
3918: wsh_debug_sv.logmsg(l_module_name,'Incorrect Released status or incorrect quantities');
3919: END IF;
3920: fnd_message.set_name('WSH', 'WSH_CC_RSV_INSUFF');
3921: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3922: raise FND_API.G_EXC_ERROR;
3957: x_defaults.quantity_to_cc := nvl(l_picked_quantity, l_requested_quantity) - nvl(l_shipped_quantity,0);
3958: x_defaults.quantity2_to_cc := nvl(l_picked_quantity2, l_requested_quantity2) - nvl(l_shipped_quantity2,0);
3959:
3960: IF l_debug_on THEN
3961: wsh_debug_sv.log(l_module_name, 'Default cc qty', x_defaults.quantity_to_cc);
3962: END IF;
3963: --
3964: --Change made during Bugfix 4070732
3965: --Raise end of api so that handling of return status, reset flags are done there
3973: IF (( p_action_prms.quantity_to_split > (NVL(l_picked_quantity, l_requested_quantity) - nvl(l_shipped_quantity,0)))
3974: OR p_action_prms.quantity_to_split <= 0) THEN
3975:
3976: IF l_debug_on THEN
3977: wsh_debug_sv.logmsg(l_module_name,'Incorrect quantities');
3978: END IF;
3979: FND_MESSAGE.SET_NAME('WSH', 'WSH_DET_SPLIT_EXCEED');
3980: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3981: raise FND_API.G_EXC_ERROR;
3994: l_bo_qtys(1) := p_action_prms.quantity_to_split - l_overpick_qtys(1);
3995: l_bo_qtys2(1) := p_action_prms.quantity2_to_split - l_overpick_qtys2(1);
3996:
3997: IF l_debug_on THEN
3998: wsh_debug_sv.log(l_module_name, 'Overpick Qty' , l_overpick_qtys(1));
3999: wsh_debug_sv.log(l_module_name, 'BO qty', l_bo_qtys(1));
4000: END IF;
4001:
4002:
3995: l_bo_qtys2(1) := p_action_prms.quantity2_to_split - l_overpick_qtys2(1);
3996:
3997: IF l_debug_on THEN
3998: wsh_debug_sv.log(l_module_name, 'Overpick Qty' , l_overpick_qtys(1));
3999: wsh_debug_sv.log(l_module_name, 'BO qty', l_bo_qtys(1));
4000: END IF;
4001:
4002:
4003: IF l_validation_level_tab(wsh_actions_levels.C_DECIMAL_QUANTITY_LVL)= 1 THEN
4017:
4018: -- this needs to be called only for Discrete Org
4019: --
4020: IF l_debug_on THEN
4021: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_DECIMAL_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
4022: END IF;
4023: --
4024: WSH_DETAILS_VALIDATIONS.check_decimal_quantity(
4025: p_item_id => l_inv_item_id,
4029: x_output_quantity => l_output_quantity,
4030: x_return_status => l_return_status);
4031:
4032: IF l_debug_on THEN
4033: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4034: END IF;
4035: --
4036:
4037: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
4042: END IF;
4043:
4044:
4045: IF l_debug_on THEN
4046: wsh_debug_sv.log(l_module_name, 'BO rows count', l_id_tab.count);
4047: wsh_debug_sv.log(l_module_name, 'BO qtys count', l_bo_qtys.count);
4048: wsh_debug_sv.log(l_module_name, 'Req qtys count', l_req_qtys.count);
4049: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIP_CONFIRM_ACTIONS2.BACKORDER',WSH_DEBUG_SV.C_PROC_LEVEL);
4050: END IF;
4043:
4044:
4045: IF l_debug_on THEN
4046: wsh_debug_sv.log(l_module_name, 'BO rows count', l_id_tab.count);
4047: wsh_debug_sv.log(l_module_name, 'BO qtys count', l_bo_qtys.count);
4048: wsh_debug_sv.log(l_module_name, 'Req qtys count', l_req_qtys.count);
4049: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIP_CONFIRM_ACTIONS2.BACKORDER',WSH_DEBUG_SV.C_PROC_LEVEL);
4050: END IF;
4051: --
4044:
4045: IF l_debug_on THEN
4046: wsh_debug_sv.log(l_module_name, 'BO rows count', l_id_tab.count);
4047: wsh_debug_sv.log(l_module_name, 'BO qtys count', l_bo_qtys.count);
4048: wsh_debug_sv.log(l_module_name, 'Req qtys count', l_req_qtys.count);
4049: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIP_CONFIRM_ACTIONS2.BACKORDER',WSH_DEBUG_SV.C_PROC_LEVEL);
4050: END IF;
4051: --
4052: wsh_ship_confirm_actions2.Backorder(
4045: IF l_debug_on THEN
4046: wsh_debug_sv.log(l_module_name, 'BO rows count', l_id_tab.count);
4047: wsh_debug_sv.log(l_module_name, 'BO qtys count', l_bo_qtys.count);
4048: wsh_debug_sv.log(l_module_name, 'Req qtys count', l_req_qtys.count);
4049: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIP_CONFIRM_ACTIONS2.BACKORDER',WSH_DEBUG_SV.C_PROC_LEVEL);
4050: END IF;
4051: --
4052: wsh_ship_confirm_actions2.Backorder(
4053: p_detail_ids => l_id_tab,
4071: p_msg_data => l_msg_data
4072: );
4073:
4074: IF l_debug_on THEN
4075: WSH_DEBUG_SV.log(l_module_name, 'Backorder Result tab count', x_action_out_rec.result_id_tab.count);
4076: END IF;
4077:
4078: --
4079: -- Consolidation of BO Delivery details project
4080: --
4081: -- Debug Statements
4082: --
4083: IF l_debug_on THEN
4084: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIPPING_PARAMS_PVT.Get_Global_Parameters',WSH_DEBUG_SV.C_PROC_LEVEL);
4085: END IF;
4086: --
4087: WSH_SHIPPING_PARAMS_PVT.Get_Global_Parameters(l_global_param_rec, l_return_status);
4088:
4120: ELSIF p_action_prms.action_code = 'DELETE' THEN
4121: --{
4122: IF l_debug_on THEN
4123: --{
4124: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Delete',WSH_DEBUG_SV.C_PROC_LEVEL);
4125: --}
4126: END IF;
4127: --
4128: WSH_UTIL_CORE.Delete(
4131: x_return_status => l_return_status);
4132: --
4133: IF l_debug_on THEN
4134: --{
4135: wsh_debug_sv.log(l_module_name,'Return Status After Calling Delete',l_return_status);
4136: --}
4137: END IF;
4138: --
4139: wsh_util_core.api_post_call(
4148: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_ACTION_CODE');
4149: FND_MESSAGE.SET_TOKEN('ACT_CODE',p_action_prms.action_code );
4150: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
4151: IF l_debug_on THEN
4152: wsh_debug_sv.logmsg(l_module_name,'WSH_INVALID_ACTION_CODE');
4153: END IF;
4154: RAISE FND_API.G_EXC_ERROR;
4155: --
4156: END IF;
4161: BEGIN
4162: --{
4163: --
4164: IF l_debug_on THEN
4165: wsh_debug_sv.log(l_module_name, 'l_check_dcp', l_check_dcp);
4166: wsh_debug_sv.log(l_module_name, 'g_call_dcp_check', WSH_DCP_PVT.G_CALL_DCP_CHECK);
4167: END IF;
4168: --
4169: IF NVL(l_check_dcp, -99) IN (1,2)
4162: --{
4163: --
4164: IF l_debug_on THEN
4165: wsh_debug_sv.log(l_module_name, 'l_check_dcp', l_check_dcp);
4166: wsh_debug_sv.log(l_module_name, 'g_call_dcp_check', WSH_DCP_PVT.G_CALL_DCP_CHECK);
4167: END IF;
4168: --
4169: IF NVL(l_check_dcp, -99) IN (1,2)
4170: AND NVL(WSH_DCP_PVT.G_CALL_DCP_CHECK, 'Y') = 'Y'
4173: IF p_action_prms.action_code IN ('SPLIT-LINE', 'CYCLE-COUNT', 'PACK', 'AUTO-PACK')
4174: THEN
4175: --{
4176: IF l_debug_on THEN
4177: WSH_DEBUG_SV.LOGMSG(L_MODULE_NAME, 'CALLING DCP ');
4178: END IF;
4179:
4180: wsh_dcp_pvt.check_detail(
4181: p_action_code => p_action_prms.action_code,
4186: END IF;
4187: EXCEPTION
4188: WHEN wsh_dcp_pvt.data_inconsistency_exception THEN
4189: if NOT l_debug_on OR l_debug_on is null then
4190: l_debug_on := wsh_debug_sv.is_debug_enabled;
4191: end if;
4192: IF l_debug_on THEN
4193: WSH_DEBUG_SV.logmsg(l_module_name,'data_inconsistency_exception');
4194: END IF;
4189: if NOT l_debug_on OR l_debug_on is null then
4190: l_debug_on := wsh_debug_sv.is_debug_enabled;
4191: end if;
4192: IF l_debug_on THEN
4193: WSH_DEBUG_SV.logmsg(l_module_name,'data_inconsistency_exception');
4194: END IF;
4195: ROLLBACK TO DELIVERY_DETAIL_ACTION_GRP;
4196: GOTO api_start;
4197: WHEN OTHERS THEN
4195: ROLLBACK TO DELIVERY_DETAIL_ACTION_GRP;
4196: GOTO api_start;
4197: WHEN OTHERS THEN
4198: IF l_debug_on THEN
4199: WSH_DEBUG_SV.logmsg(l_module_name,'When Others');
4200: END IF;
4201: null;
4202: --}
4203: END;
4218: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
4219: THEN
4220: --{
4221: IF l_debug_on THEN
4222: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
4223: END IF;
4224:
4225: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
4226: (
4230: );
4231: --
4232: --
4233: IF l_debug_on THEN
4234: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
4235: END IF;
4236: --
4237: --
4238: WSH_UTIL_CORE.API_POST_CALL
4249: --
4250:
4251: IF l_number_of_warnings > 0 THEN
4252: IF l_debug_on THEN
4253: wsh_debug_sv.log (l_module_name,'Number of warnings', l_number_of_warnings);
4254: END IF;
4255: -- RAISE WSH_UTIL_CORE.G_EXC_WARNING;
4256: l1_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4257: ELSE
4260: --
4261: -- Standard check of p_commit.
4262: IF FND_API.To_Boolean( p_commit ) THEN
4263: IF(l_debug_on) THEN
4264: wsh_debug_sv.logmsg(l_module_name, 'Commit Work');
4265: END IF;
4266: --
4267: -- Start code for Bugfix 4070732
4268: --
4267: -- Start code for Bugfix 4070732
4268: --
4269: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4270: IF l_debug_on THEN
4271: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4272: END IF;
4273:
4274: l_reset_flags := FALSE;
4275: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
4275: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
4276: x_return_status => l_return_status);
4277:
4278: IF l_debug_on THEN
4279: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4280: END IF;
4281:
4282: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4283: l1_return_status := l_return_status;
4299: --{
4300:
4301: IF FND_API.To_Boolean( p_commit ) THEN
4302: IF l_debug_on THEN
4303: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4304: END IF;
4305:
4306: WSH_UTIL_CORE.reset_stops_for_load_tender(p_reset_flags => TRUE,
4307: x_return_status => l_return_status);
4307: x_return_status => l_return_status);
4308:
4309: ELSE
4310: IF l_debug_on THEN
4311: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4312: END IF;
4313:
4314: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
4315: x_return_status => l_return_status);
4316:
4317: END IF;
4318:
4319: IF l_debug_on THEN
4320: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4321: END IF;
4322:
4323: IF l1_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
4324: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4347: );
4348:
4349:
4350: IF l_debug_on THEN
4351: WSH_DEBUG_SV.pop(l_module_name);
4352: END IF;
4353: --
4354: WHEN FND_API.G_EXC_ERROR THEN
4355: -- ROLLBACK TO DELIVERY_DETAIL_ACTION_GRP;
4363: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
4364: THEN
4365: --{
4366: IF l_debug_on THEN
4367: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
4368: END IF;
4369:
4370: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
4371: (
4375: );
4376: --
4377: --
4378: IF l_debug_on THEN
4379: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
4380: END IF;
4381: --
4382: --
4383: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4397: --{
4398: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4399: --{
4400: IF l_debug_on THEN
4401: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4402: END IF;
4403:
4404: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4405: x_return_status => l_return_status);
4404: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4405: x_return_status => l_return_status);
4406:
4407: IF l_debug_on THEN
4408: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4409: END IF;
4410:
4411: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4412: x_return_status := l_return_status;
4426: );
4427:
4428:
4429: IF l_debug_on THEN
4430: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4431: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4432: END IF;
4433: --
4434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4427:
4428:
4429: IF l_debug_on THEN
4430: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4431: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4432: END IF;
4433: --
4434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4435: -- ROLLBACK TO DELIVERY_DETAIL_ACTION_GRP;
4445: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
4446: THEN
4447: --{
4448: IF l_debug_on THEN
4449: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
4450: END IF;
4451:
4452: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
4453: (
4457: );
4458: --
4459: --
4460: IF l_debug_on THEN
4461: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
4462: END IF;
4463: --
4464: --
4465: --}
4475: --{
4476: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4477: --{
4478: IF l_debug_on THEN
4479: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4480: END IF;
4481:
4482: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4483: x_return_status => l_return_status);
4482: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4483: x_return_status => l_return_status);
4484:
4485: IF l_debug_on THEN
4486: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4487: END IF;
4488: --}
4489: END IF;
4490: --}
4500: );
4501:
4502:
4503: IF l_debug_on THEN
4504: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4505: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4506: END IF;
4507: --
4508: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4501:
4502:
4503: IF l_debug_on THEN
4504: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4505: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4506: END IF;
4507: --
4508: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4509: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4517: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
4518: THEN
4519: --{
4520: IF l_debug_on THEN
4521: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
4522: END IF;
4523:
4524: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
4525: (
4529: );
4530: --
4531: --
4532: IF l_debug_on THEN
4533: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
4534: END IF;
4535: --
4536: --
4537: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR) and x_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4552: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API)
4553: THEN
4554: --{
4555: IF l_debug_on THEN
4556: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4557: END IF;
4558:
4559: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
4560: x_return_status => l_return_status);
4559: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
4560: x_return_status => l_return_status);
4561:
4562: IF l_debug_on THEN
4563: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4564: END IF;
4565:
4566: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4567: x_return_status := l_return_status;
4580: p_encoded => FND_API.G_FALSE
4581: );
4582:
4583: IF l_debug_on THEN
4584: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4585: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4586: END IF;
4587: --
4588: WHEN OTHERS THEN
4581: );
4582:
4583: IF l_debug_on THEN
4584: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4585: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4586: END IF;
4587: --
4588: WHEN OTHERS THEN
4589: IF del_cur%ISOPEN THEN
4603: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
4604: THEN
4605: --{
4606: IF l_debug_on THEN
4607: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
4608: END IF;
4609:
4610: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
4611: (
4615: );
4616: --
4617: --
4618: IF l_debug_on THEN
4619: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
4620: END IF;
4621: --
4622: --
4623: --}
4633: --{
4634: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4635: --{
4636: IF l_debug_on THEN
4637: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4638: END IF;
4639:
4640: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4641: x_return_status => l_return_status);
4640: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4641: x_return_status => l_return_status);
4642:
4643: IF l_debug_on THEN
4644: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4645: END IF;
4646: --}
4647: END IF;
4648: --}
4658: );
4659: --
4660:
4661: IF l_debug_on THEN
4662: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4663: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4664: END IF;
4665: --
4666: END Delivery_Detail_Action;
4659: --
4660:
4661: IF l_debug_on THEN
4662: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4663: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4664: END IF;
4665: --
4666: END Delivery_Detail_Action;
4667:
4741: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4742: --
4743: IF l_debug_on IS NULL
4744: THEN
4745: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4746: END IF;
4747: --
4748: SAVEPOINT CREATE_UPDATE_DEL_DETAIL_GRP;
4749: --
4749: --
4750: -- Debug Statements
4751: --
4752: IF l_debug_on THEN
4753: WSH_DEBUG_SV.push(l_module_name);
4754: --
4755: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
4756: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
4757: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
4751: --
4752: IF l_debug_on THEN
4753: WSH_DEBUG_SV.push(l_module_name);
4754: --
4755: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
4756: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
4757: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
4758: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
4759: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
4752: IF l_debug_on THEN
4753: WSH_DEBUG_SV.push(l_module_name);
4754: --
4755: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
4756: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
4757: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
4758: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
4759: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
4760: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
4753: WSH_DEBUG_SV.push(l_module_name);
4754: --
4755: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
4756: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
4757: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
4758: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
4759: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
4760: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
4761: END IF;
4754: --
4755: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
4756: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
4757: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
4758: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
4759: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
4760: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
4761: END IF;
4762: --
4755: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
4756: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
4757: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
4758: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
4759: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
4760: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
4761: END IF;
4762: --
4763:
4756: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
4757: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
4758: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
4759: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
4760: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
4761: END IF;
4762: --
4763:
4764: -- Initialize message list if p_init_msg_list is set to TRUE.
4793: x_num_errors =>l_number_of_errors);
4794:
4795: IF l_number_of_warnings > 0 THEN
4796: IF l_debug_on THEN
4797: wsh_debug_sv.log(l_module_name,'Number of warnings', l_number_of_warnings);
4798: END IF;
4799: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
4800: END IF;
4801:
4802:
4803: -- Standard check of p_commit.
4804: IF FND_API.To_Boolean( p_commit ) THEN
4805: IF(l_debug_on) THEN
4806: wsh_debug_sv.logmsg(l_module_name, 'Commit Work');
4807: END IF;
4808: COMMIT WORK;
4809: END IF;
4810:
4815: p_encoded => FND_API.G_FALSE
4816: );
4817:
4818: IF l_debug_on THEN
4819: WSH_DEBUG_SV.pop(l_module_name);
4820: END IF;
4821: --
4822: EXCEPTION
4823: WHEN FND_API.G_EXC_ERROR THEN
4830: p_encoded => FND_API.G_FALSE
4831: );
4832: --
4833: IF l_debug_on THEN
4834: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4835: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4836: END IF;
4837: --
4838: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4831: );
4832: --
4833: IF l_debug_on THEN
4834: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4835: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4836: END IF;
4837: --
4838: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4839: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP;
4846: );
4847:
4848: --
4849: IF l_debug_on THEN
4850: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4851: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4852: END IF;
4853: --
4854: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4847:
4848: --
4849: IF l_debug_on THEN
4850: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4851: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4852: END IF;
4853: --
4854: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4855: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4860: p_encoded => FND_API.G_FALSE
4861: );
4862: --
4863: IF l_debug_on THEN
4864: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4865: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4866: END IF;
4867: --
4868: WHEN mark_reprice_error then
4861: );
4862: --
4863: IF l_debug_on THEN
4864: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4865: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4866: END IF;
4867: --
4868: WHEN mark_reprice_error then
4869: FND_MESSAGE.Set_Name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
4878: --
4879:
4880: --
4881: IF l_debug_on THEN
4882: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4883: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
4884: END IF;
4885: --
4886: WHEN OTHERS THEN
4879:
4880: --
4881: IF l_debug_on THEN
4882: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4883: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
4884: END IF;
4885: --
4886: WHEN OTHERS THEN
4887: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP;
4896: );
4897: --
4898:
4899: IF l_debug_on THEN
4900: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4901: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4902: END IF;
4903: --
4904: END Create_Update_Delivery_Detail;
4897: --
4898:
4899: IF l_debug_on THEN
4900: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4901: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4902: END IF;
4903: --
4904: END Create_Update_Delivery_Detail;
4905:
4987: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4988: --
4989: IF l_debug_on IS NULL
4990: THEN
4991: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4992: END IF;
4993: --
4994: IF l_debug_on THEN
4995: WSH_DEBUG_SV.push(l_module_name);
4991: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4992: END IF;
4993: --
4994: IF l_debug_on THEN
4995: WSH_DEBUG_SV.push(l_module_name);
4996: WSH_DEBUG_SV.log(l_module_name, 'p_detail_info_tab.count',
4997: p_detail_info_tab.count);
4998: END IF;
4999:
4992: END IF;
4993: --
4994: IF l_debug_on THEN
4995: WSH_DEBUG_SV.push(l_module_name);
4996: WSH_DEBUG_SV.log(l_module_name, 'p_detail_info_tab.count',
4997: p_detail_info_tab.count);
4998: END IF;
4999:
5000: SAVEPOINT s_create_containers_DDGPB;
5007: AND ( p_detail_IN_rec.container_name IS NOT NULL) THEN
5008: l_create_one_record := TRUE;
5009: ELSIF NVL(p_detail_IN_rec.quantity,0) <=0 THEN
5010: IF l_debug_on THEN
5011: WSH_DEBUG_SV.log(l_module_name,
5012: 'Invalid quantity', p_detail_IN_rec.quantity);
5013: END IF;
5014: raise fnd_api.g_exc_error;
5015: ELSE
5057: -- wms change: Validate Item check is to be skipped if the
5058: -- Org. is WMS enabled
5059:
5060: IF l_debug_on THEN
5061: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WMS_INSTALL.CHECK_INSTALL',WSH_DEBUG_SV.C_PROC_LEVEL);
5062: END IF;
5063:
5064: l_wms_enabled := WMS_INSTALL.check_install(
5065: l_wms_return_status,
5073: x_num_errors => l_number_of_errors
5074: );
5075:
5076: IF l_debug_on THEN
5077: wsh_debug_sv.log(l_module_name, 'wms enabled',
5078: l_wms_enabled);
5079: END IF;
5080: IF (l_wms_enabled = FALSE) THEN --{
5081: IF (l_cont_item_id IS NULL
5121: IF (p_detail_IN_rec.name_suffix IS NOT NULL)
5122: AND (NVL(p_detail_IN_rec.ucc_128_suffix_flag,2) = 1)
5123: THEN
5124: IF l_debug_on THEN
5125: wsh_debug_sv.log(l_module_name, 'Error ucc_128_suffix_flag is set to 1 and name_suffix is set to ',p_detail_IN_rec.name_suffix);
5126: END IF;
5127: FND_MESSAGE.SET_NAME('WSH', 'WSH_UCC128_ERROR'); --bmso new
5128: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5129: RAISE FND_API.G_EXC_ERROR;
5180: END IF;
5181:
5182:
5183: IF l_debug_on THEN
5184: wsh_debug_sv.log(l_module_name, 'l_lpn_starting_num',l_lpn_starting_num);
5185: wsh_debug_sv.log(l_module_name, 'l_wms_sequence',l_wms_sequence);
5186: wsh_debug_sv.log(l_module_name, 'l_base_number_dummy',l_base_number_dummy);
5187: END IF;
5188:
5181:
5182:
5183: IF l_debug_on THEN
5184: wsh_debug_sv.log(l_module_name, 'l_lpn_starting_num',l_lpn_starting_num);
5185: wsh_debug_sv.log(l_module_name, 'l_wms_sequence',l_wms_sequence);
5186: wsh_debug_sv.log(l_module_name, 'l_base_number_dummy',l_base_number_dummy);
5187: END IF;
5188:
5189: IF p_detail_IN_rec.num_digits IS NOT NULL THEN
5182:
5183: IF l_debug_on THEN
5184: wsh_debug_sv.log(l_module_name, 'l_lpn_starting_num',l_lpn_starting_num);
5185: wsh_debug_sv.log(l_module_name, 'l_wms_sequence',l_wms_sequence);
5186: wsh_debug_sv.log(l_module_name, 'l_base_number_dummy',l_base_number_dummy);
5187: END IF;
5188:
5189: IF p_detail_IN_rec.num_digits IS NOT NULL THEN
5190: l_total_length := NVL(length(p_detail_IN_rec.name_prefix),0)
5217: WSH_WMS_LPN_GRP.g_call_group_api := 'N';
5218: WSH_WMS_LPN_GRP.g_update_to_container := 'N';
5219:
5220: IF l_debug_on THEN
5221: wsh_debug_sv.logmsg(l_module_name, 'Calling wms_container_grp.Auto_Create_LPNs');
5222: END IF;
5223: wms_container_grp.Auto_Create_LPNs (
5224: p_api_version => 1.0
5225: , p_init_msg_list => fnd_api.g_false
5245: i := l_lpn_out_tab.FIRST;
5246: --if i null then error out bmso
5247: j := 1;
5248: IF l_debug_on THEN
5249: wsh_debug_sv.log(l_module_name, 'l_lpn_out_tab.count',l_lpn_out_tab.count);
5250: END IF;
5251: WHILE i IS NOT NULL LOOP --{
5252: l_container_info_rec.lpn_ids(j) := l_lpn_out_tab(i).lpn_id;
5253: l_container_info_rec.container_names(j) :=
5252: l_container_info_rec.lpn_ids(j) := l_lpn_out_tab(i).lpn_id;
5253: l_container_info_rec.container_names(j) :=
5254: l_lpn_out_tab(i).license_plate_number;
5255: IF l_debug_on THEN
5256: wsh_debug_sv.log(l_module_name, 'name',
5257: l_container_info_rec.container_names(j));
5258: wsh_debug_sv.log(l_module_name, 'lpn_id',
5259: l_container_info_rec.lpn_ids(j));
5260: END IF;
5254: l_lpn_out_tab(i).license_plate_number;
5255: IF l_debug_on THEN
5256: wsh_debug_sv.log(l_module_name, 'name',
5257: l_container_info_rec.container_names(j));
5258: wsh_debug_sv.log(l_module_name, 'lpn_id',
5259: l_container_info_rec.lpn_ids(j));
5260: END IF;
5261:
5262: IF l_container_info_rec.lpn_ids(j) IS NULL THEN
5332: ELSIF l_create_one_record THEN --}{
5333: --bmso
5334: IF c_wms_code_present = 'Y' THEN --{
5335: IF l_debug_on THEN
5336: wsh_debug_sv.logmsg(l_module_name, 'Calling wms_container_grp.create_lpns');
5337: END IF;
5338: l_lpn_table(1).license_plate_number :=
5339: p_detail_IN_rec.container_name;
5340: l_lpn_table(1).inventory_item_id := l_cont_item_id;
5444: (WSH_UTIL_CORE.G_RET_STS_ERROR,
5445: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ) THEN
5446: --
5447: IF l_debug_on THEN
5448: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR CREATING CONTAINER');
5449: END IF;
5450: --
5451: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
5452: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5453: RAISE FND_API.G_EXC_ERROR;
5454: END IF;
5455:
5456: IF l_debug_on THEN
5457: WSH_DEBUG_SV.log(l_module_name,'COUNT OF WDD RECORDS',
5458: l_cont_dummy_tab.count);
5459: END IF;
5460:
5461: wsh_util_core.api_post_call(
5472: x_return_status => l_return_status
5473: );
5474:
5475: IF l_debug_on THEN
5476: WSH_DEBUG_SV.log(l_module_name,'COUNT OF WDA RECORDS',
5477: l_assignment_dummy_tab.count);
5478: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
5479: END IF;
5480:
5474:
5475: IF l_debug_on THEN
5476: WSH_DEBUG_SV.log(l_module_name,'COUNT OF WDA RECORDS',
5477: l_assignment_dummy_tab.count);
5478: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
5479: END IF;
5480:
5481: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5482: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5500: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5501: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'ORGANIZATION_ID');
5502: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5503: IF l_debug_on THEN
5504: wsh_debug_sv.log(l_module_name,'ERROR organization id is null for', p_detail_info_tab(i).lpn_id);
5505: END IF;
5506:
5507: raise FND_API.G_EXC_ERROR;
5508:
5528:
5529: /*IF l_container_rec.organization_id IS NULL THEN
5530:
5531: IF l_debug_on THEN
5532: WSH_DEBUG_SV.logmsg(l_module_name,
5533: 'organization is not passed');
5534: END IF;
5535: RAISE FND_API.G_EXC_ERROR;
5536: END IF; */
5556: (WSH_UTIL_CORE.G_RET_STS_ERROR,
5557: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ) THEN
5558: --
5559: IF l_debug_on THEN
5560: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR CREATING CONTAINER');
5561: END IF;
5562: --
5563: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
5564: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5565: RAISE FND_API.G_EXC_ERROR;
5566: END IF;
5567:
5568: IF l_debug_on THEN
5569: WSH_DEBUG_SV.log(l_module_name,'COUNT OF WDD RECORDS',
5570: l_cont_dummy_tab.count);
5571: END IF;
5572:
5573: wsh_util_core.api_post_call(
5584: x_return_status => l_return_status
5585: );
5586:
5587: IF l_debug_on THEN
5588: WSH_DEBUG_SV.log(l_module_name,'COUNT OF WDA RECORDS',
5589: l_assignment_dummy_tab.count);
5590: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
5591: END IF;
5592:
5586:
5587: IF l_debug_on THEN
5588: WSH_DEBUG_SV.log(l_module_name,'COUNT OF WDA RECORDS',
5589: l_assignment_dummy_tab.count);
5590: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
5591: END IF;
5592:
5593: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5594: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5621: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5622: END IF;
5623:
5624: IF l_debug_on THEN
5625: WSH_DEBUG_SV.pop(l_module_name);
5626: END IF;
5627:
5628: EXCEPTION
5629: WHEN e_NO_INV_ITEM then
5632:
5633: rollback to s_create_containers_DDGPB;
5634: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5635: IF l_debug_on THEN
5636: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_NO_INV_ITEM');
5637: END IF;
5638: WHEN e_lpn_count_invalid then
5639: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5640: WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
5643: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5644: fnd_message.set_name('WSH', 'WSH_LPN_COUNT_INVALID');
5645: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
5646: IF l_debug_on THEN
5647: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_lpn_count_invalid');
5648: END IF;
5649: --
5650:
5651: WHEN FND_API.G_EXC_ERROR THEN
5654:
5655: rollback to s_create_containers_DDGPB;
5656: x_return_status := FND_API.G_RET_STS_ERROR ;
5657: IF l_debug_on THEN
5658: WSH_DEBUG_SV.logmsg(l_module_name,
5659: 'FND_API.G_EXC_ERROR exception has occured.',
5660: WSH_DEBUG_SV.C_EXCEP_LEVEL);
5661: WSH_DEBUG_SV.pop(l_module_name,
5662: 'EXCEPTION:FND_API.G_EXC_ERROR');
5656: x_return_status := FND_API.G_RET_STS_ERROR ;
5657: IF l_debug_on THEN
5658: WSH_DEBUG_SV.logmsg(l_module_name,
5659: 'FND_API.G_EXC_ERROR exception has occured.',
5660: WSH_DEBUG_SV.C_EXCEP_LEVEL);
5661: WSH_DEBUG_SV.pop(l_module_name,
5662: 'EXCEPTION:FND_API.G_EXC_ERROR');
5663: END IF;
5664: --
5657: IF l_debug_on THEN
5658: WSH_DEBUG_SV.logmsg(l_module_name,
5659: 'FND_API.G_EXC_ERROR exception has occured.',
5660: WSH_DEBUG_SV.C_EXCEP_LEVEL);
5661: WSH_DEBUG_SV.pop(l_module_name,
5662: 'EXCEPTION:FND_API.G_EXC_ERROR');
5663: END IF;
5664: --
5665: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5667: rollback to s_create_containers_DDGPB;
5668: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5669:
5670: IF l_debug_on THEN
5671: WSH_DEBUG_SV.logmsg(l_module_name
5672: ,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.'
5673: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5674: WSH_DEBUG_SV.pop(l_module_name
5675: ,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5669:
5670: IF l_debug_on THEN
5671: WSH_DEBUG_SV.logmsg(l_module_name
5672: ,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.'
5673: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5674: WSH_DEBUG_SV.pop(l_module_name
5675: ,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5676: END IF;
5677: --
5670: IF l_debug_on THEN
5671: WSH_DEBUG_SV.logmsg(l_module_name
5672: ,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.'
5673: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5674: WSH_DEBUG_SV.pop(l_module_name
5675: ,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5676: END IF;
5677: --
5678: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
5680: WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
5681:
5682: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5683: IF l_debug_on THEN
5684: WSH_DEBUG_SV.logmsg(l_module_name
5685: ,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured '
5686: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5687: WSH_DEBUG_SV.pop(l_module_name
5688: ,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
5682: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5683: IF l_debug_on THEN
5684: WSH_DEBUG_SV.logmsg(l_module_name
5685: ,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured '
5686: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5687: WSH_DEBUG_SV.pop(l_module_name
5688: ,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
5689: END IF;
5690: WHEN OTHERS THEN
5683: IF l_debug_on THEN
5684: WSH_DEBUG_SV.logmsg(l_module_name
5685: ,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured '
5686: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5687: WSH_DEBUG_SV.pop(l_module_name
5688: ,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
5689: END IF;
5690: WHEN OTHERS THEN
5691: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5694: wsh_util_core.add_message(x_return_status, l_module_name);
5695: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_containers');
5696: IF l_debug_on THEN
5697: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5698: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5699: END IF;
5700:
5701: END Create_containers;
5694: wsh_util_core.add_message(x_return_status, l_module_name);
5695: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_containers');
5696: IF l_debug_on THEN
5697: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5698: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5699: END IF;
5700:
5701: END Create_containers;
5702:
5762: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5763: --
5764: IF l_debug_on IS NULL
5765: THEN
5766: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5767: END IF;
5768: --
5769: SAVEPOINT CREATE_DEL_DETAIL_GRP;
5770:
5768: --
5769: SAVEPOINT CREATE_DEL_DETAIL_GRP;
5770:
5771: IF l_debug_on THEN
5772: WSH_DEBUG_SV.push(l_module_name);
5773: WSH_DEBUG_SV.log(l_module_name, 'container_item_id',p_detail_IN_rec.container_item_id);
5774: WSH_DEBUG_SV.log(l_module_name, 'container_item_name',p_detail_IN_rec.container_item_name);
5775: WSH_DEBUG_SV.log(l_module_name, 'organization_id', p_detail_IN_rec.organization_id);
5776: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5769: SAVEPOINT CREATE_DEL_DETAIL_GRP;
5770:
5771: IF l_debug_on THEN
5772: WSH_DEBUG_SV.push(l_module_name);
5773: WSH_DEBUG_SV.log(l_module_name, 'container_item_id',p_detail_IN_rec.container_item_id);
5774: WSH_DEBUG_SV.log(l_module_name, 'container_item_name',p_detail_IN_rec.container_item_name);
5775: WSH_DEBUG_SV.log(l_module_name, 'organization_id', p_detail_IN_rec.organization_id);
5776: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5777: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5770:
5771: IF l_debug_on THEN
5772: WSH_DEBUG_SV.push(l_module_name);
5773: WSH_DEBUG_SV.log(l_module_name, 'container_item_id',p_detail_IN_rec.container_item_id);
5774: WSH_DEBUG_SV.log(l_module_name, 'container_item_name',p_detail_IN_rec.container_item_name);
5775: WSH_DEBUG_SV.log(l_module_name, 'organization_id', p_detail_IN_rec.organization_id);
5776: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5777: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5778: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5771: IF l_debug_on THEN
5772: WSH_DEBUG_SV.push(l_module_name);
5773: WSH_DEBUG_SV.log(l_module_name, 'container_item_id',p_detail_IN_rec.container_item_id);
5774: WSH_DEBUG_SV.log(l_module_name, 'container_item_name',p_detail_IN_rec.container_item_name);
5775: WSH_DEBUG_SV.log(l_module_name, 'organization_id', p_detail_IN_rec.organization_id);
5776: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5777: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5778: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5779: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5772: WSH_DEBUG_SV.push(l_module_name);
5773: WSH_DEBUG_SV.log(l_module_name, 'container_item_id',p_detail_IN_rec.container_item_id);
5774: WSH_DEBUG_SV.log(l_module_name, 'container_item_name',p_detail_IN_rec.container_item_name);
5775: WSH_DEBUG_SV.log(l_module_name, 'organization_id', p_detail_IN_rec.organization_id);
5776: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5777: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5778: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5779: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5780: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5773: WSH_DEBUG_SV.log(l_module_name, 'container_item_id',p_detail_IN_rec.container_item_id);
5774: WSH_DEBUG_SV.log(l_module_name, 'container_item_name',p_detail_IN_rec.container_item_name);
5775: WSH_DEBUG_SV.log(l_module_name, 'organization_id', p_detail_IN_rec.organization_id);
5776: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5777: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5778: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5779: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5780: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5781: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_detail_IN_rec.quantity);
5774: WSH_DEBUG_SV.log(l_module_name, 'container_item_name',p_detail_IN_rec.container_item_name);
5775: WSH_DEBUG_SV.log(l_module_name, 'organization_id', p_detail_IN_rec.organization_id);
5776: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5777: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5778: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5779: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5780: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5781: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_detail_IN_rec.quantity);
5782: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_detail_IN_rec.container_name);
5775: WSH_DEBUG_SV.log(l_module_name, 'organization_id', p_detail_IN_rec.organization_id);
5776: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5777: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5778: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5779: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5780: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5781: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_detail_IN_rec.quantity);
5782: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_detail_IN_rec.container_name);
5783: WSH_DEBUG_SV.log(l_module_name, 'Lpn Ids Count', p_detail_In_rec.lpn_ids.count);
5776: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5777: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5778: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5779: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5780: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5781: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_detail_IN_rec.quantity);
5782: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_detail_IN_rec.container_name);
5783: WSH_DEBUG_SV.log(l_module_name, 'Lpn Ids Count', p_detail_In_rec.lpn_ids.count);
5784: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_detail_in_rec.caller);
5777: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5778: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5779: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5780: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5781: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_detail_IN_rec.quantity);
5782: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_detail_IN_rec.container_name);
5783: WSH_DEBUG_SV.log(l_module_name, 'Lpn Ids Count', p_detail_In_rec.lpn_ids.count);
5784: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_detail_in_rec.caller);
5785: END IF;
5778: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5779: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5780: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5781: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_detail_IN_rec.quantity);
5782: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_detail_IN_rec.container_name);
5783: WSH_DEBUG_SV.log(l_module_name, 'Lpn Ids Count', p_detail_In_rec.lpn_ids.count);
5784: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_detail_in_rec.caller);
5785: END IF;
5786: --
5779: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5780: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5781: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_detail_IN_rec.quantity);
5782: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_detail_IN_rec.container_name);
5783: WSH_DEBUG_SV.log(l_module_name, 'Lpn Ids Count', p_detail_In_rec.lpn_ids.count);
5784: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_detail_in_rec.caller);
5785: END IF;
5786: --
5787:
5780: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5781: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_detail_IN_rec.quantity);
5782: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_detail_IN_rec.container_name);
5783: WSH_DEBUG_SV.log(l_module_name, 'Lpn Ids Count', p_detail_In_rec.lpn_ids.count);
5784: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_detail_in_rec.caller);
5785: END IF;
5786: --
5787:
5788: -- Initialize API return status to success
5812: IF( p_detail_IN_rec.organization_id IS NULL and p_detail_IN_rec.organization_code IS NULL) THEN
5813: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_ORG_NULL');
5814: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5815: IF l_debug_on THEN
5816: wsh_debug_sv.logmsg(l_module_name,'Null Organization');
5817: END IF;
5818: raise FND_API.G_EXC_ERROR;
5819: ELSIF(p_detail_IN_rec.container_item_id IS NULL
5820: AND p_detail_IN_rec.container_item_name IS NULL
5822: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5823: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CONTAINER_ITEM');
5824: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5825: IF l_debug_on THEN
5826: wsh_debug_sv.logmsg(l_module_name,'Null Container item');
5827: END IF;
5828:
5829: raise FND_API.G_EXC_ERROR;
5830:
5847: LOOP --{
5848: --
5849: IF(p_detail_info_tab(l_index).container_flag in ('Y', 'C')) THEN
5850: IF l_debug_on THEN
5851: wsh_debug_sv.logmsg(l_module_name,'Container Flag Yes ');
5852: END IF;
5853: RAISE FND_API.G_EXC_ERROR;
5854: END IF;
5855:
5857: -- Validate Item and see if this is container item
5858: -- Error out if this is a container item
5859:
5860: IF l_debug_on THEN
5861: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.FIND_ITEM_TYPE',WSH_DEBUG_SV.C_PROC_LEVEL);
5862: END IF;
5863:
5864: WSH_UTIL_VALIDATE.Find_Item_Type
5865: (
5869: x_return_status => l_return_status
5870: );
5871:
5872: IF l_debug_on THEN
5873: wsh_debug_sv.log(l_module_name, 'Item Type', l_item_type);
5874: END IF;
5875: --
5876: wsh_util_core.api_post_call(
5877: p_return_status => l_return_status,
5881: );
5882:
5883: IF(nvl(l_item_type, 'FND_API.G_MISS_CHAR') = 'CONT_ITEM') THEN
5884: IF l_debug_on THEN
5885: wsh_debug_sv.logmsg(l_module_name,'Container Item');
5886: END IF;
5887: RAISE FND_API.G_EXC_ERROR;
5888: END IF;
5889: END IF; --}
5889: END IF; --}
5890:
5891:
5892: IF l_debug_on THEN
5893: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.CREATE_DELIVERY_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
5894: END IF;
5895: --
5896: WSH_DELIVERY_DETAILS_PKG.create_delivery_details(
5897: p_delivery_details_info => p_detail_info_tab(l_index),
5899: x_delivery_detail_id => l_new_detail_id,
5900: x_return_status => l_return_status);
5901:
5902: IF l_debug_on THEN
5903: wsh_debug_sv.log(l_module_name, 'New Detail Created', l_new_detail_id);
5904: END IF;
5905:
5906: --
5907: wsh_util_core.api_post_call(
5923: l_delivery_assignments_info.parent_delivery_detail_id := NULL;
5924:
5925:
5926: IF l_debug_on THEN
5927: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.CREATE_DELIVERY_ASSIGNMENTS',WSH_DEBUG_SV.C_PROC_LEVEL);
5928: END IF;
5929: --
5930: WSH_DELIVERY_DETAILS_PKG.Create_Delivery_Assignments(
5931: p_delivery_assignments_info => l_delivery_assignments_info,
5952: --OTM R12, calling delivery detail splitter
5953: IF (l_gc3_is_installed = 'Y') THEN
5954:
5955: IF l_debug_on THEN
5956: WSH_DEBUG_SV.log(l_module_name,'Delivery detail number',l_index);
5957: WSH_DEBUG_SV.log(l_module_name,'Delivery detail count',l_counter);
5958: WSH_DEBUG_SV.log(l_module_name,'delivery detail id',l_new_detail_id);
5959: WSH_DEBUG_SV.log(l_module_name,'inventory item id',p_detail_info_tab(l_index).inventory_item_id);
5960: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5953: IF (l_gc3_is_installed = 'Y') THEN
5954:
5955: IF l_debug_on THEN
5956: WSH_DEBUG_SV.log(l_module_name,'Delivery detail number',l_index);
5957: WSH_DEBUG_SV.log(l_module_name,'Delivery detail count',l_counter);
5958: WSH_DEBUG_SV.log(l_module_name,'delivery detail id',l_new_detail_id);
5959: WSH_DEBUG_SV.log(l_module_name,'inventory item id',p_detail_info_tab(l_index).inventory_item_id);
5960: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5961: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5954:
5955: IF l_debug_on THEN
5956: WSH_DEBUG_SV.log(l_module_name,'Delivery detail number',l_index);
5957: WSH_DEBUG_SV.log(l_module_name,'Delivery detail count',l_counter);
5958: WSH_DEBUG_SV.log(l_module_name,'delivery detail id',l_new_detail_id);
5959: WSH_DEBUG_SV.log(l_module_name,'inventory item id',p_detail_info_tab(l_index).inventory_item_id);
5960: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5961: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5962: WSH_DEBUG_SV.log(l_module_name,'weight uom code',p_detail_info_tab(l_index).weight_uom_code);
5955: IF l_debug_on THEN
5956: WSH_DEBUG_SV.log(l_module_name,'Delivery detail number',l_index);
5957: WSH_DEBUG_SV.log(l_module_name,'Delivery detail count',l_counter);
5958: WSH_DEBUG_SV.log(l_module_name,'delivery detail id',l_new_detail_id);
5959: WSH_DEBUG_SV.log(l_module_name,'inventory item id',p_detail_info_tab(l_index).inventory_item_id);
5960: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5961: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5962: WSH_DEBUG_SV.log(l_module_name,'weight uom code',p_detail_info_tab(l_index).weight_uom_code);
5963: WSH_DEBUG_SV.log(l_module_name,'requested quantity',p_detail_info_tab(l_index).requested_quantity);
5956: WSH_DEBUG_SV.log(l_module_name,'Delivery detail number',l_index);
5957: WSH_DEBUG_SV.log(l_module_name,'Delivery detail count',l_counter);
5958: WSH_DEBUG_SV.log(l_module_name,'delivery detail id',l_new_detail_id);
5959: WSH_DEBUG_SV.log(l_module_name,'inventory item id',p_detail_info_tab(l_index).inventory_item_id);
5960: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5961: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5962: WSH_DEBUG_SV.log(l_module_name,'weight uom code',p_detail_info_tab(l_index).weight_uom_code);
5963: WSH_DEBUG_SV.log(l_module_name,'requested quantity',p_detail_info_tab(l_index).requested_quantity);
5964: WSH_DEBUG_SV.log(l_module_name,'ship from location id',p_detail_info_tab(l_index).ship_from_location_id);
5957: WSH_DEBUG_SV.log(l_module_name,'Delivery detail count',l_counter);
5958: WSH_DEBUG_SV.log(l_module_name,'delivery detail id',l_new_detail_id);
5959: WSH_DEBUG_SV.log(l_module_name,'inventory item id',p_detail_info_tab(l_index).inventory_item_id);
5960: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5961: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5962: WSH_DEBUG_SV.log(l_module_name,'weight uom code',p_detail_info_tab(l_index).weight_uom_code);
5963: WSH_DEBUG_SV.log(l_module_name,'requested quantity',p_detail_info_tab(l_index).requested_quantity);
5964: WSH_DEBUG_SV.log(l_module_name,'ship from location id',p_detail_info_tab(l_index).ship_from_location_id);
5965: WSH_DEBUG_SV.log(l_module_name,'requested quantity uom',p_detail_info_tab(l_index).requested_quantity_uom);
5958: WSH_DEBUG_SV.log(l_module_name,'delivery detail id',l_new_detail_id);
5959: WSH_DEBUG_SV.log(l_module_name,'inventory item id',p_detail_info_tab(l_index).inventory_item_id);
5960: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5961: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5962: WSH_DEBUG_SV.log(l_module_name,'weight uom code',p_detail_info_tab(l_index).weight_uom_code);
5963: WSH_DEBUG_SV.log(l_module_name,'requested quantity',p_detail_info_tab(l_index).requested_quantity);
5964: WSH_DEBUG_SV.log(l_module_name,'ship from location id',p_detail_info_tab(l_index).ship_from_location_id);
5965: WSH_DEBUG_SV.log(l_module_name,'requested quantity uom',p_detail_info_tab(l_index).requested_quantity_uom);
5966: END IF;
5959: WSH_DEBUG_SV.log(l_module_name,'inventory item id',p_detail_info_tab(l_index).inventory_item_id);
5960: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5961: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5962: WSH_DEBUG_SV.log(l_module_name,'weight uom code',p_detail_info_tab(l_index).weight_uom_code);
5963: WSH_DEBUG_SV.log(l_module_name,'requested quantity',p_detail_info_tab(l_index).requested_quantity);
5964: WSH_DEBUG_SV.log(l_module_name,'ship from location id',p_detail_info_tab(l_index).ship_from_location_id);
5965: WSH_DEBUG_SV.log(l_module_name,'requested quantity uom',p_detail_info_tab(l_index).requested_quantity_uom);
5966: END IF;
5967:
5960: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5961: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5962: WSH_DEBUG_SV.log(l_module_name,'weight uom code',p_detail_info_tab(l_index).weight_uom_code);
5963: WSH_DEBUG_SV.log(l_module_name,'requested quantity',p_detail_info_tab(l_index).requested_quantity);
5964: WSH_DEBUG_SV.log(l_module_name,'ship from location id',p_detail_info_tab(l_index).ship_from_location_id);
5965: WSH_DEBUG_SV.log(l_module_name,'requested quantity uom',p_detail_info_tab(l_index).requested_quantity_uom);
5966: END IF;
5967:
5968: --prepare table of delivery detail information to call splitter
5961: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5962: WSH_DEBUG_SV.log(l_module_name,'weight uom code',p_detail_info_tab(l_index).weight_uom_code);
5963: WSH_DEBUG_SV.log(l_module_name,'requested quantity',p_detail_info_tab(l_index).requested_quantity);
5964: WSH_DEBUG_SV.log(l_module_name,'ship from location id',p_detail_info_tab(l_index).ship_from_location_id);
5965: WSH_DEBUG_SV.log(l_module_name,'requested quantity uom',p_detail_info_tab(l_index).requested_quantity_uom);
5966: END IF;
5967:
5968: --prepare table of delivery detail information to call splitter
5969: l_delivery_detail_tab.EXTEND;
5989: --OTM R12, after loop call split with all the data
5990: IF (l_counter > 1) THEN
5991:
5992: IF l_debug_on THEN
5993: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_SPLITTER.tms_delivery_detail_split',WSH_DEBUG_SV.C_PROC_LEVEL);
5994: END IF;
5995:
5996: WSH_DELIVERY_DETAILS_SPLITTER.tms_delivery_detail_split(
5997: p_detail_tab => l_delivery_detail_tab,
5998: p_item_quantity_uom_tab => l_item_quantity_uom_tab,
5999: x_return_status => l_return_status);
6000:
6001: IF l_debug_on THEN
6002: WSH_DEBUG_SV.logmsg(l_module_name, 'return status from WSH_DELIVERY_DETAILS_SPLITTER.tms_delivery_detail_split: ' || l_return_status);
6003: END IF;
6004:
6005: -- we will not fail based on l_return_status here because
6006: -- we do not want to stop the flow
6007: -- if the detail doesn't split, it will be caught later in
6008: -- delivery splitting and will have exception on the detail
6009: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
6010: IF l_debug_on THEN
6011: WSH_DEBUG_SV.logmsg(l_module_name, 'Delivery detail split failed for ' || l_new_detail_id );
6012: END IF;
6013: END IF;
6014: END IF;
6015: --END OTM R12
6023:
6024: -- Debug Statements
6025: --
6026: IF l_debug_on THEN
6027: WSH_DEBUG_SV.pop(l_module_name);
6028: END IF;
6029: --
6030: EXCEPTION
6031: WHEN FND_API.G_EXC_ERROR THEN
6038: p_encoded => FND_API.G_FALSE
6039: );
6040:
6041: IF l_debug_on THEN
6042: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6043: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6044: END IF;
6045: --
6046: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6039: );
6040:
6041: IF l_debug_on THEN
6042: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6043: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6044: END IF;
6045: --
6046: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6047: ROLLBACK to CREATE_DEL_DETAIL_GRP;
6053: p_encoded => FND_API.G_FALSE
6054: );
6055:
6056: IF l_debug_on THEN
6057: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6058: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6059: END IF;
6060: --
6061: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6054: );
6055:
6056: IF l_debug_on THEN
6057: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6058: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6059: END IF;
6060: --
6061: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6062: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6067: p_encoded => FND_API.G_FALSE
6068: );
6069: --
6070: IF l_debug_on THEN
6071: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6072: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
6073: END IF;
6074: --
6075: WHEN OTHERS THEN
6068: );
6069: --
6070: IF l_debug_on THEN
6071: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6072: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
6073: END IF;
6074: --
6075: WHEN OTHERS THEN
6076:
6085: p_encoded => FND_API.G_FALSE
6086: );
6087:
6088: IF l_debug_on THEN
6089: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6090: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6091: END IF;
6092: --
6093: END Create_Delivery_Detail;
6086: );
6087:
6088: IF l_debug_on THEN
6089: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6090: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6091: END IF;
6092: --
6093: END Create_Delivery_Detail;
6094:
6233: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6234: --
6235: IF l_debug_on IS NULL
6236: THEN
6237: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6238: END IF;
6239: --
6240: SAVEPOINT VALIDATE_DEL_DETAIL_GRP;
6241:
6239: --
6240: SAVEPOINT VALIDATE_DEL_DETAIL_GRP;
6241:
6242: IF l_debug_on THEN
6243: WSH_DEBUG_SV.push(l_module_name);
6244: --
6245: WSH_DEBUG_SV.log(l_module_name,'P_ACTION',P_ACTION);
6246: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6247: END IF;
6241:
6242: IF l_debug_on THEN
6243: WSH_DEBUG_SV.push(l_module_name);
6244: --
6245: WSH_DEBUG_SV.log(l_module_name,'P_ACTION',P_ACTION);
6246: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6247: END IF;
6248: --
6249: -- Initialize API return status to success
6242: IF l_debug_on THEN
6243: WSH_DEBUG_SV.push(l_module_name);
6244: --
6245: WSH_DEBUG_SV.log(l_module_name,'P_ACTION',P_ACTION);
6246: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6247: END IF;
6248: --
6249: -- Initialize API return status to success
6250: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6269: BEGIN
6270: SAVEPOINT validate_det_loop_grp;
6271: --
6272: IF l_debug_on THEN
6273: wsh_debug_sv.log(l_module_name, 'Index', l_index);
6274: END IF;
6275: IF(p_action = 'CREATE') THEN
6276: --
6277: -- J-IB-NPARIKH-{
6369: l_required_field := 'SHIP_FROM_LOCATION_ID';
6370: raise e_required_field_null;
6371: ELSE
6372: IF l_debug_on THEN
6373: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_LOCATION',WSH_DEBUG_SV.C_PROC_LEVEL);
6374: END IF;
6375: wsh_util_validate.validate_location(
6376: p_location_id => x_detail_info_tab(l_index).ship_from_location_id,
6377: x_return_status => l_return_status,
6389: l_required_field := 'SHIP_TO_LOCATION_ID';
6390: raise e_required_field_null;
6391: ELSE
6392: IF l_debug_on THEN
6393: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_LOCATION',WSH_DEBUG_SV.C_PROC_LEVEL);
6394: END IF;
6395: wsh_util_validate.validate_location(
6396: p_location_id => x_detail_info_tab(l_index).ship_to_location_id,
6397: x_return_status => l_return_status,
6425: --
6426: IF ( nvl(x_detail_info_tab(l_index).requested_quantity,fnd_api.g_miss_num) = fnd_api.g_miss_num ) THEN
6427:
6428: IF l_debug_on THEN
6429: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
6430: END IF;
6431:
6432: x_detail_info_tab(l_index).requested_quantity := wsh_wv_utils.convert_uom(
6433: x_detail_info_tab(l_index).src_requested_quantity_uom,
6476:
6477: IF c_original_detail_cur%NOTFOUND THEN
6478: CLOSE c_original_detail_cur;
6479: IF l_debug_on THEN
6480: wsh_debug_sv.logmsg(l_module_name,'No Original Detail Record ');
6481: END IF;
6482: l_number_of_errors := l_number_of_errors + 1;
6483: FND_MESSAGE.SET_NAME('WSH', 'WSH_DET_INVALID_DETAIL');
6484: FND_MESSAGE.SET_TOKEN('DETAIL_ID', x_detail_info_tab(l_index).delivery_detail_id);
6507: x_msg_data => l_msg_data
6508: );
6509:
6510: IF l_debug_on THEN
6511: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6512: END IF;
6513: --
6514: wsh_util_core.api_post_call(
6515: p_return_status => l_return_status,
6530: x_msg_data => l_msg_data
6531: );
6532:
6533: IF l_debug_on THEN
6534: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6535: END IF;
6536: --
6537: wsh_util_core.api_post_call(
6538: p_return_status => l_return_status,
6556: p_serial_range_tab => p_serial_range_tab
6557: );
6558:
6559: IF l_debug_on THEN
6560: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6561: END IF;
6562: --
6563: wsh_util_core.api_post_call(
6564: p_return_status => l_return_status,
6653: OR x_detail_info_tab(l_index).cycle_count_quantity2 <> 0) )
6654: THEN
6655:
6656: IF l_debug_on THEN
6657: wsh_debug_sv.push(l_module_name);
6658: wsh_debug_sv.LOG(l_module_name, 'x_detail_info_tab(l_index).cycle_count_quantity', x_detail_info_tab(l_index).cycle_count_quantity);
6659: wsh_debug_sv.LOG(l_module_name, 'x_detail_info_tab(l_index).cycle_count_quantity2', x_detail_info_tab(l_index).cycle_count_quantity2);
6660:
6661: END IF;
6654: THEN
6655:
6656: IF l_debug_on THEN
6657: wsh_debug_sv.push(l_module_name);
6658: wsh_debug_sv.LOG(l_module_name, 'x_detail_info_tab(l_index).cycle_count_quantity', x_detail_info_tab(l_index).cycle_count_quantity);
6659: wsh_debug_sv.LOG(l_module_name, 'x_detail_info_tab(l_index).cycle_count_quantity2', x_detail_info_tab(l_index).cycle_count_quantity2);
6660:
6661: END IF;
6662:
6655:
6656: IF l_debug_on THEN
6657: wsh_debug_sv.push(l_module_name);
6658: wsh_debug_sv.LOG(l_module_name, 'x_detail_info_tab(l_index).cycle_count_quantity', x_detail_info_tab(l_index).cycle_count_quantity);
6659: wsh_debug_sv.LOG(l_module_name, 'x_detail_info_tab(l_index).cycle_count_quantity2', x_detail_info_tab(l_index).cycle_count_quantity2);
6660:
6661: END IF;
6662:
6663: WSH_DETAILS_VALIDATIONS.validate_secondary_quantity
6691: EXCEPTION -- for the local begin
6692: WHEN FND_API.G_EXC_ERROR THEN
6693: ROLLBACK TO validate_det_loop_grp;
6694: IF l_debug_on THEN
6695: wsh_debug_sv.log(l_module_name, 'Validation failure for detail', x_detail_info_tab(l_index).delivery_detail_id);
6696: END IF;
6697:
6698: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6699: ROLLBACK TO validate_det_loop_grp;
6697:
6698: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6699: ROLLBACK TO validate_det_loop_grp;
6700: IF l_debug_on THEN
6701: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error within loop');
6702: END IF;
6703: WHEN e_required_field_null THEN
6704: ROLLBACK TO validate_det_loop_grp;
6705: l_number_of_errors := l_number_of_errors + 1;
6706: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
6707: FND_MESSAGE.SET_TOKEN('FIELD_NAME', l_required_field);
6708: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
6709: IF l_debug_on THEN
6710: WSH_DEBUG_SV.logmsg(l_module_name,'E_REQUIRED_FIELD_NULL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6711: END IF;
6712: -- J-IB-NPARIKH-{
6713: WHEN e_ib_create_error THEN
6714: ROLLBACK TO validate_det_loop_grp;
6715: l_number_of_errors := l_number_of_errors + 1;
6716: FND_MESSAGE.SET_NAME('WSH', 'WSH_IB_CREATE_LINE_ERROR');
6717: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
6718: IF l_debug_on THEN
6719: WSH_DEBUG_SV.logmsg(l_module_name,'e_ib_create_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6720: END IF;
6721: -- J-IB-NPARIKH-}
6722:
6723: when uom_conversion_failed then
6724: FND_MESSAGE.SEt_NAME('WSH','UOM_CONVERSION_FAILED');
6725: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
6726:
6727: IF l_debug_on THEN
6728: WSH_DEBUG_SV.logmsg(l_module_name,'UOM_CONVERSION_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6729: END IF;
6730:
6731: WHEN OTHERS THEN
6732: ROLLBACK TO validate_det_loop_grp;
6730:
6731: WHEN OTHERS THEN
6732: ROLLBACK TO validate_det_loop_grp;
6733: IF l_debug_on THEN
6734: wsh_debug_sv.logmsg(l_module_name, 'Others exception within loop');
6735: END IF;
6736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6737: END; -- for the local begin
6738:
6767: -- anxsharm end for Load Tender
6768:
6769:
6770: IF l_debug_on THEN
6771: wsh_debug_sv.log(l_module_name, 'Number of errors', l_number_of_errors);
6772: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
6773: END IF;
6774:
6775: IF x_detail_info_tab.count > 0 THEN
6768:
6769:
6770: IF l_debug_on THEN
6771: wsh_debug_sv.log(l_module_name, 'Number of errors', l_number_of_errors);
6772: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
6773: END IF;
6774:
6775: IF x_detail_info_tab.count > 0 THEN
6776: IF l_number_of_errors >= x_detail_info_tab.count THEN
6789: p_encoded => FND_API.G_FALSE
6790: );
6791:
6792: IF l_debug_on THEN
6793: WSH_DEBUG_SV.pop(l_module_name);
6794: END IF;
6795: --
6796: EXCEPTION
6797: WHEN FND_API.G_EXC_ERROR THEN
6804: p_encoded => FND_API.G_FALSE
6805: );
6806: --
6807: IF l_debug_on THEN
6808: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6809: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6810: END IF;
6811: --
6812: --
6805: );
6806: --
6807: IF l_debug_on THEN
6808: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6809: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6810: END IF;
6811: --
6812: --
6813: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6820: p_encoded => FND_API.G_FALSE
6821: );
6822: --
6823: IF l_debug_on THEN
6824: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6825: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6826: END IF;
6827: --
6828: --
6821: );
6822: --
6823: IF l_debug_on THEN
6824: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6825: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6826: END IF;
6827: --
6828: --
6829: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6835: p_encoded => FND_API.G_FALSE
6836: );
6837: --
6838: IF l_debug_on THEN
6839: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6840: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
6841: END IF;
6842: --
6843:
6836: );
6837: --
6838: IF l_debug_on THEN
6839: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6840: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
6841: END IF;
6842: --
6843:
6844:
6856: p_encoded => FND_API.G_FALSE
6857: );
6858: --
6859: IF l_debug_on THEN
6860: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6861: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6862: END IF;
6863: --
6864: END Validate_Delivery_Detail;
6857: );
6858: --
6859: IF l_debug_on THEN
6860: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6861: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6862: END IF;
6863: --
6864: END Validate_Delivery_Detail;
6865:
6921: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6922: --
6923: IF l_debug_on IS NULL
6924: THEN
6925: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6926: END IF;
6927: --
6928: SAVEPOINT UPDATE_DEL_DETAIL_GRP;
6929: IF l_debug_on THEN
6926: END IF;
6927: --
6928: SAVEPOINT UPDATE_DEL_DETAIL_GRP;
6929: IF l_debug_on THEN
6930: WSH_DEBUG_SV.push(l_module_name);
6931: WSH_DEBUG_SV.log(l_module_name,'count of p_valid_index_tab is', p_valid_index_tab.count);
6932: WSH_DEBUG_SV.log(l_module_name,'count of p_detail_info_tab is', p_detail_info_tab.count);
6933: END IF;
6934: --
6927: --
6928: SAVEPOINT UPDATE_DEL_DETAIL_GRP;
6929: IF l_debug_on THEN
6930: WSH_DEBUG_SV.push(l_module_name);
6931: WSH_DEBUG_SV.log(l_module_name,'count of p_valid_index_tab is', p_valid_index_tab.count);
6932: WSH_DEBUG_SV.log(l_module_name,'count of p_detail_info_tab is', p_detail_info_tab.count);
6933: END IF;
6934: --
6935:
6928: SAVEPOINT UPDATE_DEL_DETAIL_GRP;
6929: IF l_debug_on THEN
6930: WSH_DEBUG_SV.push(l_module_name);
6931: WSH_DEBUG_SV.log(l_module_name,'count of p_valid_index_tab is', p_valid_index_tab.count);
6932: WSH_DEBUG_SV.log(l_module_name,'count of p_detail_info_tab is', p_detail_info_tab.count);
6933: END IF;
6934: --
6935:
6936: -- Initialize API return status to success
6940:
6941: l_index := p_valid_index_tab.FIRST;
6942:
6943: IF l_debug_on THEN
6944: WSH_DEBUG_SV.log(l_module_name,'first index of p_detail_info_tab is', l_index);
6945: END IF;
6946:
6947: WHILE l_index IS NOT NULL
6948: LOOP
6949: IF (p_caller like 'WMS%') OR (p_caller = 'WSH_USA') THEN
6950: -- Bug 3292364
6951: -- Lock the container being updated during OM changes.
6952: IF l_debug_on THEN
6953: WSH_DEBUG_SV.log(l_module_name, 'lock delivery detail '||p_detail_info_tab(l_index).delivery_detail_id);
6954: END IF;
6955:
6956: OPEN lock_delivery_details(p_detail_info_tab(l_index).delivery_detail_id);
6957: FETCH lock_delivery_details into l_delivery_detail;
6959: END IF;
6960:
6961:
6962: IF l_debug_on THEN
6963: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.UPDATE_DELIVERY_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
6964: END IF;
6965: --
6966: wsh_delivery_details_pkg.Update_Delivery_Details(
6967: p_rowid => p_detail_info_tab(l_index).rowid,
6969: x_return_status => l_return_status);
6970:
6971: --
6972: IF l_debug_on THEN
6973: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6974: END IF;
6975: --
6976: wsh_util_core.api_post_call(
6977: p_return_status => l_return_status,
7019: );
7020:
7021: --
7022: IF l_debug_on THEN
7023: WSH_DEBUG_SV.pop(l_module_name);
7024: END IF;
7025: --
7026: EXCEPTION
7027: WHEN FND_API.G_EXC_ERROR THEN
7037: );
7038: --
7039:
7040: IF l_debug_on THEN
7041: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7042: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7043: END IF;
7044: --
7045: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7038: --
7039:
7040: IF l_debug_on THEN
7041: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7042: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7043: END IF;
7044: --
7045: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7046: IF lock_delivery_details%isopen THEN
7058: );
7059: --
7060: --
7061: IF l_debug_on THEN
7062: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7063: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7064: END IF;
7065: --
7066: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
7059: --
7060: --
7061: IF l_debug_on THEN
7062: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7063: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7064: END IF;
7065: --
7066: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
7067: IF lock_delivery_details%isopen THEN
7074: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
7075: THEN
7076: --{
7077: IF l_debug_on THEN
7078: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
7079: END IF;
7080:
7081: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
7082: (
7086: );
7087: --
7088: --
7089: IF l_debug_on THEN
7090: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
7091: END IF;
7092: --
7093: --
7094: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR) and x_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
7109: p_encoded => FND_API.G_FALSE
7110: );
7111: --
7112: IF l_debug_on THEN
7113: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7114: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
7115: END IF;
7116: --
7117: WHEN delivery_detail_locked THEN
7110: );
7111: --
7112: IF l_debug_on THEN
7113: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7114: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
7115: END IF;
7116: --
7117: WHEN delivery_detail_locked THEN
7118: IF lock_delivery_details%isopen THEN
7124: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
7125: THEN
7126: --{
7127: IF l_debug_on THEN
7128: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
7129: END IF;
7130:
7131: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
7132: (
7136: );
7137: --
7138: --
7139: IF l_debug_on THEN
7140: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
7141: END IF;
7142: --
7143: --
7144: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR) and x_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
7155: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7156: FND_MESSAGE.Set_Name('WSH', 'WSH_NO_LOCK');
7157: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
7158: IF l_debug_on THEN
7159: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:delivery_detail_locked');
7160: END IF;
7161:
7162: WHEN OTHERS THEN
7163: IF lock_delivery_details%isopen THEN
7178: p_encoded => FND_API.G_FALSE
7179: );
7180:
7181: IF l_debug_on THEN
7182: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7183: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7184: END IF;
7185: --
7186: END Update_Delivery_Detail;
7179: );
7180:
7181: IF l_debug_on THEN
7182: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7183: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7184: END IF;
7185: --
7186: END Update_Delivery_Detail;
7187:
7235: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7236: --
7237: IF l_debug_on IS NULL
7238: THEN
7239: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7240: END IF;
7241: --
7242: SAVEPOINT CANCEL_DEL_DETAIL_GRP;
7243: IF l_debug_on THEN
7240: END IF;
7241: --
7242: SAVEPOINT CANCEL_DEL_DETAIL_GRP;
7243: IF l_debug_on THEN
7244: WSH_DEBUG_SV.push(l_module_name);
7245: END IF;
7246: --
7247:
7248: -- Initialize API return status to success
7266:
7267:
7268: --
7269: IF l_debug_on THEN
7270: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTERFACE.Update_Shipping_Attributes',WSH_DEBUG_SV.C_PROC_LEVEL);
7271: WSH_DEBUG_SV.log(l_module_name, 'l_changed_attr_tab.count', l_changed_attr_tab.count);
7272: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', l_changed_attr_tab(1).delivery_detail_id);
7273:
7274: WSH_DEBUG_SV.log(l_module_name, 'Ordered Quantity ', l_changed_attr_tab(1).ordered_quantity);
7267:
7268: --
7269: IF l_debug_on THEN
7270: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTERFACE.Update_Shipping_Attributes',WSH_DEBUG_SV.C_PROC_LEVEL);
7271: WSH_DEBUG_SV.log(l_module_name, 'l_changed_attr_tab.count', l_changed_attr_tab.count);
7272: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', l_changed_attr_tab(1).delivery_detail_id);
7273:
7274: WSH_DEBUG_SV.log(l_module_name, 'Ordered Quantity ', l_changed_attr_tab(1).ordered_quantity);
7275: WSH_DEBUG_SV.log(l_module_name, 'Ord qty uom ', l_changed_attr_tab(1).order_quantity_uom);
7268: --
7269: IF l_debug_on THEN
7270: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTERFACE.Update_Shipping_Attributes',WSH_DEBUG_SV.C_PROC_LEVEL);
7271: WSH_DEBUG_SV.log(l_module_name, 'l_changed_attr_tab.count', l_changed_attr_tab.count);
7272: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', l_changed_attr_tab(1).delivery_detail_id);
7273:
7274: WSH_DEBUG_SV.log(l_module_name, 'Ordered Quantity ', l_changed_attr_tab(1).ordered_quantity);
7275: WSH_DEBUG_SV.log(l_module_name, 'Ord qty uom ', l_changed_attr_tab(1).order_quantity_uom);
7276: WSH_DEBUG_SV.log(l_module_name, 'Source Line Id', l_changed_attr_tab(1).Source_Line_id);
7270: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTERFACE.Update_Shipping_Attributes',WSH_DEBUG_SV.C_PROC_LEVEL);
7271: WSH_DEBUG_SV.log(l_module_name, 'l_changed_attr_tab.count', l_changed_attr_tab.count);
7272: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', l_changed_attr_tab(1).delivery_detail_id);
7273:
7274: WSH_DEBUG_SV.log(l_module_name, 'Ordered Quantity ', l_changed_attr_tab(1).ordered_quantity);
7275: WSH_DEBUG_SV.log(l_module_name, 'Ord qty uom ', l_changed_attr_tab(1).order_quantity_uom);
7276: WSH_DEBUG_SV.log(l_module_name, 'Source Line Id', l_changed_attr_tab(1).Source_Line_id);
7277: wsh_debug_sv.log(l_module_name, 'Source_Code', p_detail_info_tab(1).source_code);
7278: END IF;
7271: WSH_DEBUG_SV.log(l_module_name, 'l_changed_attr_tab.count', l_changed_attr_tab.count);
7272: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', l_changed_attr_tab(1).delivery_detail_id);
7273:
7274: WSH_DEBUG_SV.log(l_module_name, 'Ordered Quantity ', l_changed_attr_tab(1).ordered_quantity);
7275: WSH_DEBUG_SV.log(l_module_name, 'Ord qty uom ', l_changed_attr_tab(1).order_quantity_uom);
7276: WSH_DEBUG_SV.log(l_module_name, 'Source Line Id', l_changed_attr_tab(1).Source_Line_id);
7277: wsh_debug_sv.log(l_module_name, 'Source_Code', p_detail_info_tab(1).source_code);
7278: END IF;
7279: --
7272: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', l_changed_attr_tab(1).delivery_detail_id);
7273:
7274: WSH_DEBUG_SV.log(l_module_name, 'Ordered Quantity ', l_changed_attr_tab(1).ordered_quantity);
7275: WSH_DEBUG_SV.log(l_module_name, 'Ord qty uom ', l_changed_attr_tab(1).order_quantity_uom);
7276: WSH_DEBUG_SV.log(l_module_name, 'Source Line Id', l_changed_attr_tab(1).Source_Line_id);
7277: wsh_debug_sv.log(l_module_name, 'Source_Code', p_detail_info_tab(1).source_code);
7278: END IF;
7279: --
7280:
7273:
7274: WSH_DEBUG_SV.log(l_module_name, 'Ordered Quantity ', l_changed_attr_tab(1).ordered_quantity);
7275: WSH_DEBUG_SV.log(l_module_name, 'Ord qty uom ', l_changed_attr_tab(1).order_quantity_uom);
7276: WSH_DEBUG_SV.log(l_module_name, 'Source Line Id', l_changed_attr_tab(1).Source_Line_id);
7277: wsh_debug_sv.log(l_module_name, 'Source_Code', p_detail_info_tab(1).source_code);
7278: END IF;
7279: --
7280:
7281:
7287: );
7288:
7289: --
7290: IF l_debug_on THEN
7291: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7292: END IF;
7293: --
7294: --
7295: wsh_util_core.api_post_call(
7302: --
7303:
7304: IF l_number_of_warnings > 0 THEN
7305: IF l_debug_on THEN
7306: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
7307: END IF;
7308:
7309: RAISE wsh_util_core.g_exc_warning;
7310: END IF;
7319: );
7320:
7321: --
7322: IF l_debug_on THEN
7323: WSH_DEBUG_SV.pop(l_module_name);
7324: END IF;
7325: --
7326:
7327:
7338: p_encoded => FND_API.G_FALSE
7339: );
7340:
7341: IF l_debug_on THEN
7342: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7343: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7344: END IF;
7345: --
7346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7339: );
7340:
7341: IF l_debug_on THEN
7342: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7343: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7344: END IF;
7345: --
7346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7347: ROLLBACK to CANCEL_DEL_DETAIL_GRP;
7353: p_encoded => FND_API.G_FALSE
7354: );
7355:
7356: IF l_debug_on THEN
7357: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7358: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7359: END IF;
7360: --
7361: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
7354: );
7355:
7356: IF l_debug_on THEN
7357: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7358: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7359: END IF;
7360: --
7361: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
7362: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
7367: p_encoded => FND_API.G_FALSE
7368: );
7369: --
7370: IF l_debug_on THEN
7371: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7372: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
7373: END IF;
7374: --
7375: WHEN OTHERS THEN
7368: );
7369: --
7370: IF l_debug_on THEN
7371: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7372: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
7373: END IF;
7374: --
7375: WHEN OTHERS THEN
7376:
7385: p_encoded => FND_API.G_FALSE
7386: );
7387:
7388: IF l_debug_on THEN
7389: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7390: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7391: END IF;
7392: --
7393:
7386: );
7387:
7388: IF l_debug_on THEN
7389: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7390: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7391: END IF;
7392: --
7393:
7394:
7521: l_debug_on := wsh_debug_interface.g_debug;
7522:
7523: --
7524: IF l_debug_on IS NULL THEN
7525: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7526: END IF;
7527:
7528: --
7529: SAVEPOINT validate_det_line_grp;
7528: --
7529: SAVEPOINT validate_det_line_grp;
7530:
7531: IF l_debug_on THEN
7532: WSH_DEBUG_SV.push(l_module_name);
7533: WSH_DEBUG_SV.LOG(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
7534: WSH_DEBUG_SV.LOG(l_module_name, 'Serial table count', p_serial_range_tab.COUNT);
7535: WSH_DEBUG_SV.LOG(l_module_name, 'SQ', x_detail_rec.shipped_quantity);
7536: END IF;
7529: SAVEPOINT validate_det_line_grp;
7530:
7531: IF l_debug_on THEN
7532: WSH_DEBUG_SV.push(l_module_name);
7533: WSH_DEBUG_SV.LOG(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
7534: WSH_DEBUG_SV.LOG(l_module_name, 'Serial table count', p_serial_range_tab.COUNT);
7535: WSH_DEBUG_SV.LOG(l_module_name, 'SQ', x_detail_rec.shipped_quantity);
7536: END IF;
7537:
7530:
7531: IF l_debug_on THEN
7532: WSH_DEBUG_SV.push(l_module_name);
7533: WSH_DEBUG_SV.LOG(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
7534: WSH_DEBUG_SV.LOG(l_module_name, 'Serial table count', p_serial_range_tab.COUNT);
7535: WSH_DEBUG_SV.LOG(l_module_name, 'SQ', x_detail_rec.shipped_quantity);
7536: END IF;
7537:
7538: -- Initialize API return status to success --
7531: IF l_debug_on THEN
7532: WSH_DEBUG_SV.push(l_module_name);
7533: WSH_DEBUG_SV.LOG(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
7534: WSH_DEBUG_SV.LOG(l_module_name, 'Serial table count', p_serial_range_tab.COUNT);
7535: WSH_DEBUG_SV.LOG(l_module_name, 'SQ', x_detail_rec.shipped_quantity);
7536: END IF;
7537:
7538: -- Initialize API return status to success --
7539: x_return_status := wsh_util_core.g_ret_sts_success;
7549: -- None of the validations are applicable for inbound lines. So, return
7550: --
7551: IF l_debug_on
7552: THEN
7553: wsh_debug_sv.pop(l_module_name);
7554: END IF;
7555: --
7556: RETURN;
7557: --}
7563: -- HW OPMCONV - Removed checking for process org
7564:
7565: IF (p_validation_tab(wsh_actions_levels.c_tol_above_lvl) = 1) THEN
7566: IF l_debug_on THEN
7567: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_detail_rec.ship_tolerance_above);
7568: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',
7569: WSH_DEBUG_SV.c_proc_level);
7570: END IF;
7571:
7564:
7565: IF (p_validation_tab(wsh_actions_levels.c_tol_above_lvl) = 1) THEN
7566: IF l_debug_on THEN
7567: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_detail_rec.ship_tolerance_above);
7568: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',
7569: WSH_DEBUG_SV.c_proc_level);
7570: END IF;
7571:
7572: --Bug # 3266333
7565: IF (p_validation_tab(wsh_actions_levels.c_tol_above_lvl) = 1) THEN
7566: IF l_debug_on THEN
7567: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_detail_rec.ship_tolerance_above);
7568: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',
7569: WSH_DEBUG_SV.c_proc_level);
7570: END IF;
7571:
7572: --Bug # 3266333
7573: wsh_util_validate.validate_negative(
7585: END IF;
7586:
7587: IF (p_validation_tab(wsh_actions_levels.c_tol_below_lvl) = 1) THEN
7588: IF l_debug_on THEN
7589: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Below', x_detail_rec.ship_tolerance_below);
7590: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.c_proc_level);
7591: END IF;
7592:
7593: --Bug # 3266333
7586:
7587: IF (p_validation_tab(wsh_actions_levels.c_tol_below_lvl) = 1) THEN
7588: IF l_debug_on THEN
7589: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Below', x_detail_rec.ship_tolerance_below);
7590: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.c_proc_level);
7591: END IF;
7592:
7593: --Bug # 3266333
7594: wsh_util_validate.validate_negative(
7605: );
7606: END IF;
7607:
7608: IF l_debug_on THEN
7609: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.org_id', x_detail_rec.org_id);
7610: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.locator_id', x_detail_rec.locator_id);
7611: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.revision', x_detail_rec.revision);
7612: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.subinventory', x_detail_rec.subinventory);
7613: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.lot_number', x_detail_rec.lot_number);
7606: END IF;
7607:
7608: IF l_debug_on THEN
7609: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.org_id', x_detail_rec.org_id);
7610: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.locator_id', x_detail_rec.locator_id);
7611: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.revision', x_detail_rec.revision);
7612: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.subinventory', x_detail_rec.subinventory);
7613: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.lot_number', x_detail_rec.lot_number);
7614: END IF;
7607:
7608: IF l_debug_on THEN
7609: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.org_id', x_detail_rec.org_id);
7610: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.locator_id', x_detail_rec.locator_id);
7611: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.revision', x_detail_rec.revision);
7612: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.subinventory', x_detail_rec.subinventory);
7613: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.lot_number', x_detail_rec.lot_number);
7614: END IF;
7615:
7608: IF l_debug_on THEN
7609: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.org_id', x_detail_rec.org_id);
7610: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.locator_id', x_detail_rec.locator_id);
7611: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.revision', x_detail_rec.revision);
7612: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.subinventory', x_detail_rec.subinventory);
7613: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.lot_number', x_detail_rec.lot_number);
7614: END IF;
7615:
7616: l_org_id := p_original_rec.organization_id;
7609: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.org_id', x_detail_rec.org_id);
7610: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.locator_id', x_detail_rec.locator_id);
7611: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.revision', x_detail_rec.revision);
7612: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.subinventory', x_detail_rec.subinventory);
7613: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.lot_number', x_detail_rec.lot_number);
7614: END IF;
7615:
7616: l_org_id := p_original_rec.organization_id;
7617:
7654: l_lot := p_original_rec.lot_number;
7655: END IF;
7656:
7657: IF l_debug_on THEN
7658: WSH_DEBUG_SV.log(l_module_name, 'l_org_id', l_org_id);
7659: WSH_DEBUG_SV.log(l_module_name, 'l_locator', l_locator);
7660: WSH_DEBUG_SV.log(l_module_name, 'l_revision', l_revision);
7661: WSH_DEBUG_SV.log(l_module_name, 'l_subinventory', l_subinventory);
7662: WSH_DEBUG_SV.log(l_module_name, 'l_lot_number', l_lot);
7655: END IF;
7656:
7657: IF l_debug_on THEN
7658: WSH_DEBUG_SV.log(l_module_name, 'l_org_id', l_org_id);
7659: WSH_DEBUG_SV.log(l_module_name, 'l_locator', l_locator);
7660: WSH_DEBUG_SV.log(l_module_name, 'l_revision', l_revision);
7661: WSH_DEBUG_SV.log(l_module_name, 'l_subinventory', l_subinventory);
7662: WSH_DEBUG_SV.log(l_module_name, 'l_lot_number', l_lot);
7663: END IF;
7656:
7657: IF l_debug_on THEN
7658: WSH_DEBUG_SV.log(l_module_name, 'l_org_id', l_org_id);
7659: WSH_DEBUG_SV.log(l_module_name, 'l_locator', l_locator);
7660: WSH_DEBUG_SV.log(l_module_name, 'l_revision', l_revision);
7661: WSH_DEBUG_SV.log(l_module_name, 'l_subinventory', l_subinventory);
7662: WSH_DEBUG_SV.log(l_module_name, 'l_lot_number', l_lot);
7663: END IF;
7664:
7657: IF l_debug_on THEN
7658: WSH_DEBUG_SV.log(l_module_name, 'l_org_id', l_org_id);
7659: WSH_DEBUG_SV.log(l_module_name, 'l_locator', l_locator);
7660: WSH_DEBUG_SV.log(l_module_name, 'l_revision', l_revision);
7661: WSH_DEBUG_SV.log(l_module_name, 'l_subinventory', l_subinventory);
7662: WSH_DEBUG_SV.log(l_module_name, 'l_lot_number', l_lot);
7663: END IF;
7664:
7665: -- UT bug fix 2657367
7658: WSH_DEBUG_SV.log(l_module_name, 'l_org_id', l_org_id);
7659: WSH_DEBUG_SV.log(l_module_name, 'l_locator', l_locator);
7660: WSH_DEBUG_SV.log(l_module_name, 'l_revision', l_revision);
7661: WSH_DEBUG_SV.log(l_module_name, 'l_subinventory', l_subinventory);
7662: WSH_DEBUG_SV.log(l_module_name, 'l_lot_number', l_lot);
7663: END IF;
7664:
7665: -- UT bug fix 2657367
7666: IF p_validation_tab(wsh_actions_levels.c_ship_qty_lvl) = 1
7670: OR p_validation_tab(wsh_actions_levels.c_serial_num_lvl) = 1
7671: THEN
7672: --(
7673: IF l_debug_on THEN
7674: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.FETCH_INV_CONTROLS', WSH_DEBUG_SV.c_proc_level);
7675: END IF;
7676:
7677: wsh_delivery_details_inv.fetch_inv_controls(
7678: p_delivery_detail_id => x_detail_rec.delivery_detail_id,
7683: x_return_status => l_return_status
7684: );
7685:
7686: IF l_debug_on THEN
7687: WSH_DEBUG_SV.log(l_module_name, 'Return Status', l_return_status);
7688: WSH_DEBUG_SV.log(l_module_name, 'Lot Flag', l_inv_controls.lot_flag);
7689: WSH_DEBUG_SV.log(l_module_name, 'Revision Flag', l_inv_controls.rev_flag);
7690: WSH_DEBUG_SV.log(l_module_name, 'Locator Flag', l_inv_controls.loc_flag);
7691: WSH_DEBUG_SV.log(l_module_name, 'Serial Control Code', l_inv_controls.serial_code);
7684: );
7685:
7686: IF l_debug_on THEN
7687: WSH_DEBUG_SV.log(l_module_name, 'Return Status', l_return_status);
7688: WSH_DEBUG_SV.log(l_module_name, 'Lot Flag', l_inv_controls.lot_flag);
7689: WSH_DEBUG_SV.log(l_module_name, 'Revision Flag', l_inv_controls.rev_flag);
7690: WSH_DEBUG_SV.log(l_module_name, 'Locator Flag', l_inv_controls.loc_flag);
7691: WSH_DEBUG_SV.log(l_module_name, 'Serial Control Code', l_inv_controls.serial_code);
7692: END IF;
7685:
7686: IF l_debug_on THEN
7687: WSH_DEBUG_SV.log(l_module_name, 'Return Status', l_return_status);
7688: WSH_DEBUG_SV.log(l_module_name, 'Lot Flag', l_inv_controls.lot_flag);
7689: WSH_DEBUG_SV.log(l_module_name, 'Revision Flag', l_inv_controls.rev_flag);
7690: WSH_DEBUG_SV.log(l_module_name, 'Locator Flag', l_inv_controls.loc_flag);
7691: WSH_DEBUG_SV.log(l_module_name, 'Serial Control Code', l_inv_controls.serial_code);
7692: END IF;
7693:
7686: IF l_debug_on THEN
7687: WSH_DEBUG_SV.log(l_module_name, 'Return Status', l_return_status);
7688: WSH_DEBUG_SV.log(l_module_name, 'Lot Flag', l_inv_controls.lot_flag);
7689: WSH_DEBUG_SV.log(l_module_name, 'Revision Flag', l_inv_controls.rev_flag);
7690: WSH_DEBUG_SV.log(l_module_name, 'Locator Flag', l_inv_controls.loc_flag);
7691: WSH_DEBUG_SV.log(l_module_name, 'Serial Control Code', l_inv_controls.serial_code);
7692: END IF;
7693:
7694: wsh_util_core.api_post_call(
7687: WSH_DEBUG_SV.log(l_module_name, 'Return Status', l_return_status);
7688: WSH_DEBUG_SV.log(l_module_name, 'Lot Flag', l_inv_controls.lot_flag);
7689: WSH_DEBUG_SV.log(l_module_name, 'Revision Flag', l_inv_controls.rev_flag);
7690: WSH_DEBUG_SV.log(l_module_name, 'Locator Flag', l_inv_controls.loc_flag);
7691: WSH_DEBUG_SV.log(l_module_name, 'Serial Control Code', l_inv_controls.serial_code);
7692: END IF;
7693:
7694: wsh_util_core.api_post_call(
7695: p_return_status => l_return_status,
7703: -- UT bug fix 2657367
7704:
7705: IF (p_validation_tab(wsh_actions_levels.c_ship_qty_lvl) = 1) THEN
7706: IF l_debug_on THEN
7707: WSH_DEBUG_SV.log(l_module_name, 'Shipped Qty', x_detail_rec.shipped_quantity);
7708: WSH_DEBUG_SV.log(l_module_name, 'Existing Shipped Qty', p_original_rec.shipped_quantity);
7709: END IF;
7710: -- BugFix 4519867: Validate shipped qty only when it's not equal to fnd_api.g_miss_num.
7711: IF ((p_in_detail_rec.shipped_quantity IS NULL )
7704:
7705: IF (p_validation_tab(wsh_actions_levels.c_ship_qty_lvl) = 1) THEN
7706: IF l_debug_on THEN
7707: WSH_DEBUG_SV.log(l_module_name, 'Shipped Qty', x_detail_rec.shipped_quantity);
7708: WSH_DEBUG_SV.log(l_module_name, 'Existing Shipped Qty', p_original_rec.shipped_quantity);
7709: END IF;
7710: -- BugFix 4519867: Validate shipped qty only when it's not equal to fnd_api.g_miss_num.
7711: IF ((p_in_detail_rec.shipped_quantity IS NULL )
7712: OR (p_in_detail_rec.shipped_quantity <> fnd_api.g_miss_num))
7745: x_return_status => l_return_status
7746: );
7747:
7748: IF l_debug_on THEN
7749: WSH_DEBUG_SV.log(l_module_name, 'get serial qty status', l_return_status);
7750: WSH_DEBUG_SV.log(l_module_name, 'Serial qty', l_det_qty_rec.serial_quantity);
7751: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', l_det_qty_rec.serial_number);
7752: WSH_DEBUG_SV.log(l_module_name, 'Trans temp id', l_det_qty_rec.transaction_temp_id);
7753: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY', WSH_DEBUG_SV.c_proc_level);
7746: );
7747:
7748: IF l_debug_on THEN
7749: WSH_DEBUG_SV.log(l_module_name, 'get serial qty status', l_return_status);
7750: WSH_DEBUG_SV.log(l_module_name, 'Serial qty', l_det_qty_rec.serial_quantity);
7751: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', l_det_qty_rec.serial_number);
7752: WSH_DEBUG_SV.log(l_module_name, 'Trans temp id', l_det_qty_rec.transaction_temp_id);
7753: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY', WSH_DEBUG_SV.c_proc_level);
7754: END IF;
7747:
7748: IF l_debug_on THEN
7749: WSH_DEBUG_SV.log(l_module_name, 'get serial qty status', l_return_status);
7750: WSH_DEBUG_SV.log(l_module_name, 'Serial qty', l_det_qty_rec.serial_quantity);
7751: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', l_det_qty_rec.serial_number);
7752: WSH_DEBUG_SV.log(l_module_name, 'Trans temp id', l_det_qty_rec.transaction_temp_id);
7753: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY', WSH_DEBUG_SV.c_proc_level);
7754: END IF;
7755:
7748: IF l_debug_on THEN
7749: WSH_DEBUG_SV.log(l_module_name, 'get serial qty status', l_return_status);
7750: WSH_DEBUG_SV.log(l_module_name, 'Serial qty', l_det_qty_rec.serial_quantity);
7751: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', l_det_qty_rec.serial_number);
7752: WSH_DEBUG_SV.log(l_module_name, 'Trans temp id', l_det_qty_rec.transaction_temp_id);
7753: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY', WSH_DEBUG_SV.c_proc_level);
7754: END IF;
7755:
7756: --
7749: WSH_DEBUG_SV.log(l_module_name, 'get serial qty status', l_return_status);
7750: WSH_DEBUG_SV.log(l_module_name, 'Serial qty', l_det_qty_rec.serial_quantity);
7751: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', l_det_qty_rec.serial_number);
7752: WSH_DEBUG_SV.log(l_module_name, 'Trans temp id', l_det_qty_rec.transaction_temp_id);
7753: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY', WSH_DEBUG_SV.c_proc_level);
7754: END IF;
7755:
7756: --
7757: wsh_details_validations.validate_shipped_cc_quantity(
7818: -- HW use l_process_flag
7819: -- HW OPMCONV - Removed population of process_flag
7820:
7821: IF l_debug_on THEN
7822: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY2', WSH_DEBUG_SV.c_proc_level);
7823: END IF;
7824:
7825: --
7826:
7847: -- HW OPM end of changes
7848:
7849: IF (p_validation_tab(wsh_actions_levels.c_cc_qty_lvl) = 1) THEN
7850: IF l_debug_on THEN
7851: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count Qty', x_detail_rec.cycle_count_quantity);
7852: WSH_DEBUG_SV.log(l_module_name, 'Existing Cycle_Count Qty', p_original_rec.cycle_count_quantity);
7853: END IF;
7854: -- BugFix 4519867: Validate cycle count qty only when it's not equal to fnd_api.g_miss_num.
7855: IF ( (p_in_detail_rec.cycle_count_quantity IS NULL)
7848:
7849: IF (p_validation_tab(wsh_actions_levels.c_cc_qty_lvl) = 1) THEN
7850: IF l_debug_on THEN
7851: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count Qty', x_detail_rec.cycle_count_quantity);
7852: WSH_DEBUG_SV.log(l_module_name, 'Existing Cycle_Count Qty', p_original_rec.cycle_count_quantity);
7853: END IF;
7854: -- BugFix 4519867: Validate cycle count qty only when it's not equal to fnd_api.g_miss_num.
7855: IF ( (p_in_detail_rec.cycle_count_quantity IS NULL)
7856: OR (p_in_detail_rec.cycle_count_quantity <> fnd_api.g_miss_num))
7879: -- HW OPMCONV - Removed populatation of process_flag
7880:
7881: --
7882: IF l_debug_on THEN
7883: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY', WSH_DEBUG_SV.c_proc_level);
7884: END IF;
7885:
7886: --
7887: wsh_details_validations.validate_shipped_cc_quantity(
7937: -- HW Harmonization project for OPM. Use l_process_flag
7938: -- HW OPMCONV - Removed population of process_flag
7939:
7940: IF l_debug_on THEN
7941: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY2', WSH_DEBUG_SV.c_proc_level);
7942: END IF;
7943:
7944: --
7945: wsh_details_validations.validate_shipped_cc_quantity2(
7965:
7966: IF (p_validation_tab(wsh_actions_levels.c_smc_lvl) = 1) THEN
7967: IF (x_detail_rec.ship_method_code <> fnd_api.g_miss_char) THEN
7968: IF l_debug_on THEN
7969: WSH_DEBUG_SV.log(l_module_name, 'Ship Method', x_detail_rec.ship_method_code);
7970: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_SHIP_METHOD', WSH_DEBUG_SV.c_proc_level);
7971: END IF;
7972:
7973: --
7966: IF (p_validation_tab(wsh_actions_levels.c_smc_lvl) = 1) THEN
7967: IF (x_detail_rec.ship_method_code <> fnd_api.g_miss_char) THEN
7968: IF l_debug_on THEN
7969: WSH_DEBUG_SV.log(l_module_name, 'Ship Method', x_detail_rec.ship_method_code);
7970: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_SHIP_METHOD', WSH_DEBUG_SV.c_proc_level);
7971: END IF;
7972:
7973: --
7974: wsh_util_validate.validate_ship_method(
7987:
7988: IF (p_validation_tab(wsh_actions_levels.c_dep_plan_lvl) = 1) THEN
7989: IF (x_detail_rec.dep_plan_required_flag <> fnd_api.g_miss_char) THEN
7990: IF l_debug_on THEN
7991: WSH_DEBUG_SV.log(l_module_name, 'Departure Plan Flag', x_detail_rec.dep_plan_required_flag);
7992: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_BOOLEAN', WSH_DEBUG_SV.c_proc_level);
7993: END IF;
7994:
7995: --
7988: IF (p_validation_tab(wsh_actions_levels.c_dep_plan_lvl) = 1) THEN
7989: IF (x_detail_rec.dep_plan_required_flag <> fnd_api.g_miss_char) THEN
7990: IF l_debug_on THEN
7991: WSH_DEBUG_SV.log(l_module_name, 'Departure Plan Flag', x_detail_rec.dep_plan_required_flag);
7992: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_BOOLEAN', WSH_DEBUG_SV.c_proc_level);
7993: END IF;
7994:
7995: --
7996: wsh_util_validate.validate_boolean(
8008:
8009: IF (p_validation_tab(wsh_actions_levels.c_ship_mod_comp_lvl) = 1) THEN
8010: IF (x_detail_rec.ship_model_complete_flag <> fnd_api.g_miss_char) THEN
8011: IF l_debug_on THEN
8012: WSH_DEBUG_SV.log(l_module_name, 'Ship Model Complete Flag', x_detail_rec.ship_model_complete_flag);
8013: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_BOOLEAN', WSH_DEBUG_SV.c_proc_level);
8014: END IF;
8015:
8016: --
8009: IF (p_validation_tab(wsh_actions_levels.c_ship_mod_comp_lvl) = 1) THEN
8010: IF (x_detail_rec.ship_model_complete_flag <> fnd_api.g_miss_char) THEN
8011: IF l_debug_on THEN
8012: WSH_DEBUG_SV.log(l_module_name, 'Ship Model Complete Flag', x_detail_rec.ship_model_complete_flag);
8013: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_BOOLEAN', WSH_DEBUG_SV.c_proc_level);
8014: END IF;
8015:
8016: --
8017: wsh_util_validate.validate_boolean(
8029:
8030: IF (p_validation_tab(wsh_actions_levels.c_sub_inv_lvl) = 1) THEN
8031: IF (x_detail_rec.subinventory <> fnd_api.g_miss_char) THEN
8032: IF l_debug_on THEN
8033: WSH_DEBUG_SV.log(l_module_name, 'Subinventory', x_detail_rec.subinventory);
8034: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_SUBINVENTORY', WSH_DEBUG_SV.c_proc_level);
8035: END IF;
8036:
8037: --
8030: IF (p_validation_tab(wsh_actions_levels.c_sub_inv_lvl) = 1) THEN
8031: IF (x_detail_rec.subinventory <> fnd_api.g_miss_char) THEN
8032: IF l_debug_on THEN
8033: WSH_DEBUG_SV.log(l_module_name, 'Subinventory', x_detail_rec.subinventory);
8034: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_SUBINVENTORY', WSH_DEBUG_SV.c_proc_level);
8035: END IF;
8036:
8037: --
8038: wsh_delivery_details_inv.validate_subinventory(
8045: x_result => l_result
8046: );
8047: --
8048: IF l_debug_on THEN
8049: WSH_DEBUG_SV.log(l_module_name, 'Result after validate subinventory', l_result);
8050: WSH_DEBUG_SV.log(l_module_name, 'Return status after validate subinventory', l_return_status);
8051: END IF;
8052:
8053: IF NOT l_result THEN
8046: );
8047: --
8048: IF l_debug_on THEN
8049: WSH_DEBUG_SV.log(l_module_name, 'Result after validate subinventory', l_result);
8050: WSH_DEBUG_SV.log(l_module_name, 'Return status after validate subinventory', l_return_status);
8051: END IF;
8052:
8053: IF NOT l_result THEN
8054: IF l_debug_on THEN
8051: END IF;
8052:
8053: IF NOT l_result THEN
8054: IF l_debug_on THEN
8055: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid subinventory');
8056: END IF;
8057:
8058: l_return_status := wsh_util_core.g_ret_sts_error;
8059: END IF;
8075: THEN
8076: -- {
8077: -- UT bug fix 2657367
8078: IF l_debug_on THEN
8079: wsh_debug_sv.log(l_module_name, 'Pickable Flag', p_original_rec.pickable_flag);
8080: wsh_debug_sv.log(l_module_name, 'Rev Flag', l_inv_controls.rev_flag);
8081: END IF;
8082: --
8083: IF p_original_rec.pickable_flag = 'N'
8076: -- {
8077: -- UT bug fix 2657367
8078: IF l_debug_on THEN
8079: wsh_debug_sv.log(l_module_name, 'Pickable Flag', p_original_rec.pickable_flag);
8080: wsh_debug_sv.log(l_module_name, 'Rev Flag', l_inv_controls.rev_flag);
8081: END IF;
8082: --
8083: IF p_original_rec.pickable_flag = 'N'
8084: THEN
8090: RAISE FND_API.G_EXC_ERROR;
8091: END IF;
8092: ELSE
8093: IF l_debug_on THEN
8094: WSH_DEBUG_SV.log(l_module_name, 'Revision', x_detail_rec.revision);
8095: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_REVISION', WSH_DEBUG_SV.c_proc_level);
8096: END IF;
8097:
8098: wsh_delivery_details_inv.validate_revision(
8091: END IF;
8092: ELSE
8093: IF l_debug_on THEN
8094: WSH_DEBUG_SV.log(l_module_name, 'Revision', x_detail_rec.revision);
8095: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_REVISION', WSH_DEBUG_SV.c_proc_level);
8096: END IF;
8097:
8098: wsh_delivery_details_inv.validate_revision(
8099: p_revision => x_detail_rec.revision,
8104: );
8105:
8106: -- Bug fix 2657367. Need to check l_result
8107: IF l_debug_on THEN
8108: WSH_DEBUG_SV.log(l_module_name, 'Result after validate revision', l_result);
8109: WSH_DEBUG_SV.log(l_module_name, 'Return status after validate revision', l_return_status);
8110: END IF;
8111:
8112: IF NOT l_result THEN
8105:
8106: -- Bug fix 2657367. Need to check l_result
8107: IF l_debug_on THEN
8108: WSH_DEBUG_SV.log(l_module_name, 'Result after validate revision', l_result);
8109: WSH_DEBUG_SV.log(l_module_name, 'Return status after validate revision', l_return_status);
8110: END IF;
8111:
8112: IF NOT l_result THEN
8113: IF l_debug_on THEN
8110: END IF;
8111:
8112: IF NOT l_result THEN
8113: IF l_debug_on THEN
8114: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid Revision');
8115: END IF;
8116:
8117: RAISE fnd_api.g_exc_error;
8118: END IF;
8135: THEN
8136: -- {
8137: -- UT bug fix 2657367
8138: IF l_debug_on THEN
8139: wsh_debug_sv.log(l_module_name, 'Pickable Flag', p_original_rec.pickable_flag);
8140: wsh_debug_sv.log(l_module_name, 'Locator Flag', l_inv_controls.loc_flag);
8141: END IF;
8142: --
8143: IF p_original_rec.pickable_flag = 'N'
8136: -- {
8137: -- UT bug fix 2657367
8138: IF l_debug_on THEN
8139: wsh_debug_sv.log(l_module_name, 'Pickable Flag', p_original_rec.pickable_flag);
8140: wsh_debug_sv.log(l_module_name, 'Locator Flag', l_inv_controls.loc_flag);
8141: END IF;
8142: --
8143: IF p_original_rec.pickable_flag = 'N'
8144: THEN
8151: END IF;
8152: ELSE
8153:
8154: IF l_debug_on THEN
8155: WSH_DEBUG_SV.log(l_module_name, 'Locator Id', x_detail_rec.locator_id);
8156: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_LOCATOR', WSH_DEBUG_SV.c_proc_level);
8157: END IF;
8158: wsh_delivery_details_inv.validate_locator(
8159: p_locator_id => x_detail_rec.locator_id,
8152: ELSE
8153:
8154: IF l_debug_on THEN
8155: WSH_DEBUG_SV.log(l_module_name, 'Locator Id', x_detail_rec.locator_id);
8156: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_LOCATOR', WSH_DEBUG_SV.c_proc_level);
8157: END IF;
8158: wsh_delivery_details_inv.validate_locator(
8159: p_locator_id => x_detail_rec.locator_id,
8160: p_organization_id => l_org_id,
8167: );
8168:
8169: -- Bug fix 2657367. Need to check l_result
8170: IF l_debug_on THEN
8171: WSH_DEBUG_SV.log(l_module_name, 'Result after validate locator', l_result);
8172: WSH_DEBUG_SV.log(l_module_name, 'Return status after validate locator', l_return_status);
8173: END IF;
8174:
8175: IF NOT l_result THEN
8168:
8169: -- Bug fix 2657367. Need to check l_result
8170: IF l_debug_on THEN
8171: WSH_DEBUG_SV.log(l_module_name, 'Result after validate locator', l_result);
8172: WSH_DEBUG_SV.log(l_module_name, 'Return status after validate locator', l_return_status);
8173: END IF;
8174:
8175: IF NOT l_result THEN
8176: IF l_debug_on THEN
8173: END IF;
8174:
8175: IF NOT l_result THEN
8176: IF l_debug_on THEN
8177: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid Locator');
8178: END IF;
8179:
8180: RAISE fnd_api.g_exc_error;
8181: END IF;
8199: -- HW OPMCONV - Removed branching
8200:
8201: -- UT bug fix 2657367
8202: IF l_debug_on THEN
8203: WSH_DEBUG_SV.log(l_module_name, 'Lot Number', x_detail_rec.lot_number);
8204: wsh_debug_sv.log(l_module_name, 'Pickable Flag', p_original_rec.pickable_flag);
8205: wsh_debug_sv.log(l_module_name, 'Lot Flag', l_inv_controls.lot_flag);
8206: END IF;
8207: --
8200:
8201: -- UT bug fix 2657367
8202: IF l_debug_on THEN
8203: WSH_DEBUG_SV.log(l_module_name, 'Lot Number', x_detail_rec.lot_number);
8204: wsh_debug_sv.log(l_module_name, 'Pickable Flag', p_original_rec.pickable_flag);
8205: wsh_debug_sv.log(l_module_name, 'Lot Flag', l_inv_controls.lot_flag);
8206: END IF;
8207: --
8208: IF nvl(p_original_rec.pickable_flag, 'N') = 'N'
8201: -- UT bug fix 2657367
8202: IF l_debug_on THEN
8203: WSH_DEBUG_SV.log(l_module_name, 'Lot Number', x_detail_rec.lot_number);
8204: wsh_debug_sv.log(l_module_name, 'Pickable Flag', p_original_rec.pickable_flag);
8205: wsh_debug_sv.log(l_module_name, 'Lot Flag', l_inv_controls.lot_flag);
8206: END IF;
8207: --
8208: IF nvl(p_original_rec.pickable_flag, 'N') = 'N'
8209: THEN
8224: x_pickable_flag => p_original_rec.pickable_flag);
8225: END IF;
8226: IF (nvl(l_reservable_flag, 'Y') = 'Y') THEN
8227: IF l_debug_on THEN
8228: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_LOT_NUMBER', WSH_DEBUG_SV.c_proc_level);
8229: END IF;
8230:
8231: wsh_delivery_details_inv.validate_lot_number(
8232: p_lot_number => x_detail_rec.lot_number,
8242: );
8243:
8244: -- Bug fix 2657367. Need to check l_result
8245: IF l_debug_on THEN
8246: WSH_DEBUG_SV.log(l_module_name, 'Result after validate lot', l_result);
8247: WSH_DEBUG_SV.log(l_module_name, 'Return status after validate lot', l_return_status);
8248: END IF;
8249:
8250: IF NOT l_result THEN
8243:
8244: -- Bug fix 2657367. Need to check l_result
8245: IF l_debug_on THEN
8246: WSH_DEBUG_SV.log(l_module_name, 'Result after validate lot', l_result);
8247: WSH_DEBUG_SV.log(l_module_name, 'Return status after validate lot', l_return_status);
8248: END IF;
8249:
8250: IF NOT l_result THEN
8251: IF l_debug_on THEN
8248: END IF;
8249:
8250: IF NOT l_result THEN
8251: IF l_debug_on THEN
8252: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid Lot Number');
8253: END IF;
8254:
8255: RAISE fnd_api.g_exc_error;
8256: END IF;
8276:
8277: IF (p_validation_tab(wsh_actions_levels.c_sold_contact_lvl) = 1) THEN
8278: IF (x_detail_rec.sold_to_contact_id <> fnd_api.g_miss_num) THEN
8279: IF l_debug_on THEN
8280: WSH_DEBUG_SV.log(l_module_name, 'Sold to Contact', x_detail_rec.sold_to_contact_id);
8281: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8282: END IF;
8283:
8284: --
8277: IF (p_validation_tab(wsh_actions_levels.c_sold_contact_lvl) = 1) THEN
8278: IF (x_detail_rec.sold_to_contact_id <> fnd_api.g_miss_num) THEN
8279: IF l_debug_on THEN
8280: WSH_DEBUG_SV.log(l_module_name, 'Sold to Contact', x_detail_rec.sold_to_contact_id);
8281: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8282: END IF;
8283:
8284: --
8285: wsh_util_validate.validate_contact(
8296:
8297: IF (p_validation_tab(wsh_actions_levels.c_ship_contact_lvl) = 1) THEN
8298: IF (x_detail_rec.ship_to_contact_id <> fnd_api.g_miss_num) THEN
8299: IF l_debug_on THEN
8300: WSH_DEBUG_SV.log(l_module_name, 'Ship to Contact Id', x_detail_rec.ship_to_contact_id);
8301: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8302: END IF;
8303:
8304: --
8297: IF (p_validation_tab(wsh_actions_levels.c_ship_contact_lvl) = 1) THEN
8298: IF (x_detail_rec.ship_to_contact_id <> fnd_api.g_miss_num) THEN
8299: IF l_debug_on THEN
8300: WSH_DEBUG_SV.log(l_module_name, 'Ship to Contact Id', x_detail_rec.ship_to_contact_id);
8301: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8302: END IF;
8303:
8304: --
8305: wsh_util_validate.validate_contact(
8317:
8318: IF (p_validation_tab(wsh_actions_levels.c_deliver_contact_lvl) = 1) THEN
8319: IF (x_detail_rec.deliver_to_contact_id <> fnd_api.g_miss_num) THEN
8320: IF l_debug_on THEN
8321: WSH_DEBUG_SV.log(l_module_name, 'Deliver To Contact', x_detail_rec.deliver_to_contact_id);
8322: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8323: END IF;
8324:
8325: --
8318: IF (p_validation_tab(wsh_actions_levels.c_deliver_contact_lvl) = 1) THEN
8319: IF (x_detail_rec.deliver_to_contact_id <> fnd_api.g_miss_num) THEN
8320: IF l_debug_on THEN
8321: WSH_DEBUG_SV.log(l_module_name, 'Deliver To Contact', x_detail_rec.deliver_to_contact_id);
8322: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8323: END IF;
8324:
8325: --
8326: wsh_util_validate.validate_contact(
8338:
8339: IF (p_validation_tab(wsh_actions_levels.c_intmed_ship_contact_lvl) = 1) THEN
8340: IF (x_detail_rec.intmed_ship_to_contact_id <> fnd_api.g_miss_num) THEN
8341: IF l_debug_on THEN
8342: WSH_DEBUG_SV.log(l_module_name, 'Intmed Ship To Contact', x_detail_rec.intmed_ship_to_contact_id);
8343: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8344: END IF;
8345:
8346: --
8339: IF (p_validation_tab(wsh_actions_levels.c_intmed_ship_contact_lvl) = 1) THEN
8340: IF (x_detail_rec.intmed_ship_to_contact_id <> fnd_api.g_miss_num) THEN
8341: IF l_debug_on THEN
8342: WSH_DEBUG_SV.log(l_module_name, 'Intmed Ship To Contact', x_detail_rec.intmed_ship_to_contact_id);
8343: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8344: END IF;
8345:
8346: --
8347: wsh_util_validate.validate_contact(
8419:
8420: l_detail_ser_count := l_det_ser_range_tab.count;
8421:
8422: IF l_debug_on THEN
8423: WSH_DEBUG_SV.log(l_module_name, 'Current detail count', l_detail_ser_count);
8424: WSH_DEBUG_SV.log(l_module_name, 'Total serial qty in table', l_detail_ser_qty);
8425: END IF;
8426:
8427: IF l_detail_ser_count >= 1
8420: l_detail_ser_count := l_det_ser_range_tab.count;
8421:
8422: IF l_debug_on THEN
8423: WSH_DEBUG_SV.log(l_module_name, 'Current detail count', l_detail_ser_count);
8424: WSH_DEBUG_SV.log(l_module_name, 'Total serial qty in table', l_detail_ser_qty);
8425: END IF;
8426:
8427: IF l_detail_ser_count >= 1
8428: THEN
8427: IF l_detail_ser_count >= 1
8428: THEN
8429: -- (
8430: IF l_debug_on THEN
8431: WSH_DEBUG_SV.log(l_module_name, 'input from serial number', p_in_detail_rec.serial_number);
8432: WSH_DEBUG_SV.log(l_module_name, 'input to_serial_number', p_in_detail_rec.to_serial_number);
8433: END IF;
8434:
8435: IF (
8428: THEN
8429: -- (
8430: IF l_debug_on THEN
8431: WSH_DEBUG_SV.log(l_module_name, 'input from serial number', p_in_detail_rec.serial_number);
8432: WSH_DEBUG_SV.log(l_module_name, 'input to_serial_number', p_in_detail_rec.to_serial_number);
8433: END IF;
8434:
8435: IF (
8436: p_in_detail_rec.serial_number IS NOT NULL
8443: THEN
8444: -- (
8445: -- Error case. Inputs should be mutually exclusive
8446: IF l_debug_on THEN
8447: WSH_DEBUG_SV.logmsg(l_module_name, 'Serial number input not mutually exclusive');
8448: END IF;
8449:
8450: RAISE fnd_api.g_exc_error;
8451: -- )
8476: IF l_det_ser_range_tab(1).from_serial_number
8477: = NVL(l_det_ser_range_tab(1).to_serial_number,
8478: l_det_ser_range_tab(1).from_serial_number) THEN
8479: IF l_debug_on THEN
8480: WSH_DEBUG_SV.logmsg(l_module_name, 'Stamp serial number on wdd');
8481: END IF;
8482: l_stamp_ser_wdd := TRUE;
8483: END IF;
8484:
8488: THEN
8489: -- (
8490: -- To serial number cannot exist with a from serial number
8491: IF l_debug_on THEN
8492: WSH_DEBUG_SV.logmsg(l_module_name, 'From serial number is null');
8493: END IF;
8494:
8495: RAISE fnd_api.g_exc_error;
8496: -- )
8509: AND l_inv_controls.serial_code IN (2,5)
8510: THEN --{
8511: IF (wsh_util_validate.Check_Wms_Org(l_org_id)='Y') THEN --{
8512: IF l_debug_on THEN
8513: WSH_DEBUG_SV.logmsg(l_module_name, 'Cannot modify the serial numbers for WMS organizationx ');
8514: END IF;
8515:
8516: RAISE fnd_api.g_exc_error;
8517: END IF; --}
8521: IF p_original_rec.released_status NOT IN('Y', 'X')
8522: THEN
8523: -- (
8524: IF l_debug_on THEN
8525: WSH_DEBUG_SV.logmsg(l_module_name, 'Released Status Not in X,Y');
8526: END IF;
8527:
8528: RAISE fnd_api.g_exc_error;
8529: -- )
8534: THEN
8535: -- (
8536: -- Bug 2652300. Cannot update serial number if shipped qty is null or zero
8537: IF l_debug_on THEN
8538: WSH_DEBUG_SV.logmsg(l_module_name, 'Shipped qty zero or null. Not null serial number');
8539: END IF;
8540: raise FND_API.G_EXC_ERROR;
8541: ELSIF nvl(x_detail_rec.shipped_quantity, nvl(p_original_rec.shipped_quantity,0)) > 1
8542: THEN
8546: AND l_det_ser_range_tab(l_det_ser_range_tab.first).to_serial_number IS NULL
8547: THEN
8548: -- (
8549: IF l_debug_on THEN
8550: WSH_DEBUG_SV.logmsg(l_module_name, 'Shipped qty greater than one. No to_serial_number');
8551: END IF;
8552: raise FND_API.G_EXC_ERROR;
8553: -- )
8554: END IF;
8561: -- (
8562: -- Total quantity in serial table should not be greater than shipped qty
8563: -- Error case.
8564: IF l_debug_on THEN
8565: WSH_DEBUG_SV.logmsg(l_module_name, 'Serial table qty greater than shipped qty');
8566: END IF;
8567: RAISE fnd_api.g_exc_error;
8568: ELSIF l_detail_ser_qty = 1
8569: THEN
8567: RAISE fnd_api.g_exc_error;
8568: ELSIF l_detail_ser_qty = 1
8569: THEN
8570: IF l_debug_on THEN
8571: WSH_DEBUG_SV.log(l_module_name, 'table from serial num', l_det_ser_range_tab(1).from_serial_number);
8572: WSH_DEBUG_SV.log(l_module_name, 'table to seral num', l_det_ser_range_tab(1).to_serial_number);
8573: END IF;
8574:
8575: IF l_det_ser_range_tab(1).from_serial_number IS NOT NULL
8568: ELSIF l_detail_ser_qty = 1
8569: THEN
8570: IF l_debug_on THEN
8571: WSH_DEBUG_SV.log(l_module_name, 'table from serial num', l_det_ser_range_tab(1).from_serial_number);
8572: WSH_DEBUG_SV.log(l_module_name, 'table to seral num', l_det_ser_range_tab(1).to_serial_number);
8573: END IF;
8574:
8575: IF l_det_ser_range_tab(1).from_serial_number IS NOT NULL
8576: THEN
8578: x_detail_rec.serial_number := l_det_ser_range_tab(1).from_serial_number;
8579: ELSE
8580: -- Record cannot exist without a from serial number
8581: IF l_debug_on THEN
8582: WSH_DEBUG_SV.logmsg(l_module_name, 'From serial number is null');
8583: END IF;
8584:
8585: RAISE fnd_api.g_exc_error;
8586: -- )
8614: -- Bug 4016863 : We generate a new transaction_temp_id and call
8615: -- Update_Marked_serial API later
8616: --
8617: IF l_debug_on THEN
8618: WSH_DEBUG_SV.logmsg(l_module_name,
8619: 'Generating txn temp ID for existing serial number');
8620: END IF;
8621: --
8622: SELECT mtl_material_transactions_s.NEXTVAL
8628: ELSE
8629: --{
8630: IF NOT l_stamp_ser_wdd THEN
8631: IF l_debug_on THEN
8632: WSH_DEBUG_SV.logmsg(l_module_name,
8633: 'generate transaction temp id');
8634: END IF;
8635: SELECT mtl_material_transactions_s.NEXTVAL
8636: INTO l_transaction_id
8644: -- )
8645: END IF; -- if l_detail_ser_count >=1
8646:
8647: IF l_debug_on THEN
8648: WSH_DEBUG_SV.log(l_module_name, 'Transaction id created', l_transaction_id);
8649: END IF;
8650:
8651: -- HW OPMCONV - Removed checking for l_process_flag
8652: IF (
8660: THEN
8661: -- (
8662:
8663: IF l_debug_on THEN
8664: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', x_detail_rec.serial_number);
8665: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', x_detail_rec.to_serial_number);
8666: END IF;
8667:
8668: --
8661: -- (
8662:
8663: IF l_debug_on THEN
8664: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', x_detail_rec.serial_number);
8665: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', x_detail_rec.to_serial_number);
8666: END IF;
8667:
8668: --
8669: IF l_debug_on THEN
8666: END IF;
8667:
8668: --
8669: IF l_debug_on THEN
8670: WSH_DEBUG_SV.log(l_module_name, 'inv control ser flag', l_inv_controls.ser_flag);
8671: END IF;
8672:
8673: -- Fix added to check the serial number before setting the message.
8674: -- If Serial Flag is N, need to set the message only if serial numbers are populated
8708: -- x_detail_rec.serial_number <> p_original_rec.serial_number)
8709: THEN
8710:
8711: IF l_debug_on THEN
8712: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UNMARK_SERIAL_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
8713: WSH_DEBUG_SV.log(l_module_name,'Case1',p_original_rec.serial_number);
8714: END IF;
8715: wsh_delivery_details_inv.unmark_serial_number(
8716: p_delivery_detail_id => p_in_detail_rec.delivery_detail_id,
8709: THEN
8710:
8711: IF l_debug_on THEN
8712: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UNMARK_SERIAL_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
8713: WSH_DEBUG_SV.log(l_module_name,'Case1',p_original_rec.serial_number);
8714: END IF;
8715: wsh_delivery_details_inv.unmark_serial_number(
8716: p_delivery_detail_id => p_in_detail_rec.delivery_detail_id,
8717: p_serial_number_code => l_inv_controls.serial_code,
8720: x_return_status => l_return_status,
8721: p_inventory_item_id => p_original_rec.inventory_item_id);
8722:
8723: IF l_debug_on THEN
8724: wsh_debug_sv.log(l_module_name, 'Return status after Unmark ', l_return_status);
8725: END IF;
8726:
8727: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
8728: RAISE fnd_api.g_exc_error;
8741: -- derive serial number from MSNT for this transaction temp id
8742: -- compare with x_detail_rec.serial_number
8743:
8744: IF l_debug_on THEN
8745: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UNMARK_SERIAL_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
8746: WSH_DEBUG_SV.log(l_module_name,'Case2',p_original_rec.transaction_temp_id);
8747: END IF;
8748: wsh_delivery_details_inv.unmark_serial_number(
8749: p_delivery_detail_id => p_in_detail_rec.delivery_detail_id,
8742: -- compare with x_detail_rec.serial_number
8743:
8744: IF l_debug_on THEN
8745: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UNMARK_SERIAL_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
8746: WSH_DEBUG_SV.log(l_module_name,'Case2',p_original_rec.transaction_temp_id);
8747: END IF;
8748: wsh_delivery_details_inv.unmark_serial_number(
8749: p_delivery_detail_id => p_in_detail_rec.delivery_detail_id,
8750: p_serial_number_code => l_inv_controls.serial_code,
8753: x_return_status => l_return_status,
8754: p_inventory_item_id => p_original_rec.inventory_item_id);
8755:
8756: IF l_debug_on THEN
8757: wsh_debug_sv.log(l_module_name, 'Return status after Unmark ', l_return_status);
8758: END IF;
8759:
8760: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
8761: RAISE fnd_api.g_exc_error;
8776: IF NOT l_update_attributes THEN
8777: IF l_inv_controls.ser_flag = 'Y' THEN
8778: IF l_det_ser_range_tab(l_det_index).to_serial_number IS NOT NULL THEN -- bug 1578114 condition added
8779: IF l_debug_on THEN
8780: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', l_det_ser_range_tab(l_det_index).to_serial_number);
8781: WSH_DEBUG_SV.log(l_module_name, 'Transaction Id', l_transaction_id);
8782: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_SERIAL_RANGE', WSH_DEBUG_SV.c_proc_level);
8783: END IF;
8784:
8777: IF l_inv_controls.ser_flag = 'Y' THEN
8778: IF l_det_ser_range_tab(l_det_index).to_serial_number IS NOT NULL THEN -- bug 1578114 condition added
8779: IF l_debug_on THEN
8780: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', l_det_ser_range_tab(l_det_index).to_serial_number);
8781: WSH_DEBUG_SV.log(l_module_name, 'Transaction Id', l_transaction_id);
8782: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_SERIAL_RANGE', WSH_DEBUG_SV.c_proc_level);
8783: END IF;
8784:
8785: --
8778: IF l_det_ser_range_tab(l_det_index).to_serial_number IS NOT NULL THEN -- bug 1578114 condition added
8779: IF l_debug_on THEN
8780: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', l_det_ser_range_tab(l_det_index).to_serial_number);
8781: WSH_DEBUG_SV.log(l_module_name, 'Transaction Id', l_transaction_id);
8782: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_SERIAL_RANGE', WSH_DEBUG_SV.c_proc_level);
8783: END IF;
8784:
8785: --
8786: -- Validates the Range of Serial Number
8802: );
8803:
8804: --
8805: IF l_debug_on THEN
8806: WSH_DEBUG_SV.log(l_module_name, 'Prefix',l_prefix);
8807: WSH_DEBUG_SV.log(l_module_name, 'Result',l_result);
8808: WSH_DEBUG_SV.log(l_module_name, 'Return Status',l_return_status);
8809: END IF;
8810:
8803:
8804: --
8805: IF l_debug_on THEN
8806: WSH_DEBUG_SV.log(l_module_name, 'Prefix',l_prefix);
8807: WSH_DEBUG_SV.log(l_module_name, 'Result',l_result);
8808: WSH_DEBUG_SV.log(l_module_name, 'Return Status',l_return_status);
8809: END IF;
8810:
8811: IF NOT l_result THEN
8804: --
8805: IF l_debug_on THEN
8806: WSH_DEBUG_SV.log(l_module_name, 'Prefix',l_prefix);
8807: WSH_DEBUG_SV.log(l_module_name, 'Result',l_result);
8808: WSH_DEBUG_SV.log(l_module_name, 'Return Status',l_return_status);
8809: END IF;
8810:
8811: IF NOT l_result THEN
8812: l_return_status := wsh_util_core.g_ret_sts_error;
8819: p_msg_data => l_msg_data
8820: );
8821: ELSE
8822: IF l_debug_on THEN
8823: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_SERIAL', WSH_DEBUG_SV.c_proc_level);
8824: END IF;
8825:
8826: --
8827: wsh_delivery_details_inv.validate_serial(
8838: x_result => l_result
8839: );
8840: --
8841: IF l_debug_on THEN
8842: WSH_DEBUG_SV.log(l_module_name, 'Result',l_result);
8843: WSH_DEBUG_SV.log(l_module_name, 'Return Status',l_return_status);
8844: END IF;
8845: --
8846: IF NOT l_result THEN
8839: );
8840: --
8841: IF l_debug_on THEN
8842: WSH_DEBUG_SV.log(l_module_name, 'Result',l_result);
8843: WSH_DEBUG_SV.log(l_module_name, 'Return Status',l_return_status);
8844: END IF;
8845: --
8846: IF NOT l_result THEN
8847: l_return_status := wsh_util_core.g_ret_sts_error;
8857:
8858:
8859: ELSIF l_inv_controls.ser_flag = 'D' THEN
8860: IF l_debug_on THEN
8861: WSH_DEBUG_SV.log(l_module_name, 'to serial number', l_det_ser_range_tab(l_det_index).to_serial_number);
8862: END IF;
8863:
8864: IF (
8865: l_det_ser_range_tab(l_det_index).to_serial_number <>
8866: fnd_api.g_miss_char
8867: )
8868: AND l_det_ser_range_tab(l_det_index).to_serial_number IS NOT NULL THEN -- bug 1578114 condition added
8869: IF l_debug_on THEN
8870: WSH_DEBUG_SV.log(l_module_name, 'Transaction id created', l_transaction_id);
8871: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.CREATE_DYNAMIC_SERIAL_RANGE', WSH_DEBUG_SV.c_proc_level);
8872: END IF;
8873:
8874: --
8867: )
8868: AND l_det_ser_range_tab(l_det_index).to_serial_number IS NOT NULL THEN -- bug 1578114 condition added
8869: IF l_debug_on THEN
8870: WSH_DEBUG_SV.log(l_module_name, 'Transaction id created', l_transaction_id);
8871: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.CREATE_DYNAMIC_SERIAL_RANGE', WSH_DEBUG_SV.c_proc_level);
8872: END IF;
8873:
8874: --
8875: -- Creates/Validates the Range of Serial Number
8897: p_msg_data => l_msg_data
8898: );
8899: ELSE
8900: IF l_debug_on THEN
8901: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.CREATE_DYNAMIC_SERIAL', WSH_DEBUG_SV.c_proc_level);
8902: END IF;
8903:
8904: --
8905: wsh_delivery_details_inv.create_dynamic_serial(
8988: v35 := 'N';
8989: END IF;
8990:
8991: IF l_debug_on THEN
8992: WSH_DEBUG_SV.logmsg(l_module_name, 'Inserting record into msnt');
8993: END IF;
8994:
8995: INSERT INTO mtl_serial_numbers_temp
8996: (
9056: -- )
9057: END LOOP; -- while l_det_index of serial_range_tab is not null
9058:
9059: IF l_debug_on THEN
9060: WSH_DEBUG_SV.log(l_module_name, 'Transaction Id', l_transaction_id);
9061: END IF;
9062:
9063: IF NOT l_update_attributes THEN
9064: --{
9081: AND p_in_detail_rec.serial_number <> FND_API.G_MISS_CHAR
9082: THEN
9083: --
9084: IF l_debug_on THEN
9085: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.MARK_SERIAL_NUMBER', WSH_DEBUG_SV.c_proc_level);
9086: END IF;
9087:
9088: --
9089: wsh_delivery_details_inv.mark_serial_number(
9109: -- newly generated transaction_temp_id in the scenario where
9110: -- only the serial attributes are updated and not the serial #
9111: --
9112: IF l_debug_on THEN
9113: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UPDATE_MARKED_SERIAL',WSH_DEBUG_SV.C_PROC_LEVEL);
9114: END IF;
9115: --
9116: WSH_DELIVERY_DETAILS_INV.Update_Marked_Serial(
9117: p_from_serial_number => p_original_rec.serial_number,
9121: p_transaction_temp_id => l_transaction_id,
9122: x_return_status => l_return_status);
9123: --
9124: IF l_debug_on THEN
9125: wsh_debug_sv.log(l_module_name, 'Return status after Update_Marked_Serial ', l_return_status);
9126: END IF;
9127: --
9128: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
9129: RAISE fnd_api.g_exc_error;
9140: END IF;
9141:
9142: IF NVL(x_detail_rec.shipped_quantity, 0) = 0 THEN
9143: IF l_debug_on THEN
9144: WSH_DEBUG_SV.logmsg(l_module_name, 'Zero or Null shipped qty');
9145: END IF;
9146:
9147: x_detail_rec.serial_number := NULL;
9148: x_detail_rec.to_serial_number := NULL;
9154: x_detail_rec.to_serial_number := NULL;
9155: END IF;
9156:
9157: IF l_debug_on THEN
9158: WSH_DEBUG_SV.log(l_module_name, 'transaction temp id', x_detail_rec.transaction_temp_id);
9159: WSH_DEBUG_SV.log(l_module_name, 'serial number', x_detail_rec.serial_number);
9160: WSH_DEBUG_SV.log(l_module_name, 'to_serial_number', x_detail_rec.to_serial_number);
9161: END IF;
9162: END IF; -- if check for validation level
9155: END IF;
9156:
9157: IF l_debug_on THEN
9158: WSH_DEBUG_SV.log(l_module_name, 'transaction temp id', x_detail_rec.transaction_temp_id);
9159: WSH_DEBUG_SV.log(l_module_name, 'serial number', x_detail_rec.serial_number);
9160: WSH_DEBUG_SV.log(l_module_name, 'to_serial_number', x_detail_rec.to_serial_number);
9161: END IF;
9162: END IF; -- if check for validation level
9163:
9156:
9157: IF l_debug_on THEN
9158: WSH_DEBUG_SV.log(l_module_name, 'transaction temp id', x_detail_rec.transaction_temp_id);
9159: WSH_DEBUG_SV.log(l_module_name, 'serial number', x_detail_rec.serial_number);
9160: WSH_DEBUG_SV.log(l_module_name, 'to_serial_number', x_detail_rec.to_serial_number);
9161: END IF;
9162: END IF; -- if check for validation level
9163:
9164: fnd_msg_pub.count_and_get(
9166: p_data => x_msg_data,
9167: p_encoded => fnd_api.g_false);
9168:
9169: IF l_debug_on THEN
9170: WSH_DEBUG_SV.pop(l_module_name);
9171: END IF;
9172: --
9173: EXCEPTION
9174: WHEN fnd_api.g_exc_error THEN
9178: p_encoded => fnd_api.g_false);
9179:
9180: --
9181: IF l_debug_on THEN
9182: WSH_DEBUG_SV.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', WSH_DEBUG_SV.c_excep_level);
9183: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
9184: END IF;
9185: --
9186: WHEN fnd_api.g_exc_unexpected_error THEN
9179:
9180: --
9181: IF l_debug_on THEN
9182: WSH_DEBUG_SV.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', WSH_DEBUG_SV.c_excep_level);
9183: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
9184: END IF;
9185: --
9186: WHEN fnd_api.g_exc_unexpected_error THEN
9187: ROLLBACK TO validate_det_line_grp;
9192: p_encoded => fnd_api.g_false);
9193:
9194: --
9195: IF l_debug_on THEN
9196: WSH_DEBUG_SV.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', WSH_DEBUG_SV.c_excep_level);
9197: WSH_DEBUG_SV.pop(l_module_name,
9198: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9199: END IF;
9200: --
9193:
9194: --
9195: IF l_debug_on THEN
9196: WSH_DEBUG_SV.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', WSH_DEBUG_SV.c_excep_level);
9197: WSH_DEBUG_SV.pop(l_module_name,
9198: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9199: END IF;
9200: --
9201: WHEN wsh_util_core.g_exc_warning THEN
9206: p_encoded => fnd_api.g_false);
9207:
9208: --
9209: IF l_debug_on THEN
9210: WSH_DEBUG_SV.logmsg(l_module_name,
9211: 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',
9212: WSH_DEBUG_SV.c_excep_level);
9213: WSH_DEBUG_SV.pop(l_module_name,
9214: 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9208: --
9209: IF l_debug_on THEN
9210: WSH_DEBUG_SV.logmsg(l_module_name,
9211: 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',
9212: WSH_DEBUG_SV.c_excep_level);
9213: WSH_DEBUG_SV.pop(l_module_name,
9214: 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9215: END IF;
9216: --
9209: IF l_debug_on THEN
9210: WSH_DEBUG_SV.logmsg(l_module_name,
9211: 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',
9212: WSH_DEBUG_SV.c_excep_level);
9213: WSH_DEBUG_SV.pop(l_module_name,
9214: 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9215: END IF;
9216: --
9217: WHEN OTHERS THEN
9226:
9227: --
9228:
9229: IF l_debug_on THEN
9230: WSH_DEBUG_SV.logmsg(l_module_name,
9231: 'Unexpected error has occured. Oracle error message is '
9232: || SQLERRM,
9233: WSH_DEBUG_SV.c_unexpec_err_level);
9234: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:OTHERS');
9229: IF l_debug_on THEN
9230: WSH_DEBUG_SV.logmsg(l_module_name,
9231: 'Unexpected error has occured. Oracle error message is '
9232: || SQLERRM,
9233: WSH_DEBUG_SV.c_unexpec_err_level);
9234: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:OTHERS');
9235: END IF;
9236: --
9237: END validate_detail_line;
9230: WSH_DEBUG_SV.logmsg(l_module_name,
9231: 'Unexpected error has occured. Oracle error message is '
9232: || SQLERRM,
9233: WSH_DEBUG_SV.c_unexpec_err_level);
9234: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:OTHERS');
9235: END IF;
9236: --
9237: END validate_detail_line;
9238:
9282: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
9283: --
9284: IF l_debug_on IS NULL
9285: THEN
9286: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9287: END IF;
9288: --
9289: SAVEPOINT VALIDATE_DET_CONTAINER_GRP;
9290: --
9288: --
9289: SAVEPOINT VALIDATE_DET_CONTAINER_GRP;
9290: --
9291: IF l_debug_on THEN
9292: WSH_DEBUG_SV.push(l_module_name);
9293: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
9294: END IF;
9295: -- Initialize API return status to success
9296: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9289: SAVEPOINT VALIDATE_DET_CONTAINER_GRP;
9290: --
9291: IF l_debug_on THEN
9292: WSH_DEBUG_SV.push(l_module_name);
9293: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
9294: END IF;
9295: -- Initialize API return status to success
9296: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9297: l_number_of_errors := 0;
9300: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_CONT_ITEM_LVL) = 1 ) THEN
9301: IF (x_detail_rec.inventory_item_id <> FND_API.G_MISS_NUM) THEN
9302: --
9303: IF l_debug_on THEN
9304: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_detail_rec.inventory_item_id);
9305: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_detail_rec.organization_id);
9306: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
9307: END IF;
9308: --
9301: IF (x_detail_rec.inventory_item_id <> FND_API.G_MISS_NUM) THEN
9302: --
9303: IF l_debug_on THEN
9304: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_detail_rec.inventory_item_id);
9305: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_detail_rec.organization_id);
9306: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
9307: END IF;
9308: --
9309: WSH_UTIL_VALIDATE.Validate_Item(
9302: --
9303: IF l_debug_on THEN
9304: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_detail_rec.inventory_item_id);
9305: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_detail_rec.organization_id);
9306: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
9307: END IF;
9308: --
9309: WSH_UTIL_VALIDATE.Validate_Item(
9310: p_inventory_item_id => x_detail_rec.inventory_item_id,
9353: p_encoded => FND_API.G_FALSE
9354: );
9355:
9356: IF l_debug_on THEN
9357: WSH_DEBUG_SV.pop(l_module_name);
9358: END IF;
9359:
9360: EXCEPTION
9361: WHEN e_invalid_delivered_qty THEN
9369: p_data => x_msg_data,
9370: p_encoded => FND_API.G_FALSE
9371: );
9372: IF l_debug_on THEN
9373: WSH_DEBUG_SV.logmsg(l_module_name,'E_INVALID_DELIVERED_QTY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9374: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION: E_INVALID_DELIVERED_QTY');
9375: END IF;
9376:
9377:
9370: p_encoded => FND_API.G_FALSE
9371: );
9372: IF l_debug_on THEN
9373: WSH_DEBUG_SV.logmsg(l_module_name,'E_INVALID_DELIVERED_QTY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9374: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION: E_INVALID_DELIVERED_QTY');
9375: END IF;
9376:
9377:
9378: WHEN FND_API.G_EXC_ERROR THEN
9386: );
9387: --
9388:
9389: IF l_debug_on THEN
9390: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9391: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9392: END IF;
9393:
9394: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9387: --
9388:
9389: IF l_debug_on THEN
9390: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9391: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9392: END IF;
9393:
9394: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9395: ROLLBACK TO VALIDATE_DET_CONTAINER_GRP;
9402: );
9403: --
9404:
9405: IF l_debug_on THEN
9406: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9407: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9408: END IF;
9409: --
9410: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9403: --
9404:
9405: IF l_debug_on THEN
9406: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9407: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9408: END IF;
9409: --
9410: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9411: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9416: p_encoded => FND_API.G_FALSE
9417: );
9418: --
9419: IF l_debug_on THEN
9420: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9421: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9422: END IF;
9423: --
9424: WHEN OTHERS THEN
9417: );
9418: --
9419: IF l_debug_on THEN
9420: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9421: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9422: END IF;
9423: --
9424: WHEN OTHERS THEN
9425: ROLLBACK TO VALIDATE_DET_CONTAINER_GRP;
9433: p_encoded => FND_API.G_FALSE
9434: );
9435:
9436: IF l_debug_on THEN
9437: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9438: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9439: END IF;
9440: --
9441: END Validate_Detail_Container;
9434: );
9435:
9436: IF l_debug_on THEN
9437: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9438: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9439: END IF;
9440: --
9441: END Validate_Detail_Container;
9442:
9493: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
9494: --
9495: IF l_debug_on IS NULL
9496: THEN
9497: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9498: END IF;
9499: --
9500: SAVEPOINT VALIDATE_DET_COMMON_GRP;
9501:
9499: --
9500: SAVEPOINT VALIDATE_DET_COMMON_GRP;
9501:
9502: IF l_debug_on THEN
9503: WSH_DEBUG_SV.push(l_module_name);
9504: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
9505: END IF;
9506: --
9507:
9500: SAVEPOINT VALIDATE_DET_COMMON_GRP;
9501:
9502: IF l_debug_on THEN
9503: WSH_DEBUG_SV.push(l_module_name);
9504: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
9505: END IF;
9506: --
9507:
9508: -- Initialize API return status to success
9513: --HW OPMCONV - Removed checking for process org
9514:
9515: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_GROSS_WEIGHT_LVL) = 1 ) THEN
9516: IF l_debug_on THEN
9517: WSH_DEBUG_SV.log(l_module_name, 'Gross Weight', x_detail_rec.gross_weight);
9518: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.C_PROC_LEVEL);
9519: END IF;
9520: --Bug # 3266333
9521: wsh_util_validate.validate_negative(
9514:
9515: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_GROSS_WEIGHT_LVL) = 1 ) THEN
9516: IF l_debug_on THEN
9517: WSH_DEBUG_SV.log(l_module_name, 'Gross Weight', x_detail_rec.gross_weight);
9518: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.C_PROC_LEVEL);
9519: END IF;
9520: --Bug # 3266333
9521: wsh_util_validate.validate_negative(
9522: p_value => x_detail_rec.gross_weight,
9535:
9536: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_NET_WEIGHT_LVL) = 1 ) THEN
9537: --
9538: IF l_debug_on THEN
9539: WSH_DEBUG_SV.log(l_module_name, 'Net Weight', x_detail_rec.net_weight);
9540: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.C_PROC_LEVEL);
9541: END IF;
9542: --Bug # 3266333
9543: wsh_util_validate.validate_negative(
9536: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_NET_WEIGHT_LVL) = 1 ) THEN
9537: --
9538: IF l_debug_on THEN
9539: WSH_DEBUG_SV.log(l_module_name, 'Net Weight', x_detail_rec.net_weight);
9540: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.C_PROC_LEVEL);
9541: END IF;
9542: --Bug # 3266333
9543: wsh_util_validate.validate_negative(
9544: p_value => x_detail_rec.net_weight,
9558:
9559: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_VOLUME_LVL) = 1 ) THEN
9560: --
9561: IF l_debug_on THEN
9562: WSH_DEBUG_SV.log(l_module_name, 'Volume', x_detail_rec.volume);
9563: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.C_PROC_LEVEL);
9564: END IF;
9565: --Bug # 3266333
9566: wsh_util_validate.validate_negative(
9559: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_VOLUME_LVL) = 1 ) THEN
9560: --
9561: IF l_debug_on THEN
9562: WSH_DEBUG_SV.log(l_module_name, 'Volume', x_detail_rec.volume);
9563: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.C_PROC_LEVEL);
9564: END IF;
9565: --Bug # 3266333
9566: wsh_util_validate.validate_negative(
9567: p_value => x_detail_rec.volume,
9580:
9581: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_MASTER_SER_NUM_LVL) = 1 ) THEN
9582: IF(x_detail_rec.master_serial_number IS NOT NULL) THEN
9583: IF l_debug_on THEN
9584: WSH_DEBUG_SV.log(l_module_name, 'Original container Flag', p_original_rec.container_flag);
9585: WSH_DEBUG_SV.log(l_module_name, 'Master Serial Number', x_detail_rec.master_serial_number);
9586: END IF;
9587:
9588: -- Update of master serial number is allowed only if detail is a container
9581: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_MASTER_SER_NUM_LVL) = 1 ) THEN
9582: IF(x_detail_rec.master_serial_number IS NOT NULL) THEN
9583: IF l_debug_on THEN
9584: WSH_DEBUG_SV.log(l_module_name, 'Original container Flag', p_original_rec.container_flag);
9585: WSH_DEBUG_SV.log(l_module_name, 'Master Serial Number', x_detail_rec.master_serial_number);
9586: END IF;
9587:
9588: -- Update of master serial number is allowed only if detail is a container
9589: -- And if the container is the top most container
9618: -- Cannot set the inspection_Flag to N if it is already I or R
9619:
9620: IF x_detail_rec.inspection_flag IS NOT NULL THEN
9621: IF l_debug_on THEN
9622: WSH_DEBUG_SV.log(l_module_name, 'Original Inspec Flag', p_original_rec.inspection_flag);
9623: WSH_DEBUG_SV.log(l_module_name, 'Inspection Flag', x_detail_rec.inspection_flag);
9624: END IF;
9625:
9626: IF(x_detail_rec.inspection_flag = 'N' AND p_original_rec.inspection_flag IN ('I', 'R')) THEN
9619:
9620: IF x_detail_rec.inspection_flag IS NOT NULL THEN
9621: IF l_debug_on THEN
9622: WSH_DEBUG_SV.log(l_module_name, 'Original Inspec Flag', p_original_rec.inspection_flag);
9623: WSH_DEBUG_SV.log(l_module_name, 'Inspection Flag', x_detail_rec.inspection_flag);
9624: END IF;
9625:
9626: IF(x_detail_rec.inspection_flag = 'N' AND p_original_rec.inspection_flag IN ('I', 'R')) THEN
9627: x_detail_rec.inspection_flag := p_original_rec.inspection_flag;
9637: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_MASTER_LPN_ITEM_LVL) = 1) THEN
9638: IF x_detail_rec.master_container_item_id IS NOT NULL THEN
9639:
9640: IF l_debug_on THEN
9641: WSH_DEBUG_SV.log(l_module_name, 'Master cont item id', x_detail_rec.master_container_item_id);
9642: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
9643: END IF;
9644:
9645: WSH_UTIL_VALIDATE.Validate_Item(
9638: IF x_detail_rec.master_container_item_id IS NOT NULL THEN
9639:
9640: IF l_debug_on THEN
9641: WSH_DEBUG_SV.log(l_module_name, 'Master cont item id', x_detail_rec.master_container_item_id);
9642: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
9643: END IF;
9644:
9645: WSH_UTIL_VALIDATE.Validate_Item(
9646: p_inventory_item_id => x_detail_rec.master_container_item_id,
9663: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_DETAIL_LPN_ITEM_LVL) = 1) THEN
9664: IF x_detail_rec.detail_container_item_id IS NOT NULL THEN
9665:
9666: IF l_debug_on THEN
9667: WSH_DEBUG_SV.log(l_module_name, 'Detail cont item id', x_detail_rec.Detail_container_item_id);
9668: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
9669: END IF;
9670:
9671: WSH_UTIL_VALIDATE.Validate_Item(
9664: IF x_detail_rec.detail_container_item_id IS NOT NULL THEN
9665:
9666: IF l_debug_on THEN
9667: WSH_DEBUG_SV.log(l_module_name, 'Detail cont item id', x_detail_rec.Detail_container_item_id);
9668: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
9669: END IF;
9670:
9671: WSH_UTIL_VALIDATE.Validate_Item(
9672: p_inventory_item_id => x_detail_rec.detail_container_item_id,
9685: );
9686: END IF;
9687: END IF;
9688: IF l_debug_on THEN
9689: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.delivered_quantity',x_detail_rec.delivered_quantity);
9690: END IF;
9691: -- HW OPMCONV - Removed branching
9692:
9693: --{
9707: p_encoded => FND_API.G_FALSE
9708: );
9709:
9710: IF l_debug_on THEN
9711: WSH_DEBUG_SV.pop(l_module_name);
9712: END IF;
9713:
9714: EXCEPTION
9715: WHEN FND_API.G_EXC_ERROR THEN
9722: p_encoded => FND_API.G_FALSE
9723: );
9724: --
9725: IF l_debug_on THEN
9726: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9727: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9728: END IF;
9729:
9730: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9723: );
9724: --
9725: IF l_debug_on THEN
9726: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9727: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9728: END IF;
9729:
9730: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9731: ROLLBACK TO VALIDATE_DET_COMMON_GRP;
9738: );
9739: --
9740:
9741: IF l_debug_on THEN
9742: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9743: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9744: END IF;
9745:
9746: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9739: --
9740:
9741: IF l_debug_on THEN
9742: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9743: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9744: END IF;
9745:
9746: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9747: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9752: p_encoded => FND_API.G_FALSE
9753: );
9754: --
9755: IF l_debug_on THEN
9756: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9757: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9758: END IF;
9759:
9760: WHEN OTHERS THEN
9753: );
9754: --
9755: IF l_debug_on THEN
9756: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9757: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9758: END IF;
9759:
9760: WHEN OTHERS THEN
9761: ROLLBACK TO VALIDATE_DET_COMMON_GRP;
9770: );
9771: --
9772:
9773: IF l_debug_on THEN
9774: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9775: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9776: END IF;
9777:
9778: END Validate_Detail_Common;
9771: --
9772:
9773: IF l_debug_on THEN
9774: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9775: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9776: END IF;
9777:
9778: END Validate_Detail_Common;
9779:
9813:
9814: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
9815: --
9816: IF l_debug_on IS NULL THEN
9817: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9818: END IF;
9819: --
9820: IF l_debug_on THEN
9821: WSH_DEBUG_SV.push(l_module_name);
9817: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9818: END IF;
9819: --
9820: IF l_debug_on THEN
9821: WSH_DEBUG_SV.push(l_module_name);
9822: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', p_transaction_temp_id);
9823: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', p_serial_number);
9824: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', p_to_serial_number);
9825: WSH_DEBUG_SV.log(l_module_name, 'Shipped Qty', p_shipped_quantity);
9818: END IF;
9819: --
9820: IF l_debug_on THEN
9821: WSH_DEBUG_SV.push(l_module_name);
9822: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', p_transaction_temp_id);
9823: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', p_serial_number);
9824: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', p_to_serial_number);
9825: WSH_DEBUG_SV.log(l_module_name, 'Shipped Qty', p_shipped_quantity);
9826: END IF;
9819: --
9820: IF l_debug_on THEN
9821: WSH_DEBUG_SV.push(l_module_name);
9822: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', p_transaction_temp_id);
9823: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', p_serial_number);
9824: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', p_to_serial_number);
9825: WSH_DEBUG_SV.log(l_module_name, 'Shipped Qty', p_shipped_quantity);
9826: END IF;
9827: --
9820: IF l_debug_on THEN
9821: WSH_DEBUG_SV.push(l_module_name);
9822: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', p_transaction_temp_id);
9823: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', p_serial_number);
9824: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', p_to_serial_number);
9825: WSH_DEBUG_SV.log(l_module_name, 'Shipped Qty', p_shipped_quantity);
9826: END IF;
9827: --
9828:
9821: WSH_DEBUG_SV.push(l_module_name);
9822: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', p_transaction_temp_id);
9823: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', p_serial_number);
9824: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', p_to_serial_number);
9825: WSH_DEBUG_SV.log(l_module_name, 'Shipped Qty', p_shipped_quantity);
9826: END IF;
9827: --
9828:
9829: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9846:
9847: x_serial_qty := NVL(l_serial_qty.serial_qty, 0);
9848:
9849: IF l_debug_on THEN
9850: wsh_debug_sv.log(l_module_name, 'Serial Qty', x_serial_qty);
9851: WSH_DEBUG_SV.pop(l_module_name);
9852: END IF;
9853:
9854:
9847: x_serial_qty := NVL(l_serial_qty.serial_qty, 0);
9848:
9849: IF l_debug_on THEN
9850: wsh_debug_sv.log(l_module_name, 'Serial Qty', x_serial_qty);
9851: WSH_DEBUG_SV.pop(l_module_name);
9852: END IF;
9853:
9854:
9855: EXCEPTION
9855: EXCEPTION
9856: WHEN FND_API.G_EXC_ERROR THEN
9857: x_return_status := FND_API.G_RET_STS_ERROR ;
9858: IF l_debug_on THEN
9859: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9860: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9861: END IF;
9862:
9863: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9856: WHEN FND_API.G_EXC_ERROR THEN
9857: x_return_status := FND_API.G_RET_STS_ERROR ;
9858: IF l_debug_on THEN
9859: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9860: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9861: END IF;
9862:
9863: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9862:
9863: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9865: IF l_debug_on THEN
9866: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9867: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9868: END IF;
9869:
9870: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9863: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9864: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9865: IF l_debug_on THEN
9866: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9867: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9868: END IF;
9869:
9870: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9871: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9869:
9870: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9871: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9872: IF l_debug_on THEN
9873: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9874: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9875: END IF;
9876:
9877: WHEN OTHERS THEN
9870: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9871: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9872: IF l_debug_on THEN
9873: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9874: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9875: END IF;
9876:
9877: WHEN OTHERS THEN
9878: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9880: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Get_Serial_Quantity');
9881: --
9882:
9883: IF l_debug_on THEN
9884: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9885: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9886: END IF;
9887:
9888: END get_serial_quantity;
9881: --
9882:
9883: IF l_debug_on THEN
9884: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9885: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9886: END IF;
9887:
9888: END get_serial_quantity;
9889:
9979: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
9980: --
9981: IF l_debug_on IS NULL
9982: THEN
9983: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9984: END IF;
9985: --
9986:
9987: --
9987: --
9988: -- Debug Statements
9989: --
9990: IF l_debug_on THEN
9991: WSH_DEBUG_SV.push(l_module_name);
9992: --
9993: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
9994: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
9995: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
9989: --
9990: IF l_debug_on THEN
9991: WSH_DEBUG_SV.push(l_module_name);
9992: --
9993: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
9994: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
9995: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
9996: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
9997: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
9990: IF l_debug_on THEN
9991: WSH_DEBUG_SV.push(l_module_name);
9992: --
9993: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
9994: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
9995: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
9996: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
9997: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
9998: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
9991: WSH_DEBUG_SV.push(l_module_name);
9992: --
9993: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
9994: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
9995: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
9996: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
9997: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
9998: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
9999: END IF;
9992: --
9993: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
9994: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
9995: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
9996: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
9997: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
9998: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
9999: END IF;
10000: --
9993: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
9994: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
9995: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
9996: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
9997: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
9998: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
9999: END IF;
10000: --
10001:
9994: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
9995: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
9996: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
9997: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
9998: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
9999: END IF;
10000: --
10001:
10002: -- Initialize message list if p_init_msg_list is set to TRUE.
10018: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
10019: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CALLER');
10020: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
10021: IF l_debug_on THEN
10022: wsh_debug_sv.logmsg(l_module_name,'Null Caller');
10023: END IF;
10024: RAISE FND_API.G_EXC_ERROR;
10025: END IF;
10026:
10028: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
10029: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'ACTION_CODE');
10030: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
10031: IF l_debug_on THEN
10032: wsh_debug_sv.logmsg(l_module_name,'Null Action Code');
10033: END IF;
10034: RAISE FND_API.G_EXC_ERROR;
10035: ELSIF(p_In_rec.action_code NOT IN('CREATE', 'UPDATE', 'CANCEL')
10036: OR (p_In_rec.action_code = 'CANCEL' AND p_In_rec.caller <> 'WSH_INBOUND')) THEN
10037: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_ACTION_CODE');
10038: FND_MESSAGE.SET_TOKEN('ACT_CODE',p_In_rec.action_code );
10039: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
10040: IF l_debug_on THEN
10041: wsh_debug_sv.logmsg(l_module_name,'WSH_INVALID_ACTION_CODE');
10042: END IF;
10043: RAISE FND_API.G_EXC_ERROR;
10044: END IF;
10045:
10045:
10046: -- Set Validation Level
10047:
10048: IF l_debug_on THEN
10049: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ACTIONS_LEVELS.SET_VALIDATION_LEVEL',WSH_DEBUG_SV.C_PROC_LEVEL);
10050: END IF;
10051: --
10052: wsh_actions_levels.set_validation_level(
10053: p_entity => 'DLVB',
10081: FETCH det_to_del_Cur INTO l_delivery_id;
10082: CLOSE det_to_del_Cur;
10083:
10084: IF l_debug_on THEN
10085: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.GET_DISABLED_LIST',WSH_DEBUG_SV.C_PROC_LEVEL);
10086: END IF;
10087: --
10088:
10089: IF p_In_rec.caller LIKE 'WMS%' AND p_in_rec.action_code ='UPDATE'
10090: THEN
10091: l_weight_uom_code := p_detail_info_tab(l_index).weight_uom_code;
10092: l_volume_uom_code := p_detail_info_tab(l_index).volume_uom_code;
10093: IF l_debug_on THEN
10094: WSH_DEBUG_SV.log(l_module_name,'l_weight_uom_code',
10095: l_weight_uom_code);
10096: WSH_DEBUG_SV.log(l_module_name,'l_volume_uom_code',
10097: l_volume_uom_code);
10098: END IF;
10092: l_volume_uom_code := p_detail_info_tab(l_index).volume_uom_code;
10093: IF l_debug_on THEN
10094: WSH_DEBUG_SV.log(l_module_name,'l_weight_uom_code',
10095: l_weight_uom_code);
10096: WSH_DEBUG_SV.log(l_module_name,'l_volume_uom_code',
10097: l_volume_uom_code);
10098: END IF;
10099:
10100: END IF;
10156: x_num_warnings => l_loop_num_warn,
10157: x_num_errors => l_loop_num_error
10158: );
10159: IF l_debug_on THEN
10160: WSH_DEBUG_SV.log(l_module_name,'net_weight',
10161: l_delivery_detail_rec.net_weight);
10162: WSH_DEBUG_SV.log(l_module_name,'gross_weight',
10163: l_delivery_detail_rec.gross_weight);
10164: WSH_DEBUG_SV.log(l_module_name,'database uom',
10158: );
10159: IF l_debug_on THEN
10160: WSH_DEBUG_SV.log(l_module_name,'net_weight',
10161: l_delivery_detail_rec.net_weight);
10162: WSH_DEBUG_SV.log(l_module_name,'gross_weight',
10163: l_delivery_detail_rec.gross_weight);
10164: WSH_DEBUG_SV.log(l_module_name,'database uom',
10165: l_delivery_detail_rec.weight_uom_code);
10166: WSH_DEBUG_SV.log(l_module_name,'item_id',
10160: WSH_DEBUG_SV.log(l_module_name,'net_weight',
10161: l_delivery_detail_rec.net_weight);
10162: WSH_DEBUG_SV.log(l_module_name,'gross_weight',
10163: l_delivery_detail_rec.gross_weight);
10164: WSH_DEBUG_SV.log(l_module_name,'database uom',
10165: l_delivery_detail_rec.weight_uom_code);
10166: WSH_DEBUG_SV.log(l_module_name,'item_id',
10167: l_delivery_detail_rec.inventory_item_id);
10168: END IF;
10162: WSH_DEBUG_SV.log(l_module_name,'gross_weight',
10163: l_delivery_detail_rec.gross_weight);
10164: WSH_DEBUG_SV.log(l_module_name,'database uom',
10165: l_delivery_detail_rec.weight_uom_code);
10166: WSH_DEBUG_SV.log(l_module_name,'item_id',
10167: l_delivery_detail_rec.inventory_item_id);
10168: END IF;
10169:
10170: END IF;
10199: x_num_warnings => l_loop_num_warn,
10200: x_num_errors => l_loop_num_error
10201: );
10202: IF l_debug_on THEN
10203: WSH_DEBUG_SV.log(l_module_name,'volume',
10204: l_delivery_detail_rec.volume);
10205: WSH_DEBUG_SV.log(l_module_name,'filled_volume',
10206: l_delivery_detail_rec.filled_volume);
10207: WSH_DEBUG_SV.log(l_module_name,'database uom',
10201: );
10202: IF l_debug_on THEN
10203: WSH_DEBUG_SV.log(l_module_name,'volume',
10204: l_delivery_detail_rec.volume);
10205: WSH_DEBUG_SV.log(l_module_name,'filled_volume',
10206: l_delivery_detail_rec.filled_volume);
10207: WSH_DEBUG_SV.log(l_module_name,'database uom',
10208: l_delivery_detail_rec.volume_uom_code);
10209: WSH_DEBUG_SV.log(l_module_name,'item_id',
10203: WSH_DEBUG_SV.log(l_module_name,'volume',
10204: l_delivery_detail_rec.volume);
10205: WSH_DEBUG_SV.log(l_module_name,'filled_volume',
10206: l_delivery_detail_rec.filled_volume);
10207: WSH_DEBUG_SV.log(l_module_name,'database uom',
10208: l_delivery_detail_rec.volume_uom_code);
10209: WSH_DEBUG_SV.log(l_module_name,'item_id',
10210: l_delivery_detail_rec.inventory_item_id);
10211: END IF;
10205: WSH_DEBUG_SV.log(l_module_name,'filled_volume',
10206: l_delivery_detail_rec.filled_volume);
10207: WSH_DEBUG_SV.log(l_module_name,'database uom',
10208: l_delivery_detail_rec.volume_uom_code);
10209: WSH_DEBUG_SV.log(l_module_name,'item_id',
10210: l_delivery_detail_rec.inventory_item_id);
10211: END IF;
10212: END IF;
10213:
10216: EXCEPTION
10217: WHEN FND_API.G_EXC_ERROR THEN
10218: ROLLBACK TO before_det_disabled_grp;
10219: IF l_debug_on THEN
10220: wsh_debug_sv.logmsg(l_module_name, 'g exc error');
10221: END IF;
10222: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10223: ROLLBACK TO before_det_disabled_grp;
10224: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10232: l_index := p_detail_info_tab.NEXT(l_index);
10233: END LOOP;
10234:
10235: IF l_debug_on THEN
10236: wsh_debug_sv.log(l_module_name, 'Number of errors after loop', l_loop_num_error);
10237: wsh_debug_sv.log(l_module_name, 'New table count', l_detail_info_tab.count);
10238: END IF;
10239:
10240: -- For create container, the table count will be zero
10233: END LOOP;
10234:
10235: IF l_debug_on THEN
10236: wsh_debug_sv.log(l_module_name, 'Number of errors after loop', l_loop_num_error);
10237: wsh_debug_sv.log(l_module_name, 'New table count', l_detail_info_tab.count);
10238: END IF;
10239:
10240: -- For create container, the table count will be zero
10241: -- Should not set error for that container case
10242: --bmso check the case where container is created and the detail_info_tab > 0
10243: IF p_detail_info_tab.count > 0 THEN
10244: IF l_loop_num_error = p_detail_info_tab.count THEN
10245: IF l_debug_on THEN
10246: wsh_debug_sv.logmsg(l_module_name, 'get disabled list fail all records');
10247: END IF;
10248: RAISE FND_API.G_EXC_ERROR;
10249: ELSE
10250: l_number_of_warnings := l_loop_num_error;
10255: -- if the validation level for disabled list is turned off
10256: -- then we initialize the local table using the input table directly
10257: -- this will be applicable when caller is WSHFSTRX.
10258: IF l_debug_on THEN
10259: wsh_debug_sv.logmsg(l_module_name, 'Get Disabled turned off');
10260: END IF;
10261: l_detail_info_tab := p_detail_info_tab;
10262: --
10263: END IF; -- if check for C_DISABLED_LIST_LVL
10264:
10265: IF(p_in_rec.action_code ='UPDATE' AND l_detail_info_tab.count < 1) THEN
10266: -- Should not proceed further
10267: IF l_debug_on THEN
10268: wsh_debug_sv.logmsg(l_module_name,'Table Count Zero');
10269: END IF;
10270: RAISE FND_API.G_EXC_ERROR;
10271: END IF;
10272:
10320: IF( WSH_UTIL_CORE.FTE_Is_Installed = 'Y') THEN
10321: IF l_details_marked.count > 0 THEN
10322: --
10323: IF l_debug_on THEN
10324: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
10325: END IF;
10326: --
10327: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
10328: p_entity_type => 'DELIVERY_DETAIL',
10348: IF l_valid_index_tab.COUNT <> l_detail_info_tab.COUNT THEN
10349: --
10350: IF l_debug_on THEN
10351: --
10352: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR not all line are validated successfully',WSH_DEBUG_SV.C_PROC_LEVEL);
10353: WSH_DEBUG_SV.log(l_module_name,'valid count',l_valid_index_tab.COUNT);
10354: WSH_DEBUG_SV.log(l_module_name,'total count',l_detail_info_tab.COUNT);
10355: --
10356: END IF;
10349: --
10350: IF l_debug_on THEN
10351: --
10352: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR not all line are validated successfully',WSH_DEBUG_SV.C_PROC_LEVEL);
10353: WSH_DEBUG_SV.log(l_module_name,'valid count',l_valid_index_tab.COUNT);
10354: WSH_DEBUG_SV.log(l_module_name,'total count',l_detail_info_tab.COUNT);
10355: --
10356: END IF;
10357: --
10350: IF l_debug_on THEN
10351: --
10352: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR not all line are validated successfully',WSH_DEBUG_SV.C_PROC_LEVEL);
10353: WSH_DEBUG_SV.log(l_module_name,'valid count',l_valid_index_tab.COUNT);
10354: WSH_DEBUG_SV.log(l_module_name,'total count',l_detail_info_tab.COUNT);
10355: --
10356: END IF;
10357: --
10358: RAISE FND_API.G_EXC_ERROR;
10396: END IF;
10397:
10398: IF l_number_of_warnings > 0 THEN
10399: IF l_debug_on THEN
10400: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
10401: END IF;
10402:
10403: RAISE wsh_util_core.g_exc_warning;
10404: END IF;
10405:
10406: -- Standard check of p_commit.
10407: IF FND_API.To_Boolean( p_commit ) THEN
10408: IF(l_debug_on) THEN
10409: wsh_debug_sv.logmsg(l_module_name, 'Commit Work');
10410: END IF;
10411: --
10412: -- Start code for Bugfix 4070732
10413: --
10412: -- Start code for Bugfix 4070732
10413: --
10414: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10415: IF l_debug_on THEN
10416: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10417: END IF;
10418:
10419: l_reset_flags := FALSE;
10420:
10421: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
10422: x_return_status => l_return_status);
10423:
10424: IF l_debug_on THEN
10425: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10426: END IF;
10427:
10428: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
10429: RAISE FND_API.G_EXC_ERROR;
10449:
10450: IF FND_API.TO_BOOLEAN(p_commit) THEN
10451:
10452: IF l_debug_on THEN
10453: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10454: END IF;
10455:
10456: WSH_UTIL_CORE.reset_stops_for_load_tender(p_reset_flags => TRUE,
10457: x_return_status => l_return_status);
10457: x_return_status => l_return_status);
10458: ELSE
10459:
10460: IF l_debug_on THEN
10461: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10462: END IF;
10463:
10464: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
10465: x_return_status => l_return_status);
10465: x_return_status => l_return_status);
10466: END IF;
10467:
10468: IF l_debug_on THEN
10469: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10470: END IF;
10471:
10472:
10473: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10495: );
10496:
10497:
10498: IF l_debug_on THEN
10499: WSH_DEBUG_SV.pop(l_module_name);
10500: END IF;
10501: --
10502: EXCEPTION
10503: WHEN FND_API.G_EXC_ERROR THEN
10511: --{
10512: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10513: --{
10514: IF l_debug_on THEN
10515: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10516: END IF;
10517:
10518: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10519: x_return_status => l_return_status);
10518: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10519: x_return_status => l_return_status);
10520:
10521: IF l_debug_on THEN
10522: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10523: END IF;
10524:
10525: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
10526: x_return_status := l_return_status;
10542:
10543:
10544: --
10545: IF l_debug_on THEN
10546: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10547: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10548: END IF;
10549: --
10550: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10543:
10544: --
10545: IF l_debug_on THEN
10546: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10547: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10548: END IF;
10549: --
10550: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10551: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10558: --{
10559: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10560: --{
10561: IF l_debug_on THEN
10562: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10563: END IF;
10564:
10565: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10566: x_return_status => l_return_status);
10565: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10566: x_return_status => l_return_status);
10567:
10568: IF l_debug_on THEN
10569: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10570: END IF;
10571: --}
10572: END IF;
10573: --}
10585:
10586:
10587: --
10588: IF l_debug_on THEN
10589: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10590: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10591: END IF;
10592: --
10593: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10586:
10587: --
10588: IF l_debug_on THEN
10589: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10590: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10591: END IF;
10592: --
10593: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10594: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10597: --
10598: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
10599: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10600: IF l_debug_on THEN
10601: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10602: END IF;
10603:
10604: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
10605: x_return_status => l_return_status);
10604: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
10605: x_return_status => l_return_status);
10606:
10607: IF l_debug_on THEN
10608: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10609: END IF;
10610:
10611: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10612: x_return_status := l_return_status;
10633:
10634:
10635: --
10636: IF l_debug_on THEN
10637: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10638: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10639: END IF;
10640: --
10641: WHEN mark_reprice_error then
10634:
10635: --
10636: IF l_debug_on THEN
10637: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10638: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10639: END IF;
10640: --
10641: WHEN mark_reprice_error then
10642: FND_MESSAGE.Set_Name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
10647: --
10648: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
10649: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10650: IF l_debug_on THEN
10651: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10652: END IF;
10653:
10654: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
10655: x_return_status => l1_return_status);
10654: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
10655: x_return_status => l1_return_status);
10656:
10657: IF l_debug_on THEN
10658: WSH_DEBUG_SV.log(l_module_name,'l1_return_status',l1_return_status);
10659: END IF;
10660:
10661: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
10662: IF l1_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10691: --
10692:
10693: --
10694: IF l_debug_on THEN
10695: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10696: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
10697: END IF;
10698: --
10699: WHEN OTHERS THEN
10692:
10693: --
10694: IF l_debug_on THEN
10695: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10696: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
10697: END IF;
10698: --
10699: WHEN OTHERS THEN
10700: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10709: --{
10710: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10711: --{
10712: IF l_debug_on THEN
10713: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10714: END IF;
10715:
10716: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10717: x_return_status => l_return_status);
10716: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10717: x_return_status => l_return_status);
10718:
10719: IF l_debug_on THEN
10720: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10721: END IF;
10722: --}
10723: END IF;
10724: --}
10735: --
10736:
10737:
10738: IF l_debug_on THEN
10739: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10740: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10741: END IF;
10742: --
10743: END Create_Update_Delivery_Detail;
10736:
10737:
10738: IF l_debug_on THEN
10739: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10740: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10741: END IF;
10742: --
10743: END Create_Update_Delivery_Detail;
10744:
10777:
10778: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10779: --
10780: IF l_debug_on IS NULL THEN
10781: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10782: END IF;
10783: --
10784: IF l_debug_on THEN
10785: WSH_DEBUG_SV.push(l_module_name);
10781: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10782: END IF;
10783: --
10784: IF l_debug_on THEN
10785: WSH_DEBUG_SV.push(l_module_name);
10786: WSH_DEBUG_SV.LOG(l_module_name, 'Count of p_line_rows-', p_line_rows.count);
10787: END IF;
10788: --
10789: x_return_status := FND_API.G_RET_STS_SUCCESS;
10782: END IF;
10783: --
10784: IF l_debug_on THEN
10785: WSH_DEBUG_SV.push(l_module_name);
10786: WSH_DEBUG_SV.LOG(l_module_name, 'Count of p_line_rows-', p_line_rows.count);
10787: END IF;
10788: --
10789: x_return_status := FND_API.G_RET_STS_SUCCESS;
10790:
10795: END LOOP;
10796: l_action_rec.action := 'MATCH_GROUPS';
10797:
10798: IF l_debug_on THEN
10799: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups', WSH_DEBUG_SV.C_PROC_LEVEL);
10800: END IF;
10801: WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups (
10802: p_attr_tab => l_attr_tab,
10803: p_action_rec => l_action_rec,
10841: END LOOP;
10842: --bug 7171766 till here
10843:
10844: IF l_debug_on THEN
10845: WSH_DEBUG_SV.LOG(l_module_name, 'Count of x_grouping_rows -', x_grouping_rows.count);
10846: WSH_DEBUG_SV.LOG(l_module_name, 'x_return_status', x_return_status);
10847: WSH_DEBUG_SV.pop(l_module_name);
10848: END IF;
10849:
10842: --bug 7171766 till here
10843:
10844: IF l_debug_on THEN
10845: WSH_DEBUG_SV.LOG(l_module_name, 'Count of x_grouping_rows -', x_grouping_rows.count);
10846: WSH_DEBUG_SV.LOG(l_module_name, 'x_return_status', x_return_status);
10847: WSH_DEBUG_SV.pop(l_module_name);
10848: END IF;
10849:
10850: EXCEPTION
10843:
10844: IF l_debug_on THEN
10845: WSH_DEBUG_SV.LOG(l_module_name, 'Count of x_grouping_rows -', x_grouping_rows.count);
10846: WSH_DEBUG_SV.LOG(l_module_name, 'x_return_status', x_return_status);
10847: WSH_DEBUG_SV.pop(l_module_name);
10848: END IF;
10849:
10850: EXCEPTION
10851: WHEN FND_API.G_EXC_ERROR THEN
10850: EXCEPTION
10851: WHEN FND_API.G_EXC_ERROR THEN
10852: x_return_status := FND_API.G_RET_STS_ERROR ;
10853: IF l_debug_on THEN
10854: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10855: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10856: END IF;
10857:
10858: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10851: WHEN FND_API.G_EXC_ERROR THEN
10852: x_return_status := FND_API.G_RET_STS_ERROR ;
10853: IF l_debug_on THEN
10854: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10855: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10856: END IF;
10857:
10858: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10857:
10858: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10860: IF l_debug_on THEN
10861: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10862: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10863: END IF;
10864:
10865: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10858: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10860: IF l_debug_on THEN
10861: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10862: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10863: END IF;
10864:
10865: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10866: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10864:
10865: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10866: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10867: IF l_debug_on THEN
10868: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10869: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10870: END IF;
10871:
10872: WHEN OTHERS THEN
10865: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10866: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10867: IF l_debug_on THEN
10868: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10869: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10870: END IF;
10871:
10872: WHEN OTHERS THEN
10873: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10874: wsh_util_core.add_message(x_return_status, l_module_name);
10875: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Get_Carton_Grouping');
10876: --
10877: IF l_debug_on THEN
10878: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10879: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10880: END IF;
10881: END Get_Carton_Grouping;
10882:
10875: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Get_Carton_Grouping');
10876: --
10877: IF l_debug_on THEN
10878: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10879: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10880: END IF;
10881: END Get_Carton_Grouping;
10882:
10883: END WSH_DELIVERY_DETAILS_GRP;