[Home] [Help]
287: ins_rows NUMBER := 0;
288: del_rows NUMBER := 0;
289: upd_rows NUMBER := 0;
290: --
291: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
292: --
293: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'TRANSFER_SERIAL_NUMBERS_PVT';
294: --
295:
295:
296: BEGIN
297: --
298: IF l_debug_on THEN
299: WSH_DEBUG_SV.push(l_module_name);
300: --
301: WSH_DEBUG_SV.log(l_module_name,'p_transfer_param',p_transfer_param);
302: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
303: WSH_DEBUG_SV.log(l_module_name,'p_interfacing',p_interfacing);
297: --
298: IF l_debug_on THEN
299: WSH_DEBUG_SV.push(l_module_name);
300: --
301: WSH_DEBUG_SV.log(l_module_name,'p_transfer_param',p_transfer_param);
302: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
303: WSH_DEBUG_SV.log(l_module_name,'p_interfacing',p_interfacing);
304: END IF;
305: --
298: IF l_debug_on THEN
299: WSH_DEBUG_SV.push(l_module_name);
300: --
301: WSH_DEBUG_SV.log(l_module_name,'p_transfer_param',p_transfer_param);
302: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
303: WSH_DEBUG_SV.log(l_module_name,'p_interfacing',p_interfacing);
304: END IF;
305: --
306:
299: WSH_DEBUG_SV.push(l_module_name);
300: --
301: WSH_DEBUG_SV.log(l_module_name,'p_transfer_param',p_transfer_param);
302: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
303: WSH_DEBUG_SV.log(l_module_name,'p_interfacing',p_interfacing);
304: END IF;
305: --
306:
307: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
506: END IF;
507: END IF;
508:
509: IF l_debug_on THEN
510: WSH_DEBUG_SV.log(l_module_name,'Numbers of rows inserted into wsh_serial_numbers: '|| to_char(ins_rows) ||
511: ', Number of rows deleted from mtl_serial_numbers_temp: '|| to_char(del_rows) ||
512: ', Number of rows updated in wsh_delivery_details: '|| to_char(upd_rows) );
513: WSH_DEBUG_SV.pop(l_module_name);
514: END IF;
509: IF l_debug_on THEN
510: WSH_DEBUG_SV.log(l_module_name,'Numbers of rows inserted into wsh_serial_numbers: '|| to_char(ins_rows) ||
511: ', Number of rows deleted from mtl_serial_numbers_temp: '|| to_char(del_rows) ||
512: ', Number of rows updated in wsh_delivery_details: '|| to_char(upd_rows) );
513: WSH_DEBUG_SV.pop(l_module_name);
514: END IF;
515:
516: EXCEPTION
517: WHEN OTHERS THEN
530: IF c_get_attr_msn%ISOPEN THEN
531: CLOSE c_get_attr_msn;
532: END IF;
533: IF l_debug_on THEN
534: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| substr(SQLERRM,1,200),WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
535: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
536: END IF;
537: wsh_util_core.default_handler('WSH_SHIP_CONFIRM_ACTIONS.TRANSFER_SERIAL_NUMBERS_PVT');
538: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
531: CLOSE c_get_attr_msn;
532: END IF;
533: IF l_debug_on THEN
534: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| substr(SQLERRM,1,200),WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
535: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
536: END IF;
537: wsh_util_core.default_handler('WSH_SHIP_CONFIRM_ACTIONS.TRANSFER_SERIAL_NUMBERS_PVT');
538: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
539:
562: p_interfacing IN VARCHAR2,
563: x_return_status OUT NOCOPY VARCHAR2) IS
564:
565: --
566: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
567: --
568: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'TRANSFER_SERIAL_NUMBERS';
569: --
570:
570:
571: BEGIN
572: --
573: IF l_debug_on THEN
574: WSH_DEBUG_SV.push(l_module_name);
575: --
576: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
577: WSH_DEBUG_SV.log(l_module_name,'p_interfacing',p_interfacing);
578: END IF;
572: --
573: IF l_debug_on THEN
574: WSH_DEBUG_SV.push(l_module_name);
575: --
576: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
577: WSH_DEBUG_SV.log(l_module_name,'p_interfacing',p_interfacing);
578: END IF;
579: --
580:
573: IF l_debug_on THEN
574: WSH_DEBUG_SV.push(l_module_name);
575: --
576: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
577: WSH_DEBUG_SV.log(l_module_name,'p_interfacing',p_interfacing);
578: END IF;
579: --
580:
581: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
600: p_interfacing => p_interfacing,
601: x_return_status => x_return_status );
602:
603: IF l_debug_on THEN
604: WSH_DEBUG_SV.pop(l_module_name);
605: END IF;
606:
607: EXCEPTION
608: WHEN OTHERS THEN
606:
607: EXCEPTION
608: WHEN OTHERS THEN
609: IF l_debug_on THEN
610: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| substr(SQLERRM,1,200),WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
611: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
612: END IF;
613: wsh_util_core.default_handler('WSH_SHIP_CONFIRM_ACTIONS.TRANSFER_SERIAL_NUMBERS');
614: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
607: EXCEPTION
608: WHEN OTHERS THEN
609: IF l_debug_on THEN
610: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| substr(SQLERRM,1,200),WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
611: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
612: END IF;
613: wsh_util_core.default_handler('WSH_SHIP_CONFIRM_ACTIONS.TRANSFER_SERIAL_NUMBERS');
614: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
615:
643: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
644: --
645: IF l_debug_on IS NULL
646: THEN
647: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
648: END IF;
649: --
650: IF l_debug_on THEN
651: WSH_DEBUG_SV.push(l_module_name);
647: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
648: END IF;
649: --
650: IF l_debug_on THEN
651: WSH_DEBUG_SV.push(l_module_name);
652: --
653: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
654: WSH_DEBUG_SV.log(l_module_name,'Submitting the request');
655: l_log_level := 1;
649: --
650: IF l_debug_on THEN
651: WSH_DEBUG_SV.push(l_module_name);
652: --
653: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
654: WSH_DEBUG_SV.log(l_module_name,'Submitting the request');
655: l_log_level := 1;
656: END IF;
657: --
650: IF l_debug_on THEN
651: WSH_DEBUG_SV.push(l_module_name);
652: --
653: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
654: WSH_DEBUG_SV.log(l_module_name,'Submitting the request');
655: l_log_level := 1;
656: END IF;
657: --
658: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
663: p_stop_id, -- stop
664: '', -- delivery
665: l_log_level); -- log level
666: IF l_debug_on THEN
667: WSH_DEBUG_SV.log(l_module_name,'request_id',request_id);
668: END IF;
669: if (request_id = 0) THEN
670: raise inv_inter_req_submission;
671: else
674: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
675: END if;
676:
677: IF l_debug_on THEN
678: WSH_DEBUG_SV.pop(l_module_name);
679: END IF;
680: --
681: exception
682: WHEN inv_inter_req_submission THEN
683: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
684: fnd_message.set_name('WSH', 'WSH_DET_INV_INT_REQ_SUBMISSION');
685: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
686: IF l_debug_on THEN
687: WSH_DEBUG_SV.logmsg(l_module_name,'INV_INTER_REQ_SUBMISSION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
688: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INV_INTER_REQ_SUBMISSION');
689: END IF;
690: --
691: WHEN others THEN
684: fnd_message.set_name('WSH', 'WSH_DET_INV_INT_REQ_SUBMISSION');
685: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
686: IF l_debug_on THEN
687: WSH_DEBUG_SV.logmsg(l_module_name,'INV_INTER_REQ_SUBMISSION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
688: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INV_INTER_REQ_SUBMISSION');
689: END IF;
690: --
691: WHEN others THEN
692: wsh_util_core.default_handler('WSH_SHIP_CONFRIM_ACTIONS.SHIP_CONFIRM_A_TRIP_STOP',l_module_name);
691: WHEN others THEN
692: wsh_util_core.default_handler('WSH_SHIP_CONFRIM_ACTIONS.SHIP_CONFIRM_A_TRIP_STOP',l_module_name);
693: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
694: IF l_debug_on THEN
695: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
696: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
697: END IF;
698: --
699: END Ship_Confirm_A_Trip_Stop;
692: wsh_util_core.default_handler('WSH_SHIP_CONFRIM_ACTIONS.SHIP_CONFIRM_A_TRIP_STOP',l_module_name);
693: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
694: IF l_debug_on THEN
695: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
696: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
697: END IF;
698: --
699: END Ship_Confirm_A_Trip_Stop;
700:
752: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
753: --
754: IF l_debug_on IS NULL
755: THEN
756: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
757: END IF;
758: --
759: IF l_debug_on THEN
760: WSH_DEBUG_SV.push(l_module_name);
756: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
757: END IF;
758: --
759: IF l_debug_on THEN
760: WSH_DEBUG_SV.push(l_module_name);
761: --
762: WSH_DEBUG_SV.log(l_module_name,'p_num_stops',p_num_stops);
763: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
764: WSH_DEBUG_SV.log(l_module_name,'X_MASTER_STATUS',X_MASTER_STATUS);
758: --
759: IF l_debug_on THEN
760: WSH_DEBUG_SV.push(l_module_name);
761: --
762: WSH_DEBUG_SV.log(l_module_name,'p_num_stops',p_num_stops);
763: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
764: WSH_DEBUG_SV.log(l_module_name,'X_MASTER_STATUS',X_MASTER_STATUS);
765: WSH_DEBUG_SV.log(l_module_name,'P_API_STATUS',P_API_STATUS);
766: WSH_DEBUG_SV.log(l_module_name,'X_NORMAL_COUNT',X_NORMAL_COUNT);
759: IF l_debug_on THEN
760: WSH_DEBUG_SV.push(l_module_name);
761: --
762: WSH_DEBUG_SV.log(l_module_name,'p_num_stops',p_num_stops);
763: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
764: WSH_DEBUG_SV.log(l_module_name,'X_MASTER_STATUS',X_MASTER_STATUS);
765: WSH_DEBUG_SV.log(l_module_name,'P_API_STATUS',P_API_STATUS);
766: WSH_DEBUG_SV.log(l_module_name,'X_NORMAL_COUNT',X_NORMAL_COUNT);
767: WSH_DEBUG_SV.log(l_module_name,'X_WARNING_COUNT',X_WARNING_COUNT);
760: WSH_DEBUG_SV.push(l_module_name);
761: --
762: WSH_DEBUG_SV.log(l_module_name,'p_num_stops',p_num_stops);
763: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
764: WSH_DEBUG_SV.log(l_module_name,'X_MASTER_STATUS',X_MASTER_STATUS);
765: WSH_DEBUG_SV.log(l_module_name,'P_API_STATUS',P_API_STATUS);
766: WSH_DEBUG_SV.log(l_module_name,'X_NORMAL_COUNT',X_NORMAL_COUNT);
767: WSH_DEBUG_SV.log(l_module_name,'X_WARNING_COUNT',X_WARNING_COUNT);
768: WSH_DEBUG_SV.log(l_module_name,'X_INTERFACED_COUNT',X_INTERFACED_COUNT);
761: --
762: WSH_DEBUG_SV.log(l_module_name,'p_num_stops',p_num_stops);
763: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
764: WSH_DEBUG_SV.log(l_module_name,'X_MASTER_STATUS',X_MASTER_STATUS);
765: WSH_DEBUG_SV.log(l_module_name,'P_API_STATUS',P_API_STATUS);
766: WSH_DEBUG_SV.log(l_module_name,'X_NORMAL_COUNT',X_NORMAL_COUNT);
767: WSH_DEBUG_SV.log(l_module_name,'X_WARNING_COUNT',X_WARNING_COUNT);
768: WSH_DEBUG_SV.log(l_module_name,'X_INTERFACED_COUNT',X_INTERFACED_COUNT);
769: END IF;
762: WSH_DEBUG_SV.log(l_module_name,'p_num_stops',p_num_stops);
763: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
764: WSH_DEBUG_SV.log(l_module_name,'X_MASTER_STATUS',X_MASTER_STATUS);
765: WSH_DEBUG_SV.log(l_module_name,'P_API_STATUS',P_API_STATUS);
766: WSH_DEBUG_SV.log(l_module_name,'X_NORMAL_COUNT',X_NORMAL_COUNT);
767: WSH_DEBUG_SV.log(l_module_name,'X_WARNING_COUNT',X_WARNING_COUNT);
768: WSH_DEBUG_SV.log(l_module_name,'X_INTERFACED_COUNT',X_INTERFACED_COUNT);
769: END IF;
770: --
763: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
764: WSH_DEBUG_SV.log(l_module_name,'X_MASTER_STATUS',X_MASTER_STATUS);
765: WSH_DEBUG_SV.log(l_module_name,'P_API_STATUS',P_API_STATUS);
766: WSH_DEBUG_SV.log(l_module_name,'X_NORMAL_COUNT',X_NORMAL_COUNT);
767: WSH_DEBUG_SV.log(l_module_name,'X_WARNING_COUNT',X_WARNING_COUNT);
768: WSH_DEBUG_SV.log(l_module_name,'X_INTERFACED_COUNT',X_INTERFACED_COUNT);
769: END IF;
770: --
771: IF p_num_stops IS NOT NULL THEN
764: WSH_DEBUG_SV.log(l_module_name,'X_MASTER_STATUS',X_MASTER_STATUS);
765: WSH_DEBUG_SV.log(l_module_name,'P_API_STATUS',P_API_STATUS);
766: WSH_DEBUG_SV.log(l_module_name,'X_NORMAL_COUNT',X_NORMAL_COUNT);
767: WSH_DEBUG_SV.log(l_module_name,'X_WARNING_COUNT',X_WARNING_COUNT);
768: WSH_DEBUG_SV.log(l_module_name,'X_INTERFACED_COUNT',X_INTERFACED_COUNT);
769: END IF;
770: --
771: IF p_num_stops IS NOT NULL THEN
772: l_stops_in_batch := p_num_stops;
774: OPEN c_get_num_stops(p_batch_id);
775: FETCH c_get_num_stops INTO l_stops_in_batch;
776: CLOSE c_get_num_stops;
777: IF l_debug_on THEN
778: WSH_DEBUG_SV.log(l_module_name,'l_stops_in_batch',l_stops_in_batch);
779: END IF;
780: END IF;
781:
782: IF p_api_status = 'NORMAL' THEN
799: x_master_status := 'ERROR';
800: END IF;
801: --
802: IF l_debug_on THEN
803: WSH_DEBUG_SV.log(l_module_name,'X_MASTER_STATUS',X_MASTER_STATUS);
804: WSH_DEBUG_SV.log(l_module_name,'P_API_STATUS',P_API_STATUS);
805: WSH_DEBUG_SV.log(l_module_name,'X_NORMAL_COUNT',X_NORMAL_COUNT);
806: WSH_DEBUG_SV.log(l_module_name,'X_WARNING_COUNT',X_WARNING_COUNT);
807: WSH_DEBUG_SV.log(l_module_name,'X_INTERFACED_COUNT',X_INTERFACED_COUNT);
800: END IF;
801: --
802: IF l_debug_on THEN
803: WSH_DEBUG_SV.log(l_module_name,'X_MASTER_STATUS',X_MASTER_STATUS);
804: WSH_DEBUG_SV.log(l_module_name,'P_API_STATUS',P_API_STATUS);
805: WSH_DEBUG_SV.log(l_module_name,'X_NORMAL_COUNT',X_NORMAL_COUNT);
806: WSH_DEBUG_SV.log(l_module_name,'X_WARNING_COUNT',X_WARNING_COUNT);
807: WSH_DEBUG_SV.log(l_module_name,'X_INTERFACED_COUNT',X_INTERFACED_COUNT);
808: WSH_DEBUG_SV.pop(l_module_name);
801: --
802: IF l_debug_on THEN
803: WSH_DEBUG_SV.log(l_module_name,'X_MASTER_STATUS',X_MASTER_STATUS);
804: WSH_DEBUG_SV.log(l_module_name,'P_API_STATUS',P_API_STATUS);
805: WSH_DEBUG_SV.log(l_module_name,'X_NORMAL_COUNT',X_NORMAL_COUNT);
806: WSH_DEBUG_SV.log(l_module_name,'X_WARNING_COUNT',X_WARNING_COUNT);
807: WSH_DEBUG_SV.log(l_module_name,'X_INTERFACED_COUNT',X_INTERFACED_COUNT);
808: WSH_DEBUG_SV.pop(l_module_name);
809: END IF;
802: IF l_debug_on THEN
803: WSH_DEBUG_SV.log(l_module_name,'X_MASTER_STATUS',X_MASTER_STATUS);
804: WSH_DEBUG_SV.log(l_module_name,'P_API_STATUS',P_API_STATUS);
805: WSH_DEBUG_SV.log(l_module_name,'X_NORMAL_COUNT',X_NORMAL_COUNT);
806: WSH_DEBUG_SV.log(l_module_name,'X_WARNING_COUNT',X_WARNING_COUNT);
807: WSH_DEBUG_SV.log(l_module_name,'X_INTERFACED_COUNT',X_INTERFACED_COUNT);
808: WSH_DEBUG_SV.pop(l_module_name);
809: END IF;
810: --
803: WSH_DEBUG_SV.log(l_module_name,'X_MASTER_STATUS',X_MASTER_STATUS);
804: WSH_DEBUG_SV.log(l_module_name,'P_API_STATUS',P_API_STATUS);
805: WSH_DEBUG_SV.log(l_module_name,'X_NORMAL_COUNT',X_NORMAL_COUNT);
806: WSH_DEBUG_SV.log(l_module_name,'X_WARNING_COUNT',X_WARNING_COUNT);
807: WSH_DEBUG_SV.log(l_module_name,'X_INTERFACED_COUNT',X_INTERFACED_COUNT);
808: WSH_DEBUG_SV.pop(l_module_name);
809: END IF;
810: --
811: END Update_Completion_Status;
804: WSH_DEBUG_SV.log(l_module_name,'P_API_STATUS',P_API_STATUS);
805: WSH_DEBUG_SV.log(l_module_name,'X_NORMAL_COUNT',X_NORMAL_COUNT);
806: WSH_DEBUG_SV.log(l_module_name,'X_WARNING_COUNT',X_WARNING_COUNT);
807: WSH_DEBUG_SV.log(l_module_name,'X_INTERFACED_COUNT',X_INTERFACED_COUNT);
808: WSH_DEBUG_SV.pop(l_module_name);
809: END IF;
810: --
811: END Update_Completion_Status;
812: -- end bug 1578251: internal procedure to manage completion_status
900: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
901: --
902: IF l_debug_on IS NULL
903: THEN
904: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
905: END IF;
906: --
907: IF l_debug_on THEN
908: WSH_DEBUG_SV.push(l_module_name);
904: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
905: END IF;
906: --
907: IF l_debug_on THEN
908: WSH_DEBUG_SV.push(l_module_name);
909: --
910: WSH_DEBUG_SV.log(l_module_name,'x_split_stops.count',
911: x_split_stops.COUNT);
912: WSH_DEBUG_SV.log(l_module_name,'x_stop_tab.count', x_stop_tab.COUNT);
906: --
907: IF l_debug_on THEN
908: WSH_DEBUG_SV.push(l_module_name);
909: --
910: WSH_DEBUG_SV.log(l_module_name,'x_split_stops.count',
911: x_split_stops.COUNT);
912: WSH_DEBUG_SV.log(l_module_name,'x_stop_tab.count', x_stop_tab.COUNT);
913: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
914: END IF;
908: WSH_DEBUG_SV.push(l_module_name);
909: --
910: WSH_DEBUG_SV.log(l_module_name,'x_split_stops.count',
911: x_split_stops.COUNT);
912: WSH_DEBUG_SV.log(l_module_name,'x_stop_tab.count', x_stop_tab.COUNT);
913: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
914: END IF;
915:
916: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
909: --
910: WSH_DEBUG_SV.log(l_module_name,'x_split_stops.count',
911: x_split_stops.COUNT);
912: WSH_DEBUG_SV.log(l_module_name,'x_stop_tab.count', x_stop_tab.COUNT);
913: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
914: END IF;
915:
916: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
917:
929: SET batch_id = p_batch_id
930: WHERE stop_id = x_split_stops(x);
931:
932: IF l_debug_on THEN
933: WSH_DEBUG_SV.log(l_module_name,'Adding stop',x_split_stops(x));
934: END IF;
935:
936: -- add the left over stops from previuos batch to current stops
937: l_stop_tab(l_stop_tab.COUNT + 1) := x_split_stops(x);
972: WHERE stop_id = l_stop_tab(x)
973: AND batch_id = p_batch_id;
974:
975: IF l_debug_on THEN
976: WSH_DEBUG_SV.log(l_module_name,'removing stop',
977: l_stop_tab(x));
978: END IF;
979:
980: ELSE --}{
990: END IF;--}
991:
992:
993: IF l_debug_on THEN
994: WSH_DEBUG_SV.log(l_module_name,'x_split_stops.count',
995: x_split_stops.COUNT);
996: WSH_DEBUG_SV.log(l_module_name,'x_stop_tab.count',x_stop_tab.COUNT);
997: WSH_DEBUG_SV.pop(l_module_name);
998: END IF;
992:
993: IF l_debug_on THEN
994: WSH_DEBUG_SV.log(l_module_name,'x_split_stops.count',
995: x_split_stops.COUNT);
996: WSH_DEBUG_SV.log(l_module_name,'x_stop_tab.count',x_stop_tab.COUNT);
997: WSH_DEBUG_SV.pop(l_module_name);
998: END IF;
999:
1000: EXCEPTION
993: IF l_debug_on THEN
994: WSH_DEBUG_SV.log(l_module_name,'x_split_stops.count',
995: x_split_stops.COUNT);
996: WSH_DEBUG_SV.log(l_module_name,'x_stop_tab.count',x_stop_tab.COUNT);
997: WSH_DEBUG_SV.pop(l_module_name);
998: END IF;
999:
1000: EXCEPTION
1001: WHEN OTHERS THEN
1001: WHEN OTHERS THEN
1002: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1003:
1004: IF l_debug_on THEN
1005: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1006: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1007: END IF;
1008:
1009: END handle_stop_lvl_splits;
1002: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1003:
1004: IF l_debug_on THEN
1005: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1006: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1007: END IF;
1008:
1009: END handle_stop_lvl_splits;
1010:
1268: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1269: --
1270: IF l_debug_on IS NULL
1271: THEN
1272: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1273: END IF;
1274: --
1275: IF l_debug_on THEN
1276: WSH_DEBUG_SV.push(l_module_name);
1272: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1273: END IF;
1274: --
1275: IF l_debug_on THEN
1276: WSH_DEBUG_SV.push(l_module_name);
1277: --
1278: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1279: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
1280: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1274: --
1275: IF l_debug_on THEN
1276: WSH_DEBUG_SV.push(l_module_name);
1277: --
1278: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1279: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
1280: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1281: WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
1282: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
1275: IF l_debug_on THEN
1276: WSH_DEBUG_SV.push(l_module_name);
1277: --
1278: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1279: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
1280: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1281: WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
1282: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
1283: WSH_DEBUG_SV.log(l_module_name,'p_stops_per_batch',p_stops_per_batch);
1276: WSH_DEBUG_SV.push(l_module_name);
1277: --
1278: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1279: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
1280: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1281: WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
1282: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
1283: WSH_DEBUG_SV.log(l_module_name,'p_stops_per_batch',p_stops_per_batch);
1284: END IF;
1277: --
1278: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1279: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
1280: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1281: WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
1282: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
1283: WSH_DEBUG_SV.log(l_module_name,'p_stops_per_batch',p_stops_per_batch);
1284: END IF;
1285:
1278: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1279: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
1280: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1281: WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
1282: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
1283: WSH_DEBUG_SV.log(l_module_name,'p_stops_per_batch',p_stops_per_batch);
1284: END IF;
1285:
1286: --
1279: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
1280: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1281: WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
1282: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
1283: WSH_DEBUG_SV.log(l_module_name,'p_stops_per_batch',p_stops_per_batch);
1284: END IF;
1285:
1286: --
1287: l_completion_status := 'NORMAL';
1292: IF p_stops_per_batch IS NULL or p_stops_per_batch = 0 THEN
1293: l_stops_per_batch := 1;
1294: ELSIF p_stops_per_batch < 0 THEN
1295: IF l_debug_on THEN
1296: WSH_DEBUG_SV.log(l_module_name,'Error negative p_stops_per_batch',
1297: p_stops_per_batch );
1298: END IF;
1299: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1300: ELSE
1305: IF l_stops_per_batch > 1 THEN --{
1306: FND_PROFILE.Get('WSH_INVOICE_NUMBERING_METHOD',l_invoicing_method);
1307:
1308: IF l_debug_on THEN
1309: WSH_DEBUG_SV.log(l_module_name,'l_invoicing_method',
1310: l_invoicing_method );
1311: END IF;
1312:
1313: IF l_invoicing_method = 'D' THEN
1326: l_stop_id := p_stop_id;
1327: ELSE
1328: --
1329: IF l_debug_on THEN
1330: WSH_DEBUG_SV.logmsg(l_module_name, 'INTERFACETRIPSTOP: FINDING STOP FOR DELIVERY_ID ' || P_DELIVERY_ID );
1331: END IF;
1332: --
1333: OPEN c_delivery_stop(p_delivery_id);
1334: FETCH c_delivery_stop INTO l_stop_id;
1336: l_stop_id := NULL;
1337: END IF;
1338: CLOSE c_delivery_stop;
1339: IF l_debug_on THEN
1340: WSH_DEBUG_SV.log(l_module_name,'l_stop_id',l_stop_id);
1341: END IF;
1342: IF l_stop_id IS NULL THEN
1343: WSH_UTIL_CORE.PrintMsg('InterfaceTripStop: cannot find stop. Exiting.');
1344: l_completion_status := 'WARNING';
1380: l_dsno_interface := 1;
1381: END IF;
1382:
1383: IF l_debug_on THEN
1384: WSH_DEBUG_SV.log(l_module_name,'l_inv_interface',l_inv_interface);
1385: WSH_DEBUG_SV.log(l_module_name,'l_om_interface',l_om_interface);
1386: WSH_DEBUG_SV.log(l_module_name,'l_dsno_interface',l_dsno_interface);
1387: WSH_DEBUG_SV.log(l_module_name,'l_interface_mode',l_interface_mode);
1388: WSH_DEBUG_SV.log(l_module_name,'l_stop_id',l_stop_id);
1381: END IF;
1382:
1383: IF l_debug_on THEN
1384: WSH_DEBUG_SV.log(l_module_name,'l_inv_interface',l_inv_interface);
1385: WSH_DEBUG_SV.log(l_module_name,'l_om_interface',l_om_interface);
1386: WSH_DEBUG_SV.log(l_module_name,'l_dsno_interface',l_dsno_interface);
1387: WSH_DEBUG_SV.log(l_module_name,'l_interface_mode',l_interface_mode);
1388: WSH_DEBUG_SV.log(l_module_name,'l_stop_id',l_stop_id);
1389: END IF;
1382:
1383: IF l_debug_on THEN
1384: WSH_DEBUG_SV.log(l_module_name,'l_inv_interface',l_inv_interface);
1385: WSH_DEBUG_SV.log(l_module_name,'l_om_interface',l_om_interface);
1386: WSH_DEBUG_SV.log(l_module_name,'l_dsno_interface',l_dsno_interface);
1387: WSH_DEBUG_SV.log(l_module_name,'l_interface_mode',l_interface_mode);
1388: WSH_DEBUG_SV.log(l_module_name,'l_stop_id',l_stop_id);
1389: END IF;
1390:
1383: IF l_debug_on THEN
1384: WSH_DEBUG_SV.log(l_module_name,'l_inv_interface',l_inv_interface);
1385: WSH_DEBUG_SV.log(l_module_name,'l_om_interface',l_om_interface);
1386: WSH_DEBUG_SV.log(l_module_name,'l_dsno_interface',l_dsno_interface);
1387: WSH_DEBUG_SV.log(l_module_name,'l_interface_mode',l_interface_mode);
1388: WSH_DEBUG_SV.log(l_module_name,'l_stop_id',l_stop_id);
1389: END IF;
1390:
1391: -- Based on input criteria open one of these cursors to query for the
1384: WSH_DEBUG_SV.log(l_module_name,'l_inv_interface',l_inv_interface);
1385: WSH_DEBUG_SV.log(l_module_name,'l_om_interface',l_om_interface);
1386: WSH_DEBUG_SV.log(l_module_name,'l_dsno_interface',l_dsno_interface);
1387: WSH_DEBUG_SV.log(l_module_name,'l_interface_mode',l_interface_mode);
1388: WSH_DEBUG_SV.log(l_module_name,'l_stop_id',l_stop_id);
1389: END IF;
1390:
1391: -- Based on input criteria open one of these cursors to query for the
1392: -- eligible trip stops.
1461:
1462: --/== Workflow Changes
1463: l_override_wf:= fnd_profile.value('WSH_OVERRIDE_SCPOD_WF');
1464: IF l_debug_on THEN
1465: WSH_DEBUG_SV.log(l_module_name,'l_override_wf',l_override_wf);
1466: END IF;
1467:
1468: IF (nvl(l_override_wf,'N') = 'N') THEN
1469: FOR cur_rec IN c_stop_to_del_cur_wf(l_stop_id) LOOP
1478: FOR cur_rec IN c_stop_to_del_cur_wf(l_stop_id) LOOP
1479: IF (WSH_WF_STD.Wf_Exists('DELIVERY_C',cur_rec.delivery_id)) THEN
1480: l_del_entity_ids(l_del_entity_ids.count +1) := cur_rec.delivery_id;
1481: IF l_debug_on THEN
1482: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.Log_Wf_Exception', WSH_DEBUG_SV.C_PROC_LEVEL);
1483: END IF;
1484: WSH_WF_STD.Log_Wf_Exception(p_entity_type => 'DELIVERY',
1485: p_entity_id => cur_rec.delivery_id,
1486: p_ship_from_location_id => cur_rec.initial_pickup_location_id,
1487: p_logging_entity => 'SHIPPER',
1488: p_exception_name => 'WSH_DEL_SCPOD_PURGED',
1489: x_return_status => l_wf_rs);
1490: IF l_debug_on THEN
1491: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_WF_STD.Log_Wf_Exception',l_wf_rs);
1492: END IF;
1493: END IF;
1494: END LOOP;
1495: END IF;
1496:
1497: -- Purging Overridden Workflows after the loop
1498: IF (l_del_entity_ids.count > 0) THEN
1499: IF l_debug_on THEN
1500: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.PURGE_ENTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
1501: END IF;
1502: WSH_WF_STD.Purge_Entity(
1503: p_entity_type => 'DELIVERY',
1504: p_entity_ids => l_del_entity_ids,
1504: p_entity_ids => l_del_entity_ids,
1505: x_success_count => l_purged_count,
1506: x_return_status => l_wf_rs);
1507: IF l_debug_on THEN
1508: WSH_DEBUG_SV.log(l_module_name,'L_PURGED_COUNT',l_purged_count);
1509: WSH_DEBUG_SV.log(l_module_name,'L_WF_RS',l_wf_rs);
1510: END IF;
1511: END IF;
1512: -- Workflow Changes ==/
1505: x_success_count => l_purged_count,
1506: x_return_status => l_wf_rs);
1507: IF l_debug_on THEN
1508: WSH_DEBUG_SV.log(l_module_name,'L_PURGED_COUNT',l_purged_count);
1509: WSH_DEBUG_SV.log(l_module_name,'L_WF_RS',l_wf_rs);
1510: END IF;
1511: END IF;
1512: -- Workflow Changes ==/
1513:
1527: l_notfound BOOLEAN;
1528: l_action VARCHAR2(100);
1529: BEGIN
1530: IF l_debug_on THEN
1531: WSH_DEBUG_SV.log(l_module_name,
1532: 'setting savepoint before_flag_change');
1533: END IF;
1534:
1535: SAVEPOINT before_flag_change;
1535: SAVEPOINT before_flag_change;
1536:
1537: IF NOT l_batch_ready THEN --{
1538: IF l_debug_on THEN
1539: WSH_DEBUG_SV.log(l_module_name,
1540: 'locking row for ' || l_stop_id);
1541: END IF;
1542:
1543: l_action := 'locking';
1557:
1558: l_action := 'updating';
1559:
1560: IF l_debug_on THEN
1561: WSH_DEBUG_SV.log(l_module_name,
1562: 'updating pending_interface_flag to P for batch', l_stop_batch_id);
1563: END IF;
1564:
1565:
1609: EXCEPTION
1610: WHEN trip_stop_locked THEN
1611: -- stop is locked; probably used by another process
1612: IF l_debug_on THEN
1613: WSH_DEBUG_SV.log(l_module_name,
1614: 'stop is locked');
1615: END IF;
1616: WSH_UTIL_CORE.Println('Interface_All: skipping locked stop_id ' || l_stop_id || ' is locked.');
1617: IF lock_row%ISOPEN THEN
1617: IF lock_row%ISOPEN THEN
1618: CLOSE lock_row;
1619: END IF;
1620: --IF l_debug_on THEN
1621: --WSH_DEBUG_SV.log(l_module_name,
1622: --'rollback to before_flag_change');
1623: --END IF;
1624: -- rollback to before_flag_change;
1625: -- why do we need rollback? nothing is updated
1630: RAISE e_continue;
1631:
1632: WHEN OTHERS THEN
1633: IF l_debug_on THEN
1634: WSH_DEBUG_SV.log(l_module_name,
1635: 'unhandled exception for action ' || l_action);
1636: END IF;
1637:
1638: l_completion_status := 'ERROR';
1647: CLOSE lock_row;
1648: END IF;
1649: rollback to before_flag_change;
1650: IF l_debug_on THEN
1651: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1652: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1653: END IF;
1654: RETURN;
1655: END;
1648: END IF;
1649: rollback to before_flag_change;
1650: IF l_debug_on THEN
1651: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1652: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1653: END IF;
1654: RETURN;
1655: END;
1656:
1658: l_api_completion_status := 'NORMAL';
1659: l_previous_interface := FALSE;
1660:
1661: IF l_debug_on THEN
1662: WSH_DEBUG_SV.logmsg(l_module_name, C_STOP_SEPARATOR );
1663: END IF;
1664: --
1665:
1666: -- The stops being processed for OM interface are stored in l_stop_tab
1675:
1676: IF l_previous_interface THEN
1677: --
1678: IF l_debug_on THEN
1679: WSH_DEBUG_SV.logmsg(l_module_name, C_INTERFACE_SEPARATOR );
1680: END IF;
1681: --
1682: END IF;
1683: l_previous_interface := TRUE;
1691: x_completion_status =>l_api_completion_status);
1692:
1693: --
1694: IF l_debug_on THEN
1695: WSH_DEBUG_SV.logmsg(l_module_name, 'INTERFACETRIPSTOP: RESULT OF OM INTERFACING BATCH_ID ' || TO_CHAR ( l_stop_batch_id ) || ' = ' || L_API_COMPLETION_STATUS );
1696: END IF;
1697: --
1698:
1699: IF NVL(l_err_stops_count,0) = 0 THEN --{
1741:
1742: l_tab_count := l_dsno_stop_tab.COUNT;
1743:
1744: IF l_debug_on THEN
1745: WSH_DEBUG_SV.log(l_module_name,'l_api_completion_status',
1746: l_api_completion_status);
1747: WSH_DEBUG_SV.log(l_module_name,'l_previous_interface',
1748: l_previous_interface);
1749: WSH_DEBUG_SV.log(l_module_name,'l_dsno_stop_tab.COUNT',
1743:
1744: IF l_debug_on THEN
1745: WSH_DEBUG_SV.log(l_module_name,'l_api_completion_status',
1746: l_api_completion_status);
1747: WSH_DEBUG_SV.log(l_module_name,'l_previous_interface',
1748: l_previous_interface);
1749: WSH_DEBUG_SV.log(l_module_name,'l_dsno_stop_tab.COUNT',
1750: l_tab_count);
1751: END IF;
1745: WSH_DEBUG_SV.log(l_module_name,'l_api_completion_status',
1746: l_api_completion_status);
1747: WSH_DEBUG_SV.log(l_module_name,'l_previous_interface',
1748: l_previous_interface);
1749: WSH_DEBUG_SV.log(l_module_name,'l_dsno_stop_tab.COUNT',
1750: l_tab_count);
1751: END IF;
1752:
1753:
1802:
1803: IF l_previous_interface THEN
1804: --
1805: IF l_debug_on THEN
1806: WSH_DEBUG_SV.logmsg(l_module_name, C_INTERFACE_SEPARATOR );
1807: END IF;
1808: --
1809: END IF;
1810: l_previous_interface := TRUE;
1810: l_previous_interface := TRUE;
1811:
1812: --
1813: IF l_debug_on THEN
1814: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DSNO.SUBMIT_TRIP_STOP',WSH_DEBUG_SV.C_PROC_LEVEL);
1815: END IF;
1816: --
1817: WSH_DSNO.Submit_Trip_Stop(l_dsno_stop_tab(x), l_api_completion_status);
1818: --
1816: --
1817: WSH_DSNO.Submit_Trip_Stop(l_dsno_stop_tab(x), l_api_completion_status);
1818: --
1819: IF l_debug_on THEN
1820: WSH_DEBUG_SV.logmsg(l_module_name, 'INTERFACETRIPSTOP: RESULT OF DSNO SUBMISSION FOR STOP_ID ' || TO_CHAR ( l_dsno_stop_tab(x) ) || ' = ' || L_API_COMPLETION_STATUS );
1821: END IF;
1822: --
1823: Update_Completion_Status(1,
1824: NULL,
1860:
1861: IF l_debug_on THEN
1862: x := l_err_stops.FIRST;
1863: WHILE x IS NOT NULL LOOP
1864: WSH_DEBUG_SV.log(l_module_name,'Following stop failed DSNO and '
1865: || ' is being removed from the batch',l_err_stops(x));
1866: x := l_err_stops.NEXT(x);
1867: END LOOP;
1868: END IF;
1889:
1890: -- Inventory Interface
1891: -- OK to interface if stop is already interfaced to OM
1892: IF l_debug_on THEN
1893: WSH_DEBUG_SV.log(l_module_name,'l_api_completion_status',
1894: l_api_completion_status);
1895: WSH_DEBUG_SV.log(l_module_name,'l_previous_interface',
1896: l_previous_interface);
1897: END IF;
1891: -- OK to interface if stop is already interfaced to OM
1892: IF l_debug_on THEN
1893: WSH_DEBUG_SV.log(l_module_name,'l_api_completion_status',
1894: l_api_completion_status);
1895: WSH_DEBUG_SV.log(l_module_name,'l_previous_interface',
1896: l_previous_interface);
1897: END IF;
1898:
1899: IF l_inv_interface = 1
1901:
1902: IF l_previous_interface THEN
1903: --
1904: IF l_debug_on THEN
1905: WSH_DEBUG_SV.logmsg(l_module_name, C_INTERFACE_SEPARATOR );
1906: END IF;
1907: --
1908: END IF;
1909: l_previous_interface := TRUE;
1910:
1911: Inv_Interface_Trip_Stop(l_stop_batch_id, l_api_completion_status);
1912: --
1913: IF l_debug_on THEN
1914: WSH_DEBUG_SV.logmsg(l_module_name, 'INTERFACETRIPSTOP: RESULT OF INVENTORY INTERFACING BATCH_ID ' || TO_CHAR ( l_stop_batch_id ) || ' = ' || L_API_COMPLETION_STATUS );
1915: END IF;
1916: --
1917: Update_Completion_Status(NULL,
1918: l_stop_batch_id,
1937: l_action VARCHAR2(100);
1938: l_new_flag VARCHAR2(1);
1939: BEGIN
1940: IF l_debug_on THEN
1941: WSH_DEBUG_SV.log(l_module_name,
1942: 're-lock stop to set pending_interface_flag to Y or NULL');
1943: END IF;
1944:
1945:
1974: --/== Workflow Changes
1975: IF l_new_flag is null then
1976: FOR cur_rec IN c_stop_to_del_cur_wf(l_stop_id) LOOP
1977: IF l_debug_on THEN
1978: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.RAISE_EVENT',WSH_DEBUG_SV.C_PROC_LEVEL);
1979: END IF;
1980:
1981: WSH_WF_STD.RAISE_EVENT(p_entity_type => 'DELIVERY',
1982: p_entity_id => cur_rec.delivery_id,
1984: p_organization_id => cur_rec.organization_id,
1985: x_return_status => l_wf_rs);
1986:
1987: IF l_debug_on THEN
1988: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_WF_STD.RAISE_EVENT => ',l_wf_rs);
1989: END IF;
1990: END LOOP;
1991: END IF;
1992: -- Workflow Changes ==/
2007: rollback to before_flag_reset;
2008:
2009: WHEN OTHERS THEN
2010: IF l_debug_on THEN
2011: WSH_DEBUG_SV.log(l_module_name,
2012: 'unhandled exception for action ' || l_action);
2013: END IF;
2014: l_completion_status := 'ERROR';
2015: l_error_code := SQLCODE;
2026: CLOSE lock_batch;
2027: END IF;
2028: rollback to before_flag_reset;
2029: IF l_debug_on THEN
2030: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2031: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2032: END IF;
2033: RETURN;
2034: END;
2027: END IF;
2028: rollback to before_flag_reset;
2029: IF l_debug_on THEN
2030: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2031: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2032: END IF;
2033: RETURN;
2034: END;
2035:
2037: <
2038: IF l_completion_status = 'ERROR' THEN
2039: WSH_UTIL_CORE.PrintMsg('InterfaceTripStop: Stopping because of ERROR.');
2040: IF l_debug_on THEN
2041: WSH_DEBUG_SV.log(l_module_name,
2042: 'InterfaceTripStop: Stopping because of ERROR.');
2043: END IF;
2044: EXIT;
2045: END IF;
2046: EXCEPTION
2047: WHEN e_trip_stop_wf_inprogress THEN --/== Workflow Changes
2048: -- Deliveries starting or ending at this stop are being controlled by Ship to Deliver Workflow
2049: IF l_debug_on THEN
2050: WSH_DEBUG_SV.log(l_module_name,
2051: 'Ship to Deliver Workflow is enabled for one or more deliveries related to this Stop');
2052: END IF;
2053: WSH_UTIL_CORE.Println('Ship to Deliver Workflow is enabled for one or more deliveries related to this Stop');
2054: WSH_UTIL_CORE.Println('Interface_All: skipping stop_id ' || l_stop_id );
2073: END IF;
2074:
2075: --
2076: IF l_debug_on THEN
2077: WSH_DEBUG_SV.logmsg(l_module_name, C_STOP_SEPARATOR );
2078: WSH_DEBUG_SV.log(l_module_name,'l_stops_count',l_stops_count);
2079: END IF;
2080: --
2081:
2074:
2075: --
2076: IF l_debug_on THEN
2077: WSH_DEBUG_SV.logmsg(l_module_name, C_STOP_SEPARATOR );
2078: WSH_DEBUG_SV.log(l_module_name,'l_stops_count',l_stops_count);
2079: END IF;
2080: --
2081:
2082: IF l_stops_count = 0 THEN
2101: || l_interface_names(i)
2102: || ': '
2103: || l_stops_interfaced(i));
2104: IF l_debug_on THEN
2105: WSH_DEBUG_SV.log(l_module_name,'Stops processed for '
2106: || l_interface_names(i)
2107: || ' with status NORMAL: '
2108: || l_stops_normal(i));
2109: WSH_DEBUG_SV.log(l_module_name,'Stops processed for '
2105: WSH_DEBUG_SV.log(l_module_name,'Stops processed for '
2106: || l_interface_names(i)
2107: || ' with status NORMAL: '
2108: || l_stops_normal(i));
2109: WSH_DEBUG_SV.log(l_module_name,'Stops processed for '
2110: || l_interface_names(i)
2111: || ' with status WARNING: '
2112: || l_stops_warning(i));
2113: WSH_DEBUG_SV.log(l_module_name,'Stops interfaced for '
2109: WSH_DEBUG_SV.log(l_module_name,'Stops processed for '
2110: || l_interface_names(i)
2111: || ' with status WARNING: '
2112: || l_stops_warning(i));
2113: WSH_DEBUG_SV.log(l_module_name,'Stops interfaced for '
2114: || l_interface_names(i)
2115: || ': '
2116: || l_stops_interfaced(i));
2117: END IF;
2134: retcode := '2';
2135: END IF;
2136: --
2137: IF l_debug_on THEN
2138: WSH_DEBUG_SV.log(l_module_name,'errbuf',errbuf);
2139: WSH_DEBUG_SV.log(l_module_name,'retcode',retcode);
2140: WSH_DEBUG_SV.log(l_module_name,'l_completion_status',l_completion_status);
2141: WSH_DEBUG_SV.pop(l_module_name);
2142: END IF;
2135: END IF;
2136: --
2137: IF l_debug_on THEN
2138: WSH_DEBUG_SV.log(l_module_name,'errbuf',errbuf);
2139: WSH_DEBUG_SV.log(l_module_name,'retcode',retcode);
2140: WSH_DEBUG_SV.log(l_module_name,'l_completion_status',l_completion_status);
2141: WSH_DEBUG_SV.pop(l_module_name);
2142: END IF;
2143: --
2136: --
2137: IF l_debug_on THEN
2138: WSH_DEBUG_SV.log(l_module_name,'errbuf',errbuf);
2139: WSH_DEBUG_SV.log(l_module_name,'retcode',retcode);
2140: WSH_DEBUG_SV.log(l_module_name,'l_completion_status',l_completion_status);
2141: WSH_DEBUG_SV.pop(l_module_name);
2142: END IF;
2143: --
2144: -- bug 2657859 frontport bug 2630535
2137: IF l_debug_on THEN
2138: WSH_DEBUG_SV.log(l_module_name,'errbuf',errbuf);
2139: WSH_DEBUG_SV.log(l_module_name,'retcode',retcode);
2140: WSH_DEBUG_SV.log(l_module_name,'l_completion_status',l_completion_status);
2141: WSH_DEBUG_SV.pop(l_module_name);
2142: END IF;
2143: --
2144: -- bug 2657859 frontport bug 2630535
2145: -- automatic cleanup of stuck stops where requests completed
2146: DECLARE
2147: l_recs NUMBER;
2148: BEGIN
2149: IF l_debug_on THEN
2150: WSH_DEBUG_SV.log(l_module_name,
2151: 'Automatic clean up');
2152: END IF;
2153:
2154: UPDATE wsh_trip_stops wts
2162: AND fcr.phase_code = 'C');
2163: l_recs := sql%rowcount;
2164:
2165: IF l_debug_on THEN
2166: WSH_DEBUG_SV.log(l_module_name,
2167: 'l_recs = ' || l_recs);
2168: END IF;
2169:
2170: COMMIT;
2171:
2172: IF l_recs > 0 THEN
2173: WSH_UTIL_CORE.PrintMsg('Cleaned up ' || to_char(l_recs) || ' stuck stops.');
2174: IF l_debug_on THEN
2175: WSH_DEBUG_SV.log(l_module_name,
2176: 'Cleaned up ' || to_char(l_recs) || ' stuck stops.');
2177: END IF;
2178:
2179: END IF;
2194: errbuf := 'Interface trip stop failed with unexpected error';
2195: retcode := '2';
2196: --
2197: IF l_debug_on THEN
2198: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2199: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2200: END IF;
2201: --
2202: END interface_ALL;
2195: retcode := '2';
2196: --
2197: IF l_debug_on THEN
2198: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2199: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2200: END IF;
2201: --
2202: END interface_ALL;
2203:
2233: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2234: --
2235: IF l_debug_on IS NULL
2236: THEN
2237: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2238: END IF;
2239: --
2240: IF l_debug_on THEN
2241: WSH_DEBUG_SV.push(l_module_name);
2237: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2238: END IF;
2239: --
2240: IF l_debug_on THEN
2241: WSH_DEBUG_SV.push(l_module_name);
2242: --
2243: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
2244:
2245: l_log_level := 1;
2239: --
2240: IF l_debug_on THEN
2241: WSH_DEBUG_SV.push(l_module_name);
2242: --
2243: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
2244:
2245: l_log_level := 1;
2246: END IF;
2247:
2259: errbuf := 'Inventory interface is completed with error';
2260: END IF;
2261: --
2262: IF l_debug_on THEN
2263: WSH_DEBUG_SV.log(l_module_name,'errbuf',errbuf);
2264: WSH_DEBUG_SV.log(l_module_name,'retcode',retcode);
2265: WSH_DEBUG_SV.pop(l_module_name);
2266: END IF;
2267: --
2260: END IF;
2261: --
2262: IF l_debug_on THEN
2263: WSH_DEBUG_SV.log(l_module_name,'errbuf',errbuf);
2264: WSH_DEBUG_SV.log(l_module_name,'retcode',retcode);
2265: WSH_DEBUG_SV.pop(l_module_name);
2266: END IF;
2267: --
2268: END inv_interface;
2261: --
2262: IF l_debug_on THEN
2263: WSH_DEBUG_SV.log(l_module_name,'errbuf',errbuf);
2264: WSH_DEBUG_SV.log(l_module_name,'retcode',retcode);
2265: WSH_DEBUG_SV.pop(l_module_name);
2266: END IF;
2267: --
2268: END inv_interface;
2269:
2314: l_return_status varchar2(1);
2315: BEGIN
2316: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2317: IF l_debug_on IS NULL THEN
2318: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2319: END IF;
2320:
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.push(l_module_name);
2318: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2319: END IF;
2320:
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.push(l_module_name);
2323: WSH_DEBUG_SV.log(l_module_name,'p_start_index',p_start_index);
2324: WSH_DEBUG_SV.log(l_module_name,'p_end_index',p_end_index);
2325: WSH_DEBUG_SV.log(l_module_name,'p_mtl_txn_if_rec.count',p_mtl_txn_if_rec.source_line_id.count);
2326: WSH_DEBUG_SV.log(l_module_name,'p_mtl_ser_txn_if_rec.count',p_mtl_ser_txn_if_rec.source_line_id.count);
2319: END IF;
2320:
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.push(l_module_name);
2323: WSH_DEBUG_SV.log(l_module_name,'p_start_index',p_start_index);
2324: WSH_DEBUG_SV.log(l_module_name,'p_end_index',p_end_index);
2325: WSH_DEBUG_SV.log(l_module_name,'p_mtl_txn_if_rec.count',p_mtl_txn_if_rec.source_line_id.count);
2326: WSH_DEBUG_SV.log(l_module_name,'p_mtl_ser_txn_if_rec.count',p_mtl_ser_txn_if_rec.source_line_id.count);
2327: WSH_DEBUG_SV.log(l_module_name,'p_mtl_lot_txn_if_rec.count',p_mtl_lot_txn_if_rec.source_line_id.count);
2320:
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.push(l_module_name);
2323: WSH_DEBUG_SV.log(l_module_name,'p_start_index',p_start_index);
2324: WSH_DEBUG_SV.log(l_module_name,'p_end_index',p_end_index);
2325: WSH_DEBUG_SV.log(l_module_name,'p_mtl_txn_if_rec.count',p_mtl_txn_if_rec.source_line_id.count);
2326: WSH_DEBUG_SV.log(l_module_name,'p_mtl_ser_txn_if_rec.count',p_mtl_ser_txn_if_rec.source_line_id.count);
2327: WSH_DEBUG_SV.log(l_module_name,'p_mtl_lot_txn_if_rec.count',p_mtl_lot_txn_if_rec.source_line_id.count);
2328: WSH_DEBUG_SV.log(l_module_name,'p_def_inv_online',p_def_inv_online);
2321: IF l_debug_on THEN
2322: WSH_DEBUG_SV.push(l_module_name);
2323: WSH_DEBUG_SV.log(l_module_name,'p_start_index',p_start_index);
2324: WSH_DEBUG_SV.log(l_module_name,'p_end_index',p_end_index);
2325: WSH_DEBUG_SV.log(l_module_name,'p_mtl_txn_if_rec.count',p_mtl_txn_if_rec.source_line_id.count);
2326: WSH_DEBUG_SV.log(l_module_name,'p_mtl_ser_txn_if_rec.count',p_mtl_ser_txn_if_rec.source_line_id.count);
2327: WSH_DEBUG_SV.log(l_module_name,'p_mtl_lot_txn_if_rec.count',p_mtl_lot_txn_if_rec.source_line_id.count);
2328: WSH_DEBUG_SV.log(l_module_name,'p_def_inv_online',p_def_inv_online);
2329: END IF;
2322: WSH_DEBUG_SV.push(l_module_name);
2323: WSH_DEBUG_SV.log(l_module_name,'p_start_index',p_start_index);
2324: WSH_DEBUG_SV.log(l_module_name,'p_end_index',p_end_index);
2325: WSH_DEBUG_SV.log(l_module_name,'p_mtl_txn_if_rec.count',p_mtl_txn_if_rec.source_line_id.count);
2326: WSH_DEBUG_SV.log(l_module_name,'p_mtl_ser_txn_if_rec.count',p_mtl_ser_txn_if_rec.source_line_id.count);
2327: WSH_DEBUG_SV.log(l_module_name,'p_mtl_lot_txn_if_rec.count',p_mtl_lot_txn_if_rec.source_line_id.count);
2328: WSH_DEBUG_SV.log(l_module_name,'p_def_inv_online',p_def_inv_online);
2329: END IF;
2330:
2323: WSH_DEBUG_SV.log(l_module_name,'p_start_index',p_start_index);
2324: WSH_DEBUG_SV.log(l_module_name,'p_end_index',p_end_index);
2325: WSH_DEBUG_SV.log(l_module_name,'p_mtl_txn_if_rec.count',p_mtl_txn_if_rec.source_line_id.count);
2326: WSH_DEBUG_SV.log(l_module_name,'p_mtl_ser_txn_if_rec.count',p_mtl_ser_txn_if_rec.source_line_id.count);
2327: WSH_DEBUG_SV.log(l_module_name,'p_mtl_lot_txn_if_rec.count',p_mtl_lot_txn_if_rec.source_line_id.count);
2328: WSH_DEBUG_SV.log(l_module_name,'p_def_inv_online',p_def_inv_online);
2329: END IF;
2330:
2331: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2324: WSH_DEBUG_SV.log(l_module_name,'p_end_index',p_end_index);
2325: WSH_DEBUG_SV.log(l_module_name,'p_mtl_txn_if_rec.count',p_mtl_txn_if_rec.source_line_id.count);
2326: WSH_DEBUG_SV.log(l_module_name,'p_mtl_ser_txn_if_rec.count',p_mtl_ser_txn_if_rec.source_line_id.count);
2327: WSH_DEBUG_SV.log(l_module_name,'p_mtl_lot_txn_if_rec.count',p_mtl_lot_txn_if_rec.source_line_id.count);
2328: WSH_DEBUG_SV.log(l_module_name,'p_def_inv_online',p_def_inv_online);
2329: END IF;
2330:
2331: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2332:
2341: p_mtl_txn_if_rec =>p_mtl_txn_if_rec,
2342: x_return_status => l_return_status);
2343:
2344: IF l_debug_on THEN
2345: WSH_DEBUG_SV.log(l_module_name,'WSH_TRX_HANDLER.INSERT_ROW_BULK l_return_status',l_return_status);
2346: END IF;
2347:
2348: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) then
2349: raise fnd_api.g_exc_error;
2357: (p_mtl_ser_txn_if_rec => p_mtl_ser_txn_if_rec,
2358: x_return_status => l_return_status);
2359:
2360: IF l_debug_on THEN
2361: WSH_DEBUG_SV.log(l_module_name,'WSH_TRXSN_HANDLER.INSERT_ROW_BULK l_return_status',l_return_status);
2362: END IF;
2363:
2364: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) then
2365: raise fnd_api.g_exc_error;
2381: (p_mtl_lot_txn_if_rec => p_mtl_lot_txn_if_rec,
2382: x_return_status => l_return_status);
2383:
2384: IF l_debug_on THEN
2385: WSH_DEBUG_SV.log(l_module_name,'WSH_TRXLOT_HANDLER.INSERT_ROW_BULK l_return_status',l_return_status);
2386: END IF;
2387:
2388: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) then
2389: raise fnd_api.g_exc_error;
2405: COMMIT;
2406: END IF;
2407:
2408: IF l_debug_on THEN
2409: WSH_DEBUG_SV.pop(l_module_name);
2410: END IF;
2411:
2412: EXCEPTION
2413: WHEN FND_API.G_EXC_ERROR THEN
2413: WHEN FND_API.G_EXC_ERROR THEN
2414: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2415:
2416: IF l_debug_on THEN
2417: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2418: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2419: END IF;
2420:
2421: ROLLBACK TO SAVEPOINT sp_insert_inv_records;
2414: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2415:
2416: IF l_debug_on THEN
2417: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2418: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2419: END IF;
2420:
2421: ROLLBACK TO SAVEPOINT sp_insert_inv_records;
2422:
2423: WHEN OTHERS THEN
2424: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2425:
2426: IF l_debug_on THEN
2427: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is
2428: '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2429: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2430: END IF;
2431:
2424: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2425:
2426: IF l_debug_on THEN
2427: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is
2428: '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2429: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2430: END IF;
2431:
2432: ROLLBACK TO SAVEPOINT sp_insert_inv_records;
2425:
2426: IF l_debug_on THEN
2427: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is
2428: '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2429: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2430: END IF;
2431:
2432: ROLLBACK TO SAVEPOINT sp_insert_inv_records;
2433: END Insert_inv_records;
2837: BEGIN
2838: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2839:
2840: IF l_debug_on IS NULL THEN
2841: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2842: END IF;
2843:
2844: IF l_debug_on THEN
2845: WSH_DEBUG_SV.push(l_module_name);
2841: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2842: END IF;
2843:
2844: IF l_debug_on THEN
2845: WSH_DEBUG_SV.push(l_module_name);
2846: WSH_DEBUG_SV.log(l_module_name,'batch_id',p_batch_id);
2847: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_HEADER_ID',P_TRANSACTION_HEADER_ID);
2848: END IF;
2849:
2842: END IF;
2843:
2844: IF l_debug_on THEN
2845: WSH_DEBUG_SV.push(l_module_name);
2846: WSH_DEBUG_SV.log(l_module_name,'batch_id',p_batch_id);
2847: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_HEADER_ID',P_TRANSACTION_HEADER_ID);
2848: END IF;
2849:
2850: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2843:
2844: IF l_debug_on THEN
2845: WSH_DEBUG_SV.push(l_module_name);
2846: WSH_DEBUG_SV.log(l_module_name,'batch_id',p_batch_id);
2847: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_HEADER_ID',P_TRANSACTION_HEADER_ID);
2848: END IF;
2849:
2850: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2851: -- HW OPMCONV. Removed OPM variables
2924: FND_PROFILE.Get('WSH_BULK_BATCH_SIZE',l_bulk_batch_size);
2925: FND_PROFILE.Get('WSH_DEFER_INV_PR_ONLINE',l_def_inv_online);
2926:
2927: IF l_debug_on THEN
2928: WSH_DEBUG_SV.log(l_module_name,'No of record fetch',l_row_count);
2929: WSH_DEBUG_SV.log(l_module_name,'l_bulk_batch_size',l_bulk_batch_size);
2930: WSH_DEBUG_SV.log(l_module_name,'l_def_inv_online',l_def_inv_online);
2931: END IF;
2932:
2925: FND_PROFILE.Get('WSH_DEFER_INV_PR_ONLINE',l_def_inv_online);
2926:
2927: IF l_debug_on THEN
2928: WSH_DEBUG_SV.log(l_module_name,'No of record fetch',l_row_count);
2929: WSH_DEBUG_SV.log(l_module_name,'l_bulk_batch_size',l_bulk_batch_size);
2930: WSH_DEBUG_SV.log(l_module_name,'l_def_inv_online',l_def_inv_online);
2931: END IF;
2932:
2933: l_index := l_mtl_txn_if_rec.picking_line_id.FIRST;
2926:
2927: IF l_debug_on THEN
2928: WSH_DEBUG_SV.log(l_module_name,'No of record fetch',l_row_count);
2929: WSH_DEBUG_SV.log(l_module_name,'l_bulk_batch_size',l_bulk_batch_size);
2930: WSH_DEBUG_SV.log(l_module_name,'l_def_inv_online',l_def_inv_online);
2931: END IF;
2932:
2933: l_index := l_mtl_txn_if_rec.picking_line_id.FIRST;
2934: IF nvl(l_index,0) = 0 THEN
2935: -- perhaps the inventory transaction manager is processing this
2936: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2937: WSH_UTIL_CORE.PrintMsg('No Delivery Detail Found');
2938: IF l_debug_on THEN
2939: WSH_DEBUG_SV.log(l_module_name,'No Delivery Detail Found',l_index);
2940: WSH_DEBUG_SV.pop(l_module_name);
2941: END IF;
2942: RETURN;
2943: END IF;
2936: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2937: WSH_UTIL_CORE.PrintMsg('No Delivery Detail Found');
2938: IF l_debug_on THEN
2939: WSH_DEBUG_SV.log(l_module_name,'No Delivery Detail Found',l_index);
2940: WSH_DEBUG_SV.pop(l_module_name);
2941: END IF;
2942: RETURN;
2943: END IF;
2944:
2954:
2955: WHILE l_index is not null LOOP -- {
2956: BEGIN
2957: IF l_debug_on THEN
2958: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',l_mtl_txn_if_rec.picking_line_id(l_index));
2959: WSH_DEBUG_SV.log(l_module_name,'trx_interface_id',l_mtl_txn_if_rec.trx_interface_id(l_index));
2960: WSH_DEBUG_SV.log(l_module_name,'freight_code',l_mtl_txn_if_rec.freight_code(l_index));
2961: WSH_DEBUG_SV.log(l_module_name,'content_lpn_id',l_mtl_txn_if_rec.content_lpn_id(l_index));
2962: END IF;
2955: WHILE l_index is not null LOOP -- {
2956: BEGIN
2957: IF l_debug_on THEN
2958: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',l_mtl_txn_if_rec.picking_line_id(l_index));
2959: WSH_DEBUG_SV.log(l_module_name,'trx_interface_id',l_mtl_txn_if_rec.trx_interface_id(l_index));
2960: WSH_DEBUG_SV.log(l_module_name,'freight_code',l_mtl_txn_if_rec.freight_code(l_index));
2961: WSH_DEBUG_SV.log(l_module_name,'content_lpn_id',l_mtl_txn_if_rec.content_lpn_id(l_index));
2962: END IF;
2963:
2956: BEGIN
2957: IF l_debug_on THEN
2958: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',l_mtl_txn_if_rec.picking_line_id(l_index));
2959: WSH_DEBUG_SV.log(l_module_name,'trx_interface_id',l_mtl_txn_if_rec.trx_interface_id(l_index));
2960: WSH_DEBUG_SV.log(l_module_name,'freight_code',l_mtl_txn_if_rec.freight_code(l_index));
2961: WSH_DEBUG_SV.log(l_module_name,'content_lpn_id',l_mtl_txn_if_rec.content_lpn_id(l_index));
2962: END IF;
2963:
2964: IF l_mtl_txn_if_rec.content_lpn_id(l_index) IS NULL then
2957: IF l_debug_on THEN
2958: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',l_mtl_txn_if_rec.picking_line_id(l_index));
2959: WSH_DEBUG_SV.log(l_module_name,'trx_interface_id',l_mtl_txn_if_rec.trx_interface_id(l_index));
2960: WSH_DEBUG_SV.log(l_module_name,'freight_code',l_mtl_txn_if_rec.freight_code(l_index));
2961: WSH_DEBUG_SV.log(l_module_name,'content_lpn_id',l_mtl_txn_if_rec.content_lpn_id(l_index));
2962: END IF;
2963:
2964: IF l_mtl_txn_if_rec.content_lpn_id(l_index) IS NULL then
2965: IF l_debug_on THEN
2962: END IF;
2963:
2964: IF l_mtl_txn_if_rec.content_lpn_id(l_index) IS NULL then
2965: IF l_debug_on THEN
2966: WSH_DEBUG_SV.logmsg(l_module_name,'LPN ID IS NULL FOR THE PARENT CONTAINER OF LINE '
2967: ||l_mtl_txn_if_rec.picking_line_id(l_index));
2968: END IF;
2969: END IF;
2970: --- 1:
2973: -- check for Actual Departure Date
2974: IF l_mtl_txn_if_rec.trx_date(l_index) IS NULL THEN
2975: WSH_UTIL_CORE.PrintMsg('Actual Departure Date of Trip Stop in batch '|| p_batch_id ||' is NULL');
2976: IF l_debug_on THEN
2977: WSH_DEBUG_SV.log(l_module_name, 'Actual Departure Date of Trip Stop is NULL in batch ',p_batch_id);
2978: END IF;
2979:
2980: raise e_line_error;
2981: END IF;
2983:
2984: ---3:
2985: -- Set the lines with shipped_qty=0, as interfaced to INV
2986: IF l_debug_on THEN
2987: WSH_DEBUG_SV.log(l_module_name,'Shipped_qty',l_mtl_txn_if_rec.trx_quantity(l_index));
2988: WSH_DEBUG_SV.log(l_module_name,'Shipped_qty',l_mtl_txn_if_rec.inv_interfaced_flag(l_index));
2989: END IF;
2990: IF NVL(l_mtl_txn_if_rec.trx_quantity(l_index), 0) = 0 THEN
2991: IF NVL(l_mtl_txn_if_rec.inv_interfaced_flag(l_index), 'N') <> 'Y' THEN
2984: ---3:
2985: -- Set the lines with shipped_qty=0, as interfaced to INV
2986: IF l_debug_on THEN
2987: WSH_DEBUG_SV.log(l_module_name,'Shipped_qty',l_mtl_txn_if_rec.trx_quantity(l_index));
2988: WSH_DEBUG_SV.log(l_module_name,'Shipped_qty',l_mtl_txn_if_rec.inv_interfaced_flag(l_index));
2989: END IF;
2990: IF NVL(l_mtl_txn_if_rec.trx_quantity(l_index), 0) = 0 THEN
2991: IF NVL(l_mtl_txn_if_rec.inv_interfaced_flag(l_index), 'N') <> 'Y' THEN
2992:
2991: IF NVL(l_mtl_txn_if_rec.inv_interfaced_flag(l_index), 'N') <> 'Y' THEN
2992:
2993: l_delivery_detail_tbl(l_delivery_detail_tbl.count + 1) := l_mtl_txn_if_rec.picking_line_id(l_index);
2994: IF l_debug_on THEN
2995: WSH_DEBUG_SV.logmsg(l_module_name, 'HAVE SET THE INV_INTERFACED_FLAG TO '|| C_INV_INT_FULL ||
2996: ' FOR DELIVERY DETAIL ' ||l_mtl_txn_if_rec.picking_line_id(l_index));
2997: END IF;
2998: END IF;
2999: END IF;
3023: OR l_mtl_txn_if_rec.organization_id(l_index) <> l_cache_trip_org_id THEN
3024: l_cache_trip_sm := l_mtl_txn_if_rec.ship_method_code(l_index);
3025: l_cache_trip_org_id := l_mtl_txn_if_rec.organization_id(l_index);
3026: IF l_debug_on THEN
3027: WSH_DEBUG_SV.log(l_module_name, 'looking up freight carrier for trip ship method', l_cache_trip_sm);
3028: WSH_DEBUG_SV.log(l_module_name, 'and organization_id', l_cache_trip_org_id);
3029: END IF;
3030: OPEN c_freight_code(l_mtl_txn_if_rec.ship_method_code(l_index),
3031: l_mtl_txn_if_rec.organization_id(l_index));
3024: l_cache_trip_sm := l_mtl_txn_if_rec.ship_method_code(l_index);
3025: l_cache_trip_org_id := l_mtl_txn_if_rec.organization_id(l_index);
3026: IF l_debug_on THEN
3027: WSH_DEBUG_SV.log(l_module_name, 'looking up freight carrier for trip ship method', l_cache_trip_sm);
3028: WSH_DEBUG_SV.log(l_module_name, 'and organization_id', l_cache_trip_org_id);
3029: END IF;
3030: OPEN c_freight_code(l_mtl_txn_if_rec.ship_method_code(l_index),
3031: l_mtl_txn_if_rec.organization_id(l_index));
3032: FETCH c_freight_code into l_cache_trip_fc;
3031: l_mtl_txn_if_rec.organization_id(l_index));
3032: FETCH c_freight_code into l_cache_trip_fc;
3033: IF c_freight_code%NOTFOUND THEN
3034: IF l_debug_on THEN
3035: WSH_DEBUG_SV.logmsg(l_module_name, 'c_freight_code record not found');
3036: END IF;
3037: l_cache_trip_fc := NULL;
3038: END IF;
3039: CLOSE c_freight_code;
3039: CLOSE c_freight_code;
3040: END IF;
3041:
3042: IF l_debug_on THEN
3043: WSH_DEBUG_SV.log(l_module_name, 'defaulting freight_code with l_cache_trip_fc', l_cache_trip_fc);
3044: END IF;
3045: l_mtl_txn_if_rec.freight_code(l_index) := l_cache_trip_fc;
3046:
3047: ELSE
3048:
3049: IF l_mtl_txn_if_rec.trx_source_delivery_id(l_index) <> l_cache_del_id THEN
3050: l_cache_del_id := l_mtl_txn_if_rec.trx_source_delivery_id(l_index);
3051: IF l_debug_on THEN
3052: WSH_DEBUG_SV.log(l_module_name, 'looking up freight carrier for delivery', l_cache_del_id);
3053: END IF;
3054: OPEN c_freight_code_del(l_mtl_txn_if_rec.trx_source_delivery_id(l_index) ) ;
3055: FETCH c_freight_code_del into l_cache_del_fc;
3056: IF c_freight_code_del%NOTFOUND THEN
3054: OPEN c_freight_code_del(l_mtl_txn_if_rec.trx_source_delivery_id(l_index) ) ;
3055: FETCH c_freight_code_del into l_cache_del_fc;
3056: IF c_freight_code_del%NOTFOUND THEN
3057: IF l_debug_on THEN
3058: WSH_DEBUG_SV.logmsg(l_module_name, 'c_freight_code_del record not found');
3059: END IF;
3060: l_cache_del_fc := NULL;
3061: END IF;
3062: CLOSE c_freight_code_del;
3062: CLOSE c_freight_code_del;
3063: END IF;
3064:
3065: IF l_debug_on THEN
3066: WSH_DEBUG_SV.log(l_module_name, 'defaulting freight_code with l_cache_del_fc', l_cache_del_fc);
3067: END IF;
3068: l_mtl_txn_if_rec.freight_code(l_index) := l_cache_del_fc;
3069:
3070: END IF;
3073: -- fabdi end : SHIPPING PIECE 12/09/2000
3074: /* getting the source_document_type id to see if it is an internal order or not */
3075: /* get order line info to decide if this is part of an internal order */
3076: IF l_debug_on THEN
3077: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_txn_if_rec.source_code(l_index));
3078: WSH_DEBUG_SV.log(l_module_name,'ont_source_code', WSH_SHIP_CONFIRM_ACTIONS.ont_source_code);
3079: END IF;
3080:
3081: -- for non-opm items derive additional information, based on the
3074: /* getting the source_document_type id to see if it is an internal order or not */
3075: /* get order line info to decide if this is part of an internal order */
3076: IF l_debug_on THEN
3077: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_txn_if_rec.source_code(l_index));
3078: WSH_DEBUG_SV.log(l_module_name,'ont_source_code', WSH_SHIP_CONFIRM_ACTIONS.ont_source_code);
3079: END IF;
3080:
3081: -- for non-opm items derive additional information, based on the
3082: -- source_code
3089:
3090: l_source_code := WSH_SHIP_CONFIRM_ACTIONS.ont_source_code;
3091: --
3092: IF l_debug_on THEN
3093: WSH_DEBUG_SV.log(l_module_name,'l_source_code',l_source_code);
3094: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_SALESORDER.GET_SALESORDER_FOR_OEHEADER',
3095: WSH_DEBUG_SV.C_PROC_LEVEL);
3096: END IF;
3097: --
3090: l_source_code := WSH_SHIP_CONFIRM_ACTIONS.ont_source_code;
3091: --
3092: IF l_debug_on THEN
3093: WSH_DEBUG_SV.log(l_module_name,'l_source_code',l_source_code);
3094: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_SALESORDER.GET_SALESORDER_FOR_OEHEADER',
3095: WSH_DEBUG_SV.C_PROC_LEVEL);
3096: END IF;
3097: --
3098: IF (nvl(l_prev_source_header_id,-99) <> l_mtl_txn_if_rec.source_header_id(l_index)) THEN
3091: --
3092: IF l_debug_on THEN
3093: WSH_DEBUG_SV.log(l_module_name,'l_source_code',l_source_code);
3094: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_SALESORDER.GET_SALESORDER_FOR_OEHEADER',
3095: WSH_DEBUG_SV.C_PROC_LEVEL);
3096: END IF;
3097: --
3098: IF (nvl(l_prev_source_header_id,-99) <> l_mtl_txn_if_rec.source_header_id(l_index)) THEN
3099: l_trx_source_id := INV_SALESORDER.GET_SALESORDER_FOR_OEHEADER
3101: END IF;
3102: l_prev_source_header_id:= l_mtl_txn_if_rec.source_header_id(l_index);
3103: --
3104: IF l_debug_on THEN
3105: WSH_DEBUG_SV.logmsg(l_module_name, 'FOUND MTL ORDER LINE: ' ||L_TRX_SOURCE_ID );
3106: END IF;
3107: --
3108: OPEN c_order_line_info(l_mtl_txn_if_rec.source_line_id(l_index));
3109: FETCH c_order_line_info into l_order_line_info;
3110: IF (c_order_line_info%NOTFOUND) THEN
3111: CLOSE c_order_line_info;
3112: WSH_UTIL_CORE.PrintMsg('Sales order not valid');
3113: IF l_debug_on THEN
3114: WSH_DEBUG_SV.log(l_module_name,'Sales order not valid');
3115: END IF;
3116: raise e_line_error;
3117: END if;
3118: CLOSE c_order_line_info;
3118: CLOSE c_order_line_info;
3119:
3120: -- bug 1656291
3121: IF l_debug_on THEN
3122: WSH_DEBUG_SV.log(l_module_name,'source_document_type_id',l_order_line_info.source_document_type_id);
3123: WSH_DEBUG_SV.log(l_module_name,'source_document_id',l_order_line_info.source_document_id);
3124: WSH_DEBUG_SV.log(l_module_name,'source_document_line_id',l_order_line_info.source_document_line_id);
3125: END IF;
3126:
3119:
3120: -- bug 1656291
3121: IF l_debug_on THEN
3122: WSH_DEBUG_SV.log(l_module_name,'source_document_type_id',l_order_line_info.source_document_type_id);
3123: WSH_DEBUG_SV.log(l_module_name,'source_document_id',l_order_line_info.source_document_id);
3124: WSH_DEBUG_SV.log(l_module_name,'source_document_line_id',l_order_line_info.source_document_line_id);
3125: END IF;
3126:
3127: IF (l_order_line_info.source_document_type_id = 10) THEN
3120: -- bug 1656291
3121: IF l_debug_on THEN
3122: WSH_DEBUG_SV.log(l_module_name,'source_document_type_id',l_order_line_info.source_document_type_id);
3123: WSH_DEBUG_SV.log(l_module_name,'source_document_id',l_order_line_info.source_document_id);
3124: WSH_DEBUG_SV.log(l_module_name,'source_document_line_id',l_order_line_info.source_document_line_id);
3125: END IF;
3126:
3127: IF (l_order_line_info.source_document_type_id = 10) THEN
3128: IF l_debug_on THEN
3125: END IF;
3126:
3127: IF (l_order_line_info.source_document_type_id = 10) THEN
3128: IF l_debug_on THEN
3129: WSH_DEBUG_SV.logmsg(l_module_name, 'THIS LINE IS PART OF AN INTERNAL ORDER' );
3130: END IF;
3131:
3132: OPEN c_po_info(l_order_line_info.source_document_line_id, l_order_line_info.source_document_id);
3133: FETCH c_po_info into l_po_info;
3134: IF c_po_info%NOTFOUND THEN
3135: CLOSE c_po_info;
3136: WSH_UTIL_CORE.PrintMsg('Requisition line not found');
3137: IF l_debug_on THEN
3138: WSH_DEBUG_SV.log(l_module_name,'Requisition line not found');
3139: END IF;
3140: raise e_line_error;
3141: END IF;
3142: CLOSE c_po_info;
3141: END IF;
3142: CLOSE c_po_info;
3143:
3144: IF l_debug_on THEN
3145: WSH_DEBUG_SV.logmsg(l_module_name,'REQUISITION LINE ID:'||L_ORDER_LINE_INFO.SOURCE_DOCUMENT_LINE_ID);
3146: WSH_DEBUG_SV.log(l_module_name, 'encumbered_flag', l_po_info.encumbered_flag );
3147: WSH_DEBUG_SV.log(l_module_name, 'budget_account_id', l_po_info.budget_account_id);
3148: WSH_DEBUG_SV.log(l_module_name, 'unit_price', l_po_info.unit_price);
3149: END IF;
3142: CLOSE c_po_info;
3143:
3144: IF l_debug_on THEN
3145: WSH_DEBUG_SV.logmsg(l_module_name,'REQUISITION LINE ID:'||L_ORDER_LINE_INFO.SOURCE_DOCUMENT_LINE_ID);
3146: WSH_DEBUG_SV.log(l_module_name, 'encumbered_flag', l_po_info.encumbered_flag );
3147: WSH_DEBUG_SV.log(l_module_name, 'budget_account_id', l_po_info.budget_account_id);
3148: WSH_DEBUG_SV.log(l_module_name, 'unit_price', l_po_info.unit_price);
3149: END IF;
3150:
3143:
3144: IF l_debug_on THEN
3145: WSH_DEBUG_SV.logmsg(l_module_name,'REQUISITION LINE ID:'||L_ORDER_LINE_INFO.SOURCE_DOCUMENT_LINE_ID);
3146: WSH_DEBUG_SV.log(l_module_name, 'encumbered_flag', l_po_info.encumbered_flag );
3147: WSH_DEBUG_SV.log(l_module_name, 'budget_account_id', l_po_info.budget_account_id);
3148: WSH_DEBUG_SV.log(l_module_name, 'unit_price', l_po_info.unit_price);
3149: END IF;
3150:
3151: --- 2231732 encumbrance enhancement
3144: IF l_debug_on THEN
3145: WSH_DEBUG_SV.logmsg(l_module_name,'REQUISITION LINE ID:'||L_ORDER_LINE_INFO.SOURCE_DOCUMENT_LINE_ID);
3146: WSH_DEBUG_SV.log(l_module_name, 'encumbered_flag', l_po_info.encumbered_flag );
3147: WSH_DEBUG_SV.log(l_module_name, 'budget_account_id', l_po_info.budget_account_id);
3148: WSH_DEBUG_SV.log(l_module_name, 'unit_price', l_po_info.unit_price);
3149: END IF;
3150:
3151: --- 2231732 encumbrance enhancement
3152: If l_po_info.encumbered_flag = 'Y' then
3158: l_mtl_txn_if_rec.inventory_item_id(l_index))* l_po_info.unit_price);
3159: end if;
3160: --
3161: IF l_debug_on THEN
3162: WSH_DEBUG_SV.logmsg(l_module_name,
3163: 'DEST_TYPE_CODE:' ||
3164: L_PO_INFO.DESTINATION_TYPE_CODE ||
3165: ' SOURCE ORG ID:' ||
3166: L_PO_INFO.SOURCE_ORGANIZATION_ID ||
3216: END IF;
3217: END IF;
3218: CLOSE c_mtl_interorg_parameters;
3219: IF l_debug_on THEN
3220: WSH_DEBUG_SV.log(l_module_name,'l_intransit_type', l_intransit_type);
3221: WSH_DEBUG_SV.log(l_module_name,'l_trx_source_type_id', l_trx_source_type_id);
3222: WSH_DEBUG_SV.log(l_module_name,'l_trx_action_id', l_trx_action_id);
3223: WSH_DEBUG_SV.log(l_module_name,'l_trx_type_code', l_trx_type_code);
3224: END IF;
3217: END IF;
3218: CLOSE c_mtl_interorg_parameters;
3219: IF l_debug_on THEN
3220: WSH_DEBUG_SV.log(l_module_name,'l_intransit_type', l_intransit_type);
3221: WSH_DEBUG_SV.log(l_module_name,'l_trx_source_type_id', l_trx_source_type_id);
3222: WSH_DEBUG_SV.log(l_module_name,'l_trx_action_id', l_trx_action_id);
3223: WSH_DEBUG_SV.log(l_module_name,'l_trx_type_code', l_trx_type_code);
3224: END IF;
3225: END IF;
3218: CLOSE c_mtl_interorg_parameters;
3219: IF l_debug_on THEN
3220: WSH_DEBUG_SV.log(l_module_name,'l_intransit_type', l_intransit_type);
3221: WSH_DEBUG_SV.log(l_module_name,'l_trx_source_type_id', l_trx_source_type_id);
3222: WSH_DEBUG_SV.log(l_module_name,'l_trx_action_id', l_trx_action_id);
3223: WSH_DEBUG_SV.log(l_module_name,'l_trx_type_code', l_trx_type_code);
3224: END IF;
3225: END IF;
3226:
3219: IF l_debug_on THEN
3220: WSH_DEBUG_SV.log(l_module_name,'l_intransit_type', l_intransit_type);
3221: WSH_DEBUG_SV.log(l_module_name,'l_trx_source_type_id', l_trx_source_type_id);
3222: WSH_DEBUG_SV.log(l_module_name,'l_trx_action_id', l_trx_action_id);
3223: WSH_DEBUG_SV.log(l_module_name,'l_trx_type_code', l_trx_type_code);
3224: END IF;
3225: END IF;
3226:
3227:
3231: --Shipping Goods Dispatched Account instead of Charge account from PO to Inventor for Interface.
3232:
3233: IF (WSH_CODE_CONTROL.Get_Code_Release_Level >= '110510') THEN
3234: IF l_debug_on THEN
3235: WSH_DEBUG_SV.logmsg(l_module_name,'Onward 11.5.10 not requried to get the PO account',
3236: WSH_DEBUG_SV.C_PROC_LEVEL);
3237: END IF;
3238: l_account := NULL;
3239: ELSE
3232:
3233: IF (WSH_CODE_CONTROL.Get_Code_Release_Level >= '110510') THEN
3234: IF l_debug_on THEN
3235: WSH_DEBUG_SV.logmsg(l_module_name,'Onward 11.5.10 not requried to get the PO account',
3236: WSH_DEBUG_SV.C_PROC_LEVEL);
3237: END IF;
3238: l_account := NULL;
3239: ELSE
3240: IF l_debug_on THEN
3237: END IF;
3238: l_account := NULL;
3239: ELSE
3240: IF l_debug_on THEN
3241: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit PO_REQ_DIST_SV1.GET_DIST_ACCOUNT',
3242: WSH_DEBUG_SV.C_PROC_LEVEL);
3243: END IF;
3244:
3245: l_account := PO_REQ_DIST_SV1.get_dist_account( l_requisition_line_id ) ; -- Bug 1610178
3238: l_account := NULL;
3239: ELSE
3240: IF l_debug_on THEN
3241: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit PO_REQ_DIST_SV1.GET_DIST_ACCOUNT',
3242: WSH_DEBUG_SV.C_PROC_LEVEL);
3243: END IF;
3244:
3245: l_account := PO_REQ_DIST_SV1.get_dist_account( l_requisition_line_id ) ; -- Bug 1610178
3246: END IF;
3245: l_account := PO_REQ_DIST_SV1.get_dist_account( l_requisition_line_id ) ; -- Bug 1610178
3246: END IF;
3247:
3248: IF l_debug_on THEN
3249: WSH_DEBUG_SV.log(l_module_name,'l_account',l_account);
3250: END IF;
3251:
3252: IF ( l_account = -11 ) OR l_account IS NULL THEN
3253: IF l_account = -11 THEN
3261: x_param_info => l_ship_params,
3262: x_return_status => l_sp_ret_status);
3263:
3264: IF l_debug_on THEN
3265: WSH_DEBUG_SV.log(l_module_name,'wsh_shipping_params_pvt.get l_sp_ret_status',l_sp_ret_status);
3266: END IF;
3267: IF l_sp_ret_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3268: wsh_util_core.printmsg('Unable to get shipping parameters for org '
3269: || l_mtl_txn_if_rec.organization_id(l_index));
3268: wsh_util_core.printmsg('Unable to get shipping parameters for org '
3269: || l_mtl_txn_if_rec.organization_id(l_index));
3270:
3271: IF l_debug_on THEN
3272: WSH_DEBUG_SV.log(l_module_name,'Unable to get shipping parameters for org ',
3273: l_mtl_txn_if_rec.organization_id(l_index));
3274: END IF;
3275: raise e_line_warning;
3276: END IF;
3277:
3278:
3279: l_account := l_ship_params.goods_dispatched_account;
3280: IF l_debug_on THEN
3281: WSH_DEBUG_SV.logmsg(l_module_name, ' ACCOUNT_ID:' || L_ACCOUNT );
3282: END IF;
3283:
3284: IF ( l_account IS NULL ) THEN
3285: WSH_UTIL_CORE.PrintMsg('There is no default goods dispatched account for org ' ||
3290: END IF;
3291: END IF;
3292: --
3293: IF l_debug_on THEN
3294: WSH_DEBUG_SV.logmsg(l_module_name, 'DISTRIBUTION ACCOUNT IS ' || L_ACCOUNT );
3295: END IF;
3296: --
3297:
3298: -- Added for bug 4538005
3306: ELSIF ( l_mtl_txn_if_rec.ship_method_code(l_index) IS NOT NULL )
3307: THEN
3308:
3309: IF l_debug_on THEN
3310: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling program WSH_LOCATIONS_PKG.Get_Intransit_Time');
3311: END IF;
3312:
3313: OPEN get_session_id;
3314: FETCH get_session_id INTO l_session_id;
3330: --Handle Return Status
3331: x_return_status := l_return_status;
3332:
3333: IF l_debug_on THEN
3334: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
3335: WSH_DEBUG_SV.logmsg(l_module_name, 'Error returned from WSH_LOCATIONS_PKG.Get_Intransit_Time');
3336: WSH_DEBUG_SV.pop(l_module_name);
3337: END IF;
3338:
3331: x_return_status := l_return_status;
3332:
3333: IF l_debug_on THEN
3334: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
3335: WSH_DEBUG_SV.logmsg(l_module_name, 'Error returned from WSH_LOCATIONS_PKG.Get_Intransit_Time');
3336: WSH_DEBUG_SV.pop(l_module_name);
3337: END IF;
3338:
3339: RETURN;
3332:
3333: IF l_debug_on THEN
3334: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
3335: WSH_DEBUG_SV.logmsg(l_module_name, 'Error returned from WSH_LOCATIONS_PKG.Get_Intransit_Time');
3336: WSH_DEBUG_SV.pop(l_module_name);
3337: END IF;
3338:
3339: RETURN;
3340: END IF;
3347: l_intransit_time := 0;
3348: END IF;
3349:
3350: IF l_debug_on THEN
3351: WSH_DEBUG_SV.log(l_module_name, 'Intransit Time', l_intransit_time);
3352: END IF;
3353:
3354:
3355:
3359: ------------------------------------
3360: ELSE /* not internal order */
3361: --
3362: IF l_debug_on THEN
3363: WSH_DEBUG_SV.logmsg(l_module_name, 'NOT AN INTERNAL ORDER' );
3364: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_DETAILS_PKG.GET_ACCOUNT',
3365: WSH_DEBUG_SV.C_PROC_LEVEL);
3366: END IF;
3367:
3360: ELSE /* not internal order */
3361: --
3362: IF l_debug_on THEN
3363: WSH_DEBUG_SV.logmsg(l_module_name, 'NOT AN INTERNAL ORDER' );
3364: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_DETAILS_PKG.GET_ACCOUNT',
3365: WSH_DEBUG_SV.C_PROC_LEVEL);
3366: END IF;
3367:
3368: /* get cogs account */
3361: --
3362: IF l_debug_on THEN
3363: WSH_DEBUG_SV.logmsg(l_module_name, 'NOT AN INTERNAL ORDER' );
3364: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_DELIVERY_DETAILS_PKG.GET_ACCOUNT',
3365: WSH_DEBUG_SV.C_PROC_LEVEL);
3366: END IF;
3367:
3368: /* get cogs account */
3369: l_account := WSH_TPA_DELIVERY_DETAILS_PKG.Get_Account(
3370: p_delivery_detail_id => l_mtl_txn_if_rec.picking_line_id(l_index),
3371: x_return_status => l_account_return_status);
3372:
3373: IF l_debug_on THEN
3374: WSH_DEBUG_SV.logmsg(l_module_name, 'RET_STATUS:'|| L_ACCOUNT_RETURN_STATUS ||
3375: ' ACCOUNT_ID:' || L_ACCOUNT );
3376: END IF;
3377:
3378: IF ( l_account_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3391: FND_MESSAGE.SET_NAME('WSH','WSH_XC_INVALID_LOCATION');
3392: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR, l_module_name);
3393: CLOSE c_convert_locId;
3394: IF l_debug_on THEN
3395: WSH_DEBUG_SV.log(l_module_name, 'c_convert_locId%NOTFOUND',
3396: l_mtl_txn_if_rec.ship_to_location_id(l_index));
3397: END IF;
3398: raise e_line_error;
3399: END IF;
3415: l_trx_type_code := 77;
3416: l_trx_source_id := l_mtl_txn_if_rec.source_header_id(l_index);
3417: --
3418: IF l_debug_on THEN
3419: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OKE_SHIPPING_EXT.COST_OF_SALES_ACCOUNT',
3420: WSH_DEBUG_SV.C_PROC_LEVEL);
3421: END IF;
3422: --
3423: l_account := OKE_SHIPPING_EXT.COST_OF_SALES_ACCOUNT(
3416: l_trx_source_id := l_mtl_txn_if_rec.source_header_id(l_index);
3417: --
3418: IF l_debug_on THEN
3419: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OKE_SHIPPING_EXT.COST_OF_SALES_ACCOUNT',
3420: WSH_DEBUG_SV.C_PROC_LEVEL);
3421: END IF;
3422: --
3423: l_account := OKE_SHIPPING_EXT.COST_OF_SALES_ACCOUNT(
3424: X_Delivery_Detail_ID => l_mtl_txn_if_rec.picking_line_id(l_index));
3422: --
3423: l_account := OKE_SHIPPING_EXT.COST_OF_SALES_ACCOUNT(
3424: X_Delivery_Detail_ID => l_mtl_txn_if_rec.picking_line_id(l_index));
3425: IF l_debug_on THEN
3426: WSH_DEBUG_SV.log(l_module_name,'l_account',l_account);
3427: END IF;
3428:
3429: IF l_account IS NULL THEN
3430: WSH_UTIL_CORE.PrintMsg('OKE_SHIPPING_EXT.Cost_Of_Sales_Account returns NULL value');
3436: IF l_sp_ret_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3437: wsh_util_core.printmsg('Unable to get shipping parameters for org ' ||
3438: l_mtl_txn_if_rec.organization_id(l_index));
3439: IF l_debug_on THEN
3440: WSH_DEBUG_SV.log(l_module_name,
3441: 'Unable to get shipping parameters for org', l_mtl_txn_if_rec.organization_id(l_index));
3442: END IF;
3443: raise e_line_warning;
3444: END IF;
3444: END IF;
3445:
3446: l_account := l_ship_params.goods_dispatched_account;
3447: IF l_debug_on THEN
3448: WSH_DEBUG_SV.logmsg(l_module_name, ' ACCOUNT_ID:' || L_ACCOUNT );
3449: END IF;
3450: --
3451: IF l_account IS NULL THEN
3452: WSH_UTIL_CORE.PrintMsg('There is no default goods dispatched account for org ' ||
3453: l_mtl_txn_if_rec.organization_id(l_index));
3454: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING ;
3455: --
3456: IF l_debug_on THEN
3457: WSH_DEBUG_SV.log(l_module_name, 'There is no default goods dispatched account for org'
3458: ,l_mtl_txn_if_rec.organization_id(l_index));
3459: END IF;
3460: raise e_line_warning;
3461: END IF;
3468: l_trx_type_code := 32; -- miscellaneous issue
3469: l_trx_source_id := l_mtl_txn_if_rec.source_header_id(l_index);
3470:
3471: IF l_debug_on THEN
3472: WSH_DEBUG_SV.log(l_module_name,'l_source_code',l_source_code);
3473: WSH_DEBUG_SV.log(l_module_name,'l_trx_source_id',l_trx_source_id);
3474: END IF;
3475:
3476: wsh_shipping_params_pvt.get(
3469: l_trx_source_id := l_mtl_txn_if_rec.source_header_id(l_index);
3470:
3471: IF l_debug_on THEN
3472: WSH_DEBUG_SV.log(l_module_name,'l_source_code',l_source_code);
3473: WSH_DEBUG_SV.log(l_module_name,'l_trx_source_id',l_trx_source_id);
3474: END IF;
3475:
3476: wsh_shipping_params_pvt.get(
3477: p_organization_id => l_mtl_txn_if_rec.organization_id(l_index),
3482: l_mtl_txn_if_rec.organization_id(l_index));
3483: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3484: --
3485: IF l_debug_on THEN
3486: WSH_DEBUG_SV.log(l_module_name, 'Unable to get shipping parameters for org',
3487: l_mtl_txn_if_rec.organization_id(l_index));
3488: END IF;
3489: raise e_line_warning;
3490: END IF;
3490: END IF;
3491:
3492: l_account := l_ship_params.goods_dispatched_account;
3493: IF l_debug_on THEN
3494: WSH_DEBUG_SV.logmsg(l_module_name, ' ACCOUNT_ID:' || L_ACCOUNT );
3495: END IF;
3496:
3497: IF ( l_account IS NULL ) THEN
3498: WSH_UTIL_CORE.PrintMsg('There is no default goods dispatched account for org ' ||
3499: l_mtl_txn_if_rec.organization_id(l_index));
3500: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING ;
3501: --
3502: IF l_debug_on THEN
3503: WSH_DEBUG_SV.log(l_module_name, 'There is no default goods dispatched account for org',
3504: l_mtl_txn_if_rec.organization_id(l_index));
3505: END IF;
3506: raise e_line_warning;
3507: END IF;
3514: x_return_status => x_return_status);
3515: END IF;
3516:
3517: IF l_debug_on THEN
3518: WSH_DEBUG_SV.log(l_module_name,'l_org_type',l_org_type);
3519: WSH_DEBUG_SV.log(l_module_name,'l_source_code',l_source_code);
3520: END IF;
3521:
3522: l_prev_organization_id := l_mtl_txn_if_rec.organization_id(l_index);
3515: END IF;
3516:
3517: IF l_debug_on THEN
3518: WSH_DEBUG_SV.log(l_module_name,'l_org_type',l_org_type);
3519: WSH_DEBUG_SV.log(l_module_name,'l_source_code',l_source_code);
3520: END IF;
3521:
3522: l_prev_organization_id := l_mtl_txn_if_rec.organization_id(l_index);
3523:
3610: l_mtl_ser_txn_if_rec.attribute15(l_ser_count):=null;
3611: -- End of Bug 3628620
3612:
3613: IF l_debug_on THEN
3614: WSH_DEBUG_SV.logmsg(l_module_name, 'ITEM BEING ADD TO SERIAL RECORD l_mtl_ser_txn_if_rec');
3615: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_ser_txn_if_rec.source_code(l_ser_count));
3616: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_ser_txn_if_rec.source_line_id(l_ser_count));
3617: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',l_mtl_ser_txn_if_rec.fm_serial_number(l_ser_count));
3618: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',l_mtl_ser_txn_if_rec.to_serial_number(l_ser_count));
3611: -- End of Bug 3628620
3612:
3613: IF l_debug_on THEN
3614: WSH_DEBUG_SV.logmsg(l_module_name, 'ITEM BEING ADD TO SERIAL RECORD l_mtl_ser_txn_if_rec');
3615: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_ser_txn_if_rec.source_code(l_ser_count));
3616: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_ser_txn_if_rec.source_line_id(l_ser_count));
3617: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',l_mtl_ser_txn_if_rec.fm_serial_number(l_ser_count));
3618: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',l_mtl_ser_txn_if_rec.to_serial_number(l_ser_count));
3619: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3612:
3613: IF l_debug_on THEN
3614: WSH_DEBUG_SV.logmsg(l_module_name, 'ITEM BEING ADD TO SERIAL RECORD l_mtl_ser_txn_if_rec');
3615: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_ser_txn_if_rec.source_code(l_ser_count));
3616: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_ser_txn_if_rec.source_line_id(l_ser_count));
3617: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',l_mtl_ser_txn_if_rec.fm_serial_number(l_ser_count));
3618: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',l_mtl_ser_txn_if_rec.to_serial_number(l_ser_count));
3619: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3620: l_mtl_ser_txn_if_rec.transaction_interface_id(l_ser_count));
3613: IF l_debug_on THEN
3614: WSH_DEBUG_SV.logmsg(l_module_name, 'ITEM BEING ADD TO SERIAL RECORD l_mtl_ser_txn_if_rec');
3615: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_ser_txn_if_rec.source_code(l_ser_count));
3616: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_ser_txn_if_rec.source_line_id(l_ser_count));
3617: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',l_mtl_ser_txn_if_rec.fm_serial_number(l_ser_count));
3618: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',l_mtl_ser_txn_if_rec.to_serial_number(l_ser_count));
3619: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3620: l_mtl_ser_txn_if_rec.transaction_interface_id(l_ser_count));
3621: WSH_DEBUG_SV.log(l_module_name,'Attribute Category',l_mtl_ser_txn_if_rec.attribute_category(l_ser_count));
3614: WSH_DEBUG_SV.logmsg(l_module_name, 'ITEM BEING ADD TO SERIAL RECORD l_mtl_ser_txn_if_rec');
3615: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_ser_txn_if_rec.source_code(l_ser_count));
3616: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_ser_txn_if_rec.source_line_id(l_ser_count));
3617: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',l_mtl_ser_txn_if_rec.fm_serial_number(l_ser_count));
3618: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',l_mtl_ser_txn_if_rec.to_serial_number(l_ser_count));
3619: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3620: l_mtl_ser_txn_if_rec.transaction_interface_id(l_ser_count));
3621: WSH_DEBUG_SV.log(l_module_name,'Attribute Category',l_mtl_ser_txn_if_rec.attribute_category(l_ser_count));
3622: WSH_DEBUG_SV.log(l_module_name,'Attribute1',l_mtl_ser_txn_if_rec.attribute1(l_ser_count));
3615: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_ser_txn_if_rec.source_code(l_ser_count));
3616: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_ser_txn_if_rec.source_line_id(l_ser_count));
3617: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',l_mtl_ser_txn_if_rec.fm_serial_number(l_ser_count));
3618: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',l_mtl_ser_txn_if_rec.to_serial_number(l_ser_count));
3619: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3620: l_mtl_ser_txn_if_rec.transaction_interface_id(l_ser_count));
3621: WSH_DEBUG_SV.log(l_module_name,'Attribute Category',l_mtl_ser_txn_if_rec.attribute_category(l_ser_count));
3622: WSH_DEBUG_SV.log(l_module_name,'Attribute1',l_mtl_ser_txn_if_rec.attribute1(l_ser_count));
3623: WSH_DEBUG_SV.log(l_module_name,'Attribute2',l_mtl_ser_txn_if_rec.attribute2(l_ser_count));
3617: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',l_mtl_ser_txn_if_rec.fm_serial_number(l_ser_count));
3618: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',l_mtl_ser_txn_if_rec.to_serial_number(l_ser_count));
3619: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3620: l_mtl_ser_txn_if_rec.transaction_interface_id(l_ser_count));
3621: WSH_DEBUG_SV.log(l_module_name,'Attribute Category',l_mtl_ser_txn_if_rec.attribute_category(l_ser_count));
3622: WSH_DEBUG_SV.log(l_module_name,'Attribute1',l_mtl_ser_txn_if_rec.attribute1(l_ser_count));
3623: WSH_DEBUG_SV.log(l_module_name,'Attribute2',l_mtl_ser_txn_if_rec.attribute2(l_ser_count));
3624: WSH_DEBUG_SV.log(l_module_name,'Attribute3',l_mtl_ser_txn_if_rec.attribute3(l_ser_count));
3625: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3618: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',l_mtl_ser_txn_if_rec.to_serial_number(l_ser_count));
3619: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3620: l_mtl_ser_txn_if_rec.transaction_interface_id(l_ser_count));
3621: WSH_DEBUG_SV.log(l_module_name,'Attribute Category',l_mtl_ser_txn_if_rec.attribute_category(l_ser_count));
3622: WSH_DEBUG_SV.log(l_module_name,'Attribute1',l_mtl_ser_txn_if_rec.attribute1(l_ser_count));
3623: WSH_DEBUG_SV.log(l_module_name,'Attribute2',l_mtl_ser_txn_if_rec.attribute2(l_ser_count));
3624: WSH_DEBUG_SV.log(l_module_name,'Attribute3',l_mtl_ser_txn_if_rec.attribute3(l_ser_count));
3625: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3626: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3619: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3620: l_mtl_ser_txn_if_rec.transaction_interface_id(l_ser_count));
3621: WSH_DEBUG_SV.log(l_module_name,'Attribute Category',l_mtl_ser_txn_if_rec.attribute_category(l_ser_count));
3622: WSH_DEBUG_SV.log(l_module_name,'Attribute1',l_mtl_ser_txn_if_rec.attribute1(l_ser_count));
3623: WSH_DEBUG_SV.log(l_module_name,'Attribute2',l_mtl_ser_txn_if_rec.attribute2(l_ser_count));
3624: WSH_DEBUG_SV.log(l_module_name,'Attribute3',l_mtl_ser_txn_if_rec.attribute3(l_ser_count));
3625: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3626: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3627: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3620: l_mtl_ser_txn_if_rec.transaction_interface_id(l_ser_count));
3621: WSH_DEBUG_SV.log(l_module_name,'Attribute Category',l_mtl_ser_txn_if_rec.attribute_category(l_ser_count));
3622: WSH_DEBUG_SV.log(l_module_name,'Attribute1',l_mtl_ser_txn_if_rec.attribute1(l_ser_count));
3623: WSH_DEBUG_SV.log(l_module_name,'Attribute2',l_mtl_ser_txn_if_rec.attribute2(l_ser_count));
3624: WSH_DEBUG_SV.log(l_module_name,'Attribute3',l_mtl_ser_txn_if_rec.attribute3(l_ser_count));
3625: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3626: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3627: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3628: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3621: WSH_DEBUG_SV.log(l_module_name,'Attribute Category',l_mtl_ser_txn_if_rec.attribute_category(l_ser_count));
3622: WSH_DEBUG_SV.log(l_module_name,'Attribute1',l_mtl_ser_txn_if_rec.attribute1(l_ser_count));
3623: WSH_DEBUG_SV.log(l_module_name,'Attribute2',l_mtl_ser_txn_if_rec.attribute2(l_ser_count));
3624: WSH_DEBUG_SV.log(l_module_name,'Attribute3',l_mtl_ser_txn_if_rec.attribute3(l_ser_count));
3625: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3626: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3627: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3628: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3629: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3622: WSH_DEBUG_SV.log(l_module_name,'Attribute1',l_mtl_ser_txn_if_rec.attribute1(l_ser_count));
3623: WSH_DEBUG_SV.log(l_module_name,'Attribute2',l_mtl_ser_txn_if_rec.attribute2(l_ser_count));
3624: WSH_DEBUG_SV.log(l_module_name,'Attribute3',l_mtl_ser_txn_if_rec.attribute3(l_ser_count));
3625: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3626: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3627: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3628: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3629: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3630: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3623: WSH_DEBUG_SV.log(l_module_name,'Attribute2',l_mtl_ser_txn_if_rec.attribute2(l_ser_count));
3624: WSH_DEBUG_SV.log(l_module_name,'Attribute3',l_mtl_ser_txn_if_rec.attribute3(l_ser_count));
3625: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3626: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3627: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3628: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3629: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3630: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3631: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3624: WSH_DEBUG_SV.log(l_module_name,'Attribute3',l_mtl_ser_txn_if_rec.attribute3(l_ser_count));
3625: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3626: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3627: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3628: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3629: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3630: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3631: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3632: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3625: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3626: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3627: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3628: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3629: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3630: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3631: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3632: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3633: WSH_DEBUG_SV.log(l_module_name,'Attribute12',l_mtl_ser_txn_if_rec.attribute12(l_ser_count));
3626: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3627: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3628: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3629: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3630: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3631: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3632: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3633: WSH_DEBUG_SV.log(l_module_name,'Attribute12',l_mtl_ser_txn_if_rec.attribute12(l_ser_count));
3634: WSH_DEBUG_SV.log(l_module_name,'Attribute13',l_mtl_ser_txn_if_rec.attribute13(l_ser_count));
3627: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3628: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3629: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3630: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3631: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3632: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3633: WSH_DEBUG_SV.log(l_module_name,'Attribute12',l_mtl_ser_txn_if_rec.attribute12(l_ser_count));
3634: WSH_DEBUG_SV.log(l_module_name,'Attribute13',l_mtl_ser_txn_if_rec.attribute13(l_ser_count));
3635: WSH_DEBUG_SV.log(l_module_name,'Attribute14',l_mtl_ser_txn_if_rec.attribute14(l_ser_count));
3628: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3629: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3630: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3631: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3632: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3633: WSH_DEBUG_SV.log(l_module_name,'Attribute12',l_mtl_ser_txn_if_rec.attribute12(l_ser_count));
3634: WSH_DEBUG_SV.log(l_module_name,'Attribute13',l_mtl_ser_txn_if_rec.attribute13(l_ser_count));
3635: WSH_DEBUG_SV.log(l_module_name,'Attribute14',l_mtl_ser_txn_if_rec.attribute14(l_ser_count));
3636: WSH_DEBUG_SV.log(l_module_name,'Attribute15',l_mtl_ser_txn_if_rec.attribute15(l_ser_count));
3629: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3630: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3631: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3632: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3633: WSH_DEBUG_SV.log(l_module_name,'Attribute12',l_mtl_ser_txn_if_rec.attribute12(l_ser_count));
3634: WSH_DEBUG_SV.log(l_module_name,'Attribute13',l_mtl_ser_txn_if_rec.attribute13(l_ser_count));
3635: WSH_DEBUG_SV.log(l_module_name,'Attribute14',l_mtl_ser_txn_if_rec.attribute14(l_ser_count));
3636: WSH_DEBUG_SV.log(l_module_name,'Attribute15',l_mtl_ser_txn_if_rec.attribute15(l_ser_count));
3637: END IF;
3630: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3631: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3632: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3633: WSH_DEBUG_SV.log(l_module_name,'Attribute12',l_mtl_ser_txn_if_rec.attribute12(l_ser_count));
3634: WSH_DEBUG_SV.log(l_module_name,'Attribute13',l_mtl_ser_txn_if_rec.attribute13(l_ser_count));
3635: WSH_DEBUG_SV.log(l_module_name,'Attribute14',l_mtl_ser_txn_if_rec.attribute14(l_ser_count));
3636: WSH_DEBUG_SV.log(l_module_name,'Attribute15',l_mtl_ser_txn_if_rec.attribute15(l_ser_count));
3637: END IF;
3638:
3631: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3632: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3633: WSH_DEBUG_SV.log(l_module_name,'Attribute12',l_mtl_ser_txn_if_rec.attribute12(l_ser_count));
3634: WSH_DEBUG_SV.log(l_module_name,'Attribute13',l_mtl_ser_txn_if_rec.attribute13(l_ser_count));
3635: WSH_DEBUG_SV.log(l_module_name,'Attribute14',l_mtl_ser_txn_if_rec.attribute14(l_ser_count));
3636: WSH_DEBUG_SV.log(l_module_name,'Attribute15',l_mtl_ser_txn_if_rec.attribute15(l_ser_count));
3637: END IF;
3638:
3639: ELSE
3632: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3633: WSH_DEBUG_SV.log(l_module_name,'Attribute12',l_mtl_ser_txn_if_rec.attribute12(l_ser_count));
3634: WSH_DEBUG_SV.log(l_module_name,'Attribute13',l_mtl_ser_txn_if_rec.attribute13(l_ser_count));
3635: WSH_DEBUG_SV.log(l_module_name,'Attribute14',l_mtl_ser_txn_if_rec.attribute14(l_ser_count));
3636: WSH_DEBUG_SV.log(l_module_name,'Attribute15',l_mtl_ser_txn_if_rec.attribute15(l_ser_count));
3637: END IF;
3638:
3639: ELSE
3640: l_serial_count := 0;
3676: l_mtl_ser_txn_if_rec.attribute15(l_ser_count):=ser_rec.attribute15;
3677: -- End of Bug 3628620
3678:
3679: IF l_debug_on THEN
3680: WSH_DEBUG_SV.logmsg(l_module_name, 'ITEM BEING ADD TO SERIAL RECORD l_mtl_ser_txn_if_rec');
3681: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_ser_txn_if_rec.source_code(l_ser_count));
3682: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_ser_txn_if_rec.source_line_id(l_ser_count));
3683: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',l_mtl_ser_txn_if_rec.fm_serial_number(l_ser_count));
3684: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',l_mtl_ser_txn_if_rec.to_serial_number(l_ser_count));
3677: -- End of Bug 3628620
3678:
3679: IF l_debug_on THEN
3680: WSH_DEBUG_SV.logmsg(l_module_name, 'ITEM BEING ADD TO SERIAL RECORD l_mtl_ser_txn_if_rec');
3681: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_ser_txn_if_rec.source_code(l_ser_count));
3682: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_ser_txn_if_rec.source_line_id(l_ser_count));
3683: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',l_mtl_ser_txn_if_rec.fm_serial_number(l_ser_count));
3684: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',l_mtl_ser_txn_if_rec.to_serial_number(l_ser_count));
3685: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3678:
3679: IF l_debug_on THEN
3680: WSH_DEBUG_SV.logmsg(l_module_name, 'ITEM BEING ADD TO SERIAL RECORD l_mtl_ser_txn_if_rec');
3681: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_ser_txn_if_rec.source_code(l_ser_count));
3682: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_ser_txn_if_rec.source_line_id(l_ser_count));
3683: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',l_mtl_ser_txn_if_rec.fm_serial_number(l_ser_count));
3684: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',l_mtl_ser_txn_if_rec.to_serial_number(l_ser_count));
3685: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3686: l_mtl_ser_txn_if_rec.transaction_interface_id(l_ser_count));
3679: IF l_debug_on THEN
3680: WSH_DEBUG_SV.logmsg(l_module_name, 'ITEM BEING ADD TO SERIAL RECORD l_mtl_ser_txn_if_rec');
3681: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_ser_txn_if_rec.source_code(l_ser_count));
3682: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_ser_txn_if_rec.source_line_id(l_ser_count));
3683: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',l_mtl_ser_txn_if_rec.fm_serial_number(l_ser_count));
3684: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',l_mtl_ser_txn_if_rec.to_serial_number(l_ser_count));
3685: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3686: l_mtl_ser_txn_if_rec.transaction_interface_id(l_ser_count));
3687: WSH_DEBUG_SV.log(l_module_name,'Attribute Category',l_mtl_ser_txn_if_rec.attribute_category(l_ser_count));
3680: WSH_DEBUG_SV.logmsg(l_module_name, 'ITEM BEING ADD TO SERIAL RECORD l_mtl_ser_txn_if_rec');
3681: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_ser_txn_if_rec.source_code(l_ser_count));
3682: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_ser_txn_if_rec.source_line_id(l_ser_count));
3683: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',l_mtl_ser_txn_if_rec.fm_serial_number(l_ser_count));
3684: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',l_mtl_ser_txn_if_rec.to_serial_number(l_ser_count));
3685: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3686: l_mtl_ser_txn_if_rec.transaction_interface_id(l_ser_count));
3687: WSH_DEBUG_SV.log(l_module_name,'Attribute Category',l_mtl_ser_txn_if_rec.attribute_category(l_ser_count));
3688: WSH_DEBUG_SV.log(l_module_name,'Attribute1',l_mtl_ser_txn_if_rec.attribute1(l_ser_count));
3681: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_ser_txn_if_rec.source_code(l_ser_count));
3682: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_ser_txn_if_rec.source_line_id(l_ser_count));
3683: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',l_mtl_ser_txn_if_rec.fm_serial_number(l_ser_count));
3684: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',l_mtl_ser_txn_if_rec.to_serial_number(l_ser_count));
3685: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3686: l_mtl_ser_txn_if_rec.transaction_interface_id(l_ser_count));
3687: WSH_DEBUG_SV.log(l_module_name,'Attribute Category',l_mtl_ser_txn_if_rec.attribute_category(l_ser_count));
3688: WSH_DEBUG_SV.log(l_module_name,'Attribute1',l_mtl_ser_txn_if_rec.attribute1(l_ser_count));
3689: WSH_DEBUG_SV.log(l_module_name,'Attribute2',l_mtl_ser_txn_if_rec.attribute2(l_ser_count));
3683: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',l_mtl_ser_txn_if_rec.fm_serial_number(l_ser_count));
3684: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',l_mtl_ser_txn_if_rec.to_serial_number(l_ser_count));
3685: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3686: l_mtl_ser_txn_if_rec.transaction_interface_id(l_ser_count));
3687: WSH_DEBUG_SV.log(l_module_name,'Attribute Category',l_mtl_ser_txn_if_rec.attribute_category(l_ser_count));
3688: WSH_DEBUG_SV.log(l_module_name,'Attribute1',l_mtl_ser_txn_if_rec.attribute1(l_ser_count));
3689: WSH_DEBUG_SV.log(l_module_name,'Attribute2',l_mtl_ser_txn_if_rec.attribute2(l_ser_count));
3690: WSH_DEBUG_SV.log(l_module_name,'Attribute3',l_mtl_ser_txn_if_rec.attribute3(l_ser_count));
3691: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3684: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',l_mtl_ser_txn_if_rec.to_serial_number(l_ser_count));
3685: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3686: l_mtl_ser_txn_if_rec.transaction_interface_id(l_ser_count));
3687: WSH_DEBUG_SV.log(l_module_name,'Attribute Category',l_mtl_ser_txn_if_rec.attribute_category(l_ser_count));
3688: WSH_DEBUG_SV.log(l_module_name,'Attribute1',l_mtl_ser_txn_if_rec.attribute1(l_ser_count));
3689: WSH_DEBUG_SV.log(l_module_name,'Attribute2',l_mtl_ser_txn_if_rec.attribute2(l_ser_count));
3690: WSH_DEBUG_SV.log(l_module_name,'Attribute3',l_mtl_ser_txn_if_rec.attribute3(l_ser_count));
3691: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3692: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3685: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3686: l_mtl_ser_txn_if_rec.transaction_interface_id(l_ser_count));
3687: WSH_DEBUG_SV.log(l_module_name,'Attribute Category',l_mtl_ser_txn_if_rec.attribute_category(l_ser_count));
3688: WSH_DEBUG_SV.log(l_module_name,'Attribute1',l_mtl_ser_txn_if_rec.attribute1(l_ser_count));
3689: WSH_DEBUG_SV.log(l_module_name,'Attribute2',l_mtl_ser_txn_if_rec.attribute2(l_ser_count));
3690: WSH_DEBUG_SV.log(l_module_name,'Attribute3',l_mtl_ser_txn_if_rec.attribute3(l_ser_count));
3691: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3692: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3693: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3686: l_mtl_ser_txn_if_rec.transaction_interface_id(l_ser_count));
3687: WSH_DEBUG_SV.log(l_module_name,'Attribute Category',l_mtl_ser_txn_if_rec.attribute_category(l_ser_count));
3688: WSH_DEBUG_SV.log(l_module_name,'Attribute1',l_mtl_ser_txn_if_rec.attribute1(l_ser_count));
3689: WSH_DEBUG_SV.log(l_module_name,'Attribute2',l_mtl_ser_txn_if_rec.attribute2(l_ser_count));
3690: WSH_DEBUG_SV.log(l_module_name,'Attribute3',l_mtl_ser_txn_if_rec.attribute3(l_ser_count));
3691: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3692: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3693: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3694: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3687: WSH_DEBUG_SV.log(l_module_name,'Attribute Category',l_mtl_ser_txn_if_rec.attribute_category(l_ser_count));
3688: WSH_DEBUG_SV.log(l_module_name,'Attribute1',l_mtl_ser_txn_if_rec.attribute1(l_ser_count));
3689: WSH_DEBUG_SV.log(l_module_name,'Attribute2',l_mtl_ser_txn_if_rec.attribute2(l_ser_count));
3690: WSH_DEBUG_SV.log(l_module_name,'Attribute3',l_mtl_ser_txn_if_rec.attribute3(l_ser_count));
3691: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3692: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3693: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3694: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3695: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3688: WSH_DEBUG_SV.log(l_module_name,'Attribute1',l_mtl_ser_txn_if_rec.attribute1(l_ser_count));
3689: WSH_DEBUG_SV.log(l_module_name,'Attribute2',l_mtl_ser_txn_if_rec.attribute2(l_ser_count));
3690: WSH_DEBUG_SV.log(l_module_name,'Attribute3',l_mtl_ser_txn_if_rec.attribute3(l_ser_count));
3691: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3692: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3693: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3694: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3695: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3696: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3689: WSH_DEBUG_SV.log(l_module_name,'Attribute2',l_mtl_ser_txn_if_rec.attribute2(l_ser_count));
3690: WSH_DEBUG_SV.log(l_module_name,'Attribute3',l_mtl_ser_txn_if_rec.attribute3(l_ser_count));
3691: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3692: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3693: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3694: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3695: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3696: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3697: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3690: WSH_DEBUG_SV.log(l_module_name,'Attribute3',l_mtl_ser_txn_if_rec.attribute3(l_ser_count));
3691: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3692: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3693: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3694: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3695: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3696: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3697: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3698: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3691: WSH_DEBUG_SV.log(l_module_name,'Attribute4',l_mtl_ser_txn_if_rec.attribute4(l_ser_count));
3692: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3693: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3694: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3695: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3696: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3697: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3698: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3699: WSH_DEBUG_SV.log(l_module_name,'Attribute12',l_mtl_ser_txn_if_rec.attribute12(l_ser_count));
3692: WSH_DEBUG_SV.log(l_module_name,'Attribute5',l_mtl_ser_txn_if_rec.attribute5(l_ser_count));
3693: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3694: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3695: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3696: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3697: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3698: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3699: WSH_DEBUG_SV.log(l_module_name,'Attribute12',l_mtl_ser_txn_if_rec.attribute12(l_ser_count));
3700: WSH_DEBUG_SV.log(l_module_name,'Attribute13',l_mtl_ser_txn_if_rec.attribute13(l_ser_count));
3693: WSH_DEBUG_SV.log(l_module_name,'Attribute6',l_mtl_ser_txn_if_rec.attribute6(l_ser_count));
3694: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3695: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3696: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3697: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3698: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3699: WSH_DEBUG_SV.log(l_module_name,'Attribute12',l_mtl_ser_txn_if_rec.attribute12(l_ser_count));
3700: WSH_DEBUG_SV.log(l_module_name,'Attribute13',l_mtl_ser_txn_if_rec.attribute13(l_ser_count));
3701: WSH_DEBUG_SV.log(l_module_name,'Attribute14',l_mtl_ser_txn_if_rec.attribute14(l_ser_count));
3694: WSH_DEBUG_SV.log(l_module_name,'Attribute7',l_mtl_ser_txn_if_rec.attribute7(l_ser_count));
3695: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3696: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3697: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3698: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3699: WSH_DEBUG_SV.log(l_module_name,'Attribute12',l_mtl_ser_txn_if_rec.attribute12(l_ser_count));
3700: WSH_DEBUG_SV.log(l_module_name,'Attribute13',l_mtl_ser_txn_if_rec.attribute13(l_ser_count));
3701: WSH_DEBUG_SV.log(l_module_name,'Attribute14',l_mtl_ser_txn_if_rec.attribute14(l_ser_count));
3702: WSH_DEBUG_SV.log(l_module_name,'Attribute15',l_mtl_ser_txn_if_rec.attribute15(l_ser_count));
3695: WSH_DEBUG_SV.log(l_module_name,'Attribute8',l_mtl_ser_txn_if_rec.attribute8(l_ser_count));
3696: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3697: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3698: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3699: WSH_DEBUG_SV.log(l_module_name,'Attribute12',l_mtl_ser_txn_if_rec.attribute12(l_ser_count));
3700: WSH_DEBUG_SV.log(l_module_name,'Attribute13',l_mtl_ser_txn_if_rec.attribute13(l_ser_count));
3701: WSH_DEBUG_SV.log(l_module_name,'Attribute14',l_mtl_ser_txn_if_rec.attribute14(l_ser_count));
3702: WSH_DEBUG_SV.log(l_module_name,'Attribute15',l_mtl_ser_txn_if_rec.attribute15(l_ser_count));
3703: END IF;
3696: WSH_DEBUG_SV.log(l_module_name,'Attribute9',l_mtl_ser_txn_if_rec.attribute9(l_ser_count));
3697: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3698: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3699: WSH_DEBUG_SV.log(l_module_name,'Attribute12',l_mtl_ser_txn_if_rec.attribute12(l_ser_count));
3700: WSH_DEBUG_SV.log(l_module_name,'Attribute13',l_mtl_ser_txn_if_rec.attribute13(l_ser_count));
3701: WSH_DEBUG_SV.log(l_module_name,'Attribute14',l_mtl_ser_txn_if_rec.attribute14(l_ser_count));
3702: WSH_DEBUG_SV.log(l_module_name,'Attribute15',l_mtl_ser_txn_if_rec.attribute15(l_ser_count));
3703: END IF;
3704:
3697: WSH_DEBUG_SV.log(l_module_name,'Attribute10',l_mtl_ser_txn_if_rec.attribute10(l_ser_count));
3698: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3699: WSH_DEBUG_SV.log(l_module_name,'Attribute12',l_mtl_ser_txn_if_rec.attribute12(l_ser_count));
3700: WSH_DEBUG_SV.log(l_module_name,'Attribute13',l_mtl_ser_txn_if_rec.attribute13(l_ser_count));
3701: WSH_DEBUG_SV.log(l_module_name,'Attribute14',l_mtl_ser_txn_if_rec.attribute14(l_ser_count));
3702: WSH_DEBUG_SV.log(l_module_name,'Attribute15',l_mtl_ser_txn_if_rec.attribute15(l_ser_count));
3703: END IF;
3704:
3705: l_serial_count := l_serial_count + 1;
3698: WSH_DEBUG_SV.log(l_module_name,'Attribute11',l_mtl_ser_txn_if_rec.attribute11(l_ser_count));
3699: WSH_DEBUG_SV.log(l_module_name,'Attribute12',l_mtl_ser_txn_if_rec.attribute12(l_ser_count));
3700: WSH_DEBUG_SV.log(l_module_name,'Attribute13',l_mtl_ser_txn_if_rec.attribute13(l_ser_count));
3701: WSH_DEBUG_SV.log(l_module_name,'Attribute14',l_mtl_ser_txn_if_rec.attribute14(l_ser_count));
3702: WSH_DEBUG_SV.log(l_module_name,'Attribute15',l_mtl_ser_txn_if_rec.attribute15(l_ser_count));
3703: END IF;
3704:
3705: l_serial_count := l_serial_count + 1;
3706: END LOOP;
3706: END LOOP;
3707:
3708: IF (l_serial_count = 0) THEN
3709: IF l_debug_on THEN
3710: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR: NO SERIAL RECORDS FOUND FOR TRANSACTION_TEMP_ID '||
3711: l_mtl_txn_if_rec.transaction_temp_id(l_index));
3712: END IF;
3713: raise e_line_error;
3714: ELSE
3712: END IF;
3713: raise e_line_error;
3714: ELSE
3715: IF l_debug_on THEN
3716: WSH_DEBUG_SV.logmsg(l_module_name, 'INSERTED '||l_serial_count||' SERIAL RECORDS ');
3717: END IF;
3718: END IF;
3719: END IF;
3720: END IF;
3721:
3722: -- Gather the lot information
3723: IF (l_interface_lot) THEN
3724: IF l_debug_on THEN
3725: WSH_DEBUG_SV.logmsg(l_module_name, 'ITEM IS UNDER SRL CTRL .'||
3726: 'INSERTING SRL NUMBER ' || l_mtl_txn_if_rec.SERIAL_NUMBER(l_index) || 'INTO MSNI.');
3727: END IF;
3728: l_interface_lot := false;
3729: l_bulk_count := l_bulk_count + 1;
3739: l_mtl_lot_txn_if_rec.grade_code(l_lot_count):= l_mtl_txn_if_rec.grade_code(l_index);
3740: l_mtl_lot_txn_if_rec.secondary_trx_quantity(l_lot_count):= l_mtl_txn_if_rec.trx_quantity2 (l_index);
3741:
3742: IF l_debug_on THEN
3743: WSH_DEBUG_SV.logmsg(l_module_name, 'ITEM BEING ADD TO LOT RECORD l_mtl_lot_txn_if_rec');
3744: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3745: l_mtl_lot_txn_if_rec.transaction_interface_id(l_lot_count));
3746: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_lot_txn_if_rec.source_code(l_lot_count));
3747: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_lot_txn_if_rec.source_line_id(l_lot_count));
3740: l_mtl_lot_txn_if_rec.secondary_trx_quantity(l_lot_count):= l_mtl_txn_if_rec.trx_quantity2 (l_index);
3741:
3742: IF l_debug_on THEN
3743: WSH_DEBUG_SV.logmsg(l_module_name, 'ITEM BEING ADD TO LOT RECORD l_mtl_lot_txn_if_rec');
3744: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3745: l_mtl_lot_txn_if_rec.transaction_interface_id(l_lot_count));
3746: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_lot_txn_if_rec.source_code(l_lot_count));
3747: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_lot_txn_if_rec.source_line_id(l_lot_count));
3748: WSH_DEBUG_SV.log(l_module_name,'lot_number',l_mtl_lot_txn_if_rec.lot_number(l_lot_count));
3742: IF l_debug_on THEN
3743: WSH_DEBUG_SV.logmsg(l_module_name, 'ITEM BEING ADD TO LOT RECORD l_mtl_lot_txn_if_rec');
3744: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3745: l_mtl_lot_txn_if_rec.transaction_interface_id(l_lot_count));
3746: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_lot_txn_if_rec.source_code(l_lot_count));
3747: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_lot_txn_if_rec.source_line_id(l_lot_count));
3748: WSH_DEBUG_SV.log(l_module_name,'lot_number',l_mtl_lot_txn_if_rec.lot_number(l_lot_count));
3749: WSH_DEBUG_SV.log(l_module_name,'trx_quantity',l_mtl_lot_txn_if_rec.trx_quantity(l_lot_count));
3750: -- HW OPMCONV - Added Qty2
3743: WSH_DEBUG_SV.logmsg(l_module_name, 'ITEM BEING ADD TO LOT RECORD l_mtl_lot_txn_if_rec');
3744: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3745: l_mtl_lot_txn_if_rec.transaction_interface_id(l_lot_count));
3746: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_lot_txn_if_rec.source_code(l_lot_count));
3747: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_lot_txn_if_rec.source_line_id(l_lot_count));
3748: WSH_DEBUG_SV.log(l_module_name,'lot_number',l_mtl_lot_txn_if_rec.lot_number(l_lot_count));
3749: WSH_DEBUG_SV.log(l_module_name,'trx_quantity',l_mtl_lot_txn_if_rec.trx_quantity(l_lot_count));
3750: -- HW OPMCONV - Added Qty2
3751: WSH_DEBUG_SV.log(l_module_name,'trx_quantity2',l_mtl_lot_txn_if_rec.secondary_trx_quantity(l_lot_count));
3744: WSH_DEBUG_SV.log(l_module_name,'transaction_interface_id',
3745: l_mtl_lot_txn_if_rec.transaction_interface_id(l_lot_count));
3746: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_lot_txn_if_rec.source_code(l_lot_count));
3747: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_lot_txn_if_rec.source_line_id(l_lot_count));
3748: WSH_DEBUG_SV.log(l_module_name,'lot_number',l_mtl_lot_txn_if_rec.lot_number(l_lot_count));
3749: WSH_DEBUG_SV.log(l_module_name,'trx_quantity',l_mtl_lot_txn_if_rec.trx_quantity(l_lot_count));
3750: -- HW OPMCONV - Added Qty2
3751: WSH_DEBUG_SV.log(l_module_name,'trx_quantity2',l_mtl_lot_txn_if_rec.secondary_trx_quantity(l_lot_count));
3752: WSH_DEBUG_SV.log(l_module_name,'serial_transaction_temp_id',
3745: l_mtl_lot_txn_if_rec.transaction_interface_id(l_lot_count));
3746: WSH_DEBUG_SV.log(l_module_name,'source_code',l_mtl_lot_txn_if_rec.source_code(l_lot_count));
3747: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_lot_txn_if_rec.source_line_id(l_lot_count));
3748: WSH_DEBUG_SV.log(l_module_name,'lot_number',l_mtl_lot_txn_if_rec.lot_number(l_lot_count));
3749: WSH_DEBUG_SV.log(l_module_name,'trx_quantity',l_mtl_lot_txn_if_rec.trx_quantity(l_lot_count));
3750: -- HW OPMCONV - Added Qty2
3751: WSH_DEBUG_SV.log(l_module_name,'trx_quantity2',l_mtl_lot_txn_if_rec.secondary_trx_quantity(l_lot_count));
3752: WSH_DEBUG_SV.log(l_module_name,'serial_transaction_temp_id',
3753: l_mtl_lot_txn_if_rec.serial_transaction_temp_id(l_lot_count));
3747: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_mtl_lot_txn_if_rec.source_line_id(l_lot_count));
3748: WSH_DEBUG_SV.log(l_module_name,'lot_number',l_mtl_lot_txn_if_rec.lot_number(l_lot_count));
3749: WSH_DEBUG_SV.log(l_module_name,'trx_quantity',l_mtl_lot_txn_if_rec.trx_quantity(l_lot_count));
3750: -- HW OPMCONV - Added Qty2
3751: WSH_DEBUG_SV.log(l_module_name,'trx_quantity2',l_mtl_lot_txn_if_rec.secondary_trx_quantity(l_lot_count));
3752: WSH_DEBUG_SV.log(l_module_name,'serial_transaction_temp_id',
3753: l_mtl_lot_txn_if_rec.serial_transaction_temp_id(l_lot_count));
3754: END IF;
3755: END IF;
3748: WSH_DEBUG_SV.log(l_module_name,'lot_number',l_mtl_lot_txn_if_rec.lot_number(l_lot_count));
3749: WSH_DEBUG_SV.log(l_module_name,'trx_quantity',l_mtl_lot_txn_if_rec.trx_quantity(l_lot_count));
3750: -- HW OPMCONV - Added Qty2
3751: WSH_DEBUG_SV.log(l_module_name,'trx_quantity2',l_mtl_lot_txn_if_rec.secondary_trx_quantity(l_lot_count));
3752: WSH_DEBUG_SV.log(l_module_name,'serial_transaction_temp_id',
3753: l_mtl_lot_txn_if_rec.serial_transaction_temp_id(l_lot_count));
3754: END IF;
3755: END IF;
3756:
3761: END IF; -- } if trx_quantity > 0
3762: ---4:
3763:
3764: IF l_debug_on THEN
3765: WSH_DEBUG_SV.log(l_module_name, 'l_index',l_index);
3766: WSH_DEBUG_SV.log(l_module_name, 'l_bulk_count',l_bulk_count);
3767: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_txn_if_rec.picking_line_id.last',l_mtl_txn_if_rec.picking_line_id.last);
3768: END IF;
3769:
3762: ---4:
3763:
3764: IF l_debug_on THEN
3765: WSH_DEBUG_SV.log(l_module_name, 'l_index',l_index);
3766: WSH_DEBUG_SV.log(l_module_name, 'l_bulk_count',l_bulk_count);
3767: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_txn_if_rec.picking_line_id.last',l_mtl_txn_if_rec.picking_line_id.last);
3768: END IF;
3769:
3770:
3763:
3764: IF l_debug_on THEN
3765: WSH_DEBUG_SV.log(l_module_name, 'l_index',l_index);
3766: WSH_DEBUG_SV.log(l_module_name, 'l_bulk_count',l_bulk_count);
3767: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_txn_if_rec.picking_line_id.last',l_mtl_txn_if_rec.picking_line_id.last);
3768: END IF;
3769:
3770:
3771: -- IF the profile option WSH_BULK_BATCH_SIZE is specified, then insert the
3785: p_def_inv_online => l_def_inv_online,
3786: x_return_status => l_return_status);
3787:
3788: IF l_debug_on THEN
3789: WSH_DEBUG_SV.log(l_module_name,'Insert_inv_records l_return_status',l_return_status);
3790: END IF;
3791: IF ( l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3792: l_insert_inv_not_success := l_insert_inv_not_success + 1;
3793: END IF;
3792: l_insert_inv_not_success := l_insert_inv_not_success + 1;
3793: END IF;
3794:
3795: IF l_debug_on THEN
3796: WSH_DEBUG_SV.log(l_module_name,'l_insert_inv_calls',l_insert_inv_calls);
3797: WSH_DEBUG_SV.log(l_module_name,'l_insert_inv_not_success',l_insert_inv_not_success);
3798: END IF;
3799:
3800: l_bulk_count := 0;
3793: END IF;
3794:
3795: IF l_debug_on THEN
3796: WSH_DEBUG_SV.log(l_module_name,'l_insert_inv_calls',l_insert_inv_calls);
3797: WSH_DEBUG_SV.log(l_module_name,'l_insert_inv_not_success',l_insert_inv_not_success);
3798: END IF;
3799:
3800: l_bulk_count := 0;
3801: l_start_index := l_index + 1;
3804:
3805: EXCEPTION
3806: WHEN e_line_error THEN
3807: IF l_debug_on THEN
3808: WSH_DEBUG_SV.log(l_module_name,'Error at line', l_mtl_txn_if_rec.picking_line_id(l_index));
3809: END IF;
3810: l_mtl_txn_if_rec.error_flag(l_index):='Y';
3811: -- Bug 4615610 : Assigned some dummy value to trx_type_id to avoid SQL error while
3812: --inserting into MTI
3826: p_def_inv_online => l_def_inv_online,
3827: x_return_status => l_return_status);
3828:
3829: IF l_debug_on THEN
3830: WSH_DEBUG_SV.log(l_module_name,'Insert_inv_records l_return_status',l_return_status);
3831: END IF;
3832: IF ( l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3833: l_insert_inv_not_success := l_insert_inv_not_success + 1;
3834: END IF;
3832: IF ( l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3833: l_insert_inv_not_success := l_insert_inv_not_success + 1;
3834: END IF;
3835: IF l_debug_on THEN
3836: WSH_DEBUG_SV.log(l_module_name,'l_insert_inv_calls',l_insert_inv_calls);
3837: WSH_DEBUG_SV.log(l_module_name,'l_insert_inv_not_success',l_insert_inv_not_success);
3838: END IF;
3839: l_bulk_count := 0;
3840: --}
3833: l_insert_inv_not_success := l_insert_inv_not_success + 1;
3834: END IF;
3835: IF l_debug_on THEN
3836: WSH_DEBUG_SV.log(l_module_name,'l_insert_inv_calls',l_insert_inv_calls);
3837: WSH_DEBUG_SV.log(l_module_name,'l_insert_inv_not_success',l_insert_inv_not_success);
3838: END IF;
3839: l_bulk_count := 0;
3840: --}
3841: END IF;
3841: END IF;
3842:
3843: WHEN e_line_warning THEN
3844: IF l_debug_on THEN
3845: WSH_DEBUG_SV.log(l_module_name,'Warning at line', l_mtl_txn_if_rec.picking_line_id(l_index));
3846: END IF;
3847: l_mtl_txn_if_rec.error_flag(l_index):='Y';
3848: -- Bug 4615610 : Assigned some dummy value to trx_type_id to avoid SQL error while
3849: --inserting into MTI
3863: p_def_inv_online => l_def_inv_online,
3864: x_return_status => l_return_status);
3865:
3866: IF l_debug_on THEN
3867: WSH_DEBUG_SV.log(l_module_name,'Insert_inv_records l_return_status',l_return_status);
3868: END IF;
3869: IF ( l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3870: l_insert_inv_not_success := l_insert_inv_not_success + 1;
3871: END IF;
3869: IF ( l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3870: l_insert_inv_not_success := l_insert_inv_not_success + 1;
3871: END IF;
3872: IF l_debug_on THEN
3873: WSH_DEBUG_SV.log(l_module_name,'l_insert_inv_calls',l_insert_inv_calls);
3874: WSH_DEBUG_SV.log(l_module_name,'l_insert_inv_not_success',l_insert_inv_not_success);
3875: END IF;
3876: l_bulk_count := 0;
3877: --}
3870: l_insert_inv_not_success := l_insert_inv_not_success + 1;
3871: END IF;
3872: IF l_debug_on THEN
3873: WSH_DEBUG_SV.log(l_module_name,'l_insert_inv_calls',l_insert_inv_calls);
3874: WSH_DEBUG_SV.log(l_module_name,'l_insert_inv_not_success',l_insert_inv_not_success);
3875: END IF;
3876: l_bulk_count := 0;
3877: --}
3878: END IF;
3884:
3885:
3886: --3: For Shipped_qty=0
3887: IF l_debug_on THEN
3888: WSH_DEBUG_SV.log(l_module_name,'l_delivery_detail_tbl.count',l_delivery_detail_tbl.count);
3889: END IF;
3890:
3891: IF (l_delivery_detail_tbl.count > 0) THEN
3892: FORALL i IN l_delivery_detail_tbl.first..l_delivery_detail_tbl.last
3914: RAISE wsh_util_core.g_exc_warning;
3915: END IF;
3916:
3917: IF l_debug_on THEN
3918: WSH_DEBUG_SV.log(l_module_name, 'x_return_status',x_return_status);
3919: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_txn_if_rec.count',l_mtl_txn_if_rec.picking_line_id.count);
3920: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_ser_txn_if_rec.count',l_mtl_ser_txn_if_rec.source_line_id.count);
3921: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_lot_txn_if_rec.count',l_mtl_lot_txn_if_rec.source_line_id.count);
3922: WSH_DEBUG_SV.pop(l_module_name);
3915: END IF;
3916:
3917: IF l_debug_on THEN
3918: WSH_DEBUG_SV.log(l_module_name, 'x_return_status',x_return_status);
3919: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_txn_if_rec.count',l_mtl_txn_if_rec.picking_line_id.count);
3920: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_ser_txn_if_rec.count',l_mtl_ser_txn_if_rec.source_line_id.count);
3921: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_lot_txn_if_rec.count',l_mtl_lot_txn_if_rec.source_line_id.count);
3922: WSH_DEBUG_SV.pop(l_module_name);
3923: END IF;
3916:
3917: IF l_debug_on THEN
3918: WSH_DEBUG_SV.log(l_module_name, 'x_return_status',x_return_status);
3919: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_txn_if_rec.count',l_mtl_txn_if_rec.picking_line_id.count);
3920: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_ser_txn_if_rec.count',l_mtl_ser_txn_if_rec.source_line_id.count);
3921: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_lot_txn_if_rec.count',l_mtl_lot_txn_if_rec.source_line_id.count);
3922: WSH_DEBUG_SV.pop(l_module_name);
3923: END IF;
3924:
3917: IF l_debug_on THEN
3918: WSH_DEBUG_SV.log(l_module_name, 'x_return_status',x_return_status);
3919: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_txn_if_rec.count',l_mtl_txn_if_rec.picking_line_id.count);
3920: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_ser_txn_if_rec.count',l_mtl_ser_txn_if_rec.source_line_id.count);
3921: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_lot_txn_if_rec.count',l_mtl_lot_txn_if_rec.source_line_id.count);
3922: WSH_DEBUG_SV.pop(l_module_name);
3923: END IF;
3924:
3925: EXCEPTION
3918: WSH_DEBUG_SV.log(l_module_name, 'x_return_status',x_return_status);
3919: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_txn_if_rec.count',l_mtl_txn_if_rec.picking_line_id.count);
3920: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_ser_txn_if_rec.count',l_mtl_ser_txn_if_rec.source_line_id.count);
3921: WSH_DEBUG_SV.log(l_module_name, 'l_mtl_lot_txn_if_rec.count',l_mtl_lot_txn_if_rec.source_line_id.count);
3922: WSH_DEBUG_SV.pop(l_module_name);
3923: END IF;
3924:
3925: EXCEPTION
3926: WHEN wsh_util_core.g_exc_warning THEN
3926: WHEN wsh_util_core.g_exc_warning THEN
3927: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3928:
3929: IF l_debug_on THEN
3930: wsh_debug_sv.logmsg(l_module_name, 'wsh_util_core.g_exc_warning exception has occured.', wsh_debug_sv.c_excep_level);
3931: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
3932: END IF;
3933:
3934: WHEN fnd_api.g_exc_error THEN
3927: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3928:
3929: IF l_debug_on THEN
3930: wsh_debug_sv.logmsg(l_module_name, 'wsh_util_core.g_exc_warning exception has occured.', wsh_debug_sv.c_excep_level);
3931: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
3932: END IF;
3933:
3934: WHEN fnd_api.g_exc_error THEN
3935: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3934: WHEN fnd_api.g_exc_error THEN
3935: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3936:
3937: IF l_debug_on THEN
3938: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
3939: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
3940: END IF;
3941:
3942:
3935: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3936:
3937: IF l_debug_on THEN
3938: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
3939: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
3940: END IF;
3941:
3942:
3943: WHEN others THEN
3954: CLOSE c_freight_code_del;
3955: END IF;
3956:
3957: IF l_debug_on THEN
3958: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3959: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3960: END IF;
3961: --
3962: END Interface_Detail_To_Inv;
3955: END IF;
3956:
3957: IF l_debug_on THEN
3958: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3959: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3960: END IF;
3961: --
3962: END Interface_Detail_To_Inv;
3963:
4073: --HVOP heali
4074: BEGIN
4075: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4076: IF l_debug_on IS NULL THEN
4077: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4078: END IF;
4079:
4080: IF l_debug_on THEN
4081: WSH_DEBUG_SV.push(l_module_name);
4077: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4078: END IF;
4079:
4080: IF l_debug_on THEN
4081: WSH_DEBUG_SV.push(l_module_name);
4082: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
4083: END IF;
4084: --
4085: WSH_SHIP_CONFIRM_ACTIONS.ont_source_code := NULL;
4078: END IF;
4079:
4080: IF l_debug_on THEN
4081: WSH_DEBUG_SV.push(l_module_name);
4082: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
4083: END IF;
4084: --
4085: WSH_SHIP_CONFIRM_ACTIONS.ont_source_code := NULL;
4086:
4091: wsh_util_core.printmsg('Batch ' || p_batch_id || ' is not yet fully interfaced to OM.');
4092: x_completion_status := 'WARNING';
4093:
4094: IF l_debug_on THEN
4095: WSH_DEBUG_SV.log(l_module_name,'x_completion_status',x_completion_status);
4096: WSH_DEBUG_SV.log(l_module_name,'Batch ' || p_batch_id || ' is not yet fully interfaced to OM.');
4097: WSH_DEBUG_SV.pop(l_module_name);
4098: END IF;
4099: --
4092: x_completion_status := 'WARNING';
4093:
4094: IF l_debug_on THEN
4095: WSH_DEBUG_SV.log(l_module_name,'x_completion_status',x_completion_status);
4096: WSH_DEBUG_SV.log(l_module_name,'Batch ' || p_batch_id || ' is not yet fully interfaced to OM.');
4097: WSH_DEBUG_SV.pop(l_module_name);
4098: END IF;
4099: --
4100: return;
4093:
4094: IF l_debug_on THEN
4095: WSH_DEBUG_SV.log(l_module_name,'x_completion_status',x_completion_status);
4096: WSH_DEBUG_SV.log(l_module_name,'Batch ' || p_batch_id || ' is not yet fully interfaced to OM.');
4097: WSH_DEBUG_SV.pop(l_module_name);
4098: END IF;
4099: --
4100: return;
4101: END IF;
4106: IF lock_row%NOTFOUND THEN
4107: CLOSE lock_row;
4108:
4109: IF l_debug_on THEN
4110: WSH_DEBUG_SV.logmsg(l_module_name, 'INV INTERFACE CANNOT FIND Stops for batch ' || P_Batch_id );
4111: END IF;
4112:
4113: x_completion_status := 'ERROR';
4114: --
4112:
4113: x_completion_status := 'ERROR';
4114: --
4115: IF l_debug_on THEN
4116: WSH_DEBUG_SV.log(l_module_name,'x_completion_status', x_completion_status);
4117: WSH_DEBUG_SV.pop(l_module_name);
4118: END IF;
4119: --
4120: return;
4113: x_completion_status := 'ERROR';
4114: --
4115: IF l_debug_on THEN
4116: WSH_DEBUG_SV.log(l_module_name,'x_completion_status', x_completion_status);
4117: WSH_DEBUG_SV.pop(l_module_name);
4118: END IF;
4119: --
4120: return;
4121: END IF;
4121: END IF;
4122:
4123: -- bug 2787888 : Added call to transfer serial records from mtl_serial_numbers_temp to wsh_serial_numbers
4124: IF l_debug_on THEN
4125: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling TRANSFER_SERIAL_NUMBERS FOR BATCH ' || TO_CHAR ( P_batch_id ) );
4126: END IF;
4127:
4128: -- transfer the serial number information for non-om lines.
4129: transfer_serial_numbers ( p_batch_id => p_batch_id ,
4131: x_return_status => l_return_status );
4132:
4133: if (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4134: IF l_debug_on THEN
4135: WSH_DEBUG_SV.logmsg(l_module_name, 'Error encountered in call to TRANSFER_SERIAL_NUMBERS FOR BATCH' || TO_CHAR ( P_BATCH_ID ) );
4136: WSH_DEBUG_SV.log(l_module_name,'x_completion_status', x_completion_status);
4137: WSH_DEBUG_SV.pop(l_module_name);
4138: END IF;
4139: x_completion_status := 'ERROR';
4132:
4133: if (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4134: IF l_debug_on THEN
4135: WSH_DEBUG_SV.logmsg(l_module_name, 'Error encountered in call to TRANSFER_SERIAL_NUMBERS FOR BATCH' || TO_CHAR ( P_BATCH_ID ) );
4136: WSH_DEBUG_SV.log(l_module_name,'x_completion_status', x_completion_status);
4137: WSH_DEBUG_SV.pop(l_module_name);
4138: END IF;
4139: x_completion_status := 'ERROR';
4140: return;
4133: if (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4134: IF l_debug_on THEN
4135: WSH_DEBUG_SV.logmsg(l_module_name, 'Error encountered in call to TRANSFER_SERIAL_NUMBERS FOR BATCH' || TO_CHAR ( P_BATCH_ID ) );
4136: WSH_DEBUG_SV.log(l_module_name,'x_completion_status', x_completion_status);
4137: WSH_DEBUG_SV.pop(l_module_name);
4138: END IF;
4139: x_completion_status := 'ERROR';
4140: return;
4141: end if;
4153: ELSE
4154: l_completion_status := 'WARNING';
4155: END IF;
4156: IF l_debug_on THEN
4157: WSH_DEBUG_SV.log(l_module_name,'inv_interface_trip_stop failed for Batch '|| p_batch_id
4158: ||': txn ' || l_transaction_header_id );
4159: WSH_DEBUG_SV.log(l_module_name,'l_completion_status', l_completion_status);
4160: END IF;
4161: end if;
4155: END IF;
4156: IF l_debug_on THEN
4157: WSH_DEBUG_SV.log(l_module_name,'inv_interface_trip_stop failed for Batch '|| p_batch_id
4158: ||': txn ' || l_transaction_header_id );
4159: WSH_DEBUG_SV.log(l_module_name,'l_completion_status', l_completion_status);
4160: END IF;
4161: end if;
4162:
4163: -- If all the lines are interfaced to inventory, then return success.
4163: -- If all the lines are interfaced to inventory, then return success.
4164:
4165: if ( inv_interfaced ( p_batch_id )) then
4166: IF l_debug_on THEN
4167: WSH_DEBUG_SV.logmsg(l_module_name, 'BATCH '|| P_batch_id || ' HAS BEEN SUCCESSFULLY INTERFACED' );
4168: END IF;
4169:
4170: x_completion_status := 'INTERFACED';
4171: IF lock_row%ISOPEN THEN
4172: CLOSE lock_row;
4173: END IF;
4174:
4175: IF l_debug_on THEN
4176: WSH_DEBUG_SV.log(l_module_name,'x_completion_status', x_completion_status);
4177: WSH_DEBUG_SV.pop(l_module_name);
4178: END IF;
4179:
4180: return ;
4173: END IF;
4174:
4175: IF l_debug_on THEN
4176: WSH_DEBUG_SV.log(l_module_name,'x_completion_status', x_completion_status);
4177: WSH_DEBUG_SV.pop(l_module_name);
4178: END IF;
4179:
4180: return ;
4181: end if ;
4194:
4195: l_detail_ids_count := l_detail_ids_tbl.COUNT;
4196:
4197: IF l_debug_on THEN
4198: WSH_DEBUG_SV.log(l_module_name,'Number of records fetched by get_details is ', l_detail_ids_count);
4199: END IF;
4200:
4201: -- Bug#7271241 :removed source_code from where clause as DDs can be
4202: -- associated to OKE system.
4221: INTO l_transaction_header_id
4222: FROM sys.dual;
4223: --
4224: IF l_debug_on THEN
4225: WSH_DEBUG_SV.logmsg(l_module_name, 'NEW TRANSACTION_HEADER : ' || TO_CHAR ( L_TRANSACTION_HEADER_ID ) );
4226: END IF;
4227: --
4228:
4229:
4240:
4241: l_picking_lines_count := l_picking_line_id_tbl.COUNT;
4242:
4243: IF l_debug_on THEN
4244: WSH_DEBUG_SV.log(l_module_name,'Number of records fetched by l_get_picking_ln_id_csr is ', l_picking_lines_count);
4245: END IF;
4246:
4247: IF (nvl(l_picking_lines_count,0) > 0) THEN
4248: --{
4258: -- updated by another process;
4259:
4260: l_count := SQL%ROWCOUNT;
4261: IF l_debug_on THEN
4262: WSH_DEBUG_SV.log(l_module_name,'No. existing record updated in MTI', l_count);
4263: END IF;
4264: --
4265: --
4266: -- bug 3588371
4280: x_non_opm_org_exist => l_non_opm_org_exist,
4281: x_return_status => l_inv_inter_status);
4282:
4283: IF l_debug_on THEN
4284: WSH_DEBUG_SV.log(l_module_name,'Interface_Detail_To_Inv l_inv_inter_status',l_inv_inter_status);
4285: END IF;
4286:
4287: -- HW OPMCONV. Removed checking for non_opm lines
4288:
4324: END IF;
4325: x_completion_status := 'ERROR';
4326:
4327: IF l_debug_on THEN
4328: WSH_DEBUG_SV.log(l_module_name,'Batch_id '||p_batch_id||' pass Inventory interface with unexpected errors');
4329: WSH_DEBUG_SV.pop(l_module_name);
4330: END IF;
4331: return;
4332: ELSIF ( l_inv_inter_status = WSH_UTIL_CORE.G_RET_STS_ERROR ) THEN
4325: x_completion_status := 'ERROR';
4326:
4327: IF l_debug_on THEN
4328: WSH_DEBUG_SV.log(l_module_name,'Batch_id '||p_batch_id||' pass Inventory interface with unexpected errors');
4329: WSH_DEBUG_SV.pop(l_module_name);
4330: END IF;
4331: return;
4332: ELSIF ( l_inv_inter_status = WSH_UTIL_CORE.G_RET_STS_ERROR ) THEN
4333:
4335: CLOSE lock_row;
4336: END IF;
4337: x_completion_status := 'WARNING';
4338: IF l_debug_on THEN
4339: WSH_DEBUG_SV.log(l_module_name,'Batch_id '||p_batch_id||' pass Inventory interface with expected errors');
4340: WSH_DEBUG_SV.pop(l_module_name);
4341: END IF;
4342: return;
4343: ELSE
4336: END IF;
4337: x_completion_status := 'WARNING';
4338: IF l_debug_on THEN
4339: WSH_DEBUG_SV.log(l_module_name,'Batch_id '||p_batch_id||' pass Inventory interface with expected errors');
4340: WSH_DEBUG_SV.pop(l_module_name);
4341: END IF;
4342: return;
4343: ELSE
4344: l_completion_status := 'WARNING';
4356: process_inv_online ( p_batch_id , l_transaction_header_id , l_return_status );
4357:
4358: if (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) then
4359: IF l_debug_on THEN
4360: WSH_DEBUG_SV.logmsg(l_module_name,'Batch '|| p_batch_id ||': TXN ' ||
4361: L_TRANSACTION_HEADER_ID || ' : PROCESS ONLINE FAILED AGAIN' );
4362: END IF;
4363: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
4364: l_completion_status := 'ERROR';
4383: -- bug 3588371
4384:
4385: --
4386: IF l_debug_on THEN
4387: WSH_DEBUG_SV.log(l_module_name,'l_completion_status',l_completion_status);
4388: WSH_DEBUG_SV.pop(l_module_name);
4389:
4390: END IF;
4391: --
4384:
4385: --
4386: IF l_debug_on THEN
4387: WSH_DEBUG_SV.log(l_module_name,'l_completion_status',l_completion_status);
4388: WSH_DEBUG_SV.pop(l_module_name);
4389:
4390: END IF;
4391: --
4392: EXCEPTION
4400: WSH_UTIL_CORE.PrintMsg('This Trip Stop is locked by some other process');
4401: x_completion_status := 'WARNING'; -- continue processing other stops
4402: --
4403: IF l_debug_on THEN
4404: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_STOP_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4405: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_STOP_LOCKED');
4406: END IF;
4407: --
4408: WHEN others THEN
4401: x_completion_status := 'WARNING'; -- continue processing other stops
4402: --
4403: IF l_debug_on THEN
4404: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_STOP_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4405: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_STOP_LOCKED');
4406: END IF;
4407: --
4408: WHEN others THEN
4409: IF get_details%ISOPEN THEN
4416: WSH_UTIL_CORE.PrintMsg('The unexpected error is ' || l_error_text);
4417: x_completion_status := l_completion_status;
4418: --
4419: IF l_debug_on THEN
4420: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4421: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4422: END IF;
4423: --
4424: END inv_interface_Trip_Stop;
4417: x_completion_status := l_completion_status;
4418: --
4419: IF l_debug_on THEN
4420: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4421: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4422: END IF;
4423: --
4424: END inv_interface_Trip_Stop;
4425:
4469: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4470: --
4471: IF l_debug_on IS NULL
4472: THEN
4473: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4474: END IF;
4475: --
4476: IF l_debug_on THEN
4477: WSH_DEBUG_SV.push(l_module_name);
4473: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4474: END IF;
4475: --
4476: IF l_debug_on THEN
4477: WSH_DEBUG_SV.push(l_module_name);
4478: --
4479: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4480: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
4481: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4475: --
4476: IF l_debug_on THEN
4477: WSH_DEBUG_SV.push(l_module_name);
4478: --
4479: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4480: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
4481: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4482: END IF;
4483: --
4476: IF l_debug_on THEN
4477: WSH_DEBUG_SV.push(l_module_name);
4478: --
4479: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4480: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
4481: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4482: END IF;
4483: --
4484: OPEN assigned_line_total;
4477: WSH_DEBUG_SV.push(l_module_name);
4478: --
4479: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4480: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
4481: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4482: END IF;
4483: --
4484: OPEN assigned_line_total;
4485: FETCH assigned_line_total into l_assigned_total;
4485: FETCH assigned_line_total into l_assigned_total;
4486: OPEN unassigned_line_total;
4487: FETCH unassigned_line_total into l_unassigned_total;
4488: IF l_debug_on THEN
4489: WSH_DEBUG_SV.log(l_module_name,'l_assigned_total',l_assigned_total.total);
4490: WSH_DEBUG_SV.log(l_module_name,'l_unassigned_total',l_unassigned_total.total);
4491: END IF;
4492: if ((l_assigned_total.total > 0) or (l_unassigned_total.total > 0) ) THEN
4493: --
4486: OPEN unassigned_line_total;
4487: FETCH unassigned_line_total into l_unassigned_total;
4488: IF l_debug_on THEN
4489: WSH_DEBUG_SV.log(l_module_name,'l_assigned_total',l_assigned_total.total);
4490: WSH_DEBUG_SV.log(l_module_name,'l_unassigned_total',l_unassigned_total.total);
4491: END IF;
4492: if ((l_assigned_total.total > 0) or (l_unassigned_total.total > 0) ) THEN
4493: --
4494: IF l_debug_on THEN
4491: END IF;
4492: if ((l_assigned_total.total > 0) or (l_unassigned_total.total > 0) ) THEN
4493: --
4494: IF l_debug_on THEN
4495: WSH_DEBUG_SV.pop(l_module_name);
4496: END IF;
4497: --
4498: return TRUE;
4499: else
4498: return TRUE;
4499: else
4500: --
4501: IF l_debug_on THEN
4502: WSH_DEBUG_SV.pop(l_module_name);
4503: END IF;
4504: --
4505: return FALSE;
4506: END if;
4567: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4568: --
4569: IF l_debug_on IS NULL
4570: THEN
4571: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4572: END IF;
4573: --
4574: IF l_debug_on THEN
4575: WSH_DEBUG_SV.push(l_module_name);
4571: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4572: END IF;
4573: --
4574: IF l_debug_on THEN
4575: WSH_DEBUG_SV.push(l_module_name);
4576: --
4577: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4578: WSH_DEBUG_SV.log(l_module_name,'P_batch_id',P_batch_id);
4579: END IF;
4573: --
4574: IF l_debug_on THEN
4575: WSH_DEBUG_SV.push(l_module_name);
4576: --
4577: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4578: WSH_DEBUG_SV.log(l_module_name,'P_batch_id',P_batch_id);
4579: END IF;
4580: --
4581: OPEN other_batch_delivery_details;
4574: IF l_debug_on THEN
4575: WSH_DEBUG_SV.push(l_module_name);
4576: --
4577: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4578: WSH_DEBUG_SV.log(l_module_name,'P_batch_id',P_batch_id);
4579: END IF;
4580: --
4581: OPEN other_batch_delivery_details;
4582: FETCH other_batch_delivery_details INTO l_planned_qty;
4586: CLOSE other_batch_delivery_details;
4587:
4588: --
4589: IF l_debug_on THEN
4590: WSH_DEBUG_SV.logmsg(l_module_name, 'PLANNED QUANTITY: '|| L_PLANNED_QTY );
4591: WSH_DEBUG_SV.pop(l_module_name);
4592: END IF;
4593: --
4594: return l_planned_qty;
4587:
4588: --
4589: IF l_debug_on THEN
4590: WSH_DEBUG_SV.logmsg(l_module_name, 'PLANNED QUANTITY: '|| L_PLANNED_QTY );
4591: WSH_DEBUG_SV.pop(l_module_name);
4592: END IF;
4593: --
4594: return l_planned_qty;
4595:
4649:
4650: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4651: IF l_debug_on IS NULL
4652: THEN
4653: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4654: END IF;
4655: IF l_debug_on THEN
4656: WSH_DEBUG_SV.push(l_module_name);
4657: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
4652: THEN
4653: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4654: END IF;
4655: IF l_debug_on THEN
4656: WSH_DEBUG_SV.push(l_module_name);
4657: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
4658: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4659: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPING_UOM',P_SHIPPING_UOM);
4660: WSH_DEBUG_SV.log(l_module_name,'P_TOT_SHP_QTY',P_TOT_SHP_QTY);
4653: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4654: END IF;
4655: IF l_debug_on THEN
4656: WSH_DEBUG_SV.push(l_module_name);
4657: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
4658: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4659: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPING_UOM',P_SHIPPING_UOM);
4660: WSH_DEBUG_SV.log(l_module_name,'P_TOT_SHP_QTY',P_TOT_SHP_QTY);
4661: WSH_DEBUG_SV.log(l_module_name,'P_TOT_SHP_QTY2',P_TOT_SHP_QTY2);
4654: END IF;
4655: IF l_debug_on THEN
4656: WSH_DEBUG_SV.push(l_module_name);
4657: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
4658: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4659: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPING_UOM',P_SHIPPING_UOM);
4660: WSH_DEBUG_SV.log(l_module_name,'P_TOT_SHP_QTY',P_TOT_SHP_QTY);
4661: WSH_DEBUG_SV.log(l_module_name,'P_TOT_SHP_QTY2',P_TOT_SHP_QTY2);
4662: END IF;
4655: IF l_debug_on THEN
4656: WSH_DEBUG_SV.push(l_module_name);
4657: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
4658: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4659: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPING_UOM',P_SHIPPING_UOM);
4660: WSH_DEBUG_SV.log(l_module_name,'P_TOT_SHP_QTY',P_TOT_SHP_QTY);
4661: WSH_DEBUG_SV.log(l_module_name,'P_TOT_SHP_QTY2',P_TOT_SHP_QTY2);
4662: END IF;
4663:
4656: WSH_DEBUG_SV.push(l_module_name);
4657: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
4658: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4659: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPING_UOM',P_SHIPPING_UOM);
4660: WSH_DEBUG_SV.log(l_module_name,'P_TOT_SHP_QTY',P_TOT_SHP_QTY);
4661: WSH_DEBUG_SV.log(l_module_name,'P_TOT_SHP_QTY2',P_TOT_SHP_QTY2);
4662: END IF;
4663:
4664: l_minmaxinrec.source_code := 'OE';
4657: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
4658: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4659: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPING_UOM',P_SHIPPING_UOM);
4660: WSH_DEBUG_SV.log(l_module_name,'P_TOT_SHP_QTY',P_TOT_SHP_QTY);
4661: WSH_DEBUG_SV.log(l_module_name,'P_TOT_SHP_QTY2',P_TOT_SHP_QTY2);
4662: END IF;
4663:
4664: l_minmaxinrec.source_code := 'OE';
4665: l_minmaxinrec.line_id := p_source_line_id;
4665: l_minmaxinrec.line_id := p_source_line_id;
4666: l_minmaxinrec.action_flag := 'I';
4667:
4668: IF l_debug_on THEN
4669: WSH_DEBUG_SV.logmsg(l_module_name, 'THE TOTAL SHIPPED QUANTITY FOR ORDER LINE ' || P_SOURCE_LINE_ID || ' IS ' || P_TOT_SHP_QTY );
4670: END IF;
4671:
4672:
4673: WSH_DETAILS_VALIDATIONS.get_min_max_tolerance_quantity
4698:
4699: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4700:
4701: IF l_debug_on THEN
4702: WSH_DEBUG_SV.log(l_module_name, 'SHIP_BEYOND_FLAG', X_SHIP_BEYOND_FLAG);
4703: WSH_DEBUG_SV.log(l_module_name, 'FULFILLED_FLAG', X_FULFILLED_FLAG);
4704: WSH_DEBUG_SV.pop(l_module_name);
4705: END IF;
4706:
4699: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4700:
4701: IF l_debug_on THEN
4702: WSH_DEBUG_SV.log(l_module_name, 'SHIP_BEYOND_FLAG', X_SHIP_BEYOND_FLAG);
4703: WSH_DEBUG_SV.log(l_module_name, 'FULFILLED_FLAG', X_FULFILLED_FLAG);
4704: WSH_DEBUG_SV.pop(l_module_name);
4705: END IF;
4706:
4707: EXCEPTION
4700:
4701: IF l_debug_on THEN
4702: WSH_DEBUG_SV.log(l_module_name, 'SHIP_BEYOND_FLAG', X_SHIP_BEYOND_FLAG);
4703: WSH_DEBUG_SV.log(l_module_name, 'FULFILLED_FLAG', X_FULFILLED_FLAG);
4704: WSH_DEBUG_SV.pop(l_module_name);
4705: END IF;
4706:
4707: EXCEPTION
4708: WHEN GET_TOLERANCE_FAILED THEN
4706:
4707: EXCEPTION
4708: WHEN GET_TOLERANCE_FAILED THEN
4709: IF l_debug_on THEN
4710: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH get_min_max_tolerance_quantity FAILED' );
4711: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
4712: WSH_DEBUG_SV.logmsg(l_module_name,'GET_TOLERANCE_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4713: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:GET_TOLERANCE_FAILED');
4714: END IF;
4707: EXCEPTION
4708: WHEN GET_TOLERANCE_FAILED THEN
4709: IF l_debug_on THEN
4710: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH get_min_max_tolerance_quantity FAILED' );
4711: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
4712: WSH_DEBUG_SV.logmsg(l_module_name,'GET_TOLERANCE_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4713: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:GET_TOLERANCE_FAILED');
4714: END IF;
4715: x_return_status := l_return_status;
4708: WHEN GET_TOLERANCE_FAILED THEN
4709: IF l_debug_on THEN
4710: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH get_min_max_tolerance_quantity FAILED' );
4711: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
4712: WSH_DEBUG_SV.logmsg(l_module_name,'GET_TOLERANCE_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4713: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:GET_TOLERANCE_FAILED');
4714: END IF;
4715: x_return_status := l_return_status;
4716: x_fulfilled_flag := NULL;
4709: IF l_debug_on THEN
4710: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH get_min_max_tolerance_quantity FAILED' );
4711: WSH_DEBUG_SV.log(l_module_name, 'l_return_status', l_return_status);
4712: WSH_DEBUG_SV.logmsg(l_module_name,'GET_TOLERANCE_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4713: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:GET_TOLERANCE_FAILED');
4714: END IF;
4715: x_return_status := l_return_status;
4716: x_fulfilled_flag := NULL;
4717:
4737: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4738: --
4739: IF l_debug_on IS NULL
4740: THEN
4741: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4742: END IF;
4743: --
4744: IF l_debug_on THEN
4745: WSH_DEBUG_SV.push(l_module_name);
4741: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4742: END IF;
4743: --
4744: IF l_debug_on THEN
4745: WSH_DEBUG_SV.push(l_module_name);
4746: --
4747: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
4748: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4749: END IF;
4743: --
4744: IF l_debug_on THEN
4745: WSH_DEBUG_SV.push(l_module_name);
4746: --
4747: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
4748: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4749: END IF;
4750: --
4751: SELECT count(*) into l_count
4744: IF l_debug_on THEN
4745: WSH_DEBUG_SV.push(l_module_name);
4746: --
4747: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
4748: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4749: END IF;
4750: --
4751: SELECT count(*) into l_count
4752: from wsh_delivery_details
4756: and container_flag = 'N'
4757: and released_status <> 'D' ; /* H integration: wrudge */
4758:
4759: IF l_debug_on THEN
4760: WSH_DEBUG_SV.log(l_module_name,'l_count',l_count);
4761: END IF;
4762: if (l_count > 0 ) THEN
4763: --
4764: IF l_debug_on THEN
4761: END IF;
4762: if (l_count > 0 ) THEN
4763: --
4764: IF l_debug_on THEN
4765: WSH_DEBUG_SV.pop(l_module_name);
4766: END IF;
4767: --
4768: return TRUE;
4769: --
4767: --
4768: return TRUE;
4769: --
4770: IF l_debug_on THEN
4771: WSH_DEBUG_SV.pop(l_module_name);
4772: END IF;
4773: --
4774: else return FALSE;
4775: END if;
4788: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4789: --
4790: IF l_debug_on IS NULL
4791: THEN
4792: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4793: END IF;
4794: --
4795: IF l_debug_on THEN
4796: WSH_DEBUG_SV.push(l_module_name);
4792: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4793: END IF;
4794: --
4795: IF l_debug_on THEN
4796: WSH_DEBUG_SV.push(l_module_name);
4797: --
4798: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
4799: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4800: END IF;
4794: --
4795: IF l_debug_on THEN
4796: WSH_DEBUG_SV.push(l_module_name);
4797: --
4798: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
4799: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4800: END IF;
4801: --
4802: if (part_of_pto(p_source_code,p_source_line_id) = TRUE) THEN
4795: IF l_debug_on THEN
4796: WSH_DEBUG_SV.push(l_module_name);
4797: --
4798: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
4799: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4800: END IF;
4801: --
4802: if (part_of_pto(p_source_code,p_source_line_id) = TRUE) THEN
4803: SELECT distinct top_model_line_id into l_top_id
4806: and source_code = p_source_code
4807: and container_flag = 'N'
4808: and released_status <> 'D' ; /* H integration: wrudge */
4809: IF l_debug_on THEN
4810: WSH_DEBUG_SV.log(l_module_name,'l_top_id',l_top_id);
4811: WSH_DEBUG_SV.pop(l_module_name);
4812: END IF;
4813: --
4814: return l_top_id;
4807: and container_flag = 'N'
4808: and released_status <> 'D' ; /* H integration: wrudge */
4809: IF l_debug_on THEN
4810: WSH_DEBUG_SV.log(l_module_name,'l_top_id',l_top_id);
4811: WSH_DEBUG_SV.pop(l_module_name);
4812: END IF;
4813: --
4814: return l_top_id;
4815: else
4815: else
4816: NULL;
4817: END if;
4818: IF l_debug_on THEN
4819: WSH_DEBUG_SV.pop(l_module_name);
4820: END IF;
4821:
4822: END Top_Of_Model;
4823:
4852: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4853: --
4854: IF l_debug_on IS NULL
4855: THEN
4856: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4857: END IF;
4858: --
4859: IF l_debug_on THEN
4860: WSH_DEBUG_SV.push(l_module_name);
4856: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4857: END IF;
4858: --
4859: IF l_debug_on THEN
4860: WSH_DEBUG_SV.push(l_module_name);
4861: --
4862: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
4863: END IF;
4864: --
4858: --
4859: IF l_debug_on THEN
4860: WSH_DEBUG_SV.push(l_module_name);
4861: --
4862: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
4863: END IF;
4864: --
4865: update wsh_delivery_details dd
4866: set inv_interfaced_flag = c_inv_int_full
4891: )
4892: and dd.released_status <> 'D'; /* H integration: wrudge */
4893: --
4894: IF l_debug_on THEN
4895: WSH_DEBUG_SV.logmsg(l_module_name, 'NUMBER OF ROWS UPDATED AS INTERFACED TO INVENTORY = ' || SQL%ROWCOUNT );
4896: WSH_DEBUG_SV.pop(l_module_name);
4897: END IF;
4898: --
4899: exception
4892: and dd.released_status <> 'D'; /* H integration: wrudge */
4893: --
4894: IF l_debug_on THEN
4895: WSH_DEBUG_SV.logmsg(l_module_name, 'NUMBER OF ROWS UPDATED AS INTERFACED TO INVENTORY = ' || SQL%ROWCOUNT );
4896: WSH_DEBUG_SV.pop(l_module_name);
4897: END IF;
4898: --
4899: exception
4900: WHEN others THEN
4902: WSH_UTIL_CORE.PrintMsg('UPDATE_INTERFACED_DETAILS : unexpected error ');
4903: WSH_UTIL_CORE.PrintMsg( SQLCODE || ' : ' || SQLERRM );
4904:
4905: IF l_debug_on THEN
4906: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4907: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4908: END IF;
4909: --
4910: end update_interfaced_details ;
4903: WSH_UTIL_CORE.PrintMsg( SQLCODE || ' : ' || SQLERRM );
4904:
4905: IF l_debug_on THEN
4906: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4907: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4908: END IF;
4909: --
4910: end update_interfaced_details ;
4911:
4936: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4937: --
4938: IF l_debug_on IS NULL
4939: THEN
4940: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4941: END IF;
4942: --
4943: IF l_debug_on THEN
4944: WSH_DEBUG_SV.push(l_module_name);
4940: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4941: END IF;
4942: --
4943: IF l_debug_on THEN
4944: WSH_DEBUG_SV.push(l_module_name);
4945: --
4946: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
4947:
4948: l_log_level :=1;
4942: --
4943: IF l_debug_on THEN
4944: WSH_DEBUG_SV.push(l_module_name);
4945: --
4946: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
4947:
4948: l_log_level :=1;
4949: END IF;
4950: --
4962: errbuf := 'OM interface is completed with error';
4963: END IF;
4964: --
4965: IF l_debug_on THEN
4966: WSH_DEBUG_SV.log(l_module_name,'retcode',retcode);
4967: WSH_DEBUG_SV.pop(l_module_name);
4968: END IF;
4969: --
4970: END oe_interface;
4963: END IF;
4964: --
4965: IF l_debug_on THEN
4966: WSH_DEBUG_SV.log(l_module_name,'retcode',retcode);
4967: WSH_DEBUG_SV.pop(l_module_name);
4968: END IF;
4969: --
4970: END oe_interface;
4971:
5052: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5053: --
5054: IF l_debug_on IS NULL
5055: THEN
5056: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5057: END IF;
5058: --
5059: IF l_debug_on THEN
5060: WSH_DEBUG_SV.push(l_module_name);
5056: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5057: END IF;
5058: --
5059: IF l_debug_on THEN
5060: WSH_DEBUG_SV.push(l_module_name);
5061: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
5062: END IF;
5063: --
5064: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5057: END IF;
5058: --
5059: IF l_debug_on THEN
5060: WSH_DEBUG_SV.push(l_module_name);
5061: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
5062: END IF;
5063: --
5064: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5065: x_num_stops_removed := 0;
5069: l_all_stops_count := p_stop_tab.COUNT;
5070:
5071: IF l_all_stops_count = 0 THEN
5072: IF l_debug_on THEN
5073: WSH_DEBUG_SV.log(l_module_name,'l_all_stops_count',l_all_stops_count);
5074: WSH_DEBUG_SV.pop(l_module_name);
5075: END IF;
5076: RETURN;
5077: END IF;
5070:
5071: IF l_all_stops_count = 0 THEN
5072: IF l_debug_on THEN
5073: WSH_DEBUG_SV.log(l_module_name,'l_all_stops_count',l_all_stops_count);
5074: WSH_DEBUG_SV.pop(l_module_name);
5075: END IF;
5076: RETURN;
5077: END IF;
5078:
5143:
5144: IF l_debug_on THEN --{
5145: i := l_err_stops.FIRST;
5146: WHILE i IS NOT NULL LOOP
5147: WSH_DEBUG_SV.log(l_module_name,'Failed to interface stop to OM',
5148: l_err_stops(i));
5149: i := l_err_stops.NEXT(i);
5150: END LOOP;
5151: END IF; --}
5151: END IF; --}
5152:
5153:
5154: IF l_debug_on THEN
5155: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status );
5156: WSH_DEBUG_SV.log(l_module_name,'l_err_stops.count',l_err_stops.COUNT );
5157: WSH_DEBUG_SV.log(l_module_name,'x_stop_tab.count',x_stop_tab.COUNT );
5158: WSH_DEBUG_SV.log(l_module_name,'l_all_stops_count',l_all_stops_count );
5159: WSH_DEBUG_SV.log(l_module_name,'x_num_stops_removed',x_num_stops_removed );
5152:
5153:
5154: IF l_debug_on THEN
5155: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status );
5156: WSH_DEBUG_SV.log(l_module_name,'l_err_stops.count',l_err_stops.COUNT );
5157: WSH_DEBUG_SV.log(l_module_name,'x_stop_tab.count',x_stop_tab.COUNT );
5158: WSH_DEBUG_SV.log(l_module_name,'l_all_stops_count',l_all_stops_count );
5159: WSH_DEBUG_SV.log(l_module_name,'x_num_stops_removed',x_num_stops_removed );
5160: WSH_DEBUG_SV.pop(l_module_name);
5153:
5154: IF l_debug_on THEN
5155: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status );
5156: WSH_DEBUG_SV.log(l_module_name,'l_err_stops.count',l_err_stops.COUNT );
5157: WSH_DEBUG_SV.log(l_module_name,'x_stop_tab.count',x_stop_tab.COUNT );
5158: WSH_DEBUG_SV.log(l_module_name,'l_all_stops_count',l_all_stops_count );
5159: WSH_DEBUG_SV.log(l_module_name,'x_num_stops_removed',x_num_stops_removed );
5160: WSH_DEBUG_SV.pop(l_module_name);
5161: END IF;
5154: IF l_debug_on THEN
5155: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status );
5156: WSH_DEBUG_SV.log(l_module_name,'l_err_stops.count',l_err_stops.COUNT );
5157: WSH_DEBUG_SV.log(l_module_name,'x_stop_tab.count',x_stop_tab.COUNT );
5158: WSH_DEBUG_SV.log(l_module_name,'l_all_stops_count',l_all_stops_count );
5159: WSH_DEBUG_SV.log(l_module_name,'x_num_stops_removed',x_num_stops_removed );
5160: WSH_DEBUG_SV.pop(l_module_name);
5161: END IF;
5162:
5155: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status );
5156: WSH_DEBUG_SV.log(l_module_name,'l_err_stops.count',l_err_stops.COUNT );
5157: WSH_DEBUG_SV.log(l_module_name,'x_stop_tab.count',x_stop_tab.COUNT );
5158: WSH_DEBUG_SV.log(l_module_name,'l_all_stops_count',l_all_stops_count );
5159: WSH_DEBUG_SV.log(l_module_name,'x_num_stops_removed',x_num_stops_removed );
5160: WSH_DEBUG_SV.pop(l_module_name);
5161: END IF;
5162:
5163: EXCEPTION
5156: WSH_DEBUG_SV.log(l_module_name,'l_err_stops.count',l_err_stops.COUNT );
5157: WSH_DEBUG_SV.log(l_module_name,'x_stop_tab.count',x_stop_tab.COUNT );
5158: WSH_DEBUG_SV.log(l_module_name,'l_all_stops_count',l_all_stops_count );
5159: WSH_DEBUG_SV.log(l_module_name,'x_num_stops_removed',x_num_stops_removed );
5160: WSH_DEBUG_SV.pop(l_module_name);
5161: END IF;
5162:
5163: EXCEPTION
5164:
5167: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
5168: wsh_util_core.default_handler('WSH_SHIP_CONFIRM_ACTIONS.Filter_Stops_From_Batch');
5169:
5170: IF l_debug_on THEN
5171: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is ' || SQLERRM, wsh_debug_sv.c_unexpec_err_level);
5172: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
5173: END IF;
5174:
5175:
5168: wsh_util_core.default_handler('WSH_SHIP_CONFIRM_ACTIONS.Filter_Stops_From_Batch');
5169:
5170: IF l_debug_on THEN
5171: wsh_debug_sv.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is ' || SQLERRM, wsh_debug_sv.c_unexpec_err_level);
5172: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
5173: END IF;
5174:
5175:
5176: END Filter_Stops_From_Batch;
5239: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5240: --
5241: IF l_debug_on IS NULL
5242: THEN
5243: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5244: END IF;
5245: --
5246: IF l_debug_on THEN
5247: WSH_DEBUG_SV.push(l_module_name);
5243: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5244: END IF;
5245: --
5246: IF l_debug_on THEN
5247: WSH_DEBUG_SV.push(l_module_name);
5248: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
5249: END IF;
5250: --
5251:
5244: END IF;
5245: --
5246: IF l_debug_on THEN
5247: WSH_DEBUG_SV.push(l_module_name);
5248: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
5249: END IF;
5250: --
5251:
5252: x_num_stops_removed := 0;
5257: CLOSE lock_row;
5258: x_completion_status := 'ERROR';
5259: --
5260: IF l_debug_on THEN
5261: WSH_DEBUG_SV.logmsg(l_module_name, 'OM INTERFACE CANNOT FIND BATCH ID ' || p_batch_id );
5262: WSH_DEBUG_SV.log(l_module_name,'x_completion_status',x_completion_status);
5263: WSH_DEBUG_SV.pop(l_module_name);
5264: END IF;
5265: --
5258: x_completion_status := 'ERROR';
5259: --
5260: IF l_debug_on THEN
5261: WSH_DEBUG_SV.logmsg(l_module_name, 'OM INTERFACE CANNOT FIND BATCH ID ' || p_batch_id );
5262: WSH_DEBUG_SV.log(l_module_name,'x_completion_status',x_completion_status);
5263: WSH_DEBUG_SV.pop(l_module_name);
5264: END IF;
5265: --
5266: return;
5259: --
5260: IF l_debug_on THEN
5261: WSH_DEBUG_SV.logmsg(l_module_name, 'OM INTERFACE CANNOT FIND BATCH ID ' || p_batch_id );
5262: WSH_DEBUG_SV.log(l_module_name,'x_completion_status',x_completion_status);
5263: WSH_DEBUG_SV.pop(l_module_name);
5264: END IF;
5265: --
5266: return;
5267: END IF;
5267: END IF;
5268:
5269: --
5270: IF l_debug_on THEN
5271: WSH_DEBUG_SV.logmsg(l_module_name, 'OM INTERFACING BATCH ' || TO_CHAR ( p_batch_id ) );
5272: END IF;
5273: --
5274:
5275: WSH_SHIP_CONFIRM_ACTIONS.l_currentDate := SYSDATE;
5279: p_batch_id => p_batch_id ,
5280: x_return_status => l_return_status);
5281:
5282: IF l_debug_on THEN
5283: WSH_DEBUG_SV.log(l_module_name,'Interface_Stop_To_OM l_return_status',l_return_status);
5284: END IF;
5285:
5286:
5287: l_prev_return_status := l_return_status;
5294: END if; --}
5295: --HVOP heali
5296: -- Bug 2657652 : Added call to transfer serial records from mtl_serial_numbers_temp to wsh_serial_numbers
5297: IF l_debug_on THEN
5298: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling TRANSFER_SERIAL_NUMBERS FOR ' || TO_CHAR ( p_batch_id ) );
5299: END IF;
5300:
5301: IF l_prev_return_status <> WSH_UTIL_CORE.G_RET_STS_ERROR THEN
5302: transfer_serial_numbers ( p_batch_id => p_batch_id ,
5341:
5342: x_completion_status := l_completion_status;
5343: --
5344: IF l_debug_on THEN
5345: WSH_DEBUG_SV.log(l_module_name,'x_completion_status',x_completion_status);
5346: WSH_DEBUG_SV.pop(l_module_name);
5347: END IF;
5348: EXCEPTION
5349: when trip_stop_locked Then
5342: x_completion_status := l_completion_status;
5343: --
5344: IF l_debug_on THEN
5345: WSH_DEBUG_SV.log(l_module_name,'x_completion_status',x_completion_status);
5346: WSH_DEBUG_SV.pop(l_module_name);
5347: END IF;
5348: EXCEPTION
5349: when trip_stop_locked Then
5350: IF lock_row%ISOPEN THEN
5353: WSH_UTIL_CORE.PrintMsg('This Trip Stop is locked by some other process');
5354: x_completion_status := 'WARNING'; -- continue processing other stops
5355: --
5356: IF l_debug_on THEN
5357: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_STOP_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5358: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_STOP_LOCKED');
5359: END IF;
5360: --
5361:
5354: x_completion_status := 'WARNING'; -- continue processing other stops
5355: --
5356: IF l_debug_on THEN
5357: WSH_DEBUG_SV.logmsg(l_module_name,'TRIP_STOP_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5358: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:TRIP_STOP_LOCKED');
5359: END IF;
5360: --
5361:
5362: WHEN e_Interface_Stop_To_OM then
5371: CLOSE lock_row;
5372: END IF;
5373: --
5374: IF l_debug_on THEN
5375: WSH_DEBUG_SV.logmsg(l_module_name,'e_Interface_Stop_To_OM exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5376: WSH_DEBUG_SV.log(l_module_name,'x_completion_status',x_completion_status);
5377: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_Interface_Stop_To_OM');
5378: END IF;
5379: --
5372: END IF;
5373: --
5374: IF l_debug_on THEN
5375: WSH_DEBUG_SV.logmsg(l_module_name,'e_Interface_Stop_To_OM exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5376: WSH_DEBUG_SV.log(l_module_name,'x_completion_status',x_completion_status);
5377: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_Interface_Stop_To_OM');
5378: END IF;
5379: --
5380:
5373: --
5374: IF l_debug_on THEN
5375: WSH_DEBUG_SV.logmsg(l_module_name,'e_Interface_Stop_To_OM exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5376: WSH_DEBUG_SV.log(l_module_name,'x_completion_status',x_completion_status);
5377: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_Interface_Stop_To_OM');
5378: END IF;
5379: --
5380:
5381: WHEN others then
5387: CLOSE lock_row;
5388: END IF;
5389: --
5390: IF l_debug_on THEN
5391: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5392: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5393: END IF;
5394: --
5395: END oe_interface_trip_stop;
5388: END IF;
5389: --
5390: IF l_debug_on THEN
5391: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5392: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5393: END IF;
5394: --
5395: END oe_interface_trip_stop;
5396:
5519:
5520: BEGIN
5521: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5522: IF l_debug_on IS NULL THEN
5523: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5524: END IF;
5525:
5526: IF l_debug_on THEN
5527: WSH_DEBUG_SV.push(l_module_name);
5523: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5524: END IF;
5525:
5526: IF l_debug_on THEN
5527: WSH_DEBUG_SV.push(l_module_name);
5528: WSH_DEBUG_SV.log(l_module_name,'P_batch_id',P_batch_id);
5529: WSH_DEBUG_SV.log(l_module_name,'p_requested_quantity',p_requested_quantity);
5530: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity',p_shipped_quantity);
5531: WSH_DEBUG_SV.log(l_module_name,'p_requested_quantity2',p_requested_quantity2);
5524: END IF;
5525:
5526: IF l_debug_on THEN
5527: WSH_DEBUG_SV.push(l_module_name);
5528: WSH_DEBUG_SV.log(l_module_name,'P_batch_id',P_batch_id);
5529: WSH_DEBUG_SV.log(l_module_name,'p_requested_quantity',p_requested_quantity);
5530: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity',p_shipped_quantity);
5531: WSH_DEBUG_SV.log(l_module_name,'p_requested_quantity2',p_requested_quantity2);
5532: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity2',p_shipped_quantity2);
5525:
5526: IF l_debug_on THEN
5527: WSH_DEBUG_SV.push(l_module_name);
5528: WSH_DEBUG_SV.log(l_module_name,'P_batch_id',P_batch_id);
5529: WSH_DEBUG_SV.log(l_module_name,'p_requested_quantity',p_requested_quantity);
5530: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity',p_shipped_quantity);
5531: WSH_DEBUG_SV.log(l_module_name,'p_requested_quantity2',p_requested_quantity2);
5532: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity2',p_shipped_quantity2);
5533: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_setsmc_input_rec.top_model_line_id);
5526: IF l_debug_on THEN
5527: WSH_DEBUG_SV.push(l_module_name);
5528: WSH_DEBUG_SV.log(l_module_name,'P_batch_id',P_batch_id);
5529: WSH_DEBUG_SV.log(l_module_name,'p_requested_quantity',p_requested_quantity);
5530: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity',p_shipped_quantity);
5531: WSH_DEBUG_SV.log(l_module_name,'p_requested_quantity2',p_requested_quantity2);
5532: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity2',p_shipped_quantity2);
5533: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_setsmc_input_rec.top_model_line_id);
5534: WSH_DEBUG_SV.log(l_module_name,'ship_set_id',p_setsmc_input_rec.ship_set_id);
5527: WSH_DEBUG_SV.push(l_module_name);
5528: WSH_DEBUG_SV.log(l_module_name,'P_batch_id',P_batch_id);
5529: WSH_DEBUG_SV.log(l_module_name,'p_requested_quantity',p_requested_quantity);
5530: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity',p_shipped_quantity);
5531: WSH_DEBUG_SV.log(l_module_name,'p_requested_quantity2',p_requested_quantity2);
5532: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity2',p_shipped_quantity2);
5533: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_setsmc_input_rec.top_model_line_id);
5534: WSH_DEBUG_SV.log(l_module_name,'ship_set_id',p_setsmc_input_rec.ship_set_id);
5535: WSH_DEBUG_SV.log(l_module_name,'p_source_line_id',p_source_line_id);
5528: WSH_DEBUG_SV.log(l_module_name,'P_batch_id',P_batch_id);
5529: WSH_DEBUG_SV.log(l_module_name,'p_requested_quantity',p_requested_quantity);
5530: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity',p_shipped_quantity);
5531: WSH_DEBUG_SV.log(l_module_name,'p_requested_quantity2',p_requested_quantity2);
5532: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity2',p_shipped_quantity2);
5533: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_setsmc_input_rec.top_model_line_id);
5534: WSH_DEBUG_SV.log(l_module_name,'ship_set_id',p_setsmc_input_rec.ship_set_id);
5535: WSH_DEBUG_SV.log(l_module_name,'p_source_line_id',p_source_line_id);
5536: WSH_DEBUG_SV.log(l_module_name,'p_source_header_id',p_source_header_id);
5529: WSH_DEBUG_SV.log(l_module_name,'p_requested_quantity',p_requested_quantity);
5530: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity',p_shipped_quantity);
5531: WSH_DEBUG_SV.log(l_module_name,'p_requested_quantity2',p_requested_quantity2);
5532: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity2',p_shipped_quantity2);
5533: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_setsmc_input_rec.top_model_line_id);
5534: WSH_DEBUG_SV.log(l_module_name,'ship_set_id',p_setsmc_input_rec.ship_set_id);
5535: WSH_DEBUG_SV.log(l_module_name,'p_source_line_id',p_source_line_id);
5536: WSH_DEBUG_SV.log(l_module_name,'p_source_header_id',p_source_header_id);
5537: END IF;
5530: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity',p_shipped_quantity);
5531: WSH_DEBUG_SV.log(l_module_name,'p_requested_quantity2',p_requested_quantity2);
5532: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity2',p_shipped_quantity2);
5533: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_setsmc_input_rec.top_model_line_id);
5534: WSH_DEBUG_SV.log(l_module_name,'ship_set_id',p_setsmc_input_rec.ship_set_id);
5535: WSH_DEBUG_SV.log(l_module_name,'p_source_line_id',p_source_line_id);
5536: WSH_DEBUG_SV.log(l_module_name,'p_source_header_id',p_source_header_id);
5537: END IF;
5538:
5531: WSH_DEBUG_SV.log(l_module_name,'p_requested_quantity2',p_requested_quantity2);
5532: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity2',p_shipped_quantity2);
5533: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_setsmc_input_rec.top_model_line_id);
5534: WSH_DEBUG_SV.log(l_module_name,'ship_set_id',p_setsmc_input_rec.ship_set_id);
5535: WSH_DEBUG_SV.log(l_module_name,'p_source_line_id',p_source_line_id);
5536: WSH_DEBUG_SV.log(l_module_name,'p_source_header_id',p_source_header_id);
5537: END IF;
5538:
5539:
5532: WSH_DEBUG_SV.log(l_module_name,'p_shipped_quantity2',p_shipped_quantity2);
5533: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_setsmc_input_rec.top_model_line_id);
5534: WSH_DEBUG_SV.log(l_module_name,'ship_set_id',p_setsmc_input_rec.ship_set_id);
5535: WSH_DEBUG_SV.log(l_module_name,'p_source_line_id',p_source_line_id);
5536: WSH_DEBUG_SV.log(l_module_name,'p_source_header_id',p_source_header_id);
5537: END IF;
5538:
5539:
5540: IF (p_requested_quantity =p_shipped_quantity)
5540: IF (p_requested_quantity =p_shipped_quantity)
5541: AND (nvl(p_requested_quantity2,0) = nvl(p_shipped_quantity2,0))
5542: THEN -- {
5543: IF l_debug_on THEN
5544: WSH_DEBUG_SV.logmsg(l_module_name, 'Request qty and Shipped qty are equal.');
5545: END IF;
5546:
5547: -- Processing Model Line
5548: IF (p_setsmc_input_rec.top_model_line_id is NOT NULL) THEN
5546:
5547: -- Processing Model Line
5548: IF (p_setsmc_input_rec.top_model_line_id is NOT NULL) THEN
5549: IF l_debug_on THEN
5550: WSH_DEBUG_SV.logmsg(l_module_name, ' Processing Model Line');
5551: END IF;
5552:
5553: --Check if bulk status is found for current top model line in cache
5554: WSH_UTIL_CORE.get_cached_value(
5561:
5562: --IF (not found in cache) THEN
5563: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN --{
5564: IF l_debug_on THEN
5565: WSH_DEBUG_SV.logmsg(l_module_name,
5566: ' Calling OE_Shipping_Integration_PUB.Get_SetSMC_Interface_Status');
5567: END IF;
5568: OE_Shipping_Integration_PUB.Get_SetSMC_Interface_Status(
5569: p_setsmc_input_rec => p_setsmc_input_rec,
5570: p_setsmc_output_rec => l_setsmc_output_rec,
5571: x_return_status => l_return_status);
5572:
5573: IF l_debug_on THEN
5574: WSH_DEBUG_SV.log(l_module_name,'l_return_status',
5575: l_return_status);
5576: WSH_DEBUG_SV.log(l_module_name,'x_interface_status',
5577: l_setsmc_output_rec.x_interface_status);
5578: END IF;
5572:
5573: IF l_debug_on THEN
5574: WSH_DEBUG_SV.log(l_module_name,'l_return_status',
5575: l_return_status);
5576: WSH_DEBUG_SV.log(l_module_name,'x_interface_status',
5577: l_setsmc_output_rec.x_interface_status);
5578: END IF;
5579: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5580: raise FND_API.G_EXC_ERROR;
5619: -- Processing Ship Set Line
5620: IF (p_setsmc_input_rec.ship_set_id is NOT NULL)
5621: AND (NVL(l_bulk,TRUE) ) then
5622: IF l_debug_on THEN
5623: WSH_DEBUG_SV.logmsg(l_module_name, ' Processing Ship Set Line');
5624: END IF;
5625:
5626: --Check if bulk status is found for current ship_set line in cache
5627: WSH_UTIL_CORE.get_cached_value(
5634:
5635: --IF (not found in cache) THEN
5636: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5637: IF l_debug_on THEN
5638: WSH_DEBUG_SV.logmsg(l_module_name,
5639: ' Calling OE_Shipping_Integration_PUB.Get_SetSMC_Interface_Status');
5640: END IF;
5641: OE_Shipping_Integration_PUB.Get_SetSMC_Interface_Status(
5642: p_setsmc_input_rec => p_setsmc_input_rec,
5643: p_setsmc_output_rec => l_setsmc_output_rec,
5644: x_return_status => l_return_status);
5645:
5646: IF l_debug_on THEN
5647: WSH_DEBUG_SV.log(l_module_name,'l_return_status',
5648: l_return_status);
5649: WSH_DEBUG_SV.log(l_module_name,'x_interface_status',
5650: l_setsmc_output_rec.x_interface_status);
5651: END IF;
5645:
5646: IF l_debug_on THEN
5647: WSH_DEBUG_SV.log(l_module_name,'l_return_status',
5648: l_return_status);
5649: WSH_DEBUG_SV.log(l_module_name,'x_interface_status',
5650: l_setsmc_output_rec.x_interface_status);
5651: END IF;
5652:
5653: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5689: --Standard item
5690: IF (p_setsmc_input_rec.ship_set_id is NULL
5691: And p_setsmc_input_rec.top_model_line_id IS NULL) then
5692: IF l_debug_on THEN
5693: WSH_DEBUG_SV.logmsg(l_module_name, ' Processing Standard Line');
5694: END IF;
5695:
5696: --Check if bulk status is found for current ato_line in cache
5697: WSH_UTIL_CORE.get_cached_value(
5735: ELSE -- }{
5736: -- Request qty and Shipped qty are not equal.
5737: l_bulk:=FALSE;
5738: IF l_debug_on THEN
5739: WSH_DEBUG_SV.logmsg(l_module_name, 'Request qty and Shipped qty are not equal. l_bulk is FALSE');
5740: END IF;
5741: END IF; -- }
5742:
5743:
5741: END IF; -- }
5742:
5743:
5744: IF l_debug_on THEN
5745: WSH_DEBUG_SV.pop(l_module_name);
5746: END IF;
5747:
5748: RETURN NVL(l_bulk, FALSE);
5749: EXCEPTION
5748: RETURN NVL(l_bulk, FALSE);
5749: EXCEPTION
5750: WHEN others THEN
5751: IF l_debug_on THEN
5752: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN Is_OM_Bulk_Enable' );
5753: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
5754: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5755: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5756: END IF;
5749: EXCEPTION
5750: WHEN others THEN
5751: IF l_debug_on THEN
5752: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN Is_OM_Bulk_Enable' );
5753: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
5754: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5755: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5756: END IF;
5757: raise e_raise_others;
5750: WHEN others THEN
5751: IF l_debug_on THEN
5752: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN Is_OM_Bulk_Enable' );
5753: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
5754: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5755: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5756: END IF;
5757: raise e_raise_others;
5758: END Is_OM_Bulk_Enable;
5751: IF l_debug_on THEN
5752: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN Is_OM_Bulk_Enable' );
5753: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,
5754: WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5755: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5756: END IF;
5757: raise e_raise_others;
5758: END Is_OM_Bulk_Enable;
5759:
5787:
5788: BEGIN
5789: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5790: IF l_debug_on IS NULL THEN
5791: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5792: END IF;
5793:
5794: IF l_debug_on THEN
5795: WSH_DEBUG_SV.push(l_module_name);
5791: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5792: END IF;
5793:
5794: IF l_debug_on THEN
5795: WSH_DEBUG_SV.push(l_module_name);
5796: WSH_DEBUG_SV.log(l_module_name,'p_start_index',p_start_index);
5797: WSH_DEBUG_SV.log(l_module_name,'p_end_index',p_end_index);
5798: END IF;
5799: IF (p_start_index is null or p_end_index is null) THEN
5792: END IF;
5793:
5794: IF l_debug_on THEN
5795: WSH_DEBUG_SV.push(l_module_name);
5796: WSH_DEBUG_SV.log(l_module_name,'p_start_index',p_start_index);
5797: WSH_DEBUG_SV.log(l_module_name,'p_end_index',p_end_index);
5798: END IF;
5799: IF (p_start_index is null or p_end_index is null) THEN
5800: l_start_index := p_ship_line.fulfilled_flag.first;
5793:
5794: IF l_debug_on THEN
5795: WSH_DEBUG_SV.push(l_module_name);
5796: WSH_DEBUG_SV.log(l_module_name,'p_start_index',p_start_index);
5797: WSH_DEBUG_SV.log(l_module_name,'p_end_index',p_end_index);
5798: END IF;
5799: IF (p_start_index is null or p_end_index is null) THEN
5800: l_start_index := p_ship_line.fulfilled_flag.first;
5801: l_end_index := p_ship_line.fulfilled_flag.last;
5809:
5810: IF (p_bulk_mode='N') THEN
5811: FOR i IN l_start_index..l_end_index LOOP
5812:
5813: WSH_DEBUG_SV.logmsg(l_module_name,'#########NON BULK##############');
5814: WSH_DEBUG_SV.log(l_module_name,'Index',i);
5815: WSH_DEBUG_SV.log(l_module_name,'fulfilled_flag',p_ship_line.fulfilled_flag(i));
5816: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5817: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5810: IF (p_bulk_mode='N') THEN
5811: FOR i IN l_start_index..l_end_index LOOP
5812:
5813: WSH_DEBUG_SV.logmsg(l_module_name,'#########NON BULK##############');
5814: WSH_DEBUG_SV.log(l_module_name,'Index',i);
5815: WSH_DEBUG_SV.log(l_module_name,'fulfilled_flag',p_ship_line.fulfilled_flag(i));
5816: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5817: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5818: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5811: FOR i IN l_start_index..l_end_index LOOP
5812:
5813: WSH_DEBUG_SV.logmsg(l_module_name,'#########NON BULK##############');
5814: WSH_DEBUG_SV.log(l_module_name,'Index',i);
5815: WSH_DEBUG_SV.log(l_module_name,'fulfilled_flag',p_ship_line.fulfilled_flag(i));
5816: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5817: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5818: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5819: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5812:
5813: WSH_DEBUG_SV.logmsg(l_module_name,'#########NON BULK##############');
5814: WSH_DEBUG_SV.log(l_module_name,'Index',i);
5815: WSH_DEBUG_SV.log(l_module_name,'fulfilled_flag',p_ship_line.fulfilled_flag(i));
5816: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5817: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5818: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5819: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5820: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5813: WSH_DEBUG_SV.logmsg(l_module_name,'#########NON BULK##############');
5814: WSH_DEBUG_SV.log(l_module_name,'Index',i);
5815: WSH_DEBUG_SV.log(l_module_name,'fulfilled_flag',p_ship_line.fulfilled_flag(i));
5816: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5817: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5818: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5819: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5820: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5821: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5814: WSH_DEBUG_SV.log(l_module_name,'Index',i);
5815: WSH_DEBUG_SV.log(l_module_name,'fulfilled_flag',p_ship_line.fulfilled_flag(i));
5816: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5817: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5818: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5819: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5820: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5821: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5822: WSH_DEBUG_SV.log(l_module_name,'header_id',p_ship_line.header_id(i));
5815: WSH_DEBUG_SV.log(l_module_name,'fulfilled_flag',p_ship_line.fulfilled_flag(i));
5816: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5817: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5818: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5819: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5820: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5821: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5822: WSH_DEBUG_SV.log(l_module_name,'header_id',p_ship_line.header_id(i));
5823: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_ship_line.top_model_line_id(i));
5816: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5817: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5818: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5819: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5820: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5821: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5822: WSH_DEBUG_SV.log(l_module_name,'header_id',p_ship_line.header_id(i));
5823: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_ship_line.top_model_line_id(i));
5824: WSH_DEBUG_SV.log(l_module_name,'ato_line_id',p_ship_line.ato_line_id(i));
5817: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5818: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5819: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5820: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5821: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5822: WSH_DEBUG_SV.log(l_module_name,'header_id',p_ship_line.header_id(i));
5823: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_ship_line.top_model_line_id(i));
5824: WSH_DEBUG_SV.log(l_module_name,'ato_line_id',p_ship_line.ato_line_id(i));
5825: WSH_DEBUG_SV.log(l_module_name,'ship_set_id',p_ship_line.ship_set_id(i));
5818: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5819: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5820: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5821: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5822: WSH_DEBUG_SV.log(l_module_name,'header_id',p_ship_line.header_id(i));
5823: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_ship_line.top_model_line_id(i));
5824: WSH_DEBUG_SV.log(l_module_name,'ato_line_id',p_ship_line.ato_line_id(i));
5825: WSH_DEBUG_SV.log(l_module_name,'ship_set_id',p_ship_line.ship_set_id(i));
5826: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5819: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5820: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5821: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5822: WSH_DEBUG_SV.log(l_module_name,'header_id',p_ship_line.header_id(i));
5823: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_ship_line.top_model_line_id(i));
5824: WSH_DEBUG_SV.log(l_module_name,'ato_line_id',p_ship_line.ato_line_id(i));
5825: WSH_DEBUG_SV.log(l_module_name,'ship_set_id',p_ship_line.ship_set_id(i));
5826: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5827: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',p_ship_line.inventory_item_id(i));
5820: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5821: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5822: WSH_DEBUG_SV.log(l_module_name,'header_id',p_ship_line.header_id(i));
5823: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_ship_line.top_model_line_id(i));
5824: WSH_DEBUG_SV.log(l_module_name,'ato_line_id',p_ship_line.ato_line_id(i));
5825: WSH_DEBUG_SV.log(l_module_name,'ship_set_id',p_ship_line.ship_set_id(i));
5826: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5827: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',p_ship_line.inventory_item_id(i));
5828: WSH_DEBUG_SV.log(l_module_name,'ship_from_org_id',p_ship_line.ship_from_org_id(i));
5821: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5822: WSH_DEBUG_SV.log(l_module_name,'header_id',p_ship_line.header_id(i));
5823: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_ship_line.top_model_line_id(i));
5824: WSH_DEBUG_SV.log(l_module_name,'ato_line_id',p_ship_line.ato_line_id(i));
5825: WSH_DEBUG_SV.log(l_module_name,'ship_set_id',p_ship_line.ship_set_id(i));
5826: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5827: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',p_ship_line.inventory_item_id(i));
5828: WSH_DEBUG_SV.log(l_module_name,'ship_from_org_id',p_ship_line.ship_from_org_id(i));
5829: WSH_DEBUG_SV.log(l_module_name,'line_set_id',p_ship_line.line_set_id(i));
5822: WSH_DEBUG_SV.log(l_module_name,'header_id',p_ship_line.header_id(i));
5823: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_ship_line.top_model_line_id(i));
5824: WSH_DEBUG_SV.log(l_module_name,'ato_line_id',p_ship_line.ato_line_id(i));
5825: WSH_DEBUG_SV.log(l_module_name,'ship_set_id',p_ship_line.ship_set_id(i));
5826: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5827: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',p_ship_line.inventory_item_id(i));
5828: WSH_DEBUG_SV.log(l_module_name,'ship_from_org_id',p_ship_line.ship_from_org_id(i));
5829: WSH_DEBUG_SV.log(l_module_name,'line_set_id',p_ship_line.line_set_id(i));
5830: WSH_DEBUG_SV.log(l_module_name,'smc_flag',p_ship_line.smc_flag(i));
5823: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',p_ship_line.top_model_line_id(i));
5824: WSH_DEBUG_SV.log(l_module_name,'ato_line_id',p_ship_line.ato_line_id(i));
5825: WSH_DEBUG_SV.log(l_module_name,'ship_set_id',p_ship_line.ship_set_id(i));
5826: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5827: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',p_ship_line.inventory_item_id(i));
5828: WSH_DEBUG_SV.log(l_module_name,'ship_from_org_id',p_ship_line.ship_from_org_id(i));
5829: WSH_DEBUG_SV.log(l_module_name,'line_set_id',p_ship_line.line_set_id(i));
5830: WSH_DEBUG_SV.log(l_module_name,'smc_flag',p_ship_line.smc_flag(i));
5831: WSH_DEBUG_SV.log(l_module_name,'over_ship_reason_code',p_ship_line.over_ship_reason_code(i));
5824: WSH_DEBUG_SV.log(l_module_name,'ato_line_id',p_ship_line.ato_line_id(i));
5825: WSH_DEBUG_SV.log(l_module_name,'ship_set_id',p_ship_line.ship_set_id(i));
5826: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5827: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',p_ship_line.inventory_item_id(i));
5828: WSH_DEBUG_SV.log(l_module_name,'ship_from_org_id',p_ship_line.ship_from_org_id(i));
5829: WSH_DEBUG_SV.log(l_module_name,'line_set_id',p_ship_line.line_set_id(i));
5830: WSH_DEBUG_SV.log(l_module_name,'smc_flag',p_ship_line.smc_flag(i));
5831: WSH_DEBUG_SV.log(l_module_name,'over_ship_reason_code',p_ship_line.over_ship_reason_code(i));
5832: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_ship_line.requested_quantity(i));
5825: WSH_DEBUG_SV.log(l_module_name,'ship_set_id',p_ship_line.ship_set_id(i));
5826: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5827: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',p_ship_line.inventory_item_id(i));
5828: WSH_DEBUG_SV.log(l_module_name,'ship_from_org_id',p_ship_line.ship_from_org_id(i));
5829: WSH_DEBUG_SV.log(l_module_name,'line_set_id',p_ship_line.line_set_id(i));
5830: WSH_DEBUG_SV.log(l_module_name,'smc_flag',p_ship_line.smc_flag(i));
5831: WSH_DEBUG_SV.log(l_module_name,'over_ship_reason_code',p_ship_line.over_ship_reason_code(i));
5832: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_ship_line.requested_quantity(i));
5833: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',p_ship_line.requested_quantity2(i));
5826: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5827: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',p_ship_line.inventory_item_id(i));
5828: WSH_DEBUG_SV.log(l_module_name,'ship_from_org_id',p_ship_line.ship_from_org_id(i));
5829: WSH_DEBUG_SV.log(l_module_name,'line_set_id',p_ship_line.line_set_id(i));
5830: WSH_DEBUG_SV.log(l_module_name,'smc_flag',p_ship_line.smc_flag(i));
5831: WSH_DEBUG_SV.log(l_module_name,'over_ship_reason_code',p_ship_line.over_ship_reason_code(i));
5832: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_ship_line.requested_quantity(i));
5833: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',p_ship_line.requested_quantity2(i));
5834: WSH_DEBUG_SV.log(l_module_name,'pending_quantity',p_ship_line.pending_quantity(i));
5827: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',p_ship_line.inventory_item_id(i));
5828: WSH_DEBUG_SV.log(l_module_name,'ship_from_org_id',p_ship_line.ship_from_org_id(i));
5829: WSH_DEBUG_SV.log(l_module_name,'line_set_id',p_ship_line.line_set_id(i));
5830: WSH_DEBUG_SV.log(l_module_name,'smc_flag',p_ship_line.smc_flag(i));
5831: WSH_DEBUG_SV.log(l_module_name,'over_ship_reason_code',p_ship_line.over_ship_reason_code(i));
5832: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_ship_line.requested_quantity(i));
5833: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',p_ship_line.requested_quantity2(i));
5834: WSH_DEBUG_SV.log(l_module_name,'pending_quantity',p_ship_line.pending_quantity(i));
5835: WSH_DEBUG_SV.log(l_module_name,'pending_quantity2',p_ship_line.pending_quantity2(i));
5828: WSH_DEBUG_SV.log(l_module_name,'ship_from_org_id',p_ship_line.ship_from_org_id(i));
5829: WSH_DEBUG_SV.log(l_module_name,'line_set_id',p_ship_line.line_set_id(i));
5830: WSH_DEBUG_SV.log(l_module_name,'smc_flag',p_ship_line.smc_flag(i));
5831: WSH_DEBUG_SV.log(l_module_name,'over_ship_reason_code',p_ship_line.over_ship_reason_code(i));
5832: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_ship_line.requested_quantity(i));
5833: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',p_ship_line.requested_quantity2(i));
5834: WSH_DEBUG_SV.log(l_module_name,'pending_quantity',p_ship_line.pending_quantity(i));
5835: WSH_DEBUG_SV.log(l_module_name,'pending_quantity2',p_ship_line.pending_quantity2(i));
5836: WSH_DEBUG_SV.log(l_module_name,'pending_requested_flag',p_ship_line.pending_requested_flag(i));
5829: WSH_DEBUG_SV.log(l_module_name,'line_set_id',p_ship_line.line_set_id(i));
5830: WSH_DEBUG_SV.log(l_module_name,'smc_flag',p_ship_line.smc_flag(i));
5831: WSH_DEBUG_SV.log(l_module_name,'over_ship_reason_code',p_ship_line.over_ship_reason_code(i));
5832: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_ship_line.requested_quantity(i));
5833: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',p_ship_line.requested_quantity2(i));
5834: WSH_DEBUG_SV.log(l_module_name,'pending_quantity',p_ship_line.pending_quantity(i));
5835: WSH_DEBUG_SV.log(l_module_name,'pending_quantity2',p_ship_line.pending_quantity2(i));
5836: WSH_DEBUG_SV.log(l_module_name,'pending_requested_flag',p_ship_line.pending_requested_flag(i));
5837: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',p_ship_line.order_quantity_uom(i));
5830: WSH_DEBUG_SV.log(l_module_name,'smc_flag',p_ship_line.smc_flag(i));
5831: WSH_DEBUG_SV.log(l_module_name,'over_ship_reason_code',p_ship_line.over_ship_reason_code(i));
5832: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_ship_line.requested_quantity(i));
5833: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',p_ship_line.requested_quantity2(i));
5834: WSH_DEBUG_SV.log(l_module_name,'pending_quantity',p_ship_line.pending_quantity(i));
5835: WSH_DEBUG_SV.log(l_module_name,'pending_quantity2',p_ship_line.pending_quantity2(i));
5836: WSH_DEBUG_SV.log(l_module_name,'pending_requested_flag',p_ship_line.pending_requested_flag(i));
5837: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',p_ship_line.order_quantity_uom(i));
5838: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',p_ship_line.order_quantity_uom2(i));
5831: WSH_DEBUG_SV.log(l_module_name,'over_ship_reason_code',p_ship_line.over_ship_reason_code(i));
5832: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_ship_line.requested_quantity(i));
5833: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',p_ship_line.requested_quantity2(i));
5834: WSH_DEBUG_SV.log(l_module_name,'pending_quantity',p_ship_line.pending_quantity(i));
5835: WSH_DEBUG_SV.log(l_module_name,'pending_quantity2',p_ship_line.pending_quantity2(i));
5836: WSH_DEBUG_SV.log(l_module_name,'pending_requested_flag',p_ship_line.pending_requested_flag(i));
5837: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',p_ship_line.order_quantity_uom(i));
5838: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',p_ship_line.order_quantity_uom2(i));
5839: WSH_DEBUG_SV.log(l_module_name,'model_remnant_flag',p_ship_line.model_remnant_flag(i));
5832: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_ship_line.requested_quantity(i));
5833: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',p_ship_line.requested_quantity2(i));
5834: WSH_DEBUG_SV.log(l_module_name,'pending_quantity',p_ship_line.pending_quantity(i));
5835: WSH_DEBUG_SV.log(l_module_name,'pending_quantity2',p_ship_line.pending_quantity2(i));
5836: WSH_DEBUG_SV.log(l_module_name,'pending_requested_flag',p_ship_line.pending_requested_flag(i));
5837: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',p_ship_line.order_quantity_uom(i));
5838: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',p_ship_line.order_quantity_uom2(i));
5839: WSH_DEBUG_SV.log(l_module_name,'model_remnant_flag',p_ship_line.model_remnant_flag(i));
5840: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',p_ship_line.ordered_quantity(i));
5833: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',p_ship_line.requested_quantity2(i));
5834: WSH_DEBUG_SV.log(l_module_name,'pending_quantity',p_ship_line.pending_quantity(i));
5835: WSH_DEBUG_SV.log(l_module_name,'pending_quantity2',p_ship_line.pending_quantity2(i));
5836: WSH_DEBUG_SV.log(l_module_name,'pending_requested_flag',p_ship_line.pending_requested_flag(i));
5837: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',p_ship_line.order_quantity_uom(i));
5838: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',p_ship_line.order_quantity_uom2(i));
5839: WSH_DEBUG_SV.log(l_module_name,'model_remnant_flag',p_ship_line.model_remnant_flag(i));
5840: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',p_ship_line.ordered_quantity(i));
5841: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',p_ship_line.ordered_quantity2(i));
5834: WSH_DEBUG_SV.log(l_module_name,'pending_quantity',p_ship_line.pending_quantity(i));
5835: WSH_DEBUG_SV.log(l_module_name,'pending_quantity2',p_ship_line.pending_quantity2(i));
5836: WSH_DEBUG_SV.log(l_module_name,'pending_requested_flag',p_ship_line.pending_requested_flag(i));
5837: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',p_ship_line.order_quantity_uom(i));
5838: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',p_ship_line.order_quantity_uom2(i));
5839: WSH_DEBUG_SV.log(l_module_name,'model_remnant_flag',p_ship_line.model_remnant_flag(i));
5840: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',p_ship_line.ordered_quantity(i));
5841: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',p_ship_line.ordered_quantity2(i));
5842: WSH_DEBUG_SV.log(l_module_name,'item_type_code',p_ship_line.item_type_code(i));
5835: WSH_DEBUG_SV.log(l_module_name,'pending_quantity2',p_ship_line.pending_quantity2(i));
5836: WSH_DEBUG_SV.log(l_module_name,'pending_requested_flag',p_ship_line.pending_requested_flag(i));
5837: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',p_ship_line.order_quantity_uom(i));
5838: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',p_ship_line.order_quantity_uom2(i));
5839: WSH_DEBUG_SV.log(l_module_name,'model_remnant_flag',p_ship_line.model_remnant_flag(i));
5840: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',p_ship_line.ordered_quantity(i));
5841: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',p_ship_line.ordered_quantity2(i));
5842: WSH_DEBUG_SV.log(l_module_name,'item_type_code',p_ship_line.item_type_code(i));
5843: WSH_DEBUG_SV.log(l_module_name,'calculate_price_flag',p_ship_line.calculate_price_flag(i));
5836: WSH_DEBUG_SV.log(l_module_name,'pending_requested_flag',p_ship_line.pending_requested_flag(i));
5837: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',p_ship_line.order_quantity_uom(i));
5838: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',p_ship_line.order_quantity_uom2(i));
5839: WSH_DEBUG_SV.log(l_module_name,'model_remnant_flag',p_ship_line.model_remnant_flag(i));
5840: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',p_ship_line.ordered_quantity(i));
5841: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',p_ship_line.ordered_quantity2(i));
5842: WSH_DEBUG_SV.log(l_module_name,'item_type_code',p_ship_line.item_type_code(i));
5843: WSH_DEBUG_SV.log(l_module_name,'calculate_price_flag',p_ship_line.calculate_price_flag(i));
5844:
5837: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',p_ship_line.order_quantity_uom(i));
5838: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',p_ship_line.order_quantity_uom2(i));
5839: WSH_DEBUG_SV.log(l_module_name,'model_remnant_flag',p_ship_line.model_remnant_flag(i));
5840: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',p_ship_line.ordered_quantity(i));
5841: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',p_ship_line.ordered_quantity2(i));
5842: WSH_DEBUG_SV.log(l_module_name,'item_type_code',p_ship_line.item_type_code(i));
5843: WSH_DEBUG_SV.log(l_module_name,'calculate_price_flag',p_ship_line.calculate_price_flag(i));
5844:
5845: END LOOP;
5838: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',p_ship_line.order_quantity_uom2(i));
5839: WSH_DEBUG_SV.log(l_module_name,'model_remnant_flag',p_ship_line.model_remnant_flag(i));
5840: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',p_ship_line.ordered_quantity(i));
5841: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',p_ship_line.ordered_quantity2(i));
5842: WSH_DEBUG_SV.log(l_module_name,'item_type_code',p_ship_line.item_type_code(i));
5843: WSH_DEBUG_SV.log(l_module_name,'calculate_price_flag',p_ship_line.calculate_price_flag(i));
5844:
5845: END LOOP;
5846:
5839: WSH_DEBUG_SV.log(l_module_name,'model_remnant_flag',p_ship_line.model_remnant_flag(i));
5840: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',p_ship_line.ordered_quantity(i));
5841: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',p_ship_line.ordered_quantity2(i));
5842: WSH_DEBUG_SV.log(l_module_name,'item_type_code',p_ship_line.item_type_code(i));
5843: WSH_DEBUG_SV.log(l_module_name,'calculate_price_flag',p_ship_line.calculate_price_flag(i));
5844:
5845: END LOOP;
5846:
5847: ELSE
5846:
5847: ELSE
5848: FOR i IN l_start_index..l_end_index LOOP
5849:
5850: WSH_DEBUG_SV.logmsg(l_module_name,'#########BULK##############');
5851: WSH_DEBUG_SV.log(l_module_name,'Index',i);
5852: WSH_DEBUG_SV.log(l_module_name,'header_id',p_ship_line.header_id(i));
5853: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5854: WSH_DEBUG_SV.log(l_module_name,'top Model line_id',p_ship_line.top_model_line_id(i));
5847: ELSE
5848: FOR i IN l_start_index..l_end_index LOOP
5849:
5850: WSH_DEBUG_SV.logmsg(l_module_name,'#########BULK##############');
5851: WSH_DEBUG_SV.log(l_module_name,'Index',i);
5852: WSH_DEBUG_SV.log(l_module_name,'header_id',p_ship_line.header_id(i));
5853: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5854: WSH_DEBUG_SV.log(l_module_name,'top Model line_id',p_ship_line.top_model_line_id(i));
5855: WSH_DEBUG_SV.log(l_module_name,'ship set line_id',p_ship_line.ship_set_id(i));
5848: FOR i IN l_start_index..l_end_index LOOP
5849:
5850: WSH_DEBUG_SV.logmsg(l_module_name,'#########BULK##############');
5851: WSH_DEBUG_SV.log(l_module_name,'Index',i);
5852: WSH_DEBUG_SV.log(l_module_name,'header_id',p_ship_line.header_id(i));
5853: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5854: WSH_DEBUG_SV.log(l_module_name,'top Model line_id',p_ship_line.top_model_line_id(i));
5855: WSH_DEBUG_SV.log(l_module_name,'ship set line_id',p_ship_line.ship_set_id(i));
5856: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5849:
5850: WSH_DEBUG_SV.logmsg(l_module_name,'#########BULK##############');
5851: WSH_DEBUG_SV.log(l_module_name,'Index',i);
5852: WSH_DEBUG_SV.log(l_module_name,'header_id',p_ship_line.header_id(i));
5853: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5854: WSH_DEBUG_SV.log(l_module_name,'top Model line_id',p_ship_line.top_model_line_id(i));
5855: WSH_DEBUG_SV.log(l_module_name,'ship set line_id',p_ship_line.ship_set_id(i));
5856: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5857: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5850: WSH_DEBUG_SV.logmsg(l_module_name,'#########BULK##############');
5851: WSH_DEBUG_SV.log(l_module_name,'Index',i);
5852: WSH_DEBUG_SV.log(l_module_name,'header_id',p_ship_line.header_id(i));
5853: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5854: WSH_DEBUG_SV.log(l_module_name,'top Model line_id',p_ship_line.top_model_line_id(i));
5855: WSH_DEBUG_SV.log(l_module_name,'ship set line_id',p_ship_line.ship_set_id(i));
5856: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5857: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5858: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5851: WSH_DEBUG_SV.log(l_module_name,'Index',i);
5852: WSH_DEBUG_SV.log(l_module_name,'header_id',p_ship_line.header_id(i));
5853: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5854: WSH_DEBUG_SV.log(l_module_name,'top Model line_id',p_ship_line.top_model_line_id(i));
5855: WSH_DEBUG_SV.log(l_module_name,'ship set line_id',p_ship_line.ship_set_id(i));
5856: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5857: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5858: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5859: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5852: WSH_DEBUG_SV.log(l_module_name,'header_id',p_ship_line.header_id(i));
5853: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5854: WSH_DEBUG_SV.log(l_module_name,'top Model line_id',p_ship_line.top_model_line_id(i));
5855: WSH_DEBUG_SV.log(l_module_name,'ship set line_id',p_ship_line.ship_set_id(i));
5856: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5857: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5858: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5859: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5860: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5853: WSH_DEBUG_SV.log(l_module_name,'line_id',p_ship_line.line_id(i));
5854: WSH_DEBUG_SV.log(l_module_name,'top Model line_id',p_ship_line.top_model_line_id(i));
5855: WSH_DEBUG_SV.log(l_module_name,'ship set line_id',p_ship_line.ship_set_id(i));
5856: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5857: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5858: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5859: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5860: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5861: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5854: WSH_DEBUG_SV.log(l_module_name,'top Model line_id',p_ship_line.top_model_line_id(i));
5855: WSH_DEBUG_SV.log(l_module_name,'ship set line_id',p_ship_line.ship_set_id(i));
5856: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5857: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5858: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5859: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5860: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5861: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5862: WSH_DEBUG_SV.log(l_module_name,'flow_status_code',p_ship_line.flow_status_code(i));
5855: WSH_DEBUG_SV.log(l_module_name,'ship set line_id',p_ship_line.ship_set_id(i));
5856: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5857: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5858: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5859: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5860: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5861: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5862: WSH_DEBUG_SV.log(l_module_name,'flow_status_code',p_ship_line.flow_status_code(i));
5863: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',p_ship_line.ordered_quantity(i));
5856: WSH_DEBUG_SV.log(l_module_name,'arrival_set_id',p_ship_line.arrival_set_id(i));
5857: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5858: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5859: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5860: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5861: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5862: WSH_DEBUG_SV.log(l_module_name,'flow_status_code',p_ship_line.flow_status_code(i));
5863: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',p_ship_line.ordered_quantity(i));
5864: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',p_ship_line.ordered_quantity2(i));
5857: WSH_DEBUG_SV.log(l_module_name,'actual_shipment_date',p_ship_line.actual_shipment_date(i));
5858: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5859: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5860: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5861: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5862: WSH_DEBUG_SV.log(l_module_name,'flow_status_code',p_ship_line.flow_status_code(i));
5863: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',p_ship_line.ordered_quantity(i));
5864: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',p_ship_line.ordered_quantity2(i));
5865: END LOOP;
5858: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',p_ship_line.shipping_quantity(i));
5859: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5860: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5861: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5862: WSH_DEBUG_SV.log(l_module_name,'flow_status_code',p_ship_line.flow_status_code(i));
5863: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',p_ship_line.ordered_quantity(i));
5864: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',p_ship_line.ordered_quantity2(i));
5865: END LOOP;
5866: END IF;
5859: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',p_ship_line.shipping_quantity_uom(i));
5860: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5861: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5862: WSH_DEBUG_SV.log(l_module_name,'flow_status_code',p_ship_line.flow_status_code(i));
5863: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',p_ship_line.ordered_quantity(i));
5864: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',p_ship_line.ordered_quantity2(i));
5865: END LOOP;
5866: END IF;
5867:
5860: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',p_ship_line.shipping_quantity2(i));
5861: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',p_ship_line.shipping_quantity_uom2(i));
5862: WSH_DEBUG_SV.log(l_module_name,'flow_status_code',p_ship_line.flow_status_code(i));
5863: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',p_ship_line.ordered_quantity(i));
5864: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',p_ship_line.ordered_quantity2(i));
5865: END LOOP;
5866: END IF;
5867:
5868: WSH_DEBUG_SV.pop(l_module_name);
5864: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',p_ship_line.ordered_quantity2(i));
5865: END LOOP;
5866: END IF;
5867:
5868: WSH_DEBUG_SV.pop(l_module_name);
5869: END IF;
5870:
5871: EXCEPTION
5872: WHEN others THEN
5871: EXCEPTION
5872: WHEN others THEN
5873:
5874: IF l_debug_on THEN
5875: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5876: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5877: END IF;
5878: END print_ship_line;
5879:
5872: WHEN others THEN
5873:
5874: IF l_debug_on THEN
5875: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5876: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5877: END IF;
5878: END print_ship_line;
5879:
5880:
5992: --hadcp
5993: BEGIN
5994: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5995: IF l_debug_on IS NULL THEN
5996: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5997: END IF;
5998:
5999: IF l_debug_on THEN
6000: WSH_DEBUG_SV.push(l_module_name);
5996: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5997: END IF;
5998:
5999: IF l_debug_on THEN
6000: WSH_DEBUG_SV.push(l_module_name);
6001: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
6002: WSH_DEBUG_SV.log(l_module_name,'p_bulk_mode',p_bulk_mode);
6003: WSH_DEBUG_SV.log(l_module_name,'p_org_id',p_org_id);
6004: WSH_DEBUG_SV.log(l_module_name,'p_bulk_ship_line.count',p_bulk_ship_line.line_id.count);
5997: END IF;
5998:
5999: IF l_debug_on THEN
6000: WSH_DEBUG_SV.push(l_module_name);
6001: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
6002: WSH_DEBUG_SV.log(l_module_name,'p_bulk_mode',p_bulk_mode);
6003: WSH_DEBUG_SV.log(l_module_name,'p_org_id',p_org_id);
6004: WSH_DEBUG_SV.log(l_module_name,'p_bulk_ship_line.count',p_bulk_ship_line.line_id.count);
6005: WSH_DEBUG_SV.log(l_module_name,'p_bulk_req_line.count',p_bulk_req_line.line_id.count);
5998:
5999: IF l_debug_on THEN
6000: WSH_DEBUG_SV.push(l_module_name);
6001: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
6002: WSH_DEBUG_SV.log(l_module_name,'p_bulk_mode',p_bulk_mode);
6003: WSH_DEBUG_SV.log(l_module_name,'p_org_id',p_org_id);
6004: WSH_DEBUG_SV.log(l_module_name,'p_bulk_ship_line.count',p_bulk_ship_line.line_id.count);
6005: WSH_DEBUG_SV.log(l_module_name,'p_bulk_req_line.count',p_bulk_req_line.line_id.count);
6006: WSH_DEBUG_SV.log(l_module_name,'x_charges_are_calculated',x_charges_are_calculated);
5999: IF l_debug_on THEN
6000: WSH_DEBUG_SV.push(l_module_name);
6001: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
6002: WSH_DEBUG_SV.log(l_module_name,'p_bulk_mode',p_bulk_mode);
6003: WSH_DEBUG_SV.log(l_module_name,'p_org_id',p_org_id);
6004: WSH_DEBUG_SV.log(l_module_name,'p_bulk_ship_line.count',p_bulk_ship_line.line_id.count);
6005: WSH_DEBUG_SV.log(l_module_name,'p_bulk_req_line.count',p_bulk_req_line.line_id.count);
6006: WSH_DEBUG_SV.log(l_module_name,'x_charges_are_calculated',x_charges_are_calculated);
6007: END IF;
6000: WSH_DEBUG_SV.push(l_module_name);
6001: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
6002: WSH_DEBUG_SV.log(l_module_name,'p_bulk_mode',p_bulk_mode);
6003: WSH_DEBUG_SV.log(l_module_name,'p_org_id',p_org_id);
6004: WSH_DEBUG_SV.log(l_module_name,'p_bulk_ship_line.count',p_bulk_ship_line.line_id.count);
6005: WSH_DEBUG_SV.log(l_module_name,'p_bulk_req_line.count',p_bulk_req_line.line_id.count);
6006: WSH_DEBUG_SV.log(l_module_name,'x_charges_are_calculated',x_charges_are_calculated);
6007: END IF;
6008:
6001: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
6002: WSH_DEBUG_SV.log(l_module_name,'p_bulk_mode',p_bulk_mode);
6003: WSH_DEBUG_SV.log(l_module_name,'p_org_id',p_org_id);
6004: WSH_DEBUG_SV.log(l_module_name,'p_bulk_ship_line.count',p_bulk_ship_line.line_id.count);
6005: WSH_DEBUG_SV.log(l_module_name,'p_bulk_req_line.count',p_bulk_req_line.line_id.count);
6006: WSH_DEBUG_SV.log(l_module_name,'x_charges_are_calculated',x_charges_are_calculated);
6007: END IF;
6008:
6009: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6002: WSH_DEBUG_SV.log(l_module_name,'p_bulk_mode',p_bulk_mode);
6003: WSH_DEBUG_SV.log(l_module_name,'p_org_id',p_org_id);
6004: WSH_DEBUG_SV.log(l_module_name,'p_bulk_ship_line.count',p_bulk_ship_line.line_id.count);
6005: WSH_DEBUG_SV.log(l_module_name,'p_bulk_req_line.count',p_bulk_req_line.line_id.count);
6006: WSH_DEBUG_SV.log(l_module_name,'x_charges_are_calculated',x_charges_are_calculated);
6007: END IF;
6008:
6009: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6010:
6013: IF (p_bulk_mode='N') THEN
6014:
6015: l_header_id := p_bulk_ship_line.header_id(p_bulk_ship_line.header_id.FIRST);
6016: IF l_debug_on THEN
6017: WSH_DEBUG_SV.log(l_module_name,'l_header_id',l_header_id);
6018: END IF;
6019:
6020: --R12:MOAC replace call, updated comment
6021: --Set the Policy Context for non bulk
6035:
6036: --hadcp
6037:
6038: IF l_debug_on THEN
6039: WSH_DEBUG_SV.log(l_module_name,'l_bulk_batch_size',l_bulk_batch_size);
6040: WSH_DEBUG_SV.log(l_module_name,'l_dcp_profile',l_dcp_profile);
6041: END IF;
6042:
6043:
6036: --hadcp
6037:
6038: IF l_debug_on THEN
6039: WSH_DEBUG_SV.log(l_module_name,'l_bulk_batch_size',l_bulk_batch_size);
6040: WSH_DEBUG_SV.log(l_module_name,'l_dcp_profile',l_dcp_profile);
6041: END IF;
6042:
6043:
6044: -- Calculate the charges for all the stops in the batch and save it into
6079: x_return_status => l_return_status);
6080:
6081:
6082: IF l_debug_on THEN
6083: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6084: WSH_DEBUG_SV.log(l_module_name,'stop id',l_stop_id);
6085: WSH_DEBUG_SV.log(l_module_name,'l_lines_tab.count',
6086: l_lines_tab.COUNT);
6087: WSH_DEBUG_SV.log(l_module_name,'l_ship_adj_line_all.line_id.count',l_ship_adj_line_all.line_id.count);
6080:
6081:
6082: IF l_debug_on THEN
6083: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6084: WSH_DEBUG_SV.log(l_module_name,'stop id',l_stop_id);
6085: WSH_DEBUG_SV.log(l_module_name,'l_lines_tab.count',
6086: l_lines_tab.COUNT);
6087: WSH_DEBUG_SV.log(l_module_name,'l_ship_adj_line_all.line_id.count',l_ship_adj_line_all.line_id.count);
6088: END IF;
6081:
6082: IF l_debug_on THEN
6083: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6084: WSH_DEBUG_SV.log(l_module_name,'stop id',l_stop_id);
6085: WSH_DEBUG_SV.log(l_module_name,'l_lines_tab.count',
6086: l_lines_tab.COUNT);
6087: WSH_DEBUG_SV.log(l_module_name,'l_ship_adj_line_all.line_id.count',l_ship_adj_line_all.line_id.count);
6088: END IF;
6089:
6083: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6084: WSH_DEBUG_SV.log(l_module_name,'stop id',l_stop_id);
6085: WSH_DEBUG_SV.log(l_module_name,'l_lines_tab.count',
6086: l_lines_tab.COUNT);
6087: WSH_DEBUG_SV.log(l_module_name,'l_ship_adj_line_all.line_id.count',l_ship_adj_line_all.line_id.count);
6088: END IF;
6089:
6090:
6091: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
6109: l_prev_org_id := p_bulk_ship_line.org_id(l_start_index);
6110: --R12:MOAC replace call
6111: MO_GLOBAL.set_policy_context('S', l_prev_org_id);
6112: IF l_debug_on THEN
6113: WSH_DEBUG_SV.log(l_module_name,'setting the org',l_prev_org_id);
6114: END IF;
6115: END IF;
6116:
6117: --hadcp
6118: IF (l_dcp_profile IN (1,2) ) THEN
6119: WSH_DCP_PVT.G_INIT_MSG_COUNT := fnd_msg_pub.count_msg;
6120: END IF;
6121: IF l_debug_on THEN
6122: WSH_DEBUG_SV.log(l_module_name,'Outside Loop WSH_DCP_PVT.G_INIT_MSG_COUNT',WSH_DCP_PVT.G_INIT_MSG_COUNT);
6123: END IF;
6124: --hadcp
6125:
6126: l_line_idx := l_start_index;
6136: IF p_bulk_mode = 'Y' THEN --{
6137: IF l_prev_org_id <> p_bulk_ship_line.org_id(l_line_idx) THEN
6138: l_prev_org_id := p_bulk_ship_line.org_id(l_line_idx);
6139: IF l_debug_on THEN
6140: WSH_DEBUG_SV.log(l_module_name,'l_prev_org_id', l_prev_org_id);
6141: WSH_DEBUG_SV.log(l_module_name,'l_line_idx', l_line_idx);
6142: WSH_DEBUG_SV.log(l_module_name,'l_bulk_count', l_bulk_count);
6143: END IF;
6144: IF l_bulk_count > 0 THEN
6137: IF l_prev_org_id <> p_bulk_ship_line.org_id(l_line_idx) THEN
6138: l_prev_org_id := p_bulk_ship_line.org_id(l_line_idx);
6139: IF l_debug_on THEN
6140: WSH_DEBUG_SV.log(l_module_name,'l_prev_org_id', l_prev_org_id);
6141: WSH_DEBUG_SV.log(l_module_name,'l_line_idx', l_line_idx);
6142: WSH_DEBUG_SV.log(l_module_name,'l_bulk_count', l_bulk_count);
6143: END IF;
6144: IF l_bulk_count > 0 THEN
6145: l_org_change := TRUE;
6138: l_prev_org_id := p_bulk_ship_line.org_id(l_line_idx);
6139: IF l_debug_on THEN
6140: WSH_DEBUG_SV.log(l_module_name,'l_prev_org_id', l_prev_org_id);
6141: WSH_DEBUG_SV.log(l_module_name,'l_line_idx', l_line_idx);
6142: WSH_DEBUG_SV.log(l_module_name,'l_bulk_count', l_bulk_count);
6143: END IF;
6144: IF l_bulk_count > 0 THEN
6145: l_org_change := TRUE;
6146: l_line_idx := p_bulk_ship_line.line_id.PRIOR(l_line_idx);
6168: l_ship_adj_line.arithmetic_operator.extend;
6169: l_ship_adj_line.operation.extend;
6170:
6171: IF l_debug_on THEN
6172: WSH_DEBUG_SV.log(l_module_name,'charge matched', p_bulk_ship_line.line_id(l_line_idx));
6173: END IF;
6174:
6175: l_ship_adj_line.cost_id(l_counter) :=
6176: x_freight_costs.cost_id(l_charge_idx);
6203: --bsadri Find out if the BULK limit is reached or the loop is
6204: -- exhouseted
6205:
6206: IF l_debug_on THEN
6207: WSH_DEBUG_SV.logmsg(l_module_name,'After while Loop');
6208: END IF;
6209: IF l_org_change THEN --{
6210: l_end_index := l_line_idx;
6211: ELSE --}{
6228: l_loop_count := l_loop_count + 1;
6229: l_counter := 1;
6230:
6231: IF l_debug_on THEN
6232: WSH_DEBUG_SV.logmsg(l_module_name,'Establishing save point l_interface_om');
6233: END IF;
6234: Savepoint l_interface_om;
6235:
6236: l_oe_interfaced_flag := 'P';
6261: );
6262:
6263:
6264: IF l_debug_on THEN
6265: WSH_DEBUG_SV.logmsg(l_module_name,'After Forall Update');
6266: WSH_DEBUG_SV.logmsg(l_module_name,'Printing P_ship_line_rec');
6267: print_ship_line(p_bulk_mode,p_bulk_ship_line,l_start_index,l_end_index);
6268: WSH_DEBUG_SV.log(l_module_name,'Calling OE_Ship_Confirmation_Pub.Ship_Confirm_New TIME:',SYSDATE);
6269: END IF;
6262:
6263:
6264: IF l_debug_on THEN
6265: WSH_DEBUG_SV.logmsg(l_module_name,'After Forall Update');
6266: WSH_DEBUG_SV.logmsg(l_module_name,'Printing P_ship_line_rec');
6267: print_ship_line(p_bulk_mode,p_bulk_ship_line,l_start_index,l_end_index);
6268: WSH_DEBUG_SV.log(l_module_name,'Calling OE_Ship_Confirmation_Pub.Ship_Confirm_New TIME:',SYSDATE);
6269: END IF;
6270: OE_Ship_Confirmation_Pub.Ship_Confirm_New(
6264: IF l_debug_on THEN
6265: WSH_DEBUG_SV.logmsg(l_module_name,'After Forall Update');
6266: WSH_DEBUG_SV.logmsg(l_module_name,'Printing P_ship_line_rec');
6267: print_ship_line(p_bulk_mode,p_bulk_ship_line,l_start_index,l_end_index);
6268: WSH_DEBUG_SV.log(l_module_name,'Calling OE_Ship_Confirmation_Pub.Ship_Confirm_New TIME:',SYSDATE);
6269: END IF;
6270: OE_Ship_Confirmation_Pub.Ship_Confirm_New(
6271: P_ship_line_rec => p_bulk_ship_line,
6272: P_requested_line_rec => p_bulk_req_line,
6278: x_msg_data => x_msg_data,
6279: x_return_status => l_return_status);
6280:
6281: IF l_debug_on THEN
6282: WSH_DEBUG_SV.log(l_module_name,'After OE_Shipping_Integration_PUB.Ship_Confirm_New TIME:',SYSDATE);
6283: WSH_DEBUG_SV.log(l_module_name,'l_return_status ',l_return_status);
6284: WSH_DEBUG_SV.logmsg(l_module_name, 'NO. OF OE MESSAGES :'||X_MSG_COUNT );
6285: END IF;
6286:
6279: x_return_status => l_return_status);
6280:
6281: IF l_debug_on THEN
6282: WSH_DEBUG_SV.log(l_module_name,'After OE_Shipping_Integration_PUB.Ship_Confirm_New TIME:',SYSDATE);
6283: WSH_DEBUG_SV.log(l_module_name,'l_return_status ',l_return_status);
6284: WSH_DEBUG_SV.logmsg(l_module_name, 'NO. OF OE MESSAGES :'||X_MSG_COUNT );
6285: END IF;
6286:
6287: WSH_UTIL_CORE.printmsg('no. of OE messages :'||x_msg_count);
6280:
6281: IF l_debug_on THEN
6282: WSH_DEBUG_SV.log(l_module_name,'After OE_Shipping_Integration_PUB.Ship_Confirm_New TIME:',SYSDATE);
6283: WSH_DEBUG_SV.log(l_module_name,'l_return_status ',l_return_status);
6284: WSH_DEBUG_SV.logmsg(l_module_name, 'NO. OF OE MESSAGES :'||X_MSG_COUNT );
6285: END IF;
6286:
6287: WSH_UTIL_CORE.printmsg('no. of OE messages :'||x_msg_count);
6288:
6289: FOR k IN 1 .. nvl(x_msg_count,0)
6290: LOOP
6291: --
6292: IF l_debug_on THEN
6293: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_MSG_PUB.GET',WSH_DEBUG_SV.C_PROC_LEVEL);
6294: END IF;
6295: --
6296: x_msg_data := oe_msg_pub.get( p_msg_index => k,
6297: p_encoded => 'F'
6297: p_encoded => 'F'
6298: );
6299: --
6300: IF l_debug_on THEN
6301: WSH_DEBUG_SV.logmsg(l_module_name, SUBSTR ( X_MSG_DATA , 1 , 255 ) );
6302: END IF;
6303: --
6304: WSH_UTIL_CORE.printmsg('Error msg: '||substr(x_msg_data,1,2000));
6305: END LOOP;
6315:
6316:
6317: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
6318: IF l_debug_on THEN
6319: WSH_DEBUG_SV.logmsg(l_module_name,'SUCCESS');
6320: END IF;
6321:
6322: --Bug 3482227
6323: IF (p_bulk_mode='N') THEN
6382: END IF;
6383:
6384: l_count := SQL%ROWCOUNT;
6385: IF l_debug_on THEN
6386: WSH_DEBUG_SV.log(l_module_name,'No. Success Rec. Update to Y', l_count);
6387: END IF;
6388:
6389: --hadcp
6390: IF (l_dcp_profile IN (1,2) ) THEN
6394: P_end_index => l_end_index,
6395: P_its_rec => p_bulk_ship_line);
6396: END IF;
6397: IF l_debug_on THEN
6398: WSH_DEBUG_SV.logmsg(l_module_name,'No DCP Error');
6399: END IF;
6400:
6401: IF (l_dcp_profile IN (1,2) ) THEN
6402: WSH_DCP_PVT.G_INIT_MSG_COUNT := fnd_msg_pub.count_msg;
6401: IF (l_dcp_profile IN (1,2) ) THEN
6402: WSH_DCP_PVT.G_INIT_MSG_COUNT := fnd_msg_pub.count_msg;
6403: END IF;
6404: IF l_debug_on THEN
6405: WSH_DEBUG_SV.log(l_module_name,'Inside Loop WSH_DCP_PVT.G_INIT_MSG_COUNT',WSH_DCP_PVT.G_INIT_MSG_COUNT);
6406: END IF;
6407: --hadcp
6408:
6409: commit;
6408:
6409: commit;
6410: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
6411: IF l_debug_on THEN
6412: WSH_DEBUG_SV.logmsg(l_module_name,'WARNING');
6413: END IF;
6414: l_warn_count := l_warn_count + 1;
6415: --Bug 3761090
6416: l_container_flag := 'N';
6440:
6441:
6442: l_count := SQL%ROWCOUNT;
6443: IF l_debug_on THEN
6444: WSH_DEBUG_SV.log(l_module_name,'No. Warning Rec. Update',l_count);
6445: END IF;
6446:
6447: --hadcp
6448: IF (l_dcp_profile IN (1,2) ) THEN
6452: P_end_index => l_end_index,
6453: P_its_rec => p_bulk_ship_line);
6454: END IF;
6455: IF l_debug_on THEN
6456: WSH_DEBUG_SV.logmsg(l_module_name,'No DCP Error');
6457: END IF;
6458:
6459: IF (l_dcp_profile IN (1,2) ) THEN
6460: WSH_DCP_PVT.G_INIT_MSG_COUNT := fnd_msg_pub.count_msg;
6459: IF (l_dcp_profile IN (1,2) ) THEN
6460: WSH_DCP_PVT.G_INIT_MSG_COUNT := fnd_msg_pub.count_msg;
6461: END IF;
6462: IF l_debug_on THEN
6463: WSH_DEBUG_SV.log(l_module_name,'Inside Loop WSH_DCP_PVT.G_INIT_MSG_COUNT',WSH_DCP_PVT.G_INIT_MSG_COUNT);
6464: END IF;
6465: --hadcp
6466:
6467: commit;
6466:
6467: commit;
6468: ELSE
6469: IF l_debug_on THEN
6470: WSH_DEBUG_SV.logmsg(l_module_name,'ERROR');
6471: END IF;
6472: l_error_count := l_error_count + 1;
6473:
6474: --hadcp
6475: --Rollback to savepoint l_interface_om;
6476:
6477: IF (p_bulk_mode='Y') THEN
6478: IF l_debug_on THEN
6479: WSH_DEBUG_SV.logmsg(l_module_name,'Rollback to savepoint l_interface_om');
6480: END IF;
6481: ROLLBACK TO l_interface_om;
6482: ELSE
6483: IF l_debug_on THEN
6480: END IF;
6481: ROLLBACK TO l_interface_om;
6482: ELSE
6483: IF l_debug_on THEN
6484: WSH_DEBUG_SV.logmsg(l_module_name,'Rollback to savepoint its_process_order_non_bulk');
6485: END IF;
6486: ROLLBACK TO its_process_order_non_bulk;
6487: END IF;
6488:
6495: p_raise_exception => 'N');
6496:
6497: END IF;
6498: IF l_debug_on THEN
6499: WSH_DEBUG_SV.logmsg(l_module_name,'No DCP Error');
6500: END IF;
6501:
6502: IF (l_dcp_profile IN (1,2) ) THEN
6503: WSH_DCP_PVT.G_INIT_MSG_COUNT := fnd_msg_pub.count_msg;
6502: IF (l_dcp_profile IN (1,2) ) THEN
6503: WSH_DCP_PVT.G_INIT_MSG_COUNT := fnd_msg_pub.count_msg;
6504: END IF;
6505: IF l_debug_on THEN
6506: WSH_DEBUG_SV.log(l_module_name,'Inside Loop WSH_DCP_PVT.G_INIT_MSG_COUNT',WSH_DCP_PVT.G_INIT_MSG_COUNT);
6507: END IF;
6508: --hadcp
6509: END IF;
6510: l_start_index := l_end_index + 1;
6509: END IF;
6510: l_start_index := l_end_index + 1;
6511:
6512: IF l_debug_on THEN
6513: WSH_DEBUG_SV.log(l_module_name,'before deleting tables', l_start_index);
6514: END IF;
6515: l_bulk_count := 0;
6516: l_ship_adj_line.cost_id.DELETE;
6517: l_ship_adj_line.automatic_flag.DELETE;
6526:
6527: EXCEPTION
6528: WHEN e_next_record THEN
6529: IF l_debug_on THEN
6530: WSH_DEBUG_SV.logmsg(l_module_name,'Exception e_next_record');
6531: END IF;
6532:
6533: NULL;
6534: END ; --}
6533: NULL;
6534: END ; --}
6535:
6536: IF l_debug_on THEN
6537: WSH_DEBUG_SV.log(l_module_name,'current index',l_line_idx);
6538: END IF;
6539:
6540: l_line_idx := p_bulk_ship_line.line_id.NEXT(l_line_idx);
6541:
6539:
6540: l_line_idx := p_bulk_ship_line.line_id.NEXT(l_line_idx);
6541:
6542: IF l_debug_on THEN
6543: WSH_DEBUG_SV.log(l_module_name,'next index',l_line_idx);
6544: END IF;
6545:
6546: IF l_org_change THEN --{
6547: --R12:MOAC replace call
6546: IF l_org_change THEN --{
6547: --R12:MOAC replace call
6548: MO_GLOBAL.set_policy_context('S', l_prev_org_id);
6549: IF l_debug_on THEN
6550: WSH_DEBUG_SV.log(l_module_name,'setting the org', l_prev_org_id);
6551: WSH_DEBUG_SV.log(l_module_name,'l_line_idx', l_line_idx);
6552: WSH_DEBUG_SV.log(l_module_name,'l_bulk_count', l_bulk_count);
6553: END IF;
6554: END IF; --}
6547: --R12:MOAC replace call
6548: MO_GLOBAL.set_policy_context('S', l_prev_org_id);
6549: IF l_debug_on THEN
6550: WSH_DEBUG_SV.log(l_module_name,'setting the org', l_prev_org_id);
6551: WSH_DEBUG_SV.log(l_module_name,'l_line_idx', l_line_idx);
6552: WSH_DEBUG_SV.log(l_module_name,'l_bulk_count', l_bulk_count);
6553: END IF;
6554: END IF; --}
6555:
6548: MO_GLOBAL.set_policy_context('S', l_prev_org_id);
6549: IF l_debug_on THEN
6550: WSH_DEBUG_SV.log(l_module_name,'setting the org', l_prev_org_id);
6551: WSH_DEBUG_SV.log(l_module_name,'l_line_idx', l_line_idx);
6552: WSH_DEBUG_SV.log(l_module_name,'l_bulk_count', l_bulk_count);
6553: END IF;
6554: END IF; --}
6555:
6556: --hadcp
6556: --hadcp
6557: EXCEPTION
6558: WHEN WSH_DCP_PVT.data_inconsistency_exception THEN
6559: IF NOT l_debug_on OR l_debug_on is null THEN
6560: l_debug_on := wsh_debug_sv.is_debug_enabled;
6561: END IF;
6562:
6563: IF l_debug_on THEN
6564: WSH_DEBUG_SV.logmsg(l_module_name,'DCP Exception');
6560: l_debug_on := wsh_debug_sv.is_debug_enabled;
6561: END IF;
6562:
6563: IF l_debug_on THEN
6564: WSH_DEBUG_SV.logmsg(l_module_name,'DCP Exception');
6565: END IF;
6566:
6567: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_WARNING, WSH_UTIL_CORE.G_RET_STS_SUCCESS)) THEN
6568: IF l_debug_on THEN
6565: END IF;
6566:
6567: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_WARNING, WSH_UTIL_CORE.G_RET_STS_SUCCESS)) THEN
6568: IF l_debug_on THEN
6569: WSH_DEBUG_SV.logmsg(l_module_name,'DCP Rollback');
6570: END IF;
6571:
6572: IF l_debug_on THEN
6573: WSH_DEBUG_SV.logmsg(l_module_name,'Rollback to savepoint l_interface_om');
6569: WSH_DEBUG_SV.logmsg(l_module_name,'DCP Rollback');
6570: END IF;
6571:
6572: IF l_debug_on THEN
6573: WSH_DEBUG_SV.logmsg(l_module_name,'Rollback to savepoint l_interface_om');
6574: END IF;
6575: ROLLBACK TO l_interface_om;
6576:
6577: END IF;
6578:
6579: l_line_idx := l_start_index;
6580:
6581: IF l_debug_on THEN
6582: WSH_DEBUG_SV.log(l_module_name,'DCP before deleting tables', l_start_index);
6583: END IF;
6584: l_bulk_count := 0;
6585: l_ship_adj_line.cost_id.DELETE;
6586: l_ship_adj_line.automatic_flag.DELETE;
6598: END LOOP; --}
6599:
6600:
6601: IF l_debug_on THEN
6602: WSH_DEBUG_SV.log(l_module_name,'l_loop_count',l_loop_count);
6603: WSH_DEBUG_SV.log(l_module_name,'l_error_count',l_error_count);
6604: WSH_DEBUG_SV.log(l_module_name,'l_warn_count',l_warn_count);
6605: END IF;
6606:
6599:
6600:
6601: IF l_debug_on THEN
6602: WSH_DEBUG_SV.log(l_module_name,'l_loop_count',l_loop_count);
6603: WSH_DEBUG_SV.log(l_module_name,'l_error_count',l_error_count);
6604: WSH_DEBUG_SV.log(l_module_name,'l_warn_count',l_warn_count);
6605: END IF;
6606:
6607: IF (l_error_count = l_loop_count ) THEN
6600:
6601: IF l_debug_on THEN
6602: WSH_DEBUG_SV.log(l_module_name,'l_loop_count',l_loop_count);
6603: WSH_DEBUG_SV.log(l_module_name,'l_error_count',l_error_count);
6604: WSH_DEBUG_SV.log(l_module_name,'l_warn_count',l_warn_count);
6605: END IF;
6606:
6607: IF (l_error_count = l_loop_count ) THEN
6608: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6606:
6607: IF (l_error_count = l_loop_count ) THEN
6608: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6609: IF l_debug_on THEN
6610: WSH_DEBUG_SV.logmsg(l_module_name,'Process Order Error', WSH_DEBUG_SV.C_EXCEP_LEVEL);
6611: END IF;
6612:
6613: --hadcp
6614: IF (p_bulk_mode='N') THEN
6612:
6613: --hadcp
6614: IF (p_bulk_mode='N') THEN
6615: IF l_debug_on THEN
6616: WSH_DEBUG_SV.logmsg(l_module_name,'Rollback to savepoint its_process_order_non_bulk');
6617: END IF;
6618: ROLLBACK TO its_process_order_non_bulk;
6619: END IF;
6620: --hadcp
6621:
6622: ELSIF (l_warn_count > 0 OR (l_error_count > 0 and l_error_count < l_loop_count) ) THEN
6623: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6624: IF l_debug_on THEN
6625: WSH_DEBUG_SV.logmsg(l_module_name,'Process Order Warning'||WSH_DEBUG_SV.C_EXCEP_LEVEL);
6626: END IF;
6627: END IF;
6628:
6629: IF l_debug_on THEN
6626: END IF;
6627: END IF;
6628:
6629: IF l_debug_on THEN
6630: WSH_DEBUG_SV.pop(l_module_name);
6631: END IF;
6632:
6633: EXCEPTION
6634: WHEN process_freight_costs_failed THEN
6635: WSH_UTIL_CORE.PrintMsg('process_freight_costs_failed');
6636: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6637:
6638: IF l_debug_on THEN
6639: WSH_DEBUG_SV.logmsg(l_module_name,'PROCESS_FREIGHT_COSTS_FAILED exception has occured.',
6640: WSH_DEBUG_SV.C_EXCEP_LEVEL);
6641: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:PROCESS_FREIGHT_COSTS_FAILED');
6642: END IF;
6643:
6636: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6637:
6638: IF l_debug_on THEN
6639: WSH_DEBUG_SV.logmsg(l_module_name,'PROCESS_FREIGHT_COSTS_FAILED exception has occured.',
6640: WSH_DEBUG_SV.C_EXCEP_LEVEL);
6641: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:PROCESS_FREIGHT_COSTS_FAILED');
6642: END IF;
6643:
6644: --Rollback to savepoint l_interface_om;
6637:
6638: IF l_debug_on THEN
6639: WSH_DEBUG_SV.logmsg(l_module_name,'PROCESS_FREIGHT_COSTS_FAILED exception has occured.',
6640: WSH_DEBUG_SV.C_EXCEP_LEVEL);
6641: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:PROCESS_FREIGHT_COSTS_FAILED');
6642: END IF;
6643:
6644: --Rollback to savepoint l_interface_om;
6645:
6645:
6646: --hadcp
6647: IF (p_bulk_mode='N') THEN
6648: IF l_debug_on THEN
6649: WSH_DEBUG_SV.logmsg(l_module_name,'Rollback to savepoint its_process_order_non_bulk');
6650: END IF;
6651: ROLLBACK TO its_process_order_non_bulk;
6652: END IF;
6653: --hadcp
6658: wsh_util_core.printMsg('API Process_Stop_To_OM failed with an unexpected error');
6659: WSH_UTIL_CORE.PrintMsg('The unexpected error is ' || sqlerrm);
6660:
6661: IF l_debug_on THEN
6662: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN Process_Stop_To_OM' );
6663: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6664: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6665: END IF;
6666:
6659: WSH_UTIL_CORE.PrintMsg('The unexpected error is ' || sqlerrm);
6660:
6661: IF l_debug_on THEN
6662: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN Process_Stop_To_OM' );
6663: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6664: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6665: END IF;
6666:
6667: --hadcp
6660:
6661: IF l_debug_on THEN
6662: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN Process_Stop_To_OM' );
6663: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6664: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6665: END IF;
6666:
6667: --hadcp
6668: IF (p_bulk_mode='Y') THEN
6666:
6667: --hadcp
6668: IF (p_bulk_mode='Y') THEN
6669: IF l_debug_on THEN
6670: WSH_DEBUG_SV.logmsg(l_module_name,'Rollback to savepoint l_interface_om');
6671: END IF;
6672: Rollback to savepoint l_interface_om;
6673: ELSE
6674: IF l_debug_on THEN
6671: END IF;
6672: Rollback to savepoint l_interface_om;
6673: ELSE
6674: IF l_debug_on THEN
6675: WSH_DEBUG_SV.logmsg(l_module_name,'Rollback to savepoint its_process_order_non_bulk');
6676: END IF;
6677: ROLLBACK TO its_process_order_non_bulk;
6678: END IF;
6679: --hadcp
6701:
6702: BEGIN
6703: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6704: IF l_debug_on IS NULL THEN
6705: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6706: END IF;
6707:
6708: IF l_debug_on THEN
6709: WSH_DEBUG_SV.push(l_module_name);
6705: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6706: END IF;
6707:
6708: IF l_debug_on THEN
6709: WSH_DEBUG_SV.push(l_module_name);
6710: WSH_DEBUG_SV.log(l_module_name,'p_ship_line.fulfilled_flag.count', p_ship_line.fulfilled_flag.count);
6711: END IF;
6712:
6713: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6706: END IF;
6707:
6708: IF l_debug_on THEN
6709: WSH_DEBUG_SV.push(l_module_name);
6710: WSH_DEBUG_SV.log(l_module_name,'p_ship_line.fulfilled_flag.count', p_ship_line.fulfilled_flag.count);
6711: END IF;
6712:
6713: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6714:
6745: p_ship_line.calculate_price_flag.extend;
6746:
6747:
6748: IF l_debug_on THEN
6749: WSH_DEBUG_SV.pop(l_module_name);
6750: END IF;
6751:
6752: EXCEPTION
6753: WHEN others THEN
6753: WHEN others THEN
6754: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6755:
6756: IF l_debug_on THEN
6757: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6758: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6759: END IF;
6760: END extend_om_ship_line;
6761:
6754: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6755:
6756: IF l_debug_on THEN
6757: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6758: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6759: END IF;
6760: END extend_om_ship_line;
6761:
6762:
7236: BEGIN
7237: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7238: --
7239: IF l_debug_on IS NULL THEN
7240: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7241: END IF;
7242: --
7243: IF l_debug_on THEN
7244: WSH_DEBUG_SV.push(l_module_name);
7240: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7241: END IF;
7242: --
7243: IF l_debug_on THEN
7244: WSH_DEBUG_SV.push(l_module_name);
7245: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
7246: END IF;
7247:
7248: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7241: END IF;
7242: --
7243: IF l_debug_on THEN
7244: WSH_DEBUG_SV.push(l_module_name);
7245: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
7246: END IF;
7247:
7248: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7249:
7257: FETCH check_bulk_csr INTO l_check_bulk;
7258: CLOSE check_bulk_csr;
7259:
7260: IF l_debug_on THEN
7261: WSH_DEBUG_SV.log(l_module_name,'l_check_bulk',l_check_bulk);
7262: END IF;
7263:
7264:
7265: IF (nvl(l_check_bulk,'%%') <> 'X' ) THEN --{
7263:
7264:
7265: IF (nvl(l_check_bulk,'%%') <> 'X' ) THEN --{
7266: IF l_debug_on THEN
7267: WSH_DEBUG_SV.logmsg(l_module_name,'All lines are bulk enabled');
7268: END IF;
7269:
7270: OPEN c_oe_interface_bulk(p_batch_id);
7271: FETCH c_oe_interface_bulk BULK COLLECT
7286:
7287: l_bulk_count := c_oe_interface_bulk%ROWCOUNT;
7288: CLOSE c_oe_interface_bulk;
7289: IF l_debug_on THEN
7290: WSH_DEBUG_SV.log(l_module_name,'Rows insert into l_bulk_ship_line',l_bulk_count);
7291: END IF;
7292:
7293: ELSE --} {
7294: IF l_debug_on THEN
7291: END IF;
7292:
7293: ELSE --} {
7294: IF l_debug_on THEN
7295: WSH_DEBUG_SV.logmsg(l_module_name,'All lines are NOT bulk enable');
7296: END IF;
7297:
7298: OPEN c_oe_interface(p_batch_id);
7299: LOOP
7312: END IF;
7313: */
7314: -- End of comment for bug 5961591
7315: IF l_debug_on THEN
7316: WSH_DEBUG_SV.logmsg(l_module_name, 'INTERFACE SOURCE_LINE_ID= '||OE_INTERFACE_REC.SOURCE_LINE_ID);
7317: END IF;
7318:
7319:
7320: IF ((nvl(oe_interface_rec.ship_tolerance_above,0) > 0) OR -- {
7321: (nvl(oe_interface_rec.ship_tolerance_below,0) > 0)) THEN
7322:
7323: IF (oe_interface_rec.source_line_set_id is not null) THEN --{
7324: IF l_debug_on THEN
7325: WSH_DEBUG_SV.logmsg(l_module_name, 'Checking for Lock on dds in line set '||
7326: oe_interface_rec.source_line_set_id);
7327: END IF;
7328:
7329: OPEN lock_dds_line_set(oe_interface_rec.source_header_id,oe_interface_rec.source_line_set_id, p_batch_id);
7329: OPEN lock_dds_line_set(oe_interface_rec.source_header_id,oe_interface_rec.source_line_set_id, p_batch_id);
7330: FETCH lock_dds_line_set INTO t_source_line_id;
7331: IF lock_dds_line_set%NOTFOUND THEN
7332: IF l_debug_on THEN
7333: WSH_DEBUG_SV.logmsg(l_module_name, 'Some or all delivery details for Line Set '||
7334: oe_interface_rec.source_line_set_id||' are already locked by another process');
7335: END IF;
7336: CLOSE lock_dds_line_set;
7337: END IF;
7338: CLOSE lock_dds_line_set;
7339:
7340: ELSE --}{
7341: IF l_debug_on THEN
7342: WSH_DEBUG_SV.logmsg(l_module_name,'Checking for Lock on dds in line '||
7343: oe_interface_rec.source_line_id);
7344: END IF;
7345:
7346: OPEN lock_dds_line(oe_interface_rec.source_header_id,oe_interface_rec.source_line_id, p_batch_id);
7346: OPEN lock_dds_line(oe_interface_rec.source_header_id,oe_interface_rec.source_line_id, p_batch_id);
7347: FETCH lock_dds_line INTO t_source_line_id;
7348: if lock_dds_line%NOTFOUND then
7349: IF l_debug_on THEN
7350: WSH_DEBUG_SV.logmsg(l_module_name, 'Some or all delivery details for Line '||
7351: oe_interface_rec.source_line_id||' are already lock by another process');
7352: END IF;
7353: CLOSE lock_dds_line;
7354: end if;
7357:
7358: ELSE --}{
7359: -- bug2080335
7360: IF l_debug_on THEN
7361: WSH_DEBUG_SV.log(l_module_name, 'Checking for Lock on line '||oe_interface_rec.source_line_id);
7362: END IF;
7363: OPEN lock_delivery_line(p_batch_id,oe_interface_rec.source_header_id,oe_interface_rec.source_line_id);
7364: FETCH lock_delivery_line INTO t_source_line_id;
7365: IF lock_delivery_line%NOTFOUND then
7363: OPEN lock_delivery_line(p_batch_id,oe_interface_rec.source_header_id,oe_interface_rec.source_line_id);
7364: FETCH lock_delivery_line INTO t_source_line_id;
7365: IF lock_delivery_line%NOTFOUND then
7366: IF l_debug_on THEN
7367: WSH_DEBUG_SV.logmsg(l_module_name, 'LINE '||OE_INTERFACE_REC.SOURCE_LINE_ID||'
7368: IS ALREADY LOCK BY ANOTHER PROCESS' );
7369: END IF;
7370: CLOSE lock_delivery_line;
7371: END IF;
7396: END IF;
7397: --End of fix for the bug 5961591
7398:
7399: IF l_debug_on THEN
7400: WSH_DEBUG_SV.log(l_module_name,'t_source_line_id',t_source_line_id);
7401: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_GMI_RSV_BRANCH.PROCESS_BRANCH',WSH_DEBUG_SV.C_PROC_LEVEL);
7402: END IF;
7403: -- bug 7131800
7404: IF NOT INV_GMI_RSV_BRANCH.Process_Branch(p_organization_id => oe_interface_rec.organization_id) THEN
7397: --End of fix for the bug 5961591
7398:
7399: IF l_debug_on THEN
7400: WSH_DEBUG_SV.log(l_module_name,'t_source_line_id',t_source_line_id);
7401: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_GMI_RSV_BRANCH.PROCESS_BRANCH',WSH_DEBUG_SV.C_PROC_LEVEL);
7402: END IF;
7403: -- bug 7131800
7404: IF NOT INV_GMI_RSV_BRANCH.Process_Branch(p_organization_id => oe_interface_rec.organization_id) THEN
7405: l_process_flag := FND_API.G_FALSE;
7414: l_old_tolerance_below := oe_interface_rec.ship_tolerance_below;
7415: l_org_id := oe_interface_rec.org_id;
7416:
7417: IF l_debug_on THEN
7418: WSH_DEBUG_SV.log(l_module_name,'source_header_number',oe_interface_rec.source_header_number);
7419: WSH_DEBUG_SV.log(l_module_name,'l_process_flag',l_process_flag);
7420: WSH_DEBUG_SV.log(l_module_name,'l_prev_source_header_number',l_prev_source_header_number);
7421: WSH_DEBUG_SV.log(l_module_name,'l_non_bulk_ship_line.line_id.count',l_non_bulk_ship_line.line_id.count);
7422: END IF;
7415: l_org_id := oe_interface_rec.org_id;
7416:
7417: IF l_debug_on THEN
7418: WSH_DEBUG_SV.log(l_module_name,'source_header_number',oe_interface_rec.source_header_number);
7419: WSH_DEBUG_SV.log(l_module_name,'l_process_flag',l_process_flag);
7420: WSH_DEBUG_SV.log(l_module_name,'l_prev_source_header_number',l_prev_source_header_number);
7421: WSH_DEBUG_SV.log(l_module_name,'l_non_bulk_ship_line.line_id.count',l_non_bulk_ship_line.line_id.count);
7422: END IF;
7423: IF (oe_interface_rec.source_header_number <> nvl(l_prev_source_header_number,'#') -- {
7416:
7417: IF l_debug_on THEN
7418: WSH_DEBUG_SV.log(l_module_name,'source_header_number',oe_interface_rec.source_header_number);
7419: WSH_DEBUG_SV.log(l_module_name,'l_process_flag',l_process_flag);
7420: WSH_DEBUG_SV.log(l_module_name,'l_prev_source_header_number',l_prev_source_header_number);
7421: WSH_DEBUG_SV.log(l_module_name,'l_non_bulk_ship_line.line_id.count',l_non_bulk_ship_line.line_id.count);
7422: END IF;
7423: IF (oe_interface_rec.source_header_number <> nvl(l_prev_source_header_number,'#') -- {
7424: AND (l_non_bulk_ship_line.line_id.count > 0 OR l_non_bulk_req_line.line_id.count > 0)
7417: IF l_debug_on THEN
7418: WSH_DEBUG_SV.log(l_module_name,'source_header_number',oe_interface_rec.source_header_number);
7419: WSH_DEBUG_SV.log(l_module_name,'l_process_flag',l_process_flag);
7420: WSH_DEBUG_SV.log(l_module_name,'l_prev_source_header_number',l_prev_source_header_number);
7421: WSH_DEBUG_SV.log(l_module_name,'l_non_bulk_ship_line.line_id.count',l_non_bulk_ship_line.line_id.count);
7422: END IF;
7423: IF (oe_interface_rec.source_header_number <> nvl(l_prev_source_header_number,'#') -- {
7424: AND (l_non_bulk_ship_line.line_id.count > 0 OR l_non_bulk_req_line.line_id.count > 0)
7425: ) THEN
7435: x_charges_are_calculated => l_charges_are_calculated,
7436: x_return_status => l_return_status);
7437:
7438: IF l_debug_on THEN
7439: WSH_DEBUG_SV.log(l_module_name, 'NON BULK Process_Stop_To_OM l_return_status',l_return_status);
7440: END IF;
7441:
7442: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
7443: IF l_debug_on THEN
7440: END IF;
7441:
7442: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
7443: IF l_debug_on THEN
7444: WSH_DEBUG_SV.logmsg(l_module_name, 'Rolling back to the savepoint its_process_order_non_bulk as ITS for the order completed with an error');
7445: END IF;
7446: --ROLLBACK TO its_process_order_non_bulk;
7447:
7448: END IF;
7506: x_num_errors =>l_num_om_errors,
7507: p_raise_error_flag =>false);
7508:
7509: IF l_debug_on THEN
7510: WSH_DEBUG_SV.logmsg(l_module_name, 'Setting the savepoint its_process_order_non_bulk for the next order');
7511: END IF;
7512: SAVEPOINT its_process_order_non_bulk;
7513: ELSIF (l_non_bulk_count = 1) THEN
7514: --{
7512: SAVEPOINT its_process_order_non_bulk;
7513: ELSIF (l_non_bulk_count = 1) THEN
7514: --{
7515: IF l_debug_on THEN
7516: WSH_DEBUG_SV.logmsg(l_module_name, 'Setting the savepoint its_process_order_non_bulk for the first order');
7517: END IF;
7518: SAVEPOINT its_process_order_non_bulk;
7519: --}
7520: END IF; --}
7521:
7522: -- Cache the Source header Number
7523: IF l_debug_on THEN
7524: -- HW OPMCONV. Comment printing value of process flag
7525: WSH_DEBUG_SV.logmsg(l_module_name, 'L_PROCESS_FLAG IS ' || L_PROCESS_FLAG );
7526: WSH_DEBUG_SV.logmsg(l_module_name, 'L_TOT_SHP_QTY = '||L_TOT_SHP_QTY );
7527: END IF;
7528:
7529: l_setsmc_input_rec.top_model_line_id := oe_interface_rec.top_model_line_id;
7522: -- Cache the Source header Number
7523: IF l_debug_on THEN
7524: -- HW OPMCONV. Comment printing value of process flag
7525: WSH_DEBUG_SV.logmsg(l_module_name, 'L_PROCESS_FLAG IS ' || L_PROCESS_FLAG );
7526: WSH_DEBUG_SV.logmsg(l_module_name, 'L_TOT_SHP_QTY = '||L_TOT_SHP_QTY );
7527: END IF;
7528:
7529: l_setsmc_input_rec.top_model_line_id := oe_interface_rec.top_model_line_id;
7530: l_setsmc_input_rec.ship_set_id := oe_interface_rec.ship_set_id;
7575: l_bulk_ship_line.ordered_quantity2(l_bulk_count):= oe_interface_rec.ordered_quantity2;
7576: ELSE -- } {
7577:
7578: IF l_debug_on THEN
7579: WSH_DEBUG_SV.logmsg(l_module_name, 'Interface the Non-Bulk record for Source Header');
7580: WSH_DEBUG_SV.log(l_module_name,'ship_tolerance_above',oe_interface_rec.ship_tolerance_above);
7581: WSH_DEBUG_SV.log(l_module_name,'ship_tolerance_below',oe_interface_rec.ship_tolerance_below);
7582: WSH_DEBUG_SV.log(l_module_name,'total_requested_quantity',oe_interface_rec.total_requested_quantity);
7583: WSH_DEBUG_SV.log(l_module_name,'order_line_quantity',oe_interface_rec.order_line_quantity);
7576: ELSE -- } {
7577:
7578: IF l_debug_on THEN
7579: WSH_DEBUG_SV.logmsg(l_module_name, 'Interface the Non-Bulk record for Source Header');
7580: WSH_DEBUG_SV.log(l_module_name,'ship_tolerance_above',oe_interface_rec.ship_tolerance_above);
7581: WSH_DEBUG_SV.log(l_module_name,'ship_tolerance_below',oe_interface_rec.ship_tolerance_below);
7582: WSH_DEBUG_SV.log(l_module_name,'total_requested_quantity',oe_interface_rec.total_requested_quantity);
7583: WSH_DEBUG_SV.log(l_module_name,'order_line_quantity',oe_interface_rec.order_line_quantity);
7584: END IF;
7577:
7578: IF l_debug_on THEN
7579: WSH_DEBUG_SV.logmsg(l_module_name, 'Interface the Non-Bulk record for Source Header');
7580: WSH_DEBUG_SV.log(l_module_name,'ship_tolerance_above',oe_interface_rec.ship_tolerance_above);
7581: WSH_DEBUG_SV.log(l_module_name,'ship_tolerance_below',oe_interface_rec.ship_tolerance_below);
7582: WSH_DEBUG_SV.log(l_module_name,'total_requested_quantity',oe_interface_rec.total_requested_quantity);
7583: WSH_DEBUG_SV.log(l_module_name,'order_line_quantity',oe_interface_rec.order_line_quantity);
7584: END IF;
7585:
7578: IF l_debug_on THEN
7579: WSH_DEBUG_SV.logmsg(l_module_name, 'Interface the Non-Bulk record for Source Header');
7580: WSH_DEBUG_SV.log(l_module_name,'ship_tolerance_above',oe_interface_rec.ship_tolerance_above);
7581: WSH_DEBUG_SV.log(l_module_name,'ship_tolerance_below',oe_interface_rec.ship_tolerance_below);
7582: WSH_DEBUG_SV.log(l_module_name,'total_requested_quantity',oe_interface_rec.total_requested_quantity);
7583: WSH_DEBUG_SV.log(l_module_name,'order_line_quantity',oe_interface_rec.order_line_quantity);
7584: END IF;
7585:
7586:
7579: WSH_DEBUG_SV.logmsg(l_module_name, 'Interface the Non-Bulk record for Source Header');
7580: WSH_DEBUG_SV.log(l_module_name,'ship_tolerance_above',oe_interface_rec.ship_tolerance_above);
7581: WSH_DEBUG_SV.log(l_module_name,'ship_tolerance_below',oe_interface_rec.ship_tolerance_below);
7582: WSH_DEBUG_SV.log(l_module_name,'total_requested_quantity',oe_interface_rec.total_requested_quantity);
7583: WSH_DEBUG_SV.log(l_module_name,'order_line_quantity',oe_interface_rec.order_line_quantity);
7584: END IF;
7585:
7586:
7587: IF ((nvl(oe_interface_rec.ship_tolerance_above,0) > 0) OR -- {
7620: WHERE ol.header_id = oe_interface_rec.source_header_id
7621: AND ol.line_set_id = oe_interface_rec.source_line_set_id;
7622:
7623: IF l_debug_on THEN
7624: WSH_DEBUG_SV.logmsg(l_module_name, 'l_tot_ord_qty '||l_tot_ord_qty||' l_tot_dd_req_qty '||
7625: l_tot_dd_req_qty||' l_tot_dd_shp_qty '||l_tot_dd_shp_qty);
7626: END IF;
7627: END IF; --}
7628:
7637: ) THEN
7638:
7639: IF l_debug_on THEN
7640: IF (oe_interface_rec.source_line_set_id is not null) THEN
7641: WSH_DEBUG_SV.logmsg(l_module_name, 'Shipping partial quantity for the line set ' || oe_interface_rec.source_line_set_id);
7642: ELSE
7643: WSH_DEBUG_SV.logmsg(l_module_name, 'Shipping partial quantity for the order line ' || oe_interface_rec.source_line_id);
7644: END IF;
7645: END IF;
7639: IF l_debug_on THEN
7640: IF (oe_interface_rec.source_line_set_id is not null) THEN
7641: WSH_DEBUG_SV.logmsg(l_module_name, 'Shipping partial quantity for the line set ' || oe_interface_rec.source_line_set_id);
7642: ELSE
7643: WSH_DEBUG_SV.logmsg(l_module_name, 'Shipping partial quantity for the order line ' || oe_interface_rec.source_line_id);
7644: END IF;
7645: END IF;
7646:
7647: --haperf
7645: END IF;
7646:
7647: --haperf
7648: IF l_debug_on THEN
7649: WSH_DEBUG_SV.logmsg(l_module_name, '===============');
7650: WSH_DEBUG_SV.logmsg(l_module_name, 'Tolerance Check');
7651: WSH_DEBUG_SV.logmsg(l_module_name, '===============');
7652: END IF;
7653: Check_Tolerance(
7646:
7647: --haperf
7648: IF l_debug_on THEN
7649: WSH_DEBUG_SV.logmsg(l_module_name, '===============');
7650: WSH_DEBUG_SV.logmsg(l_module_name, 'Tolerance Check');
7651: WSH_DEBUG_SV.logmsg(l_module_name, '===============');
7652: END IF;
7653: Check_Tolerance(
7654: p_stop_id => NULL ,
7647: --haperf
7648: IF l_debug_on THEN
7649: WSH_DEBUG_SV.logmsg(l_module_name, '===============');
7650: WSH_DEBUG_SV.logmsg(l_module_name, 'Tolerance Check');
7651: WSH_DEBUG_SV.logmsg(l_module_name, '===============');
7652: END IF;
7653: Check_Tolerance(
7654: p_stop_id => NULL ,
7655: p_source_line_id => oe_interface_rec.source_line_id ,
7665: x_num_warnings =>l_num_warnings,
7666: x_num_errors =>l_num_errors);
7667:
7668: IF l_debug_on THEN
7669: WSH_DEBUG_SV.logmsg(l_module_name, 'fullfilled flag = '||l_fulfilled_flag);
7670: END IF;
7671:
7672: IF (NVL(l_fulfilled_flag, 'F') = 'T') THEN
7673: l_remain_detail_index := 0;
7672: IF (NVL(l_fulfilled_flag, 'F') = 'T') THEN
7673: l_remain_detail_index := 0;
7674:
7675: IF l_debug_on THEN
7676: WSH_DEBUG_SV.logmsg(l_module_name, 'Ship within tolerance');
7677: END IF;
7678:
7679: IF ((Get_Line_Expected_Qty(oe_interface_rec.source_line_id, p_batch_id)) > 0) THEN
7680:
7678:
7679: IF ((Get_Line_Expected_Qty(oe_interface_rec.source_line_id, p_batch_id)) > 0) THEN
7680:
7681: IF l_debug_on THEN
7682: WSH_DEBUG_SV.logmsg(l_module_name, 'change fulfilled_flag to P because planned_quantity > 0 for the current line');
7683: END IF;
7684: l_fulfilled_flag := 'P';
7685: ELSE
7686:
7684: l_fulfilled_flag := 'P';
7685: ELSE
7686:
7687: IF l_debug_on THEN
7688: WSH_DEBUG_SV.logmsg(l_module_name, 'l_fullfilled_flag is True, need to call cancel_details for source_line = ' ||oe_interface_rec.source_line_id);
7689: END IF;
7690:
7691: -- Handle pending delivery details for current line
7692: OPEN c_remain_detail_id(oe_interface_rec.source_line_id);
7698: l_remain_detail_index := l_remain_detail_index + 1;
7699: l_remain_details_id(l_remain_detail_index) := l_delete_detail_id;
7700:
7701: IF l_debug_on THEN
7702: WSH_DEBUG_SV.logmsg(l_module_name, 'l_remain_detail_index = '||l_remain_detail_index||' detail_id = '||l_delete_detail_id);
7703: END IF;
7704: END LOOP;
7705: CLOSE c_remain_detail_id;
7706: END IF;
7707:
7708: -- Handle all lines in the line set which are not there in the current stop, if not processed before
7709: -- Need to cancel the delivery details for each line depending on pending quantity
7710: IF l_debug_on THEN
7711: WSH_DEBUG_SV.logmsg(l_module_name, 'oe_interace_rec.source_line_set =' || oe_interface_rec.source_line_set_id);
7712: END IF;
7713:
7714: IF ((oe_interface_rec.source_line_set_id is not null) AND
7715: (oe_interface_rec.source_line_set_id <> l_prev_line_set_id))THEN
7738: l_remain_detail_index := l_remain_detail_index + 1;
7739: l_remain_details_id(l_remain_detail_index) := l_delete_detail_id;
7740:
7741: IF l_debug_on THEN
7742: WSH_DEBUG_SV.logmsg(l_module_name, 'l_remain_detail_index = '||l_remain_detail_index||' detail_id = '||l_delete_detail_id);
7743: END IF;
7744: END LOOP;
7745: CLOSE c_remain_detail_id;
7746:
7755: l_cancel_unpicked_details := NULL;
7756: --
7757: IF (l_process_flag = FND_API.G_FALSE ) THEN
7758: IF l_debug_on THEN
7759: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CUSTOM_PUB.Cancel_Unpicked_Details_At_ITS',
7760: WSH_DEBUG_SV.C_PROC_LEVEL);
7761: END IF;
7762: l_cancel_unpicked_details := WSH_CUSTOM_PUB.Cancel_Unpicked_Details_At_ITS(
7763: p_source_header_id => oe_interface_rec.source_header_id,
7756: --
7757: IF (l_process_flag = FND_API.G_FALSE ) THEN
7758: IF l_debug_on THEN
7759: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CUSTOM_PUB.Cancel_Unpicked_Details_At_ITS',
7760: WSH_DEBUG_SV.C_PROC_LEVEL);
7761: END IF;
7762: l_cancel_unpicked_details := WSH_CUSTOM_PUB.Cancel_Unpicked_Details_At_ITS(
7763: p_source_header_id => oe_interface_rec.source_header_id,
7764: p_source_line_id => oe_interface_rec.source_line_id,
7764: p_source_line_id => oe_interface_rec.source_line_id,
7765: p_source_line_set_id => oe_interface_rec.source_line_set_id,
7766: p_remain_details_id => l_remain_details_id);
7767: IF l_debug_on THEN
7768: WSH_DEBUG_SV.logmsg(l_module_name, 'l_cancel_upicked_details '|| l_cancel_unpicked_details);
7769: END IF;
7770: IF ( l_cancel_unpicked_details NOT IN ('Y', 'N') ) THEN
7771: IF l_debug_on THEN
7772: WSH_DEBUG_SV.logmsg(l_module_name, ' Error in Routine wsh_custom_pub.Cancel_Unpicked_Details_At_ITS ');
7768: WSH_DEBUG_SV.logmsg(l_module_name, 'l_cancel_upicked_details '|| l_cancel_unpicked_details);
7769: END IF;
7770: IF ( l_cancel_unpicked_details NOT IN ('Y', 'N') ) THEN
7771: IF l_debug_on THEN
7772: WSH_DEBUG_SV.logmsg(l_module_name, ' Error in Routine wsh_custom_pub.Cancel_Unpicked_Details_At_ITS ');
7773: END IF;
7774: RAISE FND_API.G_EXC_ERROR;
7775: END IF;
7776: ELSE -- If it is an OPM Org, which is the current/default behaviour
7783: p_details_id => l_remain_details_id,
7784: x_return_status => l_return_status);
7785:
7786: IF l_debug_on THEN
7787: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7788: END IF;
7789: WSH_UTIL_CORE.api_post_call(p_return_status => l_return_status,
7790: x_num_warnings =>l_num_warnings,
7791: x_num_errors =>l_num_errors);
7806: (l_tot_dd_shp_qty > l_tot_ord_qty)
7807: )
7808: ) then
7809: IF l_debug_on THEN
7810: WSH_DEBUG_SV.logmsg(l_module_name,'Over Shipment for order line ' || oe_interface_rec.source_line_id);
7811: END IF;
7812:
7813: IF (oe_interface_rec.top_model_line_id IS NULL) then
7814: -- This part actually is not being used since UI doesn't allow
7814: -- This part actually is not being used since UI doesn't allow
7815: -- over shipment beyong tolerance
7816: --haperf
7817: IF l_debug_on THEN
7818: WSH_DEBUG_SV.logmsg(l_module_name, '===============');
7819: WSH_DEBUG_SV.logmsg(l_module_name, 'Tolerance Check');
7820: WSH_DEBUG_SV.logmsg(l_module_name, '===============');
7821: END IF;
7822: Check_Tolerance(
7815: -- over shipment beyong tolerance
7816: --haperf
7817: IF l_debug_on THEN
7818: WSH_DEBUG_SV.logmsg(l_module_name, '===============');
7819: WSH_DEBUG_SV.logmsg(l_module_name, 'Tolerance Check');
7820: WSH_DEBUG_SV.logmsg(l_module_name, '===============');
7821: END IF;
7822: Check_Tolerance(
7823: p_stop_id => NULL ,
7816: --haperf
7817: IF l_debug_on THEN
7818: WSH_DEBUG_SV.logmsg(l_module_name, '===============');
7819: WSH_DEBUG_SV.logmsg(l_module_name, 'Tolerance Check');
7820: WSH_DEBUG_SV.logmsg(l_module_name, '===============');
7821: END IF;
7822: Check_Tolerance(
7823: p_stop_id => NULL ,
7824: p_source_line_id => oe_interface_rec.source_line_id ,
7860: END IF; --} End if of tolerance check
7861:
7862:
7863: IF l_debug_on THEN
7864: WSH_DEBUG_SV.log(l_module_name,'l_tot_shp_qty',l_tot_shp_qty);
7865: END IF;
7866:
7867: IF ( l_tot_shp_qty > 0 ) THEN --{
7868: --wrudge
7870: -- and it's not PTO,
7871: -- and the order line is not fulfilled in this session (flag is false or pending.)
7872: --
7873: IF l_debug_on THEN
7874: WSH_DEBUG_SV.log(l_module_name, 'l_fulfilled_flag ',l_fulfilled_flag);
7875: WSH_DEBUG_SV.log(l_module_name,'total_requested_quantity',
7876: oe_interface_rec.total_requested_quantity);
7877: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id', oe_interface_rec.top_model_line_id);
7878: WSH_DEBUG_SV.log(l_module_name,'ato_line_id',oe_interface_rec.ato_line_id);
7871: -- and the order line is not fulfilled in this session (flag is false or pending.)
7872: --
7873: IF l_debug_on THEN
7874: WSH_DEBUG_SV.log(l_module_name, 'l_fulfilled_flag ',l_fulfilled_flag);
7875: WSH_DEBUG_SV.log(l_module_name,'total_requested_quantity',
7876: oe_interface_rec.total_requested_quantity);
7877: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id', oe_interface_rec.top_model_line_id);
7878: WSH_DEBUG_SV.log(l_module_name,'ato_line_id',oe_interface_rec.ato_line_id);
7879: END IF;
7873: IF l_debug_on THEN
7874: WSH_DEBUG_SV.log(l_module_name, 'l_fulfilled_flag ',l_fulfilled_flag);
7875: WSH_DEBUG_SV.log(l_module_name,'total_requested_quantity',
7876: oe_interface_rec.total_requested_quantity);
7877: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id', oe_interface_rec.top_model_line_id);
7878: WSH_DEBUG_SV.log(l_module_name,'ato_line_id',oe_interface_rec.ato_line_id);
7879: END IF;
7880:
7881: IF ( ( l_tot_shp_qty <> oe_interface_rec.total_requested_quantity)
7874: WSH_DEBUG_SV.log(l_module_name, 'l_fulfilled_flag ',l_fulfilled_flag);
7875: WSH_DEBUG_SV.log(l_module_name,'total_requested_quantity',
7876: oe_interface_rec.total_requested_quantity);
7877: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id', oe_interface_rec.top_model_line_id);
7878: WSH_DEBUG_SV.log(l_module_name,'ato_line_id',oe_interface_rec.ato_line_id);
7879: END IF;
7880:
7881: IF ( ( l_tot_shp_qty <> oe_interface_rec.total_requested_quantity)
7882: AND ( oe_interface_rec.top_model_line_id IS NULL
7933: l_non_bulk_req_line.ship_from_org_id(l_non_bulk_req_count):= oe_interface_rec.organization_id;
7934:
7935:
7936: IF l_debug_on THEN
7937: WSH_DEBUG_SV.logmsg(l_module_name, 'Lines in l_non_bulk_req_line');
7938: WSH_DEBUG_SV.log(l_module_name,'line_id',l_non_bulk_req_line.line_id(l_non_bulk_req_count));
7939: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',l_non_bulk_req_line.requested_quantity(l_non_bulk_req_count));
7940: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',l_non_bulk_req_line.requested_quantity2(l_non_bulk_req_count));
7941: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',l_non_bulk_req_line.shipping_quantity(l_non_bulk_req_count));
7934:
7935:
7936: IF l_debug_on THEN
7937: WSH_DEBUG_SV.logmsg(l_module_name, 'Lines in l_non_bulk_req_line');
7938: WSH_DEBUG_SV.log(l_module_name,'line_id',l_non_bulk_req_line.line_id(l_non_bulk_req_count));
7939: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',l_non_bulk_req_line.requested_quantity(l_non_bulk_req_count));
7940: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',l_non_bulk_req_line.requested_quantity2(l_non_bulk_req_count));
7941: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',l_non_bulk_req_line.shipping_quantity(l_non_bulk_req_count));
7942: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',l_non_bulk_req_line.shipping_quantity_uom(l_non_bulk_req_count));
7935:
7936: IF l_debug_on THEN
7937: WSH_DEBUG_SV.logmsg(l_module_name, 'Lines in l_non_bulk_req_line');
7938: WSH_DEBUG_SV.log(l_module_name,'line_id',l_non_bulk_req_line.line_id(l_non_bulk_req_count));
7939: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',l_non_bulk_req_line.requested_quantity(l_non_bulk_req_count));
7940: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',l_non_bulk_req_line.requested_quantity2(l_non_bulk_req_count));
7941: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',l_non_bulk_req_line.shipping_quantity(l_non_bulk_req_count));
7942: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',l_non_bulk_req_line.shipping_quantity_uom(l_non_bulk_req_count));
7943: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',l_non_bulk_req_line.shipping_quantity2(l_non_bulk_req_count));
7936: IF l_debug_on THEN
7937: WSH_DEBUG_SV.logmsg(l_module_name, 'Lines in l_non_bulk_req_line');
7938: WSH_DEBUG_SV.log(l_module_name,'line_id',l_non_bulk_req_line.line_id(l_non_bulk_req_count));
7939: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',l_non_bulk_req_line.requested_quantity(l_non_bulk_req_count));
7940: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',l_non_bulk_req_line.requested_quantity2(l_non_bulk_req_count));
7941: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',l_non_bulk_req_line.shipping_quantity(l_non_bulk_req_count));
7942: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',l_non_bulk_req_line.shipping_quantity_uom(l_non_bulk_req_count));
7943: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',l_non_bulk_req_line.shipping_quantity2(l_non_bulk_req_count));
7944: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',l_non_bulk_req_line.shipping_quantity_uom2(l_non_bulk_req_count));
7937: WSH_DEBUG_SV.logmsg(l_module_name, 'Lines in l_non_bulk_req_line');
7938: WSH_DEBUG_SV.log(l_module_name,'line_id',l_non_bulk_req_line.line_id(l_non_bulk_req_count));
7939: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',l_non_bulk_req_line.requested_quantity(l_non_bulk_req_count));
7940: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',l_non_bulk_req_line.requested_quantity2(l_non_bulk_req_count));
7941: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',l_non_bulk_req_line.shipping_quantity(l_non_bulk_req_count));
7942: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',l_non_bulk_req_line.shipping_quantity_uom(l_non_bulk_req_count));
7943: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',l_non_bulk_req_line.shipping_quantity2(l_non_bulk_req_count));
7944: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',l_non_bulk_req_line.shipping_quantity_uom2(l_non_bulk_req_count));
7945: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',l_non_bulk_req_line.ordered_quantity(l_non_bulk_req_count));
7938: WSH_DEBUG_SV.log(l_module_name,'line_id',l_non_bulk_req_line.line_id(l_non_bulk_req_count));
7939: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',l_non_bulk_req_line.requested_quantity(l_non_bulk_req_count));
7940: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',l_non_bulk_req_line.requested_quantity2(l_non_bulk_req_count));
7941: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',l_non_bulk_req_line.shipping_quantity(l_non_bulk_req_count));
7942: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',l_non_bulk_req_line.shipping_quantity_uom(l_non_bulk_req_count));
7943: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',l_non_bulk_req_line.shipping_quantity2(l_non_bulk_req_count));
7944: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',l_non_bulk_req_line.shipping_quantity_uom2(l_non_bulk_req_count));
7945: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',l_non_bulk_req_line.ordered_quantity(l_non_bulk_req_count));
7946: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',l_non_bulk_req_line.order_quantity_uom(l_non_bulk_req_count));
7939: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',l_non_bulk_req_line.requested_quantity(l_non_bulk_req_count));
7940: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',l_non_bulk_req_line.requested_quantity2(l_non_bulk_req_count));
7941: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',l_non_bulk_req_line.shipping_quantity(l_non_bulk_req_count));
7942: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',l_non_bulk_req_line.shipping_quantity_uom(l_non_bulk_req_count));
7943: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',l_non_bulk_req_line.shipping_quantity2(l_non_bulk_req_count));
7944: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',l_non_bulk_req_line.shipping_quantity_uom2(l_non_bulk_req_count));
7945: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',l_non_bulk_req_line.ordered_quantity(l_non_bulk_req_count));
7946: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',l_non_bulk_req_line.order_quantity_uom(l_non_bulk_req_count));
7947: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',l_non_bulk_req_line.ordered_quantity2(l_non_bulk_req_count));
7940: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',l_non_bulk_req_line.requested_quantity2(l_non_bulk_req_count));
7941: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',l_non_bulk_req_line.shipping_quantity(l_non_bulk_req_count));
7942: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',l_non_bulk_req_line.shipping_quantity_uom(l_non_bulk_req_count));
7943: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',l_non_bulk_req_line.shipping_quantity2(l_non_bulk_req_count));
7944: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',l_non_bulk_req_line.shipping_quantity_uom2(l_non_bulk_req_count));
7945: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',l_non_bulk_req_line.ordered_quantity(l_non_bulk_req_count));
7946: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',l_non_bulk_req_line.order_quantity_uom(l_non_bulk_req_count));
7947: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',l_non_bulk_req_line.ordered_quantity2(l_non_bulk_req_count));
7948: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',l_non_bulk_req_line.order_quantity_uom2(l_non_bulk_req_count));
7941: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity',l_non_bulk_req_line.shipping_quantity(l_non_bulk_req_count));
7942: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',l_non_bulk_req_line.shipping_quantity_uom(l_non_bulk_req_count));
7943: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',l_non_bulk_req_line.shipping_quantity2(l_non_bulk_req_count));
7944: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',l_non_bulk_req_line.shipping_quantity_uom2(l_non_bulk_req_count));
7945: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',l_non_bulk_req_line.ordered_quantity(l_non_bulk_req_count));
7946: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',l_non_bulk_req_line.order_quantity_uom(l_non_bulk_req_count));
7947: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',l_non_bulk_req_line.ordered_quantity2(l_non_bulk_req_count));
7948: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',l_non_bulk_req_line.order_quantity_uom2(l_non_bulk_req_count));
7949: WSH_DEBUG_SV.log(l_module_name,'line_set_id',l_non_bulk_req_line.line_set_id(l_non_bulk_req_count));
7942: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom',l_non_bulk_req_line.shipping_quantity_uom(l_non_bulk_req_count));
7943: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',l_non_bulk_req_line.shipping_quantity2(l_non_bulk_req_count));
7944: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',l_non_bulk_req_line.shipping_quantity_uom2(l_non_bulk_req_count));
7945: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',l_non_bulk_req_line.ordered_quantity(l_non_bulk_req_count));
7946: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',l_non_bulk_req_line.order_quantity_uom(l_non_bulk_req_count));
7947: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',l_non_bulk_req_line.ordered_quantity2(l_non_bulk_req_count));
7948: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',l_non_bulk_req_line.order_quantity_uom2(l_non_bulk_req_count));
7949: WSH_DEBUG_SV.log(l_module_name,'line_set_id',l_non_bulk_req_line.line_set_id(l_non_bulk_req_count));
7950: WSH_DEBUG_SV.log(l_module_name,'item_type_code',l_non_bulk_req_line.ato_line_id(l_non_bulk_req_count));
7943: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity2',l_non_bulk_req_line.shipping_quantity2(l_non_bulk_req_count));
7944: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',l_non_bulk_req_line.shipping_quantity_uom2(l_non_bulk_req_count));
7945: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',l_non_bulk_req_line.ordered_quantity(l_non_bulk_req_count));
7946: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',l_non_bulk_req_line.order_quantity_uom(l_non_bulk_req_count));
7947: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',l_non_bulk_req_line.ordered_quantity2(l_non_bulk_req_count));
7948: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',l_non_bulk_req_line.order_quantity_uom2(l_non_bulk_req_count));
7949: WSH_DEBUG_SV.log(l_module_name,'line_set_id',l_non_bulk_req_line.line_set_id(l_non_bulk_req_count));
7950: WSH_DEBUG_SV.log(l_module_name,'item_type_code',l_non_bulk_req_line.ato_line_id(l_non_bulk_req_count));
7951: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',l_non_bulk_req_line.top_model_line_id(l_non_bulk_req_count));
7944: WSH_DEBUG_SV.log(l_module_name,'shipping_quantity_uom2',l_non_bulk_req_line.shipping_quantity_uom2(l_non_bulk_req_count));
7945: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',l_non_bulk_req_line.ordered_quantity(l_non_bulk_req_count));
7946: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',l_non_bulk_req_line.order_quantity_uom(l_non_bulk_req_count));
7947: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',l_non_bulk_req_line.ordered_quantity2(l_non_bulk_req_count));
7948: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',l_non_bulk_req_line.order_quantity_uom2(l_non_bulk_req_count));
7949: WSH_DEBUG_SV.log(l_module_name,'line_set_id',l_non_bulk_req_line.line_set_id(l_non_bulk_req_count));
7950: WSH_DEBUG_SV.log(l_module_name,'item_type_code',l_non_bulk_req_line.ato_line_id(l_non_bulk_req_count));
7951: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',l_non_bulk_req_line.top_model_line_id(l_non_bulk_req_count));
7952: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',l_non_bulk_req_line.inventory_item_id(l_non_bulk_req_count));
7945: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity',l_non_bulk_req_line.ordered_quantity(l_non_bulk_req_count));
7946: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',l_non_bulk_req_line.order_quantity_uom(l_non_bulk_req_count));
7947: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',l_non_bulk_req_line.ordered_quantity2(l_non_bulk_req_count));
7948: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',l_non_bulk_req_line.order_quantity_uom2(l_non_bulk_req_count));
7949: WSH_DEBUG_SV.log(l_module_name,'line_set_id',l_non_bulk_req_line.line_set_id(l_non_bulk_req_count));
7950: WSH_DEBUG_SV.log(l_module_name,'item_type_code',l_non_bulk_req_line.ato_line_id(l_non_bulk_req_count));
7951: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',l_non_bulk_req_line.top_model_line_id(l_non_bulk_req_count));
7952: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',l_non_bulk_req_line.inventory_item_id(l_non_bulk_req_count));
7953: WSH_DEBUG_SV.log(l_module_name,'ship_from_org_id',l_non_bulk_req_line.ship_from_org_id(l_non_bulk_req_count));
7946: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom',l_non_bulk_req_line.order_quantity_uom(l_non_bulk_req_count));
7947: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',l_non_bulk_req_line.ordered_quantity2(l_non_bulk_req_count));
7948: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',l_non_bulk_req_line.order_quantity_uom2(l_non_bulk_req_count));
7949: WSH_DEBUG_SV.log(l_module_name,'line_set_id',l_non_bulk_req_line.line_set_id(l_non_bulk_req_count));
7950: WSH_DEBUG_SV.log(l_module_name,'item_type_code',l_non_bulk_req_line.ato_line_id(l_non_bulk_req_count));
7951: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',l_non_bulk_req_line.top_model_line_id(l_non_bulk_req_count));
7952: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',l_non_bulk_req_line.inventory_item_id(l_non_bulk_req_count));
7953: WSH_DEBUG_SV.log(l_module_name,'ship_from_org_id',l_non_bulk_req_line.ship_from_org_id(l_non_bulk_req_count));
7954: END IF;
7947: WSH_DEBUG_SV.log(l_module_name,'ordered_quantity2',l_non_bulk_req_line.ordered_quantity2(l_non_bulk_req_count));
7948: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',l_non_bulk_req_line.order_quantity_uom2(l_non_bulk_req_count));
7949: WSH_DEBUG_SV.log(l_module_name,'line_set_id',l_non_bulk_req_line.line_set_id(l_non_bulk_req_count));
7950: WSH_DEBUG_SV.log(l_module_name,'item_type_code',l_non_bulk_req_line.ato_line_id(l_non_bulk_req_count));
7951: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',l_non_bulk_req_line.top_model_line_id(l_non_bulk_req_count));
7952: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',l_non_bulk_req_line.inventory_item_id(l_non_bulk_req_count));
7953: WSH_DEBUG_SV.log(l_module_name,'ship_from_org_id',l_non_bulk_req_line.ship_from_org_id(l_non_bulk_req_count));
7954: END IF;
7955:
7948: WSH_DEBUG_SV.log(l_module_name,'order_quantity_uom2',l_non_bulk_req_line.order_quantity_uom2(l_non_bulk_req_count));
7949: WSH_DEBUG_SV.log(l_module_name,'line_set_id',l_non_bulk_req_line.line_set_id(l_non_bulk_req_count));
7950: WSH_DEBUG_SV.log(l_module_name,'item_type_code',l_non_bulk_req_line.ato_line_id(l_non_bulk_req_count));
7951: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',l_non_bulk_req_line.top_model_line_id(l_non_bulk_req_count));
7952: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',l_non_bulk_req_line.inventory_item_id(l_non_bulk_req_count));
7953: WSH_DEBUG_SV.log(l_module_name,'ship_from_org_id',l_non_bulk_req_line.ship_from_org_id(l_non_bulk_req_count));
7954: END IF;
7955:
7956:
7949: WSH_DEBUG_SV.log(l_module_name,'line_set_id',l_non_bulk_req_line.line_set_id(l_non_bulk_req_count));
7950: WSH_DEBUG_SV.log(l_module_name,'item_type_code',l_non_bulk_req_line.ato_line_id(l_non_bulk_req_count));
7951: WSH_DEBUG_SV.log(l_module_name,'top_model_line_id',l_non_bulk_req_line.top_model_line_id(l_non_bulk_req_count));
7952: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',l_non_bulk_req_line.inventory_item_id(l_non_bulk_req_count));
7953: WSH_DEBUG_SV.log(l_module_name,'ship_from_org_id',l_non_bulk_req_line.ship_from_org_id(l_non_bulk_req_count));
7954: END IF;
7955:
7956:
7957: END IF;
7961:
7962: extend_om_ship_line (l_non_bulk_ship_line,l_return_status);
7963:
7964: IF l_debug_on THEN
7965: WSH_DEBUG_SV.log(l_module_name, 'Non Bulk Ship l_non_bulk_ship_count',l_non_bulk_ship_count);
7966: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7967: END IF;
7968:
7969: WSH_UTIL_CORE.api_post_call(p_return_status =>l_return_status,
7962: extend_om_ship_line (l_non_bulk_ship_line,l_return_status);
7963:
7964: IF l_debug_on THEN
7965: WSH_DEBUG_SV.log(l_module_name, 'Non Bulk Ship l_non_bulk_ship_count',l_non_bulk_ship_count);
7966: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
7967: END IF;
7968:
7969: WSH_UTIL_CORE.api_post_call(p_return_status =>l_return_status,
7970: x_num_warnings =>l_num_warnings,
8020:
8021: EXCEPTION
8022: WHEN fnd_api.g_exc_error THEN
8023: IF l_debug_on THEN
8024: WSH_DEBUG_SV.log(l_module_name, 'fnd_api.g_exc_error at source_line_id',
8025: oe_interface_rec.source_line_id);
8026: END IF;
8027:
8028: WHEN fnd_api.g_exc_unexpected_error THEN
8026: END IF;
8027:
8028: WHEN fnd_api.g_exc_unexpected_error THEN
8029: IF l_debug_on THEN
8030: WSH_DEBUG_SV.log(l_module_name, 'fnd_api.g_exc_unexpected_error at source_line_id', oe_interface_rec.source_line_id);
8031: END IF;
8032:
8033:
8034: WHEN line_locked THEN
8033:
8034: WHEN line_locked THEN
8035: l_num_errors:=l_num_errors + 1;
8036: IF l_debug_on THEN
8037: WSH_DEBUG_SV.log(l_module_name, 'Failure to Accrue the Lock for source_line_id: ',
8038: oe_interface_rec.source_line_id);
8039: END IF;
8040:
8041: WHEN others THEN
8039: END IF;
8040:
8041: WHEN others THEN
8042: IF l_debug_on THEN
8043: WSH_DEBUG_SV.log(l_module_name, 'Errmsg: ',sqlerrm);
8044: END IF;
8045: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8046: END; --}
8047:
8056: --HVOP heali
8057:
8058:
8059: IF l_debug_on THEN
8060: WSH_DEBUG_SV.log(l_module_name, 'l_non_bulk_ship_line.line_id.count',l_non_bulk_ship_line.line_id.count);
8061: WSH_DEBUG_SV.log(l_module_name, 'l_non_bulk_req_line.line_id.count',l_non_bulk_req_line.line_id.count);
8062: END IF;
8063:
8064: IF (l_non_bulk_ship_line.line_id.count > 0 ) THEN
8057:
8058:
8059: IF l_debug_on THEN
8060: WSH_DEBUG_SV.log(l_module_name, 'l_non_bulk_ship_line.line_id.count',l_non_bulk_ship_line.line_id.count);
8061: WSH_DEBUG_SV.log(l_module_name, 'l_non_bulk_req_line.line_id.count',l_non_bulk_req_line.line_id.count);
8062: END IF;
8063:
8064: IF (l_non_bulk_ship_line.line_id.count > 0 ) THEN
8065: l_num_om_api_call := l_num_om_api_call + 1;
8074: x_return_status => l_return_status);
8075:
8076:
8077: IF l_debug_on THEN
8078: WSH_DEBUG_SV.log(l_module_name, 'Process_Stop_To_OM l_return_status',l_return_status);
8079: END IF;
8080:
8081: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
8082: IF l_debug_on THEN
8079: END IF;
8080:
8081: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
8082: IF l_debug_on THEN
8083: WSH_DEBUG_SV.logmsg(l_module_name, 'Rolling back to the savepoint its_process_order_non_bulk as ITS for the order completed with an error 2');
8084: END IF;
8085: --ROLLBACK TO its_process_order_non_bulk;
8086:
8087: END IF;
8098: END IF;
8099:
8100:
8101: IF l_debug_on THEN
8102: WSH_DEBUG_SV.log(l_module_name, 'l_bulk_ship_line.line_id.count',l_bulk_ship_line.line_id.count);
8103: WSH_DEBUG_SV.log(l_module_name, 'l_bulk_req_line.line_id.count',l_bulk_req_line.line_id.count);
8104: END IF;
8105: IF (l_bulk_ship_line.line_id.count > 0 ) THEN
8106: l_num_om_api_call := l_num_om_api_call + 1;
8099:
8100:
8101: IF l_debug_on THEN
8102: WSH_DEBUG_SV.log(l_module_name, 'l_bulk_ship_line.line_id.count',l_bulk_ship_line.line_id.count);
8103: WSH_DEBUG_SV.log(l_module_name, 'l_bulk_req_line.line_id.count',l_bulk_req_line.line_id.count);
8104: END IF;
8105: IF (l_bulk_ship_line.line_id.count > 0 ) THEN
8106: l_num_om_api_call := l_num_om_api_call + 1;
8107: Process_Stop_To_OM(
8113: x_charges_are_calculated => l_charges_are_calculated,
8114: x_return_status => l_return_status);
8115:
8116: IF l_debug_on THEN
8117: WSH_DEBUG_SV.log(l_module_name, 'Process_Stop_To_OM l_return_status',l_return_status);
8118: END IF;
8119: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) then
8120: raise fnd_api.g_exc_error;
8121: END IF;
8127: END IF;
8128:
8129:
8130: IF l_debug_on THEN
8131: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_api_call',l_num_om_api_call);
8132: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_errors',l_num_om_errors);
8133: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_warnings',l_num_om_warnings);
8134: WSH_DEBUG_SV.log(l_module_name, 'l_non_bulk_count',l_non_bulk_count);
8135: WSH_DEBUG_SV.log(l_module_name, 'l_num_errors',l_num_errors);
8128:
8129:
8130: IF l_debug_on THEN
8131: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_api_call',l_num_om_api_call);
8132: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_errors',l_num_om_errors);
8133: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_warnings',l_num_om_warnings);
8134: WSH_DEBUG_SV.log(l_module_name, 'l_non_bulk_count',l_non_bulk_count);
8135: WSH_DEBUG_SV.log(l_module_name, 'l_num_errors',l_num_errors);
8136: WSH_DEBUG_SV.log(l_module_name, 'l_num_warnings',l_num_warnings);
8129:
8130: IF l_debug_on THEN
8131: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_api_call',l_num_om_api_call);
8132: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_errors',l_num_om_errors);
8133: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_warnings',l_num_om_warnings);
8134: WSH_DEBUG_SV.log(l_module_name, 'l_non_bulk_count',l_non_bulk_count);
8135: WSH_DEBUG_SV.log(l_module_name, 'l_num_errors',l_num_errors);
8136: WSH_DEBUG_SV.log(l_module_name, 'l_num_warnings',l_num_warnings);
8137: END IF;
8130: IF l_debug_on THEN
8131: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_api_call',l_num_om_api_call);
8132: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_errors',l_num_om_errors);
8133: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_warnings',l_num_om_warnings);
8134: WSH_DEBUG_SV.log(l_module_name, 'l_non_bulk_count',l_non_bulk_count);
8135: WSH_DEBUG_SV.log(l_module_name, 'l_num_errors',l_num_errors);
8136: WSH_DEBUG_SV.log(l_module_name, 'l_num_warnings',l_num_warnings);
8137: END IF;
8138:
8131: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_api_call',l_num_om_api_call);
8132: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_errors',l_num_om_errors);
8133: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_warnings',l_num_om_warnings);
8134: WSH_DEBUG_SV.log(l_module_name, 'l_non_bulk_count',l_non_bulk_count);
8135: WSH_DEBUG_SV.log(l_module_name, 'l_num_errors',l_num_errors);
8136: WSH_DEBUG_SV.log(l_module_name, 'l_num_warnings',l_num_warnings);
8137: END IF;
8138:
8139: IF ( (l_num_errors >= l_non_bulk_count and l_non_bulk_count > 0 ) OR (l_num_om_errors >= l_num_om_api_call and l_num_om_api_call > 0) ) THEN
8132: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_errors',l_num_om_errors);
8133: WSH_DEBUG_SV.log(l_module_name, 'l_num_om_warnings',l_num_om_warnings);
8134: WSH_DEBUG_SV.log(l_module_name, 'l_non_bulk_count',l_non_bulk_count);
8135: WSH_DEBUG_SV.log(l_module_name, 'l_num_errors',l_num_errors);
8136: WSH_DEBUG_SV.log(l_module_name, 'l_num_warnings',l_num_warnings);
8137: END IF;
8138:
8139: IF ( (l_num_errors >= l_non_bulk_count and l_non_bulk_count > 0 ) OR (l_num_om_errors >= l_num_om_api_call and l_num_om_api_call > 0) ) THEN
8140: raise fnd_api.g_exc_error;
8147: END IF;
8148:
8149:
8150: IF l_debug_on THEN
8151: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
8152: WSH_DEBUG_SV.pop(l_module_name);
8153: END IF;
8154:
8155: EXCEPTION
8148:
8149:
8150: IF l_debug_on THEN
8151: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
8152: WSH_DEBUG_SV.pop(l_module_name);
8153: END IF;
8154:
8155: EXCEPTION
8156:
8179: close c_picked_dd;
8180: END IF;
8181:
8182: IF l_debug_on THEN
8183: WSH_DEBUG_SV.logmsg(l_module_name,'fnd_api.g_exc_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8184: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:fnd_api.g_exc_error');
8185: END IF;
8186: --
8187:
8180: END IF;
8181:
8182: IF l_debug_on THEN
8183: WSH_DEBUG_SV.logmsg(l_module_name,'fnd_api.g_exc_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8184: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:fnd_api.g_exc_error');
8185: END IF;
8186: --
8187:
8188: WHEN wsh_util_core.g_exc_warning THEN
8210: close c_picked_dd;
8211: END IF;
8212:
8213: IF l_debug_on THEN
8214: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.g_exc_warning exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8215: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:wsh_util_core.g_exc_warning');
8216: END IF;
8217:
8218: WHEN fnd_api.g_exc_unexpected_error THEN
8211: END IF;
8212:
8213: IF l_debug_on THEN
8214: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.g_exc_warning exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8215: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:wsh_util_core.g_exc_warning');
8216: END IF;
8217:
8218: WHEN fnd_api.g_exc_unexpected_error THEN
8219: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8240: close c_picked_dd;
8241: END IF;
8242:
8243: IF l_debug_on THEN
8244: WSH_DEBUG_SV.logmsg(l_module_name,'fnd_api.g_exc_unexpected exception has occured: '||SQLERRM,WSH_DEBUG_SV.C_EXCEP_LEVEL);
8245: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:wsh_util_core.g_exc_warning');
8246: END IF;
8247:
8248:
8241: END IF;
8242:
8243: IF l_debug_on THEN
8244: WSH_DEBUG_SV.logmsg(l_module_name,'fnd_api.g_exc_unexpected exception has occured: '||SQLERRM,WSH_DEBUG_SV.C_EXCEP_LEVEL);
8245: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:wsh_util_core.g_exc_warning');
8246: END IF;
8247:
8248:
8249: WHEN line_locked THEN
8271: close c_picked_dd;
8272: END IF;
8273:
8274: IF l_debug_on THEN
8275: WSH_DEBUG_SV.logmsg(l_module_name,'LINE_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8276: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:LINE_LOCKED');
8277: END IF;
8278: --
8279:
8272: END IF;
8273:
8274: IF l_debug_on THEN
8275: WSH_DEBUG_SV.logmsg(l_module_name,'LINE_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8276: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:LINE_LOCKED');
8277: END IF;
8278: --
8279:
8280: WHEN others THEN
8306: wsh_util_core.printMsg('API interface_line_to_OM failed with an unexpected error');
8307: WSH_UTIL_CORE.PrintMsg('The unexpected error is ' || l_error_text);
8308: --
8309: IF l_debug_on THEN
8310: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN INTERFACE_HEADER_TO_OM ' );
8311: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM
8312: ,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8313: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8314: END IF;
8307: WSH_UTIL_CORE.PrintMsg('The unexpected error is ' || l_error_text);
8308: --
8309: IF l_debug_on THEN
8310: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN INTERFACE_HEADER_TO_OM ' );
8311: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM
8312: ,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8313: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8314: END IF;
8315: --
8308: --
8309: IF l_debug_on THEN
8310: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN INTERFACE_HEADER_TO_OM ' );
8311: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM
8312: ,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8313: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8314: END IF;
8315: --
8316: END interface_stop_to_OM;
8309: IF l_debug_on THEN
8310: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN INTERFACE_HEADER_TO_OM ' );
8311: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM
8312: ,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8313: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8314: END IF;
8315: --
8316: END interface_stop_to_OM;
8317:
8360: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8361: --
8362: IF l_debug_on IS NULL
8363: THEN
8364: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8365: END IF;
8366: --
8367: IF l_debug_on THEN
8368: WSH_DEBUG_SV.push(l_module_name);
8364: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8365: END IF;
8366: --
8367: IF l_debug_on THEN
8368: WSH_DEBUG_SV.push(l_module_name);
8369: --
8370: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
8371: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_HEADER_ID',P_TRANSACTION_HEADER_ID);
8372: END IF;
8366: --
8367: IF l_debug_on THEN
8368: WSH_DEBUG_SV.push(l_module_name);
8369: --
8370: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
8371: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_HEADER_ID',P_TRANSACTION_HEADER_ID);
8372: END IF;
8373: --
8374: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8367: IF l_debug_on THEN
8368: WSH_DEBUG_SV.push(l_module_name);
8369: --
8370: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
8371: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_HEADER_ID',P_TRANSACTION_HEADER_ID);
8372: END IF;
8373: --
8374: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8375: -- mark all 'N' as 'P'
8398:
8399: -- process online
8400: --
8401: IF l_debug_on THEN
8402: WSH_DEBUG_SV.log(l_module_name,'Number of rows updated',SQL%ROWCOUNT);
8403: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
8404: WSH_DEBUG_SV.logmsg(l_module_name, 'RIGHT BEFORE CALLING MTL_ONLINE_TRANSACTION_PUB.PROCESS_ONLINE' );
8405: END IF;
8406: --
8399: -- process online
8400: --
8401: IF l_debug_on THEN
8402: WSH_DEBUG_SV.log(l_module_name,'Number of rows updated',SQL%ROWCOUNT);
8403: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
8404: WSH_DEBUG_SV.logmsg(l_module_name, 'RIGHT BEFORE CALLING MTL_ONLINE_TRANSACTION_PUB.PROCESS_ONLINE' );
8405: END IF;
8406: --
8407: --Bugfix#2346011.
8400: --
8401: IF l_debug_on THEN
8402: WSH_DEBUG_SV.log(l_module_name,'Number of rows updated',SQL%ROWCOUNT);
8403: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
8404: WSH_DEBUG_SV.logmsg(l_module_name, 'RIGHT BEFORE CALLING MTL_ONLINE_TRANSACTION_PUB.PROCESS_ONLINE' );
8405: END IF;
8406: --
8407: --Bugfix#2346011.
8408: l_profile_time_out := TO_NUMBER(FND_PROFILE.VALUE('INV_RPC_TIMEOUT'));
8412: END IF;
8413:
8414: --
8415: IF l_debug_on THEN
8416: WSH_DEBUG_SV.logmsg(l_module_name, 'TIMEOUT VALUE: '||L_TIME_OUT );
8417: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit MTL_ONLINE_TRANSACTION_PUB.PROCESS_ONLINE',WSH_DEBUG_SV.C_PROC_LEVEL);
8418: END IF;
8419: --
8420: --Bugfix#2346011.
8413:
8414: --
8415: IF l_debug_on THEN
8416: WSH_DEBUG_SV.logmsg(l_module_name, 'TIMEOUT VALUE: '||L_TIME_OUT );
8417: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit MTL_ONLINE_TRANSACTION_PUB.PROCESS_ONLINE',WSH_DEBUG_SV.C_PROC_LEVEL);
8418: END IF;
8419: --
8420: --Bugfix#2346011.
8421: l_outcome := mtl_online_transaction_pub.process_online(
8425: x_error_explanation
8426: );
8427: --
8428: IF l_debug_on THEN
8429: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
8430: WSH_DEBUG_SV.log(l_module_name,'l_outcome',l_outcome);
8431: END IF;
8432: --
8433: /* what should we do if the online processer is hanging
8426: );
8427: --
8428: IF l_debug_on THEN
8429: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
8430: WSH_DEBUG_SV.log(l_module_name,'l_outcome',l_outcome);
8431: END IF;
8432: --
8433: /* what should we do if the online processer is hanging
8434: because manager is not aviable. User needs to be informed */
8438: WSH_UTIL_CORE.printMsg('Error Code:' || x_error_code);
8439: WSH_UTIL_CORE.printMsg('Error Explanation:' || x_error_explanation);
8440: WSH_UTIL_CORE.printMsg('Retrieving messages from the stack');
8441: IF l_debug_on THEN
8442: WSH_DEBUG_SV.log(l_module_name,'Error Code:',x_error_code);
8443: WSH_DEBUG_SV.log(l_module_name,'Error Explanation::',
8444: x_error_explanation);
8445: END IF;
8446: l_process_online_msg_count := fnd_msg_pub.count_msg;
8439: WSH_UTIL_CORE.printMsg('Error Explanation:' || x_error_explanation);
8440: WSH_UTIL_CORE.printMsg('Retrieving messages from the stack');
8441: IF l_debug_on THEN
8442: WSH_DEBUG_SV.log(l_module_name,'Error Code:',x_error_code);
8443: WSH_DEBUG_SV.log(l_module_name,'Error Explanation::',
8444: x_error_explanation);
8445: END IF;
8446: l_process_online_msg_count := fnd_msg_pub.count_msg;
8447: if l_process_online_msg_count > 0 then
8450: l_process_online_message := fnd_msg_pub.get(i,'T');
8451: l_process_online_message := replace(l_process_online_message,fnd_global.local_chr(0), ' ');
8452: WSH_UTIL_CORE.PrintMsg(l_process_online_message);
8453: IF l_debug_on THEN
8454: WSH_DEBUG_SV.log(l_module_name,'Error txt:',
8455: SUBSTR(l_process_online_message,1,200));
8456: END IF;
8457: END LOOP;
8458: end if;
8459:
8460: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8461: --
8462: IF l_debug_on THEN
8463: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
8464: WSH_DEBUG_SV.pop(l_module_name);
8465: END IF;
8466: --
8467: return ;
8460: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8461: --
8462: IF l_debug_on THEN
8463: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
8464: WSH_DEBUG_SV.pop(l_module_name);
8465: END IF;
8466: --
8467: return ;
8468: end if ;
8476: WSH_UTIL_CORE.PrintMsg('process_inv_online failed for batch '|| p_batch_id ||': txn '
8477: || p_transaction_header_id );
8478: --
8479: IF l_debug_on THEN
8480: WSH_DEBUG_SV.log(l_module_name,'process_inv_online failed for Batch '
8481: || p_batch_id|| ': txn '|| p_transaction_header_id );
8482: WSH_DEBUG_SV.pop(l_module_name);
8483: END IF;
8484: --
8478: --
8479: IF l_debug_on THEN
8480: WSH_DEBUG_SV.log(l_module_name,'process_inv_online failed for Batch '
8481: || p_batch_id|| ': txn '|| p_transaction_header_id );
8482: WSH_DEBUG_SV.pop(l_module_name);
8483: END IF;
8484: --
8485: return ;
8486: end if;
8485: return ;
8486: end if;
8487: --
8488: IF l_debug_on THEN
8489: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
8490: WSH_DEBUG_SV.pop(l_module_name);
8491: END IF;
8492: --
8493: EXCEPTION
8486: end if;
8487: --
8488: IF l_debug_on THEN
8489: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
8490: WSH_DEBUG_SV.pop(l_module_name);
8491: END IF;
8492: --
8493: EXCEPTION
8494: WHEN others THEN
8498: WSH_UTIL_CORE.PrintMsg(p_transaction_header_id ||': process_inv_online failed ');
8499: WSH_UTIL_CORE.PrintMsg('The unexpected error is ' || l_error_text);
8500: --
8501: IF l_debug_on THEN
8502: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8503: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8504: END IF;
8505: --
8506: end process_inv_online ;
8499: WSH_UTIL_CORE.PrintMsg('The unexpected error is ' || l_error_text);
8500: --
8501: IF l_debug_on THEN
8502: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8503: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8504: END IF;
8505: --
8506: end process_inv_online ;
8507:
8563: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8564: --
8565: IF l_debug_on IS NULL
8566: THEN
8567: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8568: END IF;
8569: --
8570: IF l_debug_on THEN
8571: WSH_DEBUG_SV.push(l_module_name);
8567: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8568: END IF;
8569: --
8570: IF l_debug_on THEN
8571: WSH_DEBUG_SV.push(l_module_name);
8572: --
8573: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
8574: END IF;
8575: --
8569: --
8570: IF l_debug_on THEN
8571: WSH_DEBUG_SV.push(l_module_name);
8572: --
8573: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
8574: END IF;
8575: --
8576: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8577: OPEN c_details(p_delivery_detail_id);
8578: FETCH c_details INTO l_detail_rec;
8579: CLOSE c_details;
8580:
8581: IF l_debug_on THEN
8582: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_detail_rec.source_line_id);
8583: WSH_DEBUG_SV.log(l_module_name,'organization_id',l_detail_rec.organization_id);
8584: WSH_DEBUG_SV.log(l_module_name,'org_id',l_detail_rec.org_id);
8585: END IF;
8586:
8579: CLOSE c_details;
8580:
8581: IF l_debug_on THEN
8582: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_detail_rec.source_line_id);
8583: WSH_DEBUG_SV.log(l_module_name,'organization_id',l_detail_rec.organization_id);
8584: WSH_DEBUG_SV.log(l_module_name,'org_id',l_detail_rec.org_id);
8585: END IF;
8586:
8587: IF l_detail_rec.org_id IS NULL THEN
8580:
8581: IF l_debug_on THEN
8582: WSH_DEBUG_SV.log(l_module_name,'source_line_id',l_detail_rec.source_line_id);
8583: WSH_DEBUG_SV.log(l_module_name,'organization_id',l_detail_rec.organization_id);
8584: WSH_DEBUG_SV.log(l_module_name,'org_id',l_detail_rec.org_id);
8585: END IF;
8586:
8587: IF l_detail_rec.org_id IS NULL THEN
8588: SELECT ORG_ID
8589: INTO l_detail_rec.org_id
8590: FROM OE_ORDER_LINES_ALL
8591: WHERE LINE_ID = l_detail_rec.SOURCE_LINE_ID;
8592: IF l_debug_on THEN
8593: WSH_DEBUG_SV.log(l_module_name,'derived org_id', l_detail_rec.org_id);
8594: END IF;
8595: END IF;
8596:
8597: OPEN c_dispatch_account(l_detail_rec.organization_id);
8606: -- bug 2756842 - to reset message stack
8607: oe_msg_pub.initialize();
8608: --
8609: IF l_debug_on THEN
8610: WSH_DEBUG_SV.log(l_module_name,'l_dispatch_account',
8611: l_dispatch_account.goods_dispatched_account);
8612: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_FLEX_COGS_PUB.START_PROCESS',WSH_DEBUG_SV.C_PROC_LEVEL);
8613: END IF;
8614: --
8608: --
8609: IF l_debug_on THEN
8610: WSH_DEBUG_SV.log(l_module_name,'l_dispatch_account',
8611: l_dispatch_account.goods_dispatched_account);
8612: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_FLEX_COGS_PUB.START_PROCESS',WSH_DEBUG_SV.C_PROC_LEVEL);
8613: END IF;
8614: --
8615: l_cogs_return_status := OE_FLEX_COGS_PUB.Start_Process(
8616: 1.0,
8622: l_cogs_msg_count,
8623: l_cogs_msg_data);
8624: --
8625: IF l_debug_on THEN
8626: WSH_DEBUG_SV.logmsg(l_module_name, 'NO. OF OE MESSAGES :'||L_COGS_MSG_COUNT );
8627: WSH_DEBUG_SV.logmsg(l_module_name, 'RETURN STATUS FROM OE_FLEX_COGS_PUB.START_PROCESS IS ' || L_COGS_RETURN_STATUS );
8628: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_SEGS IS ' || L_COGS_CONCAT_SEGS );
8629: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_IDS IS ' || L_COGS_CONCAT_IDS );
8630: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_DESCRS IS ' || L_COGS_CONCAT_DESCRS );
8623: l_cogs_msg_data);
8624: --
8625: IF l_debug_on THEN
8626: WSH_DEBUG_SV.logmsg(l_module_name, 'NO. OF OE MESSAGES :'||L_COGS_MSG_COUNT );
8627: WSH_DEBUG_SV.logmsg(l_module_name, 'RETURN STATUS FROM OE_FLEX_COGS_PUB.START_PROCESS IS ' || L_COGS_RETURN_STATUS );
8628: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_SEGS IS ' || L_COGS_CONCAT_SEGS );
8629: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_IDS IS ' || L_COGS_CONCAT_IDS );
8630: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_DESCRS IS ' || L_COGS_CONCAT_DESCRS );
8631: WSH_DEBUG_SV.logmsg(l_module_name, 'L_CONGS_RETURN_CCID IS ' || L_COGS_RETURN_CCID );
8624: --
8625: IF l_debug_on THEN
8626: WSH_DEBUG_SV.logmsg(l_module_name, 'NO. OF OE MESSAGES :'||L_COGS_MSG_COUNT );
8627: WSH_DEBUG_SV.logmsg(l_module_name, 'RETURN STATUS FROM OE_FLEX_COGS_PUB.START_PROCESS IS ' || L_COGS_RETURN_STATUS );
8628: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_SEGS IS ' || L_COGS_CONCAT_SEGS );
8629: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_IDS IS ' || L_COGS_CONCAT_IDS );
8630: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_DESCRS IS ' || L_COGS_CONCAT_DESCRS );
8631: WSH_DEBUG_SV.logmsg(l_module_name, 'L_CONGS_RETURN_CCID IS ' || L_COGS_RETURN_CCID );
8632: END IF;
8625: IF l_debug_on THEN
8626: WSH_DEBUG_SV.logmsg(l_module_name, 'NO. OF OE MESSAGES :'||L_COGS_MSG_COUNT );
8627: WSH_DEBUG_SV.logmsg(l_module_name, 'RETURN STATUS FROM OE_FLEX_COGS_PUB.START_PROCESS IS ' || L_COGS_RETURN_STATUS );
8628: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_SEGS IS ' || L_COGS_CONCAT_SEGS );
8629: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_IDS IS ' || L_COGS_CONCAT_IDS );
8630: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_DESCRS IS ' || L_COGS_CONCAT_DESCRS );
8631: WSH_DEBUG_SV.logmsg(l_module_name, 'L_CONGS_RETURN_CCID IS ' || L_COGS_RETURN_CCID );
8632: END IF;
8633: --
8626: WSH_DEBUG_SV.logmsg(l_module_name, 'NO. OF OE MESSAGES :'||L_COGS_MSG_COUNT );
8627: WSH_DEBUG_SV.logmsg(l_module_name, 'RETURN STATUS FROM OE_FLEX_COGS_PUB.START_PROCESS IS ' || L_COGS_RETURN_STATUS );
8628: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_SEGS IS ' || L_COGS_CONCAT_SEGS );
8629: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_IDS IS ' || L_COGS_CONCAT_IDS );
8630: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_DESCRS IS ' || L_COGS_CONCAT_DESCRS );
8631: WSH_DEBUG_SV.logmsg(l_module_name, 'L_CONGS_RETURN_CCID IS ' || L_COGS_RETURN_CCID );
8632: END IF;
8633: --
8634:
8627: WSH_DEBUG_SV.logmsg(l_module_name, 'RETURN STATUS FROM OE_FLEX_COGS_PUB.START_PROCESS IS ' || L_COGS_RETURN_STATUS );
8628: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_SEGS IS ' || L_COGS_CONCAT_SEGS );
8629: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_IDS IS ' || L_COGS_CONCAT_IDS );
8630: WSH_DEBUG_SV.logmsg(l_module_name, 'CONCAT_DESCRS IS ' || L_COGS_CONCAT_DESCRS );
8631: WSH_DEBUG_SV.logmsg(l_module_name, 'L_CONGS_RETURN_CCID IS ' || L_COGS_RETURN_CCID );
8632: END IF;
8633: --
8634:
8635: IF l_cogs_msg_count is not null then
8640: p_encoded => 'F'
8641: );
8642: --
8643: IF l_debug_on THEN
8644: WSH_DEBUG_SV.logmsg(l_module_name, SUBSTR ( L_COGS_MSG_DATA , 1 , 255 ) );
8645: END IF;
8646: --
8647: END LOOP;
8648:
8658: x_return_status := l_cogs_return_status;
8659:
8660: --
8661: IF l_debug_on THEN
8662: WSH_DEBUG_SV.log(l_module_name,'l_account',l_account);
8663: WSH_DEBUG_SV.pop(l_module_name);
8664: END IF;
8665: --
8666: RETURN(l_account);
8659:
8660: --
8661: IF l_debug_on THEN
8662: WSH_DEBUG_SV.log(l_module_name,'l_account',l_account);
8663: WSH_DEBUG_SV.pop(l_module_name);
8664: END IF;
8665: --
8666: RETURN(l_account);
8667:
8679: END IF;
8680: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8681: --
8682: IF l_debug_on THEN
8683: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DEF_GOODS_DISPATCHED_ACCT exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8684: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DEF_GOODS_DISPATCHED_ACCT');
8685: END IF;
8686: --
8687: RETURN NULL;
8680: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8681: --
8682: IF l_debug_on THEN
8683: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DEF_GOODS_DISPATCHED_ACCT exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8684: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DEF_GOODS_DISPATCHED_ACCT');
8685: END IF;
8686: --
8687: RETURN NULL;
8688:
8701: close c_dispatch_account;
8702: END IF;
8703: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8704: IF l_debug_on THEN
8705: WSH_DEBUG_SV.logmsg(l_module_name,'Unhandled exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8706: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8707: END IF;
8708: RETURN NULL;
8709: --
8702: END IF;
8703: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8704: IF l_debug_on THEN
8705: WSH_DEBUG_SV.logmsg(l_module_name,'Unhandled exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8706: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8707: END IF;
8708: RETURN NULL;
8709: --
8710: END Get_Account;
8734: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8735: --
8736: IF l_debug_on IS NULL
8737: THEN
8738: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8739: END IF;
8740: --
8741: IF l_debug_on THEN
8742: WSH_DEBUG_SV.push(l_module_name);
8738: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8739: END IF;
8740: --
8741: IF l_debug_on THEN
8742: WSH_DEBUG_SV.push(l_module_name);
8743: --
8744: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
8745: END IF;
8746: --
8740: --
8741: IF l_debug_on THEN
8742: WSH_DEBUG_SV.push(l_module_name);
8743: --
8744: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
8745: END IF;
8746: --
8747: IF INV_INTERFACED(p_batch_id) THEN
8748: --
8746: --
8747: IF INV_INTERFACED(p_batch_id) THEN
8748: --
8749: IF l_debug_on THEN
8750: WSH_DEBUG_SV.log(l_module_name,'Returning OM_INTERFACED');
8751: WSH_DEBUG_SV.pop(l_module_name);
8752: END IF;
8753: --
8754: RETURN OM_INTERFACED(p_batch_id);
8747: IF INV_INTERFACED(p_batch_id) THEN
8748: --
8749: IF l_debug_on THEN
8750: WSH_DEBUG_SV.log(l_module_name,'Returning OM_INTERFACED');
8751: WSH_DEBUG_SV.pop(l_module_name);
8752: END IF;
8753: --
8754: RETURN OM_INTERFACED(p_batch_id);
8755: END IF;
8754: RETURN OM_INTERFACED(p_batch_id);
8755: END IF;
8756: --
8757: IF l_debug_on THEN
8758: WSH_DEBUG_SV.log(l_module_name,'Return False');
8759: WSH_DEBUG_SV.pop(l_module_name);
8760: END IF;
8761: RETURN FALSE;
8762: END ALL_INTERFACED;
8755: END IF;
8756: --
8757: IF l_debug_on THEN
8758: WSH_DEBUG_SV.log(l_module_name,'Return False');
8759: WSH_DEBUG_SV.pop(l_module_name);
8760: END IF;
8761: RETURN FALSE;
8762: END ALL_INTERFACED;
8763:
8809: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8810: --
8811: IF l_debug_on IS NULL
8812: THEN
8813: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8814: END IF;
8815: --
8816: IF l_debug_on THEN
8817: WSH_DEBUG_SV.push(l_module_name);
8813: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8814: END IF;
8815: --
8816: IF l_debug_on THEN
8817: WSH_DEBUG_SV.push(l_module_name);
8818: --
8819: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
8820: END IF;
8821: --
8815: --
8816: IF l_debug_on THEN
8817: WSH_DEBUG_SV.push(l_module_name);
8818: --
8819: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
8820: END IF;
8821: --
8822: OPEN c_lines_not_interfaced(P_batch_id);
8823: FETCH c_lines_not_interfaced INTO l_temp;
8824: flag := c_lines_not_interfaced%NOTFOUND;
8825: CLOSE c_lines_not_interfaced;
8826: --
8827: IF l_debug_on THEN
8828: WSH_DEBUG_SV.log(l_module_name,' flag', flag);
8829: WSH_DEBUG_SV.pop(l_module_name);
8830: END IF;
8831: --
8832: RETURN flag;
8825: CLOSE c_lines_not_interfaced;
8826: --
8827: IF l_debug_on THEN
8828: WSH_DEBUG_SV.log(l_module_name,' flag', flag);
8829: WSH_DEBUG_SV.pop(l_module_name);
8830: END IF;
8831: --
8832: RETURN flag;
8833: END INV_INTERFACED ;
8876: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8877: --
8878: IF l_debug_on IS NULL
8879: THEN
8880: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8881: END IF;
8882: --
8883: IF l_debug_on THEN
8884: WSH_DEBUG_SV.push(l_module_name);
8880: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8881: END IF;
8882: --
8883: IF l_debug_on THEN
8884: WSH_DEBUG_SV.push(l_module_name);
8885: --
8886: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
8887: END IF;
8888: --
8882: --
8883: IF l_debug_on THEN
8884: WSH_DEBUG_SV.push(l_module_name);
8885: --
8886: WSH_DEBUG_SV.log(l_module_name,'p_batch_id',p_batch_id);
8887: END IF;
8888: --
8889: OPEN c_lines_not_interfaced(p_batch_id);
8890: FETCH c_lines_not_interfaced INTO l_temp;
8891: flag := c_lines_not_interfaced%NOTFOUND;
8892: CLOSE c_lines_not_interfaced;
8893: --
8894: IF l_debug_on THEN
8895: WSH_DEBUG_SV.log(l_module_name,'flag',flag);
8896: WSH_DEBUG_SV.pop(l_module_name);
8897: END IF;
8898: --
8899: RETURN flag;
8892: CLOSE c_lines_not_interfaced;
8893: --
8894: IF l_debug_on THEN
8895: WSH_DEBUG_SV.log(l_module_name,'flag',flag);
8896: WSH_DEBUG_SV.pop(l_module_name);
8897: END IF;
8898: --
8899: RETURN flag;
8900: END OM_INTERFACED ;
8989: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8990: --
8991: IF l_debug_on IS NULL
8992: THEN
8993: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8994: END IF;
8995: --
8996: IF l_debug_on THEN
8997: WSH_DEBUG_SV.push(l_module_name);
8993: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8994: END IF;
8995: --
8996: IF l_debug_on THEN
8997: WSH_DEBUG_SV.push(l_module_name);
8998: --
8999: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
9000: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
9001: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
8995: --
8996: IF l_debug_on THEN
8997: WSH_DEBUG_SV.push(l_module_name);
8998: --
8999: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
9000: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
9001: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
9002: WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
9003: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
8996: IF l_debug_on THEN
8997: WSH_DEBUG_SV.push(l_module_name);
8998: --
8999: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
9000: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
9001: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
9002: WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
9003: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
9004: WSH_DEBUG_SV.log(l_module_name,'p_num_requests',p_num_requests);
8997: WSH_DEBUG_SV.push(l_module_name);
8998: --
8999: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
9000: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
9001: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
9002: WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
9003: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
9004: WSH_DEBUG_SV.log(l_module_name,'p_num_requests',p_num_requests);
9005: WSH_DEBUG_SV.log(l_module_name,'p_stops_per_batch',p_stops_per_batch);
8998: --
8999: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
9000: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
9001: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
9002: WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
9003: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
9004: WSH_DEBUG_SV.log(l_module_name,'p_num_requests',p_num_requests);
9005: WSH_DEBUG_SV.log(l_module_name,'p_stops_per_batch',p_stops_per_batch);
9006: END IF;
8999: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
9000: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
9001: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
9002: WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
9003: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
9004: WSH_DEBUG_SV.log(l_module_name,'p_num_requests',p_num_requests);
9005: WSH_DEBUG_SV.log(l_module_name,'p_stops_per_batch',p_stops_per_batch);
9006: END IF;
9007: --
9000: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID',P_STOP_ID);
9001: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
9002: WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
9003: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
9004: WSH_DEBUG_SV.log(l_module_name,'p_num_requests',p_num_requests);
9005: WSH_DEBUG_SV.log(l_module_name,'p_stops_per_batch',p_stops_per_batch);
9006: END IF;
9007: --
9008: l_completion_status := 'NORMAL';
9001: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
9002: WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
9003: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
9004: WSH_DEBUG_SV.log(l_module_name,'p_num_requests',p_num_requests);
9005: WSH_DEBUG_SV.log(l_module_name,'p_stops_per_batch',p_stops_per_batch);
9006: END IF;
9007: --
9008: l_completion_status := 'NORMAL';
9009:
9011: IF l_num_requests = 0 THEN
9012: l_num_requests := 1;
9013: ELSIF l_num_requests < 0 THEN
9014: IF l_debug_on THEN
9015: WSH_DEBUG_SV.log(l_module_name,'Number of requests cannot be negative'
9016: ,l_num_requests);
9017: END IF;
9018: RAISE e_invalid_number;
9019: END IF;
9019: END IF;
9020:
9021: l_req_data := FND_CONC_GLOBAL.request_data ;
9022: IF l_debug_on THEN
9023: WSH_DEBUG_SV.log(l_module_name,'l_req_data',l_req_data);
9024: END IF;
9025:
9026: IF (l_req_data IS NULL) THEN
9027: IF (l_num_requests > 1)THEN --{
9041: argument9 => p_stops_per_batch
9042: );
9043:
9044: IF l_debug_on THEN
9045: WSH_DEBUG_SV.log(l_module_name,'child request',l_request_id);
9046: END IF;
9047:
9048: END LOOP;
9049: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
9085: ELSIF l_dev_status <> 'NORMAL' THEN
9086: l_errors := l_errors + 1;
9087: END IF;
9088: IF l_debug_on THEN
9089: WSH_DEBUG_SV.log(l_module_name,'l_dev_status',l_dev_status);
9090: WSH_DEBUG_SV.log(l_module_name,'l_child_req_id'
9091: ,l_child_req_ids(j));
9092: END IF;
9093:
9086: l_errors := l_errors + 1;
9087: END IF;
9088: IF l_debug_on THEN
9089: WSH_DEBUG_SV.log(l_module_name,'l_dev_status',l_dev_status);
9090: WSH_DEBUG_SV.log(l_module_name,'l_child_req_id'
9091: ,l_child_req_ids(j));
9092: END IF;
9093:
9094: FND_MESSAGE.SET_NAME('WSH','WSH_CHILD_REQ_STATUS');
9122: --
9123: END IF; --}
9124:
9125: IF l_debug_on THEN
9126: WSH_DEBUG_SV.log(l_module_name,'errbuf',errbuf);
9127: WSH_DEBUG_SV.log(l_module_name,'retcode',retcode);
9128: WSH_DEBUG_SV.log(l_module_name,'l_completion_status',l_completion_status);
9129: WSH_DEBUG_SV.pop(l_module_name);
9130: END IF;
9123: END IF; --}
9124:
9125: IF l_debug_on THEN
9126: WSH_DEBUG_SV.log(l_module_name,'errbuf',errbuf);
9127: WSH_DEBUG_SV.log(l_module_name,'retcode',retcode);
9128: WSH_DEBUG_SV.log(l_module_name,'l_completion_status',l_completion_status);
9129: WSH_DEBUG_SV.pop(l_module_name);
9130: END IF;
9131: --
9124:
9125: IF l_debug_on THEN
9126: WSH_DEBUG_SV.log(l_module_name,'errbuf',errbuf);
9127: WSH_DEBUG_SV.log(l_module_name,'retcode',retcode);
9128: WSH_DEBUG_SV.log(l_module_name,'l_completion_status',l_completion_status);
9129: WSH_DEBUG_SV.pop(l_module_name);
9130: END IF;
9131: --
9132:
9125: IF l_debug_on THEN
9126: WSH_DEBUG_SV.log(l_module_name,'errbuf',errbuf);
9127: WSH_DEBUG_SV.log(l_module_name,'retcode',retcode);
9128: WSH_DEBUG_SV.log(l_module_name,'l_completion_status',l_completion_status);
9129: WSH_DEBUG_SV.pop(l_module_name);
9130: END IF;
9131: --
9132:
9133: EXCEPTION
9139: errbuf := 'Interface trip stop failed with unexpected error';
9140: retcode := '2';
9141: --
9142: IF l_debug_on THEN
9143: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_invalid_number');
9144: END IF;
9145: --
9146: WHEN OTHERS THEN
9147: l_completion_status := 'ERROR';
9153: errbuf := 'Interface trip stop failed with unexpected error';
9154: retcode := '2';
9155: --
9156: IF l_debug_on THEN
9157: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9158: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9159: END IF;
9160: --
9161: END interface_ALL_wrp;
9154: retcode := '2';
9155: --
9156: IF l_debug_on THEN
9157: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9158: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9159: END IF;
9160: --
9161: END interface_ALL_wrp;
9162: END WSH_SHIP_CONFIRM_ACTIONS;