[Home] [Help]
248: l_debug_on := wsh_debug_interface.g_debug;
249:
250: --
251: IF l_debug_on IS NULL THEN
252: l_debug_on := wsh_debug_sv.is_debug_enabled;
253: END IF;
254:
255: --
256: SAVEPOINT detail_to_delivery_grp;
259: --
260: -- Debug Statements
261: --
262: IF l_debug_on THEN
263: wsh_debug_sv.push(l_module_name);
264: --
265: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
266: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
267: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
261: --
262: IF l_debug_on THEN
263: wsh_debug_sv.push(l_module_name);
264: --
265: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
266: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
267: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
268: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
269: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
262: IF l_debug_on THEN
263: wsh_debug_sv.push(l_module_name);
264: --
265: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
266: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
267: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
268: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
269: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
270: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
263: wsh_debug_sv.push(l_module_name);
264: --
265: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
266: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
267: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
268: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
269: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
270: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
271: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
264: --
265: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
266: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
267: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
268: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
269: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
270: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
271: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
272: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
265: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
266: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
267: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
268: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
269: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
270: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
271: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
272: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
273: END IF;
266: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
267: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
268: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
269: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
270: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
271: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
272: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
273: END IF;
274:
267: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
268: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
269: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
270: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
271: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
272: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
273: END IF;
274:
275: --
268: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
269: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
270: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
271: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
272: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
273: END IF;
274:
275: --
276: l_adjust_planned_del_tab.delete;
343: -- l_delivery_id := p_delivery_id;
344: END IF;
345:
346: IF l_debug_on THEN
347: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DLVB_COMMON_ACTIONS.ASSIGN_DETAILS', wsh_debug_sv.c_proc_level);
348: END IF;
349:
350: --
351:
352: /* Patchset I : Harmonization Project Begin
353: Instead of the old call to Assign_Multiple_Details
354: We now have call to wsh_dlvb_common_actions.assign_details */
355: IF l_debug_on THEN
356: wsh_debug_sv.logmsg(l_module_name, ' befor assign_details');
357: END IF;
358: wsh_dlvb_common_actions.assign_details(
359: p_detail_tab => l_tabofdeldets,
360: p_parent_detail_id => NULL,
381: -- deliveryMerge, collect the delivery ids for adjust_planned_flag call
382:
383: l_adjust_planned_del_tab(l_adjust_planned_del_tab.count+1) := p_delivery_id;
384: IF l_debug_on THEN
385: wsh_debug_sv.logmsg(l_module_name, ' added delivery '||p_delivery_id ||' for adjustment');
386: END IF;
387:
388: ELSE
389: /* no delivery id is passed for action assign */
391: END IF;
392: ELSE
393: /* unassign */
394: IF l_debug_on THEN
395: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_UNASSIGN_FROM_DELIVERY', wsh_debug_sv.c_proc_level);
396: END IF;
397:
398: wsh_details_validations.check_unassign_from_delivery(
399: p_detail_rows => l_tabofdeldets,
404: x_num_warnings => l_number_of_warnings,
405: x_num_errors => l_number_of_errors);
406:
407: IF l_debug_on THEN
408: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DLVB_COMMON_ACTIONS.UNASSIGN_DETAILS', wsh_debug_sv.c_proc_level);
409: END IF;
410:
411: /* Patchset I : Harmonization Project Begin
412: Instead of the old call to WSH_DELIVERY_DETAILS_ACTIONS.Unassign_Multiple_Details We now have call to wsh_dlvb_common_actions.unassign_details */
463: p_call_lcss => 'Y',
464: x_return_status => l_return_status);
465:
466: IF l_debug_on THEN
467: WSH_DEBUG_SV.log(l_module_name,'Adjust_Planned_Flag returns ',l_return_status);
468: END IF;
469:
470: wsh_util_core.api_post_call(
471: p_return_status => l_return_status,
475: END IF;
476:
477: IF l_number_of_warnings > 0 THEN
478: IF l_debug_on THEN
479: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
480: END IF;
481:
482: RAISE wsh_util_core.g_exc_warning;
483: END IF;
492: COMMIT WORK;
493: END IF;
494:
495: IF l_debug_on THEN
496: wsh_debug_sv.pop(l_module_name);
497: END IF;
498: --
499: EXCEPTION
500: WHEN fnd_api.g_exc_error THEN
506: p_encoded => fnd_api.g_false);
507:
508: --
509: IF l_debug_on THEN
510: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
511: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
512: END IF;
513: --
514: WHEN fnd_api.g_exc_unexpected_error THEN
507:
508: --
509: IF l_debug_on THEN
510: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
511: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
512: END IF;
513: --
514: WHEN fnd_api.g_exc_unexpected_error THEN
515: ROLLBACK TO detail_to_delivery_grp;
518: p_encoded => fnd_api.g_false);
519:
520: --
521: IF l_debug_on THEN
522: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
523: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
524: END IF;
525: --
526: WHEN wsh_util_core.g_exc_warning THEN
519:
520: --
521: IF l_debug_on THEN
522: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
523: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
524: END IF;
525: --
526: WHEN wsh_util_core.g_exc_warning THEN
527: x_return_status := wsh_util_core.g_ret_sts_warning;
529: p_encoded => fnd_api.g_false);
530:
531: --
532: IF l_debug_on THEN
533: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
534: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
535: END IF;
536:
537: WHEN wsh_invalid_action THEN
530:
531: --
532: IF l_debug_on THEN
533: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
534: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
535: END IF;
536:
537: WHEN wsh_invalid_action THEN
538: ROLLBACK TO detail_to_delivery_grp;
542: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
543: p_encoded => fnd_api.g_false);
544:
545: IF l_debug_on THEN
546: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_ACTION exception has occured.', wsh_debug_sv.c_excep_level);
547: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_ACTION');
548: END IF;
549:
550: WHEN wsh_no_del_det_tbl THEN
543: p_encoded => fnd_api.g_false);
544:
545: IF l_debug_on THEN
546: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_ACTION exception has occured.', wsh_debug_sv.c_excep_level);
547: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_ACTION');
548: END IF;
549:
550: WHEN wsh_no_del_det_tbl THEN
551: ROLLBACK TO detail_to_delivery_grp;
555: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
556: p_encoded => fnd_api.g_false);
557:
558: IF l_debug_on THEN
559: wsh_debug_sv.logmsg(l_module_name, 'WSH_NO_DEL_DET_TBL exception has occured.', wsh_debug_sv.c_excep_level);
560: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_NO_DEL_DET_TBL');
561: END IF;
562: --
563: WHEN wsh_no_delivery_id THEN
556: p_encoded => fnd_api.g_false);
557:
558: IF l_debug_on THEN
559: wsh_debug_sv.logmsg(l_module_name, 'WSH_NO_DEL_DET_TBL exception has occured.', wsh_debug_sv.c_excep_level);
560: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_NO_DEL_DET_TBL');
561: END IF;
562: --
563: WHEN wsh_no_delivery_id THEN
564: ROLLBACK TO detail_to_delivery_grp;
568: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
569: p_encoded => fnd_api.g_false);
570:
571: IF l_debug_on THEN
572: wsh_debug_sv.logmsg(l_module_name, 'WSH_NO_DELIVERY_ID exception has occured.', wsh_debug_sv.c_excep_level);
573: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_NO_DELIVERY_ID');
574: END IF;
575: --
576:
569: p_encoded => fnd_api.g_false);
570:
571: IF l_debug_on THEN
572: wsh_debug_sv.logmsg(l_module_name, 'WSH_NO_DELIVERY_ID exception has occured.', wsh_debug_sv.c_excep_level);
573: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_NO_DELIVERY_ID');
574: END IF;
575: --
576:
577: /*Start of 2777869*/
585: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
586: p_encoded => fnd_api.g_false);
587:
588: IF l_debug_on THEN
589: wsh_debug_sv.logmsg(l_module_name, 'WSH_NO_DELIVERY exception has occured.', wsh_debug_sv.c_excep_level);
590: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_NO_DELIVERY');
591: END IF;
592: --
593: WHEN wsh_invalid_delivery_id THEN
586: p_encoded => fnd_api.g_false);
587:
588: IF l_debug_on THEN
589: wsh_debug_sv.logmsg(l_module_name, 'WSH_NO_DELIVERY exception has occured.', wsh_debug_sv.c_excep_level);
590: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_NO_DELIVERY');
591: END IF;
592: --
593: WHEN wsh_invalid_delivery_id THEN
594: ROLLBACK TO detail_to_delivery_grp;
599: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
600: p_encoded => fnd_api.g_false);
601:
602: IF l_debug_on THEN
603: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_DELIVERY_ID exception has occured.', wsh_debug_sv.c_excep_level);
604: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_DELIVERY_ID');
605: END IF;
606:
607: /* End of 2777869*/
600: p_encoded => fnd_api.g_false);
601:
602: IF l_debug_on THEN
603: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_DELIVERY_ID exception has occured.', wsh_debug_sv.c_excep_level);
604: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_DELIVERY_ID');
605: END IF;
606:
607: /* End of 2777869*/
608: --
614: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
615: p_encoded => fnd_api.g_false);
616:
617: IF l_debug_on THEN
618: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is ' || SQLERRM, wsh_debug_sv.c_unexpec_err_level);
619: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
620: END IF;
621: --
622: END detail_to_delivery;
615: p_encoded => fnd_api.g_false);
616:
617: IF l_debug_on THEN
618: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is ' || SQLERRM, wsh_debug_sv.c_unexpec_err_level);
619: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
620: END IF;
621: --
622: END detail_to_delivery;
623:
650: l_debug_on := wsh_debug_interface.g_debug;
651:
652: --
653: IF l_debug_on IS NULL THEN
654: l_debug_on := wsh_debug_sv.is_debug_enabled;
655: END IF;
656:
657:
658: -- Debug Statements
657:
658: -- Debug Statements
659: --
660: IF l_debug_on THEN
661: wsh_debug_sv.push(l_module_name);
662: --
663: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
664: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
665: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
659: --
660: IF l_debug_on THEN
661: wsh_debug_sv.push(l_module_name);
662: --
663: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
664: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
665: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
666: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
667: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
660: IF l_debug_on THEN
661: wsh_debug_sv.push(l_module_name);
662: --
663: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
664: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
665: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
666: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
667: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
668: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
661: wsh_debug_sv.push(l_module_name);
662: --
663: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
664: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
665: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
666: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
667: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
668: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
669: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
662: --
663: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
664: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
665: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
666: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
667: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
668: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
669: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
670: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
663: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
664: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
665: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
666: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
667: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
668: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
669: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
670: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
671: END IF;
664: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
665: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
666: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
667: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
668: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
669: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
670: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
671: END IF;
672:
665: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
666: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
667: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
668: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
669: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
670: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
671: END IF;
672:
673:
666: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
667: wsh_debug_sv.LOG(l_module_name, 'P_ACTION', p_action);
668: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
669: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_NAME', p_delivery_name);
670: wsh_debug_sv.LOG(l_module_name, 'P_TABOFDELDETS.COUNT', p_tabofdeldets.COUNT);
671: END IF;
672:
673:
674: IF l_debug_on THEN
671: END IF;
672:
673:
674: IF l_debug_on THEN
675: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_GRP.DETAIL_TO_DELIVERY', wsh_debug_sv.c_proc_level);
676: END IF;
677:
678: DETAIL_TO_DELIVERY
679: (
690: p_delivery_name ,
691: l_action_prms
692: );
693: IF l_debug_on THEN
694: wsh_debug_sv.pop(l_module_name);
695: END IF;
696: --
697: EXCEPTION
698:
702: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data,
703: p_encoded => fnd_api.g_false);
704:
705: IF l_debug_on THEN
706: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
707: END IF;
708: --
709: END detail_to_delivery;
710:
789: l_debug_on := wsh_debug_interface.g_debug;
790:
791: --
792: IF l_debug_on IS NULL THEN
793: l_debug_on := wsh_debug_sv.is_debug_enabled;
794: END IF;
795:
796: --
797: SAVEPOINT split_line_grp;
797: SAVEPOINT split_line_grp;
798:
799: -- Standard begin of API savepoint
800: IF l_debug_on THEN
801: wsh_debug_sv.push(l_module_name);
802: --
803: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
804: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
805: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
799: -- Standard begin of API savepoint
800: IF l_debug_on THEN
801: wsh_debug_sv.push(l_module_name);
802: --
803: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
804: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
805: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
806: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
807: wsh_debug_sv.LOG(l_module_name, 'P_FROM_DETAIL_ID', p_from_detail_id);
800: IF l_debug_on THEN
801: wsh_debug_sv.push(l_module_name);
802: --
803: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
804: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
805: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
806: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
807: wsh_debug_sv.LOG(l_module_name, 'P_FROM_DETAIL_ID', p_from_detail_id);
808: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
801: wsh_debug_sv.push(l_module_name);
802: --
803: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
804: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
805: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
806: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
807: wsh_debug_sv.LOG(l_module_name, 'P_FROM_DETAIL_ID', p_from_detail_id);
808: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
809: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY2', x_split_quantity2);
802: --
803: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
804: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
805: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
806: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
807: wsh_debug_sv.LOG(l_module_name, 'P_FROM_DETAIL_ID', p_from_detail_id);
808: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
809: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY2', x_split_quantity2);
810: END IF;
803: wsh_debug_sv.LOG(l_module_name, 'P_API_VERSION', p_api_version);
804: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
805: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
806: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
807: wsh_debug_sv.LOG(l_module_name, 'P_FROM_DETAIL_ID', p_from_detail_id);
808: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
809: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY2', x_split_quantity2);
810: END IF;
811:
804: wsh_debug_sv.LOG(l_module_name, 'P_INIT_MSG_LIST', p_init_msg_list);
805: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
806: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
807: wsh_debug_sv.LOG(l_module_name, 'P_FROM_DETAIL_ID', p_from_detail_id);
808: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
809: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY2', x_split_quantity2);
810: END IF;
811:
812: --
805: wsh_debug_sv.LOG(l_module_name, 'P_COMMIT', p_commit);
806: wsh_debug_sv.LOG(l_module_name, 'P_VALIDATION_LEVEL', p_validation_level);
807: wsh_debug_sv.LOG(l_module_name, 'P_FROM_DETAIL_ID', p_from_detail_id);
808: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
809: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY2', x_split_quantity2);
810: END IF;
811:
812: --
813:
880: -- HW Harmonization project. Added p_organization_id
881: -- HW OPMCONV - Removed branching
882:
883: IF l_debug_on THEN
884: wsh_debug_sv.LOG(l_module_name, 'Inv item id', l_inv_item_id);
885: wsh_debug_sv.LOG(l_module_name, 'Org id', l_organization_id);
886: wsh_debug_sv.LOG(l_module_name, 'Req qty uom', l_requested_quantity_uom);
887: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_DECIMAL_QUANTITY', wsh_debug_sv.c_proc_level);
888: END IF;
881: -- HW OPMCONV - Removed branching
882:
883: IF l_debug_on THEN
884: wsh_debug_sv.LOG(l_module_name, 'Inv item id', l_inv_item_id);
885: wsh_debug_sv.LOG(l_module_name, 'Org id', l_organization_id);
886: wsh_debug_sv.LOG(l_module_name, 'Req qty uom', l_requested_quantity_uom);
887: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_DECIMAL_QUANTITY', wsh_debug_sv.c_proc_level);
888: END IF;
889:
882:
883: IF l_debug_on THEN
884: wsh_debug_sv.LOG(l_module_name, 'Inv item id', l_inv_item_id);
885: wsh_debug_sv.LOG(l_module_name, 'Org id', l_organization_id);
886: wsh_debug_sv.LOG(l_module_name, 'Req qty uom', l_requested_quantity_uom);
887: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_DECIMAL_QUANTITY', wsh_debug_sv.c_proc_level);
888: END IF;
889:
890: wsh_details_validations.check_decimal_quantity(
883: IF l_debug_on THEN
884: wsh_debug_sv.LOG(l_module_name, 'Inv item id', l_inv_item_id);
885: wsh_debug_sv.LOG(l_module_name, 'Org id', l_organization_id);
886: wsh_debug_sv.LOG(l_module_name, 'Req qty uom', l_requested_quantity_uom);
887: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_DECIMAL_QUANTITY', wsh_debug_sv.c_proc_level);
888: END IF;
889:
890: wsh_details_validations.check_decimal_quantity(
891: p_item_id => l_inv_item_id,
897: p_top_model_line_id => l_top_model_line_id -- bug 3524851
898: );
899:
900: IF l_debug_on THEN
901: wsh_debug_sv.LOG(l_module_name, 'Return Status after check decimal', l_return_status);
902: wsh_debug_sv.LOG(l_module_name, 'Output qty after check decimal', l_output_quantity);
903: END IF;
904:
905: -- UT Bug fix 2650839
898: );
899:
900: IF l_debug_on THEN
901: wsh_debug_sv.LOG(l_module_name, 'Return Status after check decimal', l_return_status);
902: wsh_debug_sv.LOG(l_module_name, 'Output qty after check decimal', l_output_quantity);
903: END IF;
904:
905: -- UT Bug fix 2650839
906: --IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
915:
916: END IF;
917:
918: IF l_debug_on THEN
919: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS', wsh_debug_sv.c_proc_level);
920: END IF;
921:
922: --
923: -- HW added p_converted_flag
936: x_num_errors => l_number_of_errors);
937:
938: IF l_number_of_warnings > 0 THEN
939: IF l_debug_on THEN
940: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
941: END IF;
942:
943: RAISE wsh_util_core.g_exc_warning;
944: END IF;
948: p_data => x_msg_data,
949: p_encoded => fnd_api.g_false);
950:
951: IF l_debug_on THEN
952: wsh_debug_sv.LOG(l_module_name, 'X_NEW_DETAIL_ID', x_new_detail_id);
953: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
954: wsh_debug_sv.pop(l_module_name);
955: END IF;
956: --
949: p_encoded => fnd_api.g_false);
950:
951: IF l_debug_on THEN
952: wsh_debug_sv.LOG(l_module_name, 'X_NEW_DETAIL_ID', x_new_detail_id);
953: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
954: wsh_debug_sv.pop(l_module_name);
955: END IF;
956: --
957: EXCEPTION
950:
951: IF l_debug_on THEN
952: wsh_debug_sv.LOG(l_module_name, 'X_NEW_DETAIL_ID', x_new_detail_id);
953: wsh_debug_sv.LOG(l_module_name, 'X_SPLIT_QUANTITY', x_split_quantity);
954: wsh_debug_sv.pop(l_module_name);
955: END IF;
956: --
957: EXCEPTION
958: WHEN fnd_api.g_exc_error THEN
964: p_encoded => fnd_api.g_false);
965:
966: --
967: IF l_debug_on THEN
968: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
969: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
970: END IF;
971: --
972: WHEN fnd_api.g_exc_unexpected_error THEN
965:
966: --
967: IF l_debug_on THEN
968: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
969: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
970: END IF;
971: --
972: WHEN fnd_api.g_exc_unexpected_error THEN
973: ROLLBACK TO split_line_grp;
978: p_encoded => fnd_api.g_false);
979:
980: --
981: IF l_debug_on THEN
982: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
983: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
984: END IF;
985: --
986: WHEN wsh_util_core.g_exc_warning THEN
979:
980: --
981: IF l_debug_on THEN
982: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
983: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
984: END IF;
985: --
986: WHEN wsh_util_core.g_exc_warning THEN
987: x_return_status := wsh_util_core.g_ret_sts_warning;
991: p_encoded => fnd_api.g_false);
992:
993: --
994: IF l_debug_on THEN
995: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
996: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
997: END IF;
998: WHEN wsh_inalid_detail_id THEN
999: ROLLBACK TO split_line_grp;
992:
993: --
994: IF l_debug_on THEN
995: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
996: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
997: END IF;
998: WHEN wsh_inalid_detail_id THEN
999: ROLLBACK TO split_line_grp;
1000: x_return_status := wsh_util_core.g_ret_sts_error;
1011: p_data => x_msg_data,
1012: p_encoded => fnd_api.g_false);
1013:
1014: IF l_debug_on THEN
1015: wsh_debug_sv.logmsg(l_module_name, 'WSH_INALID_DETAIL_ID exception has occured.', wsh_debug_sv.c_excep_level);
1016: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INALID_DETAIL_ID');
1017: END IF;
1018: --
1019: WHEN wsh_invalid_split_qty THEN
1012: p_encoded => fnd_api.g_false);
1013:
1014: IF l_debug_on THEN
1015: wsh_debug_sv.logmsg(l_module_name, 'WSH_INALID_DETAIL_ID exception has occured.', wsh_debug_sv.c_excep_level);
1016: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INALID_DETAIL_ID');
1017: END IF;
1018: --
1019: WHEN wsh_invalid_split_qty THEN
1020: ROLLBACK TO split_line_grp;
1027: p_data => x_msg_data,
1028: p_encoded => fnd_api.g_false);
1029:
1030: IF l_debug_on THEN
1031: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_SPLIT_QTY exception has occured.', wsh_debug_sv.c_excep_level);
1032: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_SPLIT_QTY');
1033: END IF;
1034: --
1035: WHEN wsh_invalid_split_qty2 THEN /* OPM changes. NC - Added */
1028: p_encoded => fnd_api.g_false);
1029:
1030: IF l_debug_on THEN
1031: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_SPLIT_QTY exception has occured.', wsh_debug_sv.c_excep_level);
1032: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_SPLIT_QTY');
1033: END IF;
1034: --
1035: WHEN wsh_invalid_split_qty2 THEN /* OPM changes. NC - Added */
1036: ROLLBACK TO split_line_grp;
1043: p_data => x_msg_data,
1044: p_encoded => fnd_api.g_false);
1045:
1046: IF l_debug_on THEN
1047: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_SPLIT_QTY2 exception has occured.', wsh_debug_sv.c_excep_level);
1048: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_SPLIT_QTY2');
1049: END IF;
1050: --
1051: WHEN OTHERS THEN
1044: p_encoded => fnd_api.g_false);
1045:
1046: IF l_debug_on THEN
1047: wsh_debug_sv.logmsg(l_module_name, 'WSH_INVALID_SPLIT_QTY2 exception has occured.', wsh_debug_sv.c_excep_level);
1048: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_INVALID_SPLIT_QTY2');
1049: END IF;
1050: --
1051: WHEN OTHERS THEN
1052: ROLLBACK TO split_line_grp;
1059: p_data => x_msg_data,
1060: p_encoded => fnd_api.g_false);
1061: --
1062: IF l_debug_on THEN
1063: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is ' || SQLERRM, wsh_debug_sv.c_unexpec_err_level);
1064: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
1065: END IF;
1066: --
1067: END split_line;
1060: p_encoded => fnd_api.g_false);
1061: --
1062: IF l_debug_on THEN
1063: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is ' || SQLERRM, wsh_debug_sv.c_unexpec_err_level);
1064: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
1065: END IF;
1066: --
1067: END split_line;
1068:
1153: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1154: --
1155: IF l_debug_on IS NULL
1156: THEN
1157: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1158: END IF;
1159: --
1160: SAVEPOINT UPDATE_SHIPPING_ATTR_GRP;
1161: --
1161: --
1162: -- Debug Statements
1163: --
1164: IF l_debug_on THEN
1165: WSH_DEBUG_SV.push(l_module_name);
1166: --
1167: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1168: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1169: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1163: --
1164: IF l_debug_on THEN
1165: WSH_DEBUG_SV.push(l_module_name);
1166: --
1167: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1168: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1169: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1170: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1171: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
1164: IF l_debug_on THEN
1165: WSH_DEBUG_SV.push(l_module_name);
1166: --
1167: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1168: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1169: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1170: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1171: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
1172: WSH_DEBUG_SV.log(l_module_name,'Table Count',p_changed_attributes.COUNT);
1165: WSH_DEBUG_SV.push(l_module_name);
1166: --
1167: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1168: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1169: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1170: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1171: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
1172: WSH_DEBUG_SV.log(l_module_name,'Table Count',p_changed_attributes.COUNT);
1173:
1166: --
1167: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1168: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1169: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1170: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1171: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
1172: WSH_DEBUG_SV.log(l_module_name,'Table Count',p_changed_attributes.COUNT);
1173:
1174: END IF;
1167: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1168: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1169: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1170: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1171: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
1172: WSH_DEBUG_SV.log(l_module_name,'Table Count',p_changed_attributes.COUNT);
1173:
1174: END IF;
1175: --
1168: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1169: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1170: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1171: WSH_DEBUG_SV.log(l_module_name,'P_CONTAINER_FLAG',P_CONTAINER_FLAG);
1172: WSH_DEBUG_SV.log(l_module_name,'Table Count',p_changed_attributes.COUNT);
1173:
1174: END IF;
1175: --
1176: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1369: l_index := p_changed_attributes.NEXT(l_index);
1370: END LOOP;
1371:
1372: IF l_debug_on THEN
1373: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTERFACE_GRP.CREATE_UPDATE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
1374: END IF;
1375:
1376: wsh_interface_grp.Create_Update_Delivery_Detail
1377: (
1386: x_OUT_rec => l_detail_out_rec
1387: );
1388:
1389: IF l_debug_on THEN
1390: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
1391: END IF;
1392: --
1393: wsh_util_core.api_post_call(
1394: p_return_status => l_return_status,
1412: --
1413: -- Debug Statements
1414: --
1415: IF l_debug_on THEN
1416: WSH_DEBUG_SV.pop(l_module_name);
1417: END IF;
1418: --
1419: EXCEPTION
1420: WHEN mark_reprice_error then
1430: --
1431: -- Debug Statements
1432: --
1433: IF l_debug_on THEN
1434: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1435: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
1436: END IF;
1437: --
1438: WHEN invalid_source_code THEN
1431: -- Debug Statements
1432: --
1433: IF l_debug_on THEN
1434: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1435: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
1436: END IF;
1437: --
1438: WHEN invalid_source_code THEN
1439: ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
1448: --
1449: -- Debug Statements
1450: --
1451: IF l_debug_on THEN
1452: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_SOURCE_CODE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1453: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_SOURCE_CODE');
1454: END IF;
1455: --
1456: WHEN update_failed THEN
1449: -- Debug Statements
1450: --
1451: IF l_debug_on THEN
1452: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_SOURCE_CODE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1453: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_SOURCE_CODE');
1454: END IF;
1455: --
1456: WHEN update_failed THEN
1457: ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
1468: );
1469:
1470: -- Bug fix 2154602
1471: IF l_debug_on THEN
1472: WSH_DEBUG_SV.logmsg(l_module_name,'UPDATE_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1473: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:UPDATE_FAILED');
1474: END IF;
1475: --
1476: WHEN invalid_released_status THEN
1469:
1470: -- Bug fix 2154602
1471: IF l_debug_on THEN
1472: WSH_DEBUG_SV.logmsg(l_module_name,'UPDATE_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1473: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:UPDATE_FAILED');
1474: END IF;
1475: --
1476: WHEN invalid_released_status THEN
1477: ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
1484: );
1485: -- End of Bug fix 2154602
1486:
1487: IF l_debug_on THEN
1488: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_RELEASED_STATUS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1489: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_RELEASED_STATUS');
1490: END IF;
1491: --
1492: WHEN Others THEN
1485: -- End of Bug fix 2154602
1486:
1487: IF l_debug_on THEN
1488: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_RELEASED_STATUS exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1489: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_RELEASED_STATUS');
1490: END IF;
1491: --
1492: WHEN Others THEN
1493: IF get_org%isopen THEN
1502: p_data => x_msg_data,
1503: p_encoded => FND_API.G_FALSE
1504: );
1505: IF l_debug_on THEN
1506: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1507: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1508: END IF;
1509: --
1510: END Update_Shipping_Attributes;
1503: p_encoded => FND_API.G_FALSE
1504: );
1505: IF l_debug_on THEN
1506: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1507: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1508: END IF;
1509: --
1510: END Update_Shipping_Attributes;
1511:
1542: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1543: --
1544: IF l_debug_on IS NULL
1545: THEN
1546: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1547: END IF;
1548: --
1549: IF l_debug_on THEN
1550: WSH_DEBUG_SV.push(l_module_name);
1546: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1547: END IF;
1548: --
1549: IF l_debug_on THEN
1550: WSH_DEBUG_SV.push(l_module_name);
1551: --
1552: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1553: END IF;
1554: --
1548: --
1549: IF l_debug_on THEN
1550: WSH_DEBUG_SV.push(l_module_name);
1551: --
1552: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1553: END IF;
1554: --
1555: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1556:
1586: x_msg_data := l_msg_summary;
1587: end if;
1588: */
1589: IF l_debug_on THEN
1590: WSH_DEBUG_SV.log(l_module_name,'X_LINE_STATUS',x_line_status);
1591: WSH_DEBUG_SV.pop(l_module_name);
1592: END IF;
1593: --
1594: END get_detail_status;
1587: end if;
1588: */
1589: IF l_debug_on THEN
1590: WSH_DEBUG_SV.log(l_module_name,'X_LINE_STATUS',x_line_status);
1591: WSH_DEBUG_SV.pop(l_module_name);
1592: END IF;
1593: --
1594: END get_detail_status;
1595:
1646: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1647: --
1648: IF l_debug_on IS NULL
1649: THEN
1650: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1651: END IF;
1652: --
1653: SAVEPOINT AUTOCREATE_DEL_GRP;
1654:
1653: SAVEPOINT AUTOCREATE_DEL_GRP;
1654:
1655: -- Standard begin of API savepoint
1656: IF l_debug_on THEN
1657: WSH_DEBUG_SV.push(l_module_name);
1658: --
1659: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1660: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1661: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1655: -- Standard begin of API savepoint
1656: IF l_debug_on THEN
1657: WSH_DEBUG_SV.push(l_module_name);
1658: --
1659: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1660: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1661: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1662: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
1663: END IF;
1656: IF l_debug_on THEN
1657: WSH_DEBUG_SV.push(l_module_name);
1658: --
1659: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1660: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1661: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1662: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
1663: END IF;
1664: --
1657: WSH_DEBUG_SV.push(l_module_name);
1658: --
1659: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1660: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1661: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1662: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
1663: END IF;
1664: --
1665:
1658: --
1659: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
1660: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
1661: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
1662: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
1663: END IF;
1664: --
1665:
1666: IF NOT FND_API.compatible_api_call(
1677: END IF;
1678: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1679:
1680: IF l_debug_on THEN
1681: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DEL_ACROSS_ORGS',WSH_DEBUG_SV.C_PROC_LEVEL);
1682: END IF;
1683: --
1684: wsh_delivery_autocreate.autocreate_del_across_orgs(
1685: p_line_rows => p_line_rows,
1701: );
1702:
1703: IF l_number_of_warnings > 0 THEN
1704: IF l_debug_on THEN
1705: wsh_debug_sv.log(l_module_name,'Number of warnings', l_number_of_warnings);
1706: END IF;
1707: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
1708: END IF;
1709:
1713: -- Start code for Bugfix 4070732
1714: --
1715: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1716: IF l_debug_on THEN
1717: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1718: END IF;
1719: l_reset_flags := FALSE;
1720:
1721: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
1721: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
1722: x_return_status => l_return_status);
1723:
1724: IF l_debug_on THEN
1725: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1726: END IF;
1727:
1728: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
1729: RAISE FND_API.G_EXC_ERROR;
1750:
1751: IF FND_API.TO_BOOLEAN(p_commit) THEN
1752:
1753: IF l_debug_on THEN
1754: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1755: END IF;
1756:
1757: WSH_UTIL_CORE.reset_stops_for_load_tender(p_reset_flags => TRUE,
1758: x_return_status => l_return_status);
1759:
1760: ELSE
1761:
1762: IF l_debug_on THEN
1763: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1764: END IF;
1765:
1766: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
1767: x_return_status => l_return_status);
1767: x_return_status => l_return_status);
1768: END IF;
1769:
1770: IF l_debug_on THEN
1771: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1772: END IF;
1773:
1774: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1775: x_return_status := l_return_status;
1796: );
1797:
1798:
1799: IF l_debug_on THEN
1800: WSH_DEBUG_SV.log(l_module_name,'X_DEL_ROWS.COUNT',x_del_rows.count);
1801: WSH_DEBUG_SV.pop(l_module_name);
1802: END IF;
1803: --
1804: EXCEPTION
1797:
1798:
1799: IF l_debug_on THEN
1800: WSH_DEBUG_SV.log(l_module_name,'X_DEL_ROWS.COUNT',x_del_rows.count);
1801: WSH_DEBUG_SV.pop(l_module_name);
1802: END IF;
1803: --
1804: EXCEPTION
1805: WHEN FND_API.G_EXC_ERROR THEN
1813: --{
1814: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1815: --{
1816: IF l_debug_on THEN
1817: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1818: END IF;
1819:
1820: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1821: x_return_status => l_return_status);
1820: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1821: x_return_status => l_return_status);
1822:
1823: IF l_debug_on THEN
1824: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1825: END IF;
1826:
1827: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1828: x_return_status := l_return_status;
1842: );
1843:
1844:
1845: IF l_debug_on THEN
1846: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1847: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1848: END IF;
1849: --
1850:
1843:
1844:
1845: IF l_debug_on THEN
1846: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1847: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1848: END IF;
1849: --
1850:
1851: WHEN autocreate_delivery_failed THEN
1860: --{
1861: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1862: --{
1863: IF l_debug_on THEN
1864: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1865: END IF;
1866:
1867: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1868: x_return_status => l_return_status);
1867: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1868: x_return_status => l_return_status);
1869:
1870: IF l_debug_on THEN
1871: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1872: END IF;
1873:
1874: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1875: x_return_status := l_return_status;
1890: );
1891:
1892:
1893: IF l_debug_on THEN
1894: WSH_DEBUG_SV.logmsg(l_module_name,'AUTOCREATE_DELIVERY_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1895: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:AUTOCREATE_DELIVERY_FAILED');
1896: END IF;
1897:
1898: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1891:
1892:
1893: IF l_debug_on THEN
1894: WSH_DEBUG_SV.logmsg(l_module_name,'AUTOCREATE_DELIVERY_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1895: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:AUTOCREATE_DELIVERY_FAILED');
1896: END IF;
1897:
1898: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
1899: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
1910: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
1911: x_return_status => l_return_status);
1912:
1913: IF l_debug_on THEN
1914: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1915: END IF;
1916:
1917: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1918: x_return_status := l_return_status;
1938: );
1939:
1940:
1941: IF l_debug_on THEN
1942: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1943: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1944: END IF;
1945: --
1946: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1939:
1940:
1941: IF l_debug_on THEN
1942: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1943: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
1944: END IF;
1945: --
1946: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1947: ROLLBACK TO AUTOCREATE_DEL_GRP;
1951: --
1952: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
1953: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1954: IF l_debug_on THEN
1955: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1956: END IF;
1957:
1958: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1959: x_return_status => l_return_status);
1959: x_return_status => l_return_status);
1960:
1961:
1962: IF l_debug_on THEN
1963: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
1964: END IF;
1965:
1966: END IF;
1967: END IF;
1975: p_encoded => FND_API.G_FALSE
1976: );
1977: --
1978: IF l_debug_on THEN
1979: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1980: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1981: END IF;
1982: --
1983: WHEN OTHERS THEN
1976: );
1977: --
1978: IF l_debug_on THEN
1979: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1980: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1981: END IF;
1982: --
1983: WHEN OTHERS THEN
1984: ROLLBACK TO AUTOCREATE_DEL_GRP;
1990: --
1991: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
1992: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
1993: IF l_debug_on THEN
1994: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
1995: END IF;
1996:
1997: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
1998: x_return_status => l_return_status);
1998: x_return_status => l_return_status);
1999:
2000:
2001: IF l_debug_on THEN
2002: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
2003: END IF;
2004:
2005: END IF;
2006: END IF;
2014: p_encoded => FND_API.G_FALSE
2015: );
2016: --
2017: IF l_debug_on THEN
2018: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2019: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2020: END IF;
2021: --
2022: END Autocreate_Deliveries;
2015: );
2016: --
2017: IF l_debug_on THEN
2018: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2019: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2020: END IF;
2021: --
2022: END Autocreate_Deliveries;
2023:
2054: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2055: --
2056: IF l_debug_on IS NULL
2057: THEN
2058: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2059: END IF;
2060: --
2061: SAVEPOINT AUTOCREATE_TRIP_GRP;
2062: -- Standard begin of API savepoint
2061: SAVEPOINT AUTOCREATE_TRIP_GRP;
2062: -- Standard begin of API savepoint
2063:
2064: IF l_debug_on THEN
2065: WSH_DEBUG_SV.push(l_module_name);
2066: --
2067: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2068: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2069: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2063:
2064: IF l_debug_on THEN
2065: WSH_DEBUG_SV.push(l_module_name);
2066: --
2067: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2068: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2069: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2070: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
2071: END IF;
2064: IF l_debug_on THEN
2065: WSH_DEBUG_SV.push(l_module_name);
2066: --
2067: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2068: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2069: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2070: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
2071: END IF;
2072: --
2065: WSH_DEBUG_SV.push(l_module_name);
2066: --
2067: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2068: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2069: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2070: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
2071: END IF;
2072: --
2073:
2066: --
2067: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2068: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2069: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2070: WSH_DEBUG_SV.log(l_module_name,'P_LINE_ROWS.COUNT',P_LINE_ROWS.COUNT);
2071: END IF;
2072: --
2073:
2074: IF NOT FND_API.compatible_api_call(
2085: END IF;
2086: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2087:
2088: IF l_debug_on THEN
2089: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.AUTOCREATE_DEL_TRIP',WSH_DEBUG_SV.C_PROC_LEVEL);
2090: END IF;
2091: --
2092: WSH_TRIPS_ACTIONS.autocreate_del_trip(
2093: p_line_rows => p_line_rows,
2105:
2106:
2107: IF l_number_of_warnings > 0 THEN
2108: IF l_debug_on THEN
2109: wsh_debug_sv.log(l_module_name,'Number of warnings', l_number_of_warnings);
2110: END IF;
2111: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
2112: END IF;
2113:
2123: COMMIT WORK;
2124: END IF;
2125:
2126: IF l_debug_on THEN
2127: WSH_DEBUG_SV.log(l_module_name,'X_DEL_ROWS.COUNT',x_del_rows.count);
2128: WSH_DEBUG_SV.log(l_module_name, 'X trip rows.count', x_trip_rows.count);
2129: WSH_DEBUG_SV.pop(l_module_name);
2130: END IF;
2131: --
2124: END IF;
2125:
2126: IF l_debug_on THEN
2127: WSH_DEBUG_SV.log(l_module_name,'X_DEL_ROWS.COUNT',x_del_rows.count);
2128: WSH_DEBUG_SV.log(l_module_name, 'X trip rows.count', x_trip_rows.count);
2129: WSH_DEBUG_SV.pop(l_module_name);
2130: END IF;
2131: --
2132: EXCEPTION
2125:
2126: IF l_debug_on THEN
2127: WSH_DEBUG_SV.log(l_module_name,'X_DEL_ROWS.COUNT',x_del_rows.count);
2128: WSH_DEBUG_SV.log(l_module_name, 'X trip rows.count', x_trip_rows.count);
2129: WSH_DEBUG_SV.pop(l_module_name);
2130: END IF;
2131: --
2132: EXCEPTION
2133: WHEN FND_API.G_EXC_ERROR THEN
2140: p_encoded => FND_API.G_FALSE
2141: );
2142:
2143: IF l_debug_on THEN
2144: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2145: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2146: END IF;
2147: --
2148: WHEN autocreate_trip_failed THEN
2141: );
2142:
2143: IF l_debug_on THEN
2144: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2145: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2146: END IF;
2147: --
2148: WHEN autocreate_trip_failed THEN
2149: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2155: p_data => x_msg_data,
2156: p_encoded => FND_API.G_FALSE
2157: );
2158: IF l_debug_on THEN
2159: WSH_DEBUG_SV.logmsg(l_module_name,'AUTOCREATE_TRIP_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2160: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:AUTOCREATE_TRIP_FAILED');
2161: END IF;
2162: --
2163: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2156: p_encoded => FND_API.G_FALSE
2157: );
2158: IF l_debug_on THEN
2159: WSH_DEBUG_SV.logmsg(l_module_name,'AUTOCREATE_TRIP_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2160: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:AUTOCREATE_TRIP_FAILED');
2161: END IF;
2162: --
2163: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
2164: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2169: p_encoded => FND_API.G_FALSE
2170: );
2171: --
2172: IF l_debug_on THEN
2173: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2174: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2175: END IF;
2176: --
2177: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2170: );
2171: --
2172: IF l_debug_on THEN
2173: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2174: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
2175: END IF;
2176: --
2177: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2178: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2185: );
2186: --
2187:
2188: IF l_debug_on THEN
2189: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2190: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2191: END IF;
2192: --
2193: WHEN OTHERS THEN
2186: --
2187:
2188: IF l_debug_on THEN
2189: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2190: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2191: END IF;
2192: --
2193: WHEN OTHERS THEN
2194: ROLLBACK TO AUTOCREATE_TRIP_GRP;
2202: p_encoded => FND_API.G_FALSE
2203: );
2204: --
2205: IF l_debug_on THEN
2206: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2207: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2208: END IF;
2209:
2210: --
2203: );
2204: --
2205: IF l_debug_on THEN
2206: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2207: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2208: END IF;
2209:
2210: --
2211: END Autocreate_del_trip;
2485: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2486: --
2487: IF l_debug_on IS NULL
2488: THEN
2489: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2490: END IF;
2491: --
2492: SAVEPOINT DELIVERY_DETAIL_ACTION_GRP;
2493:
2500: --
2501: -- Debug Statements
2502: --
2503: IF l_debug_on THEN
2504: WSH_DEBUG_SV.push(l_module_name);
2505: --
2506: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2507: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2508: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2502: --
2503: IF l_debug_on THEN
2504: WSH_DEBUG_SV.push(l_module_name);
2505: --
2506: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2507: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2508: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2509: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_action_prms.caller);
2510: WSH_DEBUG_SV.log(l_module_name, 'Phase', p_action_prms.phase);
2503: IF l_debug_on THEN
2504: WSH_DEBUG_SV.push(l_module_name);
2505: --
2506: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2507: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2508: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2509: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_action_prms.caller);
2510: WSH_DEBUG_SV.log(l_module_name, 'Phase', p_action_prms.phase);
2511: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_action_prms.action_code);
2504: WSH_DEBUG_SV.push(l_module_name);
2505: --
2506: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2507: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2508: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2509: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_action_prms.caller);
2510: WSH_DEBUG_SV.log(l_module_name, 'Phase', p_action_prms.phase);
2511: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_action_prms.action_code);
2512: WSH_DEBUG_SV.log(l_module_name, 'Input Table count', p_rec_attr_tab.count);
2505: --
2506: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2507: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2508: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2509: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_action_prms.caller);
2510: WSH_DEBUG_SV.log(l_module_name, 'Phase', p_action_prms.phase);
2511: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_action_prms.action_code);
2512: WSH_DEBUG_SV.log(l_module_name, 'Input Table count', p_rec_attr_tab.count);
2513: END IF;
2506: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
2507: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2508: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2509: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_action_prms.caller);
2510: WSH_DEBUG_SV.log(l_module_name, 'Phase', p_action_prms.phase);
2511: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_action_prms.action_code);
2512: WSH_DEBUG_SV.log(l_module_name, 'Input Table count', p_rec_attr_tab.count);
2513: END IF;
2514: --
2507: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2508: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2509: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_action_prms.caller);
2510: WSH_DEBUG_SV.log(l_module_name, 'Phase', p_action_prms.phase);
2511: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_action_prms.action_code);
2512: WSH_DEBUG_SV.log(l_module_name, 'Input Table count', p_rec_attr_tab.count);
2513: END IF;
2514: --
2515: -- Initialize message list if p_init_msg_list is set to TRUE.
2508: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
2509: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_action_prms.caller);
2510: WSH_DEBUG_SV.log(l_module_name, 'Phase', p_action_prms.phase);
2511: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_action_prms.action_code);
2512: WSH_DEBUG_SV.log(l_module_name, 'Input Table count', p_rec_attr_tab.count);
2513: END IF;
2514: --
2515: -- Initialize message list if p_init_msg_list is set to TRUE.
2516: --
2536: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
2537: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CALLER');
2538: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2539: IF l_debug_on THEN
2540: wsh_debug_sv.logmsg(l_module_name,'Null Caller');
2541: END IF;
2542: RAISE FND_API.G_EXC_ERROR;
2543: ELSIF(p_action_prms.action_code IS NULL) THEN
2544: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
2544: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
2545: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'ACTION_CODE');
2546: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2547: IF l_debug_on THEN
2548: wsh_debug_sv.logmsg(l_module_name,'WSH_INVALID_ACTION_CODE');
2549: END IF;
2550: RAISE FND_API.G_EXC_ERROR;
2551: END IF;
2552:
2551: END IF;
2552:
2553: IF(p_rec_attr_tab.count = 0) THEN
2554: IF l_debug_on THEN
2555: wsh_debug_sv.logmsg(l_module_name,'Table count zero');
2556: END IF;
2557: RAISE FND_API.G_EXC_ERROR;
2558: END IF;
2559: --
2645: --
2646: --
2647: -- Set validation level
2648: IF l_debug_on THEN
2649: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ACTIONS_LEVELS.SET_VALIDATION_LEVEL',WSH_DEBUG_SV.C_PROC_LEVEL);
2650: WSH_DEBUG_SV.log(l_module_name,'l_action_code',l_action_code);
2651: END IF;
2652: --
2653: wsh_actions_levels.set_validation_level(
2646: --
2647: -- Set validation level
2648: IF l_debug_on THEN
2649: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ACTIONS_LEVELS.SET_VALIDATION_LEVEL',WSH_DEBUG_SV.C_PROC_LEVEL);
2650: WSH_DEBUG_SV.log(l_module_name,'l_action_code',l_action_code);
2651: END IF;
2652: --
2653: wsh_actions_levels.set_validation_level(
2654: p_entity => 'DLVB',
2659: );
2660:
2661: --
2662: IF l_debug_on THEN
2663: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
2664: END IF;
2665: --
2666: wsh_util_core.api_post_call(
2667: p_return_status => l_return_status,
2707: -- Call Is_Action_Enabled API depending on validation level
2708: IF l_validation_level_tab(wsh_actions_levels.C_ACTION_ENABLED_LVL) = 1 THEN
2709: --
2710: IF l_debug_on THEN
2711: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.IS_ACTION_ENABLED',WSH_DEBUG_SV.C_PROC_LEVEL);
2712: END IF;
2713: --
2714: WSH_DETAILS_VALIDATIONS.Is_Action_Enabled(
2715: p_del_detail_rec_tab => l_detail_rec_tab,
2722: x_valid_index_tab => l_valid_index_tab
2723: );
2724:
2725: IF l_debug_on THEN
2726: wsh_debug_sv.log(l_module_name,'Is_Action_Enabled returns',
2727: l_return_status);
2728: END IF;
2729: --
2730: wsh_util_core.api_post_call(
2743: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2744: END IF;
2745: --
2746: IF l_debug_on THEN
2747: wsh_debug_sv.logmsg(l_module_name, 'WSH_DISABLE_ACTION');
2748: END IF;
2749: --
2750: raise FND_API.G_EXC_ERROR;
2751: --}
2768: FND_MESSAGE.SET_NAME('WSH', 'WSH_INVALID_DELIVERY');
2769: FND_MESSAGE.SET_TOKEN('DELIVERY', p_action_prms.delivery_id);
2770: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2771: IF l_debug_on THEN
2772: wsh_debug_sv.logmsg(l_module_name, 'Delivery does not exist');
2773: END IF;
2774: RAISE FND_API.G_EXC_ERROR;
2775: END IF;
2776: CLOSE del_cur;
2778: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
2779: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'DELIVERY_ID');
2780: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2781: IF l_debug_on THEN
2782: wsh_debug_sv.logmsg(l_module_name, 'Null Delivery Id');
2783: END IF;
2784: RAISE FND_API.G_EXC_ERROR;
2785: END IF;
2786:
2799:
2800: --
2801:
2802: IF l_debug_on THEN
2803: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.IS_ACTION_ENABLED',WSH_DEBUG_SV.C_PROC_LEVEL);
2804: END IF;
2805: --
2806: wsh_delivery_validations.Is_Action_Enabled(
2807: p_dlvy_rec_tab => l_dlvy_rec_tab,
2834:
2835: -- we need to send only the valid records to lock procedure
2836: -- Build the table using the valid index output from Is_Action_Enabled
2837: IF l_debug_on THEN
2838: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.LOCK_DELIVERY_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
2839: END IF;
2840: IF NOT ( p_action_prms.caller = 'WSH_FSTRX'
2841: AND p_action_prms.action_code = 'DELETE'
2842: ) THEN --BUG 4354579
2865: IF(l_number_of_errors >0 ) THEN
2866: FND_MESSAGE.SET_NAME('WSH', 'WSH_DISABLE_ACTION');
2867: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2868: IF l_debug_on THEN
2869: wsh_debug_sv.logmsg(l_module_name, 'WSH_DISABLE_ACTION');
2870: END IF;
2871: RAISE FND_API.G_EXC_ERROR;
2872: END IF;
2873: --
2875:
2876: FND_MESSAGE.SET_NAME('WSH', 'WSH_DISABLE_ACTION_WARN');
2877: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
2878: IF l_debug_on THEN
2879: wsh_debug_sv.logmsg(l_module_name, 'WSH_DISABLE_ACTION_WARN');
2880: END IF;
2881:
2882: IF(p_action_prms.caller = 'WSH_FSTRX') THEN
2883: x_action_out_rec.selection_issue_flag := 'Y';
2883: x_action_out_rec.selection_issue_flag := 'Y';
2884: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
2885: ELSE
2886: IF l_debug_on THEN
2887: wsh_debug_sv.log(l_module_name,'Number of warnings', l_number_of_warnings);
2888: END IF;
2889: RAISE FND_API.G_EXC_ERROR;
2890: END IF;
2891: END IF;
2921: x_msg_data => l_msg_data,
2922: x_return_status => l_return_status);
2923:
2924: IF l_debug_on THEN
2925: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',l_return_status);
2926: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
2927: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
2928: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
2929: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
2922: x_return_status => l_return_status);
2923:
2924: IF l_debug_on THEN
2925: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',l_return_status);
2926: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
2927: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
2928: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
2929: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
2930: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
2923:
2924: IF l_debug_on THEN
2925: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',l_return_status);
2926: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
2927: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
2928: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
2929: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
2930: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
2931: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
2924: IF l_debug_on THEN
2925: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',l_return_status);
2926: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
2927: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
2928: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
2929: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
2930: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
2931: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
2932: END IF;
2925: wsh_debug_sv.log(l_module_name,'Return Status After Calling validate_constraint_main',l_return_status);
2926: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
2927: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
2928: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
2929: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
2930: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
2931: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
2932: END IF;
2933: --
2926: wsh_debug_sv.log(l_module_name,'validate_result After Calling validate_constraint_main',l_cc_validate_result);
2927: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
2928: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
2929: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
2930: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
2931: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
2932: END IF;
2933: --
2934:
2927: wsh_debug_sv.log(l_module_name,'msg_count After Calling validate_constraint_main',l_msg_count);
2928: wsh_debug_sv.log(l_module_name,'msg_data After Calling validate_constraint_main',l_msg_data);
2929: wsh_debug_sv.log(l_module_name,'fail_ids count After Calling validate_constraint_main',l_cc_failed_records.COUNT);
2930: wsh_debug_sv.log(l_module_name,'l_cc_line_groups.count count After Calling validate_constraint_main',l_cc_line_groups.COUNT);
2931: wsh_debug_sv.log(l_module_name,'group_info count After Calling validate_constraint_main',l_cc_group_info.COUNT);
2932: END IF;
2933: --
2934:
2935: IF l_return_status=wsh_util_core.g_ret_sts_error THEN
2936: --fix p_rec_attr_tab to have only successful records
2937: l_cc_count_success:=1;
2938:
2939: IF l_debug_on THEN
2940: wsh_debug_sv.log(l_module_name,'p_rec_attr_tab count before removing failed lines',p_rec_attr_tab.COUNT);
2941: END IF;
2942:
2943: IF l_cc_failed_records.COUNT>0 AND p_rec_attr_tab.COUNT>0 THEN
2944:
2974: IF l_id_tab_t.COUNT>0 THEN
2975: l_id_tab:=l_id_tab_t;
2976: ELSE
2977: IF l_debug_on THEN
2978: wsh_debug_sv.logmsg(l_module_name,'all lines errored in compatibility check');
2979: END IF;
2980: wsh_util_core.api_post_call(
2981: p_return_status => l_return_status,
2982: x_num_warnings => l_number_of_warnings,
2984: p_msg_data => l_msg_data);
2985: END IF;
2986:
2987: IF l_debug_on THEN
2988: wsh_debug_sv.log(l_module_name,'l_id_tab count after removing failed lines',l_id_tab.COUNT);
2989: END IF;
2990:
2991: END IF;
2992:
3075: IF(p_rec_attr_tab.count > 1) THEN
3076: FND_MESSAGE.SET_NAME('WSH','WSH_UI_MULTI_SELECTION');
3077: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3078: IF l_debug_on THEN
3079: wsh_debug_sv.logmsg(l_module_name,'WSH_UI_MULTI_SELECTION');
3080: END IF;
3081: RAISE FND_API.G_EXC_ERROR;
3082: END IF;
3083: END IF;
3082: END IF;
3083: END IF;
3084:
3085: IF l_debug_on THEN
3086: wsh_debug_sv.log(l_module_name, 'Id Tab Count', l_id_tab.count);
3087: END IF;
3088:
3089: IF p_action_prms.action_code IN('ASSIGN', 'UNASSIGN') THEN
3090:
3089: IF p_action_prms.action_code IN('ASSIGN', 'UNASSIGN') THEN
3090:
3091: IF(p_action_prms.action_code = 'ASSIGN' AND nvl(p_action_prms.phase,1) = 1) THEN
3092: IF l_debug_on THEN
3093: WSH_DEBUG_SV.log(l_module_name, 'Delivery Id', p_action_prms.delivery_id);
3094: WSH_DEBUG_SV.log(l_module_name, 'Delivery Name', p_action_prms.delivery_name);
3095: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_ASSIGN_DEL_MULTI',WSH_DEBUG_SV.C_PROC_LEVEL);
3096: END IF;
3097:
3090:
3091: IF(p_action_prms.action_code = 'ASSIGN' AND nvl(p_action_prms.phase,1) = 1) THEN
3092: IF l_debug_on THEN
3093: WSH_DEBUG_SV.log(l_module_name, 'Delivery Id', p_action_prms.delivery_id);
3094: WSH_DEBUG_SV.log(l_module_name, 'Delivery Name', p_action_prms.delivery_name);
3095: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_ASSIGN_DEL_MULTI',WSH_DEBUG_SV.C_PROC_LEVEL);
3096: END IF;
3097:
3098: wsh_details_validations.check_assign_del_multi(
3091: IF(p_action_prms.action_code = 'ASSIGN' AND nvl(p_action_prms.phase,1) = 1) THEN
3092: IF l_debug_on THEN
3093: WSH_DEBUG_SV.log(l_module_name, 'Delivery Id', p_action_prms.delivery_id);
3094: WSH_DEBUG_SV.log(l_module_name, 'Delivery Name', p_action_prms.delivery_name);
3095: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_ASSIGN_DEL_MULTI',WSH_DEBUG_SV.C_PROC_LEVEL);
3096: END IF;
3097:
3098: wsh_details_validations.check_assign_del_multi(
3099: p_detail_rows => l_id_tab,
3100: x_del_params => l_detail_group_params,
3101: x_return_status => l_return_status);
3102:
3103: IF l_debug_on THEN
3104: WSH_DEBUG_SV.log(l_module_name, 'return status after calling check_assign_del_multi', l_return_status);
3105: WSH_DEBUG_SV.log(l_module_name, 'group id', l_detail_group_params.group_id);
3106: END IF;
3107: wsh_util_core.api_post_call(
3108: p_return_status => l_return_status,
3101: x_return_status => l_return_status);
3102:
3103: IF l_debug_on THEN
3104: WSH_DEBUG_SV.log(l_module_name, 'return status after calling check_assign_del_multi', l_return_status);
3105: WSH_DEBUG_SV.log(l_module_name, 'group id', l_detail_group_params.group_id);
3106: END IF;
3107: wsh_util_core.api_post_call(
3108: p_return_status => l_return_status,
3109: x_num_warnings => l_number_of_warnings,
3150: l_index := l_id_tab.NEXT(l_index);
3151: END LOOP;
3152: --
3153: IF l_debug_on THEN
3154: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_GRP.DETAIL_TO_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
3155: END IF;
3156: --
3157: WSH_DELIVERY_DETAILS_GRP.detail_to_delivery(
3158: p_api_version => l_api_version,
3179:
3180: IF (l_return_status in (WSH_UTIL_CORE.G_RET_STS_SUCCESS, WSH_UTIL_CORE.G_RET_STS_WARNING)
3181: AND p_action_prms.action_code = 'ASSIGN' ) THEN
3182: IF l_debug_on THEN
3183: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.ASSIGN_DELIVERY_UPDATE',WSH_DEBUG_SV.C_PROC_LEVEL);
3184: END IF;
3185:
3186: wsh_new_delivery_actions.assign_delivery_update(
3187: p_delivery_id => p_action_prms.delivery_id,
3208: IF(nvl(p_action_prms.split_quantity,0) =0) THEN
3209: FND_MESSAGE.SET_NAME('WSH', 'WSH_NO_ZERO_NUM');
3210: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3211: IF l_debug_on THEN
3212: wsh_debug_sv.logmsg(l_module_name,'Zero or Null split quantity');
3213: END IF;
3214: RAISE FND_API.G_EXC_ERROR;
3215: END IF;
3216:
3215: END IF;
3216:
3217: --
3218: IF l_debug_on THEN
3219: wsh_debug_sv.log(l_module_name, 'Split Quantity', p_action_prms.split_quantity);
3220: END IF;
3221:
3222: l_split_quantity := p_action_prms.split_quantity;
3223: l_split_quantity2 := p_action_prms.split_quantity2;
3238: AND l_requested_quantity_uom2 <> FND_API.G_MISS_CHAR) THEN
3239:
3240: --{
3241: IF l_debug_on THEN
3242: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.validate_secondary_quantity',WSH_DEBUG_SV.C_PROC_LEVEL);
3243: END IF;
3244: --
3245: -- J-IB-NPARIKH-{
3246: --
3284:
3285: -- HW Harmonization project forOPM. Added p_manual_split parameter
3286: -- HW added p_converted_flag
3287: IF l_debug_on THEN
3288: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_GRP.SPLIT_LINE',WSH_DEBUG_SV.C_PROC_LEVEL);
3289: END IF;
3290: WSH_DELIVERY_DETAILS_GRP.split_line(
3291: p_api_version => l_api_version,
3292: p_init_msg_list => FND_API.G_FALSE,
3316: --
3317: ELSIF p_action_prms.action_code = 'AUTOCREATE-DEL' THEN
3318: --
3319: IF l_debug_on THEN
3320: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_GRP.AUTOCREATE_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
3321: END IF;
3322: --
3323: --Compatibility Changes
3324: IF wsh_util_core.fte_is_installed = 'Y' AND l_cc_line_groups.COUNT>0 THEN
3352: END IF;
3353: END LOOP;
3354:
3355: IF l_debug_on THEN
3356: wsh_debug_sv.log(l_module_name,'id_tab_temp count ',l_id_tab_temp.COUNT);
3357: END IF;
3358:
3359: WSH_DELIVERY_DETAILS_GRP.Autocreate_Deliveries(
3360: p_api_version_number => l_api_version,
3381: END LOOP;
3382: END IF;
3383:
3384: IF l_debug_on THEN
3385: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3386: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3387: wsh_debug_sv.log(l_module_name,'x_action_out_rec.delivery_id_tab.COUNT ',x_action_out_rec.delivery_id_tab.COUNT);
3388: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',l_return_status);
3389: END IF;
3382: END IF;
3383:
3384: IF l_debug_on THEN
3385: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3386: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3387: wsh_debug_sv.log(l_module_name,'x_action_out_rec.delivery_id_tab.COUNT ',x_action_out_rec.delivery_id_tab.COUNT);
3388: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',l_return_status);
3389: END IF;
3390:
3383:
3384: IF l_debug_on THEN
3385: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3386: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3387: wsh_debug_sv.log(l_module_name,'x_action_out_rec.delivery_id_tab.COUNT ',x_action_out_rec.delivery_id_tab.COUNT);
3388: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',l_return_status);
3389: END IF;
3390:
3391: IF l_cc_upd_dlvy_intmed_ship_to='N' OR l_cc_upd_dlvy_ship_method='N' THEN
3384: IF l_debug_on THEN
3385: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_intmed_ship_to ',l_cc_upd_dlvy_intmed_ship_to);
3386: wsh_debug_sv.log(l_module_name,'l_cc_upd_dlvy_ship_method ',l_cc_upd_dlvy_ship_method);
3387: wsh_debug_sv.log(l_module_name,'x_action_out_rec.delivery_id_tab.COUNT ',x_action_out_rec.delivery_id_tab.COUNT);
3388: wsh_debug_sv.log(l_module_name,'l_return_status after calling autocreate_del in comp ',l_return_status);
3389: END IF;
3390:
3391: IF l_cc_upd_dlvy_intmed_ship_to='N' OR l_cc_upd_dlvy_ship_method='N' THEN
3392: IF x_action_out_rec.delivery_id_tab.COUNT>0 THEN
3441: l_return_status:=l_cc_return_status;
3442: x_action_out_rec.delivery_id_tab:=l_cc_del_rows;
3443:
3444: IF l_debug_on THEN
3445: 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);
3446: END IF;
3447:
3448: ELSE
3449:
3463: --Compatibility Changes
3464:
3465: --
3466: IF l_debug_on THEN
3467: wsh_debug_sv.log(l_module_name,'Return Status After Calling Autocreate_Deliveries',l_return_status);
3468: END IF;
3469:
3470: --
3471: wsh_util_core.api_post_call(
3492: --
3493: ELSIF p_action_prms.action_code = 'AUTOCREATE-TRIP' THEN
3494: --
3495: IF l_debug_on THEN
3496: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_GRP.AUTOCREATE_DEL_TRIP',WSH_DEBUG_SV.C_PROC_LEVEL);
3497: END IF;
3498: --
3499: WSH_DELIVERY_DETAILS_GRP.Autocreate_del_trip(
3500: p_api_version_number => l_api_version,
3522: p_action_code => p_action_prms.action_code,
3523: x_return_status => l_return_status);
3524: --
3525: IF l_debug_on THEN
3526: wsh_debug_sv.log(l_module_name,'Return Status After Calling change_ignoreplan_status ',l_return_status);
3527: END IF;
3528: --
3529: wsh_util_core.api_post_call(
3530: p_return_status => l_return_status,
3534:
3535: ELSIF p_action_prms.action_code = 'PICK-RELEASE' THEN
3536: --
3537: IF l_debug_on THEN
3538: wsh_debug_sv.log(l_module_name, 'Id Tab Count', l_id_tab.count);
3539: END IF;
3540:
3541: IF l_debug_on THEN
3542: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICK_LIST.LAUNCH_PICK_RELEASE',WSH_DEBUG_SV.C_PROC_LEVEL);
3538: wsh_debug_sv.log(l_module_name, 'Id Tab Count', l_id_tab.count);
3539: END IF;
3540:
3541: IF l_debug_on THEN
3542: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICK_LIST.LAUNCH_PICK_RELEASE',WSH_DEBUG_SV.C_PROC_LEVEL);
3543: END IF;
3544: --
3545:
3546: wsh_pick_list.launch_pick_release(
3562: --
3563: ELSIF p_action_prms.action_code = 'PICK-PACK-SHIP' THEN
3564: --
3565: IF l_debug_on THEN
3566: wsh_debug_sv.log(l_module_name, 'Id Tab Count', l_id_tab.count);
3567: END IF;
3568:
3569: IF l_debug_on THEN
3570: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICK_LIST.LAUNCH_PICK_RELEASE',WSH_DEBUG_SV.C_PROC_LEVEL);
3566: wsh_debug_sv.log(l_module_name, 'Id Tab Count', l_id_tab.count);
3567: END IF;
3568:
3569: IF l_debug_on THEN
3570: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICK_LIST.LAUNCH_PICK_RELEASE',WSH_DEBUG_SV.C_PROC_LEVEL);
3571: END IF;
3572: --
3573: wsh_pick_list.launch_pick_release(
3574: p_trip_ids => l_dummy_ids,
3589: --
3590: ELSIF p_action_prms.action_code = 'PICK-SHIP' THEN
3591: --
3592: IF l_debug_on THEN
3593: wsh_debug_sv.log(l_module_name, 'Id Tab Count', l_id_tab.count);
3594: END IF;
3595:
3596: IF l_debug_on THEN
3597: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICK_LIST.LAUNCH_PICK_RELEASE',WSH_DEBUG_SV.C_PROC_LEVEL);
3593: wsh_debug_sv.log(l_module_name, 'Id Tab Count', l_id_tab.count);
3594: END IF;
3595:
3596: IF l_debug_on THEN
3597: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICK_LIST.LAUNCH_PICK_RELEASE',WSH_DEBUG_SV.C_PROC_LEVEL);
3598: END IF;
3599: --
3600: wsh_pick_list.launch_pick_release(
3601: p_trip_ids => l_dummy_ids,
3632: END IF;
3633: -- End of OTM R12 : packing ECO
3634:
3635: IF l_debug_on THEN
3636: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DETAIL_WEIGHT_VOLUME',WSH_DEBUG_SV.C_PROC_LEVEL);
3637: END IF;
3638: --
3639: wsh_wv_utils.detail_weight_volume (
3640: p_detail_rows => l_id_tab ,
3663: l_delivery_flag := 'N';
3664:
3665: --
3666: IF l_debug_on THEN
3667: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_action_prms.container_name);
3668: WSH_DEBUG_SV.log(l_module_name, 'Container Instance Id', p_action_prms.container_instance_id);
3669: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_GRP.CONTAINER_ACTIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
3670: END IF;
3671:
3664:
3665: --
3666: IF l_debug_on THEN
3667: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_action_prms.container_name);
3668: WSH_DEBUG_SV.log(l_module_name, 'Container Instance Id', p_action_prms.container_instance_id);
3669: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_GRP.CONTAINER_ACTIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
3670: END IF;
3671:
3672: wsh_container_grp.Container_Actions(
3665: --
3666: IF l_debug_on THEN
3667: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_action_prms.container_name);
3668: WSH_DEBUG_SV.log(l_module_name, 'Container Instance Id', p_action_prms.container_instance_id);
3669: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_GRP.CONTAINER_ACTIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
3670: END IF;
3671:
3672: wsh_container_grp.Container_Actions(
3673: p_api_version => l_api_version,
3729: p_call_lcss => 'Y',
3730: x_return_status => l_return_status);
3731:
3732: IF l_debug_on THEN
3733: WSH_DEBUG_SV.log(l_module_name,'Adjust_Planned_Flag returns ',l_return_status);
3734: END IF;
3735: END IF;
3736:
3737: wsh_util_core.api_post_call(
3747: l_entity_type := 'L';
3748:
3749: --
3750: IF l_debug_on THEN
3751: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_GRP.AUTO_PACK',WSH_DEBUG_SV.C_PROC_LEVEL);
3752: END IF;
3753: wsh_container_grp.Auto_Pack (
3754: p_api_version => l_api_version,
3755: p_init_msg_list => FND_API.G_FALSE,
3780: l_entity_type := 'L';
3781:
3782: --
3783: IF l_debug_on THEN
3784: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_GRP.AUTO_PACK',WSH_DEBUG_SV.C_PROC_LEVEL);
3785: END IF;
3786: wsh_container_grp.Auto_Pack (
3787: p_api_version => p_api_version_number,
3788: p_init_msg_list => FND_API.G_FALSE,
3841: END LOOP;
3842:
3843:
3844: IF l_debug_on THEN
3845: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_GRP.CONTAINER_ACTIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
3846: END IF;
3847: wsh_container_grp.Container_Actions(
3848: p_api_version => l_api_version,
3849: p_init_msg_list => FND_API.G_FALSE,
3877: p_call_lcss => 'Y',
3878: x_return_status => l_return_status);
3879:
3880: IF l_debug_on THEN
3881: WSH_DEBUG_SV.log(l_module_name,'Adjust_Planned_Flag returns ',l_return_status);
3882: END IF;
3883: END IF;
3884:
3885: wsh_util_core.api_post_call(
3910:
3911: IF cycle_count_cur%NOTFOUND THEN
3912: CLOSE cycle_count_cur;
3913: IF l_debug_on THEN
3914: wsh_debug_sv.logmsg(l_module_name,'Detail not found');
3915: END IF;
3916: RAISE FND_API.G_EXC_ERROR;
3917: END IF;
3918:
3922: IF l_released_status = 'Y' AND NVL(l_picked_quantity, l_requested_quantity) > NVL(l_shipped_quantity, 0) THEN
3923: NULL;
3924: ELSE
3925: IF l_debug_on THEN
3926: wsh_debug_sv.logmsg(l_module_name,'Incorrect Released status or incorrect quantities');
3927: END IF;
3928: fnd_message.set_name('WSH', 'WSH_CC_RSV_INSUFF');
3929: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3930: raise FND_API.G_EXC_ERROR;
3965: x_defaults.quantity_to_cc := nvl(l_picked_quantity, l_requested_quantity) - nvl(l_shipped_quantity,0);
3966: x_defaults.quantity2_to_cc := nvl(l_picked_quantity2, l_requested_quantity2) - nvl(l_shipped_quantity2,0);
3967:
3968: IF l_debug_on THEN
3969: wsh_debug_sv.log(l_module_name, 'Default cc qty', x_defaults.quantity_to_cc);
3970: END IF;
3971: --
3972: --Change made during Bugfix 4070732
3973: --Raise end of api so that handling of return status, reset flags are done there
3981: IF (( p_action_prms.quantity_to_split > (NVL(l_picked_quantity, l_requested_quantity) - nvl(l_shipped_quantity,0)))
3982: OR p_action_prms.quantity_to_split <= 0) THEN
3983:
3984: IF l_debug_on THEN
3985: wsh_debug_sv.logmsg(l_module_name,'Incorrect quantities');
3986: END IF;
3987: FND_MESSAGE.SET_NAME('WSH', 'WSH_DET_SPLIT_EXCEED');
3988: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
3989: raise FND_API.G_EXC_ERROR;
4003: l_bo_qtys2(1) := p_action_prms.quantity2_to_split - l_overpick_qtys2(1);
4004: l_sources(1) := l_source_code; --RTV BO Cons Changes
4005:
4006: IF l_debug_on THEN
4007: wsh_debug_sv.log(l_module_name, 'Overpick Qty' , l_overpick_qtys(1));
4008: wsh_debug_sv.log(l_module_name, 'BO qty', l_bo_qtys(1));
4009: END IF;
4010:
4011:
4004: l_sources(1) := l_source_code; --RTV BO Cons Changes
4005:
4006: IF l_debug_on THEN
4007: wsh_debug_sv.log(l_module_name, 'Overpick Qty' , l_overpick_qtys(1));
4008: wsh_debug_sv.log(l_module_name, 'BO qty', l_bo_qtys(1));
4009: END IF;
4010:
4011:
4012: IF l_validation_level_tab(wsh_actions_levels.C_DECIMAL_QUANTITY_LVL)= 1 THEN
4026:
4027: -- this needs to be called only for Discrete Org
4028: --
4029: IF l_debug_on THEN
4030: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_DECIMAL_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
4031: END IF;
4032: --
4033: WSH_DETAILS_VALIDATIONS.check_decimal_quantity(
4034: p_item_id => l_inv_item_id,
4038: x_output_quantity => l_output_quantity,
4039: x_return_status => l_return_status);
4040:
4041: IF l_debug_on THEN
4042: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
4043: END IF;
4044: --
4045:
4046: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
4051: END IF;
4052:
4053:
4054: IF l_debug_on THEN
4055: wsh_debug_sv.log(l_module_name, 'BO rows count', l_id_tab.count);
4056: wsh_debug_sv.log(l_module_name, 'BO qtys count', l_bo_qtys.count);
4057: wsh_debug_sv.log(l_module_name, 'Req qtys count', l_req_qtys.count);
4058: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIP_CONFIRM_ACTIONS2.BACKORDER',WSH_DEBUG_SV.C_PROC_LEVEL);
4059: END IF;
4052:
4053:
4054: IF l_debug_on THEN
4055: wsh_debug_sv.log(l_module_name, 'BO rows count', l_id_tab.count);
4056: wsh_debug_sv.log(l_module_name, 'BO qtys count', l_bo_qtys.count);
4057: wsh_debug_sv.log(l_module_name, 'Req qtys count', l_req_qtys.count);
4058: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIP_CONFIRM_ACTIONS2.BACKORDER',WSH_DEBUG_SV.C_PROC_LEVEL);
4059: END IF;
4060: --
4053:
4054: IF l_debug_on THEN
4055: wsh_debug_sv.log(l_module_name, 'BO rows count', l_id_tab.count);
4056: wsh_debug_sv.log(l_module_name, 'BO qtys count', l_bo_qtys.count);
4057: wsh_debug_sv.log(l_module_name, 'Req qtys count', l_req_qtys.count);
4058: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIP_CONFIRM_ACTIONS2.BACKORDER',WSH_DEBUG_SV.C_PROC_LEVEL);
4059: END IF;
4060: --
4061: wsh_ship_confirm_actions2.Backorder(
4054: IF l_debug_on THEN
4055: wsh_debug_sv.log(l_module_name, 'BO rows count', l_id_tab.count);
4056: wsh_debug_sv.log(l_module_name, 'BO qtys count', l_bo_qtys.count);
4057: wsh_debug_sv.log(l_module_name, 'Req qtys count', l_req_qtys.count);
4058: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIP_CONFIRM_ACTIONS2.BACKORDER',WSH_DEBUG_SV.C_PROC_LEVEL);
4059: END IF;
4060: --
4061: wsh_ship_confirm_actions2.Backorder(
4062: p_detail_ids => l_id_tab,
4081: p_msg_data => l_msg_data
4082: );
4083:
4084: IF l_debug_on THEN
4085: WSH_DEBUG_SV.log(l_module_name, 'Backorder Result tab count', x_action_out_rec.result_id_tab.count);
4086: END IF;
4087:
4088: --
4089: -- Consolidation of BO Delivery details project
4090: --
4091: -- Debug Statements
4092: --
4093: IF l_debug_on THEN
4094: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIPPING_PARAMS_PVT.Get_Global_Parameters',WSH_DEBUG_SV.C_PROC_LEVEL);
4095: END IF;
4096: --
4097: WSH_SHIPPING_PARAMS_PVT.Get_Global_Parameters(l_global_param_rec, l_return_status);
4098:
4130: ELSIF p_action_prms.action_code = 'DELETE' THEN
4131: --{
4132: IF l_debug_on THEN
4133: --{
4134: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Delete',WSH_DEBUG_SV.C_PROC_LEVEL);
4135: --}
4136: END IF;
4137: --
4138: WSH_UTIL_CORE.Delete(
4141: x_return_status => l_return_status);
4142: --
4143: IF l_debug_on THEN
4144: --{
4145: wsh_debug_sv.log(l_module_name,'Return Status After Calling Delete',l_return_status);
4146: --}
4147: END IF;
4148: --
4149: wsh_util_core.api_post_call(
4158: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_ACTION_CODE');
4159: FND_MESSAGE.SET_TOKEN('ACT_CODE',p_action_prms.action_code );
4160: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
4161: IF l_debug_on THEN
4162: wsh_debug_sv.logmsg(l_module_name,'WSH_INVALID_ACTION_CODE');
4163: END IF;
4164: RAISE FND_API.G_EXC_ERROR;
4165: --
4166: END IF;
4171: BEGIN
4172: --{
4173: --
4174: IF l_debug_on THEN
4175: wsh_debug_sv.log(l_module_name, 'l_check_dcp', l_check_dcp);
4176: wsh_debug_sv.log(l_module_name, 'g_call_dcp_check', WSH_DCP_PVT.G_CALL_DCP_CHECK);
4177: END IF;
4178: --
4179: IF NVL(l_check_dcp, -99) IN (1,2)
4172: --{
4173: --
4174: IF l_debug_on THEN
4175: wsh_debug_sv.log(l_module_name, 'l_check_dcp', l_check_dcp);
4176: wsh_debug_sv.log(l_module_name, 'g_call_dcp_check', WSH_DCP_PVT.G_CALL_DCP_CHECK);
4177: END IF;
4178: --
4179: IF NVL(l_check_dcp, -99) IN (1,2)
4180: AND NVL(WSH_DCP_PVT.G_CALL_DCP_CHECK, 'Y') = 'Y'
4183: IF p_action_prms.action_code IN ('SPLIT-LINE', 'CYCLE-COUNT', 'PACK', 'AUTO-PACK')
4184: THEN
4185: --{
4186: IF l_debug_on THEN
4187: WSH_DEBUG_SV.LOGMSG(L_MODULE_NAME, 'CALLING DCP ');
4188: END IF;
4189:
4190: wsh_dcp_pvt.check_detail(
4191: p_action_code => p_action_prms.action_code,
4196: END IF;
4197: EXCEPTION
4198: WHEN wsh_dcp_pvt.data_inconsistency_exception THEN
4199: if NOT l_debug_on OR l_debug_on is null then
4200: l_debug_on := wsh_debug_sv.is_debug_enabled;
4201: end if;
4202: IF l_debug_on THEN
4203: WSH_DEBUG_SV.logmsg(l_module_name,'data_inconsistency_exception');
4204: END IF;
4199: if NOT l_debug_on OR l_debug_on is null then
4200: l_debug_on := wsh_debug_sv.is_debug_enabled;
4201: end if;
4202: IF l_debug_on THEN
4203: WSH_DEBUG_SV.logmsg(l_module_name,'data_inconsistency_exception');
4204: END IF;
4205: ROLLBACK TO DELIVERY_DETAIL_ACTION_GRP;
4206: GOTO api_start;
4207: WHEN OTHERS THEN
4205: ROLLBACK TO DELIVERY_DETAIL_ACTION_GRP;
4206: GOTO api_start;
4207: WHEN OTHERS THEN
4208: IF l_debug_on THEN
4209: WSH_DEBUG_SV.logmsg(l_module_name,'When Others');
4210: END IF;
4211: null;
4212: --}
4213: END;
4228: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
4229: THEN
4230: --{
4231: IF l_debug_on THEN
4232: 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);
4233: END IF;
4234:
4235: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
4236: (
4240: );
4241: --
4242: --
4243: IF l_debug_on THEN
4244: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
4245: END IF;
4246: --
4247: --
4248: WSH_UTIL_CORE.API_POST_CALL
4259: --
4260:
4261: IF l_number_of_warnings > 0 THEN
4262: IF l_debug_on THEN
4263: wsh_debug_sv.log (l_module_name,'Number of warnings', l_number_of_warnings);
4264: END IF;
4265: -- RAISE WSH_UTIL_CORE.G_EXC_WARNING;
4266: l1_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4267: ELSE
4270: --
4271: -- Standard check of p_commit.
4272: IF FND_API.To_Boolean( p_commit ) THEN
4273: IF(l_debug_on) THEN
4274: wsh_debug_sv.logmsg(l_module_name, 'Commit Work');
4275: END IF;
4276: --
4277: -- Start code for Bugfix 4070732
4278: --
4277: -- Start code for Bugfix 4070732
4278: --
4279: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4280: IF l_debug_on THEN
4281: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4282: END IF;
4283:
4284: l_reset_flags := FALSE;
4285: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
4285: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
4286: x_return_status => l_return_status);
4287:
4288: IF l_debug_on THEN
4289: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4290: END IF;
4291:
4292: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4293: l1_return_status := l_return_status;
4309: --{
4310:
4311: IF FND_API.To_Boolean( p_commit ) THEN
4312: IF l_debug_on THEN
4313: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4314: END IF;
4315:
4316: WSH_UTIL_CORE.reset_stops_for_load_tender(p_reset_flags => TRUE,
4317: x_return_status => l_return_status);
4317: x_return_status => l_return_status);
4318:
4319: ELSE
4320: IF l_debug_on THEN
4321: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4322: END IF;
4323:
4324: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
4325: x_return_status => l_return_status);
4326:
4327: END IF;
4328:
4329: IF l_debug_on THEN
4330: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4331: END IF;
4332:
4333: IF l1_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
4334: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4357: );
4358:
4359:
4360: IF l_debug_on THEN
4361: WSH_DEBUG_SV.pop(l_module_name);
4362: END IF;
4363: --
4364: WHEN FND_API.G_EXC_ERROR THEN
4365: -- ROLLBACK TO DELIVERY_DETAIL_ACTION_GRP;
4373: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
4374: THEN
4375: --{
4376: IF l_debug_on THEN
4377: 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);
4378: END IF;
4379:
4380: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
4381: (
4385: );
4386: --
4387: --
4388: IF l_debug_on THEN
4389: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
4390: END IF;
4391: --
4392: --
4393: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4407: --{
4408: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4409: --{
4410: IF l_debug_on THEN
4411: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4412: END IF;
4413:
4414: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4415: x_return_status => l_return_status);
4414: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4415: x_return_status => l_return_status);
4416:
4417: IF l_debug_on THEN
4418: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4419: END IF;
4420:
4421: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4422: x_return_status := l_return_status;
4436: );
4437:
4438:
4439: IF l_debug_on THEN
4440: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4441: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4442: END IF;
4443: --
4444: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4437:
4438:
4439: IF l_debug_on THEN
4440: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4441: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4442: END IF;
4443: --
4444: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4445: -- ROLLBACK TO DELIVERY_DETAIL_ACTION_GRP;
4455: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
4456: THEN
4457: --{
4458: IF l_debug_on THEN
4459: 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);
4460: END IF;
4461:
4462: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
4463: (
4467: );
4468: --
4469: --
4470: IF l_debug_on THEN
4471: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
4472: END IF;
4473: --
4474: --
4475: --}
4485: --{
4486: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4487: --{
4488: IF l_debug_on THEN
4489: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4490: END IF;
4491:
4492: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4493: x_return_status => l_return_status);
4492: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4493: x_return_status => l_return_status);
4494:
4495: IF l_debug_on THEN
4496: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4497: END IF;
4498: --}
4499: END IF;
4500: --}
4510: );
4511:
4512:
4513: IF l_debug_on THEN
4514: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4515: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4516: END IF;
4517: --
4518: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4511:
4512:
4513: IF l_debug_on THEN
4514: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4515: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4516: END IF;
4517: --
4518: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4519: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4527: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
4528: THEN
4529: --{
4530: IF l_debug_on THEN
4531: 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);
4532: END IF;
4533:
4534: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
4535: (
4539: );
4540: --
4541: --
4542: IF l_debug_on THEN
4543: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
4544: END IF;
4545: --
4546: --
4547: 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
4562: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API)
4563: THEN
4564: --{
4565: IF l_debug_on THEN
4566: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4567: END IF;
4568:
4569: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
4570: x_return_status => l_return_status);
4569: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
4570: x_return_status => l_return_status);
4571:
4572: IF l_debug_on THEN
4573: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4574: END IF;
4575:
4576: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4577: x_return_status := l_return_status;
4590: p_encoded => FND_API.G_FALSE
4591: );
4592:
4593: IF l_debug_on THEN
4594: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4595: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4596: END IF;
4597: --
4598: WHEN OTHERS THEN
4591: );
4592:
4593: IF l_debug_on THEN
4594: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4595: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4596: END IF;
4597: --
4598: WHEN OTHERS THEN
4599: IF del_cur%ISOPEN THEN
4613: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
4614: THEN
4615: --{
4616: IF l_debug_on THEN
4617: 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);
4618: END IF;
4619:
4620: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
4621: (
4625: );
4626: --
4627: --
4628: IF l_debug_on THEN
4629: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
4630: END IF;
4631: --
4632: --
4633: --}
4643: --{
4644: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
4645: --{
4646: IF l_debug_on THEN
4647: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
4648: END IF;
4649:
4650: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4651: x_return_status => l_return_status);
4650: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
4651: x_return_status => l_return_status);
4652:
4653: IF l_debug_on THEN
4654: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4655: END IF;
4656: --}
4657: END IF;
4658: --}
4668: );
4669: --
4670:
4671: IF l_debug_on THEN
4672: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4673: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4674: END IF;
4675: --
4676: END Delivery_Detail_Action;
4669: --
4670:
4671: IF l_debug_on THEN
4672: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4673: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4674: END IF;
4675: --
4676: END Delivery_Detail_Action;
4677:
4751: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4752: --
4753: IF l_debug_on IS NULL
4754: THEN
4755: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4756: END IF;
4757: --
4758: SAVEPOINT CREATE_UPDATE_DEL_DETAIL_GRP;
4759: --
4759: --
4760: -- Debug Statements
4761: --
4762: IF l_debug_on THEN
4763: WSH_DEBUG_SV.push(l_module_name);
4764: --
4765: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
4766: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
4767: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
4761: --
4762: IF l_debug_on THEN
4763: WSH_DEBUG_SV.push(l_module_name);
4764: --
4765: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
4766: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
4767: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
4768: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
4769: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
4762: IF l_debug_on THEN
4763: WSH_DEBUG_SV.push(l_module_name);
4764: --
4765: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
4766: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
4767: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
4768: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
4769: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
4770: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
4763: WSH_DEBUG_SV.push(l_module_name);
4764: --
4765: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
4766: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
4767: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
4768: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
4769: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
4770: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
4771: END IF;
4764: --
4765: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
4766: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
4767: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
4768: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
4769: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
4770: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
4771: END IF;
4772: --
4765: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
4766: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
4767: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
4768: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
4769: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
4770: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
4771: END IF;
4772: --
4773:
4766: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
4767: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
4768: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
4769: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
4770: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
4771: END IF;
4772: --
4773:
4774: -- Initialize message list if p_init_msg_list is set to TRUE.
4803: x_num_errors =>l_number_of_errors);
4804:
4805: IF l_number_of_warnings > 0 THEN
4806: IF l_debug_on THEN
4807: wsh_debug_sv.log(l_module_name,'Number of warnings', l_number_of_warnings);
4808: END IF;
4809: RAISE WSH_UTIL_CORE.G_EXC_WARNING;
4810: END IF;
4811:
4812:
4813: -- Standard check of p_commit.
4814: IF FND_API.To_Boolean( p_commit ) THEN
4815: IF(l_debug_on) THEN
4816: wsh_debug_sv.logmsg(l_module_name, 'Commit Work');
4817: END IF;
4818: COMMIT WORK;
4819: END IF;
4820:
4825: p_encoded => FND_API.G_FALSE
4826: );
4827:
4828: IF l_debug_on THEN
4829: WSH_DEBUG_SV.pop(l_module_name);
4830: END IF;
4831: --
4832: EXCEPTION
4833: WHEN FND_API.G_EXC_ERROR THEN
4840: p_encoded => FND_API.G_FALSE
4841: );
4842: --
4843: IF l_debug_on THEN
4844: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4845: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4846: END IF;
4847: --
4848: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4841: );
4842: --
4843: IF l_debug_on THEN
4844: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4845: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4846: END IF;
4847: --
4848: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4849: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP;
4856: );
4857:
4858: --
4859: IF l_debug_on THEN
4860: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4861: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4862: END IF;
4863: --
4864: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4857:
4858: --
4859: IF l_debug_on THEN
4860: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4861: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4862: END IF;
4863: --
4864: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4865: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4870: p_encoded => FND_API.G_FALSE
4871: );
4872: --
4873: IF l_debug_on THEN
4874: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4875: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4876: END IF;
4877: --
4878: WHEN mark_reprice_error then
4871: );
4872: --
4873: IF l_debug_on THEN
4874: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4875: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
4876: END IF;
4877: --
4878: WHEN mark_reprice_error then
4879: FND_MESSAGE.Set_Name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
4888: --
4889:
4890: --
4891: IF l_debug_on THEN
4892: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4893: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
4894: END IF;
4895: --
4896: WHEN OTHERS THEN
4889:
4890: --
4891: IF l_debug_on THEN
4892: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4893: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
4894: END IF;
4895: --
4896: WHEN OTHERS THEN
4897: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP;
4906: );
4907: --
4908:
4909: IF l_debug_on THEN
4910: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4911: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4912: END IF;
4913: --
4914: END Create_Update_Delivery_Detail;
4907: --
4908:
4909: IF l_debug_on THEN
4910: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4911: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4912: END IF;
4913: --
4914: END Create_Update_Delivery_Detail;
4915:
4997: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4998: --
4999: IF l_debug_on IS NULL
5000: THEN
5001: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5002: END IF;
5003: --
5004: IF l_debug_on THEN
5005: WSH_DEBUG_SV.push(l_module_name);
5001: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5002: END IF;
5003: --
5004: IF l_debug_on THEN
5005: WSH_DEBUG_SV.push(l_module_name);
5006: WSH_DEBUG_SV.log(l_module_name, 'p_detail_info_tab.count',
5007: p_detail_info_tab.count);
5008: END IF;
5009:
5002: END IF;
5003: --
5004: IF l_debug_on THEN
5005: WSH_DEBUG_SV.push(l_module_name);
5006: WSH_DEBUG_SV.log(l_module_name, 'p_detail_info_tab.count',
5007: p_detail_info_tab.count);
5008: END IF;
5009:
5010: SAVEPOINT s_create_containers_DDGPB;
5017: AND ( p_detail_IN_rec.container_name IS NOT NULL) THEN
5018: l_create_one_record := TRUE;
5019: ELSIF NVL(p_detail_IN_rec.quantity,0) <=0 THEN
5020: IF l_debug_on THEN
5021: WSH_DEBUG_SV.log(l_module_name,
5022: 'Invalid quantity', p_detail_IN_rec.quantity);
5023: END IF;
5024: raise fnd_api.g_exc_error;
5025: ELSE
5067: -- wms change: Validate Item check is to be skipped if the
5068: -- Org. is WMS enabled
5069:
5070: IF l_debug_on THEN
5071: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WMS_INSTALL.CHECK_INSTALL',WSH_DEBUG_SV.C_PROC_LEVEL);
5072: END IF;
5073:
5074: l_wms_enabled := WMS_INSTALL.check_install(
5075: l_wms_return_status,
5083: x_num_errors => l_number_of_errors
5084: );
5085:
5086: IF l_debug_on THEN
5087: wsh_debug_sv.log(l_module_name, 'wms enabled',
5088: l_wms_enabled);
5089: END IF;
5090: IF (l_wms_enabled = FALSE) THEN --{
5091: IF (l_cont_item_id IS NULL
5131: IF (p_detail_IN_rec.name_suffix IS NOT NULL)
5132: AND (NVL(p_detail_IN_rec.ucc_128_suffix_flag,2) = 1)
5133: THEN
5134: IF l_debug_on THEN
5135: 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);
5136: END IF;
5137: FND_MESSAGE.SET_NAME('WSH', 'WSH_UCC128_ERROR'); --bmso new
5138: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5139: RAISE FND_API.G_EXC_ERROR;
5190: END IF;
5191:
5192:
5193: IF l_debug_on THEN
5194: wsh_debug_sv.log(l_module_name, 'l_lpn_starting_num',l_lpn_starting_num);
5195: wsh_debug_sv.log(l_module_name, 'l_wms_sequence',l_wms_sequence);
5196: wsh_debug_sv.log(l_module_name, 'l_base_number_dummy',l_base_number_dummy);
5197: END IF;
5198:
5191:
5192:
5193: IF l_debug_on THEN
5194: wsh_debug_sv.log(l_module_name, 'l_lpn_starting_num',l_lpn_starting_num);
5195: wsh_debug_sv.log(l_module_name, 'l_wms_sequence',l_wms_sequence);
5196: wsh_debug_sv.log(l_module_name, 'l_base_number_dummy',l_base_number_dummy);
5197: END IF;
5198:
5199: IF p_detail_IN_rec.num_digits IS NOT NULL THEN
5192:
5193: IF l_debug_on THEN
5194: wsh_debug_sv.log(l_module_name, 'l_lpn_starting_num',l_lpn_starting_num);
5195: wsh_debug_sv.log(l_module_name, 'l_wms_sequence',l_wms_sequence);
5196: wsh_debug_sv.log(l_module_name, 'l_base_number_dummy',l_base_number_dummy);
5197: END IF;
5198:
5199: IF p_detail_IN_rec.num_digits IS NOT NULL THEN
5200: l_total_length := NVL(length(p_detail_IN_rec.name_prefix),0)
5227: WSH_WMS_LPN_GRP.g_call_group_api := 'N';
5228: WSH_WMS_LPN_GRP.g_update_to_container := 'N';
5229:
5230: IF l_debug_on THEN
5231: wsh_debug_sv.logmsg(l_module_name, 'Calling wms_container_grp.Auto_Create_LPNs');
5232: END IF;
5233: wms_container_grp.Auto_Create_LPNs (
5234: p_api_version => 1.0
5235: , p_init_msg_list => fnd_api.g_false
5255: i := l_lpn_out_tab.FIRST;
5256: --if i null then error out bmso
5257: j := 1;
5258: IF l_debug_on THEN
5259: wsh_debug_sv.log(l_module_name, 'l_lpn_out_tab.count',l_lpn_out_tab.count);
5260: END IF;
5261: WHILE i IS NOT NULL LOOP --{
5262: l_container_info_rec.lpn_ids(j) := l_lpn_out_tab(i).lpn_id;
5263: l_container_info_rec.container_names(j) :=
5262: l_container_info_rec.lpn_ids(j) := l_lpn_out_tab(i).lpn_id;
5263: l_container_info_rec.container_names(j) :=
5264: l_lpn_out_tab(i).license_plate_number;
5265: IF l_debug_on THEN
5266: wsh_debug_sv.log(l_module_name, 'name',
5267: l_container_info_rec.container_names(j));
5268: wsh_debug_sv.log(l_module_name, 'lpn_id',
5269: l_container_info_rec.lpn_ids(j));
5270: END IF;
5264: l_lpn_out_tab(i).license_plate_number;
5265: IF l_debug_on THEN
5266: wsh_debug_sv.log(l_module_name, 'name',
5267: l_container_info_rec.container_names(j));
5268: wsh_debug_sv.log(l_module_name, 'lpn_id',
5269: l_container_info_rec.lpn_ids(j));
5270: END IF;
5271:
5272: IF l_container_info_rec.lpn_ids(j) IS NULL THEN
5342: ELSIF l_create_one_record THEN --}{
5343: --bmso
5344: IF c_wms_code_present = 'Y' THEN --{
5345: IF l_debug_on THEN
5346: wsh_debug_sv.logmsg(l_module_name, 'Calling wms_container_grp.create_lpns');
5347: END IF;
5348: l_lpn_table(1).license_plate_number :=
5349: p_detail_IN_rec.container_name;
5350: l_lpn_table(1).inventory_item_id := l_cont_item_id;
5454: (WSH_UTIL_CORE.G_RET_STS_ERROR,
5455: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ) THEN
5456: --
5457: IF l_debug_on THEN
5458: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR CREATING CONTAINER');
5459: END IF;
5460: --
5461: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
5462: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5463: RAISE FND_API.G_EXC_ERROR;
5464: END IF;
5465:
5466: IF l_debug_on THEN
5467: WSH_DEBUG_SV.log(l_module_name,'COUNT OF WDD RECORDS',
5468: l_cont_dummy_tab.count);
5469: END IF;
5470:
5471: wsh_util_core.api_post_call(
5482: x_return_status => l_return_status
5483: );
5484:
5485: IF l_debug_on THEN
5486: WSH_DEBUG_SV.log(l_module_name,'COUNT OF WDA RECORDS',
5487: l_assignment_dummy_tab.count);
5488: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
5489: END IF;
5490:
5484:
5485: IF l_debug_on THEN
5486: WSH_DEBUG_SV.log(l_module_name,'COUNT OF WDA RECORDS',
5487: l_assignment_dummy_tab.count);
5488: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
5489: END IF;
5490:
5491: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5492: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5510: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5511: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'ORGANIZATION_ID');
5512: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5513: IF l_debug_on THEN
5514: wsh_debug_sv.log(l_module_name,'ERROR organization id is null for', p_detail_info_tab(i).lpn_id);
5515: END IF;
5516:
5517: raise FND_API.G_EXC_ERROR;
5518:
5538:
5539: /*IF l_container_rec.organization_id IS NULL THEN
5540:
5541: IF l_debug_on THEN
5542: WSH_DEBUG_SV.logmsg(l_module_name,
5543: 'organization is not passed');
5544: END IF;
5545: RAISE FND_API.G_EXC_ERROR;
5546: END IF; */
5566: (WSH_UTIL_CORE.G_RET_STS_ERROR,
5567: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ) THEN
5568: --
5569: IF l_debug_on THEN
5570: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR CREATING CONTAINER');
5571: END IF;
5572: --
5573: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_CREATE_ERROR');
5574: WSH_UTIL_CORE.Add_Message(l_return_status,l_module_name);
5575: RAISE FND_API.G_EXC_ERROR;
5576: END IF;
5577:
5578: IF l_debug_on THEN
5579: WSH_DEBUG_SV.log(l_module_name,'COUNT OF WDD RECORDS',
5580: l_cont_dummy_tab.count);
5581: END IF;
5582:
5583: wsh_util_core.api_post_call(
5594: x_return_status => l_return_status
5595: );
5596:
5597: IF l_debug_on THEN
5598: WSH_DEBUG_SV.log(l_module_name,'COUNT OF WDA RECORDS',
5599: l_assignment_dummy_tab.count);
5600: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
5601: END IF;
5602:
5596:
5597: IF l_debug_on THEN
5598: WSH_DEBUG_SV.log(l_module_name,'COUNT OF WDA RECORDS',
5599: l_assignment_dummy_tab.count);
5600: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
5601: END IF;
5602:
5603: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
5604: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
5631: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5632: END IF;
5633:
5634: IF l_debug_on THEN
5635: WSH_DEBUG_SV.pop(l_module_name);
5636: END IF;
5637:
5638: EXCEPTION
5639: WHEN e_NO_INV_ITEM then
5642:
5643: rollback to s_create_containers_DDGPB;
5644: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5645: IF l_debug_on THEN
5646: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_NO_INV_ITEM');
5647: END IF;
5648: WHEN e_lpn_count_invalid then
5649: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5650: WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
5653: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5654: fnd_message.set_name('WSH', 'WSH_LPN_COUNT_INVALID');
5655: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status);
5656: IF l_debug_on THEN
5657: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_lpn_count_invalid');
5658: END IF;
5659: --
5660:
5661: WHEN FND_API.G_EXC_ERROR THEN
5664:
5665: rollback to s_create_containers_DDGPB;
5666: x_return_status := FND_API.G_RET_STS_ERROR ;
5667: IF l_debug_on THEN
5668: WSH_DEBUG_SV.logmsg(l_module_name,
5669: 'FND_API.G_EXC_ERROR exception has occured.',
5670: WSH_DEBUG_SV.C_EXCEP_LEVEL);
5671: WSH_DEBUG_SV.pop(l_module_name,
5672: 'EXCEPTION:FND_API.G_EXC_ERROR');
5666: x_return_status := FND_API.G_RET_STS_ERROR ;
5667: IF l_debug_on THEN
5668: WSH_DEBUG_SV.logmsg(l_module_name,
5669: 'FND_API.G_EXC_ERROR exception has occured.',
5670: WSH_DEBUG_SV.C_EXCEP_LEVEL);
5671: WSH_DEBUG_SV.pop(l_module_name,
5672: 'EXCEPTION:FND_API.G_EXC_ERROR');
5673: END IF;
5674: --
5667: IF l_debug_on THEN
5668: WSH_DEBUG_SV.logmsg(l_module_name,
5669: 'FND_API.G_EXC_ERROR exception has occured.',
5670: WSH_DEBUG_SV.C_EXCEP_LEVEL);
5671: WSH_DEBUG_SV.pop(l_module_name,
5672: 'EXCEPTION:FND_API.G_EXC_ERROR');
5673: END IF;
5674: --
5675: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5677: rollback to s_create_containers_DDGPB;
5678: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5679:
5680: IF l_debug_on THEN
5681: WSH_DEBUG_SV.logmsg(l_module_name
5682: ,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.'
5683: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5684: WSH_DEBUG_SV.pop(l_module_name
5685: ,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5679:
5680: IF l_debug_on THEN
5681: WSH_DEBUG_SV.logmsg(l_module_name
5682: ,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.'
5683: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5684: WSH_DEBUG_SV.pop(l_module_name
5685: ,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5686: END IF;
5687: --
5680: IF l_debug_on THEN
5681: WSH_DEBUG_SV.logmsg(l_module_name
5682: ,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.'
5683: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5684: WSH_DEBUG_SV.pop(l_module_name
5685: ,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5686: END IF;
5687: --
5688: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
5690: WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
5691:
5692: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5693: IF l_debug_on THEN
5694: WSH_DEBUG_SV.logmsg(l_module_name
5695: ,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured '
5696: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5697: WSH_DEBUG_SV.pop(l_module_name
5698: ,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
5692: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
5693: IF l_debug_on THEN
5694: WSH_DEBUG_SV.logmsg(l_module_name
5695: ,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured '
5696: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5697: WSH_DEBUG_SV.pop(l_module_name
5698: ,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
5699: END IF;
5700: WHEN OTHERS THEN
5693: IF l_debug_on THEN
5694: WSH_DEBUG_SV.logmsg(l_module_name
5695: ,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured '
5696: ,WSH_DEBUG_SV.C_EXCEP_LEVEL);
5697: WSH_DEBUG_SV.pop(l_module_name
5698: ,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
5699: END IF;
5700: WHEN OTHERS THEN
5701: WSH_WMS_LPN_GRP.g_call_group_api := l_orig_value;
5703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5704: wsh_util_core.add_message(x_return_status, l_module_name);
5705: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_containers');
5706: IF l_debug_on THEN
5707: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5708: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5709: END IF;
5710:
5711: END Create_containers;
5704: wsh_util_core.add_message(x_return_status, l_module_name);
5705: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_containers');
5706: IF l_debug_on THEN
5707: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5708: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5709: END IF;
5710:
5711: END Create_containers;
5712:
5772: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5773: --
5774: IF l_debug_on IS NULL
5775: THEN
5776: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5777: END IF;
5778: --
5779: SAVEPOINT CREATE_DEL_DETAIL_GRP;
5780:
5778: --
5779: SAVEPOINT CREATE_DEL_DETAIL_GRP;
5780:
5781: IF l_debug_on THEN
5782: WSH_DEBUG_SV.push(l_module_name);
5783: WSH_DEBUG_SV.log(l_module_name, 'container_item_id',p_detail_IN_rec.container_item_id);
5784: WSH_DEBUG_SV.log(l_module_name, 'container_item_name',p_detail_IN_rec.container_item_name);
5785: WSH_DEBUG_SV.log(l_module_name, 'organization_id', p_detail_IN_rec.organization_id);
5786: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5779: SAVEPOINT CREATE_DEL_DETAIL_GRP;
5780:
5781: IF l_debug_on THEN
5782: WSH_DEBUG_SV.push(l_module_name);
5783: WSH_DEBUG_SV.log(l_module_name, 'container_item_id',p_detail_IN_rec.container_item_id);
5784: WSH_DEBUG_SV.log(l_module_name, 'container_item_name',p_detail_IN_rec.container_item_name);
5785: WSH_DEBUG_SV.log(l_module_name, 'organization_id', p_detail_IN_rec.organization_id);
5786: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5787: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5780:
5781: IF l_debug_on THEN
5782: WSH_DEBUG_SV.push(l_module_name);
5783: WSH_DEBUG_SV.log(l_module_name, 'container_item_id',p_detail_IN_rec.container_item_id);
5784: WSH_DEBUG_SV.log(l_module_name, 'container_item_name',p_detail_IN_rec.container_item_name);
5785: WSH_DEBUG_SV.log(l_module_name, 'organization_id', p_detail_IN_rec.organization_id);
5786: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5787: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5788: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5781: IF l_debug_on THEN
5782: WSH_DEBUG_SV.push(l_module_name);
5783: WSH_DEBUG_SV.log(l_module_name, 'container_item_id',p_detail_IN_rec.container_item_id);
5784: WSH_DEBUG_SV.log(l_module_name, 'container_item_name',p_detail_IN_rec.container_item_name);
5785: WSH_DEBUG_SV.log(l_module_name, 'organization_id', p_detail_IN_rec.organization_id);
5786: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5787: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5788: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5789: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5782: WSH_DEBUG_SV.push(l_module_name);
5783: WSH_DEBUG_SV.log(l_module_name, 'container_item_id',p_detail_IN_rec.container_item_id);
5784: WSH_DEBUG_SV.log(l_module_name, 'container_item_name',p_detail_IN_rec.container_item_name);
5785: WSH_DEBUG_SV.log(l_module_name, 'organization_id', p_detail_IN_rec.organization_id);
5786: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5787: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5788: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5789: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5790: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5783: WSH_DEBUG_SV.log(l_module_name, 'container_item_id',p_detail_IN_rec.container_item_id);
5784: WSH_DEBUG_SV.log(l_module_name, 'container_item_name',p_detail_IN_rec.container_item_name);
5785: WSH_DEBUG_SV.log(l_module_name, 'organization_id', p_detail_IN_rec.organization_id);
5786: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5787: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5788: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5789: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5790: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5791: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_detail_IN_rec.quantity);
5784: WSH_DEBUG_SV.log(l_module_name, 'container_item_name',p_detail_IN_rec.container_item_name);
5785: WSH_DEBUG_SV.log(l_module_name, 'organization_id', p_detail_IN_rec.organization_id);
5786: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5787: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5788: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5789: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5790: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5791: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_detail_IN_rec.quantity);
5792: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_detail_IN_rec.container_name);
5785: WSH_DEBUG_SV.log(l_module_name, 'organization_id', p_detail_IN_rec.organization_id);
5786: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5787: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5788: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5789: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5790: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5791: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_detail_IN_rec.quantity);
5792: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_detail_IN_rec.container_name);
5793: WSH_DEBUG_SV.log(l_module_name, 'Lpn Ids Count', p_detail_In_rec.lpn_ids.count);
5786: WSH_DEBUG_SV.log(l_module_name, 'organization_code',p_detail_IN_rec.organization_code);
5787: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5788: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5789: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5790: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5791: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_detail_IN_rec.quantity);
5792: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_detail_IN_rec.container_name);
5793: WSH_DEBUG_SV.log(l_module_name, 'Lpn Ids Count', p_detail_In_rec.lpn_ids.count);
5794: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_detail_in_rec.caller);
5787: WSH_DEBUG_SV.log(l_module_name, 'name_prefix', p_detail_IN_rec.name_prefix);
5788: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5789: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5790: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5791: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_detail_IN_rec.quantity);
5792: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_detail_IN_rec.container_name);
5793: WSH_DEBUG_SV.log(l_module_name, 'Lpn Ids Count', p_detail_In_rec.lpn_ids.count);
5794: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_detail_in_rec.caller);
5795: END IF;
5788: WSH_DEBUG_SV.log(l_module_name, 'name_suffix', p_detail_IN_rec.name_suffix);
5789: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5790: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5791: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_detail_IN_rec.quantity);
5792: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_detail_IN_rec.container_name);
5793: WSH_DEBUG_SV.log(l_module_name, 'Lpn Ids Count', p_detail_In_rec.lpn_ids.count);
5794: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_detail_in_rec.caller);
5795: END IF;
5796: --
5789: WSH_DEBUG_SV.log(l_module_name, 'base number', p_detail_IN_rec.base_number);
5790: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5791: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_detail_IN_rec.quantity);
5792: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_detail_IN_rec.container_name);
5793: WSH_DEBUG_SV.log(l_module_name, 'Lpn Ids Count', p_detail_In_rec.lpn_ids.count);
5794: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_detail_in_rec.caller);
5795: END IF;
5796: --
5797:
5790: WSH_DEBUG_SV.log(l_module_name, 'Num Digits', p_detail_IN_rec.num_digits);
5791: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_detail_IN_rec.quantity);
5792: WSH_DEBUG_SV.log(l_module_name, 'Container Name', p_detail_IN_rec.container_name);
5793: WSH_DEBUG_SV.log(l_module_name, 'Lpn Ids Count', p_detail_In_rec.lpn_ids.count);
5794: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_detail_in_rec.caller);
5795: END IF;
5796: --
5797:
5798: -- Initialize API return status to success
5822: IF( p_detail_IN_rec.organization_id IS NULL and p_detail_IN_rec.organization_code IS NULL) THEN
5823: FND_MESSAGE.SET_NAME('WSH', 'WSH_CONT_ORG_NULL');
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 Organization');
5827: END IF;
5828: raise FND_API.G_EXC_ERROR;
5829: ELSIF(p_detail_IN_rec.container_item_id IS NULL
5830: AND p_detail_IN_rec.container_item_name IS NULL
5832: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
5833: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CONTAINER_ITEM');
5834: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
5835: IF l_debug_on THEN
5836: wsh_debug_sv.logmsg(l_module_name,'Null Container item');
5837: END IF;
5838:
5839: raise FND_API.G_EXC_ERROR;
5840:
5857: LOOP --{
5858: --
5859: IF(p_detail_info_tab(l_index).container_flag in ('Y', 'C')) THEN
5860: IF l_debug_on THEN
5861: wsh_debug_sv.logmsg(l_module_name,'Container Flag Yes ');
5862: END IF;
5863: RAISE FND_API.G_EXC_ERROR;
5864: END IF;
5865:
5867: -- Validate Item and see if this is container item
5868: -- Error out if this is a container item
5869:
5870: IF l_debug_on THEN
5871: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.FIND_ITEM_TYPE',WSH_DEBUG_SV.C_PROC_LEVEL);
5872: END IF;
5873:
5874: WSH_UTIL_VALIDATE.Find_Item_Type
5875: (
5879: x_return_status => l_return_status
5880: );
5881:
5882: IF l_debug_on THEN
5883: wsh_debug_sv.log(l_module_name, 'Item Type', l_item_type);
5884: END IF;
5885: --
5886: wsh_util_core.api_post_call(
5887: p_return_status => l_return_status,
5891: );
5892:
5893: IF(nvl(l_item_type, 'FND_API.G_MISS_CHAR') = 'CONT_ITEM') THEN
5894: IF l_debug_on THEN
5895: wsh_debug_sv.logmsg(l_module_name,'Container Item');
5896: END IF;
5897: RAISE FND_API.G_EXC_ERROR;
5898: END IF;
5899: END IF; --}
5899: END IF; --}
5900:
5901:
5902: IF l_debug_on THEN
5903: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.CREATE_DELIVERY_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
5904: END IF;
5905: --
5906: WSH_DELIVERY_DETAILS_PKG.create_delivery_details(
5907: p_delivery_details_info => p_detail_info_tab(l_index),
5909: x_delivery_detail_id => l_new_detail_id,
5910: x_return_status => l_return_status);
5911:
5912: IF l_debug_on THEN
5913: wsh_debug_sv.log(l_module_name, 'New Detail Created', l_new_detail_id);
5914: END IF;
5915:
5916: --
5917: wsh_util_core.api_post_call(
5933: l_delivery_assignments_info.parent_delivery_detail_id := NULL;
5934:
5935:
5936: IF l_debug_on THEN
5937: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.CREATE_DELIVERY_ASSIGNMENTS',WSH_DEBUG_SV.C_PROC_LEVEL);
5938: END IF;
5939: --
5940: WSH_DELIVERY_DETAILS_PKG.Create_Delivery_Assignments(
5941: p_delivery_assignments_info => l_delivery_assignments_info,
5962: --OTM R12, calling delivery detail splitter
5963: IF (l_gc3_is_installed = 'Y') THEN
5964:
5965: IF l_debug_on THEN
5966: WSH_DEBUG_SV.log(l_module_name,'Delivery detail number',l_index);
5967: WSH_DEBUG_SV.log(l_module_name,'Delivery detail count',l_counter);
5968: WSH_DEBUG_SV.log(l_module_name,'delivery detail id',l_new_detail_id);
5969: WSH_DEBUG_SV.log(l_module_name,'inventory item id',p_detail_info_tab(l_index).inventory_item_id);
5970: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5963: IF (l_gc3_is_installed = 'Y') THEN
5964:
5965: IF l_debug_on THEN
5966: WSH_DEBUG_SV.log(l_module_name,'Delivery detail number',l_index);
5967: WSH_DEBUG_SV.log(l_module_name,'Delivery detail count',l_counter);
5968: WSH_DEBUG_SV.log(l_module_name,'delivery detail id',l_new_detail_id);
5969: WSH_DEBUG_SV.log(l_module_name,'inventory item id',p_detail_info_tab(l_index).inventory_item_id);
5970: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5971: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5964:
5965: IF l_debug_on THEN
5966: WSH_DEBUG_SV.log(l_module_name,'Delivery detail number',l_index);
5967: WSH_DEBUG_SV.log(l_module_name,'Delivery detail count',l_counter);
5968: WSH_DEBUG_SV.log(l_module_name,'delivery detail id',l_new_detail_id);
5969: WSH_DEBUG_SV.log(l_module_name,'inventory item id',p_detail_info_tab(l_index).inventory_item_id);
5970: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5971: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5972: WSH_DEBUG_SV.log(l_module_name,'weight uom code',p_detail_info_tab(l_index).weight_uom_code);
5965: IF l_debug_on THEN
5966: WSH_DEBUG_SV.log(l_module_name,'Delivery detail number',l_index);
5967: WSH_DEBUG_SV.log(l_module_name,'Delivery detail count',l_counter);
5968: WSH_DEBUG_SV.log(l_module_name,'delivery detail id',l_new_detail_id);
5969: WSH_DEBUG_SV.log(l_module_name,'inventory item id',p_detail_info_tab(l_index).inventory_item_id);
5970: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5971: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5972: WSH_DEBUG_SV.log(l_module_name,'weight uom code',p_detail_info_tab(l_index).weight_uom_code);
5973: WSH_DEBUG_SV.log(l_module_name,'requested quantity',p_detail_info_tab(l_index).requested_quantity);
5966: WSH_DEBUG_SV.log(l_module_name,'Delivery detail number',l_index);
5967: WSH_DEBUG_SV.log(l_module_name,'Delivery detail count',l_counter);
5968: WSH_DEBUG_SV.log(l_module_name,'delivery detail id',l_new_detail_id);
5969: WSH_DEBUG_SV.log(l_module_name,'inventory item id',p_detail_info_tab(l_index).inventory_item_id);
5970: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5971: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5972: WSH_DEBUG_SV.log(l_module_name,'weight uom code',p_detail_info_tab(l_index).weight_uom_code);
5973: WSH_DEBUG_SV.log(l_module_name,'requested quantity',p_detail_info_tab(l_index).requested_quantity);
5974: WSH_DEBUG_SV.log(l_module_name,'ship from location id',p_detail_info_tab(l_index).ship_from_location_id);
5967: WSH_DEBUG_SV.log(l_module_name,'Delivery detail count',l_counter);
5968: WSH_DEBUG_SV.log(l_module_name,'delivery detail id',l_new_detail_id);
5969: WSH_DEBUG_SV.log(l_module_name,'inventory item id',p_detail_info_tab(l_index).inventory_item_id);
5970: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5971: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5972: WSH_DEBUG_SV.log(l_module_name,'weight uom code',p_detail_info_tab(l_index).weight_uom_code);
5973: WSH_DEBUG_SV.log(l_module_name,'requested quantity',p_detail_info_tab(l_index).requested_quantity);
5974: WSH_DEBUG_SV.log(l_module_name,'ship from location id',p_detail_info_tab(l_index).ship_from_location_id);
5975: WSH_DEBUG_SV.log(l_module_name,'requested quantity uom',p_detail_info_tab(l_index).requested_quantity_uom);
5968: WSH_DEBUG_SV.log(l_module_name,'delivery detail id',l_new_detail_id);
5969: WSH_DEBUG_SV.log(l_module_name,'inventory item id',p_detail_info_tab(l_index).inventory_item_id);
5970: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5971: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5972: WSH_DEBUG_SV.log(l_module_name,'weight uom code',p_detail_info_tab(l_index).weight_uom_code);
5973: WSH_DEBUG_SV.log(l_module_name,'requested quantity',p_detail_info_tab(l_index).requested_quantity);
5974: WSH_DEBUG_SV.log(l_module_name,'ship from location id',p_detail_info_tab(l_index).ship_from_location_id);
5975: WSH_DEBUG_SV.log(l_module_name,'requested quantity uom',p_detail_info_tab(l_index).requested_quantity_uom);
5976: END IF;
5969: WSH_DEBUG_SV.log(l_module_name,'inventory item id',p_detail_info_tab(l_index).inventory_item_id);
5970: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5971: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5972: WSH_DEBUG_SV.log(l_module_name,'weight uom code',p_detail_info_tab(l_index).weight_uom_code);
5973: WSH_DEBUG_SV.log(l_module_name,'requested quantity',p_detail_info_tab(l_index).requested_quantity);
5974: WSH_DEBUG_SV.log(l_module_name,'ship from location id',p_detail_info_tab(l_index).ship_from_location_id);
5975: WSH_DEBUG_SV.log(l_module_name,'requested quantity uom',p_detail_info_tab(l_index).requested_quantity_uom);
5976: END IF;
5977:
5970: WSH_DEBUG_SV.log(l_module_name,'net weight',p_detail_info_tab(l_index).net_weight);
5971: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5972: WSH_DEBUG_SV.log(l_module_name,'weight uom code',p_detail_info_tab(l_index).weight_uom_code);
5973: WSH_DEBUG_SV.log(l_module_name,'requested quantity',p_detail_info_tab(l_index).requested_quantity);
5974: WSH_DEBUG_SV.log(l_module_name,'ship from location id',p_detail_info_tab(l_index).ship_from_location_id);
5975: WSH_DEBUG_SV.log(l_module_name,'requested quantity uom',p_detail_info_tab(l_index).requested_quantity_uom);
5976: END IF;
5977:
5978: --prepare table of delivery detail information to call splitter
5971: WSH_DEBUG_SV.log(l_module_name,'organization id',p_detail_info_tab(l_index).organization_id);
5972: WSH_DEBUG_SV.log(l_module_name,'weight uom code',p_detail_info_tab(l_index).weight_uom_code);
5973: WSH_DEBUG_SV.log(l_module_name,'requested quantity',p_detail_info_tab(l_index).requested_quantity);
5974: WSH_DEBUG_SV.log(l_module_name,'ship from location id',p_detail_info_tab(l_index).ship_from_location_id);
5975: WSH_DEBUG_SV.log(l_module_name,'requested quantity uom',p_detail_info_tab(l_index).requested_quantity_uom);
5976: END IF;
5977:
5978: --prepare table of delivery detail information to call splitter
5979: l_delivery_detail_tab.EXTEND;
5999: --OTM R12, after loop call split with all the data
6000: IF (l_counter > 1) THEN
6001:
6002: IF l_debug_on THEN
6003: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_SPLITTER.tms_delivery_detail_split',WSH_DEBUG_SV.C_PROC_LEVEL);
6004: END IF;
6005:
6006: WSH_DELIVERY_DETAILS_SPLITTER.tms_delivery_detail_split(
6007: p_detail_tab => l_delivery_detail_tab,
6008: p_item_quantity_uom_tab => l_item_quantity_uom_tab,
6009: x_return_status => l_return_status);
6010:
6011: IF l_debug_on THEN
6012: WSH_DEBUG_SV.logmsg(l_module_name, 'return status from WSH_DELIVERY_DETAILS_SPLITTER.tms_delivery_detail_split: ' || l_return_status);
6013: END IF;
6014:
6015: -- we will not fail based on l_return_status here because
6016: -- we do not want to stop the flow
6017: -- if the detail doesn't split, it will be caught later in
6018: -- delivery splitting and will have exception on the detail
6019: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
6020: IF l_debug_on THEN
6021: WSH_DEBUG_SV.logmsg(l_module_name, 'Delivery detail split failed for ' || l_new_detail_id );
6022: END IF;
6023: END IF;
6024: END IF;
6025: --END OTM R12
6033:
6034: -- Debug Statements
6035: --
6036: IF l_debug_on THEN
6037: WSH_DEBUG_SV.pop(l_module_name);
6038: END IF;
6039: --
6040: EXCEPTION
6041: WHEN FND_API.G_EXC_ERROR THEN
6048: p_encoded => FND_API.G_FALSE
6049: );
6050:
6051: IF l_debug_on THEN
6052: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6053: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6054: END IF;
6055: --
6056: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6049: );
6050:
6051: IF l_debug_on THEN
6052: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6053: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6054: END IF;
6055: --
6056: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6057: ROLLBACK to CREATE_DEL_DETAIL_GRP;
6063: p_encoded => FND_API.G_FALSE
6064: );
6065:
6066: IF l_debug_on THEN
6067: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6068: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6069: END IF;
6070: --
6071: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6064: );
6065:
6066: IF l_debug_on THEN
6067: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6068: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6069: END IF;
6070: --
6071: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6072: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6077: p_encoded => FND_API.G_FALSE
6078: );
6079: --
6080: IF l_debug_on THEN
6081: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6082: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
6083: END IF;
6084: --
6085: WHEN OTHERS THEN
6078: );
6079: --
6080: IF l_debug_on THEN
6081: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6082: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
6083: END IF;
6084: --
6085: WHEN OTHERS THEN
6086:
6095: p_encoded => FND_API.G_FALSE
6096: );
6097:
6098: IF l_debug_on THEN
6099: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6100: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6101: END IF;
6102: --
6103: END Create_Delivery_Detail;
6096: );
6097:
6098: IF l_debug_on THEN
6099: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6100: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6101: END IF;
6102: --
6103: END Create_Delivery_Detail;
6104:
6273: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6274: --
6275: IF l_debug_on IS NULL
6276: THEN
6277: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6278: END IF;
6279: --
6280: SAVEPOINT VALIDATE_DEL_DETAIL_GRP;
6281:
6279: --
6280: SAVEPOINT VALIDATE_DEL_DETAIL_GRP;
6281:
6282: IF l_debug_on THEN
6283: WSH_DEBUG_SV.push(l_module_name);
6284: --
6285: WSH_DEBUG_SV.log(l_module_name,'P_ACTION',P_ACTION);
6286: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6287: END IF;
6281:
6282: IF l_debug_on THEN
6283: WSH_DEBUG_SV.push(l_module_name);
6284: --
6285: WSH_DEBUG_SV.log(l_module_name,'P_ACTION',P_ACTION);
6286: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6287: END IF;
6288: --
6289: -- Initialize API return status to success
6282: IF l_debug_on THEN
6283: WSH_DEBUG_SV.push(l_module_name);
6284: --
6285: WSH_DEBUG_SV.log(l_module_name,'P_ACTION',P_ACTION);
6286: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6287: END IF;
6288: --
6289: -- Initialize API return status to success
6290: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6309: BEGIN
6310: SAVEPOINT validate_det_loop_grp;
6311: --
6312: IF l_debug_on THEN
6313: wsh_debug_sv.log(l_module_name, 'Index', l_index);
6314: END IF;
6315: IF(p_action = 'CREATE') THEN
6316: --
6317: -- J-IB-NPARIKH-{
6409: l_required_field := 'SHIP_FROM_LOCATION_ID';
6410: raise e_required_field_null;
6411: ELSE
6412: IF l_debug_on THEN
6413: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_LOCATION',WSH_DEBUG_SV.C_PROC_LEVEL);
6414: END IF;
6415: wsh_util_validate.validate_location(
6416: p_location_id => x_detail_info_tab(l_index).ship_from_location_id,
6417: x_return_status => l_return_status,
6429: l_required_field := 'SHIP_TO_LOCATION_ID';
6430: raise e_required_field_null;
6431: ELSE
6432: IF l_debug_on THEN
6433: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_LOCATION',WSH_DEBUG_SV.C_PROC_LEVEL);
6434: END IF;
6435: wsh_util_validate.validate_location(
6436: p_location_id => x_detail_info_tab(l_index).ship_to_location_id,
6437: x_return_status => l_return_status,
6465: --
6466: IF ( nvl(x_detail_info_tab(l_index).requested_quantity,fnd_api.g_miss_num) = fnd_api.g_miss_num ) THEN
6467:
6468: IF l_debug_on THEN
6469: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
6470: END IF;
6471:
6472: x_detail_info_tab(l_index).requested_quantity := wsh_wv_utils.convert_uom(
6473: x_detail_info_tab(l_index).src_requested_quantity_uom,
6516:
6517: IF c_original_detail_cur%NOTFOUND THEN
6518: CLOSE c_original_detail_cur;
6519: IF l_debug_on THEN
6520: wsh_debug_sv.logmsg(l_module_name,'No Original Detail Record ');
6521: END IF;
6522: l_number_of_errors := l_number_of_errors + 1;
6523: FND_MESSAGE.SET_NAME('WSH', 'WSH_DET_INVALID_DETAIL');
6524: FND_MESSAGE.SET_TOKEN('DETAIL_ID', x_detail_info_tab(l_index).delivery_detail_id);
6547: x_msg_data => l_msg_data
6548: );
6549:
6550: IF l_debug_on THEN
6551: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6552: END IF;
6553: --
6554: wsh_util_core.api_post_call(
6555: p_return_status => l_return_status,
6570: x_msg_data => l_msg_data
6571: );
6572:
6573: IF l_debug_on THEN
6574: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6575: END IF;
6576: --
6577: wsh_util_core.api_post_call(
6578: p_return_status => l_return_status,
6596: p_serial_range_tab => p_serial_range_tab
6597: );
6598:
6599: IF l_debug_on THEN
6600: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6601: END IF;
6602: --
6603: wsh_util_core.api_post_call(
6604: p_return_status => l_return_status,
6617: IF l_original_detail_rec.wv_frozen_flag = 'N'
6618: THEN
6619: --
6620: IF l_debug_on THEN
6621: WSH_DEBUG_SV.logmsg(l_module_name,'Resetting Weight/Volume based on shipped quantity => ' || x_detail_info_tab(l_index).shipped_quantity ||
6622: ', original shipped quantity => ' || l_original_detail_rec.shipped_quantity );
6623: END IF;
6624: --
6625: IF l_original_detail_rec.shipped_quantity = 0
6736: OR x_detail_info_tab(l_index).cycle_count_quantity2 <> 0) )
6737: THEN
6738:
6739: IF l_debug_on THEN
6740: wsh_debug_sv.push(l_module_name);
6741: 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);
6742: 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);
6743:
6744: END IF;
6737: THEN
6738:
6739: IF l_debug_on THEN
6740: wsh_debug_sv.push(l_module_name);
6741: 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);
6742: 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);
6743:
6744: END IF;
6745:
6738:
6739: IF l_debug_on THEN
6740: wsh_debug_sv.push(l_module_name);
6741: 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);
6742: 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);
6743:
6744: END IF;
6745:
6746: WSH_DETAILS_VALIDATIONS.validate_secondary_quantity
6778: EXCEPTION -- for the local begin
6779: WHEN FND_API.G_EXC_ERROR THEN
6780: ROLLBACK TO validate_det_loop_grp;
6781: IF l_debug_on THEN
6782: wsh_debug_sv.log(l_module_name, 'Validation failure for detail', x_detail_info_tab(l_index).delivery_detail_id);
6783: END IF;
6784:
6785: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6786: ROLLBACK TO validate_det_loop_grp;
6784:
6785: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6786: ROLLBACK TO validate_det_loop_grp;
6787: IF l_debug_on THEN
6788: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error within loop');
6789: END IF;
6790: WHEN e_required_field_null THEN
6791: ROLLBACK TO validate_det_loop_grp;
6792: l_number_of_errors := l_number_of_errors + 1;
6793: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
6794: FND_MESSAGE.SET_TOKEN('FIELD_NAME', l_required_field);
6795: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
6796: IF l_debug_on THEN
6797: WSH_DEBUG_SV.logmsg(l_module_name,'E_REQUIRED_FIELD_NULL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6798: END IF;
6799: -- J-IB-NPARIKH-{
6800: WHEN e_ib_create_error THEN
6801: ROLLBACK TO validate_det_loop_grp;
6802: l_number_of_errors := l_number_of_errors + 1;
6803: FND_MESSAGE.SET_NAME('WSH', 'WSH_IB_CREATE_LINE_ERROR');
6804: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
6805: IF l_debug_on THEN
6806: WSH_DEBUG_SV.logmsg(l_module_name,'e_ib_create_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6807: END IF;
6808: -- J-IB-NPARIKH-}
6809:
6810: when uom_conversion_failed then
6811: FND_MESSAGE.SEt_NAME('WSH','UOM_CONVERSION_FAILED');
6812: WSH_UTIL_CORE.ADD_MESSAGE(wsh_util_core.g_ret_sts_error, l_module_name);
6813:
6814: IF l_debug_on THEN
6815: WSH_DEBUG_SV.logmsg(l_module_name,'UOM_CONVERSION_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6816: END IF;
6817:
6818: WHEN OTHERS THEN
6819: ROLLBACK TO validate_det_loop_grp;
6817:
6818: WHEN OTHERS THEN
6819: ROLLBACK TO validate_det_loop_grp;
6820: IF l_debug_on THEN
6821: wsh_debug_sv.logmsg(l_module_name, 'Others exception within loop');
6822: END IF;
6823: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6824: END; -- for the local begin
6825:
6854: -- anxsharm end for Load Tender
6855:
6856:
6857: IF l_debug_on THEN
6858: wsh_debug_sv.log(l_module_name, 'Number of errors', l_number_of_errors);
6859: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
6860: END IF;
6861:
6862: IF x_detail_info_tab.count > 0 THEN
6855:
6856:
6857: IF l_debug_on THEN
6858: wsh_debug_sv.log(l_module_name, 'Number of errors', l_number_of_errors);
6859: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
6860: END IF;
6861:
6862: IF x_detail_info_tab.count > 0 THEN
6863: IF l_number_of_errors >= x_detail_info_tab.count THEN
6876: p_encoded => FND_API.G_FALSE
6877: );
6878:
6879: IF l_debug_on THEN
6880: WSH_DEBUG_SV.pop(l_module_name);
6881: END IF;
6882: --
6883: EXCEPTION
6884: WHEN FND_API.G_EXC_ERROR THEN
6891: p_encoded => FND_API.G_FALSE
6892: );
6893: --
6894: IF l_debug_on THEN
6895: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6896: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6897: END IF;
6898: --
6899: --
6892: );
6893: --
6894: IF l_debug_on THEN
6895: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6896: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6897: END IF;
6898: --
6899: --
6900: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6907: p_encoded => FND_API.G_FALSE
6908: );
6909: --
6910: IF l_debug_on THEN
6911: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6912: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6913: END IF;
6914: --
6915: --
6908: );
6909: --
6910: IF l_debug_on THEN
6911: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6912: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6913: END IF;
6914: --
6915: --
6916: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6922: p_encoded => FND_API.G_FALSE
6923: );
6924: --
6925: IF l_debug_on THEN
6926: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6927: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
6928: END IF;
6929: --
6930:
6923: );
6924: --
6925: IF l_debug_on THEN
6926: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6927: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
6928: END IF;
6929: --
6930:
6931:
6943: p_encoded => FND_API.G_FALSE
6944: );
6945: --
6946: IF l_debug_on THEN
6947: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6948: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6949: END IF;
6950: --
6951: END Validate_Delivery_Detail;
6944: );
6945: --
6946: IF l_debug_on THEN
6947: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6948: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6949: END IF;
6950: --
6951: END Validate_Delivery_Detail;
6952:
7008: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7009: --
7010: IF l_debug_on IS NULL
7011: THEN
7012: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7013: END IF;
7014: --
7015: SAVEPOINT UPDATE_DEL_DETAIL_GRP;
7016: IF l_debug_on THEN
7013: END IF;
7014: --
7015: SAVEPOINT UPDATE_DEL_DETAIL_GRP;
7016: IF l_debug_on THEN
7017: WSH_DEBUG_SV.push(l_module_name);
7018: WSH_DEBUG_SV.log(l_module_name,'count of p_valid_index_tab is', p_valid_index_tab.count);
7019: WSH_DEBUG_SV.log(l_module_name,'count of p_detail_info_tab is', p_detail_info_tab.count);
7020: END IF;
7021: --
7014: --
7015: SAVEPOINT UPDATE_DEL_DETAIL_GRP;
7016: IF l_debug_on THEN
7017: WSH_DEBUG_SV.push(l_module_name);
7018: WSH_DEBUG_SV.log(l_module_name,'count of p_valid_index_tab is', p_valid_index_tab.count);
7019: WSH_DEBUG_SV.log(l_module_name,'count of p_detail_info_tab is', p_detail_info_tab.count);
7020: END IF;
7021: --
7022:
7015: SAVEPOINT UPDATE_DEL_DETAIL_GRP;
7016: IF l_debug_on THEN
7017: WSH_DEBUG_SV.push(l_module_name);
7018: WSH_DEBUG_SV.log(l_module_name,'count of p_valid_index_tab is', p_valid_index_tab.count);
7019: WSH_DEBUG_SV.log(l_module_name,'count of p_detail_info_tab is', p_detail_info_tab.count);
7020: END IF;
7021: --
7022:
7023: -- Initialize API return status to success
7027:
7028: l_index := p_valid_index_tab.FIRST;
7029:
7030: IF l_debug_on THEN
7031: WSH_DEBUG_SV.log(l_module_name,'first index of p_detail_info_tab is', l_index);
7032: END IF;
7033:
7034: WHILE l_index IS NOT NULL
7035: LOOP
7036: IF (p_caller like 'WMS%') OR (p_caller = 'WSH_USA') THEN
7037: -- Bug 3292364
7038: -- Lock the container being updated during OM changes.
7039: IF l_debug_on THEN
7040: WSH_DEBUG_SV.log(l_module_name, 'lock delivery detail '||p_detail_info_tab(l_index).delivery_detail_id);
7041: END IF;
7042:
7043: OPEN lock_delivery_details(p_detail_info_tab(l_index).delivery_detail_id);
7044: FETCH lock_delivery_details into l_delivery_detail;
7046: END IF;
7047:
7048:
7049: IF l_debug_on THEN
7050: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.UPDATE_DELIVERY_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
7051: END IF;
7052: --
7053: wsh_delivery_details_pkg.Update_Delivery_Details(
7054: p_rowid => p_detail_info_tab(l_index).rowid,
7056: x_return_status => l_return_status);
7057:
7058: --
7059: IF l_debug_on THEN
7060: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7061: END IF;
7062: --
7063: wsh_util_core.api_post_call(
7064: p_return_status => l_return_status,
7106: );
7107:
7108: --
7109: IF l_debug_on THEN
7110: WSH_DEBUG_SV.pop(l_module_name);
7111: END IF;
7112: --
7113: EXCEPTION
7114: WHEN FND_API.G_EXC_ERROR THEN
7124: );
7125: --
7126:
7127: IF l_debug_on THEN
7128: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7129: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7130: END IF;
7131: --
7132: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7125: --
7126:
7127: IF l_debug_on THEN
7128: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7129: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7130: END IF;
7131: --
7132: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7133: IF lock_delivery_details%isopen THEN
7145: );
7146: --
7147: --
7148: IF l_debug_on THEN
7149: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7150: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7151: END IF;
7152: --
7153: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
7146: --
7147: --
7148: IF l_debug_on THEN
7149: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7150: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7151: END IF;
7152: --
7153: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
7154: IF lock_delivery_details%isopen THEN
7161: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
7162: THEN
7163: --{
7164: IF l_debug_on THEN
7165: 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);
7166: END IF;
7167:
7168: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
7169: (
7173: );
7174: --
7175: --
7176: IF l_debug_on THEN
7177: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
7178: END IF;
7179: --
7180: --
7181: 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
7196: p_encoded => FND_API.G_FALSE
7197: );
7198: --
7199: IF l_debug_on THEN
7200: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7201: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
7202: END IF;
7203: --
7204: WHEN delivery_detail_locked THEN
7197: );
7198: --
7199: IF l_debug_on THEN
7200: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7201: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
7202: END IF;
7203: --
7204: WHEN delivery_detail_locked THEN
7205: IF lock_delivery_details%isopen THEN
7211: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
7212: THEN
7213: --{
7214: IF l_debug_on THEN
7215: 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);
7216: END IF;
7217:
7218: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
7219: (
7223: );
7224: --
7225: --
7226: IF l_debug_on THEN
7227: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
7228: END IF;
7229: --
7230: --
7231: 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
7242: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7243: FND_MESSAGE.Set_Name('WSH', 'WSH_NO_LOCK');
7244: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
7245: IF l_debug_on THEN
7246: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:delivery_detail_locked');
7247: END IF;
7248:
7249: WHEN OTHERS THEN
7250: IF lock_delivery_details%isopen THEN
7265: p_encoded => FND_API.G_FALSE
7266: );
7267:
7268: IF l_debug_on THEN
7269: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7270: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7271: END IF;
7272: --
7273: END Update_Delivery_Detail;
7266: );
7267:
7268: IF l_debug_on THEN
7269: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7270: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7271: END IF;
7272: --
7273: END Update_Delivery_Detail;
7274:
7322: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7323: --
7324: IF l_debug_on IS NULL
7325: THEN
7326: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7327: END IF;
7328: --
7329: SAVEPOINT CANCEL_DEL_DETAIL_GRP;
7330: IF l_debug_on THEN
7327: END IF;
7328: --
7329: SAVEPOINT CANCEL_DEL_DETAIL_GRP;
7330: IF l_debug_on THEN
7331: WSH_DEBUG_SV.push(l_module_name);
7332: END IF;
7333: --
7334:
7335: -- Initialize API return status to success
7353:
7354:
7355: --
7356: IF l_debug_on THEN
7357: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTERFACE.Update_Shipping_Attributes',WSH_DEBUG_SV.C_PROC_LEVEL);
7358: WSH_DEBUG_SV.log(l_module_name, 'l_changed_attr_tab.count', l_changed_attr_tab.count);
7359: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', l_changed_attr_tab(1).delivery_detail_id);
7360:
7361: WSH_DEBUG_SV.log(l_module_name, 'Ordered Quantity ', l_changed_attr_tab(1).ordered_quantity);
7354:
7355: --
7356: IF l_debug_on THEN
7357: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTERFACE.Update_Shipping_Attributes',WSH_DEBUG_SV.C_PROC_LEVEL);
7358: WSH_DEBUG_SV.log(l_module_name, 'l_changed_attr_tab.count', l_changed_attr_tab.count);
7359: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', l_changed_attr_tab(1).delivery_detail_id);
7360:
7361: WSH_DEBUG_SV.log(l_module_name, 'Ordered Quantity ', l_changed_attr_tab(1).ordered_quantity);
7362: WSH_DEBUG_SV.log(l_module_name, 'Ord qty uom ', l_changed_attr_tab(1).order_quantity_uom);
7355: --
7356: IF l_debug_on THEN
7357: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTERFACE.Update_Shipping_Attributes',WSH_DEBUG_SV.C_PROC_LEVEL);
7358: WSH_DEBUG_SV.log(l_module_name, 'l_changed_attr_tab.count', l_changed_attr_tab.count);
7359: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', l_changed_attr_tab(1).delivery_detail_id);
7360:
7361: WSH_DEBUG_SV.log(l_module_name, 'Ordered Quantity ', l_changed_attr_tab(1).ordered_quantity);
7362: WSH_DEBUG_SV.log(l_module_name, 'Ord qty uom ', l_changed_attr_tab(1).order_quantity_uom);
7363: WSH_DEBUG_SV.log(l_module_name, 'Source Line Id', l_changed_attr_tab(1).Source_Line_id);
7357: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTERFACE.Update_Shipping_Attributes',WSH_DEBUG_SV.C_PROC_LEVEL);
7358: WSH_DEBUG_SV.log(l_module_name, 'l_changed_attr_tab.count', l_changed_attr_tab.count);
7359: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', l_changed_attr_tab(1).delivery_detail_id);
7360:
7361: WSH_DEBUG_SV.log(l_module_name, 'Ordered Quantity ', l_changed_attr_tab(1).ordered_quantity);
7362: WSH_DEBUG_SV.log(l_module_name, 'Ord qty uom ', l_changed_attr_tab(1).order_quantity_uom);
7363: WSH_DEBUG_SV.log(l_module_name, 'Source Line Id', l_changed_attr_tab(1).Source_Line_id);
7364: wsh_debug_sv.log(l_module_name, 'Source_Code', p_detail_info_tab(1).source_code);
7365: END IF;
7358: WSH_DEBUG_SV.log(l_module_name, 'l_changed_attr_tab.count', l_changed_attr_tab.count);
7359: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', l_changed_attr_tab(1).delivery_detail_id);
7360:
7361: WSH_DEBUG_SV.log(l_module_name, 'Ordered Quantity ', l_changed_attr_tab(1).ordered_quantity);
7362: WSH_DEBUG_SV.log(l_module_name, 'Ord qty uom ', l_changed_attr_tab(1).order_quantity_uom);
7363: WSH_DEBUG_SV.log(l_module_name, 'Source Line Id', l_changed_attr_tab(1).Source_Line_id);
7364: wsh_debug_sv.log(l_module_name, 'Source_Code', p_detail_info_tab(1).source_code);
7365: END IF;
7366: --
7359: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', l_changed_attr_tab(1).delivery_detail_id);
7360:
7361: WSH_DEBUG_SV.log(l_module_name, 'Ordered Quantity ', l_changed_attr_tab(1).ordered_quantity);
7362: WSH_DEBUG_SV.log(l_module_name, 'Ord qty uom ', l_changed_attr_tab(1).order_quantity_uom);
7363: WSH_DEBUG_SV.log(l_module_name, 'Source Line Id', l_changed_attr_tab(1).Source_Line_id);
7364: wsh_debug_sv.log(l_module_name, 'Source_Code', p_detail_info_tab(1).source_code);
7365: END IF;
7366: --
7367:
7360:
7361: WSH_DEBUG_SV.log(l_module_name, 'Ordered Quantity ', l_changed_attr_tab(1).ordered_quantity);
7362: WSH_DEBUG_SV.log(l_module_name, 'Ord qty uom ', l_changed_attr_tab(1).order_quantity_uom);
7363: WSH_DEBUG_SV.log(l_module_name, 'Source Line Id', l_changed_attr_tab(1).Source_Line_id);
7364: wsh_debug_sv.log(l_module_name, 'Source_Code', p_detail_info_tab(1).source_code);
7365: END IF;
7366: --
7367:
7368:
7374: );
7375:
7376: --
7377: IF l_debug_on THEN
7378: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
7379: END IF;
7380: --
7381: --
7382: wsh_util_core.api_post_call(
7389: --
7390:
7391: IF l_number_of_warnings > 0 THEN
7392: IF l_debug_on THEN
7393: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
7394: END IF;
7395:
7396: RAISE wsh_util_core.g_exc_warning;
7397: END IF;
7406: );
7407:
7408: --
7409: IF l_debug_on THEN
7410: WSH_DEBUG_SV.pop(l_module_name);
7411: END IF;
7412: --
7413:
7414:
7425: p_encoded => FND_API.G_FALSE
7426: );
7427:
7428: IF l_debug_on THEN
7429: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7430: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7431: END IF;
7432: --
7433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7426: );
7427:
7428: IF l_debug_on THEN
7429: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7430: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7431: END IF;
7432: --
7433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7434: ROLLBACK to CANCEL_DEL_DETAIL_GRP;
7440: p_encoded => FND_API.G_FALSE
7441: );
7442:
7443: IF l_debug_on THEN
7444: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7445: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7446: END IF;
7447: --
7448: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
7441: );
7442:
7443: IF l_debug_on THEN
7444: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7445: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7446: END IF;
7447: --
7448: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
7449: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
7454: p_encoded => FND_API.G_FALSE
7455: );
7456: --
7457: IF l_debug_on THEN
7458: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7459: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
7460: END IF;
7461: --
7462: WHEN OTHERS THEN
7455: );
7456: --
7457: IF l_debug_on THEN
7458: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7459: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
7460: END IF;
7461: --
7462: WHEN OTHERS THEN
7463:
7472: p_encoded => FND_API.G_FALSE
7473: );
7474:
7475: IF l_debug_on THEN
7476: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7477: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7478: END IF;
7479: --
7480:
7473: );
7474:
7475: IF l_debug_on THEN
7476: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7477: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7478: END IF;
7479: --
7480:
7481:
7624: l_debug_on := wsh_debug_interface.g_debug;
7625:
7626: --
7627: IF l_debug_on IS NULL THEN
7628: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7629: END IF;
7630:
7631: --
7632: SAVEPOINT validate_det_line_grp;
7643:
7644: --bug 12597783
7645:
7646: IF l_debug_on THEN
7647: WSH_DEBUG_SV.push(l_module_name);
7648: WSH_DEBUG_SV.LOG(l_module_name, 'l_wms_installed', l_wms_installed);
7649: WSH_DEBUG_SV.LOG(l_module_name, 'l_lpn_id', l_lpn_id);
7650: WSH_DEBUG_SV.LOG(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
7651: WSH_DEBUG_SV.LOG(l_module_name, 'Serial table count', p_serial_range_tab.COUNT);
7644: --bug 12597783
7645:
7646: IF l_debug_on THEN
7647: WSH_DEBUG_SV.push(l_module_name);
7648: WSH_DEBUG_SV.LOG(l_module_name, 'l_wms_installed', l_wms_installed);
7649: WSH_DEBUG_SV.LOG(l_module_name, 'l_lpn_id', l_lpn_id);
7650: WSH_DEBUG_SV.LOG(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
7651: WSH_DEBUG_SV.LOG(l_module_name, 'Serial table count', p_serial_range_tab.COUNT);
7652: WSH_DEBUG_SV.LOG(l_module_name, 'SQ', x_detail_rec.shipped_quantity);
7645:
7646: IF l_debug_on THEN
7647: WSH_DEBUG_SV.push(l_module_name);
7648: WSH_DEBUG_SV.LOG(l_module_name, 'l_wms_installed', l_wms_installed);
7649: WSH_DEBUG_SV.LOG(l_module_name, 'l_lpn_id', l_lpn_id);
7650: WSH_DEBUG_SV.LOG(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
7651: WSH_DEBUG_SV.LOG(l_module_name, 'Serial table count', p_serial_range_tab.COUNT);
7652: WSH_DEBUG_SV.LOG(l_module_name, 'SQ', x_detail_rec.shipped_quantity);
7653: END IF;
7646: IF l_debug_on THEN
7647: WSH_DEBUG_SV.push(l_module_name);
7648: WSH_DEBUG_SV.LOG(l_module_name, 'l_wms_installed', l_wms_installed);
7649: WSH_DEBUG_SV.LOG(l_module_name, 'l_lpn_id', l_lpn_id);
7650: WSH_DEBUG_SV.LOG(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
7651: WSH_DEBUG_SV.LOG(l_module_name, 'Serial table count', p_serial_range_tab.COUNT);
7652: WSH_DEBUG_SV.LOG(l_module_name, 'SQ', x_detail_rec.shipped_quantity);
7653: END IF;
7654:
7647: WSH_DEBUG_SV.push(l_module_name);
7648: WSH_DEBUG_SV.LOG(l_module_name, 'l_wms_installed', l_wms_installed);
7649: WSH_DEBUG_SV.LOG(l_module_name, 'l_lpn_id', l_lpn_id);
7650: WSH_DEBUG_SV.LOG(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
7651: WSH_DEBUG_SV.LOG(l_module_name, 'Serial table count', p_serial_range_tab.COUNT);
7652: WSH_DEBUG_SV.LOG(l_module_name, 'SQ', x_detail_rec.shipped_quantity);
7653: END IF;
7654:
7655: -- Initialize API return status to success --
7648: WSH_DEBUG_SV.LOG(l_module_name, 'l_wms_installed', l_wms_installed);
7649: WSH_DEBUG_SV.LOG(l_module_name, 'l_lpn_id', l_lpn_id);
7650: WSH_DEBUG_SV.LOG(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
7651: WSH_DEBUG_SV.LOG(l_module_name, 'Serial table count', p_serial_range_tab.COUNT);
7652: WSH_DEBUG_SV.LOG(l_module_name, 'SQ', x_detail_rec.shipped_quantity);
7653: END IF;
7654:
7655: -- Initialize API return status to success --
7656: x_return_status := wsh_util_core.g_ret_sts_success;
7666: -- None of the validations are applicable for inbound lines. So, return
7667: --
7668: IF l_debug_on
7669: THEN
7670: wsh_debug_sv.pop(l_module_name);
7671: END IF;
7672: --
7673: RETURN;
7674: --}
7680: -- HW OPMCONV - Removed checking for process org
7681:
7682: IF (p_validation_tab(wsh_actions_levels.c_tol_above_lvl) = 1) THEN
7683: IF l_debug_on THEN
7684: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_detail_rec.ship_tolerance_above);
7685: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',
7686: WSH_DEBUG_SV.c_proc_level);
7687: END IF;
7688:
7681:
7682: IF (p_validation_tab(wsh_actions_levels.c_tol_above_lvl) = 1) THEN
7683: IF l_debug_on THEN
7684: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_detail_rec.ship_tolerance_above);
7685: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',
7686: WSH_DEBUG_SV.c_proc_level);
7687: END IF;
7688:
7689: --Bug # 3266333
7682: IF (p_validation_tab(wsh_actions_levels.c_tol_above_lvl) = 1) THEN
7683: IF l_debug_on THEN
7684: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_detail_rec.ship_tolerance_above);
7685: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',
7686: WSH_DEBUG_SV.c_proc_level);
7687: END IF;
7688:
7689: --Bug # 3266333
7690: wsh_util_validate.validate_negative(
7702: END IF;
7703:
7704: IF (p_validation_tab(wsh_actions_levels.c_tol_below_lvl) = 1) THEN
7705: IF l_debug_on THEN
7706: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Below', x_detail_rec.ship_tolerance_below);
7707: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.c_proc_level);
7708: END IF;
7709:
7710: --Bug # 3266333
7703:
7704: IF (p_validation_tab(wsh_actions_levels.c_tol_below_lvl) = 1) THEN
7705: IF l_debug_on THEN
7706: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Below', x_detail_rec.ship_tolerance_below);
7707: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.c_proc_level);
7708: END IF;
7709:
7710: --Bug # 3266333
7711: wsh_util_validate.validate_negative(
7722: );
7723: END IF;
7724:
7725: IF l_debug_on THEN
7726: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.org_id', x_detail_rec.org_id);
7727: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.locator_id', x_detail_rec.locator_id);
7728: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.revision', x_detail_rec.revision);
7729: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.subinventory', x_detail_rec.subinventory);
7730: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.lot_number', x_detail_rec.lot_number);
7723: END IF;
7724:
7725: IF l_debug_on THEN
7726: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.org_id', x_detail_rec.org_id);
7727: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.locator_id', x_detail_rec.locator_id);
7728: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.revision', x_detail_rec.revision);
7729: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.subinventory', x_detail_rec.subinventory);
7730: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.lot_number', x_detail_rec.lot_number);
7731: END IF;
7724:
7725: IF l_debug_on THEN
7726: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.org_id', x_detail_rec.org_id);
7727: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.locator_id', x_detail_rec.locator_id);
7728: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.revision', x_detail_rec.revision);
7729: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.subinventory', x_detail_rec.subinventory);
7730: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.lot_number', x_detail_rec.lot_number);
7731: END IF;
7732:
7725: IF l_debug_on THEN
7726: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.org_id', x_detail_rec.org_id);
7727: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.locator_id', x_detail_rec.locator_id);
7728: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.revision', x_detail_rec.revision);
7729: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.subinventory', x_detail_rec.subinventory);
7730: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.lot_number', x_detail_rec.lot_number);
7731: END IF;
7732:
7733: l_org_id := p_original_rec.organization_id;
7726: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.org_id', x_detail_rec.org_id);
7727: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.locator_id', x_detail_rec.locator_id);
7728: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.revision', x_detail_rec.revision);
7729: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.subinventory', x_detail_rec.subinventory);
7730: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.lot_number', x_detail_rec.lot_number);
7731: END IF;
7732:
7733: l_org_id := p_original_rec.organization_id;
7734:
7771: l_lot := p_original_rec.lot_number;
7772: END IF;
7773:
7774: IF l_debug_on THEN
7775: WSH_DEBUG_SV.log(l_module_name, 'l_org_id', l_org_id);
7776: WSH_DEBUG_SV.log(l_module_name, 'l_locator', l_locator);
7777: WSH_DEBUG_SV.log(l_module_name, 'l_revision', l_revision);
7778: WSH_DEBUG_SV.log(l_module_name, 'l_subinventory', l_subinventory);
7779: WSH_DEBUG_SV.log(l_module_name, 'l_lot_number', l_lot);
7772: END IF;
7773:
7774: IF l_debug_on THEN
7775: WSH_DEBUG_SV.log(l_module_name, 'l_org_id', l_org_id);
7776: WSH_DEBUG_SV.log(l_module_name, 'l_locator', l_locator);
7777: WSH_DEBUG_SV.log(l_module_name, 'l_revision', l_revision);
7778: WSH_DEBUG_SV.log(l_module_name, 'l_subinventory', l_subinventory);
7779: WSH_DEBUG_SV.log(l_module_name, 'l_lot_number', l_lot);
7780: END IF;
7773:
7774: IF l_debug_on THEN
7775: WSH_DEBUG_SV.log(l_module_name, 'l_org_id', l_org_id);
7776: WSH_DEBUG_SV.log(l_module_name, 'l_locator', l_locator);
7777: WSH_DEBUG_SV.log(l_module_name, 'l_revision', l_revision);
7778: WSH_DEBUG_SV.log(l_module_name, 'l_subinventory', l_subinventory);
7779: WSH_DEBUG_SV.log(l_module_name, 'l_lot_number', l_lot);
7780: END IF;
7781:
7774: IF l_debug_on THEN
7775: WSH_DEBUG_SV.log(l_module_name, 'l_org_id', l_org_id);
7776: WSH_DEBUG_SV.log(l_module_name, 'l_locator', l_locator);
7777: WSH_DEBUG_SV.log(l_module_name, 'l_revision', l_revision);
7778: WSH_DEBUG_SV.log(l_module_name, 'l_subinventory', l_subinventory);
7779: WSH_DEBUG_SV.log(l_module_name, 'l_lot_number', l_lot);
7780: END IF;
7781:
7782: -- UT bug fix 2657367
7775: WSH_DEBUG_SV.log(l_module_name, 'l_org_id', l_org_id);
7776: WSH_DEBUG_SV.log(l_module_name, 'l_locator', l_locator);
7777: WSH_DEBUG_SV.log(l_module_name, 'l_revision', l_revision);
7778: WSH_DEBUG_SV.log(l_module_name, 'l_subinventory', l_subinventory);
7779: WSH_DEBUG_SV.log(l_module_name, 'l_lot_number', l_lot);
7780: END IF;
7781:
7782: -- UT bug fix 2657367
7783: IF p_validation_tab(wsh_actions_levels.c_ship_qty_lvl) = 1
7787: OR p_validation_tab(wsh_actions_levels.c_serial_num_lvl) = 1
7788: THEN
7789: --(
7790: IF l_debug_on THEN
7791: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.FETCH_INV_CONTROLS', WSH_DEBUG_SV.c_proc_level);
7792: END IF;
7793:
7794: wsh_delivery_details_inv.fetch_inv_controls(
7795: p_delivery_detail_id => x_detail_rec.delivery_detail_id,
7800: x_return_status => l_return_status
7801: );
7802:
7803: IF l_debug_on THEN
7804: WSH_DEBUG_SV.log(l_module_name, 'Return Status', l_return_status);
7805: WSH_DEBUG_SV.log(l_module_name, 'Lot Flag', l_inv_controls.lot_flag);
7806: WSH_DEBUG_SV.log(l_module_name, 'Revision Flag', l_inv_controls.rev_flag);
7807: WSH_DEBUG_SV.log(l_module_name, 'Locator Flag', l_inv_controls.loc_flag);
7808: WSH_DEBUG_SV.log(l_module_name, 'Serial Control Code', l_inv_controls.serial_code);
7801: );
7802:
7803: IF l_debug_on THEN
7804: WSH_DEBUG_SV.log(l_module_name, 'Return Status', l_return_status);
7805: WSH_DEBUG_SV.log(l_module_name, 'Lot Flag', l_inv_controls.lot_flag);
7806: WSH_DEBUG_SV.log(l_module_name, 'Revision Flag', l_inv_controls.rev_flag);
7807: WSH_DEBUG_SV.log(l_module_name, 'Locator Flag', l_inv_controls.loc_flag);
7808: WSH_DEBUG_SV.log(l_module_name, 'Serial Control Code', l_inv_controls.serial_code);
7809: END IF;
7802:
7803: IF l_debug_on THEN
7804: WSH_DEBUG_SV.log(l_module_name, 'Return Status', l_return_status);
7805: WSH_DEBUG_SV.log(l_module_name, 'Lot Flag', l_inv_controls.lot_flag);
7806: WSH_DEBUG_SV.log(l_module_name, 'Revision Flag', l_inv_controls.rev_flag);
7807: WSH_DEBUG_SV.log(l_module_name, 'Locator Flag', l_inv_controls.loc_flag);
7808: WSH_DEBUG_SV.log(l_module_name, 'Serial Control Code', l_inv_controls.serial_code);
7809: END IF;
7810:
7803: IF l_debug_on THEN
7804: WSH_DEBUG_SV.log(l_module_name, 'Return Status', l_return_status);
7805: WSH_DEBUG_SV.log(l_module_name, 'Lot Flag', l_inv_controls.lot_flag);
7806: WSH_DEBUG_SV.log(l_module_name, 'Revision Flag', l_inv_controls.rev_flag);
7807: WSH_DEBUG_SV.log(l_module_name, 'Locator Flag', l_inv_controls.loc_flag);
7808: WSH_DEBUG_SV.log(l_module_name, 'Serial Control Code', l_inv_controls.serial_code);
7809: END IF;
7810:
7811: wsh_util_core.api_post_call(
7804: WSH_DEBUG_SV.log(l_module_name, 'Return Status', l_return_status);
7805: WSH_DEBUG_SV.log(l_module_name, 'Lot Flag', l_inv_controls.lot_flag);
7806: WSH_DEBUG_SV.log(l_module_name, 'Revision Flag', l_inv_controls.rev_flag);
7807: WSH_DEBUG_SV.log(l_module_name, 'Locator Flag', l_inv_controls.loc_flag);
7808: WSH_DEBUG_SV.log(l_module_name, 'Serial Control Code', l_inv_controls.serial_code);
7809: END IF;
7810:
7811: wsh_util_core.api_post_call(
7812: p_return_status => l_return_status,
7820: -- UT bug fix 2657367
7821:
7822: IF (p_validation_tab(wsh_actions_levels.c_ship_qty_lvl) = 1) THEN
7823: IF l_debug_on THEN
7824: WSH_DEBUG_SV.log(l_module_name, 'Shipped Qty', x_detail_rec.shipped_quantity);
7825: WSH_DEBUG_SV.log(l_module_name, 'Existing Shipped Qty', p_original_rec.shipped_quantity);
7826: END IF;
7827: -- BugFix 4519867: Validate shipped qty only when it's not equal to fnd_api.g_miss_num.
7828: IF ((p_in_detail_rec.shipped_quantity IS NULL )
7821:
7822: IF (p_validation_tab(wsh_actions_levels.c_ship_qty_lvl) = 1) THEN
7823: IF l_debug_on THEN
7824: WSH_DEBUG_SV.log(l_module_name, 'Shipped Qty', x_detail_rec.shipped_quantity);
7825: WSH_DEBUG_SV.log(l_module_name, 'Existing Shipped Qty', p_original_rec.shipped_quantity);
7826: END IF;
7827: -- BugFix 4519867: Validate shipped qty only when it's not equal to fnd_api.g_miss_num.
7828: IF ((p_in_detail_rec.shipped_quantity IS NULL )
7829: OR (p_in_detail_rec.shipped_quantity <> fnd_api.g_miss_num))
7862: x_return_status => l_return_status
7863: );
7864:
7865: IF l_debug_on THEN
7866: WSH_DEBUG_SV.log(l_module_name, 'get serial qty status', l_return_status);
7867: WSH_DEBUG_SV.log(l_module_name, 'Serial qty', l_det_qty_rec.serial_quantity);
7868: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', l_det_qty_rec.serial_number);
7869: WSH_DEBUG_SV.log(l_module_name, 'Trans temp id', l_det_qty_rec.transaction_temp_id);
7870: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY', WSH_DEBUG_SV.c_proc_level);
7863: );
7864:
7865: IF l_debug_on THEN
7866: WSH_DEBUG_SV.log(l_module_name, 'get serial qty status', l_return_status);
7867: WSH_DEBUG_SV.log(l_module_name, 'Serial qty', l_det_qty_rec.serial_quantity);
7868: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', l_det_qty_rec.serial_number);
7869: WSH_DEBUG_SV.log(l_module_name, 'Trans temp id', l_det_qty_rec.transaction_temp_id);
7870: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY', WSH_DEBUG_SV.c_proc_level);
7871: END IF;
7864:
7865: IF l_debug_on THEN
7866: WSH_DEBUG_SV.log(l_module_name, 'get serial qty status', l_return_status);
7867: WSH_DEBUG_SV.log(l_module_name, 'Serial qty', l_det_qty_rec.serial_quantity);
7868: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', l_det_qty_rec.serial_number);
7869: WSH_DEBUG_SV.log(l_module_name, 'Trans temp id', l_det_qty_rec.transaction_temp_id);
7870: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY', WSH_DEBUG_SV.c_proc_level);
7871: END IF;
7872:
7865: IF l_debug_on THEN
7866: WSH_DEBUG_SV.log(l_module_name, 'get serial qty status', l_return_status);
7867: WSH_DEBUG_SV.log(l_module_name, 'Serial qty', l_det_qty_rec.serial_quantity);
7868: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', l_det_qty_rec.serial_number);
7869: WSH_DEBUG_SV.log(l_module_name, 'Trans temp id', l_det_qty_rec.transaction_temp_id);
7870: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY', WSH_DEBUG_SV.c_proc_level);
7871: END IF;
7872:
7873: --
7866: WSH_DEBUG_SV.log(l_module_name, 'get serial qty status', l_return_status);
7867: WSH_DEBUG_SV.log(l_module_name, 'Serial qty', l_det_qty_rec.serial_quantity);
7868: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', l_det_qty_rec.serial_number);
7869: WSH_DEBUG_SV.log(l_module_name, 'Trans temp id', l_det_qty_rec.transaction_temp_id);
7870: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY', WSH_DEBUG_SV.c_proc_level);
7871: END IF;
7872:
7873: --
7874: wsh_details_validations.validate_shipped_cc_quantity(
7935: -- HW use l_process_flag
7936: -- HW OPMCONV - Removed population of process_flag
7937:
7938: IF l_debug_on THEN
7939: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY2', WSH_DEBUG_SV.c_proc_level);
7940: END IF;
7941:
7942: --
7943:
7964: -- HW OPM end of changes
7965:
7966: IF (p_validation_tab(wsh_actions_levels.c_cc_qty_lvl) = 1) THEN
7967: IF l_debug_on THEN
7968: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count Qty', x_detail_rec.cycle_count_quantity);
7969: WSH_DEBUG_SV.log(l_module_name, 'Existing Cycle_Count Qty', p_original_rec.cycle_count_quantity);
7970: END IF;
7971: -- BugFix 4519867: Validate cycle count qty only when it's not equal to fnd_api.g_miss_num.
7972: IF ( (p_in_detail_rec.cycle_count_quantity IS NULL)
7965:
7966: IF (p_validation_tab(wsh_actions_levels.c_cc_qty_lvl) = 1) THEN
7967: IF l_debug_on THEN
7968: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count Qty', x_detail_rec.cycle_count_quantity);
7969: WSH_DEBUG_SV.log(l_module_name, 'Existing Cycle_Count Qty', p_original_rec.cycle_count_quantity);
7970: END IF;
7971: -- BugFix 4519867: Validate cycle count qty only when it's not equal to fnd_api.g_miss_num.
7972: IF ( (p_in_detail_rec.cycle_count_quantity IS NULL)
7973: OR (p_in_detail_rec.cycle_count_quantity <> fnd_api.g_miss_num))
7996: -- HW OPMCONV - Removed populatation of process_flag
7997:
7998: --
7999: IF l_debug_on THEN
8000: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY', WSH_DEBUG_SV.c_proc_level);
8001: END IF;
8002:
8003: --
8004: wsh_details_validations.validate_shipped_cc_quantity(
8054: -- HW Harmonization project for OPM. Use l_process_flag
8055: -- HW OPMCONV - Removed population of process_flag
8056:
8057: IF l_debug_on THEN
8058: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY2', WSH_DEBUG_SV.c_proc_level);
8059: END IF;
8060:
8061: --
8062: wsh_details_validations.validate_shipped_cc_quantity2(
8082:
8083: IF (p_validation_tab(wsh_actions_levels.c_smc_lvl) = 1) THEN
8084: IF (x_detail_rec.ship_method_code <> fnd_api.g_miss_char) THEN
8085: IF l_debug_on THEN
8086: WSH_DEBUG_SV.log(l_module_name, 'Ship Method', x_detail_rec.ship_method_code);
8087: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_SHIP_METHOD', WSH_DEBUG_SV.c_proc_level);
8088: END IF;
8089:
8090: --
8083: IF (p_validation_tab(wsh_actions_levels.c_smc_lvl) = 1) THEN
8084: IF (x_detail_rec.ship_method_code <> fnd_api.g_miss_char) THEN
8085: IF l_debug_on THEN
8086: WSH_DEBUG_SV.log(l_module_name, 'Ship Method', x_detail_rec.ship_method_code);
8087: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_SHIP_METHOD', WSH_DEBUG_SV.c_proc_level);
8088: END IF;
8089:
8090: --
8091: wsh_util_validate.validate_ship_method(
8104:
8105: IF (p_validation_tab(wsh_actions_levels.c_dep_plan_lvl) = 1) THEN
8106: IF (x_detail_rec.dep_plan_required_flag <> fnd_api.g_miss_char) THEN
8107: IF l_debug_on THEN
8108: WSH_DEBUG_SV.log(l_module_name, 'Departure Plan Flag', x_detail_rec.dep_plan_required_flag);
8109: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_BOOLEAN', WSH_DEBUG_SV.c_proc_level);
8110: END IF;
8111:
8112: --
8105: IF (p_validation_tab(wsh_actions_levels.c_dep_plan_lvl) = 1) THEN
8106: IF (x_detail_rec.dep_plan_required_flag <> fnd_api.g_miss_char) THEN
8107: IF l_debug_on THEN
8108: WSH_DEBUG_SV.log(l_module_name, 'Departure Plan Flag', x_detail_rec.dep_plan_required_flag);
8109: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_BOOLEAN', WSH_DEBUG_SV.c_proc_level);
8110: END IF;
8111:
8112: --
8113: wsh_util_validate.validate_boolean(
8125:
8126: IF (p_validation_tab(wsh_actions_levels.c_ship_mod_comp_lvl) = 1) THEN
8127: IF (x_detail_rec.ship_model_complete_flag <> fnd_api.g_miss_char) THEN
8128: IF l_debug_on THEN
8129: WSH_DEBUG_SV.log(l_module_name, 'Ship Model Complete Flag', x_detail_rec.ship_model_complete_flag);
8130: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_BOOLEAN', WSH_DEBUG_SV.c_proc_level);
8131: END IF;
8132:
8133: --
8126: IF (p_validation_tab(wsh_actions_levels.c_ship_mod_comp_lvl) = 1) THEN
8127: IF (x_detail_rec.ship_model_complete_flag <> fnd_api.g_miss_char) THEN
8128: IF l_debug_on THEN
8129: WSH_DEBUG_SV.log(l_module_name, 'Ship Model Complete Flag', x_detail_rec.ship_model_complete_flag);
8130: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_BOOLEAN', WSH_DEBUG_SV.c_proc_level);
8131: END IF;
8132:
8133: --
8134: wsh_util_validate.validate_boolean(
8146:
8147: IF (p_validation_tab(wsh_actions_levels.c_sub_inv_lvl) = 1) THEN
8148: IF (x_detail_rec.subinventory <> fnd_api.g_miss_char) THEN
8149: IF l_debug_on THEN
8150: WSH_DEBUG_SV.log(l_module_name, 'Subinventory', x_detail_rec.subinventory);
8151: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_SUBINVENTORY', WSH_DEBUG_SV.c_proc_level);
8152: END IF;
8153:
8154: --
8147: IF (p_validation_tab(wsh_actions_levels.c_sub_inv_lvl) = 1) THEN
8148: IF (x_detail_rec.subinventory <> fnd_api.g_miss_char) THEN
8149: IF l_debug_on THEN
8150: WSH_DEBUG_SV.log(l_module_name, 'Subinventory', x_detail_rec.subinventory);
8151: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_SUBINVENTORY', WSH_DEBUG_SV.c_proc_level);
8152: END IF;
8153:
8154: --
8155: wsh_delivery_details_inv.validate_subinventory(
8162: x_result => l_result
8163: );
8164: --
8165: IF l_debug_on THEN
8166: WSH_DEBUG_SV.log(l_module_name, 'Result after validate subinventory', l_result);
8167: WSH_DEBUG_SV.log(l_module_name, 'Return status after validate subinventory', l_return_status);
8168: END IF;
8169:
8170: IF NOT l_result THEN
8163: );
8164: --
8165: IF l_debug_on THEN
8166: WSH_DEBUG_SV.log(l_module_name, 'Result after validate subinventory', l_result);
8167: WSH_DEBUG_SV.log(l_module_name, 'Return status after validate subinventory', l_return_status);
8168: END IF;
8169:
8170: IF NOT l_result THEN
8171: IF l_debug_on THEN
8168: END IF;
8169:
8170: IF NOT l_result THEN
8171: IF l_debug_on THEN
8172: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid subinventory');
8173: END IF;
8174:
8175: l_return_status := wsh_util_core.g_ret_sts_error;
8176: END IF;
8192: THEN
8193: -- {
8194: -- UT bug fix 2657367
8195: IF l_debug_on THEN
8196: wsh_debug_sv.log(l_module_name, 'Pickable Flag', p_original_rec.pickable_flag);
8197: wsh_debug_sv.log(l_module_name, 'Rev Flag', l_inv_controls.rev_flag);
8198: END IF;
8199: --
8200: IF p_original_rec.pickable_flag = 'N'
8193: -- {
8194: -- UT bug fix 2657367
8195: IF l_debug_on THEN
8196: wsh_debug_sv.log(l_module_name, 'Pickable Flag', p_original_rec.pickable_flag);
8197: wsh_debug_sv.log(l_module_name, 'Rev Flag', l_inv_controls.rev_flag);
8198: END IF;
8199: --
8200: IF p_original_rec.pickable_flag = 'N'
8201: THEN
8207: RAISE FND_API.G_EXC_ERROR;
8208: END IF;
8209: ELSE
8210: IF l_debug_on THEN
8211: WSH_DEBUG_SV.log(l_module_name, 'Revision', x_detail_rec.revision);
8212: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_REVISION', WSH_DEBUG_SV.c_proc_level);
8213: END IF;
8214:
8215: wsh_delivery_details_inv.validate_revision(
8208: END IF;
8209: ELSE
8210: IF l_debug_on THEN
8211: WSH_DEBUG_SV.log(l_module_name, 'Revision', x_detail_rec.revision);
8212: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_REVISION', WSH_DEBUG_SV.c_proc_level);
8213: END IF;
8214:
8215: wsh_delivery_details_inv.validate_revision(
8216: p_revision => x_detail_rec.revision,
8221: );
8222:
8223: -- Bug fix 2657367. Need to check l_result
8224: IF l_debug_on THEN
8225: WSH_DEBUG_SV.log(l_module_name, 'Result after validate revision', l_result);
8226: WSH_DEBUG_SV.log(l_module_name, 'Return status after validate revision', l_return_status);
8227: END IF;
8228:
8229: IF NOT l_result THEN
8222:
8223: -- Bug fix 2657367. Need to check l_result
8224: IF l_debug_on THEN
8225: WSH_DEBUG_SV.log(l_module_name, 'Result after validate revision', l_result);
8226: WSH_DEBUG_SV.log(l_module_name, 'Return status after validate revision', l_return_status);
8227: END IF;
8228:
8229: IF NOT l_result THEN
8230: IF l_debug_on THEN
8227: END IF;
8228:
8229: IF NOT l_result THEN
8230: IF l_debug_on THEN
8231: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid Revision');
8232: END IF;
8233:
8234: RAISE fnd_api.g_exc_error;
8235: END IF;
8252: THEN
8253: -- {
8254: -- UT bug fix 2657367
8255: IF l_debug_on THEN
8256: wsh_debug_sv.log(l_module_name, 'Pickable Flag', p_original_rec.pickable_flag);
8257: wsh_debug_sv.log(l_module_name, 'Locator Flag', l_inv_controls.loc_flag);
8258: END IF;
8259: --
8260: IF p_original_rec.pickable_flag = 'N'
8253: -- {
8254: -- UT bug fix 2657367
8255: IF l_debug_on THEN
8256: wsh_debug_sv.log(l_module_name, 'Pickable Flag', p_original_rec.pickable_flag);
8257: wsh_debug_sv.log(l_module_name, 'Locator Flag', l_inv_controls.loc_flag);
8258: END IF;
8259: --
8260: IF p_original_rec.pickable_flag = 'N'
8261: THEN
8268: END IF;
8269: ELSE
8270:
8271: IF l_debug_on THEN
8272: WSH_DEBUG_SV.log(l_module_name, 'Locator Id', x_detail_rec.locator_id);
8273: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_LOCATOR', WSH_DEBUG_SV.c_proc_level);
8274: END IF;
8275: wsh_delivery_details_inv.validate_locator(
8276: p_locator_id => x_detail_rec.locator_id,
8269: ELSE
8270:
8271: IF l_debug_on THEN
8272: WSH_DEBUG_SV.log(l_module_name, 'Locator Id', x_detail_rec.locator_id);
8273: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_LOCATOR', WSH_DEBUG_SV.c_proc_level);
8274: END IF;
8275: wsh_delivery_details_inv.validate_locator(
8276: p_locator_id => x_detail_rec.locator_id,
8277: p_organization_id => l_org_id,
8284: );
8285:
8286: -- Bug fix 2657367. Need to check l_result
8287: IF l_debug_on THEN
8288: WSH_DEBUG_SV.log(l_module_name, 'Result after validate locator', l_result);
8289: WSH_DEBUG_SV.log(l_module_name, 'Return status after validate locator', l_return_status);
8290: END IF;
8291:
8292: IF NOT l_result THEN
8285:
8286: -- Bug fix 2657367. Need to check l_result
8287: IF l_debug_on THEN
8288: WSH_DEBUG_SV.log(l_module_name, 'Result after validate locator', l_result);
8289: WSH_DEBUG_SV.log(l_module_name, 'Return status after validate locator', l_return_status);
8290: END IF;
8291:
8292: IF NOT l_result THEN
8293: IF l_debug_on THEN
8290: END IF;
8291:
8292: IF NOT l_result THEN
8293: IF l_debug_on THEN
8294: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid Locator');
8295: END IF;
8296:
8297: RAISE fnd_api.g_exc_error;
8298: END IF;
8317: -- HW OPMCONV - Removed branching
8318:
8319: -- UT bug fix 2657367
8320: IF l_debug_on THEN
8321: WSH_DEBUG_SV.log(l_module_name, 'Lot Number', x_detail_rec.lot_number);
8322: wsh_debug_sv.log(l_module_name, 'Pickable Flag', p_original_rec.pickable_flag);
8323: wsh_debug_sv.log(l_module_name, 'Lot Flag', l_inv_controls.lot_flag);
8324: END IF;
8325: --
8318:
8319: -- UT bug fix 2657367
8320: IF l_debug_on THEN
8321: WSH_DEBUG_SV.log(l_module_name, 'Lot Number', x_detail_rec.lot_number);
8322: wsh_debug_sv.log(l_module_name, 'Pickable Flag', p_original_rec.pickable_flag);
8323: wsh_debug_sv.log(l_module_name, 'Lot Flag', l_inv_controls.lot_flag);
8324: END IF;
8325: --
8326: IF nvl(p_original_rec.pickable_flag, 'N') = 'N'
8319: -- UT bug fix 2657367
8320: IF l_debug_on THEN
8321: WSH_DEBUG_SV.log(l_module_name, 'Lot Number', x_detail_rec.lot_number);
8322: wsh_debug_sv.log(l_module_name, 'Pickable Flag', p_original_rec.pickable_flag);
8323: wsh_debug_sv.log(l_module_name, 'Lot Flag', l_inv_controls.lot_flag);
8324: END IF;
8325: --
8326: IF nvl(p_original_rec.pickable_flag, 'N') = 'N'
8327: THEN
8342: x_pickable_flag => p_original_rec.pickable_flag);
8343: END IF;
8344: IF (nvl(l_reservable_flag, 'Y') = 'Y') THEN
8345: IF l_debug_on THEN
8346: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_LOT_NUMBER', WSH_DEBUG_SV.c_proc_level);
8347: END IF;
8348:
8349: wsh_delivery_details_inv.validate_lot_number(
8350: p_lot_number => x_detail_rec.lot_number,
8361: );
8362:
8363: -- Bug fix 2657367. Need to check l_result
8364: IF l_debug_on THEN
8365: WSH_DEBUG_SV.log(l_module_name, 'Result after validate lot', l_result);
8366: WSH_DEBUG_SV.log(l_module_name, 'Return status after validate lot', l_return_status);
8367: END IF;
8368:
8369: IF NOT l_result THEN
8362:
8363: -- Bug fix 2657367. Need to check l_result
8364: IF l_debug_on THEN
8365: WSH_DEBUG_SV.log(l_module_name, 'Result after validate lot', l_result);
8366: WSH_DEBUG_SV.log(l_module_name, 'Return status after validate lot', l_return_status);
8367: END IF;
8368:
8369: IF NOT l_result THEN
8370: IF l_debug_on THEN
8367: END IF;
8368:
8369: IF NOT l_result THEN
8370: IF l_debug_on THEN
8371: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid Lot Number');
8372: END IF;
8373:
8374: RAISE fnd_api.g_exc_error;
8375: END IF;
8395:
8396: IF (p_validation_tab(wsh_actions_levels.c_sold_contact_lvl) = 1) THEN
8397: IF (x_detail_rec.sold_to_contact_id <> fnd_api.g_miss_num) THEN
8398: IF l_debug_on THEN
8399: WSH_DEBUG_SV.log(l_module_name, 'Sold to Contact', x_detail_rec.sold_to_contact_id);
8400: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8401: END IF;
8402:
8403: --
8396: IF (p_validation_tab(wsh_actions_levels.c_sold_contact_lvl) = 1) THEN
8397: IF (x_detail_rec.sold_to_contact_id <> fnd_api.g_miss_num) THEN
8398: IF l_debug_on THEN
8399: WSH_DEBUG_SV.log(l_module_name, 'Sold to Contact', x_detail_rec.sold_to_contact_id);
8400: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8401: END IF;
8402:
8403: --
8404: wsh_util_validate.validate_contact(
8415:
8416: IF (p_validation_tab(wsh_actions_levels.c_ship_contact_lvl) = 1) THEN
8417: IF (x_detail_rec.ship_to_contact_id <> fnd_api.g_miss_num) THEN
8418: IF l_debug_on THEN
8419: WSH_DEBUG_SV.log(l_module_name, 'Ship to Contact Id', x_detail_rec.ship_to_contact_id);
8420: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8421: END IF;
8422:
8423: --
8416: IF (p_validation_tab(wsh_actions_levels.c_ship_contact_lvl) = 1) THEN
8417: IF (x_detail_rec.ship_to_contact_id <> fnd_api.g_miss_num) THEN
8418: IF l_debug_on THEN
8419: WSH_DEBUG_SV.log(l_module_name, 'Ship to Contact Id', x_detail_rec.ship_to_contact_id);
8420: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8421: END IF;
8422:
8423: --
8424: wsh_util_validate.validate_contact(
8436:
8437: IF (p_validation_tab(wsh_actions_levels.c_deliver_contact_lvl) = 1) THEN
8438: IF (x_detail_rec.deliver_to_contact_id <> fnd_api.g_miss_num) THEN
8439: IF l_debug_on THEN
8440: WSH_DEBUG_SV.log(l_module_name, 'Deliver To Contact', x_detail_rec.deliver_to_contact_id);
8441: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8442: END IF;
8443:
8444: --
8437: IF (p_validation_tab(wsh_actions_levels.c_deliver_contact_lvl) = 1) THEN
8438: IF (x_detail_rec.deliver_to_contact_id <> fnd_api.g_miss_num) THEN
8439: IF l_debug_on THEN
8440: WSH_DEBUG_SV.log(l_module_name, 'Deliver To Contact', x_detail_rec.deliver_to_contact_id);
8441: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8442: END IF;
8443:
8444: --
8445: wsh_util_validate.validate_contact(
8457:
8458: IF (p_validation_tab(wsh_actions_levels.c_intmed_ship_contact_lvl) = 1) THEN
8459: IF (x_detail_rec.intmed_ship_to_contact_id <> fnd_api.g_miss_num) THEN
8460: IF l_debug_on THEN
8461: WSH_DEBUG_SV.log(l_module_name, 'Intmed Ship To Contact', x_detail_rec.intmed_ship_to_contact_id);
8462: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8463: END IF;
8464:
8465: --
8458: IF (p_validation_tab(wsh_actions_levels.c_intmed_ship_contact_lvl) = 1) THEN
8459: IF (x_detail_rec.intmed_ship_to_contact_id <> fnd_api.g_miss_num) THEN
8460: IF l_debug_on THEN
8461: WSH_DEBUG_SV.log(l_module_name, 'Intmed Ship To Contact', x_detail_rec.intmed_ship_to_contact_id);
8462: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_CONTACT', WSH_DEBUG_SV.c_proc_level);
8463: END IF;
8464:
8465: --
8466: wsh_util_validate.validate_contact(
8538:
8539: l_detail_ser_count := l_det_ser_range_tab.count;
8540:
8541: IF l_debug_on THEN
8542: WSH_DEBUG_SV.log(l_module_name, 'Current detail count', l_detail_ser_count);
8543: WSH_DEBUG_SV.log(l_module_name, 'Total serial qty in table', l_detail_ser_qty);
8544: END IF;
8545:
8546: IF l_detail_ser_count >= 1
8539: l_detail_ser_count := l_det_ser_range_tab.count;
8540:
8541: IF l_debug_on THEN
8542: WSH_DEBUG_SV.log(l_module_name, 'Current detail count', l_detail_ser_count);
8543: WSH_DEBUG_SV.log(l_module_name, 'Total serial qty in table', l_detail_ser_qty);
8544: END IF;
8545:
8546: IF l_detail_ser_count >= 1
8547: THEN
8546: IF l_detail_ser_count >= 1
8547: THEN
8548: -- (
8549: IF l_debug_on THEN
8550: WSH_DEBUG_SV.log(l_module_name, 'input from serial number', p_in_detail_rec.serial_number);
8551: WSH_DEBUG_SV.log(l_module_name, 'input to_serial_number', p_in_detail_rec.to_serial_number);
8552: END IF;
8553:
8554: IF (
8547: THEN
8548: -- (
8549: IF l_debug_on THEN
8550: WSH_DEBUG_SV.log(l_module_name, 'input from serial number', p_in_detail_rec.serial_number);
8551: WSH_DEBUG_SV.log(l_module_name, 'input to_serial_number', p_in_detail_rec.to_serial_number);
8552: END IF;
8553:
8554: IF (
8555: p_in_detail_rec.serial_number IS NOT NULL
8562: THEN
8563: -- (
8564: -- Error case. Inputs should be mutually exclusive
8565: IF l_debug_on THEN
8566: WSH_DEBUG_SV.logmsg(l_module_name, 'Serial number input not mutually exclusive');
8567: END IF;
8568:
8569: RAISE fnd_api.g_exc_error;
8570: -- )
8595: IF l_det_ser_range_tab(1).from_serial_number
8596: = NVL(l_det_ser_range_tab(1).to_serial_number,
8597: l_det_ser_range_tab(1).from_serial_number) THEN
8598: IF l_debug_on THEN
8599: WSH_DEBUG_SV.logmsg(l_module_name, 'Stamp serial number on wdd');
8600: END IF;
8601: l_stamp_ser_wdd := TRUE;
8602: END IF;
8603:
8607: THEN
8608: -- (
8609: -- To serial number cannot exist with a from serial number
8610: IF l_debug_on THEN
8611: WSH_DEBUG_SV.logmsg(l_module_name, 'From serial number is null');
8612: END IF;
8613:
8614: RAISE fnd_api.g_exc_error;
8615: -- )
8628: AND l_inv_controls.serial_code IN (2,5)
8629: THEN --{
8630: IF (wsh_util_validate.Check_Wms_Org(l_org_id)='Y') THEN --{
8631: IF l_debug_on THEN
8632: WSH_DEBUG_SV.logmsg(l_module_name, 'Cannot modify the serial numbers for WMS organizationx ');
8633: END IF;
8634:
8635: RAISE fnd_api.g_exc_error;
8636: END IF; --}
8640: IF p_original_rec.released_status NOT IN('Y', 'X')
8641: THEN
8642: -- (
8643: IF l_debug_on THEN
8644: WSH_DEBUG_SV.logmsg(l_module_name, 'Released Status Not in X,Y');
8645: END IF;
8646:
8647: RAISE fnd_api.g_exc_error;
8648: -- )
8653: THEN
8654: -- (
8655: -- Bug 2652300. Cannot update serial number if shipped qty is null or zero
8656: IF l_debug_on THEN
8657: WSH_DEBUG_SV.logmsg(l_module_name, 'Shipped qty zero or null. Not null serial number');
8658: END IF;
8659: raise FND_API.G_EXC_ERROR;
8660: ELSIF nvl(x_detail_rec.shipped_quantity, nvl(p_original_rec.shipped_quantity,0)) > 1
8661: THEN
8665: AND l_det_ser_range_tab(l_det_ser_range_tab.first).to_serial_number IS NULL
8666: THEN
8667: -- (
8668: IF l_debug_on THEN
8669: WSH_DEBUG_SV.logmsg(l_module_name, 'Shipped qty greater than one. No to_serial_number');
8670: END IF;
8671: raise FND_API.G_EXC_ERROR;
8672: -- )
8673: END IF;
8680: -- (
8681: -- Total quantity in serial table should not be greater than shipped qty
8682: -- Error case.
8683: IF l_debug_on THEN
8684: WSH_DEBUG_SV.logmsg(l_module_name, 'Serial table qty greater than shipped qty');
8685: END IF;
8686: RAISE fnd_api.g_exc_error;
8687: ELSIF l_detail_ser_qty = 1
8688: THEN
8686: RAISE fnd_api.g_exc_error;
8687: ELSIF l_detail_ser_qty = 1
8688: THEN
8689: IF l_debug_on THEN
8690: WSH_DEBUG_SV.log(l_module_name, 'table from serial num', l_det_ser_range_tab(1).from_serial_number);
8691: WSH_DEBUG_SV.log(l_module_name, 'table to seral num', l_det_ser_range_tab(1).to_serial_number);
8692: END IF;
8693:
8694: IF l_det_ser_range_tab(1).from_serial_number IS NOT NULL
8687: ELSIF l_detail_ser_qty = 1
8688: THEN
8689: IF l_debug_on THEN
8690: WSH_DEBUG_SV.log(l_module_name, 'table from serial num', l_det_ser_range_tab(1).from_serial_number);
8691: WSH_DEBUG_SV.log(l_module_name, 'table to seral num', l_det_ser_range_tab(1).to_serial_number);
8692: END IF;
8693:
8694: IF l_det_ser_range_tab(1).from_serial_number IS NOT NULL
8695: THEN
8697: x_detail_rec.serial_number := l_det_ser_range_tab(1).from_serial_number;
8698: ELSE
8699: -- Record cannot exist without a from serial number
8700: IF l_debug_on THEN
8701: WSH_DEBUG_SV.logmsg(l_module_name, 'From serial number is null');
8702: END IF;
8703:
8704: RAISE fnd_api.g_exc_error;
8705: -- )
8733: -- Bug 4016863 : We generate a new transaction_temp_id and call
8734: -- Update_Marked_serial API later
8735: --
8736: IF l_debug_on THEN
8737: WSH_DEBUG_SV.logmsg(l_module_name,
8738: 'Generating txn temp ID for existing serial number');
8739: END IF;
8740: --
8741: SELECT mtl_material_transactions_s.NEXTVAL
8747: ELSE
8748: --{
8749: IF NOT l_stamp_ser_wdd THEN
8750: IF l_debug_on THEN
8751: WSH_DEBUG_SV.logmsg(l_module_name,
8752: 'generate transaction temp id');
8753: END IF;
8754: SELECT mtl_material_transactions_s.NEXTVAL
8755: INTO l_transaction_id
8763: -- )
8764: END IF; -- if l_detail_ser_count >=1
8765:
8766: IF l_debug_on THEN
8767: WSH_DEBUG_SV.log(l_module_name, 'Transaction id created', l_transaction_id);
8768: END IF;
8769:
8770: -- HW OPMCONV - Removed checking for l_process_flag
8771: IF (
8779: THEN
8780: -- (
8781:
8782: IF l_debug_on THEN
8783: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', x_detail_rec.serial_number);
8784: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', x_detail_rec.to_serial_number);
8785: END IF;
8786:
8787: --
8780: -- (
8781:
8782: IF l_debug_on THEN
8783: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', x_detail_rec.serial_number);
8784: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', x_detail_rec.to_serial_number);
8785: END IF;
8786:
8787: --
8788: IF l_debug_on THEN
8785: END IF;
8786:
8787: --
8788: IF l_debug_on THEN
8789: WSH_DEBUG_SV.log(l_module_name, 'inv control ser flag', l_inv_controls.ser_flag);
8790: END IF;
8791:
8792: -- Fix added to check the serial number before setting the message.
8793: -- If Serial Flag is N, need to set the message only if serial numbers are populated
8827: -- x_detail_rec.serial_number <> p_original_rec.serial_number)
8828: THEN
8829:
8830: IF l_debug_on THEN
8831: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UNMARK_SERIAL_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
8832: WSH_DEBUG_SV.log(l_module_name,'Case1',p_original_rec.serial_number);
8833: END IF;
8834: wsh_delivery_details_inv.unmark_serial_number(
8835: p_delivery_detail_id => p_in_detail_rec.delivery_detail_id,
8828: THEN
8829:
8830: IF l_debug_on THEN
8831: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UNMARK_SERIAL_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
8832: WSH_DEBUG_SV.log(l_module_name,'Case1',p_original_rec.serial_number);
8833: END IF;
8834: wsh_delivery_details_inv.unmark_serial_number(
8835: p_delivery_detail_id => p_in_detail_rec.delivery_detail_id,
8836: p_serial_number_code => l_inv_controls.serial_code,
8839: x_return_status => l_return_status,
8840: p_inventory_item_id => p_original_rec.inventory_item_id);
8841:
8842: IF l_debug_on THEN
8843: wsh_debug_sv.log(l_module_name, 'Return status after Unmark ', l_return_status);
8844: END IF;
8845:
8846: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
8847: RAISE fnd_api.g_exc_error;
8860: -- derive serial number from MSNT for this transaction temp id
8861: -- compare with x_detail_rec.serial_number
8862:
8863: IF l_debug_on THEN
8864: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UNMARK_SERIAL_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
8865: WSH_DEBUG_SV.log(l_module_name,'Case2',p_original_rec.transaction_temp_id);
8866: END IF;
8867: wsh_delivery_details_inv.unmark_serial_number(
8868: p_delivery_detail_id => p_in_detail_rec.delivery_detail_id,
8861: -- compare with x_detail_rec.serial_number
8862:
8863: IF l_debug_on THEN
8864: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UNMARK_SERIAL_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
8865: WSH_DEBUG_SV.log(l_module_name,'Case2',p_original_rec.transaction_temp_id);
8866: END IF;
8867: wsh_delivery_details_inv.unmark_serial_number(
8868: p_delivery_detail_id => p_in_detail_rec.delivery_detail_id,
8869: p_serial_number_code => l_inv_controls.serial_code,
8872: x_return_status => l_return_status,
8873: p_inventory_item_id => p_original_rec.inventory_item_id);
8874:
8875: IF l_debug_on THEN
8876: wsh_debug_sv.log(l_module_name, 'Return status after Unmark ', l_return_status);
8877: END IF;
8878:
8879: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
8880: RAISE fnd_api.g_exc_error;
8895: IF NOT l_update_attributes THEN
8896: IF l_inv_controls.ser_flag = 'Y' THEN
8897: IF l_det_ser_range_tab(l_det_index).to_serial_number IS NOT NULL THEN -- bug 1578114 condition added
8898: IF l_debug_on THEN
8899: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', l_det_ser_range_tab(l_det_index).to_serial_number);
8900: WSH_DEBUG_SV.log(l_module_name, 'Transaction Id', l_transaction_id);
8901: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_SERIAL_RANGE', WSH_DEBUG_SV.c_proc_level);
8902: END IF;
8903:
8896: IF l_inv_controls.ser_flag = 'Y' THEN
8897: IF l_det_ser_range_tab(l_det_index).to_serial_number IS NOT NULL THEN -- bug 1578114 condition added
8898: IF l_debug_on THEN
8899: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', l_det_ser_range_tab(l_det_index).to_serial_number);
8900: WSH_DEBUG_SV.log(l_module_name, 'Transaction Id', l_transaction_id);
8901: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_SERIAL_RANGE', WSH_DEBUG_SV.c_proc_level);
8902: END IF;
8903:
8904: --
8897: IF l_det_ser_range_tab(l_det_index).to_serial_number IS NOT NULL THEN -- bug 1578114 condition added
8898: IF l_debug_on THEN
8899: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', l_det_ser_range_tab(l_det_index).to_serial_number);
8900: WSH_DEBUG_SV.log(l_module_name, 'Transaction Id', l_transaction_id);
8901: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_SERIAL_RANGE', WSH_DEBUG_SV.c_proc_level);
8902: END IF;
8903:
8904: --
8905: -- Validates the Range of Serial Number
8921: );
8922:
8923: --
8924: IF l_debug_on THEN
8925: WSH_DEBUG_SV.log(l_module_name, 'Prefix',l_prefix);
8926: WSH_DEBUG_SV.log(l_module_name, 'Result',l_result);
8927: WSH_DEBUG_SV.log(l_module_name, 'Return Status',l_return_status);
8928: END IF;
8929:
8922:
8923: --
8924: IF l_debug_on THEN
8925: WSH_DEBUG_SV.log(l_module_name, 'Prefix',l_prefix);
8926: WSH_DEBUG_SV.log(l_module_name, 'Result',l_result);
8927: WSH_DEBUG_SV.log(l_module_name, 'Return Status',l_return_status);
8928: END IF;
8929:
8930: IF NOT l_result THEN
8923: --
8924: IF l_debug_on THEN
8925: WSH_DEBUG_SV.log(l_module_name, 'Prefix',l_prefix);
8926: WSH_DEBUG_SV.log(l_module_name, 'Result',l_result);
8927: WSH_DEBUG_SV.log(l_module_name, 'Return Status',l_return_status);
8928: END IF;
8929:
8930: IF NOT l_result THEN
8931: l_return_status := wsh_util_core.g_ret_sts_error;
8938: p_msg_data => l_msg_data
8939: );
8940: ELSE
8941: IF l_debug_on THEN
8942: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.VALIDATE_SERIAL', WSH_DEBUG_SV.c_proc_level);
8943: END IF;
8944:
8945: --
8946: wsh_delivery_details_inv.validate_serial(
8957: x_result => l_result
8958: );
8959: --
8960: IF l_debug_on THEN
8961: WSH_DEBUG_SV.log(l_module_name, 'Result',l_result);
8962: WSH_DEBUG_SV.log(l_module_name, 'Return Status',l_return_status);
8963: END IF;
8964: --
8965: IF NOT l_result THEN
8958: );
8959: --
8960: IF l_debug_on THEN
8961: WSH_DEBUG_SV.log(l_module_name, 'Result',l_result);
8962: WSH_DEBUG_SV.log(l_module_name, 'Return Status',l_return_status);
8963: END IF;
8964: --
8965: IF NOT l_result THEN
8966: l_return_status := wsh_util_core.g_ret_sts_error;
8976:
8977:
8978: ELSIF l_inv_controls.ser_flag = 'D' THEN
8979: IF l_debug_on THEN
8980: WSH_DEBUG_SV.log(l_module_name, 'to serial number', l_det_ser_range_tab(l_det_index).to_serial_number);
8981: END IF;
8982:
8983: IF (
8984: l_det_ser_range_tab(l_det_index).to_serial_number <>
8985: fnd_api.g_miss_char
8986: )
8987: AND l_det_ser_range_tab(l_det_index).to_serial_number IS NOT NULL THEN -- bug 1578114 condition added
8988: IF l_debug_on THEN
8989: WSH_DEBUG_SV.log(l_module_name, 'Transaction id created', l_transaction_id);
8990: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.CREATE_DYNAMIC_SERIAL_RANGE', WSH_DEBUG_SV.c_proc_level);
8991: END IF;
8992:
8993: --
8986: )
8987: AND l_det_ser_range_tab(l_det_index).to_serial_number IS NOT NULL THEN -- bug 1578114 condition added
8988: IF l_debug_on THEN
8989: WSH_DEBUG_SV.log(l_module_name, 'Transaction id created', l_transaction_id);
8990: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.CREATE_DYNAMIC_SERIAL_RANGE', WSH_DEBUG_SV.c_proc_level);
8991: END IF;
8992:
8993: --
8994: -- Creates/Validates the Range of Serial Number
9016: p_msg_data => l_msg_data
9017: );
9018: ELSE
9019: IF l_debug_on THEN
9020: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.CREATE_DYNAMIC_SERIAL', WSH_DEBUG_SV.c_proc_level);
9021: END IF;
9022:
9023: --
9024: wsh_delivery_details_inv.create_dynamic_serial(
9107: v35 := 'N';
9108: END IF;
9109:
9110: IF l_debug_on THEN
9111: WSH_DEBUG_SV.logmsg(l_module_name, 'Inserting record into msnt');
9112: END IF;
9113:
9114: INSERT INTO mtl_serial_numbers_temp
9115: (
9175: -- )
9176: END LOOP; -- while l_det_index of serial_range_tab is not null
9177:
9178: IF l_debug_on THEN
9179: WSH_DEBUG_SV.log(l_module_name, 'Transaction Id', l_transaction_id);
9180: END IF;
9181:
9182: IF NOT l_update_attributes THEN
9183: --{
9200: AND p_in_detail_rec.serial_number <> FND_API.G_MISS_CHAR
9201: THEN
9202: --
9203: IF l_debug_on THEN
9204: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program unit WSH_DELIVERY_DETAILS_INV.MARK_SERIAL_NUMBER', WSH_DEBUG_SV.c_proc_level);
9205: END IF;
9206:
9207: --
9208: wsh_delivery_details_inv.mark_serial_number(
9228: -- newly generated transaction_temp_id in the scenario where
9229: -- only the serial attributes are updated and not the serial #
9230: --
9231: IF l_debug_on THEN
9232: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UPDATE_MARKED_SERIAL',WSH_DEBUG_SV.C_PROC_LEVEL);
9233: END IF;
9234: --
9235: WSH_DELIVERY_DETAILS_INV.Update_Marked_Serial(
9236: p_from_serial_number => p_original_rec.serial_number,
9241: p_delivery_detail_id => x_detail_rec.delivery_detail_id, --RTV changes
9242: x_return_status => l_return_status);
9243: --
9244: IF l_debug_on THEN
9245: wsh_debug_sv.log(l_module_name, 'Return status after Update_Marked_Serial ', l_return_status);
9246: END IF;
9247: --
9248: IF l_return_status <> wsh_util_core.g_ret_sts_success THEN
9249: RAISE fnd_api.g_exc_error;
9260: END IF;
9261:
9262: IF NVL(x_detail_rec.shipped_quantity, 0) = 0 THEN
9263: IF l_debug_on THEN
9264: WSH_DEBUG_SV.logmsg(l_module_name, 'Zero or Null shipped qty');
9265: END IF;
9266:
9267: x_detail_rec.serial_number := NULL;
9268: x_detail_rec.to_serial_number := NULL;
9274: x_detail_rec.to_serial_number := NULL;
9275: END IF;
9276:
9277: IF l_debug_on THEN
9278: WSH_DEBUG_SV.log(l_module_name, 'transaction temp id', x_detail_rec.transaction_temp_id);
9279: WSH_DEBUG_SV.log(l_module_name, 'serial number', x_detail_rec.serial_number);
9280: WSH_DEBUG_SV.log(l_module_name, 'to_serial_number', x_detail_rec.to_serial_number);
9281: END IF;
9282: END IF; -- if check for validation level
9275: END IF;
9276:
9277: IF l_debug_on THEN
9278: WSH_DEBUG_SV.log(l_module_name, 'transaction temp id', x_detail_rec.transaction_temp_id);
9279: WSH_DEBUG_SV.log(l_module_name, 'serial number', x_detail_rec.serial_number);
9280: WSH_DEBUG_SV.log(l_module_name, 'to_serial_number', x_detail_rec.to_serial_number);
9281: END IF;
9282: END IF; -- if check for validation level
9283:
9276:
9277: IF l_debug_on THEN
9278: WSH_DEBUG_SV.log(l_module_name, 'transaction temp id', x_detail_rec.transaction_temp_id);
9279: WSH_DEBUG_SV.log(l_module_name, 'serial number', x_detail_rec.serial_number);
9280: WSH_DEBUG_SV.log(l_module_name, 'to_serial_number', x_detail_rec.to_serial_number);
9281: END IF;
9282: END IF; -- if check for validation level
9283:
9284: fnd_msg_pub.count_and_get(
9286: p_data => x_msg_data,
9287: p_encoded => fnd_api.g_false);
9288:
9289: IF l_debug_on THEN
9290: WSH_DEBUG_SV.pop(l_module_name);
9291: END IF;
9292: --
9293: EXCEPTION
9294: WHEN fnd_api.g_exc_error THEN
9298: p_encoded => fnd_api.g_false);
9299:
9300: --
9301: IF l_debug_on THEN
9302: WSH_DEBUG_SV.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', WSH_DEBUG_SV.c_excep_level);
9303: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
9304: END IF;
9305: --
9306: WHEN fnd_api.g_exc_unexpected_error THEN
9299:
9300: --
9301: IF l_debug_on THEN
9302: WSH_DEBUG_SV.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', WSH_DEBUG_SV.c_excep_level);
9303: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
9304: END IF;
9305: --
9306: WHEN fnd_api.g_exc_unexpected_error THEN
9307: ROLLBACK TO validate_det_line_grp;
9312: p_encoded => fnd_api.g_false);
9313:
9314: --
9315: IF l_debug_on THEN
9316: WSH_DEBUG_SV.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', WSH_DEBUG_SV.c_excep_level);
9317: WSH_DEBUG_SV.pop(l_module_name,
9318: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9319: END IF;
9320: --
9313:
9314: --
9315: IF l_debug_on THEN
9316: WSH_DEBUG_SV.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', WSH_DEBUG_SV.c_excep_level);
9317: WSH_DEBUG_SV.pop(l_module_name,
9318: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9319: END IF;
9320: --
9321: WHEN wsh_util_core.g_exc_warning THEN
9326: p_encoded => fnd_api.g_false);
9327:
9328: --
9329: IF l_debug_on THEN
9330: WSH_DEBUG_SV.logmsg(l_module_name,
9331: 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',
9332: WSH_DEBUG_SV.c_excep_level);
9333: WSH_DEBUG_SV.pop(l_module_name,
9334: 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9328: --
9329: IF l_debug_on THEN
9330: WSH_DEBUG_SV.logmsg(l_module_name,
9331: 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',
9332: WSH_DEBUG_SV.c_excep_level);
9333: WSH_DEBUG_SV.pop(l_module_name,
9334: 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9335: END IF;
9336: --
9329: IF l_debug_on THEN
9330: WSH_DEBUG_SV.logmsg(l_module_name,
9331: 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',
9332: WSH_DEBUG_SV.c_excep_level);
9333: WSH_DEBUG_SV.pop(l_module_name,
9334: 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9335: END IF;
9336: --
9337: WHEN OTHERS THEN
9346:
9347: --
9348:
9349: IF l_debug_on THEN
9350: WSH_DEBUG_SV.logmsg(l_module_name,
9351: 'Unexpected error has occured. Oracle error message is '
9352: || SQLERRM,
9353: WSH_DEBUG_SV.c_unexpec_err_level);
9354: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:OTHERS');
9349: IF l_debug_on THEN
9350: WSH_DEBUG_SV.logmsg(l_module_name,
9351: 'Unexpected error has occured. Oracle error message is '
9352: || SQLERRM,
9353: WSH_DEBUG_SV.c_unexpec_err_level);
9354: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:OTHERS');
9355: END IF;
9356: --
9357: END validate_detail_line;
9350: WSH_DEBUG_SV.logmsg(l_module_name,
9351: 'Unexpected error has occured. Oracle error message is '
9352: || SQLERRM,
9353: WSH_DEBUG_SV.c_unexpec_err_level);
9354: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:OTHERS');
9355: END IF;
9356: --
9357: END validate_detail_line;
9358:
9402: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
9403: --
9404: IF l_debug_on IS NULL
9405: THEN
9406: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9407: END IF;
9408: --
9409: SAVEPOINT VALIDATE_DET_CONTAINER_GRP;
9410: --
9408: --
9409: SAVEPOINT VALIDATE_DET_CONTAINER_GRP;
9410: --
9411: IF l_debug_on THEN
9412: WSH_DEBUG_SV.push(l_module_name);
9413: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
9414: END IF;
9415: -- Initialize API return status to success
9416: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9409: SAVEPOINT VALIDATE_DET_CONTAINER_GRP;
9410: --
9411: IF l_debug_on THEN
9412: WSH_DEBUG_SV.push(l_module_name);
9413: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
9414: END IF;
9415: -- Initialize API return status to success
9416: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9417: l_number_of_errors := 0;
9420: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_CONT_ITEM_LVL) = 1 ) THEN
9421: IF (x_detail_rec.inventory_item_id <> FND_API.G_MISS_NUM) THEN
9422: --
9423: IF l_debug_on THEN
9424: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_detail_rec.inventory_item_id);
9425: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_detail_rec.organization_id);
9426: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
9427: END IF;
9428: --
9421: IF (x_detail_rec.inventory_item_id <> FND_API.G_MISS_NUM) THEN
9422: --
9423: IF l_debug_on THEN
9424: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_detail_rec.inventory_item_id);
9425: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_detail_rec.organization_id);
9426: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
9427: END IF;
9428: --
9429: WSH_UTIL_VALIDATE.Validate_Item(
9422: --
9423: IF l_debug_on THEN
9424: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_detail_rec.inventory_item_id);
9425: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_detail_rec.organization_id);
9426: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
9427: END IF;
9428: --
9429: WSH_UTIL_VALIDATE.Validate_Item(
9430: p_inventory_item_id => x_detail_rec.inventory_item_id,
9473: p_encoded => FND_API.G_FALSE
9474: );
9475:
9476: IF l_debug_on THEN
9477: WSH_DEBUG_SV.pop(l_module_name);
9478: END IF;
9479:
9480: EXCEPTION
9481: WHEN e_invalid_delivered_qty THEN
9489: p_data => x_msg_data,
9490: p_encoded => FND_API.G_FALSE
9491: );
9492: IF l_debug_on THEN
9493: WSH_DEBUG_SV.logmsg(l_module_name,'E_INVALID_DELIVERED_QTY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9494: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION: E_INVALID_DELIVERED_QTY');
9495: END IF;
9496:
9497:
9490: p_encoded => FND_API.G_FALSE
9491: );
9492: IF l_debug_on THEN
9493: WSH_DEBUG_SV.logmsg(l_module_name,'E_INVALID_DELIVERED_QTY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9494: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION: E_INVALID_DELIVERED_QTY');
9495: END IF;
9496:
9497:
9498: WHEN FND_API.G_EXC_ERROR THEN
9506: );
9507: --
9508:
9509: IF l_debug_on THEN
9510: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9511: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9512: END IF;
9513:
9514: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9507: --
9508:
9509: IF l_debug_on THEN
9510: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9511: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9512: END IF;
9513:
9514: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9515: ROLLBACK TO VALIDATE_DET_CONTAINER_GRP;
9522: );
9523: --
9524:
9525: IF l_debug_on THEN
9526: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9527: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9528: END IF;
9529: --
9530: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9523: --
9524:
9525: IF l_debug_on THEN
9526: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9527: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9528: END IF;
9529: --
9530: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9531: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9536: p_encoded => FND_API.G_FALSE
9537: );
9538: --
9539: IF l_debug_on THEN
9540: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9541: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9542: END IF;
9543: --
9544: WHEN OTHERS THEN
9537: );
9538: --
9539: IF l_debug_on THEN
9540: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9541: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9542: END IF;
9543: --
9544: WHEN OTHERS THEN
9545: ROLLBACK TO VALIDATE_DET_CONTAINER_GRP;
9553: p_encoded => FND_API.G_FALSE
9554: );
9555:
9556: IF l_debug_on THEN
9557: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9558: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9559: END IF;
9560: --
9561: END Validate_Detail_Container;
9554: );
9555:
9556: IF l_debug_on THEN
9557: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9558: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9559: END IF;
9560: --
9561: END Validate_Detail_Container;
9562:
9613: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
9614: --
9615: IF l_debug_on IS NULL
9616: THEN
9617: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9618: END IF;
9619: --
9620: SAVEPOINT VALIDATE_DET_COMMON_GRP;
9621:
9619: --
9620: SAVEPOINT VALIDATE_DET_COMMON_GRP;
9621:
9622: IF l_debug_on THEN
9623: WSH_DEBUG_SV.push(l_module_name);
9624: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
9625: END IF;
9626: --
9627:
9620: SAVEPOINT VALIDATE_DET_COMMON_GRP;
9621:
9622: IF l_debug_on THEN
9623: WSH_DEBUG_SV.push(l_module_name);
9624: WSH_DEBUG_SV.log(l_module_name, 'Delivery Detail Id', x_detail_rec.delivery_detail_id);
9625: END IF;
9626: --
9627:
9628: -- Initialize API return status to success
9633: --HW OPMCONV - Removed checking for process org
9634:
9635: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_GROSS_WEIGHT_LVL) = 1 ) THEN
9636: IF l_debug_on THEN
9637: WSH_DEBUG_SV.log(l_module_name, 'Gross Weight', x_detail_rec.gross_weight);
9638: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.C_PROC_LEVEL);
9639: END IF;
9640: --Bug # 3266333
9641: wsh_util_validate.validate_negative(
9634:
9635: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_GROSS_WEIGHT_LVL) = 1 ) THEN
9636: IF l_debug_on THEN
9637: WSH_DEBUG_SV.log(l_module_name, 'Gross Weight', x_detail_rec.gross_weight);
9638: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.C_PROC_LEVEL);
9639: END IF;
9640: --Bug # 3266333
9641: wsh_util_validate.validate_negative(
9642: p_value => x_detail_rec.gross_weight,
9655:
9656: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_NET_WEIGHT_LVL) = 1 ) THEN
9657: --
9658: IF l_debug_on THEN
9659: WSH_DEBUG_SV.log(l_module_name, 'Net Weight', x_detail_rec.net_weight);
9660: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.C_PROC_LEVEL);
9661: END IF;
9662: --Bug # 3266333
9663: wsh_util_validate.validate_negative(
9656: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_NET_WEIGHT_LVL) = 1 ) THEN
9657: --
9658: IF l_debug_on THEN
9659: WSH_DEBUG_SV.log(l_module_name, 'Net Weight', x_detail_rec.net_weight);
9660: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.C_PROC_LEVEL);
9661: END IF;
9662: --Bug # 3266333
9663: wsh_util_validate.validate_negative(
9664: p_value => x_detail_rec.net_weight,
9678:
9679: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_VOLUME_LVL) = 1 ) THEN
9680: --
9681: IF l_debug_on THEN
9682: WSH_DEBUG_SV.log(l_module_name, 'Volume', x_detail_rec.volume);
9683: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.C_PROC_LEVEL);
9684: END IF;
9685: --Bug # 3266333
9686: wsh_util_validate.validate_negative(
9679: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_VOLUME_LVL) = 1 ) THEN
9680: --
9681: IF l_debug_on THEN
9682: WSH_DEBUG_SV.log(l_module_name, 'Volume', x_detail_rec.volume);
9683: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.C_PROC_LEVEL);
9684: END IF;
9685: --Bug # 3266333
9686: wsh_util_validate.validate_negative(
9687: p_value => x_detail_rec.volume,
9700:
9701: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_MASTER_SER_NUM_LVL) = 1 ) THEN
9702: IF(x_detail_rec.master_serial_number IS NOT NULL) THEN
9703: IF l_debug_on THEN
9704: WSH_DEBUG_SV.log(l_module_name, 'Original container Flag', p_original_rec.container_flag);
9705: WSH_DEBUG_SV.log(l_module_name, 'Master Serial Number', x_detail_rec.master_serial_number);
9706: END IF;
9707:
9708: -- Update of master serial number is allowed only if detail is a container
9701: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_MASTER_SER_NUM_LVL) = 1 ) THEN
9702: IF(x_detail_rec.master_serial_number IS NOT NULL) THEN
9703: IF l_debug_on THEN
9704: WSH_DEBUG_SV.log(l_module_name, 'Original container Flag', p_original_rec.container_flag);
9705: WSH_DEBUG_SV.log(l_module_name, 'Master Serial Number', x_detail_rec.master_serial_number);
9706: END IF;
9707:
9708: -- Update of master serial number is allowed only if detail is a container
9709: -- And if the container is the top most container
9738: -- Cannot set the inspection_Flag to N if it is already I or R
9739:
9740: IF x_detail_rec.inspection_flag IS NOT NULL THEN
9741: IF l_debug_on THEN
9742: WSH_DEBUG_SV.log(l_module_name, 'Original Inspec Flag', p_original_rec.inspection_flag);
9743: WSH_DEBUG_SV.log(l_module_name, 'Inspection Flag', x_detail_rec.inspection_flag);
9744: END IF;
9745:
9746: IF(x_detail_rec.inspection_flag = 'N' AND p_original_rec.inspection_flag IN ('I', 'R')) THEN
9739:
9740: IF x_detail_rec.inspection_flag IS NOT NULL THEN
9741: IF l_debug_on THEN
9742: WSH_DEBUG_SV.log(l_module_name, 'Original Inspec Flag', p_original_rec.inspection_flag);
9743: WSH_DEBUG_SV.log(l_module_name, 'Inspection Flag', x_detail_rec.inspection_flag);
9744: END IF;
9745:
9746: IF(x_detail_rec.inspection_flag = 'N' AND p_original_rec.inspection_flag IN ('I', 'R')) THEN
9747: x_detail_rec.inspection_flag := p_original_rec.inspection_flag;
9757: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_MASTER_LPN_ITEM_LVL) = 1) THEN
9758: IF x_detail_rec.master_container_item_id IS NOT NULL THEN
9759:
9760: IF l_debug_on THEN
9761: WSH_DEBUG_SV.log(l_module_name, 'Master cont item id', x_detail_rec.master_container_item_id);
9762: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
9763: END IF;
9764:
9765: WSH_UTIL_VALIDATE.Validate_Item(
9758: IF x_detail_rec.master_container_item_id IS NOT NULL THEN
9759:
9760: IF l_debug_on THEN
9761: WSH_DEBUG_SV.log(l_module_name, 'Master cont item id', x_detail_rec.master_container_item_id);
9762: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
9763: END IF;
9764:
9765: WSH_UTIL_VALIDATE.Validate_Item(
9766: p_inventory_item_id => x_detail_rec.master_container_item_id,
9783: IF(p_validation_tab(WSH_ACTIONS_LEVELS.C_DETAIL_LPN_ITEM_LVL) = 1) THEN
9784: IF x_detail_rec.detail_container_item_id IS NOT NULL THEN
9785:
9786: IF l_debug_on THEN
9787: WSH_DEBUG_SV.log(l_module_name, 'Detail cont item id', x_detail_rec.Detail_container_item_id);
9788: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
9789: END IF;
9790:
9791: WSH_UTIL_VALIDATE.Validate_Item(
9784: IF x_detail_rec.detail_container_item_id IS NOT NULL THEN
9785:
9786: IF l_debug_on THEN
9787: WSH_DEBUG_SV.log(l_module_name, 'Detail cont item id', x_detail_rec.Detail_container_item_id);
9788: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
9789: END IF;
9790:
9791: WSH_UTIL_VALIDATE.Validate_Item(
9792: p_inventory_item_id => x_detail_rec.detail_container_item_id,
9805: );
9806: END IF;
9807: END IF;
9808: IF l_debug_on THEN
9809: WSH_DEBUG_SV.log(l_module_name, 'x_detail_rec.delivered_quantity',x_detail_rec.delivered_quantity);
9810: END IF;
9811: -- HW OPMCONV - Removed branching
9812:
9813: --{
9827: p_encoded => FND_API.G_FALSE
9828: );
9829:
9830: IF l_debug_on THEN
9831: WSH_DEBUG_SV.pop(l_module_name);
9832: END IF;
9833:
9834: EXCEPTION
9835: WHEN FND_API.G_EXC_ERROR THEN
9842: p_encoded => FND_API.G_FALSE
9843: );
9844: --
9845: IF l_debug_on THEN
9846: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9847: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9848: END IF;
9849:
9850: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9843: );
9844: --
9845: IF l_debug_on THEN
9846: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9847: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9848: END IF;
9849:
9850: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9851: ROLLBACK TO VALIDATE_DET_COMMON_GRP;
9858: );
9859: --
9860:
9861: IF l_debug_on THEN
9862: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9863: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9864: END IF;
9865:
9866: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9859: --
9860:
9861: IF l_debug_on THEN
9862: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9863: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9864: END IF;
9865:
9866: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9867: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9872: p_encoded => FND_API.G_FALSE
9873: );
9874: --
9875: IF l_debug_on THEN
9876: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9877: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9878: END IF;
9879:
9880: WHEN OTHERS THEN
9873: );
9874: --
9875: IF l_debug_on THEN
9876: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9877: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9878: END IF;
9879:
9880: WHEN OTHERS THEN
9881: ROLLBACK TO VALIDATE_DET_COMMON_GRP;
9890: );
9891: --
9892:
9893: IF l_debug_on THEN
9894: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9895: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9896: END IF;
9897:
9898: END Validate_Detail_Common;
9891: --
9892:
9893: IF l_debug_on THEN
9894: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9895: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9896: END IF;
9897:
9898: END Validate_Detail_Common;
9899:
9933:
9934: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
9935: --
9936: IF l_debug_on IS NULL THEN
9937: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9938: END IF;
9939: --
9940: IF l_debug_on THEN
9941: WSH_DEBUG_SV.push(l_module_name);
9937: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9938: END IF;
9939: --
9940: IF l_debug_on THEN
9941: WSH_DEBUG_SV.push(l_module_name);
9942: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', p_transaction_temp_id);
9943: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', p_serial_number);
9944: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', p_to_serial_number);
9945: WSH_DEBUG_SV.log(l_module_name, 'Shipped Qty', p_shipped_quantity);
9938: END IF;
9939: --
9940: IF l_debug_on THEN
9941: WSH_DEBUG_SV.push(l_module_name);
9942: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', p_transaction_temp_id);
9943: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', p_serial_number);
9944: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', p_to_serial_number);
9945: WSH_DEBUG_SV.log(l_module_name, 'Shipped Qty', p_shipped_quantity);
9946: END IF;
9939: --
9940: IF l_debug_on THEN
9941: WSH_DEBUG_SV.push(l_module_name);
9942: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', p_transaction_temp_id);
9943: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', p_serial_number);
9944: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', p_to_serial_number);
9945: WSH_DEBUG_SV.log(l_module_name, 'Shipped Qty', p_shipped_quantity);
9946: END IF;
9947: --
9940: IF l_debug_on THEN
9941: WSH_DEBUG_SV.push(l_module_name);
9942: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', p_transaction_temp_id);
9943: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', p_serial_number);
9944: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', p_to_serial_number);
9945: WSH_DEBUG_SV.log(l_module_name, 'Shipped Qty', p_shipped_quantity);
9946: END IF;
9947: --
9948:
9941: WSH_DEBUG_SV.push(l_module_name);
9942: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', p_transaction_temp_id);
9943: WSH_DEBUG_SV.log(l_module_name, 'Serial Number', p_serial_number);
9944: WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', p_to_serial_number);
9945: WSH_DEBUG_SV.log(l_module_name, 'Shipped Qty', p_shipped_quantity);
9946: END IF;
9947: --
9948:
9949: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9966:
9967: x_serial_qty := NVL(l_serial_qty.serial_qty, 0);
9968:
9969: IF l_debug_on THEN
9970: wsh_debug_sv.log(l_module_name, 'Serial Qty', x_serial_qty);
9971: WSH_DEBUG_SV.pop(l_module_name);
9972: END IF;
9973:
9974:
9967: x_serial_qty := NVL(l_serial_qty.serial_qty, 0);
9968:
9969: IF l_debug_on THEN
9970: wsh_debug_sv.log(l_module_name, 'Serial Qty', x_serial_qty);
9971: WSH_DEBUG_SV.pop(l_module_name);
9972: END IF;
9973:
9974:
9975: EXCEPTION
9975: EXCEPTION
9976: WHEN FND_API.G_EXC_ERROR THEN
9977: x_return_status := FND_API.G_RET_STS_ERROR ;
9978: IF l_debug_on THEN
9979: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9980: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9981: END IF;
9982:
9983: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9976: WHEN FND_API.G_EXC_ERROR THEN
9977: x_return_status := FND_API.G_RET_STS_ERROR ;
9978: IF l_debug_on THEN
9979: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9980: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
9981: END IF;
9982:
9983: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9984: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9982:
9983: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9984: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9985: IF l_debug_on THEN
9986: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9987: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9988: END IF;
9989:
9990: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9983: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9984: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
9985: IF l_debug_on THEN
9986: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9987: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9988: END IF;
9989:
9990: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9991: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9989:
9990: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9991: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9992: IF l_debug_on THEN
9993: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9994: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9995: END IF;
9996:
9997: WHEN OTHERS THEN
9990: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
9991: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
9992: IF l_debug_on THEN
9993: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9994: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
9995: END IF;
9996:
9997: WHEN OTHERS THEN
9998: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10000: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Get_Serial_Quantity');
10001: --
10002:
10003: IF l_debug_on THEN
10004: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10005: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10006: END IF;
10007:
10008: END get_serial_quantity;
10001: --
10002:
10003: IF l_debug_on THEN
10004: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10005: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10006: END IF;
10007:
10008: END get_serial_quantity;
10009:
10099: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10100: --
10101: IF l_debug_on IS NULL
10102: THEN
10103: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10104: END IF;
10105: --
10106:
10107: --
10107: --
10108: -- Debug Statements
10109: --
10110: IF l_debug_on THEN
10111: WSH_DEBUG_SV.push(l_module_name);
10112: --
10113: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
10114: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
10115: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
10109: --
10110: IF l_debug_on THEN
10111: WSH_DEBUG_SV.push(l_module_name);
10112: --
10113: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
10114: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
10115: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
10116: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
10117: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
10110: IF l_debug_on THEN
10111: WSH_DEBUG_SV.push(l_module_name);
10112: --
10113: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
10114: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
10115: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
10116: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
10117: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
10118: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
10111: WSH_DEBUG_SV.push(l_module_name);
10112: --
10113: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
10114: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
10115: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
10116: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
10117: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
10118: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
10119: END IF;
10112: --
10113: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
10114: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
10115: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
10116: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
10117: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
10118: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
10119: END IF;
10120: --
10113: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION_NUMBER',P_API_VERSION_NUMBER);
10114: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
10115: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
10116: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
10117: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
10118: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
10119: END IF;
10120: --
10121:
10114: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
10115: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
10116: WSH_DEBUG_SV.log(l_module_name, 'Caller', p_In_rec.caller);
10117: WSH_DEBUG_SV.log(l_module_name, 'Action Code', p_In_rec.action_code);
10118: WSH_DEBUG_SV.log(l_module_name,'Input Table count', p_detail_info_tab.count);
10119: END IF;
10120: --
10121:
10122: -- Initialize message list if p_init_msg_list is set to TRUE.
10138: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
10139: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'CALLER');
10140: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
10141: IF l_debug_on THEN
10142: wsh_debug_sv.logmsg(l_module_name,'Null Caller');
10143: END IF;
10144: RAISE FND_API.G_EXC_ERROR;
10145: END IF;
10146:
10148: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
10149: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'ACTION_CODE');
10150: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
10151: IF l_debug_on THEN
10152: wsh_debug_sv.logmsg(l_module_name,'Null Action Code');
10153: END IF;
10154: RAISE FND_API.G_EXC_ERROR;
10155: ELSIF(p_In_rec.action_code NOT IN('CREATE', 'UPDATE', 'CANCEL')
10156: OR (p_In_rec.action_code = 'CANCEL' AND p_In_rec.caller <> 'WSH_INBOUND')) THEN
10157: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_ACTION_CODE');
10158: FND_MESSAGE.SET_TOKEN('ACT_CODE',p_In_rec.action_code );
10159: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error, l_module_name);
10160: IF l_debug_on THEN
10161: wsh_debug_sv.logmsg(l_module_name,'WSH_INVALID_ACTION_CODE');
10162: END IF;
10163: RAISE FND_API.G_EXC_ERROR;
10164: END IF;
10165:
10165:
10166: -- Set Validation Level
10167:
10168: IF l_debug_on THEN
10169: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_ACTIONS_LEVELS.SET_VALIDATION_LEVEL',WSH_DEBUG_SV.C_PROC_LEVEL);
10170: END IF;
10171: --
10172: wsh_actions_levels.set_validation_level(
10173: p_entity => 'DLVB',
10201: FETCH det_to_del_Cur INTO l_delivery_id;
10202: CLOSE det_to_del_Cur;
10203:
10204: IF l_debug_on THEN
10205: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.GET_DISABLED_LIST',WSH_DEBUG_SV.C_PROC_LEVEL);
10206: END IF;
10207: --
10208:
10209: IF p_In_rec.caller LIKE 'WMS%' AND p_in_rec.action_code ='UPDATE'
10210: THEN
10211: l_weight_uom_code := p_detail_info_tab(l_index).weight_uom_code;
10212: l_volume_uom_code := p_detail_info_tab(l_index).volume_uom_code;
10213: IF l_debug_on THEN
10214: WSH_DEBUG_SV.log(l_module_name,'l_weight_uom_code',
10215: l_weight_uom_code);
10216: WSH_DEBUG_SV.log(l_module_name,'l_volume_uom_code',
10217: l_volume_uom_code);
10218: END IF;
10212: l_volume_uom_code := p_detail_info_tab(l_index).volume_uom_code;
10213: IF l_debug_on THEN
10214: WSH_DEBUG_SV.log(l_module_name,'l_weight_uom_code',
10215: l_weight_uom_code);
10216: WSH_DEBUG_SV.log(l_module_name,'l_volume_uom_code',
10217: l_volume_uom_code);
10218: END IF;
10219:
10220: END IF;
10276: x_num_warnings => l_loop_num_warn,
10277: x_num_errors => l_loop_num_error
10278: );
10279: IF l_debug_on THEN
10280: WSH_DEBUG_SV.log(l_module_name,'net_weight',
10281: l_delivery_detail_rec.net_weight);
10282: WSH_DEBUG_SV.log(l_module_name,'gross_weight',
10283: l_delivery_detail_rec.gross_weight);
10284: WSH_DEBUG_SV.log(l_module_name,'database uom',
10278: );
10279: IF l_debug_on THEN
10280: WSH_DEBUG_SV.log(l_module_name,'net_weight',
10281: l_delivery_detail_rec.net_weight);
10282: WSH_DEBUG_SV.log(l_module_name,'gross_weight',
10283: l_delivery_detail_rec.gross_weight);
10284: WSH_DEBUG_SV.log(l_module_name,'database uom',
10285: l_delivery_detail_rec.weight_uom_code);
10286: WSH_DEBUG_SV.log(l_module_name,'item_id',
10280: WSH_DEBUG_SV.log(l_module_name,'net_weight',
10281: l_delivery_detail_rec.net_weight);
10282: WSH_DEBUG_SV.log(l_module_name,'gross_weight',
10283: l_delivery_detail_rec.gross_weight);
10284: WSH_DEBUG_SV.log(l_module_name,'database uom',
10285: l_delivery_detail_rec.weight_uom_code);
10286: WSH_DEBUG_SV.log(l_module_name,'item_id',
10287: l_delivery_detail_rec.inventory_item_id);
10288: END IF;
10282: WSH_DEBUG_SV.log(l_module_name,'gross_weight',
10283: l_delivery_detail_rec.gross_weight);
10284: WSH_DEBUG_SV.log(l_module_name,'database uom',
10285: l_delivery_detail_rec.weight_uom_code);
10286: WSH_DEBUG_SV.log(l_module_name,'item_id',
10287: l_delivery_detail_rec.inventory_item_id);
10288: END IF;
10289:
10290: END IF;
10319: x_num_warnings => l_loop_num_warn,
10320: x_num_errors => l_loop_num_error
10321: );
10322: IF l_debug_on THEN
10323: WSH_DEBUG_SV.log(l_module_name,'volume',
10324: l_delivery_detail_rec.volume);
10325: WSH_DEBUG_SV.log(l_module_name,'filled_volume',
10326: l_delivery_detail_rec.filled_volume);
10327: WSH_DEBUG_SV.log(l_module_name,'database uom',
10321: );
10322: IF l_debug_on THEN
10323: WSH_DEBUG_SV.log(l_module_name,'volume',
10324: l_delivery_detail_rec.volume);
10325: WSH_DEBUG_SV.log(l_module_name,'filled_volume',
10326: l_delivery_detail_rec.filled_volume);
10327: WSH_DEBUG_SV.log(l_module_name,'database uom',
10328: l_delivery_detail_rec.volume_uom_code);
10329: WSH_DEBUG_SV.log(l_module_name,'item_id',
10323: WSH_DEBUG_SV.log(l_module_name,'volume',
10324: l_delivery_detail_rec.volume);
10325: WSH_DEBUG_SV.log(l_module_name,'filled_volume',
10326: l_delivery_detail_rec.filled_volume);
10327: WSH_DEBUG_SV.log(l_module_name,'database uom',
10328: l_delivery_detail_rec.volume_uom_code);
10329: WSH_DEBUG_SV.log(l_module_name,'item_id',
10330: l_delivery_detail_rec.inventory_item_id);
10331: END IF;
10325: WSH_DEBUG_SV.log(l_module_name,'filled_volume',
10326: l_delivery_detail_rec.filled_volume);
10327: WSH_DEBUG_SV.log(l_module_name,'database uom',
10328: l_delivery_detail_rec.volume_uom_code);
10329: WSH_DEBUG_SV.log(l_module_name,'item_id',
10330: l_delivery_detail_rec.inventory_item_id);
10331: END IF;
10332: END IF;
10333:
10336: EXCEPTION
10337: WHEN FND_API.G_EXC_ERROR THEN
10338: ROLLBACK TO before_det_disabled_grp;
10339: IF l_debug_on THEN
10340: wsh_debug_sv.logmsg(l_module_name, 'g exc error');
10341: END IF;
10342: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10343: ROLLBACK TO before_det_disabled_grp;
10344: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
10352: l_index := p_detail_info_tab.NEXT(l_index);
10353: END LOOP;
10354:
10355: IF l_debug_on THEN
10356: wsh_debug_sv.log(l_module_name, 'Number of errors after loop', l_loop_num_error);
10357: wsh_debug_sv.log(l_module_name, 'New table count', l_detail_info_tab.count);
10358: END IF;
10359:
10360: -- For create container, the table count will be zero
10353: END LOOP;
10354:
10355: IF l_debug_on THEN
10356: wsh_debug_sv.log(l_module_name, 'Number of errors after loop', l_loop_num_error);
10357: wsh_debug_sv.log(l_module_name, 'New table count', l_detail_info_tab.count);
10358: END IF;
10359:
10360: -- For create container, the table count will be zero
10361: -- Should not set error for that container case
10362: --bmso check the case where container is created and the detail_info_tab > 0
10363: IF p_detail_info_tab.count > 0 THEN
10364: IF l_loop_num_error = p_detail_info_tab.count THEN
10365: IF l_debug_on THEN
10366: wsh_debug_sv.logmsg(l_module_name, 'get disabled list fail all records');
10367: END IF;
10368: RAISE FND_API.G_EXC_ERROR;
10369: ELSE
10370: l_number_of_warnings := l_loop_num_error;
10375: -- if the validation level for disabled list is turned off
10376: -- then we initialize the local table using the input table directly
10377: -- this will be applicable when caller is WSHFSTRX.
10378: IF l_debug_on THEN
10379: wsh_debug_sv.logmsg(l_module_name, 'Get Disabled turned off');
10380: END IF;
10381: l_detail_info_tab := p_detail_info_tab;
10382: --
10383: END IF; -- if check for C_DISABLED_LIST_LVL
10384:
10385: IF(p_in_rec.action_code ='UPDATE' AND l_detail_info_tab.count < 1) THEN
10386: -- Should not proceed further
10387: IF l_debug_on THEN
10388: wsh_debug_sv.logmsg(l_module_name,'Table Count Zero');
10389: END IF;
10390: RAISE FND_API.G_EXC_ERROR;
10391: END IF;
10392:
10440: IF( WSH_UTIL_CORE.FTE_Is_Installed = 'Y') THEN
10441: IF l_details_marked.count > 0 THEN
10442: --
10443: IF l_debug_on THEN
10444: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
10445: END IF;
10446: --
10447: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
10448: p_entity_type => 'DELIVERY_DETAIL',
10468: IF l_valid_index_tab.COUNT <> l_detail_info_tab.COUNT THEN
10469: --
10470: IF l_debug_on THEN
10471: --
10472: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR not all line are validated successfully',WSH_DEBUG_SV.C_PROC_LEVEL);
10473: WSH_DEBUG_SV.log(l_module_name,'valid count',l_valid_index_tab.COUNT);
10474: WSH_DEBUG_SV.log(l_module_name,'total count',l_detail_info_tab.COUNT);
10475: --
10476: END IF;
10469: --
10470: IF l_debug_on THEN
10471: --
10472: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR not all line are validated successfully',WSH_DEBUG_SV.C_PROC_LEVEL);
10473: WSH_DEBUG_SV.log(l_module_name,'valid count',l_valid_index_tab.COUNT);
10474: WSH_DEBUG_SV.log(l_module_name,'total count',l_detail_info_tab.COUNT);
10475: --
10476: END IF;
10477: --
10470: IF l_debug_on THEN
10471: --
10472: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR not all line are validated successfully',WSH_DEBUG_SV.C_PROC_LEVEL);
10473: WSH_DEBUG_SV.log(l_module_name,'valid count',l_valid_index_tab.COUNT);
10474: WSH_DEBUG_SV.log(l_module_name,'total count',l_detail_info_tab.COUNT);
10475: --
10476: END IF;
10477: --
10478: RAISE FND_API.G_EXC_ERROR;
10516: END IF;
10517:
10518: IF l_number_of_warnings > 0 THEN
10519: IF l_debug_on THEN
10520: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
10521: END IF;
10522:
10523: RAISE wsh_util_core.g_exc_warning;
10524: END IF;
10525:
10526: -- Standard check of p_commit.
10527: IF FND_API.To_Boolean( p_commit ) THEN
10528: IF(l_debug_on) THEN
10529: wsh_debug_sv.logmsg(l_module_name, 'Commit Work');
10530: END IF;
10531: --
10532: -- Start code for Bugfix 4070732
10533: --
10532: -- Start code for Bugfix 4070732
10533: --
10534: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10535: IF l_debug_on THEN
10536: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10537: END IF;
10538:
10539: l_reset_flags := FALSE;
10540:
10541: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
10542: x_return_status => l_return_status);
10543:
10544: IF l_debug_on THEN
10545: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10546: END IF;
10547:
10548: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
10549: RAISE FND_API.G_EXC_ERROR;
10569:
10570: IF FND_API.TO_BOOLEAN(p_commit) THEN
10571:
10572: IF l_debug_on THEN
10573: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10574: END IF;
10575:
10576: WSH_UTIL_CORE.reset_stops_for_load_tender(p_reset_flags => TRUE,
10577: x_return_status => l_return_status);
10577: x_return_status => l_return_status);
10578: ELSE
10579:
10580: IF l_debug_on THEN
10581: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10582: END IF;
10583:
10584: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
10585: x_return_status => l_return_status);
10585: x_return_status => l_return_status);
10586: END IF;
10587:
10588: IF l_debug_on THEN
10589: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10590: END IF;
10591:
10592:
10593: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10615: );
10616:
10617:
10618: IF l_debug_on THEN
10619: WSH_DEBUG_SV.pop(l_module_name);
10620: END IF;
10621: --
10622: EXCEPTION
10623: WHEN FND_API.G_EXC_ERROR THEN
10631: --{
10632: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10633: --{
10634: IF l_debug_on THEN
10635: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10636: END IF;
10637:
10638: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10639: x_return_status => l_return_status);
10638: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10639: x_return_status => l_return_status);
10640:
10641: IF l_debug_on THEN
10642: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10643: END IF;
10644:
10645: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
10646: x_return_status := l_return_status;
10662:
10663:
10664: --
10665: IF l_debug_on THEN
10666: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10667: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10668: END IF;
10669: --
10670: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10663:
10664: --
10665: IF l_debug_on THEN
10666: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10667: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10668: END IF;
10669: --
10670: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10671: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10678: --{
10679: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10680: --{
10681: IF l_debug_on THEN
10682: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10683: END IF;
10684:
10685: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10686: x_return_status => l_return_status);
10685: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10686: x_return_status => l_return_status);
10687:
10688: IF l_debug_on THEN
10689: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10690: END IF;
10691: --}
10692: END IF;
10693: --}
10705:
10706:
10707: --
10708: IF l_debug_on THEN
10709: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10710: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10711: END IF;
10712: --
10713: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10706:
10707: --
10708: IF l_debug_on THEN
10709: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10710: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10711: END IF;
10712: --
10713: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10714: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10717: --
10718: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
10719: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10720: IF l_debug_on THEN
10721: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10722: END IF;
10723:
10724: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
10725: x_return_status => l_return_status);
10724: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
10725: x_return_status => l_return_status);
10726:
10727: IF l_debug_on THEN
10728: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10729: END IF;
10730:
10731: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10732: x_return_status := l_return_status;
10753:
10754:
10755: --
10756: IF l_debug_on THEN
10757: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10758: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10759: END IF;
10760: --
10761: WHEN mark_reprice_error then
10754:
10755: --
10756: IF l_debug_on THEN
10757: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10758: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10759: END IF;
10760: --
10761: WHEN mark_reprice_error then
10762: FND_MESSAGE.Set_Name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
10767: --
10768: IF upper(WSH_UTIL_CORE.G_START_OF_SESSION_API) = upper(l_api_session_name) THEN
10769: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10770: IF l_debug_on THEN
10771: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10772: END IF;
10773:
10774: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
10775: x_return_status => l1_return_status);
10774: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => TRUE,
10775: x_return_status => l1_return_status);
10776:
10777: IF l_debug_on THEN
10778: WSH_DEBUG_SV.log(l_module_name,'l1_return_status',l1_return_status);
10779: END IF;
10780:
10781: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
10782: IF l1_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10811: --
10812:
10813: --
10814: IF l_debug_on THEN
10815: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10816: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
10817: END IF;
10818: --
10819: WHEN OTHERS THEN
10812:
10813: --
10814: IF l_debug_on THEN
10815: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10816: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
10817: END IF;
10818: --
10819: WHEN OTHERS THEN
10820: ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
10829: --{
10830: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
10831: --{
10832: IF l_debug_on THEN
10833: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
10834: END IF;
10835:
10836: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10837: x_return_status => l_return_status);
10836: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
10837: x_return_status => l_return_status);
10838:
10839: IF l_debug_on THEN
10840: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
10841: END IF;
10842: --}
10843: END IF;
10844: --}
10855: --
10856:
10857:
10858: IF l_debug_on THEN
10859: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10860: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10861: END IF;
10862: --
10863: END Create_Update_Delivery_Detail;
10856:
10857:
10858: IF l_debug_on THEN
10859: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10860: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10861: END IF;
10862: --
10863: END Create_Update_Delivery_Detail;
10864:
10897:
10898: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10899: --
10900: IF l_debug_on IS NULL THEN
10901: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10902: END IF;
10903: --
10904: IF l_debug_on THEN
10905: WSH_DEBUG_SV.push(l_module_name);
10901: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10902: END IF;
10903: --
10904: IF l_debug_on THEN
10905: WSH_DEBUG_SV.push(l_module_name);
10906: WSH_DEBUG_SV.LOG(l_module_name, 'Count of p_line_rows-', p_line_rows.count);
10907: END IF;
10908: --
10909: x_return_status := FND_API.G_RET_STS_SUCCESS;
10902: END IF;
10903: --
10904: IF l_debug_on THEN
10905: WSH_DEBUG_SV.push(l_module_name);
10906: WSH_DEBUG_SV.LOG(l_module_name, 'Count of p_line_rows-', p_line_rows.count);
10907: END IF;
10908: --
10909: x_return_status := FND_API.G_RET_STS_SUCCESS;
10910:
10915: END LOOP;
10916: l_action_rec.action := 'MATCH_GROUPS';
10917:
10918: IF l_debug_on THEN
10919: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups', WSH_DEBUG_SV.C_PROC_LEVEL);
10920: END IF;
10921: WSH_DELIVERY_AUTOCREATE.Find_Matching_Groups (
10922: p_attr_tab => l_attr_tab,
10923: p_action_rec => l_action_rec,
10961: END LOOP;
10962: --bug 7171766 till here
10963:
10964: IF l_debug_on THEN
10965: WSH_DEBUG_SV.LOG(l_module_name, 'Count of x_grouping_rows -', x_grouping_rows.count);
10966: WSH_DEBUG_SV.LOG(l_module_name, 'x_return_status', x_return_status);
10967: WSH_DEBUG_SV.pop(l_module_name);
10968: END IF;
10969:
10962: --bug 7171766 till here
10963:
10964: IF l_debug_on THEN
10965: WSH_DEBUG_SV.LOG(l_module_name, 'Count of x_grouping_rows -', x_grouping_rows.count);
10966: WSH_DEBUG_SV.LOG(l_module_name, 'x_return_status', x_return_status);
10967: WSH_DEBUG_SV.pop(l_module_name);
10968: END IF;
10969:
10970: EXCEPTION
10963:
10964: IF l_debug_on THEN
10965: WSH_DEBUG_SV.LOG(l_module_name, 'Count of x_grouping_rows -', x_grouping_rows.count);
10966: WSH_DEBUG_SV.LOG(l_module_name, 'x_return_status', x_return_status);
10967: WSH_DEBUG_SV.pop(l_module_name);
10968: END IF;
10969:
10970: EXCEPTION
10971: WHEN FND_API.G_EXC_ERROR THEN
10970: EXCEPTION
10971: WHEN FND_API.G_EXC_ERROR THEN
10972: x_return_status := FND_API.G_RET_STS_ERROR ;
10973: IF l_debug_on THEN
10974: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10975: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10976: END IF;
10977:
10978: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10971: WHEN FND_API.G_EXC_ERROR THEN
10972: x_return_status := FND_API.G_RET_STS_ERROR ;
10973: IF l_debug_on THEN
10974: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10975: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
10976: END IF;
10977:
10978: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10979: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10977:
10978: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10979: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10980: IF l_debug_on THEN
10981: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10982: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10983: END IF;
10984:
10985: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10978: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10979: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
10980: IF l_debug_on THEN
10981: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10982: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
10983: END IF;
10984:
10985: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10986: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10984:
10985: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10986: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10987: IF l_debug_on THEN
10988: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10989: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10990: END IF;
10991:
10992: WHEN OTHERS THEN
10985: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
10986: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
10987: IF l_debug_on THEN
10988: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10989: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
10990: END IF;
10991:
10992: WHEN OTHERS THEN
10993: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10994: wsh_util_core.add_message(x_return_status, l_module_name);
10995: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Get_Carton_Grouping');
10996: --
10997: IF l_debug_on THEN
10998: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10999: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11000: END IF;
11001: END Get_Carton_Grouping;
11002:
10995: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Get_Carton_Grouping');
10996: --
10997: IF l_debug_on THEN
10998: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10999: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11000: END IF;
11001: END Get_Carton_Grouping;
11002:
11003: END WSH_DELIVERY_DETAILS_GRP;