[Home] [Help]
226: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
227: --
228: IF l_debug_on IS NULL
229: THEN
230: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
231: END IF;
232: --
233: IF l_debug_on THEN
234: WSH_DEBUG_SV.push(l_module_name);
230: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
231: END IF;
232: --
233: IF l_debug_on THEN
234: WSH_DEBUG_SV.push(l_module_name);
235: --
236: -- 2587777
237:
238: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY2_TO_UNRESERVE',P_QUANTITY2_TO_UNRESERVE);
234: WSH_DEBUG_SV.push(l_module_name);
235: --
236: -- 2587777
237:
238: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY2_TO_UNRESERVE',P_QUANTITY2_TO_UNRESERVE);
239: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID:P_QUANTITY_TO_UNRESERVE:P_QUANTITY2_TO_UNRESERVE: P_UNRESERVE_MODE:
240: P_OVERRIDE_RETAIN_ATO_RSV ;',
241: P_DELIVERY_DETAIL_ID
242: ||':'||P_QUANTITY_TO_UNRESERVE
235: --
236: -- 2587777
237:
238: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY2_TO_UNRESERVE',P_QUANTITY2_TO_UNRESERVE);
239: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID:P_QUANTITY_TO_UNRESERVE:P_QUANTITY2_TO_UNRESERVE: P_UNRESERVE_MODE:
240: P_OVERRIDE_RETAIN_ATO_RSV ;',
241: P_DELIVERY_DETAIL_ID
242: ||':'||P_QUANTITY_TO_UNRESERVE
243: ||':'||P_QUANTITY2_TO_UNRESERVE
251: END IF;
252:
253: --
254: IF l_debug_on THEN
255: WSH_DEBUG_SV.logmsg(l_module_name, 'P_DELIVERY_DETAIL_ID : G_CODE_RELEASE_LEVEL ;'
256: || P_DELIVERY_DETAIL_ID ||': '|| G_CODE_RELEASE_LEVEL );
257: END IF;
258: --
259:
262: END IF;
263:
264: --
265: IF l_debug_on THEN
266: WSH_DEBUG_SV.logmsg(l_module_name, 'G_CODE_RELEASE_LEVEL ' || G_CODE_RELEASE_LEVEL );
267: END IF;
268: --
269:
270: OPEN c_line_details;
282: -- HW BUG#:2005977
283: --
284: IF l_debug_on THEN
285: -- 2747520
286: WSH_DEBUG_SV.log(l_module_name,'Ln_id:Hdr_id:Org_id:Src-doc-id:SubInv:Rev:Lot#:Locat-id ; ',
287: l_line_rec.line_id
288: ||':'|| l_line_rec.header_id
289: ||':'|| l_line_rec.organization_id
290: ||':'|| l_line_rec.source_document_type_id
295: ||':'|| l_line_rec.inventory_item_id
296: ||':'|| l_line_rec.requested_quantity_uom
297: ||':'|| l_line_rec.ordered_quantity_uom2
298: ||':'|| l_line_rec.locator_id);
299: WSH_DEBUG_SV.log(l_module_name,'ATO-Ln-id : Rel-Stat : Dt-Sched HH24:MI:SS ; ',
300: l_line_rec.ato_line_id
301: ||':'|| l_line_rec.released_status
302: ||':'|| to_char(l_line_rec.date_scheduled,'MM/DD/YYYY HH24:MI:SS'));
303: -- muom
300: l_line_rec.ato_line_id
301: ||':'|| l_line_rec.released_status
302: ||':'|| to_char(l_line_rec.date_scheduled,'MM/DD/YYYY HH24:MI:SS'));
303: -- muom
304: WSH_DEBUG_SV.log(l_module_name,'l_fulfillment_base ',l_fulfillment_base);
305:
306: -- 2587777
307:
308: END IF;
324: -- Get demand_source_header_id from mtl_sales_orders
325:
326: --
327: IF l_debug_on THEN
328: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_SALESORDER.GET_SALESORDER_FOR_OEHEADER',WSH_DEBUG_SV.C_PROC_LEVEL);
329: END IF;
330: --
331: -- caching the sales_order_id : 2807093-2747520
332: IF ( l_sales_order_id is NULL OR l_line_rec.header_id <> nvl(g_header_id, 0) ) THEN
335: g_header_id := l_line_rec.header_id;
336: END IF;
337: --
338: IF l_debug_on THEN
339: WSH_DEBUG_SV.logmsg(l_module_name, 'L_SALES_ORDER_ID' || L_SALES_ORDER_ID );
340: END IF;
341: --
342:
343: l_rsv_rec.demand_source_header_id := l_sales_order_id;
374: IF WMS_DIRECT_SHIP_PVT.check_direct_ship_for_lpn(l_lpn_id) THEN
375: l_chk_direct_ship:=TRUE;
376: --
377: IF l_debug_on THEN
378: WSH_DEBUG_SV.log(l_module_name,' Direct Ship l_lpn_id', l_lpn_id);
379: END IF;
380: --
381: ELSE
382: l_chk_direct_ship:=FALSE;
386:
387: l_rsv_rec.lpn_id := l_lpn_id;
388: --
389: IF l_debug_on THEN
390: WSH_DEBUG_SV.log(l_module_name,' l_rsv_rec.lpn_id', l_lpn_id);
391: END IF;
392: --
393: END IF;
394: --
409: -- HW BUG#:2005977 for OPM. Need to branch
410: -- HW OPMCONV - No need to branch code
411: --
412: IF l_debug_on THEN
413: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_PUB.QUERY_RESERVATION',WSH_DEBUG_SV.C_PROC_LEVEL);
414: END IF;
415: --
416: -- Bug 3431358(Moved this code from top to here)
417: -- 2747520 : Set reservation_type to 'U'nstaged or 'S'taged
456: G_ATO_RSV_PROFILE := 'N';
457: end if;
458: END IF;
459: IF l_debug_on THEN
460: WSH_DEBUG_SV.log(l_module_name,'g_ato_rsv_profile',G_ATO_RSV_PROFILE);
461: END IF;
462: --2587777
463:
464: --X-dock
500:
501: FOR l_counter in 1..l_count
502: LOOP
503: IF l_debug_on THEN
504: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_STAGED_RESERVATION_UTIL.QUERY_STAGED_FLAG',WSH_DEBUG_SV.C_PROC_LEVEL);
505: END IF;
506:
507: INV_STAGED_RESERVATION_UTIL.query_staged_flag(
508: x_return_status => x_return_status,
531:
532: -- HW 4178299 - Need to convert Qty2 to get correct value
533: IF l_fulfillment_base = 'P' THEN
534: IF l_debug_on THEN
535: WSH_DEBUG_SV.log(l_module_name,'Value of Qty2_to_Unreserve before conversion is ',
536: l_qty2_to_unreserve);
537:
538: END IF;
539:
549: ,quantity => l_qty_to_unreserve
550: ,lot_number => l_line_rec.lot_number);
551:
552: IF l_debug_on THEN
553: WSH_DEBUG_SV.log(l_module_name,'Value of Qty2_to_Unreserve AFTER conversion is ',
554: l_qty2_to_unreserve);
555:
556: END IF;
557:
558: END IF;
559: /*
560: ELSE
561: IF l_debug_on THEN
562: WSH_DEBUG_SV.log(l_module_name,'Value of Qty_to_Unreserve before conversion is ',
563: l_qty_to_unreserve);
564: END IF;
565:
566: IF ( l_qty_to_unreserve is NOT NULL OR
575: ,quantity => l_qty2_to_unreserve
576: ,lot_number => l_line_rec.lot_number);
577:
578: IF l_debug_on THEN
579: WSH_DEBUG_SV.log(l_module_name,'Value of Qty_to_Unreserve AFTER conversion is ',
580: l_qty_to_unreserve);
581:
582: END IF;
583:
594: l_remaining_nonstaged_qty := l_nonstaged_qty - l_qty_to_unreserve;
595: -- HW OPMCONV - Added Qty2
596: l_remaining_nonstaged_qty2 := l_nonstaged_qty2 - l_qty2_to_unreserve;
597: IF l_debug_on THEN
598: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_rsv_qty:l_nonstaged_qty:l_dtld_qty_to_unreserve:l_remaining_nonstaged_qty ;',
599: l_nonstaged_rsv_qty
600: ||':'||l_nonstaged_qty
601: ||':'||l_dtld_qty_to_unreserve
602: ||':'||l_remaining_nonstaged_qty );
600: ||':'||l_nonstaged_qty
601: ||':'||l_dtld_qty_to_unreserve
602: ||':'||l_remaining_nonstaged_qty );
603: -- HW OPMCONV - Added Qty2
604: WSH_DEBUG_SV.log(l_module_name,'l_nonstaged_rsv_qty2:l_nonstaged_qty:l_dtld_qty2_to_unreserve:l_remaining_nonstaged_qty2 ;',
605: l_nonstaged_rsv_qty2
606: ||':'||l_nonstaged_qty2
607: ||':'||l_dtld_qty2_to_unreserve
608: ||':'||l_remaining_nonstaged_qty2 );
622: END IF; -- if rsv_type = U
623: -- 2747520
624:
625: IF l_debug_on THEN
626: WSH_DEBUG_SV.log(l_module_name,'l_rsv_tbl.COUNT:l_x_error_code :: ',
627: l_rsv_tbl.COUNT||':'||l_x_error_code);
628: END IF;
629:
630: FOR I IN 1..l_rsv_tbl.COUNT LOOP
632: l_rsv_rec := l_rsv_tbl(I);
633: --
634: IF l_debug_on THEN
635: -- 2587777
636: WSH_DEBUG_SV.log(l_module_name,'rsv.id:inv-item-id:Rsvtn-Qty:Org-id:SubInv-Code:Locator-id:Rev:Lot# ; ',
637: l_rsv_rec.reservation_id
638: ||':'||l_rsv_rec.inventory_item_id
639: ||':'||l_rsv_rec.reservation_quantity
640: ||':'||l_rsv_rec.secondary_reservation_quantity
647: END IF;
648: --
649: -- 2747520 : Query Staged Reservation
650: IF l_debug_on THEN
651: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_STAGED_RESERVATION_UTIL.QUERY_STAGED_FLAG',WSH_DEBUG_SV.C_PROC_LEVEL);
652: END IF;
653: --
654: inv_staged_reservation_util.query_staged_flag(
655: x_return_status => l_return_status
659: , p_reservation_id => l_rsv_rec.reservation_id);
660: --
661: IF l_debug_on THEN
662:
663: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER CALLING INVS QUERY STAGED FLAG: ' || L_RETURN_STATUS );
664: END IF;
665: --
666:
667: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
670: RAISE FND_API.G_EXC_ERROR;
671: END IF;
672:
673: IF l_debug_on THEN
674: WSH_DEBUG_SV.log(l_module_name, 'RES QTY : QTY TO UNRESVRVE : l_staged_flag ; ',
675: L_RSV_REC.RESERVATION_QUANTITY
676: ||':'||L_QTY_TO_UNRESERVE
677: ||':'||l_staged_flag );
678:
675: L_RSV_REC.RESERVATION_QUANTITY
676: ||':'||L_QTY_TO_UNRESERVE
677: ||':'||l_staged_flag );
678:
679: WSH_DEBUG_SV.log(l_module_name, 'PRIM RES QTY : l_staged_flag ; ',
680: L_RSV_REC.PRIMARY_RESERVATION_QUANTITY
681: ||':'||l_staged_flag );
682:
683: -- HW OPMCONV - Added Qty2
680: L_RSV_REC.PRIMARY_RESERVATION_QUANTITY
681: ||':'||l_staged_flag );
682:
683: -- HW OPMCONV - Added Qty2
684: WSH_DEBUG_SV.log(l_module_name, 'RES QTY2 : QTY2 TO UNRESVRVE : l_staged_flag ; ',
685: L_RSV_REC.SECONDARY_RESERVATION_QUANTITY
686: ||':'||L_QTY2_TO_UNRESERVE
687: ||':'||l_staged_flag );
688:
691: -- muom
692: IF l_fulfillment_base = 'P' THEN
693: if l_rsv_rec.secondary_reservation_quantity = 0 or l_rsv_rec.secondary_reservation_quantity < L_QTY2_TO_UNRESERVE THEN
694: IF l_debug_on THEN
695: WSH_DEBUG_SV.logmsg(l_module_name, 'Making secondary quantitiy to be unreserved to be equal to secondary reservation vailable, when ' );
696: WSH_DEBUG_SV.logmsg(l_module_name, 'secondary reservation quantity is less than quantity2 to be unreserved ' );
697: END IF;
698: L_QTY2_TO_UNRESERVE := l_rsv_rec.secondary_reservation_quantity ;
699: END IF; --
692: IF l_fulfillment_base = 'P' THEN
693: if l_rsv_rec.secondary_reservation_quantity = 0 or l_rsv_rec.secondary_reservation_quantity < L_QTY2_TO_UNRESERVE THEN
694: IF l_debug_on THEN
695: WSH_DEBUG_SV.logmsg(l_module_name, 'Making secondary quantitiy to be unreserved to be equal to secondary reservation vailable, when ' );
696: WSH_DEBUG_SV.logmsg(l_module_name, 'secondary reservation quantity is less than quantity2 to be unreserved ' );
697: END IF;
698: L_QTY2_TO_UNRESERVE := l_rsv_rec.secondary_reservation_quantity ;
699: END IF; --
700: ELSE
699: END IF; --
700: ELSE
701: if l_rsv_rec.primary_reservation_quantity = 0 or l_rsv_rec.primary_reservation_quantity < L_QTY_TO_UNRESERVE THEN
702: IF l_debug_on THEN
703: WSH_DEBUG_SV.logmsg(l_module_name, 'Making primary quantitiy to be unreserved to be equal to primary reservation vailable, when ' );
704: WSH_DEBUG_SV.logmsg(l_module_name, 'primary reservation quantity is less than quantity to be unreserved ' );
705: END IF;
706: L_QTY_TO_UNRESERVE := l_rsv_rec.primary_reservation_quantity ;
707: END IF; --
700: ELSE
701: if l_rsv_rec.primary_reservation_quantity = 0 or l_rsv_rec.primary_reservation_quantity < L_QTY_TO_UNRESERVE THEN
702: IF l_debug_on THEN
703: WSH_DEBUG_SV.logmsg(l_module_name, 'Making primary quantitiy to be unreserved to be equal to primary reservation vailable, when ' );
704: WSH_DEBUG_SV.logmsg(l_module_name, 'primary reservation quantity is less than quantity to be unreserved ' );
705: END IF;
706: L_QTY_TO_UNRESERVE := l_rsv_rec.primary_reservation_quantity ;
707: END IF; --
708: END IF;
721: NULL; -- Don't Update or Delete the REservations if the above criteria (ATO -Unstgd. Rsvn)is met
722: ELSE
723:
724: IF l_debug_on THEN
725: WSH_DEBUG_SV.log(l_module_name,'BEFORE l_prim_rsv_qty: tbl_detailed_qty ; ',
726: l_rsv_tbl(I).primary_reservation_quantity ||':'||
727: l_rsv_tbl(I).detailed_quantity);
728: -- HW OPMCONV - Added Qty2
729: WSH_DEBUG_SV.log(l_module_name,'BEFORE l_secondary_rsv_qty: tbl_detailed_qty2 ; ',
725: WSH_DEBUG_SV.log(l_module_name,'BEFORE l_prim_rsv_qty: tbl_detailed_qty ; ',
726: l_rsv_tbl(I).primary_reservation_quantity ||':'||
727: l_rsv_tbl(I).detailed_quantity);
728: -- HW OPMCONV - Added Qty2
729: WSH_DEBUG_SV.log(l_module_name,'BEFORE l_secondary_rsv_qty: tbl_detailed_qty2 ; ',
730: l_rsv_tbl(I).secondary_reservation_quantity ||':'||
731: l_rsv_tbl(I).secondary_detailed_quantity);
732: END IF;
733:
769: -- Tackle Primary Reservation Quantity
770: IF (l_qty_to_unreserve > 0) THEN
771: IF ((l_rsv_new_rec.primary_reservation_quantity - l_rsv_new_rec.detailed_quantity) <= l_qty_to_unreserve) THEN
772: IF l_debug_on THEN
773: WSH_DEBUG_SV.logmsg(l_module_name, 'ONE Before calculation l_qty_to_unreserve: ' || l_qty_to_unreserve );
774:
775: END IF;
776: l_qty_to_unreserve := l_qty_to_unreserve - (l_rsv_new_rec.primary_reservation_quantity - l_rsv_new_rec.detailed_quantity);
777: -- HW OPMCONV - Added Qty2
776: l_qty_to_unreserve := l_qty_to_unreserve - (l_rsv_new_rec.primary_reservation_quantity - l_rsv_new_rec.detailed_quantity);
777: -- HW OPMCONV - Added Qty2
778: l_qty2_to_unreserve := l_qty2_to_unreserve - (l_rsv_new_rec.secondary_reservation_quantity - l_rsv_new_rec.secondary_detailed_quantity);
779: IF l_debug_on THEN
780: WSH_DEBUG_SV.logmsg(l_module_name, 'ONE After calculation l_qty_to_unreserve: ' || l_qty_to_unreserve );
781:
782: END IF;
783:
784: l_rsv_new_rec.primary_reservation_quantity := l_rsv_new_rec.detailed_quantity;
793: END IF;
794: END IF;
795:
796: IF l_debug_on THEN
797: WSH_DEBUG_SV.log(l_module_name,'NEW l_prim_rsv_qty: new tbl_detailed_qty ; ',
798: l_rsv_new_rec.primary_reservation_quantity ||':'||
799: l_rsv_new_rec.detailed_quantity);
800: -- HW OPMCONV - Added Qty2
801: WSH_DEBUG_SV.log(l_module_name,'NEW l_seccondary_rsv_qty: new tbl_detailed_qty2 ; ',
797: WSH_DEBUG_SV.log(l_module_name,'NEW l_prim_rsv_qty: new tbl_detailed_qty ; ',
798: l_rsv_new_rec.primary_reservation_quantity ||':'||
799: l_rsv_new_rec.detailed_quantity);
800: -- HW OPMCONV - Added Qty2
801: WSH_DEBUG_SV.log(l_module_name,'NEW l_seccondary_rsv_qty: new tbl_detailed_qty2 ; ',
802: l_rsv_new_rec.secondary_reservation_quantity ||':'||
803: l_rsv_new_rec.secondary_detailed_quantity);
804: END IF;
805:
803: l_rsv_new_rec.secondary_detailed_quantity);
804: END IF;
805:
806: IF l_debug_on THEN
807: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_pub.update_resevation 1',WSH_DEBUG_SV.C_PROC_LEVEL);
808: END IF;
809:
810: -- HW OPMCONV - NULL Qty2 if they are not presents
811: IF ( ( l_rsv_new_rec.secondary_reservation_quantity = 0 OR
836: p_over_reservation_flag =>3
837: );
838:
839: IF l_debug_on THEN
840: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER CALLING INVS UPDATE REservation 1: ' || L_RETURN_STATUS );
841: WSH_DEBUG_SV.log(l_module_name,'l_new_prim_rsv_qty: tbl_detailed_qty ; ',
842: l_rsv_new_rec.primary_reservation_quantity ||':'||
843: l_rsv_tbl(I).detailed_quantity);
844: -- HW OPMCONV - Added Qty2
837: );
838:
839: IF l_debug_on THEN
840: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER CALLING INVS UPDATE REservation 1: ' || L_RETURN_STATUS );
841: WSH_DEBUG_SV.log(l_module_name,'l_new_prim_rsv_qty: tbl_detailed_qty ; ',
842: l_rsv_new_rec.primary_reservation_quantity ||':'||
843: l_rsv_tbl(I).detailed_quantity);
844: -- HW OPMCONV - Added Qty2
845: WSH_DEBUG_SV.log(l_module_name,'l_new_secondary_rsv_qty: tbl_detailed_qty2 ; ',
841: WSH_DEBUG_SV.log(l_module_name,'l_new_prim_rsv_qty: tbl_detailed_qty ; ',
842: l_rsv_new_rec.primary_reservation_quantity ||':'||
843: l_rsv_tbl(I).detailed_quantity);
844: -- HW OPMCONV - Added Qty2
845: WSH_DEBUG_SV.log(l_module_name,'l_new_secondary_rsv_qty: tbl_detailed_qty2 ; ',
846: l_rsv_new_rec.secondary_reservation_quantity ||':'||
847: l_rsv_tbl(I).secondary_detailed_quantity);
848: END IF;
849:
855:
856: ELSE
857:
858: IF l_debug_on THEN
859: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_pub.delete_resevation 1',WSH_DEBUG_SV.C_PROC_LEVEL);
860: END IF;
861:
862: inv_reservation_pub.delete_reservation
863: ( p_api_version_number => 1.0
869: , p_serial_number => l_dummy_sn
870: );
871:
872: IF l_debug_on THEN
873: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER CALLING INVS DELETE REservation 1: ' || L_RETURN_STATUS );
874: END IF;
875:
876: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
877: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
881:
882: END IF;
883:
884: IF l_debug_on THEN
885: WSH_DEBUG_SV.log(l_module_name,'l_qty_to_unreserve:l_dtld_qty_to_unreserve ; ',
886: l_qty_to_unreserve ||':'||
887: l_dtld_qty_to_unreserve);
888: -- HW OPMCONV - Added Qty2
889: WSH_DEBUG_SV.log(l_module_name,'l_qty2_to_unreserve:l_dtld_qty2_to_unreserve ; ',
885: WSH_DEBUG_SV.log(l_module_name,'l_qty_to_unreserve:l_dtld_qty_to_unreserve ; ',
886: l_qty_to_unreserve ||':'||
887: l_dtld_qty_to_unreserve);
888: -- HW OPMCONV - Added Qty2
889: WSH_DEBUG_SV.log(l_module_name,'l_qty2_to_unreserve:l_dtld_qty2_to_unreserve ; ',
890: l_qty2_to_unreserve ||':'||
891: l_dtld_qty2_to_unreserve);
892: END IF;
893:
921: -- other reservation record which is eligible for consolidation with
922: -- the current res. record. If there is no other res. record then INV
923: -- updates the current res. record (old behavior).
924: IF l_debug_on THEN
925: WSH_DEBUG_SV.log(l_module_name,'l_staged_flag: ',l_staged_flag);
926: END IF;
927: --
928: IF ( nvl(l_staged_flag, 'N') = 'Y') THEN
929: --{ transfer/update reservation.
942: l_rsv_new_rec.secondary_detailed_quantity := NULL;
943: END IF;
944: --
945: IF l_debug_on THEN
946: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_PUB.TRANSFER_RESERVATION',WSH_DEBUG_SV.C_PROC_LEVEL);
947: END IF;
948: --
949: INV_RESERVATION_PUB.transfer_reservation
950: (
961: , x_to_reservation_id => l_new_rsv_id
962: );
963: --
964: IF l_debug_on THEN
965: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER CALLING INVS TRANSFER RESERVATION: ' || L_RETURN_STATUS );
966: WSH_DEBUG_SV.log(l_module_name,'New Rec: reservation id: ', l_new_rsv_id);
967: END IF;
968: --
969: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
962: );
963: --
964: IF l_debug_on THEN
965: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER CALLING INVS TRANSFER RESERVATION: ' || L_RETURN_STATUS );
966: WSH_DEBUG_SV.log(l_module_name,'New Rec: reservation id: ', l_new_rsv_id);
967: END IF;
968: --
969: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
970: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
977: ELSE -- Non- ATO Item
978: -- 2587777
979: --
980: IF l_debug_on THEN
981: WSH_DEBUG_SV.logmsg(l_module_name, 'CALLING INVS DELETE_RESERVATION' );
982: END IF;
983: --
984: IF l_debug_on THEN
985: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_PUB.DELETE_RESERVATION',WSH_DEBUG_SV.C_PROC_LEVEL);
981: WSH_DEBUG_SV.logmsg(l_module_name, 'CALLING INVS DELETE_RESERVATION' );
982: END IF;
983: --
984: IF l_debug_on THEN
985: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_PUB.DELETE_RESERVATION',WSH_DEBUG_SV.C_PROC_LEVEL);
986: END IF;
987: --
988:
989: inv_reservation_pub.delete_reservation
996: p_serial_number => l_dummy_sn
997: );
998: --
999: IF l_debug_on THEN
1000: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER CALLING INVS DELETE_RESERVATION: ' || L_RETURN_STATUS );
1001: END IF;
1002: --
1003:
1004: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1009: END IF; -- ATO line
1010: else -- p_unreserve_mode = 'CYCLE_COUNT'
1011: --
1012: IF l_debug_on THEN
1013: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit ONE INV_PICK_RELEASE_PUB.RESERVE_UNCONFIRMED_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
1014: WSH_DEBUG_SV.log(l_module_name, 'l_rsv_rec.reservation_quantity: ' || l_rsv_rec.reservation_quantity );
1015: -- muom
1016: WSH_DEBUG_SV.log(l_module_name, 'l_rsv_rec.primary_reservation_quantity: ' || l_rsv_rec.primary_reservation_quantity );
1017: WSH_DEBUG_SV.log(l_module_name, ' l_rsv_rec.reservation_quantity2: ' || l_rsv_rec.secondary_reservation_quantity );
1010: else -- p_unreserve_mode = 'CYCLE_COUNT'
1011: --
1012: IF l_debug_on THEN
1013: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit ONE INV_PICK_RELEASE_PUB.RESERVE_UNCONFIRMED_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
1014: WSH_DEBUG_SV.log(l_module_name, 'l_rsv_rec.reservation_quantity: ' || l_rsv_rec.reservation_quantity );
1015: -- muom
1016: WSH_DEBUG_SV.log(l_module_name, 'l_rsv_rec.primary_reservation_quantity: ' || l_rsv_rec.primary_reservation_quantity );
1017: WSH_DEBUG_SV.log(l_module_name, ' l_rsv_rec.reservation_quantity2: ' || l_rsv_rec.secondary_reservation_quantity );
1018: END IF;
1012: IF l_debug_on THEN
1013: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit ONE INV_PICK_RELEASE_PUB.RESERVE_UNCONFIRMED_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
1014: WSH_DEBUG_SV.log(l_module_name, 'l_rsv_rec.reservation_quantity: ' || l_rsv_rec.reservation_quantity );
1015: -- muom
1016: WSH_DEBUG_SV.log(l_module_name, 'l_rsv_rec.primary_reservation_quantity: ' || l_rsv_rec.primary_reservation_quantity );
1017: WSH_DEBUG_SV.log(l_module_name, ' l_rsv_rec.reservation_quantity2: ' || l_rsv_rec.secondary_reservation_quantity );
1018: END IF;
1019: --
1020: IF ( l_rsv_rec.secondary_reservation_quantity = 0 OR
1013: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit ONE INV_PICK_RELEASE_PUB.RESERVE_UNCONFIRMED_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
1014: WSH_DEBUG_SV.log(l_module_name, 'l_rsv_rec.reservation_quantity: ' || l_rsv_rec.reservation_quantity );
1015: -- muom
1016: WSH_DEBUG_SV.log(l_module_name, 'l_rsv_rec.primary_reservation_quantity: ' || l_rsv_rec.primary_reservation_quantity );
1017: WSH_DEBUG_SV.log(l_module_name, ' l_rsv_rec.reservation_quantity2: ' || l_rsv_rec.secondary_reservation_quantity );
1018: END IF;
1019: --
1020: IF ( l_rsv_rec.secondary_reservation_quantity = 0 OR
1021: l_rsv_rec.secondary_reservation_quantity = FND_API.G_MISS_NUM ) THEN
1045: IF ((l_reserve_status = WSH_UTIL_CORE.G_RET_STS_ERROR) or
1046: (l_reserve_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN -- rsv.status
1047: --
1048: IF l_debug_on THEN
1049: WSH_DEBUG_SV.logmsg(l_module_name, 'RESERVE UNCONFIRMED QUANTITY FAILED' );
1050: WSH_DEBUG_SV.logmsg(l_module_name, 'MESSAGE COUNT: '|| TO_CHAR ( L_RESERVE_MSG_COUNT ) );
1051: END IF;
1052: --
1053: IF (l_reserve_msg_count = 0) or (l_reserve_msg_count is NULL) THEN -- rsv.msg.count
1046: (l_reserve_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN -- rsv.status
1047: --
1048: IF l_debug_on THEN
1049: WSH_DEBUG_SV.logmsg(l_module_name, 'RESERVE UNCONFIRMED QUANTITY FAILED' );
1050: WSH_DEBUG_SV.logmsg(l_module_name, 'MESSAGE COUNT: '|| TO_CHAR ( L_RESERVE_MSG_COUNT ) );
1051: END IF;
1052: --
1053: IF (l_reserve_msg_count = 0) or (l_reserve_msg_count is NULL) THEN -- rsv.msg.count
1054: null;
1058: l_reserve_message := fnd_msg_pub.get(i,'T');
1059: l_reserve_message := replace(l_reserve_message,chr(0), ' ');
1060: --
1061: IF l_debug_on THEN
1062: WSH_DEBUG_SV.logmsg(l_module_name, L_RESERVE_MESSAGE );
1063: END IF;
1064: --
1065: END LOOP;
1066: END if; -- rsv.msg.count
1066: END if; -- rsv.msg.count
1067: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1068: --
1069: IF l_debug_on THEN
1070: WSH_DEBUG_SV.logmsg(l_module_name, 'RESERVE_UNCONFIRMED_QUANTITY FAILED.. GOING ON... ' );
1071: END IF;
1072: --
1073: END IF;
1074: end if; -- rsv.status
1073: END IF;
1074: end if; -- rsv.status
1075:
1076: IF l_debug_on THEN
1077: WSH_DEBUG_SV.log(l_module_name,'l_qty_to_unreserve',
1078: l_qty_to_unreserve);
1079: -- muom
1080: WSH_DEBUG_SV.log(l_module_name,'reservation_quantity',
1081: l_rsv_rec.primary_reservation_quantity);
1076: IF l_debug_on THEN
1077: WSH_DEBUG_SV.log(l_module_name,'l_qty_to_unreserve',
1078: l_qty_to_unreserve);
1079: -- muom
1080: WSH_DEBUG_SV.log(l_module_name,'reservation_quantity',
1081: l_rsv_rec.primary_reservation_quantity);
1082: END IF;
1083: IF l_debug_on THEN
1084: WSH_DEBUG_SV.logmsg(l_module_name, 'Before calculation l_qty_to_unreserve: ' || l_qty_to_unreserve );
1080: WSH_DEBUG_SV.log(l_module_name,'reservation_quantity',
1081: l_rsv_rec.primary_reservation_quantity);
1082: END IF;
1083: IF l_debug_on THEN
1084: WSH_DEBUG_SV.logmsg(l_module_name, 'Before calculation l_qty_to_unreserve: ' || l_qty_to_unreserve );
1085:
1086: END IF;
1087:
1088: -- muom: We should no longer be using reservation_quantity as it will not be in primary uom always
1093: l_qty2_to_unreserve := l_qty2_to_unreserve -
1094: l_rsv_rec.secondary_reservation_quantity;
1095: IF l_debug_on THEN
1096:
1097: WSH_DEBUG_SV.logmsg(l_module_name, 'After calculation l_qty_to_unreserve: ' || l_qty_to_unreserve );
1098: WSH_DEBUG_SV.logmsg(l_module_name, 'After calculation l_qty2_to_unreserve: ' || l_qty2_to_unreserve );
1099:
1100: END IF;
1101:
1094: l_rsv_rec.secondary_reservation_quantity;
1095: IF l_debug_on THEN
1096:
1097: WSH_DEBUG_SV.logmsg(l_module_name, 'After calculation l_qty_to_unreserve: ' || l_qty_to_unreserve );
1098: WSH_DEBUG_SV.logmsg(l_module_name, 'After calculation l_qty2_to_unreserve: ' || l_qty2_to_unreserve );
1099:
1100: END IF;
1101:
1102: -- muom
1109: l_rsv_new_rec := l_rsv_rec;
1110:
1111: --
1112: IF l_debug_on THEN
1113: WSH_DEBUG_SV.logmsg(l_module_name, 'OLD QTY : NEW QTY :: ' || L_RSV_REC.RESERVATION_QUANTITY
1114: ||': '|| L_RSV_NEW_REC.RESERVATION_QUANTITY );
1115:
1116: WSH_DEBUG_SV.logmsg(l_module_name, 'OLD PRIM QTY : NEW PRIM QTY :: ' || L_RSV_REC.PRIMARY_RESERVATION_QUANTITY
1117: ||': '|| L_RSV_NEW_REC.PRIMARY_RESERVATION_QUANTITY );
1112: IF l_debug_on THEN
1113: WSH_DEBUG_SV.logmsg(l_module_name, 'OLD QTY : NEW QTY :: ' || L_RSV_REC.RESERVATION_QUANTITY
1114: ||': '|| L_RSV_NEW_REC.RESERVATION_QUANTITY );
1115:
1116: WSH_DEBUG_SV.logmsg(l_module_name, 'OLD PRIM QTY : NEW PRIM QTY :: ' || L_RSV_REC.PRIMARY_RESERVATION_QUANTITY
1117: ||': '|| L_RSV_NEW_REC.PRIMARY_RESERVATION_QUANTITY );
1118:
1119: -- HW OPMCONV - Added Qty2
1120: WSH_DEBUG_SV.logmsg(l_module_name, 'OLD QTY2 : NEW QTY2 :: ' || L_RSV_REC.SECONDARY_RESERVATION_QUANTITY
1116: WSH_DEBUG_SV.logmsg(l_module_name, 'OLD PRIM QTY : NEW PRIM QTY :: ' || L_RSV_REC.PRIMARY_RESERVATION_QUANTITY
1117: ||': '|| L_RSV_NEW_REC.PRIMARY_RESERVATION_QUANTITY );
1118:
1119: -- HW OPMCONV - Added Qty2
1120: WSH_DEBUG_SV.logmsg(l_module_name, 'OLD QTY2 : NEW QTY2 :: ' || L_RSV_REC.SECONDARY_RESERVATION_QUANTITY
1121: ||': '|| L_RSV_NEW_REC.SECONDARY_RESERVATION_QUANTITY );
1122: END IF;
1123: --
1124: l_rsv_new_rec.attribute1 := l_line_rec.preferred_grade;
1157: l_rsv_new_rec.demand_source_line_detail := null;
1158:
1159: --
1160: IF l_debug_on THEN
1161: WSH_DEBUG_SV.logmsg(l_module_name, 'NEW Split Record QTY : Dtld QTY :: ' ||
1162: L_RSV_NEW_REC.PRIMARY_RESERVATION_QUANTITY ||': '||
1163: L_RSV_NEW_REC.DETAILED_QUANTITY );
1164: -- HW OPMCONV - Added Qty2
1165: WSH_DEBUG_SV.logmsg(l_module_name, 'NEW Split Record QTY2 : Dtld QTY2 :: ' ||
1161: WSH_DEBUG_SV.logmsg(l_module_name, 'NEW Split Record QTY : Dtld QTY :: ' ||
1162: L_RSV_NEW_REC.PRIMARY_RESERVATION_QUANTITY ||': '||
1163: L_RSV_NEW_REC.DETAILED_QUANTITY );
1164: -- HW OPMCONV - Added Qty2
1165: WSH_DEBUG_SV.logmsg(l_module_name, 'NEW Split Record QTY2 : Dtld QTY2 :: ' ||
1166: L_RSV_NEW_REC.SECONDARY_RESERVATION_QUANTITY ||': '||
1167: L_RSV_NEW_REC.SECONDARY_DETAILED_QUANTITY );
1168: END IF;
1169: --
1167: L_RSV_NEW_REC.SECONDARY_DETAILED_QUANTITY );
1168: END IF;
1169: --
1170: IF l_debug_on THEN
1171: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_PUB.TRANSFER_RESERVATION',WSH_DEBUG_SV.C_PROC_LEVEL);
1172: END IF;
1173: --
1174: --
1175:
1199: x_to_reservation_id => l_new_rsv_id
1200: );
1201: --
1202: IF l_debug_on THEN
1203: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER CALLING INVS TRANSFER RESERVATION: ' || L_RETURN_STATUS );
1204: WSH_DEBUG_SV.log(l_module_name,'New Rec: reservation id: ', l_new_rsv_id);
1205: END IF;
1206: --
1207:
1200: );
1201: --
1202: IF l_debug_on THEN
1203: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER CALLING INVS TRANSFER RESERVATION: ' || L_RETURN_STATUS );
1204: WSH_DEBUG_SV.log(l_module_name,'New Rec: reservation id: ', l_new_rsv_id);
1205: END IF;
1206: --
1207:
1208: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1213:
1214: ELSE -- (i.e. Not an ATO )
1215: -- 2587777
1216: IF l_debug_on THEN
1217: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation l_qty_to_unreserve: ' || l_qty_to_unreserve );
1218: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation _rsv_new_rec.primary_reservation_quantity: ' || l_rsv_new_rec.primary_reservation_quantity );
1219:
1220: END IF;
1221:
1214: ELSE -- (i.e. Not an ATO )
1215: -- 2587777
1216: IF l_debug_on THEN
1217: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation l_qty_to_unreserve: ' || l_qty_to_unreserve );
1218: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation _rsv_new_rec.primary_reservation_quantity: ' || l_rsv_new_rec.primary_reservation_quantity );
1219:
1220: END IF;
1221:
1222: --l_rsv_new_rec.reservation_quantity := l_rsv_rec.reservation_quantity - l_qty_to_unreserve ; --commented bug 14149784
1223: -- HW OPMCONV - Added Qty2
1224: l_rsv_new_rec.primary_reservation_quantity := l_rsv_rec.primary_reservation_quantity - l_qty_to_unreserve ; --added bug 14149784
1225: l_rsv_new_rec.secondary_reservation_quantity := l_rsv_rec.secondary_reservation_quantity - l_qty2_to_unreserve ;
1226: IF l_debug_on THEN
1227: WSH_DEBUG_SV.logmsg(l_module_name, 'ONE After calculation l_rsv_new_rec.reservation_quantity: ' || l_rsv_new_rec.reservation_quantity );
1228: WSH_DEBUG_SV.logmsg(l_module_name, 'ONE After calculation l_rsv_new_rec.secondary_reservation_quantity: ' || l_rsv_new_rec.secondary_reservation_quantity );
1229: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation ll_rsv_new_rec.primary_reservation_quantity: ' || l_rsv_new_rec.primary_reservation_quantity );
1230: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation l_rsv_rec.reservation_quantity: ' || l_rsv_rec.reservation_quantity );
1231: -- HW OPMCONV - Added Qty2
1224: l_rsv_new_rec.primary_reservation_quantity := l_rsv_rec.primary_reservation_quantity - l_qty_to_unreserve ; --added bug 14149784
1225: l_rsv_new_rec.secondary_reservation_quantity := l_rsv_rec.secondary_reservation_quantity - l_qty2_to_unreserve ;
1226: IF l_debug_on THEN
1227: WSH_DEBUG_SV.logmsg(l_module_name, 'ONE After calculation l_rsv_new_rec.reservation_quantity: ' || l_rsv_new_rec.reservation_quantity );
1228: WSH_DEBUG_SV.logmsg(l_module_name, 'ONE After calculation l_rsv_new_rec.secondary_reservation_quantity: ' || l_rsv_new_rec.secondary_reservation_quantity );
1229: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation ll_rsv_new_rec.primary_reservation_quantity: ' || l_rsv_new_rec.primary_reservation_quantity );
1230: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation l_rsv_rec.reservation_quantity: ' || l_rsv_rec.reservation_quantity );
1231: -- HW OPMCONV - Added Qty2
1232: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation ll_rsv_new_rec.secondary_reservation_quantity: ' || l_rsv_new_rec.secondary_reservation_quantity );
1225: l_rsv_new_rec.secondary_reservation_quantity := l_rsv_rec.secondary_reservation_quantity - l_qty2_to_unreserve ;
1226: IF l_debug_on THEN
1227: WSH_DEBUG_SV.logmsg(l_module_name, 'ONE After calculation l_rsv_new_rec.reservation_quantity: ' || l_rsv_new_rec.reservation_quantity );
1228: WSH_DEBUG_SV.logmsg(l_module_name, 'ONE After calculation l_rsv_new_rec.secondary_reservation_quantity: ' || l_rsv_new_rec.secondary_reservation_quantity );
1229: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation ll_rsv_new_rec.primary_reservation_quantity: ' || l_rsv_new_rec.primary_reservation_quantity );
1230: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation l_rsv_rec.reservation_quantity: ' || l_rsv_rec.reservation_quantity );
1231: -- HW OPMCONV - Added Qty2
1232: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation ll_rsv_new_rec.secondary_reservation_quantity: ' || l_rsv_new_rec.secondary_reservation_quantity );
1233: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation l_rsv_rec.secondary_reservation_quantity: ' || l_rsv_rec.secondary_reservation_quantity );
1226: IF l_debug_on THEN
1227: WSH_DEBUG_SV.logmsg(l_module_name, 'ONE After calculation l_rsv_new_rec.reservation_quantity: ' || l_rsv_new_rec.reservation_quantity );
1228: WSH_DEBUG_SV.logmsg(l_module_name, 'ONE After calculation l_rsv_new_rec.secondary_reservation_quantity: ' || l_rsv_new_rec.secondary_reservation_quantity );
1229: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation ll_rsv_new_rec.primary_reservation_quantity: ' || l_rsv_new_rec.primary_reservation_quantity );
1230: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation l_rsv_rec.reservation_quantity: ' || l_rsv_rec.reservation_quantity );
1231: -- HW OPMCONV - Added Qty2
1232: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation ll_rsv_new_rec.secondary_reservation_quantity: ' || l_rsv_new_rec.secondary_reservation_quantity );
1233: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation l_rsv_rec.secondary_reservation_quantity: ' || l_rsv_rec.secondary_reservation_quantity );
1234:
1228: WSH_DEBUG_SV.logmsg(l_module_name, 'ONE After calculation l_rsv_new_rec.secondary_reservation_quantity: ' || l_rsv_new_rec.secondary_reservation_quantity );
1229: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation ll_rsv_new_rec.primary_reservation_quantity: ' || l_rsv_new_rec.primary_reservation_quantity );
1230: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation l_rsv_rec.reservation_quantity: ' || l_rsv_rec.reservation_quantity );
1231: -- HW OPMCONV - Added Qty2
1232: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation ll_rsv_new_rec.secondary_reservation_quantity: ' || l_rsv_new_rec.secondary_reservation_quantity );
1233: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation l_rsv_rec.secondary_reservation_quantity: ' || l_rsv_rec.secondary_reservation_quantity );
1234:
1235: END IF;
1236:
1229: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation ll_rsv_new_rec.primary_reservation_quantity: ' || l_rsv_new_rec.primary_reservation_quantity );
1230: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation l_rsv_rec.reservation_quantity: ' || l_rsv_rec.reservation_quantity );
1231: -- HW OPMCONV - Added Qty2
1232: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation ll_rsv_new_rec.secondary_reservation_quantity: ' || l_rsv_new_rec.secondary_reservation_quantity );
1233: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO Before calculation l_rsv_rec.secondary_reservation_quantity: ' || l_rsv_rec.secondary_reservation_quantity );
1234:
1235: END IF;
1236:
1237: --l_rsv_new_rec.primary_reservation_quantity := l_rsv_rec.reservation_quantity - l_qty_to_unreserve ; --commented bug 14149784
1238: -- HW OPMCONV - Added Qty2
1239: --l_rsv_new_rec.secondary_reservation_quantity := l_rsv_rec.secondary_reservation_quantity - l_qty2_to_unreserve ;--commented bug 14149784 redundant code
1240:
1241: IF l_debug_on THEN
1242: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO After calculation ll_rsv_new_rec.primary_reservation_quantity: ' || l_rsv_new_rec.primary_reservation_quantity );
1243: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO After calculation ll_rsv_new_rec.secondary_reservation_quantity: ' || l_rsv_new_rec.secondary_reservation_quantity );
1244: END IF;
1245:
1246: --
1239: --l_rsv_new_rec.secondary_reservation_quantity := l_rsv_rec.secondary_reservation_quantity - l_qty2_to_unreserve ;--commented bug 14149784 redundant code
1240:
1241: IF l_debug_on THEN
1242: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO After calculation ll_rsv_new_rec.primary_reservation_quantity: ' || l_rsv_new_rec.primary_reservation_quantity );
1243: WSH_DEBUG_SV.logmsg(l_module_name, 'TWO After calculation ll_rsv_new_rec.secondary_reservation_quantity: ' || l_rsv_new_rec.secondary_reservation_quantity );
1244: END IF;
1245:
1246: --
1247: IF l_debug_on THEN
1244: END IF;
1245:
1246: --
1247: IF l_debug_on THEN
1248: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_RESERVATION_PUB.UPDATE_RESERVATION',WSH_DEBUG_SV.C_PROC_LEVEL);
1249: END IF;
1250: --
1251: -- HW OPMCONV - NULL Qty2 if they are not presents
1252: IF ( l_rsv_new_rec.secondary_reservation_quantity = 0 OR
1271: p_over_reservation_flag =>3
1272: );
1273: --
1274: IF l_debug_on THEN
1275: WSH_DEBUG_SV.logmsg(l_module_name, 'AFTER CALLING INVS UPDATE_RESERVATION: ' || L_RETURN_STATUS );
1276: END IF;
1277: --
1278: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN -- UnExp Erro
1279: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1282: fnd_message.set_encoded(l_msg_data);
1283: l_buffer := fnd_message.get;
1284: --
1285: IF l_debug_on THEN
1286: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_MSG_PUB.ADD_TEXT',WSH_DEBUG_SV.C_PROC_LEVEL);
1287: END IF;
1288: --
1289: oe_msg_pub.add_text(p_message_text => l_buffer);
1290: --
1288: --
1289: oe_msg_pub.add_text(p_message_text => l_buffer);
1290: --
1291: IF l_debug_on THEN
1292: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR : '|| L_BUFFER );
1293: END IF;
1294: --
1295: END IF; -- msg.data not null
1296: RAISE FND_API.G_EXC_ERROR;
1298: END IF; -- (if ATO ..)
1299: else -- p_unreserve_mode = 'CYCLE_COUNT'
1300: --
1301: IF l_debug_on THEN
1302: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit TWO INV_PICK_RELEASE_PUB.RESERVE_UNCONFIRMED_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
1303: WSH_DEBUG_SV.log(l_module_name, 'p_missing_quantity: ' || l_qty_to_unreserve );
1304: WSH_DEBUG_SV.log(l_module_name, 'p_missing_quantity2: '|| l_qty2_to_unreserve );
1305:
1306: END IF;
1299: else -- p_unreserve_mode = 'CYCLE_COUNT'
1300: --
1301: IF l_debug_on THEN
1302: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit TWO INV_PICK_RELEASE_PUB.RESERVE_UNCONFIRMED_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
1303: WSH_DEBUG_SV.log(l_module_name, 'p_missing_quantity: ' || l_qty_to_unreserve );
1304: WSH_DEBUG_SV.log(l_module_name, 'p_missing_quantity2: '|| l_qty2_to_unreserve );
1305:
1306: END IF;
1307: --
1300: --
1301: IF l_debug_on THEN
1302: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit TWO INV_PICK_RELEASE_PUB.RESERVE_UNCONFIRMED_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
1303: WSH_DEBUG_SV.log(l_module_name, 'p_missing_quantity: ' || l_qty_to_unreserve );
1304: WSH_DEBUG_SV.log(l_module_name, 'p_missing_quantity2: '|| l_qty2_to_unreserve );
1305:
1306: END IF;
1307: --
1308:
1331: IF ((l_reserve_status = WSH_UTIL_CORE.G_RET_STS_ERROR) or
1332: (l_reserve_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN -- Sts or UnExp. Error
1333: --
1334: IF l_debug_on THEN
1335: WSH_DEBUG_SV.logmsg(l_module_name, 'RESERVE UNCONFIRMED QUANTITY FAILED' );
1336: END IF;
1337: --
1338: --
1339: IF l_debug_on THEN
1336: END IF;
1337: --
1338: --
1339: IF l_debug_on THEN
1340: WSH_DEBUG_SV.logmsg(l_module_name, 'MESSAGE COUNT: '|| TO_CHAR ( L_RESERVE_MSG_COUNT ) );
1341: END IF;
1342: --
1343: IF (l_reserve_msg_count = 0) or (l_reserve_msg_count is NULL) THEN -- Msg. Count
1344: null;
1348: l_reserve_message := fnd_msg_pub.get(i,'T');
1349: l_reserve_message := replace(l_reserve_message,chr(0), ' ');
1350: --
1351: IF l_debug_on THEN
1352: WSH_DEBUG_SV.logmsg(l_module_name, L_RESERVE_MESSAGE );
1353: END IF;
1354: --
1355: END LOOP;
1356: END if; -- If Msg. Count
1356: END if; -- If Msg. Count
1357: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1358: --
1359: IF l_debug_on THEN
1360: WSH_DEBUG_SV.logmsg(l_module_name, 'RESERVE_UNCONFIRMED_QUANTITY FAILED.. GOING ON... ' );
1361: END IF;
1362: --
1363: END IF; -- Sts or UnExp. Error
1364: END IF; -- UnReserve Mode
1373: <
1374:
1375: --
1376: IF l_debug_on THEN
1377: WSH_DEBUG_SV.logmsg(l_module_name, 'EXITING UNRESERVE_DELIVERY_DETAIL ' );
1378: END IF;
1379: --
1380:
1381: --
1379: --
1380:
1381: --
1382: IF l_debug_on THEN
1383: WSH_DEBUG_SV.pop(l_module_name);
1384: END IF;
1385: --
1386: EXCEPTION
1387: -- bug 2442178: added expected exceptions to appropriately set return status
1388: WHEN FND_API.G_EXC_ERROR THEN
1389: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1390: --
1391: IF l_debug_on THEN
1392: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1393: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1394: END IF;
1395: --
1396: return;
1389: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1390: --
1391: IF l_debug_on THEN
1392: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1393: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1394: END IF;
1395: --
1396: return;
1397: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1397: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1398: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1399: --
1400: IF l_debug_on THEN
1401: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1402: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1403: END IF;
1404: --
1405: return;
1398: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1399: --
1400: IF l_debug_on THEN
1401: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1402: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1403: END IF;
1404: --
1405: return;
1406:
1408: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1409: wsh_util_core.default_handler('WSH_NEW_DELIVERY_ACTIONS.UNRESERVE_DELIVERY_DETAIL',l_module_name);
1410: --
1411: IF l_debug_on THEN
1412: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1413: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1414: END IF;
1415: --
1416: END Unreserve_delivery_detail ;
1409: wsh_util_core.default_handler('WSH_NEW_DELIVERY_ACTIONS.UNRESERVE_DELIVERY_DETAIL',l_module_name);
1410: --
1411: IF l_debug_on THEN
1412: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1413: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1414: END IF;
1415: --
1416: END Unreserve_delivery_detail ;
1417:
1515: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1516: --
1517: IF l_debug_on IS NULL
1518: THEN
1519: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1520: END IF;
1521: --
1522: IF l_debug_on THEN
1523: WSH_DEBUG_SV.push(l_module_name);
1519: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1520: END IF;
1521: --
1522: IF l_debug_on THEN
1523: WSH_DEBUG_SV.push(l_module_name);
1524: --
1525: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1526: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1527: WSH_DEBUG_SV.log(l_module_name,'x_dlvy_has_lines',x_dlvy_has_lines);
1521: --
1522: IF l_debug_on THEN
1523: WSH_DEBUG_SV.push(l_module_name);
1524: --
1525: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1526: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1527: WSH_DEBUG_SV.log(l_module_name,'x_dlvy_has_lines',x_dlvy_has_lines);
1528: WSH_DEBUG_SV.log(l_module_name,'x_dlvy_freight_terms_code',x_dlvy_freight_terms_code);
1529: END IF;
1522: IF l_debug_on THEN
1523: WSH_DEBUG_SV.push(l_module_name);
1524: --
1525: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1526: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1527: WSH_DEBUG_SV.log(l_module_name,'x_dlvy_has_lines',x_dlvy_has_lines);
1528: WSH_DEBUG_SV.log(l_module_name,'x_dlvy_freight_terms_code',x_dlvy_freight_terms_code);
1529: END IF;
1530: --
1523: WSH_DEBUG_SV.push(l_module_name);
1524: --
1525: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1526: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1527: WSH_DEBUG_SV.log(l_module_name,'x_dlvy_has_lines',x_dlvy_has_lines);
1528: WSH_DEBUG_SV.log(l_module_name,'x_dlvy_freight_terms_code',x_dlvy_freight_terms_code);
1529: END IF;
1530: --
1531: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1524: --
1525: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1526: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1527: WSH_DEBUG_SV.log(l_module_name,'x_dlvy_has_lines',x_dlvy_has_lines);
1528: WSH_DEBUG_SV.log(l_module_name,'x_dlvy_freight_terms_code',x_dlvy_freight_terms_code);
1529: END IF;
1530: --
1531: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1532:
1563: END IF;
1564: -- Workflow Changes ==/
1565: --
1566: IF l_debug_on THEN
1567: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_TOP_DETAIL_TO_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
1568: END IF;
1569: --
1570:
1571: wsh_delivery_details_actions.assign_top_detail_to_delivery(
1603: -- After Purge, start a new workflow Process.
1604: -- Purging is required since a New Delivery Workflow will be selected according
1605: -- to the Delivery Detail Assigned to it
1606: IF l_debug_on THEN
1607: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.CHECK_WF_EXISTS',WSH_DEBUG_SV.C_PROC_LEVEL);
1608: END IF;
1609: WSH_WF_STD. Check_Wf_Exists(
1610: p_entity_type => 'DELIVERY',
1611: p_entity_id => p_delivery_id,
1611: p_entity_id => p_delivery_id,
1612: x_wf_process_exists => l_process_started,
1613: x_return_status => l_return_status);
1614: IF l_debug_on THEN
1615: WSH_DEBUG_SV.log(l_module_name,'L_PROCESS_STARTED',l_process_started);
1616: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
1617: END IF;
1618:
1619: IF(l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_process_started='Y' ) THEN
1612: x_wf_process_exists => l_process_started,
1613: x_return_status => l_return_status);
1614: IF l_debug_on THEN
1615: WSH_DEBUG_SV.log(l_module_name,'L_PROCESS_STARTED',l_process_started);
1616: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
1617: END IF;
1618:
1619: IF(l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_process_started='Y' ) THEN
1620: IF l_debug_on THEN
1617: END IF;
1618:
1619: IF(l_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_process_started='Y' ) THEN
1620: IF l_debug_on THEN
1621: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.PURGE_ENTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
1622: END IF;
1623: l_del_entity_ids(1) := p_delivery_id;
1624: WSH_WF_STD.Purge_Entity(
1625: p_entity_type => 'DELIVERY',
1626: p_entity_ids => l_del_entity_ids,
1627: x_success_count => l_purged_count,
1628: x_return_status => l_return_status);
1629: IF l_debug_on THEN
1630: WSH_DEBUG_SV.log(l_module_name,'L_PURGED_COUNT',l_purged_count);
1631: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
1632: END IF;
1633: END IF; -- If WorkFlow Exists
1634:
1627: x_success_count => l_purged_count,
1628: x_return_status => l_return_status);
1629: IF l_debug_on THEN
1630: WSH_DEBUG_SV.log(l_module_name,'L_PURGED_COUNT',l_purged_count);
1631: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
1632: END IF;
1633: END IF; -- If WorkFlow Exists
1634:
1635: IF(l_return_status=WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
1633: END IF; -- If WorkFlow Exists
1634:
1635: IF(l_return_status=WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
1636: IF l_debug_on THEN
1637: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.START_WF_PROCESS',WSH_DEBUG_SV.C_PROC_LEVEL);
1638: END IF;
1639:
1640: WSH_WF_STD.start_wf_process(
1641: p_entity_type => 'DELIVERY',
1644: x_process_started =>l_process_started,
1645: x_return_status =>l_return_status
1646: );
1647: IF l_debug_on THEN
1648: WSH_DEBUG_SV.log(l_module_name,'L_PROCESS_STARTED',l_process_started);
1649: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
1650: END IF;
1651: END IF;
1652:
1645: x_return_status =>l_return_status
1646: );
1647: IF l_debug_on THEN
1648: WSH_DEBUG_SV.log(l_module_name,'L_PROCESS_STARTED',l_process_started);
1649: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
1650: END IF;
1651: END IF;
1652:
1653: END IF;-- If Start Workflow
1654:
1655: --Raise Event: Pick To Pod Workflow
1656: IF ( l_raise_pickinitiated_event AND l_count_picked_lines > 0 ) THEN
1657: IF l_debug_on THEN
1658: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.RAISE_EVENT',WSH_DEBUG_SV.C_PROC_LEVEL);
1659: END IF;
1660: WSH_WF_STD.Raise_Event(
1661: p_entity_type => 'DELIVERY',
1662: p_entity_id => p_delivery_id,
1663: p_event => 'oracle.apps.wsh.delivery.pik.pickinitiated' ,
1664: p_organization_id => l_org_id,
1665: x_return_status => l_wf_rs ) ;
1666: IF l_debug_on THEN
1667: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', p_delivery_id );
1668: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
1669: END IF;
1670: END IF;
1671: -- Done Raise Event: Pick To Pod Workflow
1664: p_organization_id => l_org_id,
1665: x_return_status => l_wf_rs ) ;
1666: IF l_debug_on THEN
1667: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', p_delivery_id );
1668: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
1669: END IF;
1670: END IF;
1671: -- Done Raise Event: Pick To Pod Workflow
1672: /* CURRENTLY NOT IN USE
1693: CLOSE c_topmost_container;
1694: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1695: --
1696: IF l_debug_on THEN
1697: WSH_DEBUG_SV.pop(l_module_name);
1698: END IF;
1699: --
1700: return;
1701: --
1705: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1706: wsh_util_core.add_message(x_return_status,l_module_name);
1707: --
1708: IF l_debug_on THEN
1709: WSH_DEBUG_SV.logmsg(l_module_name,'ASSIGN_FAIL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1710: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:ASSIGN_FAIL');
1711: END IF;
1712: --
1713: WHEN others THEN
1706: wsh_util_core.add_message(x_return_status,l_module_name);
1707: --
1708: IF l_debug_on THEN
1709: WSH_DEBUG_SV.logmsg(l_module_name,'ASSIGN_FAIL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1710: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:ASSIGN_FAIL');
1711: END IF;
1712: --
1713: WHEN others THEN
1714: ROLLBACK TO before_assign_topmost_cont;
1717: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DELIVERY_DETAIL',l_module_name);
1718:
1719: --
1720: IF l_debug_on THEN
1721: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1722: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1723: END IF;
1724: --
1725: END Assign_Detail_to_Delivery;
1718:
1719: --
1720: IF l_debug_on THEN
1721: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1722: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1723: END IF;
1724: --
1725: END Assign_Detail_to_Delivery;
1726:
1750: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1751: --
1752: IF l_debug_on IS NULL
1753: THEN
1754: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1755: END IF;
1756: --
1757: IF l_debug_on THEN
1758: WSH_DEBUG_SV.push(l_module_name);
1754: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1755: END IF;
1756: --
1757: IF l_debug_on THEN
1758: WSH_DEBUG_SV.push(l_module_name);
1759: --
1760: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1761: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1762: END IF;
1756: --
1757: IF l_debug_on THEN
1758: WSH_DEBUG_SV.push(l_module_name);
1759: --
1760: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1761: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1762: END IF;
1763: --
1764: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1757: IF l_debug_on THEN
1758: WSH_DEBUG_SV.push(l_module_name);
1759: --
1760: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1761: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
1762: END IF;
1763: --
1764: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1765: --
1778: p_caller => p_caller --bug 5100229
1779: );
1780: --
1781: IF l_debug_on THEN
1782: WSH_DEBUG_SV.pop(l_module_name);
1783: END IF;
1784: --
1785: EXCEPTION
1786: WHEN others THEN
1787: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1788: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.Assign_Detail_to_Delivery',l_module_name);
1789: --
1790: IF l_debug_on THEN
1791: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1792: END IF;
1793: END Assign_Detail_to_Delivery;
1794:
1795: -- OTM R12 : assign delivery detail
1855: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1856: --
1857: IF l_debug_on IS NULL
1858: THEN
1859: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1860: END IF;
1861: --
1862: IF l_debug_on THEN
1863: WSH_DEBUG_SV.push(l_module_name);
1859: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1860: END IF;
1861: --
1862: IF l_debug_on THEN
1863: WSH_DEBUG_SV.push(l_module_name);
1864: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
1865: WSH_DEBUG_SV.log(l_module_name, 'P_DETAIL_ID', p_detail_id);
1866: WSH_DEBUG_SV.log(l_module_name, 'P_CONTAINER1_ID', p_container1_id);
1867: WSH_DEBUG_SV.log(l_module_name, 'P_CONTAINER2_ID', p_container2_id);
1860: END IF;
1861: --
1862: IF l_debug_on THEN
1863: WSH_DEBUG_SV.push(l_module_name);
1864: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
1865: WSH_DEBUG_SV.log(l_module_name, 'P_DETAIL_ID', p_detail_id);
1866: WSH_DEBUG_SV.log(l_module_name, 'P_CONTAINER1_ID', p_container1_id);
1867: WSH_DEBUG_SV.log(l_module_name, 'P_CONTAINER2_ID', p_container2_id);
1868: WSH_DEBUG_SV.log(l_module_name, 'P_ASSIGNMENT_TYPE', p_assignment_type);
1861: --
1862: IF l_debug_on THEN
1863: WSH_DEBUG_SV.push(l_module_name);
1864: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
1865: WSH_DEBUG_SV.log(l_module_name, 'P_DETAIL_ID', p_detail_id);
1866: WSH_DEBUG_SV.log(l_module_name, 'P_CONTAINER1_ID', p_container1_id);
1867: WSH_DEBUG_SV.log(l_module_name, 'P_CONTAINER2_ID', p_container2_id);
1868: WSH_DEBUG_SV.log(l_module_name, 'P_ASSIGNMENT_TYPE', p_assignment_type);
1869: END IF;
1862: IF l_debug_on THEN
1863: WSH_DEBUG_SV.push(l_module_name);
1864: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
1865: WSH_DEBUG_SV.log(l_module_name, 'P_DETAIL_ID', p_detail_id);
1866: WSH_DEBUG_SV.log(l_module_name, 'P_CONTAINER1_ID', p_container1_id);
1867: WSH_DEBUG_SV.log(l_module_name, 'P_CONTAINER2_ID', p_container2_id);
1868: WSH_DEBUG_SV.log(l_module_name, 'P_ASSIGNMENT_TYPE', p_assignment_type);
1869: END IF;
1870:
1863: WSH_DEBUG_SV.push(l_module_name);
1864: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
1865: WSH_DEBUG_SV.log(l_module_name, 'P_DETAIL_ID', p_detail_id);
1866: WSH_DEBUG_SV.log(l_module_name, 'P_CONTAINER1_ID', p_container1_id);
1867: WSH_DEBUG_SV.log(l_module_name, 'P_CONTAINER2_ID', p_container2_id);
1868: WSH_DEBUG_SV.log(l_module_name, 'P_ASSIGNMENT_TYPE', p_assignment_type);
1869: END IF;
1870:
1871: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1864: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
1865: WSH_DEBUG_SV.log(l_module_name, 'P_DETAIL_ID', p_detail_id);
1866: WSH_DEBUG_SV.log(l_module_name, 'P_CONTAINER1_ID', p_container1_id);
1867: WSH_DEBUG_SV.log(l_module_name, 'P_CONTAINER2_ID', p_container2_id);
1868: WSH_DEBUG_SV.log(l_module_name, 'P_ASSIGNMENT_TYPE', p_assignment_type);
1869: END IF;
1870:
1871: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1872: x_delivery_was_empty := FALSE;
1890: IF (l_is_delivery_empty = 'Y') THEN
1891: x_delivery_was_empty := TRUE;
1892: ELSIF (l_is_delivery_empty = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
1893: IF l_debug_on THEN
1894: WSH_DEBUG_SV.log(l_module_name,'error from wsh_new_delivery_actions.is_delivery_empty');
1895: END IF;
1896: raise FND_API.G_EXC_ERROR;
1897: END IF;
1898: END IF;
1945: IF (l_is_delivery_empty = 'Y') THEN
1946: x_delivery_was_empty := TRUE;
1947: ELSIF (l_is_delivery_empty = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
1948: IF l_debug_on THEN
1949: WSH_DEBUG_SV.log(l_module_name,'error from wsh_new_delivery_actions.is_delivery_empty');
1950: END IF;
1951: raise FND_API.G_EXC_ERROR;
1952: END IF;
1953: ELSIF (l_delivery2 IS NOT NULL) THEN
1956: IF (l_is_delivery_empty = 'Y') THEN
1957: x_delivery_was_empty := TRUE;
1958: ELSIF (l_is_delivery_empty = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
1959: IF l_debug_on THEN
1960: WSH_DEBUG_SV.log(l_module_name,'error from wsh_new_delivery_actions.is_delivery_empty');
1961: END IF;
1962: raise FND_API.G_EXC_ERROR;
1963: END IF;
1964: END IF;
1964: END IF;
1965:
1966: ELSE
1967: IF l_debug_on THEN
1968: WSH_DEBUG_SV.log(l_module_name,'Error in wrong assignment_type', p_assignment_type);
1969: END IF;
1970: raise FND_API.G_EXC_ERROR;
1971: END IF;
1972:
1970: raise FND_API.G_EXC_ERROR;
1971: END IF;
1972:
1973: IF l_debug_on THEN
1974: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_was_empty', x_delivery_was_empty);
1975: WSH_DEBUG_SV.log(l_module_name, 'x_assign_update', x_assign_update);
1976: WSH_DEBUG_SV.log(l_module_name, 'x_gross_weight1', x_gross_weight1);
1977: WSH_DEBUG_SV.log(l_module_name, 'x_gross_weight2', x_gross_weight2);
1978: END IF;
1971: END IF;
1972:
1973: IF l_debug_on THEN
1974: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_was_empty', x_delivery_was_empty);
1975: WSH_DEBUG_SV.log(l_module_name, 'x_assign_update', x_assign_update);
1976: WSH_DEBUG_SV.log(l_module_name, 'x_gross_weight1', x_gross_weight1);
1977: WSH_DEBUG_SV.log(l_module_name, 'x_gross_weight2', x_gross_weight2);
1978: END IF;
1979:
1972:
1973: IF l_debug_on THEN
1974: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_was_empty', x_delivery_was_empty);
1975: WSH_DEBUG_SV.log(l_module_name, 'x_assign_update', x_assign_update);
1976: WSH_DEBUG_SV.log(l_module_name, 'x_gross_weight1', x_gross_weight1);
1977: WSH_DEBUG_SV.log(l_module_name, 'x_gross_weight2', x_gross_weight2);
1978: END IF;
1979:
1980: IF l_debug_on THEN
1973: IF l_debug_on THEN
1974: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_was_empty', x_delivery_was_empty);
1975: WSH_DEBUG_SV.log(l_module_name, 'x_assign_update', x_assign_update);
1976: WSH_DEBUG_SV.log(l_module_name, 'x_gross_weight1', x_gross_weight1);
1977: WSH_DEBUG_SV.log(l_module_name, 'x_gross_weight2', x_gross_weight2);
1978: END IF;
1979:
1980: IF l_debug_on THEN
1981: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
1977: WSH_DEBUG_SV.log(l_module_name, 'x_gross_weight2', x_gross_weight2);
1978: END IF;
1979:
1980: IF l_debug_on THEN
1981: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
1982: WSH_DEBUG_SV.pop(l_module_name);
1983: END IF;
1984:
1985: EXCEPTION
1978: END IF;
1979:
1980: IF l_debug_on THEN
1981: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
1982: WSH_DEBUG_SV.pop(l_module_name);
1983: END IF;
1984:
1985: EXCEPTION
1986: WHEN FND_API.G_EXC_ERROR THEN
1995: END IF;
1996:
1997: --
1998: IF l_debug_on THEN
1999: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
2000: WSH_DEBUG_SV.pop(l_module_name);
2001: END IF;
2002: --
2003: RETURN;
1996:
1997: --
1998: IF l_debug_on THEN
1999: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
2000: WSH_DEBUG_SV.pop(l_module_name);
2001: END IF;
2002: --
2003: RETURN;
2004: WHEN OTHERS THEN
2013: END IF;
2014:
2015: --
2016: IF l_debug_on THEN
2017: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
2018: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION OTHERS');
2019: END IF;
2020: --
2021: RETURN;
2014:
2015: --
2016: IF l_debug_on THEN
2017: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
2018: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION OTHERS');
2019: END IF;
2020: --
2021: RETURN;
2022:
2064: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2065: --
2066: IF l_debug_on IS NULL
2067: THEN
2068: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2069: END IF;
2070: --
2071: IF l_debug_on THEN
2072: WSH_DEBUG_SV.push(l_module_name);
2068: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2069: END IF;
2070: --
2071: IF l_debug_on THEN
2072: WSH_DEBUG_SV.push(l_module_name);
2073: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
2074: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_WAS_EMPTY', p_delivery_was_empty);
2075: WSH_DEBUG_SV.log(l_module_name, 'P_TMS_INTERFACE_FLAG', p_tms_interface_flag);
2076: WSH_DEBUG_SV.log(l_module_name, 'P_GROSS_WEIGHT', p_gross_weight);
2069: END IF;
2070: --
2071: IF l_debug_on THEN
2072: WSH_DEBUG_SV.push(l_module_name);
2073: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
2074: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_WAS_EMPTY', p_delivery_was_empty);
2075: WSH_DEBUG_SV.log(l_module_name, 'P_TMS_INTERFACE_FLAG', p_tms_interface_flag);
2076: WSH_DEBUG_SV.log(l_module_name, 'P_GROSS_WEIGHT', p_gross_weight);
2077: END IF;
2070: --
2071: IF l_debug_on THEN
2072: WSH_DEBUG_SV.push(l_module_name);
2073: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
2074: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_WAS_EMPTY', p_delivery_was_empty);
2075: WSH_DEBUG_SV.log(l_module_name, 'P_TMS_INTERFACE_FLAG', p_tms_interface_flag);
2076: WSH_DEBUG_SV.log(l_module_name, 'P_GROSS_WEIGHT', p_gross_weight);
2077: END IF;
2078:
2071: IF l_debug_on THEN
2072: WSH_DEBUG_SV.push(l_module_name);
2073: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
2074: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_WAS_EMPTY', p_delivery_was_empty);
2075: WSH_DEBUG_SV.log(l_module_name, 'P_TMS_INTERFACE_FLAG', p_tms_interface_flag);
2076: WSH_DEBUG_SV.log(l_module_name, 'P_GROSS_WEIGHT', p_gross_weight);
2077: END IF;
2078:
2079: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2072: WSH_DEBUG_SV.push(l_module_name);
2073: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_ID', p_delivery_id);
2074: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_WAS_EMPTY', p_delivery_was_empty);
2075: WSH_DEBUG_SV.log(l_module_name, 'P_TMS_INTERFACE_FLAG', p_tms_interface_flag);
2076: WSH_DEBUG_SV.log(l_module_name, 'P_GROSS_WEIGHT', p_gross_weight);
2077: END IF;
2078:
2079: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2080:
2085: l_is_delivery_empty := WSH_NEW_DELIVERY_ACTIONS.IS_DELIVERY_EMPTY(p_delivery_id);
2086:
2087: IF (l_is_delivery_empty = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
2088: IF l_debug_on THEN
2089: WSH_DEBUG_SV.log(l_module_name,'error from wsh_new_delivery_actions.is_delivery_empty');
2090: END IF;
2091: raise FND_API.G_EXC_ERROR;
2092: ELSIF (l_is_delivery_empty = 'Y') THEN
2093: l_call_update := 'N';
2101: x_return_status => l_return_status);
2102:
2103: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
2104: IF l_debug_on THEN
2105: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_DELIVERY_VALIDATIONS.get_delivery_information');
2106: END IF;
2107: raise FND_API.G_EXC_ERROR;
2108: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2109: l_num_warnings := l_num_warnings + 1;
2112:
2113: END IF;
2114:
2115: IF l_debug_on THEN
2116: WSH_DEBUG_SV.log(l_module_name, 'P_DELIVERY_WAS_EMPTY - L_TMS_INTERFACE_FLAG', l_tms_interface_flag);
2117: END IF;
2118:
2119: IF (l_tms_interface_flag = WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) THEN
2120: l_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_CREATE_REQUIRED;
2140: x_return_status => l_return_status);
2141:
2142: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
2143: IF l_debug_on THEN
2144: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG '||l_return_status);
2145: END IF;
2146: raise FND_API.G_EXC_ERROR;
2147: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
2148: l_num_warnings := l_num_warnings + 1;
2154: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2155: END IF;
2156:
2157: IF l_debug_on THEN
2158: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
2159: WSH_DEBUG_SV.pop(l_module_name);
2160: END IF;
2161:
2162: EXCEPTION
2155: END IF;
2156:
2157: IF l_debug_on THEN
2158: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
2159: WSH_DEBUG_SV.pop(l_module_name);
2160: END IF;
2161:
2162: EXCEPTION
2163: WHEN FND_API.G_EXC_ERROR THEN
2163: WHEN FND_API.G_EXC_ERROR THEN
2164: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2165: --
2166: IF l_debug_on THEN
2167: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
2168: WSH_DEBUG_SV.pop(l_module_name);
2169: END IF;
2170: --
2171: RETURN;
2164: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2165: --
2166: IF l_debug_on THEN
2167: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
2168: WSH_DEBUG_SV.pop(l_module_name);
2169: END IF;
2170: --
2171: RETURN;
2172: WHEN OTHERS THEN
2172: WHEN OTHERS THEN
2173: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2174: --
2175: IF l_debug_on THEN
2176: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
2177: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION OTHERS');
2178: END IF;
2179: --
2180: RETURN;
2173: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2174: --
2175: IF l_debug_on THEN
2176: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
2177: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION OTHERS');
2178: END IF;
2179: --
2180: RETURN;
2181: END Post_Otm_Assign_Del_Detail;
2311: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2312: --
2313: IF l_debug_on IS NULL
2314: THEN
2315: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2316: END IF;
2317: --
2318: IF l_debug_on THEN
2319: WSH_DEBUG_SV.push(l_module_name);
2315: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2316: END IF;
2317: --
2318: IF l_debug_on THEN
2319: WSH_DEBUG_SV.push(l_module_name);
2320: --
2321: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
2322: WSH_DEBUG_SV.log(l_module_name,'P_PARENT_DETAIL_ID',P_PARENT_DETAIL_ID);
2323: END IF;
2317: --
2318: IF l_debug_on THEN
2319: WSH_DEBUG_SV.push(l_module_name);
2320: --
2321: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
2322: WSH_DEBUG_SV.log(l_module_name,'P_PARENT_DETAIL_ID',P_PARENT_DETAIL_ID);
2323: END IF;
2324: --
2325: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2318: IF l_debug_on THEN
2319: WSH_DEBUG_SV.push(l_module_name);
2320: --
2321: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
2322: WSH_DEBUG_SV.log(l_module_name,'P_PARENT_DETAIL_ID',P_PARENT_DETAIL_ID);
2323: END IF;
2324: --
2325: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2326:
2349: -- J: W/V Changes
2350: -- Return if the dd is already assigned to the specified container
2351: IF l_del_id_for_detail.parent_delivery_detail_id = p_parent_detail_id THEN
2352: IF l_debug_on THEN
2353: WSH_DEBUG_SV.logmsg(l_module_name,'DD '||p_detail_id||' is already assigned to '||p_parent_detail_id||'. Returning');
2354: WSH_DEBUG_SV.pop(l_module_name);
2355: END IF;
2356: return;
2357: END IF;
2350: -- Return if the dd is already assigned to the specified container
2351: IF l_del_id_for_detail.parent_delivery_detail_id = p_parent_detail_id THEN
2352: IF l_debug_on THEN
2353: WSH_DEBUG_SV.logmsg(l_module_name,'DD '||p_detail_id||' is already assigned to '||p_parent_detail_id||'. Returning');
2354: WSH_DEBUG_SV.pop(l_module_name);
2355: END IF;
2356: return;
2357: END IF;
2358:
2366:
2367: l_container_has_content := l_ship_to IS NOT NULL;
2368:
2369: IF l_debug_on THEN
2370: WSH_DEBUG_SV.log(l_module_name,'l_del_id_FOR_container',
2371: l_del_id_FOR_container.delivery_id);
2372: WSH_DEBUG_SV.log(l_module_name,'l_del_id_FOR_detail',
2373: l_del_id_for_detail.delivery_id);
2374: WSH_DEBUG_SV.log(l_module_name,'l_ship_to', l_ship_to);
2368:
2369: IF l_debug_on THEN
2370: WSH_DEBUG_SV.log(l_module_name,'l_del_id_FOR_container',
2371: l_del_id_FOR_container.delivery_id);
2372: WSH_DEBUG_SV.log(l_module_name,'l_del_id_FOR_detail',
2373: l_del_id_for_detail.delivery_id);
2374: WSH_DEBUG_SV.log(l_module_name,'l_ship_to', l_ship_to);
2375: END IF;
2376: /* Added code to check for grouping attributes */
2370: WSH_DEBUG_SV.log(l_module_name,'l_del_id_FOR_container',
2371: l_del_id_FOR_container.delivery_id);
2372: WSH_DEBUG_SV.log(l_module_name,'l_del_id_FOR_detail',
2373: l_del_id_for_detail.delivery_id);
2374: WSH_DEBUG_SV.log(l_module_name,'l_ship_to', l_ship_to);
2375: END IF;
2376: /* Added code to check for grouping attributes */
2377: IF (l_del_id_for_detail.organization_id <>
2378: l_del_id_for_container.organization_id) THEN
2379: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ASSG_ORG_DIFF');
2380: FND_MESSAGE.SET_TOKEN('ENTITY1',p_detail_id);
2381: --
2382: IF l_debug_on THEN
2383: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2384: END IF;
2385: --
2386: FND_MESSAGE.SET_TOKEN('ENTITY2',
2387: nvl(wsh_container_utilities.get_cont_name(p_parent_detail_id),
2389: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2390: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2391: --
2392: IF l_debug_on THEN
2393: WSH_DEBUG_SV.pop(l_module_name);
2394: END IF;
2395: --
2396: RETURN;
2397: END IF;
2400: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NOT_MATCH');
2401: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_detail_id);
2402: --
2403: IF l_debug_on THEN
2404: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2405: END IF;
2406: --
2407: FND_MESSAGE.SET_TOKEN('CONT_NAME',
2408: nvl(wsh_container_utilities.get_cont_name(p_parent_detail_id),
2410: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2411: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2412: --
2413: IF l_debug_on THEN
2414: WSH_DEBUG_SV.pop(l_module_name);
2415: END IF;
2416: --
2417: RETURN;
2418: END IF;
2447: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_DIFF_IGNOREPLAN');
2448: FND_MESSAGE.SET_TOKEN('ENTITY1',p_detail_id);
2449: --
2450: IF l_debug_on THEN
2451: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2452: END IF;
2453: --
2454: FND_MESSAGE.SET_TOKEN('ENTITY2',
2455: nvl(wsh_container_utilities.get_cont_name(p_parent_detail_id),
2456: p_parent_detail_id));
2457: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2458: --
2459: IF l_debug_on THEN
2460: WSH_DEBUG_SV.pop(l_module_name);
2461: END IF;
2462: --
2463: RETURN;
2464:
2487: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_DIFF_IGNOREPLAN');
2488: FND_MESSAGE.SET_TOKEN('ENTITY1',p_detail_id);
2489: --
2490: IF l_debug_on THEN
2491: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2492: END IF;
2493: --
2494: FND_MESSAGE.SET_TOKEN('ENTITY2',
2495: nvl(wsh_container_utilities.get_cont_name(p_parent_detail_id),
2497: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2498: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2499: --
2500: IF l_debug_on THEN
2501: WSH_DEBUG_SV.pop(l_module_name);
2502: END IF;
2503: --
2504: RETURN;
2505: END IF; --}
2528: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NOT_MATCH');
2529: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_detail_id);
2530: --
2531: IF l_debug_on THEN
2532: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2533: END IF;
2534: --
2535: FND_MESSAGE.SET_TOKEN('CONT_NAME',
2536: nvl(wsh_container_utilities.get_cont_name(p_parent_detail_id),
2538: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2539: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2540: --
2541: IF l_debug_on THEN
2542: WSH_DEBUG_SV.pop(l_module_name);
2543: END IF;
2544: --
2545: RETURN;
2546: --}
2551: -- J-IB-NPARIKH-}
2552: --
2553: --
2554: IF l_debug_on THEN
2555: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.GET_GROUP_BY_ATTR',WSH_DEBUG_SV.C_PROC_LEVEL);
2556: END IF;
2557: --
2558: WSH_DELIVERY_AUTOCREATE.get_group_by_attr(
2559: p_organization_id => l_del_id_for_detail.organization_id,
2565: x_return_status := x_return_status;
2566: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2567: --
2568: IF l_debug_on THEN
2569: WSH_DEBUG_SV.pop(l_module_name);
2570: END IF;
2571: --
2572: RETURN;
2573: END IF;
2578: ----------*/
2579:
2580: IF l_container_has_content THEN
2581: IF l_debug_on THEN
2582: WSH_DEBUG_SV.log(l_module_name,'l_group_by_flags.customer',
2583: l_group_by_flags.customer);
2584: WSH_DEBUG_SV.log(l_module_name,'del_id_for_detail.customer',
2585: l_del_id_for_detail.customer_id);
2586: WSH_DEBUG_SV.log(l_module_name,'id_for_container.customer',
2580: IF l_container_has_content THEN
2581: IF l_debug_on THEN
2582: WSH_DEBUG_SV.log(l_module_name,'l_group_by_flags.customer',
2583: l_group_by_flags.customer);
2584: WSH_DEBUG_SV.log(l_module_name,'del_id_for_detail.customer',
2585: l_del_id_for_detail.customer_id);
2586: WSH_DEBUG_SV.log(l_module_name,'id_for_container.customer',
2587: l_del_id_for_container.customer_id);
2588: END IF;
2582: WSH_DEBUG_SV.log(l_module_name,'l_group_by_flags.customer',
2583: l_group_by_flags.customer);
2584: WSH_DEBUG_SV.log(l_module_name,'del_id_for_detail.customer',
2585: l_del_id_for_detail.customer_id);
2586: WSH_DEBUG_SV.log(l_module_name,'id_for_container.customer',
2587: l_del_id_for_container.customer_id);
2588: END IF;
2589:
2590: --- Bug 3715176
2611:
2612: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2613: --
2614: IF l_debug_on THEN
2615: WSH_DEBUG_SV.pop(l_module_name);
2616: END IF;
2617: --
2618: return;
2619: end if;
2631:
2632: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2633: --
2634: IF l_debug_on THEN
2635: WSH_DEBUG_SV.pop(l_module_name);
2636: END IF;
2637: --
2638: return;
2639: end if;
2657: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NOT_MATCH');
2658: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_detail_id);
2659: --
2660: IF l_debug_on THEN
2661: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2662: END IF;
2663: --
2664: FND_MESSAGE.SET_TOKEN('CONT_NAME',
2665: nvl(wsh_container_utilities.get_cont_name(p_parent_detail_id),
2667: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2668: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2669: --
2670: IF l_debug_on THEN
2671: WSH_DEBUG_SV.pop(l_module_name);
2672: END IF;
2673: --
2674: return;
2675: END IF;
2682: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NOT_MATCH');
2683: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_detail_id);
2684: --
2685: IF l_debug_on THEN
2686: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2687: END IF;
2688: --
2689: FND_MESSAGE.SET_TOKEN('CONT_NAME',
2690: nvl(wsh_container_utilities.get_cont_name(p_parent_detail_id),
2692: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2693: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2694: --
2695: IF l_debug_on THEN
2696: WSH_DEBUG_SV.pop(l_module_name);
2697: END IF;
2698: --
2699: return;
2700: END IF;
2700: END IF;
2701: END IF;
2702:
2703: IF l_debug_on THEN
2704: WSH_DEBUG_SV.log(l_module_name,'fob_code',
2705: l_del_id_for_detail.fob_code);
2706: WSH_DEBUG_SV.log(l_module_name,'container fob_code',
2707: l_del_id_for_container.fob_code);
2708: WSH_DEBUG_SV.log(l_module_name,'fob',
2702:
2703: IF l_debug_on THEN
2704: WSH_DEBUG_SV.log(l_module_name,'fob_code',
2705: l_del_id_for_detail.fob_code);
2706: WSH_DEBUG_SV.log(l_module_name,'container fob_code',
2707: l_del_id_for_container.fob_code);
2708: WSH_DEBUG_SV.log(l_module_name,'fob',
2709: l_group_by_flags.fob);
2710: END IF;
2704: WSH_DEBUG_SV.log(l_module_name,'fob_code',
2705: l_del_id_for_detail.fob_code);
2706: WSH_DEBUG_SV.log(l_module_name,'container fob_code',
2707: l_del_id_for_container.fob_code);
2708: WSH_DEBUG_SV.log(l_module_name,'fob',
2709: l_group_by_flags.fob);
2710: END IF;
2711:
2712: IF l_group_by_flags.fob = 'Y' THEN
2716: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NOT_MATCH');
2717: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_detail_id);
2718: --
2719: IF l_debug_on THEN
2720: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2721: END IF;
2722: --
2723: FND_MESSAGE.SET_TOKEN('CONT_NAME',
2724: nvl(wsh_container_utilities.get_cont_name(p_parent_detail_id),
2726: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2727: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2728: --
2729: IF l_debug_on THEN
2730: WSH_DEBUG_SV.pop(l_module_name);
2731: END IF;
2732: --
2733: return;
2734: END IF;
2733: return;
2734: END IF;
2735: END IF;
2736: IF l_debug_on THEN
2737: WSH_DEBUG_SV.log(l_module_name,'freight_terms_code',
2738: l_del_id_for_detail.freight_terms_code);
2739: WSH_DEBUG_SV.log(l_module_name,
2740: 'container freight_terms_code',
2741: l_del_id_for_container.freight_terms_code);
2735: END IF;
2736: IF l_debug_on THEN
2737: WSH_DEBUG_SV.log(l_module_name,'freight_terms_code',
2738: l_del_id_for_detail.freight_terms_code);
2739: WSH_DEBUG_SV.log(l_module_name,
2740: 'container freight_terms_code',
2741: l_del_id_for_container.freight_terms_code);
2742: WSH_DEBUG_SV.log(l_module_name,'freight_terms',
2743: l_group_by_flags.freight_terms);
2738: l_del_id_for_detail.freight_terms_code);
2739: WSH_DEBUG_SV.log(l_module_name,
2740: 'container freight_terms_code',
2741: l_del_id_for_container.freight_terms_code);
2742: WSH_DEBUG_SV.log(l_module_name,'freight_terms',
2743: l_group_by_flags.freight_terms);
2744: END IF;
2745:
2746: IF l_group_by_flags.freight_terms = 'Y' THEN
2750: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NOT_MATCH');
2751: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_detail_id);
2752: --
2753: IF l_debug_on THEN
2754: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2755: END IF;
2756: --
2757: FND_MESSAGE.SET_TOKEN('CONT_NAME',
2758: nvl(wsh_container_utilities.get_cont_name(p_parent_detail_id),
2760: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2761: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2762: --
2763: IF l_debug_on THEN
2764: WSH_DEBUG_SV.pop(l_module_name);
2765: END IF;
2766: --
2767: return;
2768: END IF;
2768: END IF;
2769: END IF;
2770:
2771: IF l_debug_on THEN
2772: WSH_DEBUG_SV.log(l_module_name,'ship_method_code',
2773: l_del_id_for_detail.ship_method_code);
2774: WSH_DEBUG_SV.log(l_module_name, 'container ship_method_code',
2775: l_del_id_for_container.ship_method_code);
2776: WSH_DEBUG_SV.log(l_module_name,'ship_method',
2770:
2771: IF l_debug_on THEN
2772: WSH_DEBUG_SV.log(l_module_name,'ship_method_code',
2773: l_del_id_for_detail.ship_method_code);
2774: WSH_DEBUG_SV.log(l_module_name, 'container ship_method_code',
2775: l_del_id_for_container.ship_method_code);
2776: WSH_DEBUG_SV.log(l_module_name,'ship_method',
2777: l_group_by_flags.ship_method);
2778: END IF;
2772: WSH_DEBUG_SV.log(l_module_name,'ship_method_code',
2773: l_del_id_for_detail.ship_method_code);
2774: WSH_DEBUG_SV.log(l_module_name, 'container ship_method_code',
2775: l_del_id_for_container.ship_method_code);
2776: WSH_DEBUG_SV.log(l_module_name,'ship_method',
2777: l_group_by_flags.ship_method);
2778: END IF;
2779:
2780: IF l_group_by_flags.ship_method = 'Y' THEN
2788: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NOT_MATCH');
2789: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_detail_id);
2790: --
2791: IF l_debug_on THEN
2792: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2793: END IF;
2794: --
2795: FND_MESSAGE.SET_TOKEN('CONT_NAME',
2796: nvl(wsh_container_utilities.get_cont_name(p_parent_detail_id),
2798: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2799: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2800: --
2801: IF l_debug_on THEN
2802: WSH_DEBUG_SV.pop(l_module_name);
2803: END IF;
2804: --
2805: return;
2806: END IF;
2810: -- DD with x Client can be packed into a container with same client or NULL client
2811: IF WMS_DEPLOY.wms_deployment_mode = 'L' THEN
2812: --{
2813: IF l_debug_on THEN
2814: WSH_DEBUG_SV.log(l_module_name,'Client_id', l_del_id_for_detail.client_id);
2815: WSH_DEBUG_SV.log(l_module_name, 'container Client_id',l_del_id_for_container.client_id);
2816: WSH_DEBUG_SV.log(l_module_name,'WMS_DEPLOY.wms_deployment_mode', WMS_DEPLOY.wms_deployment_mode);
2817: END IF;
2818: IF ( NVL(l_del_id_for_detail.client_id,-1) <> NVL(l_del_id_for_container.client_id,NVL(l_del_id_for_detail.client_id,-1))) THEN
2811: IF WMS_DEPLOY.wms_deployment_mode = 'L' THEN
2812: --{
2813: IF l_debug_on THEN
2814: WSH_DEBUG_SV.log(l_module_name,'Client_id', l_del_id_for_detail.client_id);
2815: WSH_DEBUG_SV.log(l_module_name, 'container Client_id',l_del_id_for_container.client_id);
2816: WSH_DEBUG_SV.log(l_module_name,'WMS_DEPLOY.wms_deployment_mode', WMS_DEPLOY.wms_deployment_mode);
2817: END IF;
2818: IF ( NVL(l_del_id_for_detail.client_id,-1) <> NVL(l_del_id_for_container.client_id,NVL(l_del_id_for_detail.client_id,-1))) THEN
2819: --{
2812: --{
2813: IF l_debug_on THEN
2814: WSH_DEBUG_SV.log(l_module_name,'Client_id', l_del_id_for_detail.client_id);
2815: WSH_DEBUG_SV.log(l_module_name, 'container Client_id',l_del_id_for_container.client_id);
2816: WSH_DEBUG_SV.log(l_module_name,'WMS_DEPLOY.wms_deployment_mode', WMS_DEPLOY.wms_deployment_mode);
2817: END IF;
2818: IF ( NVL(l_del_id_for_detail.client_id,-1) <> NVL(l_del_id_for_container.client_id,NVL(l_del_id_for_detail.client_id,-1))) THEN
2819: --{
2820: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NOT_MATCH');
2820: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NOT_MATCH');
2821: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_detail_id);
2822: --
2823: IF l_debug_on THEN
2824: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2825: END IF;
2826: --
2827: FND_MESSAGE.SET_TOKEN('CONT_NAME',
2828: nvl(wsh_container_utilities.get_cont_name(p_parent_detail_id),
2830: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2831: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2832: --
2833: IF l_debug_on THEN
2834: WSH_DEBUG_SV.pop(l_module_name);
2835: END IF;
2836: --
2837: return;
2838: --}
2843: END IF;
2844: /* End of Check for grouping attributes */
2845:
2846: IF l_debug_on THEN
2847: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id',
2848: l_del_id_for_detail.parent_delivery_detail_id);
2849: WSH_DEBUG_SV.log(l_module_name,
2850: 'container parent_delivery_detail_id',
2851: l_del_id_for_container.parent_delivery_detail_id);
2845:
2846: IF l_debug_on THEN
2847: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id',
2848: l_del_id_for_detail.parent_delivery_detail_id);
2849: WSH_DEBUG_SV.log(l_module_name,
2850: 'container parent_delivery_detail_id',
2851: l_del_id_for_container.parent_delivery_detail_id);
2852: END IF;
2853:
2859: FND_MESSAGE.SET_NAME('WSH','WSH_DET_PACK_ERROR');
2860: FND_MESSAGE.SET_TOKEN('DET_LINE',p_detail_id);
2861: --
2862: IF l_debug_on THEN
2863: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2864: END IF;
2865: --
2866: FND_MESSAGE.SET_TOKEN('CONT_NAME',
2867: nvl(wsh_container_utilities.get_cont_name(p_parent_detail_id),
2869: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2870: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
2871: --
2872: IF l_debug_on THEN
2873: WSH_DEBUG_SV.pop(l_module_name);
2874: END IF;
2875: --
2876: return;
2877: END IF;
2879:
2880:
2881: -- J: W/V Changes
2882: IF l_debug_on THEN
2883: WSH_DEBUG_SV.log(l_module_name,'l_del_id_for_detail.released_status',
2884: l_del_id_for_detail.released_status);
2885: END IF;
2886:
2887: IF l_del_id_for_detail.released_status = 'C' THEN
2896: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_DIFF_DELIVERIES');
2897: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_detail_id);
2898: --
2899: IF l_debug_on THEN
2900: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
2901: END IF;
2902: --
2903: FND_MESSAGE.SET_TOKEN('CONT_NAME',
2904: nvl(wsh_container_utilities.get_cont_name(p_parent_detail_id),
2906: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2907: WSH_UTIL_CORE.Add_Message(x_return_status);
2908: --
2909: IF l_debug_on THEN
2910: WSH_DEBUG_SV.pop(l_module_name);
2911: END IF;
2912: --
2913: return;
2914: END IF;
2920: -- The third DD_WV_Post_Process will will increment the container W/V with DD W/V which in turn will adjust the
2921: -- delivery W/V, if the container is in a delivery.
2922: IF (l_del_id_for_detail.delivery_id is not null) THEN
2923: IF l_debug_on THEN
2924: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
2925: END IF;
2926:
2927: WSH_WV_UTILS.DD_WV_Post_Process(
2928: p_delivery_detail_id => p_detail_id,
2936: --
2937: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2938: WSH_UTIL_CORE.Add_Message(x_return_status);
2939: IF l_debug_on THEN
2940: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
2941: WSH_DEBUG_SV.pop(l_module_name);
2942: END IF;
2943: return;
2944: END IF;
2937: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2938: WSH_UTIL_CORE.Add_Message(x_return_status);
2939: IF l_debug_on THEN
2940: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
2941: WSH_DEBUG_SV.pop(l_module_name);
2942: END IF;
2943: return;
2944: END IF;
2945:
2976: x_return_status => l_return_status);
2977:
2978: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
2979: IF l_debug_on THEN
2980: WSH_DEBUG_SV.log(l_module_name,'error from Pre_Otm_Assign_Del_Detail');
2981: END IF;
2982: raise FND_API.G_EXC_ERROR;
2983: END IF;
2984: END IF;
2985: -- End of OTM R12 : assign delivery detail
2986:
2987:
2988: IF l_debug_on THEN
2989: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.CHECK_ASSIGN_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
2990: END IF;
2991:
2992: l_attr_tab(1).entity_id := l_del_id_for_container.delivery_id;
2993: l_attr_tab(1).entity_type := 'DELIVERY';
3009: --
3010: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3011: WSH_UTIL_CORE.Add_Message(x_return_status);
3012: IF l_debug_on THEN
3013: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3014: WSH_DEBUG_SV.pop(l_module_name);
3015: END IF;
3016: return;
3017: END IF;
3010: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3011: WSH_UTIL_CORE.Add_Message(x_return_status);
3012: IF l_debug_on THEN
3013: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3014: WSH_DEBUG_SV.pop(l_module_name);
3015: END IF;
3016: return;
3017: END IF;
3018:
3022: --
3023: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3024: WSH_UTIL_CORE.Add_Message(x_return_status);
3025: IF l_debug_on THEN
3026: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3027: WSH_DEBUG_SV.pop(l_module_name);
3028: END IF;
3029: return;
3030: END IF;
3023: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3024: WSH_UTIL_CORE.Add_Message(x_return_status);
3025: IF l_debug_on THEN
3026: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3027: WSH_DEBUG_SV.pop(l_module_name);
3028: END IF;
3029: return;
3030: END IF;
3031:
3043: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3044: FND_MESSAGE.Set_Name('WSH', 'WSH_NO_LOCK');
3045: WSH_UTIL_CORE.add_message (WSH_UTIL_CORE.G_RET_STS_ERROR);
3046: IF l_debug_on THEN
3047: WSH_DEBUG_SV.log(l_module_name,'Could not lock delivery: ',l_del_id_for_container.delivery_id);
3048: WSH_DEBUG_SV.pop(l_module_name);
3049: END IF;
3050: RETURN;
3051: END;
3044: FND_MESSAGE.Set_Name('WSH', 'WSH_NO_LOCK');
3045: WSH_UTIL_CORE.add_message (WSH_UTIL_CORE.G_RET_STS_ERROR);
3046: IF l_debug_on THEN
3047: WSH_DEBUG_SV.log(l_module_name,'Could not lock delivery: ',l_del_id_for_container.delivery_id);
3048: WSH_DEBUG_SV.pop(l_module_name);
3049: END IF;
3050: RETURN;
3051: END;
3052:
3068:
3069: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
3070: x_return_status := l_return_status;
3071: IF l_debug_on THEN
3072: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_DELIVERY_VALIDATIONS.get_trip_information');
3073: WSH_DEBUG_SV.pop(l_module_name);
3074: END IF;
3075: RETURN;
3076: END IF;
3069: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
3070: x_return_status := l_return_status;
3071: IF l_debug_on THEN
3072: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_DELIVERY_VALIDATIONS.get_trip_information');
3073: WSH_DEBUG_SV.pop(l_module_name);
3074: END IF;
3075: RETURN;
3076: END IF;
3077:
3090:
3091: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
3092: x_return_status := l_return_status;
3093: IF l_debug_on THEN
3094: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_DELIVERY_VALIDATIONS.get_delivery_information');
3095: WSH_DEBUG_SV.pop(l_module_name);
3096: END IF;
3097: RETURN;
3098: END IF;
3091: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
3092: x_return_status := l_return_status;
3093: IF l_debug_on THEN
3094: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_DELIVERY_VALIDATIONS.get_delivery_information');
3095: WSH_DEBUG_SV.pop(l_module_name);
3096: END IF;
3097: RETURN;
3098: END IF;
3099:
3125: END IF; -- IF ((l_trip_not_found = 'N' AND
3126: END IF; -- IF (l_gc3_is_installed = 'Y'
3127:
3128: IF l_debug_on THEN
3129: WSH_DEBUG_SV.log(l_module_name, 'l_gc3_is_installed', l_gc3_is_installed);
3130: WSH_DEBUG_SV.log(l_module_name, 'l_tms_update', l_tms_update);
3131: IF (l_tms_update = 'Y') THEN
3132: WSH_DEBUG_SV.log(l_module_name, 'l_new_interface_flag_tab', l_new_interface_flag_tab(1));
3133: WSH_DEBUG_SV.log(l_module_name, 'l_tms_version_number', l_tms_version_number);
3126: END IF; -- IF (l_gc3_is_installed = 'Y'
3127:
3128: IF l_debug_on THEN
3129: WSH_DEBUG_SV.log(l_module_name, 'l_gc3_is_installed', l_gc3_is_installed);
3130: WSH_DEBUG_SV.log(l_module_name, 'l_tms_update', l_tms_update);
3131: IF (l_tms_update = 'Y') THEN
3132: WSH_DEBUG_SV.log(l_module_name, 'l_new_interface_flag_tab', l_new_interface_flag_tab(1));
3133: WSH_DEBUG_SV.log(l_module_name, 'l_tms_version_number', l_tms_version_number);
3134: END IF;
3128: IF l_debug_on THEN
3129: WSH_DEBUG_SV.log(l_module_name, 'l_gc3_is_installed', l_gc3_is_installed);
3130: WSH_DEBUG_SV.log(l_module_name, 'l_tms_update', l_tms_update);
3131: IF (l_tms_update = 'Y') THEN
3132: WSH_DEBUG_SV.log(l_module_name, 'l_new_interface_flag_tab', l_new_interface_flag_tab(1));
3133: WSH_DEBUG_SV.log(l_module_name, 'l_tms_version_number', l_tms_version_number);
3134: END IF;
3135: END IF;
3136:
3129: WSH_DEBUG_SV.log(l_module_name, 'l_gc3_is_installed', l_gc3_is_installed);
3130: WSH_DEBUG_SV.log(l_module_name, 'l_tms_update', l_tms_update);
3131: IF (l_tms_update = 'Y') THEN
3132: WSH_DEBUG_SV.log(l_module_name, 'l_new_interface_flag_tab', l_new_interface_flag_tab(1));
3133: WSH_DEBUG_SV.log(l_module_name, 'l_tms_version_number', l_tms_version_number);
3134: END IF;
3135: END IF;
3136:
3137: -- End of OTM R12 : update delivery
3159:
3160: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
3161: x_return_status := l_return_status;
3162: IF l_debug_on THEN
3163: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_XC_UTIL.log_otm_exception');
3164: WSH_DEBUG_SV.pop(l_module_name);
3165: END IF;
3166: RETURN;
3167: END IF;
3160: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
3161: x_return_status := l_return_status;
3162: IF l_debug_on THEN
3163: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_XC_UTIL.log_otm_exception');
3164: WSH_DEBUG_SV.pop(l_module_name);
3165: END IF;
3166: RETURN;
3167: END IF;
3168: END IF;
3184: l_sync_tmp_rec.delivery_id := l_del_id_for_detail.delivery_id;
3185: l_sync_tmp_rec.operation_type := 'PRIOR';
3186: --
3187: IF l_debug_on THEN
3188: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE',WSH_DEBUG_SV.C_PROC_LEVEL);
3189: END IF;
3190: --
3191: WSH_WMS_SYNC_TMP_PKG.MERGE
3192: (
3198: --
3199: x_return_status := l_return_status;
3200: --
3201: IF l_debug_on THEN
3202: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
3203: WSH_DEBUG_SV.pop(l_module_name);
3204: END IF;
3205: --
3206: return;
3199: x_return_status := l_return_status;
3200: --
3201: IF l_debug_on THEN
3202: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
3203: WSH_DEBUG_SV.pop(l_module_name);
3204: END IF;
3205: --
3206: return;
3207: --
3246: x_return_status => l_return_status);
3247:
3248: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
3249: IF l_debug_on THEN
3250: WSH_DEBUG_SV.log(l_module_name,'error from Post_Otm_Assign_Del_Detail');
3251: END IF;
3252: raise FND_API.G_EXC_ERROR;
3253: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
3254: l_num_warnings := l_num_warnings + 1;
3263: x_return_status => x_return_status);
3264:
3265: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3266: IF l_debug_on THEN
3267: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3268: WSH_DEBUG_SV.pop(l_module_name);
3269: END IF;
3270: return;
3271: END IF;
3264:
3265: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3266: IF l_debug_on THEN
3267: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3268: WSH_DEBUG_SV.pop(l_module_name);
3269: END IF;
3270: return;
3271: END IF;
3272:
3295: l_sync_tmp_rec.delivery_id := l_del_id_for_detail.delivery_id;
3296: l_sync_tmp_rec.operation_type := 'PRIOR';
3297: --
3298: IF l_debug_on THEN
3299: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE',WSH_DEBUG_SV.C_PROC_LEVEL);
3300: END IF;
3301: --
3302: WSH_WMS_SYNC_TMP_PKG.MERGE
3303: (
3309: --
3310: x_return_status := l_return_status;
3311: --
3312: IF l_debug_on THEN
3313: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
3314: WSH_DEBUG_SV.pop(l_module_name);
3315: END IF;
3316: --
3317: return;
3310: x_return_status := l_return_status;
3311: --
3312: IF l_debug_on THEN
3313: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
3314: WSH_DEBUG_SV.pop(l_module_name);
3315: END IF;
3316: --
3317: return;
3318: --
3340: x_return_status => x_return_status);
3341:
3342: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3343: IF l_debug_on THEN
3344: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3345: WSH_DEBUG_SV.pop(l_module_name);
3346: END IF;
3347: return;
3348: END IF;
3341:
3342: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3343: IF l_debug_on THEN
3344: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3345: WSH_DEBUG_SV.pop(l_module_name);
3346: END IF;
3347: return;
3348: END IF;
3349: END IF;
3406: x_return_status => l_return_status);
3407:
3408: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
3409: IF l_debug_on THEN
3410: WSH_DEBUG_SV.log(l_module_name,'error from Pre_Otm_Assign_Del_Detail');
3411: END IF;
3412: raise FND_API.G_EXC_ERROR;
3413: END IF;
3414: END IF;
3441: THEN
3442: --{
3443: --
3444: IF l_debug_on THEN
3445: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE_BULK',WSH_DEBUG_SV.C_PROC_LEVEL);
3446: END IF;
3447: --
3448: WSH_WMS_SYNC_TMP_PKG.MERGE_BULK
3449: (
3456: --
3457: x_return_status := l_return_status;
3458: --
3459: IF l_debug_on THEN
3460: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
3461: WSH_DEBUG_SV.pop(l_module_name);
3462: END IF;
3463: --
3464: return;
3457: x_return_status := l_return_status;
3458: --
3459: IF l_debug_on THEN
3460: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
3461: WSH_DEBUG_SV.pop(l_module_name);
3462: END IF;
3463: --
3464: return;
3465: --
3501: x_return_status => l_return_status);
3502:
3503: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
3504: IF l_debug_on THEN
3505: WSH_DEBUG_SV.log(l_module_name,'error from Post_Otm_Assign_Del_Detail');
3506: END IF;
3507: raise FND_API.G_EXC_ERROR;
3508: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
3509: l_num_warnings := l_num_warnings + 1;
3519: x_return_status => x_return_status);
3520:
3521: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3522: IF l_debug_on THEN
3523: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3524: WSH_DEBUG_SV.pop(l_module_name);
3525: END IF;
3526: return;
3527: END IF;
3520:
3521: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3522: IF l_debug_on THEN
3523: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3524: WSH_DEBUG_SV.pop(l_module_name);
3525: END IF;
3526: return;
3527: END IF;
3528: l_mdc_detail_tab.delete;
3537:
3538: -- J: W/V Changes
3539: -- Container is being assigned to delivery. Call DD_WV_Post_Process to adjust the W/V of the parent
3540: IF l_debug_on THEN
3541: WSH_DEBUG_SV.logmsg(l_module_name,'Assigning Container to Delivery');
3542: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
3543: END IF;
3544:
3545: WSH_WV_UTILS.DD_WV_Post_Process(
3538: -- J: W/V Changes
3539: -- Container is being assigned to delivery. Call DD_WV_Post_Process to adjust the W/V of the parent
3540: IF l_debug_on THEN
3541: WSH_DEBUG_SV.logmsg(l_module_name,'Assigning Container to Delivery');
3542: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
3543: END IF;
3544:
3545: WSH_WV_UTILS.DD_WV_Post_Process(
3546: p_delivery_detail_id => p_parent_detail_id,
3554: --
3555: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3556: WSH_UTIL_CORE.Add_Message(x_return_status);
3557: IF l_debug_on THEN
3558: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3559: WSH_DEBUG_SV.pop(l_module_name);
3560: END IF;
3561: return;
3562: END IF;
3555: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3556: WSH_UTIL_CORE.Add_Message(x_return_status);
3557: IF l_debug_on THEN
3558: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3559: WSH_DEBUG_SV.pop(l_module_name);
3560: END IF;
3561: return;
3562: END IF;
3563:
3574: THEN
3575: --{
3576: -- J: W/V Changes
3577: IF l_debug_on THEN
3578: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
3579: END IF;
3580:
3581: WSH_WV_UTILS.DD_WV_Post_Process(
3582: p_delivery_detail_id => p_detail_id,
3593: --
3594: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3595: WSH_UTIL_CORE.Add_Message(x_return_status);
3596: IF l_debug_on THEN
3597: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3598: WSH_DEBUG_SV.pop(l_module_name);
3599: END IF;
3600: return;
3601: END IF;
3594: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3595: WSH_UTIL_CORE.Add_Message(x_return_status);
3596: IF l_debug_on THEN
3597: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3598: WSH_DEBUG_SV.pop(l_module_name);
3599: END IF;
3600: return;
3601: END IF;
3602: END IF;
3607: /* H integration: Pricing integration csun */
3608: IF l_del_tab.count > 0 THEN
3609: --
3610: IF l_debug_on THEN
3611: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
3612: END IF;
3613: --
3614: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
3615: p_entity_type => 'DELIVERY',
3625: END IF;
3626:
3627: --
3628: IF l_debug_on THEN
3629: WSH_DEBUG_SV.pop(l_module_name);
3630: END IF;
3631: --
3632: exception
3633:
3635: WHEN FND_API.G_EXC_ERROR then
3636: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3637: --
3638: IF l_debug_on THEN
3639: WSH_DEBUG_SV.pop(l_module_name);
3640: END IF;
3641: --
3642: RETURN;
3643: -- End of OTM R12 : assign delivery detail
3647: x_return_status := l_return_status;
3648: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
3649: --
3650: IF l_debug_on THEN
3651: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3652: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
3653: END IF;
3654: --
3655: WHEN invalid_detail then
3648: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
3649: --
3650: IF l_debug_on THEN
3651: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3652: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
3653: END IF;
3654: --
3655: WHEN invalid_detail then
3656: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3658: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_detail_id);
3659: wsh_util_core.add_message(x_return_status,l_module_name);
3660: --
3661: IF l_debug_on THEN
3662: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_DETAIL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3663: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DETAIL');
3664: END IF;
3665: --
3666: RETURN;
3659: wsh_util_core.add_message(x_return_status,l_module_name);
3660: --
3661: IF l_debug_on THEN
3662: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_DETAIL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3663: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DETAIL');
3664: END IF;
3665: --
3666: RETURN;
3667: WHEN others THEN
3668: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3669: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DETAIL_TO_CONT',l_module_name);
3670: --
3671: IF l_debug_on THEN
3672: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3673: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3674: END IF;
3675: --
3676: END Assign_Detail_To_Cont;
3669: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DETAIL_TO_CONT',l_module_name);
3670: --
3671: IF l_debug_on THEN
3672: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3673: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3674: END IF;
3675: --
3676: END Assign_Detail_To_Cont;
3677: -- -------------------------------------------------------------------------------
3735: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3736: --
3737: IF l_debug_on IS NULL
3738: THEN
3739: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3740: END IF;
3741: --
3742: IF l_debug_on THEN
3743: WSH_DEBUG_SV.push(l_module_name);
3739: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3740: END IF;
3741: --
3742: IF l_debug_on THEN
3743: WSH_DEBUG_SV.push(l_module_name);
3744: --
3745: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
3746: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
3747: END IF;
3741: --
3742: IF l_debug_on THEN
3743: WSH_DEBUG_SV.push(l_module_name);
3744: --
3745: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
3746: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
3747: END IF;
3748: --
3749: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3742: IF l_debug_on THEN
3743: WSH_DEBUG_SV.push(l_module_name);
3744: --
3745: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
3746: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
3747: END IF;
3748: --
3749: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3750:
3755:
3756:
3757: IF l_del_rec.parent_delivery_detail_id is NULL THEN
3758: IF l_debug_on THEN
3759: WSH_DEBUG_SV.logmsg(l_module_name,'DD '||p_detail_id||' is already unassigned. Returning');
3760: WSH_DEBUG_SV.pop(l_module_name);
3761: END IF;
3762: return;
3763:
3756:
3757: IF l_del_rec.parent_delivery_detail_id is NULL THEN
3758: IF l_debug_on THEN
3759: WSH_DEBUG_SV.logmsg(l_module_name,'DD '||p_detail_id||' is already unassigned. Returning');
3760: WSH_DEBUG_SV.pop(l_module_name);
3761: END IF;
3762: return;
3763:
3764: -- LPN CONV. rv
3768: fetch l_parent_cnt_csr into l_parent_cnt_orgn_id, l_parent_cnt_line_dir;
3769: close l_parent_cnt_csr;
3770: --
3771: IF l_debug_on THEN
3772: WSH_DEBUG_SV.log(l_module_name,' parent cnt orgn id is', l_parent_cnt_orgn_id);
3773: WSH_DEBUG_SV.log(l_module_name,' parent cnt line dir is', l_parent_cnt_line_dir);
3774: END IF;
3775: --
3776: l_wms_org := wsh_util_validate.check_wms_org(l_parent_cnt_orgn_id);
3769: close l_parent_cnt_csr;
3770: --
3771: IF l_debug_on THEN
3772: WSH_DEBUG_SV.log(l_module_name,' parent cnt orgn id is', l_parent_cnt_orgn_id);
3773: WSH_DEBUG_SV.log(l_module_name,' parent cnt line dir is', l_parent_cnt_line_dir);
3774: END IF;
3775: --
3776: l_wms_org := wsh_util_validate.check_wms_org(l_parent_cnt_orgn_id);
3777: --
3780: END IF;
3781:
3782: --
3783: IF l_debug_on THEN
3784: WSH_DEBUG_SV.log(l_module_name,'l_del_rec.released_status',l_del_rec.released_status);
3785: END IF;
3786: --
3787:
3788: IF l_del_rec.released_status = 'C' THEN
3797:
3798: -- J: W/V Changes
3799: -- Decrement the DD W/V from container
3800: IF l_debug_on THEN
3801: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
3802: END IF;
3803:
3804: WSH_WV_UTILS.DD_WV_Post_Process(
3805: p_delivery_detail_id => p_detail_id,
3817: --
3818: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3819: WSH_UTIL_CORE.Add_Message(x_return_status);
3820: IF l_debug_on THEN
3821: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3822: WSH_DEBUG_SV.pop(l_module_name);
3823: END IF;
3824: return;
3825: END IF;
3818: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3819: WSH_UTIL_CORE.Add_Message(x_return_status);
3820: IF l_debug_on THEN
3821: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3822: WSH_DEBUG_SV.pop(l_module_name);
3823: END IF;
3824: return;
3825: END IF;
3826: END IF;
3845: l_sync_tmp_rec.delivery_id := l_del_rec.delivery_id;
3846: l_sync_tmp_rec.operation_type := 'PRIOR';
3847: --
3848: IF l_debug_on THEN
3849: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE',WSH_DEBUG_SV.C_PROC_LEVEL);
3850: END IF;
3851: --
3852: WSH_WMS_SYNC_TMP_PKG.MERGE
3853: (
3857:
3858: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
3859: THEN
3860: IF l_debug_on THEN
3861: WSH_DEBUG_SV.log(l_module_name,'WSH_WMS_SYNC_TMP_PKG.MERGE returned ',l_return_status);
3862: END IF;
3863: RAISE e_abort;
3864: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3865: l_num_warnings := l_num_warnings + 1;
3880: x_return_status => x_return_status);
3881:
3882: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3883: IF l_debug_on THEN
3884: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
3885: WSH_DEBUG_SV.pop(l_module_name);
3886: END IF;
3887: return;
3888: END IF;
3881:
3882: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
3883: IF l_debug_on THEN
3884: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
3885: WSH_DEBUG_SV.pop(l_module_name);
3886: END IF;
3887: return;
3888: END IF;
3889: -- J: W/V Changes
3891: -- Reason: DD_WV_Post_Process would have calculated the fill% but the delivery detail is not unassigned at
3892: -- that point of time. So the fill% will be wrong if 'Percent Fill Basis' is Quantity since the fill%
3893: -- calculation considers the delivery detail which is not yet unassigned
3894: IF l_debug_on THEN
3895: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_SHIPPING_PARAMS_PVT.Get',WSH_DEBUG_SV.C_PROC_LEVEL);
3896: END IF;
3897:
3898: WSH_SHIPPING_PARAMS_PVT.Get(
3899: p_organization_id => l_del_rec.organization_id,
3901: x_return_status => l_return_status);
3902:
3903: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
3904: IF l_debug_on THEN
3905: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_SHIPPING_PARAMS_PVT.Get returned '||l_return_status);
3906: END IF;
3907: raise e_abort;
3908: END IF;
3909:
3913: IF NOT( l_wms_org = 'Y' AND nvl(wsh_wms_lpn_grp.g_caller,'WSH') like 'WMS%')
3914: THEN
3915: --{
3916: IF l_debug_on THEN
3917: WSH_DEBUG_SV.logmsg(l_module_name,'Need to recalculate the fill% for container');
3918: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_CONTAINER_PKG.CALC_CONT_FILL_PC',WSH_DEBUG_SV.C_PROC_LEVEL);
3919: END IF;
3920:
3921: WSH_WV_UTILS.ADJUST_PARENT_WV(
3914: THEN
3915: --{
3916: IF l_debug_on THEN
3917: WSH_DEBUG_SV.logmsg(l_module_name,'Need to recalculate the fill% for container');
3918: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TPA_CONTAINER_PKG.CALC_CONT_FILL_PC',WSH_DEBUG_SV.C_PROC_LEVEL);
3919: END IF;
3920:
3921: WSH_WV_UTILS.ADJUST_PARENT_WV(
3922: p_entity_type => 'CONTAINER',
3932:
3933: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
3934: THEN
3935: IF l_debug_on THEN
3936: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_WV_UTILS.ADJUST_PARENT_WV returned '||l_return_status);
3937: END IF;
3938: RAISE e_abort;
3939: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3940: l_num_warnings := l_num_warnings + 1;
3946: END IF;
3947:
3948: --
3949: IF l_debug_on THEN
3950: WSH_DEBUG_SV.log(l_module_name,'Delivery Id for l_del_rec',l_del_rec.delivery_id);
3951: END IF;
3952: --
3953:
3954: -- J: W/V Changes
3954: -- J: W/V Changes
3955: -- Assign the DD W/V back to delivery
3956: IF l_del_rec.delivery_id IS NOT NULL THEN
3957: IF l_debug_on THEN
3958: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
3959: END IF;
3960:
3961: WSH_WV_UTILS.DD_WV_Post_Process(
3962: p_delivery_detail_id => p_detail_id,
3972: --
3973: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3974: WSH_UTIL_CORE.Add_Message(x_return_status);
3975: IF l_debug_on THEN
3976: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3977: WSH_DEBUG_SV.pop(l_module_name);
3978: END IF;
3979: return;
3980: END IF;
3973: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3974: WSH_UTIL_CORE.Add_Message(x_return_status);
3975: IF l_debug_on THEN
3976: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
3977: WSH_DEBUG_SV.pop(l_module_name);
3978: END IF;
3979: return;
3980: END IF;
3981: END IF;
3987: l_del_tab.delete;
3988: l_del_tab(1) := l_del_rec.delivery_id;
3989: --
3990: IF l_debug_on THEN
3991: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
3992: END IF;
3993: --
3994: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
3995: p_entity_type => 'DELIVERY',
4005: END IF;
4006:
4007: --
4008: IF l_debug_on THEN
4009: WSH_DEBUG_SV.pop(l_module_name);
4010: END IF;
4011: --
4012: exception
4013: -- J: W/V Changes
4013: -- J: W/V Changes
4014: WHEN e_abort THEN
4015: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4016: IF l_debug_on THEN
4017: WSH_DEBUG_SV.pop(l_module_name);
4018: END IF;
4019:
4020: WHEN mark_reprice_error THEN
4021: FND_MESSAGE.Set_Name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
4023: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
4024:
4025: --
4026: IF l_debug_on THEN
4027: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4028: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
4029: END IF;
4030: --
4031: WHEN invalid_detail then
4024:
4025: --
4026: IF l_debug_on THEN
4027: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4028: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
4029: END IF;
4030: --
4031: WHEN invalid_detail then
4032: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4034: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_detail_id);
4035: wsh_util_core.add_message(x_return_status,l_module_name);
4036: --
4037: IF l_debug_on THEN
4038: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_DETAIL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4039: WSH_DEBUG_SV.pop(l_module_name);
4040: END IF;
4041: --
4042: RETURN;
4035: wsh_util_core.add_message(x_return_status,l_module_name);
4036: --
4037: IF l_debug_on THEN
4038: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_DETAIL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4039: WSH_DEBUG_SV.pop(l_module_name);
4040: END IF;
4041: --
4042: RETURN;
4043: WHEN others THEN
4045: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4046:
4047: --
4048: IF l_debug_on THEN
4049: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4050: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4051: END IF;
4052: --
4053: END Unassign_Detail_FROM_Cont;
4046:
4047: --
4048: IF l_debug_on THEN
4049: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4050: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4051: END IF;
4052: --
4053: END Unassign_Detail_FROM_Cont;
4054:
4271: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4272: --
4273: IF l_debug_on IS NULL
4274: THEN
4275: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4276: END IF;
4277: --
4278: IF l_debug_on THEN
4279: WSH_DEBUG_SV.push(l_module_name);
4275: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4276: END IF;
4277: --
4278: IF l_debug_on THEN
4279: WSH_DEBUG_SV.push(l_module_name);
4280: --
4281: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
4282: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4283: WSH_DEBUG_SV.log(l_module_name,'x_dlvy_has_lines',x_dlvy_has_lines);
4277: --
4278: IF l_debug_on THEN
4279: WSH_DEBUG_SV.push(l_module_name);
4280: --
4281: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
4282: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4283: WSH_DEBUG_SV.log(l_module_name,'x_dlvy_has_lines',x_dlvy_has_lines);
4284: WSH_DEBUG_SV.log(l_module_name,'P_CALLER',P_CALLER);
4285: END IF;
4278: IF l_debug_on THEN
4279: WSH_DEBUG_SV.push(l_module_name);
4280: --
4281: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
4282: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4283: WSH_DEBUG_SV.log(l_module_name,'x_dlvy_has_lines',x_dlvy_has_lines);
4284: WSH_DEBUG_SV.log(l_module_name,'P_CALLER',P_CALLER);
4285: END IF;
4286: --
4279: WSH_DEBUG_SV.push(l_module_name);
4280: --
4281: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
4282: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4283: WSH_DEBUG_SV.log(l_module_name,'x_dlvy_has_lines',x_dlvy_has_lines);
4284: WSH_DEBUG_SV.log(l_module_name,'P_CALLER',P_CALLER);
4285: END IF;
4286: --
4287: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4280: --
4281: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
4282: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
4283: WSH_DEBUG_SV.log(l_module_name,'x_dlvy_has_lines',x_dlvy_has_lines);
4284: WSH_DEBUG_SV.log(l_module_name,'P_CALLER',P_CALLER);
4285: END IF;
4286: --
4287: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4288:
4309: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4310: wsh_util_core.add_message(x_return_status,l_module_name);
4311: --
4312: IF l_debug_on THEN
4313: WSH_DEBUG_SV.pop(l_module_name);
4314: END IF;
4315: --
4316: RETURN;
4317: ELSE
4315: --
4316: RETURN;
4317: ELSE
4318: IF l_debug_on THEN
4319: WSH_DEBUG_SV.logmsg(l_module_name,'DD '||p_detail_id||' is already assigned to '||l_delivery_id||'. Returning');
4320: WSH_DEBUG_SV.pop(l_module_name);
4321: END IF;
4322: return;
4323: END IF;
4316: RETURN;
4317: ELSE
4318: IF l_debug_on THEN
4319: WSH_DEBUG_SV.logmsg(l_module_name,'DD '||p_detail_id||' is already assigned to '||l_delivery_id||'. Returning');
4320: WSH_DEBUG_SV.pop(l_module_name);
4321: END IF;
4322: return;
4323: END IF;
4324: END IF;
4347: CLOSE c_delivery;
4348:
4349: --
4350: IF l_debug_on THEN
4351: WSH_DEBUG_SV.log(l_module_name,'status_code',l_del.status_code);
4352: WSH_DEBUG_SV.log(l_module_name,'Delivery Freight Terms',l_del.freight_Terms_code);
4353: END IF;
4354: --
4355: /* security rule, delivery status should be open or packed and not planned */
4348:
4349: --
4350: IF l_debug_on THEN
4351: WSH_DEBUG_SV.log(l_module_name,'status_code',l_del.status_code);
4352: WSH_DEBUG_SV.log(l_module_name,'Delivery Freight Terms',l_del.freight_Terms_code);
4353: END IF;
4354: --
4355: /* security rule, delivery status should be open or packed and not planned */
4356: /* the value for the flag can be Y or N updated with Bug 1559785*/
4392: x_return_status => l_return_status);
4393:
4394: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
4395: IF l_debug_on THEN
4396: WSH_DEBUG_SV.log(l_module_name,'error from Pre_Otm_Assign_Del_Detail');
4397: END IF;
4398: raise FND_API.G_EXC_ERROR;
4399: END IF;
4400: END IF;
4404: FOR cur in c_getdet_ignore LOOP
4405: IF l_del.ignore_for_planning <> cur.ignore_for_planning THEN
4406: fnd_message.set_name('WSH', 'WSH_DET_DEL_DIFF_IGNOREPLAN');
4407: IF l_debug_on THEN
4408: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4409: END IF;
4410: fnd_message.set_token('ENTITY1',nvl(wsh_container_utilities.get_cont_name(p_detail_id), p_detail_id));
4411: IF l_debug_on THEN
4412: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4408: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4409: END IF;
4410: fnd_message.set_token('ENTITY1',nvl(wsh_container_utilities.get_cont_name(p_detail_id), p_detail_id));
4411: IF l_debug_on THEN
4412: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.GET_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
4413: END IF;
4414: fnd_message.set_token('ENTITY2',wsh_new_deliveries_pvt.get_name(p_delivery_id));
4415: END IF;
4416: END LOOP;
4436: fnd_message.SET_name('WSH', 'WSH_DET_DETAIL_NOT_ASSIGNED');
4437: wsh_util_core.add_message(x_return_status,l_module_name);
4438: --
4439: IF l_debug_on THEN
4440: WSH_DEBUG_SV.pop(l_module_name);
4441: END IF;
4442: --
4443: RETURN;
4444: END IF;
4451: CLOSE c_detail;
4452:
4453: --
4454: IF l_debug_on THEN
4455: WSH_DEBUG_SV.log(l_module_name,'Released Status',l_detail.released_status);
4456: WSH_DEBUG_SV.log(l_module_name,'Delivery Id',l_detail.delivery_id);
4457: WSH_DEBUG_SV.log(l_module_name,'p_Delivery Id',p_delivery_id);
4458: WSH_DEBUG_SV.log(l_module_name,'Line Freight Terms',l_detail.freight_Terms_code);
4459: END IF;
4452:
4453: --
4454: IF l_debug_on THEN
4455: WSH_DEBUG_SV.log(l_module_name,'Released Status',l_detail.released_status);
4456: WSH_DEBUG_SV.log(l_module_name,'Delivery Id',l_detail.delivery_id);
4457: WSH_DEBUG_SV.log(l_module_name,'p_Delivery Id',p_delivery_id);
4458: WSH_DEBUG_SV.log(l_module_name,'Line Freight Terms',l_detail.freight_Terms_code);
4459: END IF;
4460: --
4453: --
4454: IF l_debug_on THEN
4455: WSH_DEBUG_SV.log(l_module_name,'Released Status',l_detail.released_status);
4456: WSH_DEBUG_SV.log(l_module_name,'Delivery Id',l_detail.delivery_id);
4457: WSH_DEBUG_SV.log(l_module_name,'p_Delivery Id',p_delivery_id);
4458: WSH_DEBUG_SV.log(l_module_name,'Line Freight Terms',l_detail.freight_Terms_code);
4459: END IF;
4460: --
4461: --
4454: IF l_debug_on THEN
4455: WSH_DEBUG_SV.log(l_module_name,'Released Status',l_detail.released_status);
4456: WSH_DEBUG_SV.log(l_module_name,'Delivery Id',l_detail.delivery_id);
4457: WSH_DEBUG_SV.log(l_module_name,'p_Delivery Id',p_delivery_id);
4458: WSH_DEBUG_SV.log(l_module_name,'Line Freight Terms',l_detail.freight_Terms_code);
4459: END IF;
4460: --
4461: --
4462: -- Bypass this check for inbound lines as a they can be assigned to delivery
4476: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4477: wsh_util_core.add_message(x_return_status,l_module_name);
4478: --
4479: IF l_debug_on THEN
4480: WSH_DEBUG_SV.pop(l_module_name);
4481: END IF;
4482: --
4483: RETURN;
4484: END IF;
4531: l_sync_tmp_rec.delivery_detail_id := l_dd_id(j);
4532: l_sync_tmp_rec.operation_type := 'UPDATE';
4533: --
4534: IF l_debug_on THEN
4535: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE',WSH_DEBUG_SV.C_PROC_LEVEL);
4536: END IF;
4537: --
4538: WSH_WMS_SYNC_TMP_PKG.MERGE
4539: (
4541: x_return_status => l_return_status
4542: );
4543:
4544: IF l_debug_on THEN
4545: WSH_DEBUG_SV.log(l_module_name,'Return Status is ',l_return_status);
4546: END IF;
4547: --
4548: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
4549: --
4549: --
4550: x_return_status := l_return_status;
4551: --
4552: IF l_debug_on THEN
4553: WSH_DEBUG_SV.pop(l_module_name);
4554: END IF;
4555: --
4556: return;
4557: --
4600:
4601: IF l_detail.container_flag='Y' THEN
4602: --
4603: IF l_debug_on THEN
4604: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_ACTIONS.CHECK_CONT_ATTRIBUTES',WSH_DEBUG_SV.C_PROC_LEVEL);
4605: END IF;
4606: --
4607: WSH_CONTAINER_ACTIONS.Check_Cont_Attributes (
4608: l_detail.delivery_detail_id,
4615: FND_MESSAGE.SET_TOKEN('DETAIL_ID',l_detail.delivery_detail_id);
4616: wsh_util_core.add_message(x_return_status,l_module_name);
4617: --
4618: IF l_debug_on THEN
4619: WSH_DEBUG_SV.pop(l_module_name);
4620: END IF;
4621: --
4622: return;
4623: END IF;
4626: /* security rule, group by attributes must be the same as the delivery's */
4627: /* Error */
4628: --
4629: IF l_debug_on THEN
4630: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.CHECK_ASSIGN_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
4631: END IF;
4632: --
4633:
4634: l_attr_tab(1).entity_id := p_delivery_id;
4654: IF (l_group_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
4655: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4656: --
4657: IF l_debug_on THEN
4658: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
4659: WSH_DEBUG_SV.pop(l_module_name);
4660: END IF;
4661: --
4662: RETURN;
4655: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4656: --
4657: IF l_debug_on THEN
4658: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
4659: WSH_DEBUG_SV.pop(l_module_name);
4660: END IF;
4661: --
4662: RETURN;
4663: END IF;
4696:
4697: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
4698: x_return_status := l_return_status;
4699: IF l_debug_on THEN
4700: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_DELIVERY_VALIDATIONS.get_trip_information');
4701: WSH_DEBUG_SV.pop(l_module_name);
4702: END IF;
4703: RETURN;
4704: END IF;
4697: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
4698: x_return_status := l_return_status;
4699: IF l_debug_on THEN
4700: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_DELIVERY_VALIDATIONS.get_trip_information');
4701: WSH_DEBUG_SV.pop(l_module_name);
4702: END IF;
4703: RETURN;
4704: END IF;
4705:
4718:
4719: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
4720: x_return_status := l_return_status;
4721: IF l_debug_on THEN
4722: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_DELIVERY_VALIDATIONS.get_delivery_information');
4723: WSH_DEBUG_SV.pop(l_module_name);
4724: END IF;
4725: RETURN;
4726: END IF;
4719: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
4720: x_return_status := l_return_status;
4721: IF l_debug_on THEN
4722: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_DELIVERY_VALIDATIONS.get_delivery_information');
4723: WSH_DEBUG_SV.pop(l_module_name);
4724: END IF;
4725: RETURN;
4726: END IF;
4727:
4756: END IF; -- IF ((l_trip_not_found = 'N' AND
4757: END IF; -- IF (l_gc3_is_installed = 'Y'
4758:
4759: IF l_debug_on THEN
4760: WSH_DEBUG_SV.log(l_module_name, 'l_gc3_is_installed', l_gc3_is_installed);
4761: WSH_DEBUG_SV.log(l_module_name, 'l_tms_update', l_tms_update);
4762: IF (l_tms_update = 'Y') THEN
4763: WSH_DEBUG_SV.log(l_module_name, 'l_new_interface_flag_tab', l_new_interface_flag_tab(1));
4764: WSH_DEBUG_SV.log(l_module_name, 'l_tms_version_number', l_tms_version_number);
4757: END IF; -- IF (l_gc3_is_installed = 'Y'
4758:
4759: IF l_debug_on THEN
4760: WSH_DEBUG_SV.log(l_module_name, 'l_gc3_is_installed', l_gc3_is_installed);
4761: WSH_DEBUG_SV.log(l_module_name, 'l_tms_update', l_tms_update);
4762: IF (l_tms_update = 'Y') THEN
4763: WSH_DEBUG_SV.log(l_module_name, 'l_new_interface_flag_tab', l_new_interface_flag_tab(1));
4764: WSH_DEBUG_SV.log(l_module_name, 'l_tms_version_number', l_tms_version_number);
4765: END IF;
4759: IF l_debug_on THEN
4760: WSH_DEBUG_SV.log(l_module_name, 'l_gc3_is_installed', l_gc3_is_installed);
4761: WSH_DEBUG_SV.log(l_module_name, 'l_tms_update', l_tms_update);
4762: IF (l_tms_update = 'Y') THEN
4763: WSH_DEBUG_SV.log(l_module_name, 'l_new_interface_flag_tab', l_new_interface_flag_tab(1));
4764: WSH_DEBUG_SV.log(l_module_name, 'l_tms_version_number', l_tms_version_number);
4765: END IF;
4766: END IF;
4767:
4760: WSH_DEBUG_SV.log(l_module_name, 'l_gc3_is_installed', l_gc3_is_installed);
4761: WSH_DEBUG_SV.log(l_module_name, 'l_tms_update', l_tms_update);
4762: IF (l_tms_update = 'Y') THEN
4763: WSH_DEBUG_SV.log(l_module_name, 'l_new_interface_flag_tab', l_new_interface_flag_tab(1));
4764: WSH_DEBUG_SV.log(l_module_name, 'l_tms_version_number', l_tms_version_number);
4765: END IF;
4766: END IF;
4767:
4768: -- End of OTM R12 : update delivery
4789:
4790: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
4791: x_return_status := l_return_status;
4792: IF l_debug_on THEN
4793: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_XC_UTIL.log_otm_exception');
4794: WSH_DEBUG_SV.pop(l_module_name);
4795: END IF;
4796: RETURN;
4797: END IF;
4790: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
4791: x_return_status := l_return_status;
4792: IF l_debug_on THEN
4793: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_XC_UTIL.log_otm_exception');
4794: WSH_DEBUG_SV.pop(l_module_name);
4795: END IF;
4796: RETURN;
4797: END IF;
4798: END IF;
4802: same as the delivery's */
4803: /* Error */
4804:
4805: IF l_debug_on THEN
4806: WSH_DEBUG_SV.log(l_module_name,'initial_pickup_location_id'
4807: ,l_del.initial_pickup_location_id);
4808: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id',
4809: l_detail.ship_from_location_id);
4810: WSH_DEBUG_SV.log(l_module_name,
4804:
4805: IF l_debug_on THEN
4806: WSH_DEBUG_SV.log(l_module_name,'initial_pickup_location_id'
4807: ,l_del.initial_pickup_location_id);
4808: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id',
4809: l_detail.ship_from_location_id);
4810: WSH_DEBUG_SV.log(l_module_name,
4811: 'ultimate_dropoff_location_id',
4812: l_del.ultimate_dropoff_location_id);
4806: WSH_DEBUG_SV.log(l_module_name,'initial_pickup_location_id'
4807: ,l_del.initial_pickup_location_id);
4808: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id',
4809: l_detail.ship_from_location_id);
4810: WSH_DEBUG_SV.log(l_module_name,
4811: 'ultimate_dropoff_location_id',
4812: l_del.ultimate_dropoff_location_id);
4813: WSH_DEBUG_SV.log(l_module_name,'ship_to_location_id',
4814: l_detail.ship_to_location_id);
4809: l_detail.ship_from_location_id);
4810: WSH_DEBUG_SV.log(l_module_name,
4811: 'ultimate_dropoff_location_id',
4812: l_del.ultimate_dropoff_location_id);
4813: WSH_DEBUG_SV.log(l_module_name,'ship_to_location_id',
4814: l_detail.ship_to_location_id);
4815: END IF;
4816: IF ((l_del.initial_pickup_location_id <> l_detail.ship_from_location_id)
4817: or (l_del.ultimate_dropoff_location_id <> l_detail.ship_to_location_id)
4836: l_sync_tmp_rec.delivery_id := l_detail.delivery_id;
4837: l_sync_tmp_rec.operation_type := 'PRIOR';
4838: --
4839: IF l_debug_on THEN
4840: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE',WSH_DEBUG_SV.C_PROC_LEVEL);
4841: END IF;
4842: --
4843: WSH_WMS_SYNC_TMP_PKG.MERGE
4844: (
4851: --
4852: x_return_status := l_return_status;
4853: --
4854: IF l_debug_on THEN
4855: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
4856: WSH_DEBUG_SV.pop(l_module_name);
4857: END IF;
4858: --
4859: return;
4852: x_return_status := l_return_status;
4853: --
4854: IF l_debug_on THEN
4855: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
4856: WSH_DEBUG_SV.pop(l_module_name);
4857: END IF;
4858: --
4859: return;
4860: --
4888: x_return_status => x_return_status);
4889:
4890: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
4891: IF l_debug_on THEN
4892: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
4893: WSH_DEBUG_SV.pop(l_module_name);
4894: END IF;
4895: return;
4896: END IF;
4889:
4890: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
4891: IF l_debug_on THEN
4892: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
4893: WSH_DEBUG_SV.pop(l_module_name);
4894: END IF;
4895: return;
4896: END IF;
4897:
4930: THEN
4931: --{
4932: --
4933: IF l_debug_on THEN
4934: WSH_DEBUG_SV.log(l_module_name,'Delivery updated Freight Terms',x_dlvy_freight_terms_code);
4935: END IF;
4936: --
4937:
4938: -- OTM R12 : update delivery
4971: ) THEN -- check if wms org
4972:
4973: -- Update Cartonization ID.
4974: IF l_debug_on THEN
4975: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_MO_CANCEL_PVT.update_mol_carton_group',WSH_DEBUG_SV.C_PROC_LEVEL);
4976: END IF;
4977:
4978: INV_MO_Cancel_PVT.update_mol_carton_group
4979: (p_line_id => l_detail.move_order_line_id,
4994: IF l_detail.container_flag='Y' THEN
4995: IF l_attr_flag = 'N' THEN
4996: --
4997: IF l_debug_on THEN
4998: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_ACTIONS.UPDATE_CONT_HIERARCHY',WSH_DEBUG_SV.C_PROC_LEVEL);
4999: END IF;
5000: --
5001: WSH_CONTAINER_ACTIONS.Update_Cont_Hierarchy (
5002: NULL,
5006: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5007: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_UPD_ATTR_ERROR');
5008: --
5009: IF l_debug_on THEN
5010: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5011: END IF;
5012: --
5013: l_cont_name := WSH_CONTAINER_UTILITIES.Get_Cont_Name(l_detail.delivery_detail_id);
5014: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
5014: FND_MESSAGE.SET_TOKEN('CONT_NAME',l_cont_name);
5015: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5016: --
5017: IF l_debug_on THEN
5018: WSH_DEBUG_SV.pop(l_module_name);
5019: END IF;
5020: --
5021: return;
5022: END IF;
5053: x_return_status => l_return_status);
5054:
5055: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
5056: IF l_debug_on THEN
5057: WSH_DEBUG_SV.log(l_module_name,'error from Post_Otm_Assign_Del_Detail');
5058: END IF;
5059: raise FND_API.G_EXC_ERROR;
5060: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
5061: l_num_warnings := l_num_warnings + 1;
5065:
5066: -- J: W/V Changes
5067: -- Increment the delivery W/V by DD W/V
5068: IF l_debug_on THEN
5069: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
5070: END IF;
5071: WSH_WV_UTILS.DD_WV_Post_Process(
5072: p_delivery_detail_id => p_detail_id,
5073: p_diff_gross_wt => l_gross_wt,
5080: --
5081: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5082: WSH_UTIL_CORE.Add_Message(x_return_status);
5083: IF l_debug_on THEN
5084: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
5085: WSH_DEBUG_SV.pop(l_module_name);
5086: END IF;
5087: return;
5088: END IF;
5081: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5082: WSH_UTIL_CORE.Add_Message(x_return_status);
5083: IF l_debug_on THEN
5084: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
5085: WSH_DEBUG_SV.pop(l_module_name);
5086: END IF;
5087: return;
5088: END IF;
5089:
5088: END IF;
5089:
5090: --
5091: IF l_debug_on THEN
5092: WSH_DEBUG_SV.log(l_module_name,'l_scc_unassign_from_del',
5093: l_scc_unassign_from_del);
5094: END IF;
5095:
5096: /* H integration: Pricing integration csun */
5099: l_del_tab(1) := p_delivery_id;
5100:
5101: --
5102: IF l_debug_on THEN
5103: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
5104: END IF;
5105: --
5106: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
5107: p_entity_type => 'DELIVERY',
5126:
5127:
5128: --
5129: IF l_debug_on THEN
5130: WSH_DEBUG_SV.pop(l_module_name);
5131: END IF;
5132: --
5133: EXCEPTION
5134: -- J-IB-NPARIKH-{
5137: WSH_UTIL_CORE.add_message (WSH_UTIL_CORE.g_ret_sts_error,l_module_name);
5138: --
5139: IF l_debug_on
5140: THEN
5141: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
5142: END IF;
5143: -- J-IB-NPARIKH-}
5144:
5145: WHEN mark_reprice_error THEN
5148: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
5149:
5150: --
5151: IF l_debug_on THEN
5152: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5153: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
5154: END IF;
5155: --
5156: WHEN update_mol_carton_group_error THEN
5149:
5150: --
5151: IF l_debug_on THEN
5152: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5153: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
5154: END IF;
5155: --
5156: WHEN update_mol_carton_group_error THEN
5157: fnd_message.SET_name('WSH', 'WSH_MOL_CARTON_GROUP_ERROR');
5159: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
5160:
5161: --
5162: IF l_debug_on THEN
5163: WSH_DEBUG_SV.logmsg(l_module_name,'update_mol_carton_group_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5164: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:update_mol_carton_group_error');
5165: END IF;
5166:
5167:
5160:
5161: --
5162: IF l_debug_on THEN
5163: WSH_DEBUG_SV.logmsg(l_module_name,'update_mol_carton_group_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5164: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:update_mol_carton_group_error');
5165: END IF;
5166:
5167:
5168: WHEN INVALID_DEL THEN
5170: fnd_message.SET_name('WSH', 'WSH_DET_INVALID_DEL');
5171: wsh_util_core.add_message(x_return_status,l_module_name);
5172: --
5173: IF l_debug_on THEN
5174: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_DEL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5175: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DEL');
5176: END IF;
5177: RETURN;
5178: --
5171: wsh_util_core.add_message(x_return_status,l_module_name);
5172: --
5173: IF l_debug_on THEN
5174: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_DEL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5175: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DEL');
5176: END IF;
5177: RETURN;
5178: --
5179: WHEN DEL_NOT_UPDATABLE THEN
5180: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5181: wsh_util_core.add_message(x_return_status,l_module_name);
5182: --
5183: IF l_debug_on THEN
5184: WSH_DEBUG_SV.logmsg(l_module_name,'DEL_NOT_UPDATABLE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5185: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DEL_NOT_UPDATABLE');
5186: END IF;
5187: --
5188: RETURN;
5181: wsh_util_core.add_message(x_return_status,l_module_name);
5182: --
5183: IF l_debug_on THEN
5184: WSH_DEBUG_SV.logmsg(l_module_name,'DEL_NOT_UPDATABLE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5185: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DEL_NOT_UPDATABLE');
5186: END IF;
5187: --
5188: RETURN;
5189: WHEN INVALID_DETAIL THEN
5192: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_detail_id);
5193: wsh_util_core.add_message(x_return_status,l_module_name);
5194: --
5195: IF l_debug_on THEN
5196: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_DETAIL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5197: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DETAIL');
5198: END IF;
5199: --
5200: RETURN;
5193: wsh_util_core.add_message(x_return_status,l_module_name);
5194: --
5195: IF l_debug_on THEN
5196: WSH_DEBUG_SV.logmsg(l_module_name,'INVALID_DETAIL exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5197: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:INVALID_DETAIL');
5198: END IF;
5199: --
5200: RETURN;
5201: WHEN DET_CONFIRMED THEN
5204: FND_MESSAGE.SET_TOKEN('DETAIL_ID',p_detail_id);
5205: wsh_util_core.add_message(x_return_status,l_module_name);
5206: --
5207: IF l_debug_on THEN
5208: WSH_DEBUG_SV.logmsg(l_module_name,'DET_CONFIRMED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5209: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DET_CONFIRMED');
5210: END IF;
5211: --
5212: RETURN;
5205: wsh_util_core.add_message(x_return_status,l_module_name);
5206: --
5207: IF l_debug_on THEN
5208: WSH_DEBUG_SV.logmsg(l_module_name,'DET_CONFIRMED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5209: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DET_CONFIRMED');
5210: END IF;
5211: --
5212: RETURN;
5213: WHEN detail_del_FROM_to_not_same THEN
5218:
5219:
5220: --
5221: IF l_debug_on THEN
5222: WSH_DEBUG_SV.logmsg(l_module_name,'DETAIL_DEL_FROM_TO_NOT_SAME exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5223: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DETAIL_DEL_FROM_TO_NOT_SAME');
5224: END IF;
5225: --
5226: RETURN;
5219:
5220: --
5221: IF l_debug_on THEN
5222: WSH_DEBUG_SV.logmsg(l_module_name,'DETAIL_DEL_FROM_TO_NOT_SAME exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5223: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DETAIL_DEL_FROM_TO_NOT_SAME');
5224: END IF;
5225: --
5226: RETURN;
5227: WHEN ship_method_not_match THEN
5229: fnd_message.SET_name('WSH', 'WSH_DET_SHIP_METHOD_NOT_MATCH');
5230: wsh_util_core.add_message(x_return_status,l_module_name);
5231: --
5232: IF l_debug_on THEN
5233: WSH_DEBUG_SV.logmsg(l_module_name,'SHIP_METHOD_NOT_MATCH exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5234: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:SHIP_METHOD_NOT_MATCH');
5235: END IF;
5236: --
5237: RETURN;
5230: wsh_util_core.add_message(x_return_status,l_module_name);
5231: --
5232: IF l_debug_on THEN
5233: WSH_DEBUG_SV.logmsg(l_module_name,'SHIP_METHOD_NOT_MATCH exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5234: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:SHIP_METHOD_NOT_MATCH');
5235: END IF;
5236: --
5237: RETURN;
5238: WHEN others THEN
5239: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5240: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_TOP_DETAIL_TO_DELIVERY',l_module_name);
5241: --
5242: IF l_debug_on THEN
5243: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5244: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5245: END IF;
5246: --
5247: RETURN;
5240: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_TOP_DETAIL_TO_DELIVERY',l_module_name);
5241: --
5242: IF l_debug_on THEN
5243: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5244: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5245: END IF;
5246: --
5247: RETURN;
5248: END Assign_Top_Detail_To_Delivery;
5271: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5272: --
5273: IF l_debug_on IS NULL
5274: THEN
5275: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5276: END IF;
5277: --
5278: IF l_debug_on THEN
5279: WSH_DEBUG_SV.push(l_module_name);
5275: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5276: END IF;
5277: --
5278: IF l_debug_on THEN
5279: WSH_DEBUG_SV.push(l_module_name);
5280: --
5281: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
5282: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5283: END IF;
5277: --
5278: IF l_debug_on THEN
5279: WSH_DEBUG_SV.push(l_module_name);
5280: --
5281: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
5282: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5283: END IF;
5284: --
5285: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5278: IF l_debug_on THEN
5279: WSH_DEBUG_SV.push(l_module_name);
5280: --
5281: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
5282: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5283: END IF;
5284: --
5285: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5286: --
5298: x_dlvy_freight_Terms_code => l_dlvy_freight_Terms_code
5299: );
5300: --
5301: IF l_debug_on THEN
5302: WSH_DEBUG_SV.pop(l_module_name);
5303: END IF;
5304: --
5305: EXCEPTION
5306: WHEN others THEN
5307: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5308: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_TOP_DETAIL_TO_DELIVERY',l_module_name);
5309: --
5310: IF l_debug_on THEN
5311: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5312: END IF;
5313: END Assign_Top_Detail_To_Delivery;
5314:
5315: -- THIS PROCEDURE IS OBSOLETE
5466: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5467: --
5468: IF l_debug_on IS NULL
5469: THEN
5470: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5471: END IF;
5472: --
5473: IF l_debug_on THEN
5474: WSH_DEBUG_SV.push(l_module_name);
5470: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5471: END IF;
5472: --
5473: IF l_debug_on THEN
5474: WSH_DEBUG_SV.push(l_module_name);
5475: --
5476: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID1',P_DETAIL_ID1);
5477: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID2',P_DETAIL_ID2);
5478: END IF;
5472: --
5473: IF l_debug_on THEN
5474: WSH_DEBUG_SV.push(l_module_name);
5475: --
5476: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID1',P_DETAIL_ID1);
5477: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID2',P_DETAIL_ID2);
5478: END IF;
5479: --
5480: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5473: IF l_debug_on THEN
5474: WSH_DEBUG_SV.push(l_module_name);
5475: --
5476: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID1',P_DETAIL_ID1);
5477: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID2',P_DETAIL_ID2);
5478: END IF;
5479: --
5480: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5481:
5494:
5495: -- J: W/V Changes
5496: IF l_del_id_for_container1.parent_delivery_detail_id = p_detail_id2 THEN
5497: IF l_debug_on THEN
5498: WSH_DEBUG_SV.logmsg(l_module_name,'Cont '||p_detail_id1||' is already assigned to '||p_detail_id2||'. Returning');
5499: WSH_DEBUG_SV.pop(l_module_name);
5500: END IF;
5501: return;
5502: END IF;
5495: -- J: W/V Changes
5496: IF l_del_id_for_container1.parent_delivery_detail_id = p_detail_id2 THEN
5497: IF l_debug_on THEN
5498: WSH_DEBUG_SV.logmsg(l_module_name,'Cont '||p_detail_id1||' is already assigned to '||p_detail_id2||'. Returning');
5499: WSH_DEBUG_SV.pop(l_module_name);
5500: END IF;
5501: return;
5502: END IF;
5503:
5510: l_wms_org := wsh_util_validate.check_wms_org(l_del_id_for_container2.organization_id);
5511: --
5512: -- K LPN CONV. rv
5513: IF l_debug_on THEN
5514: WSH_DEBUG_SV.log(l_module_name,'delivery_id 1',
5515: l_del_id_for_container1.delivery_id);
5516: WSH_DEBUG_SV.log(l_module_name,'organization_id 1',
5517: l_del_id_for_container1.organization_id);
5518: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id 1',
5512: -- K LPN CONV. rv
5513: IF l_debug_on THEN
5514: WSH_DEBUG_SV.log(l_module_name,'delivery_id 1',
5515: l_del_id_for_container1.delivery_id);
5516: WSH_DEBUG_SV.log(l_module_name,'organization_id 1',
5517: l_del_id_for_container1.organization_id);
5518: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id 1',
5519: l_del_id_for_container1.ship_from_location_id);
5520: WSH_DEBUG_SV.log(l_module_name,'customer_id 1',
5514: WSH_DEBUG_SV.log(l_module_name,'delivery_id 1',
5515: l_del_id_for_container1.delivery_id);
5516: WSH_DEBUG_SV.log(l_module_name,'organization_id 1',
5517: l_del_id_for_container1.organization_id);
5518: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id 1',
5519: l_del_id_for_container1.ship_from_location_id);
5520: WSH_DEBUG_SV.log(l_module_name,'customer_id 1',
5521: l_del_id_for_container1.customer_id);
5522: WSH_DEBUG_SV.log(l_module_name,'intmed_ship_to_location_id 1',
5516: WSH_DEBUG_SV.log(l_module_name,'organization_id 1',
5517: l_del_id_for_container1.organization_id);
5518: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id 1',
5519: l_del_id_for_container1.ship_from_location_id);
5520: WSH_DEBUG_SV.log(l_module_name,'customer_id 1',
5521: l_del_id_for_container1.customer_id);
5522: WSH_DEBUG_SV.log(l_module_name,'intmed_ship_to_location_id 1',
5523: l_del_id_for_container1.intmed_ship_to_location_id);
5524: WSH_DEBUG_SV.log(l_module_name,'fob_code 1',
5518: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id 1',
5519: l_del_id_for_container1.ship_from_location_id);
5520: WSH_DEBUG_SV.log(l_module_name,'customer_id 1',
5521: l_del_id_for_container1.customer_id);
5522: WSH_DEBUG_SV.log(l_module_name,'intmed_ship_to_location_id 1',
5523: l_del_id_for_container1.intmed_ship_to_location_id);
5524: WSH_DEBUG_SV.log(l_module_name,'fob_code 1',
5525: l_del_id_for_container1.fob_code);
5526: WSH_DEBUG_SV.log(l_module_name,'freight_terms_code 1',
5520: WSH_DEBUG_SV.log(l_module_name,'customer_id 1',
5521: l_del_id_for_container1.customer_id);
5522: WSH_DEBUG_SV.log(l_module_name,'intmed_ship_to_location_id 1',
5523: l_del_id_for_container1.intmed_ship_to_location_id);
5524: WSH_DEBUG_SV.log(l_module_name,'fob_code 1',
5525: l_del_id_for_container1.fob_code);
5526: WSH_DEBUG_SV.log(l_module_name,'freight_terms_code 1',
5527: l_del_id_for_container1.freight_terms_code);
5528: WSH_DEBUG_SV.log(l_module_name,'ship_method_code 1',
5522: WSH_DEBUG_SV.log(l_module_name,'intmed_ship_to_location_id 1',
5523: l_del_id_for_container1.intmed_ship_to_location_id);
5524: WSH_DEBUG_SV.log(l_module_name,'fob_code 1',
5525: l_del_id_for_container1.fob_code);
5526: WSH_DEBUG_SV.log(l_module_name,'freight_terms_code 1',
5527: l_del_id_for_container1.freight_terms_code);
5528: WSH_DEBUG_SV.log(l_module_name,'ship_method_code 1',
5529: l_del_id_for_container1.ship_method_code);
5530: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id 1',
5524: WSH_DEBUG_SV.log(l_module_name,'fob_code 1',
5525: l_del_id_for_container1.fob_code);
5526: WSH_DEBUG_SV.log(l_module_name,'freight_terms_code 1',
5527: l_del_id_for_container1.freight_terms_code);
5528: WSH_DEBUG_SV.log(l_module_name,'ship_method_code 1',
5529: l_del_id_for_container1.ship_method_code);
5530: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id 1',
5531: l_del_id_for_container1.parent_delivery_detail_id);
5532:
5526: WSH_DEBUG_SV.log(l_module_name,'freight_terms_code 1',
5527: l_del_id_for_container1.freight_terms_code);
5528: WSH_DEBUG_SV.log(l_module_name,'ship_method_code 1',
5529: l_del_id_for_container1.ship_method_code);
5530: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id 1',
5531: l_del_id_for_container1.parent_delivery_detail_id);
5532:
5533: WSH_DEBUG_SV.log(l_module_name,'delivery_id 2',
5534: l_del_id_for_container2.delivery_id);
5529: l_del_id_for_container1.ship_method_code);
5530: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id 1',
5531: l_del_id_for_container1.parent_delivery_detail_id);
5532:
5533: WSH_DEBUG_SV.log(l_module_name,'delivery_id 2',
5534: l_del_id_for_container2.delivery_id);
5535: WSH_DEBUG_SV.log(l_module_name,'organization_id 2',
5536: l_del_id_for_container2.organization_id);
5537: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id 2',
5531: l_del_id_for_container1.parent_delivery_detail_id);
5532:
5533: WSH_DEBUG_SV.log(l_module_name,'delivery_id 2',
5534: l_del_id_for_container2.delivery_id);
5535: WSH_DEBUG_SV.log(l_module_name,'organization_id 2',
5536: l_del_id_for_container2.organization_id);
5537: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id 2',
5538: l_del_id_for_container2.ship_from_location_id);
5539: WSH_DEBUG_SV.log(l_module_name,'customer_id 2',
5533: WSH_DEBUG_SV.log(l_module_name,'delivery_id 2',
5534: l_del_id_for_container2.delivery_id);
5535: WSH_DEBUG_SV.log(l_module_name,'organization_id 2',
5536: l_del_id_for_container2.organization_id);
5537: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id 2',
5538: l_del_id_for_container2.ship_from_location_id);
5539: WSH_DEBUG_SV.log(l_module_name,'customer_id 2',
5540: l_del_id_for_container2.customer_id);
5541: WSH_DEBUG_SV.log(l_module_name,'intmed_ship_to_location_id 2', l_del_id_for_container2.intmed_ship_to_location_id);
5535: WSH_DEBUG_SV.log(l_module_name,'organization_id 2',
5536: l_del_id_for_container2.organization_id);
5537: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id 2',
5538: l_del_id_for_container2.ship_from_location_id);
5539: WSH_DEBUG_SV.log(l_module_name,'customer_id 2',
5540: l_del_id_for_container2.customer_id);
5541: WSH_DEBUG_SV.log(l_module_name,'intmed_ship_to_location_id 2', l_del_id_for_container2.intmed_ship_to_location_id);
5542: WSH_DEBUG_SV.log(l_module_name,'fob_code 2',
5543: l_del_id_for_container2.fob_code);
5537: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id 2',
5538: l_del_id_for_container2.ship_from_location_id);
5539: WSH_DEBUG_SV.log(l_module_name,'customer_id 2',
5540: l_del_id_for_container2.customer_id);
5541: WSH_DEBUG_SV.log(l_module_name,'intmed_ship_to_location_id 2', l_del_id_for_container2.intmed_ship_to_location_id);
5542: WSH_DEBUG_SV.log(l_module_name,'fob_code 2',
5543: l_del_id_for_container2.fob_code);
5544: WSH_DEBUG_SV.log(l_module_name,'freight_terms_code 2',
5545: l_del_id_for_container2.freight_terms_code);
5538: l_del_id_for_container2.ship_from_location_id);
5539: WSH_DEBUG_SV.log(l_module_name,'customer_id 2',
5540: l_del_id_for_container2.customer_id);
5541: WSH_DEBUG_SV.log(l_module_name,'intmed_ship_to_location_id 2', l_del_id_for_container2.intmed_ship_to_location_id);
5542: WSH_DEBUG_SV.log(l_module_name,'fob_code 2',
5543: l_del_id_for_container2.fob_code);
5544: WSH_DEBUG_SV.log(l_module_name,'freight_terms_code 2',
5545: l_del_id_for_container2.freight_terms_code);
5546: WSH_DEBUG_SV.log(l_module_name,'ship_method_code 2',
5540: l_del_id_for_container2.customer_id);
5541: WSH_DEBUG_SV.log(l_module_name,'intmed_ship_to_location_id 2', l_del_id_for_container2.intmed_ship_to_location_id);
5542: WSH_DEBUG_SV.log(l_module_name,'fob_code 2',
5543: l_del_id_for_container2.fob_code);
5544: WSH_DEBUG_SV.log(l_module_name,'freight_terms_code 2',
5545: l_del_id_for_container2.freight_terms_code);
5546: WSH_DEBUG_SV.log(l_module_name,'ship_method_code 2',
5547: l_del_id_for_container2.ship_method_code);
5548: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id 2',
5542: WSH_DEBUG_SV.log(l_module_name,'fob_code 2',
5543: l_del_id_for_container2.fob_code);
5544: WSH_DEBUG_SV.log(l_module_name,'freight_terms_code 2',
5545: l_del_id_for_container2.freight_terms_code);
5546: WSH_DEBUG_SV.log(l_module_name,'ship_method_code 2',
5547: l_del_id_for_container2.ship_method_code);
5548: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id 2',
5549: l_del_id_for_container2.parent_delivery_detail_id);
5550: WSH_DEBUG_SV.log(l_module_name,'customer',
5544: WSH_DEBUG_SV.log(l_module_name,'freight_terms_code 2',
5545: l_del_id_for_container2.freight_terms_code);
5546: WSH_DEBUG_SV.log(l_module_name,'ship_method_code 2',
5547: l_del_id_for_container2.ship_method_code);
5548: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id 2',
5549: l_del_id_for_container2.parent_delivery_detail_id);
5550: WSH_DEBUG_SV.log(l_module_name,'customer',
5551: l_group_by_flags.customer);
5552: WSH_DEBUG_SV.log(l_module_name,'intmed',
5546: WSH_DEBUG_SV.log(l_module_name,'ship_method_code 2',
5547: l_del_id_for_container2.ship_method_code);
5548: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id 2',
5549: l_del_id_for_container2.parent_delivery_detail_id);
5550: WSH_DEBUG_SV.log(l_module_name,'customer',
5551: l_group_by_flags.customer);
5552: WSH_DEBUG_SV.log(l_module_name,'intmed',
5553: l_group_by_flags.intmed);
5554: WSH_DEBUG_SV.log(l_module_name,'fob', l_group_by_flags.fob);
5548: WSH_DEBUG_SV.log(l_module_name,'parent_delivery_detail_id 2',
5549: l_del_id_for_container2.parent_delivery_detail_id);
5550: WSH_DEBUG_SV.log(l_module_name,'customer',
5551: l_group_by_flags.customer);
5552: WSH_DEBUG_SV.log(l_module_name,'intmed',
5553: l_group_by_flags.intmed);
5554: WSH_DEBUG_SV.log(l_module_name,'fob', l_group_by_flags.fob);
5555: WSH_DEBUG_SV.log(l_module_name,'freight_terms',
5556: l_group_by_flags.freight_terms);
5550: WSH_DEBUG_SV.log(l_module_name,'customer',
5551: l_group_by_flags.customer);
5552: WSH_DEBUG_SV.log(l_module_name,'intmed',
5553: l_group_by_flags.intmed);
5554: WSH_DEBUG_SV.log(l_module_name,'fob', l_group_by_flags.fob);
5555: WSH_DEBUG_SV.log(l_module_name,'freight_terms',
5556: l_group_by_flags.freight_terms);
5557: WSH_DEBUG_SV.log(l_module_name,'ship_method',
5558: l_group_by_flags.ship_method);
5551: l_group_by_flags.customer);
5552: WSH_DEBUG_SV.log(l_module_name,'intmed',
5553: l_group_by_flags.intmed);
5554: WSH_DEBUG_SV.log(l_module_name,'fob', l_group_by_flags.fob);
5555: WSH_DEBUG_SV.log(l_module_name,'freight_terms',
5556: l_group_by_flags.freight_terms);
5557: WSH_DEBUG_SV.log(l_module_name,'ship_method',
5558: l_group_by_flags.ship_method);
5559:
5553: l_group_by_flags.intmed);
5554: WSH_DEBUG_SV.log(l_module_name,'fob', l_group_by_flags.fob);
5555: WSH_DEBUG_SV.log(l_module_name,'freight_terms',
5556: l_group_by_flags.freight_terms);
5557: WSH_DEBUG_SV.log(l_module_name,'ship_method',
5558: l_group_by_flags.ship_method);
5559:
5560: END IF;
5561:
5567: ) THEN
5568: FND_MESSAGE.SET_NAME('WSH','WSH_DET_PACK_ERROR');
5569: --
5570: IF l_debug_on THEN
5571: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5572: END IF;
5573: --
5574: FND_MESSAGE.SET_TOKEN('DET_LINE',
5575: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5574: FND_MESSAGE.SET_TOKEN('DET_LINE',
5575: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5576: --
5577: IF l_debug_on THEN
5578: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5579: END IF;
5580: --
5581: FND_MESSAGE.SET_TOKEN('CONT_NAME',
5582: nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
5583: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5584: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5585: --
5586: IF l_debug_on THEN
5587: WSH_DEBUG_SV.pop(l_module_name);
5588: END IF;
5589: --
5590: return;
5591: END IF;
5608:
5609: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
5610: --handle the error approriately to the procedure this code is in
5611: IF l_debug_on THEN
5612: WSH_DEBUG_SV.log(l_module_name,'error from Pre_Otm_Assign_Del_Detail');
5613: END IF;
5614: raise FND_API.G_EXC_ERROR;
5615: END IF;
5616: END IF;
5630: CLOSE check_loop;
5631: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_LOOP_NO_PACK');
5632: --
5633: IF l_debug_on THEN
5634: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5635: END IF;
5636: --
5637: FND_MESSAGE.SET_TOKEN('DETAIL_CONTAINER',
5638: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5637: FND_MESSAGE.SET_TOKEN('DETAIL_CONTAINER',
5638: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5639: --
5640: IF l_debug_on THEN
5641: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5642: END IF;
5643: --
5644: FND_MESSAGE.SET_TOKEN('PARENT_CONTAINER',
5645: nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
5646: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5647: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5648: --
5649: IF l_debug_on THEN
5650: WSH_DEBUG_SV.pop(l_module_name);
5651: END IF;
5652: --
5653: return;
5654: END IF;
5661: l_del_id_for_container2.organization_id) THEN
5662: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_ASSG_ORG_DIFF');
5663: --
5664: IF l_debug_on THEN
5665: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5666: END IF;
5667: --
5668: FND_MESSAGE.SET_TOKEN('ENTITY1',
5669: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5668: FND_MESSAGE.SET_TOKEN('ENTITY1',
5669: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5670: --
5671: IF l_debug_on THEN
5672: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5673: END IF;
5674: --
5675: FND_MESSAGE.SET_TOKEN('ENTITY2',
5676: nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
5677: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5678: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5679: --
5680: IF l_debug_on THEN
5681: WSH_DEBUG_SV.pop(l_module_name);
5682: END IF;
5683: --
5684: RETURN;
5685: END IF;
5688: l_del_id_for_container2.ship_from_location_id) THEN
5689: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NOT_MATCH');
5690: --
5691: IF l_debug_on THEN
5692: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5693: END IF;
5694: --
5695: FND_MESSAGE.SET_TOKEN('DETAIL_ID',
5696: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5695: FND_MESSAGE.SET_TOKEN('DETAIL_ID',
5696: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5697: --
5698: IF l_debug_on THEN
5699: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5700: END IF;
5701: --
5702: FND_MESSAGE.SET_TOKEN('CONT_NAME',
5703: nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
5704: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5705: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5706: --
5707: IF l_debug_on THEN
5708: WSH_DEBUG_SV.pop(l_module_name);
5709: END IF;
5710: --
5711: RETURN;
5712: END IF;
5742: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_DIFF_IGNOREPLAN');
5743: FND_MESSAGE.SET_TOKEN('ENTITY1',nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5744: --
5745: IF l_debug_on THEN
5746: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5747: END IF;
5748: --
5749: FND_MESSAGE.SET_TOKEN('ENTITY2',nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
5750: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5749: FND_MESSAGE.SET_TOKEN('ENTITY2',nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
5750: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5751: --
5752: IF l_debug_on THEN
5753: WSH_DEBUG_SV.pop(l_module_name);
5754: END IF;
5755: --
5756: RETURN;
5757:
5788: IF l_display_error THEN --{
5789: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_DIFF_IGNOREPLAN');
5790: --
5791: IF l_debug_on THEN
5792: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5793: END IF;
5794: FND_MESSAGE.SET_TOKEN('ENTITY1',nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5795: --
5796: IF l_debug_on THEN
5793: END IF;
5794: FND_MESSAGE.SET_TOKEN('ENTITY1',nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5795: --
5796: IF l_debug_on THEN
5797: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5798: END IF;
5799: --
5800: FND_MESSAGE.SET_TOKEN('ENTITY2',nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
5801: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5801: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5802: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5803: --
5804: IF l_debug_on THEN
5805: WSH_DEBUG_SV.pop(l_module_name);
5806: END IF;
5807: --
5808: RETURN;
5809: END IF; --}
5831: --{
5832: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NOT_MATCH');
5833: --
5834: IF l_debug_on THEN
5835: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5836: END IF;
5837: --
5838: FND_MESSAGE.SET_TOKEN('DETAIL_ID',
5839: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5838: FND_MESSAGE.SET_TOKEN('DETAIL_ID',
5839: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5840: --
5841: IF l_debug_on THEN
5842: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5843: END IF;
5844: --
5845: FND_MESSAGE.SET_TOKEN('CONT_NAME',
5846: nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
5847: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5848: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5849: --
5850: IF l_debug_on THEN
5851: WSH_DEBUG_SV.pop(l_module_name);
5852: END IF;
5853: --
5854: RETURN;
5855: --}
5860: -- J-IB-NPARIKH-}
5861: --
5862: --
5863: IF l_debug_on THEN
5864: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.GET_GROUP_BY_ATTR',WSH_DEBUG_SV.C_PROC_LEVEL);
5865: END IF;
5866: --
5867: WSH_DELIVERY_AUTOCREATE.get_group_by_attr(
5868: p_organization_id => l_del_id_for_container1.organization_id,
5874: x_return_status := x_return_status;
5875: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5876: --
5877: IF l_debug_on THEN
5878: WSH_DEBUG_SV.pop(l_module_name);
5879: END IF;
5880: --
5881: RETURN;
5882: END IF;
5906:
5907: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5908: --
5909: IF l_debug_on THEN
5910: WSH_DEBUG_SV.pop(l_module_name);
5911: END IF;
5912: --
5913: return;
5914: end if;
5926:
5927: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5928: --
5929: IF l_debug_on THEN
5930: WSH_DEBUG_SV.pop(l_module_name);
5931: END IF;
5932: --
5933: return;
5934: end if;
5943: l_del_id_for_container2.customer_id) THEN
5944: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NOT_MATCH');
5945: --
5946: IF l_debug_on THEN
5947: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5948: END IF;
5949: --
5950: FND_MESSAGE.SET_TOKEN('DETAIL_ID',
5951: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5950: FND_MESSAGE.SET_TOKEN('DETAIL_ID',
5951: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5952: --
5953: IF l_debug_on THEN
5954: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5955: END IF;
5956: --
5957: FND_MESSAGE.SET_TOKEN('CONT_NAME',
5958: nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
5958: nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
5959: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5960: --
5961: IF l_debug_on THEN
5962: WSH_DEBUG_SV.pop(l_module_name);
5963: END IF;
5964: --
5965: return;
5966: END IF;
5970: l_del_id_for_container2.intmed_ship_to_location_id) THEN
5971: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NOT_MATCH');
5972: --
5973: IF l_debug_on THEN
5974: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5975: END IF;
5976: --
5977: FND_MESSAGE.SET_TOKEN('DETAIL_ID',
5978: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5977: FND_MESSAGE.SET_TOKEN('DETAIL_ID',
5978: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
5979: --
5980: IF l_debug_on THEN
5981: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
5982: END IF;
5983: --
5984: FND_MESSAGE.SET_TOKEN('CONT_NAME',
5985: nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
5985: nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
5986: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
5987: --
5988: IF l_debug_on THEN
5989: WSH_DEBUG_SV.pop(l_module_name);
5990: END IF;
5991: --
5992: return;
5993: END IF;
5997: l_del_id_for_container2.fob_code) THEN
5998: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NOT_MATCH');
5999: --
6000: IF l_debug_on THEN
6001: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6002: END IF;
6003: --
6004: FND_MESSAGE.SET_TOKEN('DETAIL_ID',
6005: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
6004: FND_MESSAGE.SET_TOKEN('DETAIL_ID',
6005: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
6006: --
6007: IF l_debug_on THEN
6008: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6009: END IF;
6010: --
6011: FND_MESSAGE.SET_TOKEN('CONT_NAME',
6012: nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
6012: nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
6013: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
6014: --
6015: IF l_debug_on THEN
6016: WSH_DEBUG_SV.pop(l_module_name);
6017: END IF;
6018: --
6019: return;
6020: END IF;
6024: l_del_id_for_container2.freight_terms_code) THEN
6025: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NOT_MATCH');
6026: --
6027: IF l_debug_on THEN
6028: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6029: END IF;
6030: --
6031: FND_MESSAGE.SET_TOKEN('DETAIL_ID',
6032: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
6031: FND_MESSAGE.SET_TOKEN('DETAIL_ID',
6032: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
6033: --
6034: IF l_debug_on THEN
6035: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6036: END IF;
6037: --
6038: FND_MESSAGE.SET_TOKEN('CONT_NAME',
6039: nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
6039: nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
6040: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
6041: --
6042: IF l_debug_on THEN
6043: WSH_DEBUG_SV.pop(l_module_name);
6044: END IF;
6045: --
6046: return;
6047: END IF;
6056: THEN
6057: FND_MESSAGE.SET_NAME('WSH','WSH_CONT_DET_NOT_MATCH');
6058: --
6059: IF l_debug_on THEN
6060: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6061: END IF;
6062: --
6063: FND_MESSAGE.SET_TOKEN('DETAIL_ID',
6064: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
6063: FND_MESSAGE.SET_TOKEN('DETAIL_ID',
6064: nvl(wsh_container_utilities.get_cont_name(p_detail_id1), p_detail_id1));
6065: --
6066: IF l_debug_on THEN
6067: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.GET_CONT_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
6068: END IF;
6069: --
6070: FND_MESSAGE.SET_TOKEN('CONT_NAME',
6071: nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
6071: nvl(wsh_container_utilities.get_cont_name(p_detail_id2), p_detail_id2));
6072: WSH_UTIL_CORE.Add_Message(x_return_status,l_module_name);
6073: --
6074: IF l_debug_on THEN
6075: WSH_DEBUG_SV.pop(l_module_name);
6076: END IF;
6077: --
6078: return;
6079: END IF;
6096: -- The third DD_WV_Post_Process cll will increment the cont2 W/V with cont1 W/V which in turn will adjust the
6097: -- delivery W/V, if the cont2 is in a delivery.
6098: IF (l_del_id_for_container1.delivery_id is not null) THEN
6099: IF l_debug_on THEN
6100: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
6101: END IF;
6102:
6103: WSH_WV_UTILS.DD_WV_Post_Process(
6104: p_delivery_detail_id => p_detail_id1,
6112: --
6113: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6114: WSH_UTIL_CORE.Add_Message(x_return_status);
6115: IF l_debug_on THEN
6116: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
6117: WSH_DEBUG_SV.pop(l_module_name);
6118: END IF;
6119: return;
6120: END IF;
6113: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6114: WSH_UTIL_CORE.Add_Message(x_return_status);
6115: IF l_debug_on THEN
6116: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
6117: WSH_DEBUG_SV.pop(l_module_name);
6118: END IF;
6119: return;
6120: END IF;
6121:
6166: THEN
6167: --{
6168: --
6169: IF l_debug_on THEN
6170: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE_BULK',WSH_DEBUG_SV.C_PROC_LEVEL);
6171: END IF;
6172: --
6173: WSH_WMS_SYNC_TMP_PKG.MERGE_BULK
6174: (
6181: --
6182: x_return_status := l_return_status;
6183: --
6184: IF l_debug_on THEN
6185: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
6186: WSH_DEBUG_SV.pop(l_module_name);
6187: END IF;
6188: --
6189: return;
6182: x_return_status := l_return_status;
6183: --
6184: IF l_debug_on THEN
6185: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
6186: WSH_DEBUG_SV.pop(l_module_name);
6187: END IF;
6188: --
6189: return;
6190: --
6221: x_return_status => l_return_status);
6222:
6223: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
6224: IF l_debug_on THEN
6225: WSH_DEBUG_SV.log(l_module_name,'error from Post_Otm_Assign_Del_Detail');
6226: END IF;
6227: raise FND_API.G_EXC_ERROR;
6228: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
6229: l_num_warnings := l_num_warnings + 1;
6240: x_return_status => x_return_status);
6241:
6242: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
6243: IF l_debug_on THEN
6244: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
6245: WSH_DEBUG_SV.pop(l_module_name);
6246: END IF;
6247: return;
6248: END IF;
6241:
6242: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
6243: IF l_debug_on THEN
6244: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
6245: WSH_DEBUG_SV.pop(l_module_name);
6246: END IF;
6247: return;
6248: END IF;
6249: l_mdc_detail_tab.delete;
6256: -- K LPN CONV. rv
6257:
6258: -- J: W/V Changes
6259: IF l_debug_on THEN
6260: WSH_DEBUG_SV.logmsg(l_module_name,'Assigning Container to Delivery');
6261: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
6262: END IF;
6263:
6264: WSH_WV_UTILS.DD_WV_Post_Process(
6257:
6258: -- J: W/V Changes
6259: IF l_debug_on THEN
6260: WSH_DEBUG_SV.logmsg(l_module_name,'Assigning Container to Delivery');
6261: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
6262: END IF;
6263:
6264: WSH_WV_UTILS.DD_WV_Post_Process(
6265: p_delivery_detail_id => p_detail_id2,
6273: --
6274: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6275: WSH_UTIL_CORE.Add_Message(x_return_status);
6276: IF l_debug_on THEN
6277: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
6278: WSH_DEBUG_SV.pop(l_module_name);
6279: END IF;
6280: return;
6281: END IF;
6274: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6275: WSH_UTIL_CORE.Add_Message(x_return_status);
6276: IF l_debug_on THEN
6277: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
6278: WSH_DEBUG_SV.pop(l_module_name);
6279: END IF;
6280: return;
6281: END IF;
6282:
6330: THEN
6331: --{
6332: --
6333: IF l_debug_on THEN
6334: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE_BULK',WSH_DEBUG_SV.C_PROC_LEVEL);
6335: END IF;
6336: --
6337: WSH_WMS_SYNC_TMP_PKG.MERGE_BULK
6338: (
6345: --
6346: x_return_status := l_return_status;
6347: --
6348: IF l_debug_on THEN
6349: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
6350: WSH_DEBUG_SV.pop(l_module_name);
6351: END IF;
6352: --
6353: return;
6346: x_return_status := l_return_status;
6347: --
6348: IF l_debug_on THEN
6349: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
6350: WSH_DEBUG_SV.pop(l_module_name);
6351: END IF;
6352: --
6353: return;
6354: --
6385: x_return_status => l_return_status);
6386:
6387: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
6388: IF l_debug_on THEN
6389: WSH_DEBUG_SV.log(l_module_name,'error from Post_Otm_Assign_Del_Detail');
6390: END IF;
6391: raise FND_API.G_EXC_ERROR;
6392: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
6393: l_num_warnings := l_num_warnings + 1;
6403: p_detail_id_tab => l_mdc_detail_tab,
6404: x_return_status => x_return_status);
6405: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
6406: IF l_debug_on THEN
6407: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
6408: WSH_DEBUG_SV.pop(l_module_name);
6409: END IF;
6410: return;
6411: END IF;
6404: x_return_status => x_return_status);
6405: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
6406: IF l_debug_on THEN
6407: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
6408: WSH_DEBUG_SV.pop(l_module_name);
6409: END IF;
6410: return;
6411: END IF;
6412: l_mdc_detail_tab.delete;
6441: l_sync_tmp_rec.delivery_id := l_del_id_FOR_container1.delivery_id;
6442: l_sync_tmp_rec.operation_type := 'PRIOR';
6443: --
6444: IF l_debug_on THEN
6445: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE',WSH_DEBUG_SV.C_PROC_LEVEL);
6446: END IF;
6447: --
6448: WSH_WMS_SYNC_TMP_PKG.MERGE
6449: (
6455: --
6456: x_return_status := l_return_status;
6457: --
6458: IF l_debug_on THEN
6459: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
6460: WSH_DEBUG_SV.pop(l_module_name);
6461: END IF;
6462: --
6463: return;
6456: x_return_status := l_return_status;
6457: --
6458: IF l_debug_on THEN
6459: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
6460: WSH_DEBUG_SV.pop(l_module_name);
6461: END IF;
6462: --
6463: return;
6464: --
6485: x_return_status => x_return_status);
6486:
6487: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
6488: IF l_debug_on THEN
6489: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
6490: WSH_DEBUG_SV.pop(l_module_name);
6491: END IF;
6492: return;
6493: END IF;
6486:
6487: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
6488: IF l_debug_on THEN
6489: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
6490: WSH_DEBUG_SV.pop(l_module_name);
6491: END IF;
6492: return;
6493: END IF;
6494:
6497: THEN
6498: --{
6499: -- J: W/V Changes
6500: IF l_debug_on THEN
6501: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
6502: END IF;
6503: WSH_WV_UTILS.DD_WV_Post_Process(
6504: p_delivery_detail_id => p_detail_id1,
6505: p_diff_gross_wt => l_del_id_for_container1.gross_weight,
6512: --
6513: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6514: WSH_UTIL_CORE.Add_Message(x_return_status);
6515: IF l_debug_on THEN
6516: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
6517: WSH_DEBUG_SV.pop(l_module_name);
6518: END IF;
6519: return;
6520: END IF;
6513: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6514: WSH_UTIL_CORE.Add_Message(x_return_status);
6515: IF l_debug_on THEN
6516: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
6517: WSH_DEBUG_SV.pop(l_module_name);
6518: END IF;
6519: return;
6520: END IF;
6521: --}
6537: detail_cont_name := '(' || p_detail_id1 || ')';
6538: end if;
6539:
6540: IF l_debug_on THEN
6541: WSH_DEBUG_SV.log(l_module_name,'detail_cont_name',
6542: detail_cont_name);
6543: END IF;
6544:
6545: select container_name into parent_cont_name
6547: if SQL%NOTFOUND then
6548: detail_cont_name := '(' || p_detail_id2 || ')';
6549: end if;
6550: IF l_debug_on THEN
6551: WSH_DEBUG_SV.log(l_module_name,'parent_cont_name',
6552: parent_cont_name);
6553: END IF;
6554:
6555: for c IN check_loop(p_detail_id1) loop
6565: fnd_message.set_token('PARENT_CONTAINER', parent_cont_name);
6566: wsh_util_core.add_message(x_return_status,l_module_name);
6567: --
6568: IF l_debug_on THEN
6569: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected Error has occured. Oracle Err Mesg is'||SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6570: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION1 : OTHERS');
6571: END IF;
6572: --
6573: return;
6566: wsh_util_core.add_message(x_return_status,l_module_name);
6567: --
6568: IF l_debug_on THEN
6569: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected Error has occured. Oracle Err Mesg is'||SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6570: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION1 : OTHERS');
6571: END IF;
6572: --
6573: return;
6574: end;
6580: when plan a delivery
6581: */
6582: --
6583: IF l_debug_on THEN
6584: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
6585: WSH_DEBUG_SV.log(l_module_name,'Count of l_del_tab',l_del_tab.count);
6586: END IF;
6587: --
6588: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
6581: */
6582: --
6583: IF l_debug_on THEN
6584: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
6585: WSH_DEBUG_SV.log(l_module_name,'Count of l_del_tab',l_del_tab.count);
6586: END IF;
6587: --
6588: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
6589: p_entity_type => 'DELIVERY',
6608:
6609:
6610: --
6611: IF l_debug_on THEN
6612: WSH_DEBUG_SV.pop(l_module_name);
6613: END IF;
6614: --
6615: exception
6616:
6618: WHEN FND_API.G_EXC_ERROR then
6619: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6620: --
6621: IF l_debug_on THEN
6622: WSH_DEBUG_SV.pop(l_module_name);
6623: END IF;
6624: --
6625: RETURN;
6626: -- End of OTM R12 : assign delivery detail
6630: x_return_status := l_return_status;
6631: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
6632: --
6633: IF l_debug_on THEN
6634: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6635: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
6636: END IF;
6637: --
6638: WHEN others THEN
6631: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
6632: --
6633: IF l_debug_on THEN
6634: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6635: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
6636: END IF;
6637: --
6638: WHEN others THEN
6639: if c_del_id_for_cont_or_detail%ISOPEN THEN
6645: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6646: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_CONT_TO_CONT',l_module_name);
6647: --
6648: IF l_debug_on THEN
6649: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6650: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6651: END IF;
6652: --
6653: END Assign_Cont_To_Cont;
6646: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_CONT_TO_CONT',l_module_name);
6647: --
6648: IF l_debug_on THEN
6649: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6650: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6651: END IF;
6652: --
6653: END Assign_Cont_To_Cont;
6654:
6863: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6864: --
6865: IF l_debug_on IS NULL
6866: THEN
6867: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6868: END IF;
6869: --
6870: IF l_debug_on THEN
6871: WSH_DEBUG_SV.push(l_module_name);
6867: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6868: END IF;
6869: --
6870: IF l_debug_on THEN
6871: WSH_DEBUG_SV.push(l_module_name);
6872: --
6873: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
6874: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
6875: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.caller',p_action_prms.caller);
6869: --
6870: IF l_debug_on THEN
6871: WSH_DEBUG_SV.push(l_module_name);
6872: --
6873: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
6874: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
6875: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.caller',p_action_prms.caller);
6876: END IF;
6877: --
6870: IF l_debug_on THEN
6871: WSH_DEBUG_SV.push(l_module_name);
6872: --
6873: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
6874: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
6875: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.caller',p_action_prms.caller);
6876: END IF;
6877: --
6878: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6871: WSH_DEBUG_SV.push(l_module_name);
6872: --
6873: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
6874: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
6875: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.caller',p_action_prms.caller);
6876: END IF;
6877: --
6878: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6879: -- OTM R12
6918: END IF;
6919:
6920:
6921: IF l_debug_on THEN
6922: WSH_DEBUG_SV.log(l_module_name,'l_detail_status',
6923: l_detail_status);
6924: WSH_DEBUG_SV.log(l_module_name,'l_del1.status_code',
6925: l_del1.status_code);
6926: WSH_DEBUG_SV.log(l_module_name,'l_del1.planned_flag',
6920:
6921: IF l_debug_on THEN
6922: WSH_DEBUG_SV.log(l_module_name,'l_detail_status',
6923: l_detail_status);
6924: WSH_DEBUG_SV.log(l_module_name,'l_del1.status_code',
6925: l_del1.status_code);
6926: WSH_DEBUG_SV.log(l_module_name,'l_del1.planned_flag',
6927: l_del1.planned_flag);
6928: WSH_DEBUG_SV.log(l_module_name,'l_del1.name',
6922: WSH_DEBUG_SV.log(l_module_name,'l_detail_status',
6923: l_detail_status);
6924: WSH_DEBUG_SV.log(l_module_name,'l_del1.status_code',
6925: l_del1.status_code);
6926: WSH_DEBUG_SV.log(l_module_name,'l_del1.planned_flag',
6927: l_del1.planned_flag);
6928: WSH_DEBUG_SV.log(l_module_name,'l_del1.name',
6929: l_del1.name);
6930: WSH_DEBUG_SV.log(l_module_name,'l_del1.ignore_for_planning',
6924: WSH_DEBUG_SV.log(l_module_name,'l_del1.status_code',
6925: l_del1.status_code);
6926: WSH_DEBUG_SV.log(l_module_name,'l_del1.planned_flag',
6927: l_del1.planned_flag);
6928: WSH_DEBUG_SV.log(l_module_name,'l_del1.name',
6929: l_del1.name);
6930: WSH_DEBUG_SV.log(l_module_name,'l_del1.ignore_for_planning',
6931: l_del1.ignore_for_planning);
6932: WSH_DEBUG_SV.log(l_module_name,'l_assign.delivery_id',
6926: WSH_DEBUG_SV.log(l_module_name,'l_del1.planned_flag',
6927: l_del1.planned_flag);
6928: WSH_DEBUG_SV.log(l_module_name,'l_del1.name',
6929: l_del1.name);
6930: WSH_DEBUG_SV.log(l_module_name,'l_del1.ignore_for_planning',
6931: l_del1.ignore_for_planning);
6932: WSH_DEBUG_SV.log(l_module_name,'l_assign.delivery_id',
6933: l_assign.delivery_id);
6934: WSH_DEBUG_SV.log(l_module_name,'l_assign.parent_delivery_detail_id',
6928: WSH_DEBUG_SV.log(l_module_name,'l_del1.name',
6929: l_del1.name);
6930: WSH_DEBUG_SV.log(l_module_name,'l_del1.ignore_for_planning',
6931: l_del1.ignore_for_planning);
6932: WSH_DEBUG_SV.log(l_module_name,'l_assign.delivery_id',
6933: l_assign.delivery_id);
6934: WSH_DEBUG_SV.log(l_module_name,'l_assign.parent_delivery_detail_id',
6935: l_assign.parent_delivery_detail_id);
6936: WSH_DEBUG_SV.log(l_module_name,'l_assign.organization_id',
6930: WSH_DEBUG_SV.log(l_module_name,'l_del1.ignore_for_planning',
6931: l_del1.ignore_for_planning);
6932: WSH_DEBUG_SV.log(l_module_name,'l_assign.delivery_id',
6933: l_assign.delivery_id);
6934: WSH_DEBUG_SV.log(l_module_name,'l_assign.parent_delivery_detail_id',
6935: l_assign.parent_delivery_detail_id);
6936: WSH_DEBUG_SV.log(l_module_name,'l_assign.organization_id',
6937: l_assign.organization_id);
6938:
6932: WSH_DEBUG_SV.log(l_module_name,'l_assign.delivery_id',
6933: l_assign.delivery_id);
6934: WSH_DEBUG_SV.log(l_module_name,'l_assign.parent_delivery_detail_id',
6935: l_assign.parent_delivery_detail_id);
6936: WSH_DEBUG_SV.log(l_module_name,'l_assign.organization_id',
6937: l_assign.organization_id);
6938:
6939: END IF;
6940:
6949: l_chk_wms_org :=wsh_util_validate.check_wms_org(l_assign.organization_id);
6950: --
6951: IF l_container_flag = 'Y' THEN --{ --bug 5100229
6952: IF l_debug_on THEN
6953: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_UTILITIES.Is_Empty',WSH_DEBUG_SV.C_PROC_LEVEL);
6954: END IF;
6955: WSH_CONTAINER_UTILITIES.Is_Empty (p_container_instance_id => p_detail_id,
6956: x_empty_flag => l_detail_is_empty_cont,
6957: x_return_status => l_return_status);
6963: END IF; --}
6964:
6965: --
6966: IF l_debug_on THEN
6967: WSH_DEBUG_SV.log(l_module_name,'l_chk_wms_org', l_chk_wms_org);
6968: WSH_DEBUG_SV.log(l_module_name,'l_detail_is_empty_cont',l_detail_is_empty_cont);
6969:
6970: END IF;
6971: --
6964:
6965: --
6966: IF l_debug_on THEN
6967: WSH_DEBUG_SV.log(l_module_name,'l_chk_wms_org', l_chk_wms_org);
6968: WSH_DEBUG_SV.log(l_module_name,'l_detail_is_empty_cont',l_detail_is_empty_cont);
6969:
6970: END IF;
6971: --
6972:
7004: l_del_tab(1) := l_assign.delivery_id;
7005:
7006: --
7007: IF l_debug_on THEN
7008: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
7009: END IF;
7010: --
7011: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
7012: p_entity_type => 'DELIVERY',
7018: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7019: IF x_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7020: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
7021: IF l_debug_on THEN
7022: WSH_DEBUG_SV.log(l_module_name,'Mark_Reprice_Required completed with warnings.');
7023: END IF;
7024:
7025: END IF;
7026: END IF;
7028:
7029: -- J: W/V Changes
7030: -- Decrement the parent W/V by DD W/V
7031: IF l_debug_on THEN
7032: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
7033: END IF;
7034: WSH_WV_UTILS.DD_WV_Post_Process(
7035: p_delivery_detail_id => p_detail_id,
7036: p_diff_gross_wt => -1 * l_gross_wt,
7044: --
7045: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7046: WSH_UTIL_CORE.Add_Message(x_return_status);
7047: IF l_debug_on THEN
7048: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
7049: WSH_DEBUG_SV.pop(l_module_name);
7050: END IF;
7051: return;
7052: END IF;
7045: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7046: WSH_UTIL_CORE.Add_Message(x_return_status);
7047: IF l_debug_on THEN
7048: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
7049: WSH_DEBUG_SV.pop(l_module_name);
7050: END IF;
7051: return;
7052: END IF;
7053:
7086: END IF;
7087: -- End of OTM R12 : unassign delivery detail
7088:
7089: IF l_debug_on THEN
7090: WSH_DEBUG_SV.log(l_module_name,'l_dd_id',l_dd_id(i));
7091: -- OTM R12 : unassign delivery detail
7092: WSH_DEBUG_SV.log(l_module_name,'l_del_id',l_del_id_tbl(i));
7093: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight_tbl(i));
7094: -- End of OTM R12 : unassign delivery detail
7088:
7089: IF l_debug_on THEN
7090: WSH_DEBUG_SV.log(l_module_name,'l_dd_id',l_dd_id(i));
7091: -- OTM R12 : unassign delivery detail
7092: WSH_DEBUG_SV.log(l_module_name,'l_del_id',l_del_id_tbl(i));
7093: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight_tbl(i));
7094: -- End of OTM R12 : unassign delivery detail
7095: END IF;
7096: i := i+1;
7089: IF l_debug_on THEN
7090: WSH_DEBUG_SV.log(l_module_name,'l_dd_id',l_dd_id(i));
7091: -- OTM R12 : unassign delivery detail
7092: WSH_DEBUG_SV.log(l_module_name,'l_del_id',l_del_id_tbl(i));
7093: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight_tbl(i));
7094: -- End of OTM R12 : unassign delivery detail
7095: END IF;
7096: i := i+1;
7097: END LOOP;
7120: l_sync_tmp_rec.delivery_id := l_del_id_tbl(j);
7121: l_sync_tmp_rec.operation_type := 'PRIOR';
7122: --
7123: IF l_debug_on THEN
7124: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE',WSH_DEBUG_SV.C_PROC_LEVEL);
7125: END IF;
7126: --
7127: WSH_WMS_SYNC_TMP_PKG.MERGE
7128: (
7134: --
7135: x_return_status := l_return_status;
7136: --
7137: IF l_debug_on THEN
7138: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
7139: WSH_DEBUG_SV.pop(l_module_name);
7140: END IF;
7141: --
7142: return;
7135: x_return_status := l_return_status;
7136: --
7137: IF l_debug_on THEN
7138: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
7139: WSH_DEBUG_SV.pop(l_module_name);
7140: END IF;
7141: --
7142: return;
7143: --
7178: x_return_status => x_return_status);
7179:
7180: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
7181: IF l_debug_on THEN
7182: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
7183: WSH_DEBUG_SV.pop(l_module_name);
7184: END IF;
7185: return;
7186: END IF;
7179:
7180: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
7181: IF l_debug_on THEN
7182: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
7183: WSH_DEBUG_SV.pop(l_module_name);
7184: END IF;
7185: return;
7186: END IF;
7187:
7185: return;
7186: END IF;
7187:
7188: IF l_debug_on THEN
7189: WSH_DEBUG_SV.log(l_module_name,'Updating for detail id',l_dd_id(j));
7190: END IF;
7191:
7192:
7193: -- J-IB-NPARIKH-{
7199: l_ib_upd_flag := 'N';
7200: END IF;
7201: --
7202: IF l_debug_on THEN
7203: WSH_DEBUG_SV.log(l_module_name,'l_ib_upd_flag',l_ib_upd_flag);
7204: END IF;
7205: --
7206: -- J-IB-NPARIKH-}
7207:
7223: l_sync_tmp_rec.delivery_detail_id := l_dd_id(j);
7224: l_sync_tmp_rec.operation_type := 'UPDATE';
7225: --
7226: IF l_debug_on THEN
7227: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE',WSH_DEBUG_SV.C_PROC_LEVEL);
7228: END IF;
7229: --
7230: WSH_WMS_SYNC_TMP_PKG.MERGE
7231: (
7237: --
7238: x_return_status := l_return_status;
7239: --
7240: IF l_debug_on THEN
7241: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
7242: WSH_DEBUG_SV.pop(l_module_name);
7243: END IF;
7244: --
7245: return;
7238: x_return_status := l_return_status;
7239: --
7240: IF l_debug_on THEN
7241: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
7242: WSH_DEBUG_SV.pop(l_module_name);
7243: END IF;
7244: --
7245: return;
7246: --
7308: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7309: RAISE NO_DATA_FOUND;
7310: END IF;
7311: IF l_debug_on THEN
7312: WSH_DEBUG_SV.log(l_module_name,'Rel Status after the update is ', l_rel_status);
7313: END IF;
7314:
7315: -- released_status = DECODE(released_status,'D','D',
7316: -- nvl(shipped_quantity,picked_quantity,requested_quantity),0,'D',
7338: FETCH c_grouping_id into l_carton_grouping_id;
7339: CLOSE c_grouping_id;
7340:
7341: IF l_debug_on THEN
7342: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_MO_CANCEL_PVT.update_mol_carton_group',WSH_DEBUG_SV.C_PROC_LEVEL);
7343: END IF;
7344:
7345: INV_MO_Cancel_PVT.update_mol_carton_group(
7346: x_return_status => x_return_status,
7376:
7377: IF (l_is_delivery_empty = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
7378: --handle the error approriately to the procedure this code is in
7379: IF l_debug_on THEN
7380: WSH_DEBUG_SV.log(l_module_name,'error from wsh_new_delivery_actions.is_delivery_empty');
7381: END IF;
7382: raise FND_API.G_EXC_ERROR;
7383: ELSIF (l_is_delivery_empty = 'Y') THEN
7384: l_interface_flag_tab(1) := WSH_NEW_DELIVERIES_PVT.C_TMS_DELETE_REQUIRED;
7397:
7398: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
7399: x_return_status := l_return_status;
7400: IF l_debug_on THEN
7401: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG '||l_return_status);
7402: WSH_DEBUG_SV.pop(l_module_name);
7403: END IF;
7404: RETURN;
7405: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
7398: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR)) THEN
7399: x_return_status := l_return_status;
7400: IF l_debug_on THEN
7401: WSH_DEBUG_SV.logmsg(l_module_name,'Error in WSH_NEW_DELIVERIES_PVT.UPDATE_TMS_INTERFACE_FLAG '||l_return_status);
7402: WSH_DEBUG_SV.pop(l_module_name);
7403: END IF;
7404: RETURN;
7405: ELSIF (l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
7406: l_num_warnings := l_num_warnings + 1;
7413: -- DBI Project
7414: -- Update of wsh_delivery_details, call DBI API after the action.
7415: -- This API will also check for DBI Installed or not
7416: IF l_debug_on THEN
7417: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail count-',l_detail_tab.count);
7418: END IF;
7419: WSH_INTEGRATION.DBI_Update_Detail_Log
7420: (p_delivery_detail_id_tab => l_detail_tab,
7421: p_dml_type => 'UPDATE',
7421: p_dml_type => 'UPDATE',
7422: x_return_status => l_dbi_rs);
7423:
7424: IF l_debug_on THEN
7425: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
7426: END IF;
7427: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
7428: x_return_status := l_dbi_rs;
7429: -- just pass this return status to caller API
7429: -- just pass this return status to caller API
7430: ROLLBACK TO before_unassign;
7431: --
7432: IF l_debug_on THEN
7433: WSH_DEBUG_SV.logmsg(l_module_name,'DBI API call failed',x_return_status);
7434: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DBI API FAILED');
7435: END IF;
7436: RETURN;
7437: END IF;
7430: ROLLBACK TO before_unassign;
7431: --
7432: IF l_debug_on THEN
7433: WSH_DEBUG_SV.logmsg(l_module_name,'DBI API call failed',x_return_status);
7434: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DBI API FAILED');
7435: END IF;
7436: RETURN;
7437: END IF;
7438: -- End of Code for DBI Project
7446: fetch l_parent_cnt_csr into l_parent_cnt_orgn_id, l_parent_cnt_line_dir;
7447: close l_parent_cnt_csr;
7448: --
7449: IF l_debug_on THEN
7450: WSH_DEBUG_SV.log(l_module_name,' parent cnt orgn id is', l_parent_cnt_orgn_id);
7451: WSH_DEBUG_SV.log(l_module_name,' parent cnt line dir is', l_parent_cnt_line_dir);
7452: END IF;
7453: --
7454: l_wms_org := wsh_util_validate.check_wms_org(l_parent_cnt_orgn_id);
7447: close l_parent_cnt_csr;
7448: --
7449: IF l_debug_on THEN
7450: WSH_DEBUG_SV.log(l_module_name,' parent cnt orgn id is', l_parent_cnt_orgn_id);
7451: WSH_DEBUG_SV.log(l_module_name,' parent cnt line dir is', l_parent_cnt_line_dir);
7452: END IF;
7453: --
7454: l_wms_org := wsh_util_validate.check_wms_org(l_parent_cnt_orgn_id);
7455: --
7470: l_sync_tmp_rec.delivery_id := l_assign.delivery_id;
7471: l_sync_tmp_rec.operation_type := 'PRIOR';
7472: --
7473: IF l_debug_on THEN
7474: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WMS_SYNC_TMP_PKG.MERGE',WSH_DEBUG_SV.C_PROC_LEVEL);
7475: END IF;
7476: --
7477: WSH_WMS_SYNC_TMP_PKG.MERGE
7478: (
7484: --
7485: x_return_status := l_return_status;
7486: --
7487: IF l_debug_on THEN
7488: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
7489: WSH_DEBUG_SV.pop(l_module_name);
7490: END IF;
7491: --
7492: return;
7485: x_return_status := l_return_status;
7486: --
7487: IF l_debug_on THEN
7488: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
7489: WSH_DEBUG_SV.pop(l_module_name);
7490: END IF;
7491: --
7492: return;
7493: --
7525: x_return_status => x_return_status);
7526:
7527: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
7528: IF l_debug_on THEN
7529: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
7530: WSH_DEBUG_SV.pop(l_module_name);
7531: END IF;
7532: return;
7533: END IF;
7526:
7527: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) THEN
7528: IF l_debug_on THEN
7529: WSH_DEBUG_SV.log(l_module_name,'Return Status',l_return_status);
7530: WSH_DEBUG_SV.pop(l_module_name);
7531: END IF;
7532: return;
7533: END IF;
7534:
7540:
7541: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR))
7542: THEN
7543: IF l_debug_on THEN
7544: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_SHIPPING_PARAMS_PVT.Get returned '||l_return_status);
7545: END IF;
7546: RAISE get_shipping_param_err;
7547: END IF;
7548:
7563:
7564: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR))
7565: THEN
7566: IF l_debug_on THEN
7567: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_WV_UTILS.ADJUST_PARENT_WV returned '||l_return_status);
7568: END IF;
7569: RAISE adjust_parent_wv_err;
7570: END IF;
7571:
7590: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
7591: END IF;
7592: END IF;
7593: IF l_debug_on THEN
7594: WSH_DEBUG_SV.log(l_module_name,'Remove_FTE_Freight_Costs completed returns with status: ' ||
7595: l_return_status);
7596: END IF;
7597:
7598: NULL;
7613:
7614:
7615: --
7616: IF l_debug_on THEN
7617: WSH_DEBUG_SV.pop(l_module_name);
7618: END IF;
7619: --
7620: EXCEPTION
7621: WHEN mark_reprice_error THEN
7624: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
7625: ROLLBACK TO before_unassign;
7626: --
7627: IF l_debug_on THEN
7628: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7629: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
7630: END IF;
7631: --
7632: WHEN detail_not_assigned THEN
7625: ROLLBACK TO before_unassign;
7626: --
7627: IF l_debug_on THEN
7628: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7629: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
7630: END IF;
7631: --
7632: WHEN detail_not_assigned THEN
7633: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7635: wsh_util_core.add_message(x_return_status,l_module_name);
7636: ROLLBACK TO before_unassign;
7637: --
7638: IF l_debug_on THEN
7639: WSH_DEBUG_SV.logmsg(l_module_name,'DETAIL_NOT_ASSIGNED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7640: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DETAIL_NOT_ASSIGNED');
7641: END IF;
7642: --
7643: WHEN del_not_updatable THEN
7636: ROLLBACK TO before_unassign;
7637: --
7638: IF l_debug_on THEN
7639: WSH_DEBUG_SV.logmsg(l_module_name,'DETAIL_NOT_ASSIGNED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7640: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DETAIL_NOT_ASSIGNED');
7641: END IF;
7642: --
7643: WHEN del_not_updatable THEN
7644: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7645: wsh_util_core.add_message(x_return_status,l_module_name);
7646: ROLLBACK TO before_unassign;
7647: --
7648: IF l_debug_on THEN
7649: WSH_DEBUG_SV.logmsg(l_module_name,'DEL_NOT_UPDATABLE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7650: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DEL_NOT_UPDATABLE');
7651: END IF;
7652: --
7653: WHEN update_mol_carton_group_error THEN
7646: ROLLBACK TO before_unassign;
7647: --
7648: IF l_debug_on THEN
7649: WSH_DEBUG_SV.logmsg(l_module_name,'DEL_NOT_UPDATABLE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7650: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DEL_NOT_UPDATABLE');
7651: END IF;
7652: --
7653: WHEN update_mol_carton_group_error THEN
7654: fnd_message.SET_name('WSH', 'WSH_MOL_CARTON_GROUP_ERROR');
7656: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
7657:
7658: --
7659: IF l_debug_on THEN
7660: WSH_DEBUG_SV.logmsg(l_module_name,'update_mol_carton_group_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7661: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:update_mol_carton_group_error');
7662: END IF;
7663:
7664: WHEN check_ship_set_failed THEN
7657:
7658: --
7659: IF l_debug_on THEN
7660: WSH_DEBUG_SV.logmsg(l_module_name,'update_mol_carton_group_error exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7661: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:update_mol_carton_group_error');
7662: END IF;
7663:
7664: WHEN check_ship_set_failed THEN
7665: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7665: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7666:
7667: --
7668: IF l_debug_on THEN
7669: WSH_DEBUG_SV.logmsg(l_module_name,'CHECK_SHIP_SET_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7670: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CHECK_SHIP_SET_FAILED');
7671: END IF;
7672: --
7673: WHEN check_smc_failed THEN
7666:
7667: --
7668: IF l_debug_on THEN
7669: WSH_DEBUG_SV.logmsg(l_module_name,'CHECK_SHIP_SET_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7670: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CHECK_SHIP_SET_FAILED');
7671: END IF;
7672: --
7673: WHEN check_smc_failed THEN
7674: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7673: WHEN check_smc_failed THEN
7674: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7675: --
7676: IF l_debug_on THEN
7677: WSH_DEBUG_SV.logmsg(l_module_name,'CHECK_SMC_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7678: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CHECK_SMC_FAILED');
7679: END IF;
7680: --
7681: WHEN remove_FC_error THEN
7674: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7675: --
7676: IF l_debug_on THEN
7677: WSH_DEBUG_SV.logmsg(l_module_name,'CHECK_SMC_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7678: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CHECK_SMC_FAILED');
7679: END IF;
7680: --
7681: WHEN remove_FC_error THEN
7682: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7681: WHEN remove_FC_error THEN
7682: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7683: --
7684: IF l_debug_on THEN
7685: WSH_DEBUG_SV.logmsg(l_module_name,'Remove_FTE_Freight_Costs failed.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7686: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REMOVE_FC_ERROR');
7687: END IF;
7688: --
7689: FND_MESSAGE.Set_Name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
7682: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7683: --
7684: IF l_debug_on THEN
7685: WSH_DEBUG_SV.logmsg(l_module_name,'Remove_FTE_Freight_Costs failed.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7686: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REMOVE_FC_ERROR');
7687: END IF;
7688: --
7689: FND_MESSAGE.Set_Name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
7690: WSH_UTIL_CORE.add_message (x_return_status,l_module_name);
7698: wsh_util_core.add_message(x_return_status,l_module_name);
7699: ROLLBACK TO before_unassign;
7700: --
7701: IF l_debug_on THEN
7702: WSH_DEBUG_SV.logmsg(l_module_name,'Failed to get Shipping Parameters',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7703: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:GET_SHIPPING_PARAM_ERR');
7704: END IF;
7705:
7706: WHEN adjust_parent_wv_err THEN
7699: ROLLBACK TO before_unassign;
7700: --
7701: IF l_debug_on THEN
7702: WSH_DEBUG_SV.logmsg(l_module_name,'Failed to get Shipping Parameters',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7703: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:GET_SHIPPING_PARAM_ERR');
7704: END IF;
7705:
7706: WHEN adjust_parent_wv_err THEN
7707: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7711:
7712: ROLLBACK TO before_unassign;
7713: --
7714: IF l_debug_on THEN
7715: WSH_DEBUG_SV.logmsg(l_module_name,'Failed to adjust the weight and volume of parent container '||to_char(l_assign.parent_delivery_detail_id),WSH_DEBUG_SV.C_EXCEP_LEVEL);
7716: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:ADJUST_PARENT_WV_ERR');
7717: END IF;
7718:
7719: WHEN others THEN
7712: ROLLBACK TO before_unassign;
7713: --
7714: IF l_debug_on THEN
7715: WSH_DEBUG_SV.logmsg(l_module_name,'Failed to adjust the weight and volume of parent container '||to_char(l_assign.parent_delivery_detail_id),WSH_DEBUG_SV.C_EXCEP_LEVEL);
7716: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:ADJUST_PARENT_WV_ERR');
7717: END IF;
7718:
7719: WHEN others THEN
7720: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7723:
7724:
7725: --
7726: IF l_debug_on THEN
7727: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7728: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7729: END IF;
7730: --
7731: END Unassign_Detail_FROM_Delivery;
7724:
7725: --
7726: IF l_debug_on THEN
7727: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7728: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7729: END IF;
7730: --
7731: END Unassign_Detail_FROM_Delivery;
7732:
7758: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7759: --
7760: IF l_debug_on IS NULL
7761: THEN
7762: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7763: END IF;
7764: --
7765: IF l_debug_on THEN
7766: WSH_DEBUG_SV.push(l_module_name);
7762: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7763: END IF;
7764: --
7765: IF l_debug_on THEN
7766: WSH_DEBUG_SV.push(l_module_name);
7767: --
7768: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
7769: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
7770: END IF;
7764: --
7765: IF l_debug_on THEN
7766: WSH_DEBUG_SV.push(l_module_name);
7767: --
7768: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
7769: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
7770: END IF;
7771: --
7772: IF l_debug_on THEN
7765: IF l_debug_on THEN
7766: WSH_DEBUG_SV.push(l_module_name);
7767: --
7768: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
7769: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
7770: END IF;
7771: --
7772: IF l_debug_on THEN
7773: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_DETAIL_FROM_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
7769: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
7770: END IF;
7771: --
7772: IF l_debug_on THEN
7773: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_DETAIL_FROM_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
7774: END IF;
7775: UNASSIGN_DETAIL_FROM_DELIVERY (p_detail_id,
7776: x_return_status,
7777: p_validate_flag,
7777: p_validate_flag,
7778: l_action_prms);
7779: --
7780: IF l_debug_on THEN
7781: WSH_DEBUG_SV.pop(l_module_name);
7782: END IF;
7783: --
7784: EXCEPTION
7785: WHEN others THEN
7786: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7787: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_DETAIL_FROM_DELIVERY',l_module_name);
7788: --
7789: IF l_debug_on THEN
7790: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7791: END IF;
7792: --
7793: END Unassign_Detail_FROM_Delivery;
7794:
7878: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7879: --
7880: IF l_debug_on IS NULL
7881: THEN
7882: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7883: END IF;
7884: --
7885: IF l_debug_on THEN
7886: WSH_DEBUG_SV.push(l_module_name);
7882: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7883: END IF;
7884: --
7885: IF l_debug_on THEN
7886: WSH_DEBUG_SV.push(l_module_name);
7887: --
7888: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DELIVERY',P_FROM_DELIVERY);
7889: WSH_DEBUG_SV.log(l_module_name,'P_FROM_CONTAINER',P_FROM_CONTAINER);
7890: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
7884: --
7885: IF l_debug_on THEN
7886: WSH_DEBUG_SV.push(l_module_name);
7887: --
7888: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DELIVERY',P_FROM_DELIVERY);
7889: WSH_DEBUG_SV.log(l_module_name,'P_FROM_CONTAINER',P_FROM_CONTAINER);
7890: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
7891: END IF;
7892: --
7885: IF l_debug_on THEN
7886: WSH_DEBUG_SV.push(l_module_name);
7887: --
7888: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DELIVERY',P_FROM_DELIVERY);
7889: WSH_DEBUG_SV.log(l_module_name,'P_FROM_CONTAINER',P_FROM_CONTAINER);
7890: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
7891: END IF;
7892: --
7893: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7886: WSH_DEBUG_SV.push(l_module_name);
7887: --
7888: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DELIVERY',P_FROM_DELIVERY);
7889: WSH_DEBUG_SV.log(l_module_name,'P_FROM_CONTAINER',P_FROM_CONTAINER);
7890: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
7891: END IF;
7892: --
7893: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7894:
7902: OPEN c_multi_assign_rec(p_rec_of_detail_ids(i));
7903: FETCH c_multi_assign_rec INTO l_multi_assign_rec;
7904:
7905: IF l_debug_on THEN
7906: WSH_DEBUG_SV.log(l_module_name,'p_rec_of_detail_ids',
7907: p_rec_of_detail_ids(i));
7908: END IF;
7909:
7910: IF (c_multi_assign_rec%NOTFOUND) THEN
7932: -- J-IB-NPARIKH-{
7933: --
7934: --
7935: IF l_debug_on THEN
7936: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.get_Cached_value',WSH_DEBUG_SV.C_PROC_LEVEL);
7937: END IF;
7938: --
7939: -- Build a cache of uniqye delivery IDs , from which lines are being unassigned
7940: --
7990: IF NVL(p_action_prms.caller,'!!!!') NOT LIKE WSH_UTIL_CORE.C_IB_RECEIPT_PREFIX || '%' -- J-IB-NPARIKH
7991: THEN
7992: --{
7993: IF l_debug_on THEN
7994: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_TP_RELEASE.calculate_cont_del_tpdates',WSH_DEBUG_SV.C_PROC_LEVEL);
7995: END IF;
7996:
7997: l_del_tab(1) := l_dlvy_tbl(l_index).value;
7998: WSH_TP_RELEASE.calculate_cont_del_tpdates(
8014: p_event => 'oracle.apps.fte.delivery.ib.pocancelled' ,
8015: p_organization_id => l_org_id,
8016: x_return_status => l_wf_rs ) ;
8017: IF l_debug_on THEN
8018: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', l_del_id );
8019: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
8020: END IF;
8021: --Done Raise Event: Pick To Pod Workflow
8022: END IF;
8015: p_organization_id => l_org_id,
8016: x_return_status => l_wf_rs ) ;
8017: IF l_debug_on THEN
8018: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', l_del_id );
8019: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
8020: END IF;
8021: --Done Raise Event: Pick To Pod Workflow
8022: END IF;
8023: CLOSE c_empty_delivery;
8026: END IF;
8027:
8028: --
8029: IF l_debug_on THEN
8030: WSH_DEBUG_SV.log(l_module_name,'l_dlvy_tbl(l_index).value',l_dlvy_tbl(l_index).value);
8031: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.update_freight_terms',WSH_DEBUG_SV.C_PROC_LEVEL);
8032: END IF;
8033: --
8034: WSH_NEW_DELIVERY_ACTIONS.update_freight_terms
8027:
8028: --
8029: IF l_debug_on THEN
8030: WSH_DEBUG_SV.log(l_module_name,'l_dlvy_tbl(l_index).value',l_dlvy_tbl(l_index).value);
8031: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.update_freight_terms',WSH_DEBUG_SV.C_PROC_LEVEL);
8032: END IF;
8033: --
8034: WSH_NEW_DELIVERY_ACTIONS.update_freight_terms
8035: (
8063: THEN
8064: --{
8065:
8066: IF l_debug_on THEN
8067: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_TP_RELEASE.calculate_cont_del_tpdates',WSH_DEBUG_SV.C_PROC_LEVEL);
8068: END IF;
8069: l_del_tab(1) := l_dlvy_ext_tbl(l_index).value;
8070: WSH_TP_RELEASE.calculate_cont_del_tpdates(
8071: p_entity => 'DLVY',
8085: p_event => 'oracle.apps.fte.delivery.ib.pocancelled' ,
8086: p_organization_id => l_org_id,
8087: x_return_status => l_wf_rs ) ;
8088: IF l_debug_on THEN
8089: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', l_del_id );
8090: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
8091: END IF;
8092: --Done Raise Event: Pick To Pod Workflow
8093: END IF;
8086: p_organization_id => l_org_id,
8087: x_return_status => l_wf_rs ) ;
8088: IF l_debug_on THEN
8089: WSH_DEBUG_SV.log(l_module_name,'Delivery ID is ', l_del_id );
8090: WSH_DEBUG_SV.log(l_module_name,'Return Status After Calling WSH_WF_STD.Raise_Event',l_wf_rs);
8091: END IF;
8092: --Done Raise Event: Pick To Pod Workflow
8093: END IF;
8094: CLOSE c_empty_delivery;
8095: END IF;*/
8096: END IF;
8097:
8098: IF l_debug_on THEN
8099: WSH_DEBUG_SV.log(l_module_name,'l_dlvy_ext_tbl(l_index).value',l_dlvy_ext_tbl(l_index).value);
8100: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.update_freight_terms',WSH_DEBUG_SV.C_PROC_LEVEL);
8101: END IF;
8102: --
8103: WSH_NEW_DELIVERY_ACTIONS.update_freight_terms
8096: END IF;
8097:
8098: IF l_debug_on THEN
8099: WSH_DEBUG_SV.log(l_module_name,'l_dlvy_ext_tbl(l_index).value',l_dlvy_ext_tbl(l_index).value);
8100: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.update_freight_terms',WSH_DEBUG_SV.C_PROC_LEVEL);
8101: END IF;
8102: --
8103: WSH_NEW_DELIVERY_ACTIONS.update_freight_terms
8104: (
8124: -- J-IB-NPARIKH-}
8125:
8126: END IF;
8127: IF l_debug_on THEN
8128: WSH_DEBUG_SV.log(l_module_name,'l_num_errors', l_num_errors);
8129: WSH_DEBUG_SV.log(l_module_name,'l_num_warnings', l_num_warnings);
8130: END IF;
8131:
8132: IF (p_from_container = 'Y') THEN
8125:
8126: END IF;
8127: IF l_debug_on THEN
8128: WSH_DEBUG_SV.log(l_module_name,'l_num_errors', l_num_errors);
8129: WSH_DEBUG_SV.log(l_module_name,'l_num_warnings', l_num_warnings);
8130: END IF;
8131:
8132: IF (p_from_container = 'Y') THEN
8133: FOR i in p_rec_of_detail_ids.FIRST .. p_rec_of_detail_ids.LAST
8134: LOOP
8135: OPEN c_multi_assign_rec(p_rec_of_detail_ids(i));
8136: FETCH c_multi_assign_rec INTO l_multi_assign_rec;
8137: IF l_debug_on THEN
8138: WSH_DEBUG_SV.log(l_module_name,'p_rec_of_detail_ids'
8139: ,p_rec_of_detail_ids(i));
8140: WSH_DEBUG_SV.log(l_module_name,'l_multi_assign_rec',
8141: l_multi_assign_rec.delivery_id);
8142: END IF;
8136: FETCH c_multi_assign_rec INTO l_multi_assign_rec;
8137: IF l_debug_on THEN
8138: WSH_DEBUG_SV.log(l_module_name,'p_rec_of_detail_ids'
8139: ,p_rec_of_detail_ids(i));
8140: WSH_DEBUG_SV.log(l_module_name,'l_multi_assign_rec',
8141: l_multi_assign_rec.delivery_id);
8142: END IF;
8143: IF (c_multi_assign_rec%NOTFOUND) THEN
8144: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8170:
8171: END IF;
8172:
8173: IF l_debug_on THEN
8174: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_TP_RELEASE.calculate_cont_del_tpdates',WSH_DEBUG_SV.C_PROC_LEVEL);
8175: END IF;
8176: l_del_tab(1) := l_multi_assign_rec.parent_delivery_detail_id;
8177: WSH_TP_RELEASE.calculate_cont_del_tpdates(
8178: p_entity => 'DLVB',
8189: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
8190: THEN
8191: --{
8192: IF l_debug_on THEN
8193: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
8194: END IF;
8195:
8196: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
8197: (
8201: );
8202: --
8203: --
8204: IF l_debug_on THEN
8205: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
8206: END IF;
8207: --
8208: --
8209: WSH_UTIL_CORE.API_POST_CALL
8224: ELSIF (l_num_warnings > 0 OR l_num_errors>0) THEN
8225: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8226: END IF;
8227: IF l_debug_on THEN
8228: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
8229: WSH_DEBUG_SV.log(l_module_name,'l_num_warnings',l_num_warnings);
8230: WSH_DEBUG_SV.log(l_module_name,'l_num_errors',l_num_errors);
8231: WSH_DEBUG_SV.pop(l_module_name);
8232: END IF;
8225: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
8226: END IF;
8227: IF l_debug_on THEN
8228: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
8229: WSH_DEBUG_SV.log(l_module_name,'l_num_warnings',l_num_warnings);
8230: WSH_DEBUG_SV.log(l_module_name,'l_num_errors',l_num_errors);
8231: WSH_DEBUG_SV.pop(l_module_name);
8232: END IF;
8233:
8226: END IF;
8227: IF l_debug_on THEN
8228: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
8229: WSH_DEBUG_SV.log(l_module_name,'l_num_warnings',l_num_warnings);
8230: WSH_DEBUG_SV.log(l_module_name,'l_num_errors',l_num_errors);
8231: WSH_DEBUG_SV.pop(l_module_name);
8232: END IF;
8233:
8234: EXCEPTION
8227: IF l_debug_on THEN
8228: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
8229: WSH_DEBUG_SV.log(l_module_name,'l_num_warnings',l_num_warnings);
8230: WSH_DEBUG_SV.log(l_module_name,'l_num_errors',l_num_errors);
8231: WSH_DEBUG_SV.pop(l_module_name);
8232: END IF;
8233:
8234: EXCEPTION
8235: -- J-IB-NPARIKH-{
8241: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
8242: THEN
8243: --{
8244: IF l_debug_on THEN
8245: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
8246: END IF;
8247: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
8248: (
8249: p_in_rec => l_lpn_in_sync_comm_rec,
8252: );
8253: --
8254: --
8255: IF l_debug_on THEN
8256: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
8257: END IF;
8258: --
8259: --
8260: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
8267: -- K LPN CONV. rv
8268: --
8269: --
8270: IF l_debug_on THEN
8271: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
8272: END IF;
8273: --
8274: WHEN fnd_api.g_exc_unexpected_error THEN
8275: x_return_status := fnd_api.g_ret_sts_unexp_error;
8280: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
8281: THEN
8282: --{
8283: IF l_debug_on THEN
8284: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
8285: END IF;
8286:
8287: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
8288: (
8292: );
8293: --
8294: --
8295: IF l_debug_on THEN
8296: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
8297: END IF;
8298: --
8299: --
8300: --
8303: --
8304: -- K LPN CONV. rv
8305: --
8306: IF l_debug_on THEN
8307: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
8308: END IF;
8309: --
8310:
8311: -- J-IB-NPARIKH-}
8318: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
8319: THEN
8320: --{
8321: IF l_debug_on THEN
8322: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
8323: END IF;
8324:
8325: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
8326: (
8330: );
8331: --
8332: --
8333: IF l_debug_on THEN
8334: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
8335: END IF;
8336: --
8337: --
8338: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
8344: --
8345: -- K LPN CONV. rv
8346: --
8347: IF l_debug_on THEN
8348: WSH_DEBUG_SV.logmsg(l_module_name,'CHECK_SHIP_SET_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8349: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CHECK_SHIP_SET_FAILED');
8350: END IF;
8351: --
8352: WHEN check_smc_failed THEN
8345: -- K LPN CONV. rv
8346: --
8347: IF l_debug_on THEN
8348: WSH_DEBUG_SV.logmsg(l_module_name,'CHECK_SHIP_SET_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8349: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CHECK_SHIP_SET_FAILED');
8350: END IF;
8351: --
8352: WHEN check_smc_failed THEN
8353: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8357: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
8358: THEN
8359: --{
8360: IF l_debug_on THEN
8361: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
8362: END IF;
8363:
8364: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
8365: (
8369: );
8370: --
8371: --
8372: IF l_debug_on THEN
8373: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
8374: END IF;
8375: --
8376: --
8377: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
8384: -- K LPN CONV. rv
8385: --
8386: --
8387: IF l_debug_on THEN
8388: WSH_DEBUG_SV.logmsg(l_module_name,'CHECK_SMC_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8389: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CHECK_SMC_FAILED');
8390: END IF;
8391: --
8392: WHEN others THEN
8385: --
8386: --
8387: IF l_debug_on THEN
8388: WSH_DEBUG_SV.logmsg(l_module_name,'CHECK_SMC_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8389: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CHECK_SMC_FAILED');
8390: END IF;
8391: --
8392: WHEN others THEN
8393: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8393: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8394: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_MULTIPLE_DETAIL',l_module_name);
8395: --
8396: IF l_debug_on THEN
8397: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8398: END IF;
8399: --
8400: --
8401: -- K LPN CONV. rv
8403: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
8404: THEN
8405: --{
8406: IF l_debug_on THEN
8407: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
8408: END IF;
8409:
8410: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
8411: (
8415: );
8416: --
8417: --
8418: IF l_debug_on THEN
8419: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
8420: END IF;
8421: --
8422: --
8423: --}
8427: --
8428:
8429: --
8430: IF l_debug_on THEN
8431: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8432: END IF;
8433: --
8434: END Unassign_Multiple_Details;
8435:
8459: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8460: --
8461: IF l_debug_on IS NULL
8462: THEN
8463: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8464: END IF;
8465: --
8466: IF l_debug_on THEN
8467: WSH_DEBUG_SV.push(l_module_name);
8463: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8464: END IF;
8465: --
8466: IF l_debug_on THEN
8467: WSH_DEBUG_SV.push(l_module_name);
8468: --
8469: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DELIVERY',P_FROM_DELIVERY);
8470: WSH_DEBUG_SV.log(l_module_name,'P_FROM_CONTAINER',P_FROM_CONTAINER);
8471: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
8465: --
8466: IF l_debug_on THEN
8467: WSH_DEBUG_SV.push(l_module_name);
8468: --
8469: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DELIVERY',P_FROM_DELIVERY);
8470: WSH_DEBUG_SV.log(l_module_name,'P_FROM_CONTAINER',P_FROM_CONTAINER);
8471: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
8472: END IF;
8473: --
8466: IF l_debug_on THEN
8467: WSH_DEBUG_SV.push(l_module_name);
8468: --
8469: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DELIVERY',P_FROM_DELIVERY);
8470: WSH_DEBUG_SV.log(l_module_name,'P_FROM_CONTAINER',P_FROM_CONTAINER);
8471: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
8472: END IF;
8473: --
8474: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8467: WSH_DEBUG_SV.push(l_module_name);
8468: --
8469: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DELIVERY',P_FROM_DELIVERY);
8470: WSH_DEBUG_SV.log(l_module_name,'P_FROM_CONTAINER',P_FROM_CONTAINER);
8471: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
8472: END IF;
8473: --
8474: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8475: --
8473: --
8474: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8475: --
8476: IF l_debug_on THEN
8477: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_MULTIPLE_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
8478: END IF;
8479: --
8480: UNASSIGN_MULTIPLE_DETAILS
8481: (
8487: , l_action_prms
8488: );
8489:
8490: IF l_debug_on THEN
8491: WSH_DEBUG_SV.pop(l_module_name);
8492: END IF;
8493:
8494: EXCEPTION
8495: WHEN others THEN
8496: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8497: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_MULTIPLE_DETAIL',l_module_name);
8498: --
8499: IF l_debug_on THEN
8500: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8501: END IF;
8502: --
8503: END Unassign_Multiple_Details;
8504:
8566: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8567: --
8568: IF l_debug_on IS NULL
8569: THEN
8570: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8571: END IF;
8572: --
8573: IF l_debug_on THEN
8574: WSH_DEBUG_SV.push(l_module_name);
8570: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8571: END IF;
8572: --
8573: IF l_debug_on THEN
8574: WSH_DEBUG_SV.push(l_module_name);
8575: --
8576: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
8577: WSH_DEBUG_SV.log(l_module_name,'P_CONT_INS_ID',P_CONT_INS_ID);
8578: END IF;
8572: --
8573: IF l_debug_on THEN
8574: WSH_DEBUG_SV.push(l_module_name);
8575: --
8576: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
8577: WSH_DEBUG_SV.log(l_module_name,'P_CONT_INS_ID',P_CONT_INS_ID);
8578: END IF;
8579: --
8580: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8573: IF l_debug_on THEN
8574: WSH_DEBUG_SV.push(l_module_name);
8575: --
8576: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
8577: WSH_DEBUG_SV.log(l_module_name,'P_CONT_INS_ID',P_CONT_INS_ID);
8578: END IF;
8579: --
8580: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8581: l_del_tab.delete;
8585: IF ((p_delivery_id = -9999) AND (p_cont_ins_id = -9999 )) THEN
8586: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8587: --
8588: IF l_debug_on THEN
8589: WSH_DEBUG_SV.pop(l_module_name);
8590: END IF;
8591: --
8592: return;
8593: END IF;
8599: WHERE delivery_id = p_delivery_id
8600: FOR UPDATE NOWAIT;
8601:
8602: IF l_debug_on THEN
8603: WSH_DEBUG_SV.log(l_module_name,'Locking for Delivery id ',l_delivery_id1);
8604: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.has_lines',WSH_DEBUG_SV.C_PROC_LEVEL);
8605: END IF;
8606:
8607: -- J-IB-NPARIKH-{
8600: FOR UPDATE NOWAIT;
8601:
8602: IF l_debug_on THEN
8603: WSH_DEBUG_SV.log(l_module_name,'Locking for Delivery id ',l_delivery_id1);
8604: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_VALIDATIONS.has_lines',WSH_DEBUG_SV.C_PROC_LEVEL);
8605: END IF;
8606:
8607: -- J-IB-NPARIKH-{
8608: --
8622: IF (p_delivery_id <> -9999) THEN
8623: /* assigning it to a delivery */
8624: --
8625: IF l_debug_on THEN
8626: WSH_DEBUG_SV.log(l_module_name,'Delivery id ',p_rec_of_detail_ids(i));
8627:
8628: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DETAIL_TO_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
8629: END IF;
8630: --
8624: --
8625: IF l_debug_on THEN
8626: WSH_DEBUG_SV.log(l_module_name,'Delivery id ',p_rec_of_detail_ids(i));
8627:
8628: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_DETAIL_TO_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
8629: END IF;
8630: --
8631: wsh_delivery_details_actions.assign_detail_to_delivery(
8632: p_detail_id => P_REC_OF_DETAIL_IDS(i),
8680: NULL;
8681: END LOOP;
8682:
8683: IF l_debug_on THEN
8684: WSH_DEBUG_SV.log(l_module_name,
8685: 'l_scc_unassign_from_del',
8686: l_scc_unassign_from_del);
8687: WSH_DEBUG_SV.log(l_module_name,
8688: 'l_scc_unassign_from_con',
8683: IF l_debug_on THEN
8684: WSH_DEBUG_SV.log(l_module_name,
8685: 'l_scc_unassign_from_del',
8686: l_scc_unassign_from_del);
8687: WSH_DEBUG_SV.log(l_module_name,
8688: 'l_scc_unassign_from_con',
8689: l_scc_unassign_from_con);
8690: END IF;
8691:
8692: IF (l_num_errors > 0) THEN
8693: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8694: --
8695: IF l_debug_on THEN
8696: WSH_DEBUG_SV.log(l_module_name,'Ret status is error',l_num_errors);
8697: WSH_DEBUG_SV.pop(l_module_name);
8698: END IF;
8699: --
8700: return;
8693: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8694: --
8695: IF l_debug_on THEN
8696: WSH_DEBUG_SV.log(l_module_name,'Ret status is error',l_num_errors);
8697: WSH_DEBUG_SV.pop(l_module_name);
8698: END IF;
8699: --
8700: return;
8701: ELSIF (l_num_warnings > 0) THEN
8720: END IF;
8721: IF l_del_tab.count > 0 THEN
8722: --
8723: IF l_debug_on THEN
8724: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
8725: END IF;
8726: --
8727: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
8728: p_entity_type => 'DELIVERY',
8735:
8736:
8737: --
8738: IF l_debug_on THEN
8739: WSH_DEBUG_SV.pop(l_module_name);
8740: END IF;
8741: --
8742: exception
8743: WHEN mark_reprice_error THEN
8746: wsh_util_core.add_message(x_return_status,l_module_name);
8747:
8748: --
8749: IF l_debug_on THEN
8750: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8751: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
8752: END IF;
8753: --
8754: WHEN delivery_id_locked THEN
8747:
8748: --
8749: IF l_debug_on THEN
8750: WSH_DEBUG_SV.logmsg(l_module_name,'MARK_REPRICE_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8751: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:MARK_REPRICE_ERROR');
8752: END IF;
8753: --
8754: WHEN delivery_id_locked THEN
8755: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8756: fnd_message.SET_name('WSH', 'WSH_NO_LOCK');
8757: wsh_util_core.add_message(x_return_status,l_module_name);
8758: --
8759: IF l_debug_on THEN
8760: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery Id Locked exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8761: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION : DELIVERY_ID_LOCKED');
8762: END IF;
8763: --
8764: return;
8757: wsh_util_core.add_message(x_return_status,l_module_name);
8758: --
8759: IF l_debug_on THEN
8760: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery Id Locked exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8761: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION : DELIVERY_ID_LOCKED');
8762: END IF;
8763: --
8764: return;
8765:
8764: return;
8765:
8766: --
8767: IF l_debug_on THEN
8768: WSH_DEBUG_SV.logmsg(l_module_name,'DELIVERY_ID_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8769: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DELIVERY_ID_LOCKED');
8770: END IF;
8771: --
8772: WHEN others THEN
8765:
8766: --
8767: IF l_debug_on THEN
8768: WSH_DEBUG_SV.logmsg(l_module_name,'DELIVERY_ID_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8769: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:DELIVERY_ID_LOCKED');
8770: END IF;
8771: --
8772: WHEN others THEN
8773: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8774: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.ASSIGN_MULTIPLE_DETAILS',l_module_name);
8775:
8776: --
8777: IF l_debug_on THEN
8778: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8779: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8780: END IF;
8781: --
8782: END Assign_Multiple_Details;
8775:
8776: --
8777: IF l_debug_on THEN
8778: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8779: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8780: END IF;
8781: --
8782: END Assign_Multiple_Details;
8783:
8906: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8907: --
8908: IF l_debug_on IS NULL
8909: THEN
8910: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8911: END IF;
8912: --
8913: IF l_debug_on THEN
8914: WSH_DEBUG_SV.push(l_module_name);
8910: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8911: END IF;
8912: --
8913: IF l_debug_on THEN
8914: WSH_DEBUG_SV.push(l_module_name);
8915: --
8916: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DETAIL_ID',P_FROM_DETAIL_ID);
8917: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY',P_REQ_QUANTITY);
8918: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
8912: --
8913: IF l_debug_on THEN
8914: WSH_DEBUG_SV.push(l_module_name);
8915: --
8916: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DETAIL_ID',P_FROM_DETAIL_ID);
8917: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY',P_REQ_QUANTITY);
8918: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
8919: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY2',P_REQ_QUANTITY2);
8920: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
8913: IF l_debug_on THEN
8914: WSH_DEBUG_SV.push(l_module_name);
8915: --
8916: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DETAIL_ID',P_FROM_DETAIL_ID);
8917: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY',P_REQ_QUANTITY);
8918: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
8919: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY2',P_REQ_QUANTITY2);
8920: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
8921: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
8914: WSH_DEBUG_SV.push(l_module_name);
8915: --
8916: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DETAIL_ID',P_FROM_DETAIL_ID);
8917: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY',P_REQ_QUANTITY);
8918: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
8919: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY2',P_REQ_QUANTITY2);
8920: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
8921: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
8922: END IF;
8915: --
8916: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DETAIL_ID',P_FROM_DETAIL_ID);
8917: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY',P_REQ_QUANTITY);
8918: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
8919: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY2',P_REQ_QUANTITY2);
8920: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
8921: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
8922: END IF;
8923: --
8916: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DETAIL_ID',P_FROM_DETAIL_ID);
8917: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY',P_REQ_QUANTITY);
8918: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
8919: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY2',P_REQ_QUANTITY2);
8920: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
8921: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
8922: END IF;
8923: --
8924: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8917: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY',P_REQ_QUANTITY);
8918: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
8919: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY2',P_REQ_QUANTITY2);
8920: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
8921: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
8922: END IF;
8923: --
8924: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8925:
8927: FETCH c_split_detail_info into old_delivery_detail_rec;
8928: CLOSE c_split_detail_info;
8929:
8930: IF l_debug_on THEN
8931: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',
8932: old_delivery_detail_rec.delivery_detail_id);
8933: WSH_DEBUG_SV.log(l_module_name,'picked_quantity',
8934: old_delivery_detail_rec.picked_quantity);
8935: WSH_DEBUG_SV.log(l_module_name,'organization_id',
8929:
8930: IF l_debug_on THEN
8931: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',
8932: old_delivery_detail_rec.delivery_detail_id);
8933: WSH_DEBUG_SV.log(l_module_name,'picked_quantity',
8934: old_delivery_detail_rec.picked_quantity);
8935: WSH_DEBUG_SV.log(l_module_name,'organization_id',
8936: old_delivery_detail_rec.organization_id);
8937: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',
8931: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',
8932: old_delivery_detail_rec.delivery_detail_id);
8933: WSH_DEBUG_SV.log(l_module_name,'picked_quantity',
8934: old_delivery_detail_rec.picked_quantity);
8935: WSH_DEBUG_SV.log(l_module_name,'organization_id',
8936: old_delivery_detail_rec.organization_id);
8937: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',
8938: old_delivery_detail_rec.inventory_item_id);
8939: WSH_DEBUG_SV.log(l_module_name,'requested_quantity_uom',
8933: WSH_DEBUG_SV.log(l_module_name,'picked_quantity',
8934: old_delivery_detail_rec.picked_quantity);
8935: WSH_DEBUG_SV.log(l_module_name,'organization_id',
8936: old_delivery_detail_rec.organization_id);
8937: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',
8938: old_delivery_detail_rec.inventory_item_id);
8939: WSH_DEBUG_SV.log(l_module_name,'requested_quantity_uom',
8940: old_delivery_detail_rec.requested_quantity_uom);
8941: END IF;
8935: WSH_DEBUG_SV.log(l_module_name,'organization_id',
8936: old_delivery_detail_rec.organization_id);
8937: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',
8938: old_delivery_detail_rec.inventory_item_id);
8939: WSH_DEBUG_SV.log(l_module_name,'requested_quantity_uom',
8940: old_delivery_detail_rec.requested_quantity_uom);
8941: END IF;
8942:
8943: -- Bug 2419301 : Set oe_interfaced_flag to MISS CHAR so that create_new_detail_from_old API
8985:
8986:
8987: --
8988: IF l_debug_on THEN
8989: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_DECIMAL_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
8990: END IF;
8991: --
8992: WSH_DETAILS_VALIDATIONS.check_decimal_quantity(
8993: p_item_id => old_delivery_detail_rec.inventory_item_id,
9005: END IF;
9006:
9007: --
9008: IF l_debug_on THEN
9009: WSH_DEBUG_SV.logmsg(l_module_name, 'BEFORE CALLING SPLIT_DETAIL_INT_BULK AND P_REQ_QUANTITY IS '||P_REQ_QUANTITY );
9010: WSH_DEBUG_SV.logmsg(l_module_name, 'BEFORE CALLING SPLIT_DETAIL_INT_BULK AND P_QUANTITY_TO_SPLIT2 IS '||L_QTY2 );
9011: END IF;
9012: --
9013:
9006:
9007: --
9008: IF l_debug_on THEN
9009: WSH_DEBUG_SV.logmsg(l_module_name, 'BEFORE CALLING SPLIT_DETAIL_INT_BULK AND P_REQ_QUANTITY IS '||P_REQ_QUANTITY );
9010: WSH_DEBUG_SV.logmsg(l_module_name, 'BEFORE CALLING SPLIT_DETAIL_INT_BULK AND P_QUANTITY_TO_SPLIT2 IS '||L_QTY2 );
9011: END IF;
9012: --
9013:
9014:
9058: old_delivery_detail_rec.serial_number := l_serial_orig_rec.serial_number;
9059: old_delivery_detail_rec.transaction_temp_id := l_serial_orig_rec.transaction_temp_id;
9060:
9061: IF l_debug_on THEN
9062: WSH_DEBUG_SV.log(l_module_name,'Old DD id',old_delivery_detail_rec.delivery_detail_id);
9063: WSH_DEBUG_SV.log(l_module_name,'Old serial Number',old_delivery_detail_rec.serial_number);
9064: WSH_DEBUG_SV.log(l_module_name,'Old Temp id',old_delivery_detail_rec.transaction_temp_id);
9065: WSH_DEBUG_SV.log(l_module_name,'l_transaction_id_tab.COUNT',l_transaction_id_tab.count);
9066: WSH_DEBUG_SV.log(l_module_name,'l_serial_number_tab.COUNT',l_serial_number_tab.count);
9059: old_delivery_detail_rec.transaction_temp_id := l_serial_orig_rec.transaction_temp_id;
9060:
9061: IF l_debug_on THEN
9062: WSH_DEBUG_SV.log(l_module_name,'Old DD id',old_delivery_detail_rec.delivery_detail_id);
9063: WSH_DEBUG_SV.log(l_module_name,'Old serial Number',old_delivery_detail_rec.serial_number);
9064: WSH_DEBUG_SV.log(l_module_name,'Old Temp id',old_delivery_detail_rec.transaction_temp_id);
9065: WSH_DEBUG_SV.log(l_module_name,'l_transaction_id_tab.COUNT',l_transaction_id_tab.count);
9066: WSH_DEBUG_SV.log(l_module_name,'l_serial_number_tab.COUNT',l_serial_number_tab.count);
9067: WSH_DEBUG_SV.log(l_module_name,'l_serial_tab.COUNT',l_serial_tab.count);
9060:
9061: IF l_debug_on THEN
9062: WSH_DEBUG_SV.log(l_module_name,'Old DD id',old_delivery_detail_rec.delivery_detail_id);
9063: WSH_DEBUG_SV.log(l_module_name,'Old serial Number',old_delivery_detail_rec.serial_number);
9064: WSH_DEBUG_SV.log(l_module_name,'Old Temp id',old_delivery_detail_rec.transaction_temp_id);
9065: WSH_DEBUG_SV.log(l_module_name,'l_transaction_id_tab.COUNT',l_transaction_id_tab.count);
9066: WSH_DEBUG_SV.log(l_module_name,'l_serial_number_tab.COUNT',l_serial_number_tab.count);
9067: WSH_DEBUG_SV.log(l_module_name,'l_serial_tab.COUNT',l_serial_tab.count);
9068: END IF;
9061: IF l_debug_on THEN
9062: WSH_DEBUG_SV.log(l_module_name,'Old DD id',old_delivery_detail_rec.delivery_detail_id);
9063: WSH_DEBUG_SV.log(l_module_name,'Old serial Number',old_delivery_detail_rec.serial_number);
9064: WSH_DEBUG_SV.log(l_module_name,'Old Temp id',old_delivery_detail_rec.transaction_temp_id);
9065: WSH_DEBUG_SV.log(l_module_name,'l_transaction_id_tab.COUNT',l_transaction_id_tab.count);
9066: WSH_DEBUG_SV.log(l_module_name,'l_serial_number_tab.COUNT',l_serial_number_tab.count);
9067: WSH_DEBUG_SV.log(l_module_name,'l_serial_tab.COUNT',l_serial_tab.count);
9068: END IF;
9069:
9062: WSH_DEBUG_SV.log(l_module_name,'Old DD id',old_delivery_detail_rec.delivery_detail_id);
9063: WSH_DEBUG_SV.log(l_module_name,'Old serial Number',old_delivery_detail_rec.serial_number);
9064: WSH_DEBUG_SV.log(l_module_name,'Old Temp id',old_delivery_detail_rec.transaction_temp_id);
9065: WSH_DEBUG_SV.log(l_module_name,'l_transaction_id_tab.COUNT',l_transaction_id_tab.count);
9066: WSH_DEBUG_SV.log(l_module_name,'l_serial_number_tab.COUNT',l_serial_number_tab.count);
9067: WSH_DEBUG_SV.log(l_module_name,'l_serial_tab.COUNT',l_serial_tab.count);
9068: END IF;
9069:
9070: END IF;
9063: WSH_DEBUG_SV.log(l_module_name,'Old serial Number',old_delivery_detail_rec.serial_number);
9064: WSH_DEBUG_SV.log(l_module_name,'Old Temp id',old_delivery_detail_rec.transaction_temp_id);
9065: WSH_DEBUG_SV.log(l_module_name,'l_transaction_id_tab.COUNT',l_transaction_id_tab.count);
9066: WSH_DEBUG_SV.log(l_module_name,'l_serial_number_tab.COUNT',l_serial_number_tab.count);
9067: WSH_DEBUG_SV.log(l_module_name,'l_serial_tab.COUNT',l_serial_tab.count);
9068: END IF;
9069:
9070: END IF;
9071:
9115: */
9116: l_entity_ids(1) := old_delivery_detail_rec.delivery_detail_id;
9117: --
9118: IF l_debug_on THEN
9119: WSH_DEBUG_SV.log(l_module_name,'entity id 1-',l_entity_ids(1));
9120: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
9121: END IF;
9122: --
9123: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
9116: l_entity_ids(1) := old_delivery_detail_rec.delivery_detail_id;
9117: --
9118: IF l_debug_on THEN
9119: WSH_DEBUG_SV.log(l_module_name,'entity id 1-',l_entity_ids(1));
9120: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
9121: END IF;
9122: --
9123: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
9124: p_entity_type => 'DELIVERY_DETAIL',
9131: END IF;
9132:
9133: --
9134: IF l_debug_on THEN
9135: WSH_DEBUG_SV.pop(l_module_name);
9136: END IF;
9137: --
9138: EXCEPTION
9139: WHEN chk_decimal_qty_failed THEN
9141: fnd_message.set_name('WSH', 'WSH_DET_DECIMAL_QTY_NOT_VALID');
9142: wsh_util_core.add_message(x_return_status,l_module_name);
9143: --
9144: IF l_debug_on THEN
9145: WSH_DEBUG_SV.logmsg(l_module_name,'CHK_DECIMAL_QTY_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9146: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CHK_DECIMAL_QTY_FAILED');
9147: END IF;
9148: --
9149: WHEN quantity_over THEN
9142: wsh_util_core.add_message(x_return_status,l_module_name);
9143: --
9144: IF l_debug_on THEN
9145: WSH_DEBUG_SV.logmsg(l_module_name,'CHK_DECIMAL_QTY_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9146: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CHK_DECIMAL_QTY_FAILED');
9147: END IF;
9148: --
9149: WHEN quantity_over THEN
9150: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9151: fnd_message.set_name('WSH', 'WSH_DET_SPLIT_EXCEED');
9152: wsh_util_core.add_message(x_return_status,l_module_name);
9153: --
9154: IF l_debug_on THEN
9155: WSH_DEBUG_SV.logmsg(l_module_name,'QUANTITY_OVER exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9156: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:QUANTITY_OVER');
9157: END IF;
9158: --
9159: WHEN zero_qty THEN
9152: wsh_util_core.add_message(x_return_status,l_module_name);
9153: --
9154: IF l_debug_on THEN
9155: WSH_DEBUG_SV.logmsg(l_module_name,'QUANTITY_OVER exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9156: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:QUANTITY_OVER');
9157: END IF;
9158: --
9159: WHEN zero_qty THEN
9160: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9161: fnd_message.set_name('WSH', 'WSH_NO_ZERO_NUM');
9162: wsh_util_core.add_message(x_return_status,l_module_name);
9163: --
9164: IF l_debug_on THEN
9165: WSH_DEBUG_SV.logmsg(l_module_name,'ZERO_QTY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9166: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:ZERO_QTY');
9167: END IF;
9168: --
9169: WHEN negative_qty THEN
9162: wsh_util_core.add_message(x_return_status,l_module_name);
9163: --
9164: IF l_debug_on THEN
9165: WSH_DEBUG_SV.logmsg(l_module_name,'ZERO_QTY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9166: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:ZERO_QTY');
9167: END IF;
9168: --
9169: WHEN negative_qty THEN
9170: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9171: fnd_message.set_name('WSH', 'WSH_NO_NEG_NUM');
9172: wsh_util_core.add_message(x_return_status,l_module_name);
9173: --
9174: IF l_debug_on THEN
9175: WSH_DEBUG_SV.logmsg(l_module_name,'NEGATIVE_QTY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9176: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NEGATIVE_QTY');
9177: END IF;
9178: --
9179: WHEN reprice_required_err THEN
9172: wsh_util_core.add_message(x_return_status,l_module_name);
9173: --
9174: IF l_debug_on THEN
9175: WSH_DEBUG_SV.logmsg(l_module_name,'NEGATIVE_QTY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9176: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NEGATIVE_QTY');
9177: END IF;
9178: --
9179: WHEN reprice_required_err THEN
9180: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
9181: fnd_message.set_name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
9182: wsh_util_core.add_message(x_return_status,l_module_name);
9183: --
9184: IF l_debug_on THEN
9185: WSH_DEBUG_SV.logmsg(l_module_name,'REPRICE_REQUIRED_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9186: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REPRICE_REQUIRED_ERR');
9187: END IF;
9188: --
9189: WHEN others THEN
9182: wsh_util_core.add_message(x_return_status,l_module_name);
9183: --
9184: IF l_debug_on THEN
9185: WSH_DEBUG_SV.logmsg(l_module_name,'REPRICE_REQUIRED_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9186: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REPRICE_REQUIRED_ERR');
9187: END IF;
9188: --
9189: WHEN others THEN
9190: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
9190: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
9191: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS_BULK',l_module_name);
9192: --
9193: IF l_debug_on THEN
9194: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9195: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9196: END IF;
9197: --
9198: END SPLIT_DELIVERY_DETAILS_BULK;
9191: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS_BULK',l_module_name);
9192: --
9193: IF l_debug_on THEN
9194: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9195: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9196: END IF;
9197: --
9198: END SPLIT_DELIVERY_DETAILS_BULK;
9199:
9339: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
9340: --
9341: IF l_debug_on IS NULL
9342: THEN
9343: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9344: END IF;
9345: --
9346: IF l_debug_on THEN
9347: WSH_DEBUG_SV.push(l_module_name);
9343: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
9344: END IF;
9345: --
9346: IF l_debug_on THEN
9347: WSH_DEBUG_SV.push(l_module_name);
9348: --
9349: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SOURCE_LINE_ID',P_NEW_SOURCE_LINE_ID);
9350: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT',P_QUANTITY_TO_SPLIT);
9351: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT2',P_QUANTITY_TO_SPLIT2);
9345: --
9346: IF l_debug_on THEN
9347: WSH_DEBUG_SV.push(l_module_name);
9348: --
9349: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SOURCE_LINE_ID',P_NEW_SOURCE_LINE_ID);
9350: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT',P_QUANTITY_TO_SPLIT);
9351: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT2',P_QUANTITY_TO_SPLIT2);
9352: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
9353: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
9346: IF l_debug_on THEN
9347: WSH_DEBUG_SV.push(l_module_name);
9348: --
9349: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SOURCE_LINE_ID',P_NEW_SOURCE_LINE_ID);
9350: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT',P_QUANTITY_TO_SPLIT);
9351: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT2',P_QUANTITY_TO_SPLIT2);
9352: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
9353: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
9354: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
9347: WSH_DEBUG_SV.push(l_module_name);
9348: --
9349: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SOURCE_LINE_ID',P_NEW_SOURCE_LINE_ID);
9350: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT',P_QUANTITY_TO_SPLIT);
9351: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT2',P_QUANTITY_TO_SPLIT2);
9352: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
9353: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
9354: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
9355: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SN',P_SPLIT_SN);
9348: --
9349: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SOURCE_LINE_ID',P_NEW_SOURCE_LINE_ID);
9350: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT',P_QUANTITY_TO_SPLIT);
9351: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT2',P_QUANTITY_TO_SPLIT2);
9352: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
9353: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
9354: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
9355: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SN',P_SPLIT_SN);
9356: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity',
9349: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SOURCE_LINE_ID',P_NEW_SOURCE_LINE_ID);
9350: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT',P_QUANTITY_TO_SPLIT);
9351: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT2',P_QUANTITY_TO_SPLIT2);
9352: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
9353: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
9354: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
9355: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SN',P_SPLIT_SN);
9356: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity',
9357: p_old_delivery_detail_rec.shipped_quantity);
9350: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT',P_QUANTITY_TO_SPLIT);
9351: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT2',P_QUANTITY_TO_SPLIT2);
9352: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
9353: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
9354: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
9355: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SN',P_SPLIT_SN);
9356: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity',
9357: p_old_delivery_detail_rec.shipped_quantity);
9358: WSH_DEBUG_SV.log(l_module_name,'old cycle_count_quantity',
9351: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT2',P_QUANTITY_TO_SPLIT2);
9352: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
9353: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
9354: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
9355: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SN',P_SPLIT_SN);
9356: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity',
9357: p_old_delivery_detail_rec.shipped_quantity);
9358: WSH_DEBUG_SV.log(l_module_name,'old cycle_count_quantity',
9359: p_old_delivery_detail_rec.cycle_count_quantity);
9352: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
9353: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
9354: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
9355: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SN',P_SPLIT_SN);
9356: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity',
9357: p_old_delivery_detail_rec.shipped_quantity);
9358: WSH_DEBUG_SV.log(l_module_name,'old cycle_count_quantity',
9359: p_old_delivery_detail_rec.cycle_count_quantity);
9360: WSH_DEBUG_SV.log(l_module_name,'old cycle_count_quantity2',
9354: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
9355: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SN',P_SPLIT_SN);
9356: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity',
9357: p_old_delivery_detail_rec.shipped_quantity);
9358: WSH_DEBUG_SV.log(l_module_name,'old cycle_count_quantity',
9359: p_old_delivery_detail_rec.cycle_count_quantity);
9360: WSH_DEBUG_SV.log(l_module_name,'old cycle_count_quantity2',
9361: p_old_delivery_detail_rec.cycle_count_quantity2);
9362: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity2',
9356: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity',
9357: p_old_delivery_detail_rec.shipped_quantity);
9358: WSH_DEBUG_SV.log(l_module_name,'old cycle_count_quantity',
9359: p_old_delivery_detail_rec.cycle_count_quantity);
9360: WSH_DEBUG_SV.log(l_module_name,'old cycle_count_quantity2',
9361: p_old_delivery_detail_rec.cycle_count_quantity2);
9362: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity2',
9363: p_old_delivery_detail_rec.shipped_quantity2);
9364: WSH_DEBUG_SV.log(l_module_name,'old picked_quantity',
9358: WSH_DEBUG_SV.log(l_module_name,'old cycle_count_quantity',
9359: p_old_delivery_detail_rec.cycle_count_quantity);
9360: WSH_DEBUG_SV.log(l_module_name,'old cycle_count_quantity2',
9361: p_old_delivery_detail_rec.cycle_count_quantity2);
9362: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity2',
9363: p_old_delivery_detail_rec.shipped_quantity2);
9364: WSH_DEBUG_SV.log(l_module_name,'old picked_quantity',
9365: p_old_delivery_detail_rec.picked_quantity);
9366: WSH_DEBUG_SV.log(l_module_name,'old net_weight',
9360: WSH_DEBUG_SV.log(l_module_name,'old cycle_count_quantity2',
9361: p_old_delivery_detail_rec.cycle_count_quantity2);
9362: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity2',
9363: p_old_delivery_detail_rec.shipped_quantity2);
9364: WSH_DEBUG_SV.log(l_module_name,'old picked_quantity',
9365: p_old_delivery_detail_rec.picked_quantity);
9366: WSH_DEBUG_SV.log(l_module_name,'old net_weight',
9367: p_old_delivery_detail_rec.net_weight);
9368: WSH_DEBUG_SV.log(l_module_name,'old requested_quantity',
9362: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity2',
9363: p_old_delivery_detail_rec.shipped_quantity2);
9364: WSH_DEBUG_SV.log(l_module_name,'old picked_quantity',
9365: p_old_delivery_detail_rec.picked_quantity);
9366: WSH_DEBUG_SV.log(l_module_name,'old net_weight',
9367: p_old_delivery_detail_rec.net_weight);
9368: WSH_DEBUG_SV.log(l_module_name,'old requested_quantity',
9369: p_old_delivery_detail_rec.requested_quantity);
9370: WSH_DEBUG_SV.log(l_module_name,'old inventory_item_id',
9364: WSH_DEBUG_SV.log(l_module_name,'old picked_quantity',
9365: p_old_delivery_detail_rec.picked_quantity);
9366: WSH_DEBUG_SV.log(l_module_name,'old net_weight',
9367: p_old_delivery_detail_rec.net_weight);
9368: WSH_DEBUG_SV.log(l_module_name,'old requested_quantity',
9369: p_old_delivery_detail_rec.requested_quantity);
9370: WSH_DEBUG_SV.log(l_module_name,'old inventory_item_id',
9371: p_old_delivery_detail_rec.inventory_item_id);
9372: WSH_DEBUG_SV.log(l_module_name,'old volume',
9366: WSH_DEBUG_SV.log(l_module_name,'old net_weight',
9367: p_old_delivery_detail_rec.net_weight);
9368: WSH_DEBUG_SV.log(l_module_name,'old requested_quantity',
9369: p_old_delivery_detail_rec.requested_quantity);
9370: WSH_DEBUG_SV.log(l_module_name,'old inventory_item_id',
9371: p_old_delivery_detail_rec.inventory_item_id);
9372: WSH_DEBUG_SV.log(l_module_name,'old volume',
9373: p_old_delivery_detail_rec.volume);
9374: WSH_DEBUG_SV.log(l_module_name,'old weight_uom_code',
9368: WSH_DEBUG_SV.log(l_module_name,'old requested_quantity',
9369: p_old_delivery_detail_rec.requested_quantity);
9370: WSH_DEBUG_SV.log(l_module_name,'old inventory_item_id',
9371: p_old_delivery_detail_rec.inventory_item_id);
9372: WSH_DEBUG_SV.log(l_module_name,'old volume',
9373: p_old_delivery_detail_rec.volume);
9374: WSH_DEBUG_SV.log(l_module_name,'old weight_uom_code',
9375: p_old_delivery_detail_rec.weight_uom_code);
9376: WSH_DEBUG_SV.log(l_module_name,'old volume_uom_code',
9370: WSH_DEBUG_SV.log(l_module_name,'old inventory_item_id',
9371: p_old_delivery_detail_rec.inventory_item_id);
9372: WSH_DEBUG_SV.log(l_module_name,'old volume',
9373: p_old_delivery_detail_rec.volume);
9374: WSH_DEBUG_SV.log(l_module_name,'old weight_uom_code',
9375: p_old_delivery_detail_rec.weight_uom_code);
9376: WSH_DEBUG_SV.log(l_module_name,'old volume_uom_code',
9377: p_old_delivery_detail_rec.volume_uom_code);
9378: WSH_DEBUG_SV.log(l_module_name,'old delivery_detail_id',
9372: WSH_DEBUG_SV.log(l_module_name,'old volume',
9373: p_old_delivery_detail_rec.volume);
9374: WSH_DEBUG_SV.log(l_module_name,'old weight_uom_code',
9375: p_old_delivery_detail_rec.weight_uom_code);
9376: WSH_DEBUG_SV.log(l_module_name,'old volume_uom_code',
9377: p_old_delivery_detail_rec.volume_uom_code);
9378: WSH_DEBUG_SV.log(l_module_name,'old delivery_detail_id',
9379: p_old_delivery_detail_rec.delivery_detail_id);
9380: WSH_DEBUG_SV.log(l_module_name,'old container_flag',
9374: WSH_DEBUG_SV.log(l_module_name,'old weight_uom_code',
9375: p_old_delivery_detail_rec.weight_uom_code);
9376: WSH_DEBUG_SV.log(l_module_name,'old volume_uom_code',
9377: p_old_delivery_detail_rec.volume_uom_code);
9378: WSH_DEBUG_SV.log(l_module_name,'old delivery_detail_id',
9379: p_old_delivery_detail_rec.delivery_detail_id);
9380: WSH_DEBUG_SV.log(l_module_name,'old container_flag',
9381: p_old_delivery_detail_rec.container_flag);
9382: END IF;
9376: WSH_DEBUG_SV.log(l_module_name,'old volume_uom_code',
9377: p_old_delivery_detail_rec.volume_uom_code);
9378: WSH_DEBUG_SV.log(l_module_name,'old delivery_detail_id',
9379: p_old_delivery_detail_rec.delivery_detail_id);
9380: WSH_DEBUG_SV.log(l_module_name,'old container_flag',
9381: p_old_delivery_detail_rec.container_flag);
9382: END IF;
9383: --
9384: SAVEPOINT split_savepoint;
9399: l_split_cc_qty := NULL;
9400: l_split_shipped_qty2 :=NULL;
9401: l_split_cc_qty2 := NULL;
9402: IF l_debug_on THEN
9403: WSH_DEBUG_SV.log(l_module_name,' p_old_delivery_detail_rec.shipped_quantity ',p_old_delivery_detail_rec.shipped_quantity);
9404: WSH_DEBUG_SV.log(l_module_name,' p_old_delivery_detail_rec.cycle_count_quantity ',p_old_delivery_detail_rec.cycle_count_quantity );
9405: END IF;
9406:
9407: ELSIF (p_manual_split = 'C') THEN
9400: l_split_shipped_qty2 :=NULL;
9401: l_split_cc_qty2 := NULL;
9402: IF l_debug_on THEN
9403: WSH_DEBUG_SV.log(l_module_name,' p_old_delivery_detail_rec.shipped_quantity ',p_old_delivery_detail_rec.shipped_quantity);
9404: WSH_DEBUG_SV.log(l_module_name,' p_old_delivery_detail_rec.cycle_count_quantity ',p_old_delivery_detail_rec.cycle_count_quantity );
9405: END IF;
9406:
9407: ELSIF (p_manual_split = 'C') THEN
9408:
9467: l_original_shipped_qty2 := p_old_delivery_detail_rec.shipped_quantity2 - l_split_shipped_qty2;
9468: l_original_cc_qty2 := p_old_delivery_detail_rec.cycle_count_quantity2 - l_split_cc_qty2;
9469: END IF;
9470: IF l_debug_on THEN
9471: WSH_DEBUG_SV.log(l_module_name,' l_split_cc_qty ',l_split_cc_qty);
9472: WSH_DEBUG_SV.log(l_module_name,' l_split_cc_qty2 ',l_split_cc_qty2 );
9473: END IF;
9474:
9475: --
9468: l_original_cc_qty2 := p_old_delivery_detail_rec.cycle_count_quantity2 - l_split_cc_qty2;
9469: END IF;
9470: IF l_debug_on THEN
9471: WSH_DEBUG_SV.log(l_module_name,' l_split_cc_qty ',l_split_cc_qty);
9472: WSH_DEBUG_SV.log(l_module_name,' l_split_cc_qty2 ',l_split_cc_qty2 );
9473: END IF;
9474:
9475: --
9476: /*
9474:
9475: --
9476: /*
9477: IF l_debug_on THEN
9478: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.INITIALIZE_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
9479: END IF;
9480: --
9481: WSH_DELIVERY_DETAILS_PKG.initialize_detail(
9482: p_delivery_detail_rec => l_delivery_details_info);
9494:
9495: END IF;
9496:
9497: IF l_debug_on THEN
9498: WSH_DEBUG_SV.log(l_module_name, ' l_delivery_details_info.requested_quantity2',l_delivery_details_info.requested_quantity2);
9499: END IF;
9500:
9501: --Bug 7291415. 0 to be considered as valid value. Following IF condition modified.
9502: --IF ( NVL(l_qty2, 0) = 0 OR l_qty2 < 0 ) THEN
9554: l_delivery_details_info.volume_uom_code := p_old_delivery_detail_rec.volume_uom_code;
9555:
9556: l_delivery_details_info.shipped_quantity := nvl(l_split_shipped_qty,FND_API.G_MISS_NUM);
9557: IF l_debug_on THEN
9558: WSH_DEBUG_SV.log(l_module_name,'l_split_shipped_qty2',l_split_shipped_qty2);
9559: END IF;
9560: IF ( NVL(l_split_shipped_qty2, 0) = 0 ) THEN
9561: l_delivery_details_info.shipped_quantity2 := FND_API.G_MISS_NUM;
9562: ELSE
9590: -- Bug 2419301
9591: l_delivery_details_info.oe_interfaced_flag := p_old_delivery_detail_rec.oe_interfaced_flag;
9592: --
9593: IF l_debug_on THEN
9594: WSH_DEBUG_SV.logmsg(l_module_name, 'SPLIT_DETAIL_INT_BULK: OE_INTERFACED_FLAG '||L_DELIVERY_DETAILS_INFO.OE_INTERFACED_FLAG );
9595: END IF;
9596: --
9597: l_delivery_details_info.consignee_flag := p_old_delivery_detail_rec.consignee_flag; --RTV changes
9598:
9609: l_num_of_split := p_num_of_split;
9610:
9611: --
9612: IF l_debug_on THEN
9613: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.CREATE_DD_FROM_OLD_BULK',WSH_DEBUG_SV.C_PROC_LEVEL);
9614: END IF;
9615: --
9616: -- call to new API
9617: -- with a value for p_num_of_rec
9657: IF ((l_final_req_qty = l_requested_quantity) OR (l_final_req_qty < 0)) THEN
9658: EXIT;
9659: END IF;
9660: IF l_debug_on THEN
9661: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WMS_REPLENISHMENT_PUB.UPDATE_DELIVERY_DETAIL' ,WSH_DEBUG_SV.C_PROC_LEVEL);
9662: END IF;
9663: WMS_REPLENISHMENT_PUB.UPDATE_DELIVERY_DETAIL(
9664: p_delivery_detail_id => p_old_delivery_detail_rec.delivery_detail_id,
9665: p_primary_quantity => l_final_req_qty,
9668: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9669: --{
9670: rollback to split_savepoint;
9671: IF l_debug_on THEN
9672: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR FROM WMS_REPLENISHMENT_PUB.UPDATE_DELIVERY_DETAIL');
9673: WSH_DEBUG_SV.pop(l_module_name);
9674: END IF;
9675: RETURN;
9676: --}
9669: --{
9670: rollback to split_savepoint;
9671: IF l_debug_on THEN
9672: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR FROM WMS_REPLENISHMENT_PUB.UPDATE_DELIVERY_DETAIL');
9673: WSH_DEBUG_SV.pop(l_module_name);
9674: END IF;
9675: RETURN;
9676: --}
9677: END IF;
9730: -- Update of wsh_delivery_details where requested_quantity/released_status
9731: -- are changed, call DBI API after the update.
9732: -- DBI API will check if DBI is installed
9733: IF l_debug_on THEN
9734: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail Count-',l_dd_id_tab.count);
9735: END IF;
9736: WSH_INTEGRATION.DBI_Update_Detail_Log
9737: (p_delivery_detail_id_tab => l_dd_id_tab,
9738: p_dml_type => 'UPDATE',
9738: p_dml_type => 'UPDATE',
9739: x_return_status => l_dbi_rs);
9740:
9741: IF l_debug_on THEN
9742: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
9743: END IF;
9744: -- Only Handle Unexpected error
9745: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
9746: x_return_status := l_dbi_rs;
9746: x_return_status := l_dbi_rs;
9747: rollback to split_savepoint;
9748: --
9749: IF l_debug_on THEN
9750: WSH_DEBUG_SV.pop(l_module_name);
9751: END IF;
9752: --
9753: RETURN;
9754: END IF;
9771: l_total_vol := 0;
9772: ELSE
9773: -- end bug 4416863
9774: IF l_debug_on THEN
9775: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DETAIL_WEIGHT_VOLUME',WSH_DEBUG_SV.C_PROC_LEVEL);
9776: END IF;
9777:
9778: l_total_net_wt := 0;
9779: l_total_gross_wt := 0;
9818:
9819: l_delivery_assignments_info.delivery_detail_id := l_new_delivery_detail_id;
9820: --
9821: IF l_debug_on THEN
9822: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.CREATE_DELIV_ASSIGNMENT_BULK',WSH_DEBUG_SV.C_PROC_LEVEL);
9823: END IF;
9824: --
9825:
9826: -- this is a bulk call
9895: )
9896: ) <= 0
9897: )THEN
9898: IF l_debug_on THEN
9899: WSH_DEBUG_SV.log(l_module_name, 'CANNOT SPLIT, NEED TO REVISIT THE QUANTITIES');
9900: END IF;
9901:
9902: RAISE wsh_split_error;
9903:
9940:
9941: /* call the wv util to calculate the wv for the original detail too */
9942: --
9943: IF l_debug_on THEN
9944: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.requested_quantity'
9945: ,l_delivery_details_info.requested_quantity);
9946: WSH_DEBUG_SV.log(l_module_name,'l_qty2',l_qty2);
9947: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty',
9948: l_original_shipped_qty);
9942: --
9943: IF l_debug_on THEN
9944: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.requested_quantity'
9945: ,l_delivery_details_info.requested_quantity);
9946: WSH_DEBUG_SV.log(l_module_name,'l_qty2',l_qty2);
9947: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty',
9948: l_original_shipped_qty);
9949: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty2',l_original_cc_qty2);
9950: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty',l_original_cc_qty);
9943: IF l_debug_on THEN
9944: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.requested_quantity'
9945: ,l_delivery_details_info.requested_quantity);
9946: WSH_DEBUG_SV.log(l_module_name,'l_qty2',l_qty2);
9947: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty',
9948: l_original_shipped_qty);
9949: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty2',l_original_cc_qty2);
9950: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty',l_original_cc_qty);
9951: END IF;
9945: ,l_delivery_details_info.requested_quantity);
9946: WSH_DEBUG_SV.log(l_module_name,'l_qty2',l_qty2);
9947: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty',
9948: l_original_shipped_qty);
9949: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty2',l_original_cc_qty2);
9950: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty',l_original_cc_qty);
9951: END IF;
9952: --
9953:
9946: WSH_DEBUG_SV.log(l_module_name,'l_qty2',l_qty2);
9947: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty',
9948: l_original_shipped_qty);
9949: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty2',l_original_cc_qty2);
9950: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty',l_original_cc_qty);
9951: END IF;
9952: --
9953:
9954: --
9956: -- Update of wsh_delivery_details where requested_quantity/released_status
9957: -- are changed, call DBI API after the update.
9958: -- This API will also check for DBI Installed or not
9959: IF l_debug_on THEN
9960: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail id-',p_old_delivery_detail_rec.delivery_detail_id);
9961: END IF;
9962: l_detail_tab(1) := p_old_delivery_detail_rec.delivery_detail_id;
9963: WSH_INTEGRATION.DBI_Update_Detail_Log
9964: (p_delivery_detail_id_tab => l_detail_tab,
9965: p_dml_type => 'UPDATE',
9966: x_return_status => l_dbi_rs);
9967:
9968: IF l_debug_on THEN
9969: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
9970: END IF;
9971: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
9972: x_return_status := l_dbi_rs;
9973: -- just pass this return status to caller API
9973: -- just pass this return status to caller API
9974: rollback to split_savepoint;
9975: --
9976: IF l_debug_on THEN
9977: WSH_DEBUG_SV.pop(l_module_name);
9978: END IF;
9979: --
9980: RETURN;
9981: END IF;
9986: -- J: W/V Changes
9987: -- Decrement the DD W/V from parent if p_unassign_flag is 'Y'
9988: IF (p_unassign_flag = 'Y') THEN
9989: IF l_debug_on THEN
9990: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
9991: END IF;
9992: --
9993: WSH_WV_UTILS.DD_WV_Post_Process(
9994: p_delivery_detail_id => p_old_delivery_detail_rec.delivery_detail_id,
10002: rollback to split_savepoint;
10003: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10004: WSH_UTIL_CORE.Add_Message(x_return_status);
10005: IF l_debug_on THEN
10006: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
10007: WSH_DEBUG_SV.pop(l_module_name);
10008: END IF;
10009: return;
10010: END IF;
10003: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10004: WSH_UTIL_CORE.Add_Message(x_return_status);
10005: IF l_debug_on THEN
10006: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
10007: WSH_DEBUG_SV.pop(l_module_name);
10008: END IF;
10009: return;
10010: END IF;
10011: END IF;
10011: END IF;
10012:
10013: --
10014: IF l_debug_on THEN
10015: WSH_DEBUG_SV.pop(l_module_name);
10016:
10017: END IF;
10018: --
10019:
10027: FND_MESSAGE.SET_TOKEN('DETAIL_ID', p_old_delivery_detail_rec.delivery_detail_id);
10028: wsh_util_core.add_message(x_return_status,l_module_name);
10029: --
10030: IF l_debug_on THEN
10031: WSH_DEBUG_SV.logmsg(l_module_name,'OLD_DET_WT_VOL_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10032: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OLD_DET_WT_VOL_FAILED');
10033: END IF;
10034: --
10035: WHEN new_det_wt_vol_failed THEN
10028: wsh_util_core.add_message(x_return_status,l_module_name);
10029: --
10030: IF l_debug_on THEN
10031: WSH_DEBUG_SV.logmsg(l_module_name,'OLD_DET_WT_VOL_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10032: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OLD_DET_WT_VOL_FAILED');
10033: END IF;
10034: --
10035: WHEN new_det_wt_vol_failed THEN
10036: rollback to split_savepoint;
10039: FND_MESSAGE.SET_TOKEN('DETAIL_ID', l_new_DELIVERY_DETAIL_ID);
10040: wsh_util_core.add_message(x_return_status,l_module_name);
10041: --
10042: IF l_debug_on THEN
10043: WSH_DEBUG_SV.logmsg(l_module_name,'NEW_DET_WT_VOL_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10044: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NEW_DET_WT_VOL_FAILED');
10045: END IF;
10046: --
10047: WHEN WSH_SPLIT_ERROR THEN
10040: wsh_util_core.add_message(x_return_status,l_module_name);
10041: --
10042: IF l_debug_on THEN
10043: WSH_DEBUG_SV.logmsg(l_module_name,'NEW_DET_WT_VOL_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10044: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NEW_DET_WT_VOL_FAILED');
10045: END IF;
10046: --
10047: WHEN WSH_SPLIT_ERROR THEN
10048: rollback to split_savepoint;
10051: fnd_message.set_token('DETAIL_ID', p_old_delivery_detail_rec.delivery_detail_id);
10052: wsh_util_core.add_message(x_return_status,l_module_name);
10053: --
10054: IF l_debug_on THEN
10055: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_SPLIT_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10056: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_SPLIT_ERROR');
10057: END IF;
10058: WHEN WSH_SN_SPLIT_ERR THEN
10059: rollback to split_savepoint;
10052: wsh_util_core.add_message(x_return_status,l_module_name);
10053: --
10054: IF l_debug_on THEN
10055: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_SPLIT_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10056: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_SPLIT_ERROR');
10057: END IF;
10058: WHEN WSH_SN_SPLIT_ERR THEN
10059: rollback to split_savepoint;
10060: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10061: fnd_message.set_name('WSH', 'WSH_SN_SPLIT_ERR');
10062: wsh_util_core.add_message(x_return_status,l_module_name);
10063: --
10064: IF l_debug_on THEN
10065: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_SN_SPLIT_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10066: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_SN_SPLIT_ERR');
10067: END IF;
10068:
10069: WHEN WSH_NO_DATA_FOUND THEN
10062: wsh_util_core.add_message(x_return_status,l_module_name);
10063: --
10064: IF l_debug_on THEN
10065: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_SN_SPLIT_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10066: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_SN_SPLIT_ERR');
10067: END IF;
10068:
10069: WHEN WSH_NO_DATA_FOUND THEN
10070: IF c_get_req_pick_qty%ISOPEN THEN
10073: rollback to split_savepoint;
10074: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10075: fnd_message.set_name('WSH', 'WSH_NO_DATA_FOUND');
10076: IF l_debug_on THEN
10077: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10078: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_NO_DATA_FOUND');
10079: END IF;
10080: --
10081: WHEN others THEN
10074: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10075: fnd_message.set_name('WSH', 'WSH_NO_DATA_FOUND');
10076: IF l_debug_on THEN
10077: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10078: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_NO_DATA_FOUND');
10079: END IF;
10080: --
10081: WHEN others THEN
10082: IF c_get_req_pick_qty%ISOPEN THEN
10086: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10087: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DETAIL_INT_BULK',l_module_name);
10088: --
10089: IF l_debug_on THEN
10090: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10091: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10092: END IF;
10093: --
10094: END SPLIT_DETAIL_INT_BULK;
10087: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DETAIL_INT_BULK',l_module_name);
10088: --
10089: IF l_debug_on THEN
10090: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10091: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10092: END IF;
10093: --
10094: END SPLIT_DETAIL_INT_BULK;
10095:
10196: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10197: --
10198: IF l_debug_on IS NULL
10199: THEN
10200: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10201: END IF;
10202: --
10203: IF l_debug_on THEN
10204: WSH_DEBUG_SV.push(l_module_name);
10200: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10201: END IF;
10202: --
10203: IF l_debug_on THEN
10204: WSH_DEBUG_SV.push(l_module_name);
10205: --
10206: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DETAIL_ID',P_FROM_DETAIL_ID);
10207: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY',P_REQ_QUANTITY);
10208: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
10202: --
10203: IF l_debug_on THEN
10204: WSH_DEBUG_SV.push(l_module_name);
10205: --
10206: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DETAIL_ID',P_FROM_DETAIL_ID);
10207: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY',P_REQ_QUANTITY);
10208: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
10209: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY2',P_REQ_QUANTITY2);
10210: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
10203: IF l_debug_on THEN
10204: WSH_DEBUG_SV.push(l_module_name);
10205: --
10206: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DETAIL_ID',P_FROM_DETAIL_ID);
10207: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY',P_REQ_QUANTITY);
10208: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
10209: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY2',P_REQ_QUANTITY2);
10210: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
10211: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
10204: WSH_DEBUG_SV.push(l_module_name);
10205: --
10206: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DETAIL_ID',P_FROM_DETAIL_ID);
10207: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY',P_REQ_QUANTITY);
10208: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
10209: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY2',P_REQ_QUANTITY2);
10210: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
10211: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
10212: END IF;
10205: --
10206: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DETAIL_ID',P_FROM_DETAIL_ID);
10207: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY',P_REQ_QUANTITY);
10208: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
10209: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY2',P_REQ_QUANTITY2);
10210: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
10211: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
10212: END IF;
10213: --
10206: WSH_DEBUG_SV.log(l_module_name,'P_FROM_DETAIL_ID',P_FROM_DETAIL_ID);
10207: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY',P_REQ_QUANTITY);
10208: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
10209: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY2',P_REQ_QUANTITY2);
10210: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
10211: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
10212: END IF;
10213: --
10214: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10207: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY',P_REQ_QUANTITY);
10208: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
10209: WSH_DEBUG_SV.log(l_module_name,'P_REQ_QUANTITY2',P_REQ_QUANTITY2);
10210: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
10211: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
10212: END IF;
10213: --
10214: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10215:
10292: quantity => l_qty2,
10293: item_id => old_delivery_detail_rec.inventory_item_id,
10294: org_id => old_delivery_detail_rec.organization_id);
10295: IF l_debug_on THEN
10296: WSH_DEBUG_SV.logmsg(l_module_name,'new l_qty '||l_qty);
10297: END IF;
10298: END IF;
10299:
10300: /* need to validate the quantity passed meets the decimal quantity
10313:
10314: l_qty2 := old_delivery_detail_rec.picked_quantity2 * (p_req_quantity/old_delivery_detail_rec.picked_quantity);
10315: l_qty2 := round(l_qty2,5);
10316: IF l_debug_on THEN
10317: wsh_debug_sv.log(l_module_name,' l_qty2 ',l_qty2);
10318: END IF;
10319: ELSE
10320:
10321: l_qty2 := p_req_quantity2 ;
10324: END IF;
10325:
10326: --
10327: IF l_debug_on THEN
10328: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_DECIMAL_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
10329: END IF;
10330: --
10331: WSH_DETAILS_VALIDATIONS.check_decimal_quantity(
10332: p_item_id => old_delivery_detail_rec.inventory_item_id,
10344: END IF;
10345:
10346: -- muom
10347: IF l_debug_on THEN
10348: WSH_DEBUG_SV.logmsg(l_module_name, 'BEFORE CALLING SPLIT_DETAIL_INT, l_qty IS '||l_qty||' l_qty2 is '||l_qty2);
10349: END IF;
10350:
10351: -- HW OPMCONV - Removed l_process_flag parameter
10352: Split_Detail_INT(
10380: -- new quantity (p_primary_quantity).
10381: IF ( old_delivery_detail_rec.replenishment_status = 'R' and old_delivery_detail_rec.released_status in ('R','B')) THEN
10382: --{
10383: IF l_debug_on THEN
10384: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WMS_REPLENISHMENT_PUB.UPDATE_DELIVERY_DETAIL' ,WSH_DEBUG_SV.C_PROC_LEVEL);
10385: END IF;
10386: WMS_REPLENISHMENT_PUB.UPDATE_DELIVERY_DETAIL(
10387: p_delivery_detail_id => old_delivery_detail_rec.delivery_detail_id,
10388: -- muom
10391: x_return_status => x_return_status);
10392: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10393: --{
10394: IF l_debug_on THEN
10395: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR FROM WMS_REPLENISHMENT_PUB.UPDATE_DELIVERY_DETAIL');
10396: WSH_DEBUG_SV.pop(l_module_name);
10397: END IF;
10398: RETURN;
10399: --}
10392: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10393: --{
10394: IF l_debug_on THEN
10395: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR FROM WMS_REPLENISHMENT_PUB.UPDATE_DELIVERY_DETAIL');
10396: WSH_DEBUG_SV.pop(l_module_name);
10397: END IF;
10398: RETURN;
10399: --}
10400: END IF;
10407: */
10408: l_entity_ids(1) := old_delivery_detail_rec.delivery_detail_id;
10409: --
10410: IF l_debug_on THEN
10411: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
10412: END IF;
10413: --
10414: WSH_DELIVERY_LEGS_ACTIONS.Mark_Reprice_Required(
10415: p_entity_type => 'DELIVERY_DETAIL',
10420: END IF;
10421:
10422: --
10423: IF l_debug_on THEN
10424: WSH_DEBUG_SV.pop(l_module_name);
10425: END IF;
10426: --
10427: EXCEPTION
10428: WHEN chk_decimal_qty_failed THEN
10430: fnd_message.set_name('WSH', 'WSH_DET_DECIMAL_QTY_NOT_VALID');
10431: wsh_util_core.add_message(x_return_status,l_module_name);
10432: --
10433: IF l_debug_on THEN
10434: WSH_DEBUG_SV.logmsg(l_module_name,'CHK_DECIMAL_QTY_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10435: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CHK_DECIMAL_QTY_FAILED');
10436: END IF;
10437: --
10438: WHEN quantity_over THEN
10431: wsh_util_core.add_message(x_return_status,l_module_name);
10432: --
10433: IF l_debug_on THEN
10434: WSH_DEBUG_SV.logmsg(l_module_name,'CHK_DECIMAL_QTY_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10435: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CHK_DECIMAL_QTY_FAILED');
10436: END IF;
10437: --
10438: WHEN quantity_over THEN
10439: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10440: fnd_message.set_name('WSH', 'WSH_DET_SPLIT_EXCEED');
10441: wsh_util_core.add_message(x_return_status,l_module_name);
10442: --
10443: IF l_debug_on THEN
10444: WSH_DEBUG_SV.logmsg(l_module_name,'QUANTITY_OVER exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10445: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:QUANTITY_OVER');
10446: END IF;
10447: --
10448: WHEN zero_qty THEN
10441: wsh_util_core.add_message(x_return_status,l_module_name);
10442: --
10443: IF l_debug_on THEN
10444: WSH_DEBUG_SV.logmsg(l_module_name,'QUANTITY_OVER exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10445: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:QUANTITY_OVER');
10446: END IF;
10447: --
10448: WHEN zero_qty THEN
10449: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10450: fnd_message.set_name('WSH', 'WSH_NO_ZERO_NUM');
10451: wsh_util_core.add_message(x_return_status,l_module_name);
10452: --
10453: IF l_debug_on THEN
10454: WSH_DEBUG_SV.logmsg(l_module_name,'ZERO_QTY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10455: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:ZERO_QTY');
10456: END IF;
10457: --
10458: WHEN negative_qty THEN
10451: wsh_util_core.add_message(x_return_status,l_module_name);
10452: --
10453: IF l_debug_on THEN
10454: WSH_DEBUG_SV.logmsg(l_module_name,'ZERO_QTY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10455: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:ZERO_QTY');
10456: END IF;
10457: --
10458: WHEN negative_qty THEN
10459: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10460: fnd_message.set_name('WSH', 'WSH_NO_NEG_NUM');
10461: wsh_util_core.add_message(x_return_status,l_module_name);
10462: --
10463: IF l_debug_on THEN
10464: WSH_DEBUG_SV.logmsg(l_module_name,'NEGATIVE_QTY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10465: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NEGATIVE_QTY');
10466: END IF;
10467: --
10468: WHEN reprice_required_err THEN
10461: wsh_util_core.add_message(x_return_status,l_module_name);
10462: --
10463: IF l_debug_on THEN
10464: WSH_DEBUG_SV.logmsg(l_module_name,'NEGATIVE_QTY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10465: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NEGATIVE_QTY');
10466: END IF;
10467: --
10468: WHEN reprice_required_err THEN
10469: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
10470: fnd_message.set_name('WSH', 'WSH_REPRICE_REQUIRED_ERR');
10471: wsh_util_core.add_message(x_return_status,l_module_name);
10472: --
10473: IF l_debug_on THEN
10474: WSH_DEBUG_SV.logmsg(l_module_name,'REPRICE_REQUIRED_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10475: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REPRICE_REQUIRED_ERR');
10476: END IF;
10477: --
10478: WHEN others THEN
10471: wsh_util_core.add_message(x_return_status,l_module_name);
10472: --
10473: IF l_debug_on THEN
10474: WSH_DEBUG_SV.logmsg(l_module_name,'REPRICE_REQUIRED_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
10475: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REPRICE_REQUIRED_ERR');
10476: END IF;
10477: --
10478: WHEN others THEN
10479: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10479: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
10480: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS',l_module_name);
10481: --
10482: IF l_debug_on THEN
10483: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10484: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10485: END IF;
10486: --
10487: END SPLIT_DELIVERY_DETAILS;
10480: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS',l_module_name);
10481: --
10482: IF l_debug_on THEN
10483: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
10484: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
10485: END IF;
10486: --
10487: END SPLIT_DELIVERY_DETAILS;
10488: PROCEDURE Split_Detail_INT(
10657: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
10658: --
10659: IF l_debug_on IS NULL
10660: THEN
10661: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10662: END IF;
10663: --
10664: IF l_debug_on THEN
10665: WSH_DEBUG_SV.push(l_module_name);
10661: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
10662: END IF;
10663: --
10664: IF l_debug_on THEN
10665: WSH_DEBUG_SV.push(l_module_name);
10666: --
10667: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SOURCE_LINE_ID',P_NEW_SOURCE_LINE_ID);
10668: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT',P_QUANTITY_TO_SPLIT);
10669: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT2',P_QUANTITY_TO_SPLIT2);
10663: --
10664: IF l_debug_on THEN
10665: WSH_DEBUG_SV.push(l_module_name);
10666: --
10667: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SOURCE_LINE_ID',P_NEW_SOURCE_LINE_ID);
10668: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT',P_QUANTITY_TO_SPLIT);
10669: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT2',P_QUANTITY_TO_SPLIT2);
10670: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
10671: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
10664: IF l_debug_on THEN
10665: WSH_DEBUG_SV.push(l_module_name);
10666: --
10667: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SOURCE_LINE_ID',P_NEW_SOURCE_LINE_ID);
10668: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT',P_QUANTITY_TO_SPLIT);
10669: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT2',P_QUANTITY_TO_SPLIT2);
10670: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
10671: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
10672: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
10665: WSH_DEBUG_SV.push(l_module_name);
10666: --
10667: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SOURCE_LINE_ID',P_NEW_SOURCE_LINE_ID);
10668: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT',P_QUANTITY_TO_SPLIT);
10669: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT2',P_QUANTITY_TO_SPLIT2);
10670: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
10671: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
10672: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
10673: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SN',P_SPLIT_SN);
10666: --
10667: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SOURCE_LINE_ID',P_NEW_SOURCE_LINE_ID);
10668: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT',P_QUANTITY_TO_SPLIT);
10669: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT2',P_QUANTITY_TO_SPLIT2);
10670: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
10671: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
10672: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
10673: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SN',P_SPLIT_SN);
10674: -- muom
10667: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SOURCE_LINE_ID',P_NEW_SOURCE_LINE_ID);
10668: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT',P_QUANTITY_TO_SPLIT);
10669: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT2',P_QUANTITY_TO_SPLIT2);
10670: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
10671: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
10672: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
10673: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SN',P_SPLIT_SN);
10674: -- muom
10675: WSH_DEBUG_SV.log(l_module_name,'P_FULFILLMENT_BASE',P_FULFILLMENT_BASE);
10668: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT',P_QUANTITY_TO_SPLIT);
10669: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT2',P_QUANTITY_TO_SPLIT2);
10670: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
10671: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
10672: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
10673: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SN',P_SPLIT_SN);
10674: -- muom
10675: WSH_DEBUG_SV.log(l_module_name,'P_FULFILLMENT_BASE',P_FULFILLMENT_BASE);
10676: END IF;
10669: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_SPLIT2',P_QUANTITY_TO_SPLIT2);
10670: WSH_DEBUG_SV.log(l_module_name,'P_UNASSIGN_FLAG',P_UNASSIGN_FLAG);
10671: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
10672: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
10673: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SN',P_SPLIT_SN);
10674: -- muom
10675: WSH_DEBUG_SV.log(l_module_name,'P_FULFILLMENT_BASE',P_FULFILLMENT_BASE);
10676: END IF;
10677: --
10671: WSH_DEBUG_SV.log(l_module_name,'P_CONVERTED_FLAG',P_CONVERTED_FLAG);
10672: WSH_DEBUG_SV.log(l_module_name,'P_MANUAL_SPLIT',P_MANUAL_SPLIT);
10673: WSH_DEBUG_SV.log(l_module_name,'P_SPLIT_SN',P_SPLIT_SN);
10674: -- muom
10675: WSH_DEBUG_SV.log(l_module_name,'P_FULFILLMENT_BASE',P_FULFILLMENT_BASE);
10676: END IF;
10677: --
10678: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
10679:
10701: l_split_cc_qty := NULL;
10702: l_split_shipped_qty2 :=NULL;
10703: l_split_cc_qty2 := NULL;
10704: IF l_debug_on THEN
10705: WSH_DEBUG_SV.log(l_module_name,' p_old_delivery_detail_rec.shipped_quantity ',p_old_delivery_detail_rec.shipped_quantity);
10706: WSH_DEBUG_SV.log(l_module_name,' p_old_delivery_detail_rec.cycle_count_quantity ',p_old_delivery_detail_rec.cycle_count_quantity );
10707: END IF;
10708: ELSIF (p_manual_split = 'C') THEN
10709:
10702: l_split_shipped_qty2 :=NULL;
10703: l_split_cc_qty2 := NULL;
10704: IF l_debug_on THEN
10705: WSH_DEBUG_SV.log(l_module_name,' p_old_delivery_detail_rec.shipped_quantity ',p_old_delivery_detail_rec.shipped_quantity);
10706: WSH_DEBUG_SV.log(l_module_name,' p_old_delivery_detail_rec.cycle_count_quantity ',p_old_delivery_detail_rec.cycle_count_quantity );
10707: END IF;
10708: ELSIF (p_manual_split = 'C') THEN
10709:
10710: l_split_shipped_qty := LEAST(p_old_delivery_detail_rec.shipped_quantity,
10747: l_original_shipped_qty2 := p_old_delivery_detail_rec.shipped_quantity2;
10748:
10749: l_original_cc_qty2 := p_old_delivery_detail_rec.cycle_count_quantity2;
10750: IF l_debug_on THEN
10751: WSH_DEBUG_SV.log(l_module_name,' l_split_cc_qty ',l_split_cc_qty);
10752: WSH_DEBUG_SV.log(l_module_name,' l_split_cc_qty2 ',l_split_cc_qty2 );
10753: END IF;
10754:
10755: ELSE
10748:
10749: l_original_cc_qty2 := p_old_delivery_detail_rec.cycle_count_quantity2;
10750: IF l_debug_on THEN
10751: WSH_DEBUG_SV.log(l_module_name,' l_split_cc_qty ',l_split_cc_qty);
10752: WSH_DEBUG_SV.log(l_module_name,' l_split_cc_qty2 ',l_split_cc_qty2 );
10753: END IF;
10754:
10755: ELSE
10756: -- use cc qty to split p_quantity_to_split before we use shipped qty to complete the quantity split
10792: quantity => l_delivery_details_info.requested_quantity2,
10793: item_id => p_old_delivery_detail_rec.inventory_item_id,
10794: org_id => p_old_delivery_detail_rec.organization_id);
10795: IF l_debug_on THEN
10796: WSH_DEBUG_SV.logmsg(l_module_name,'*** new l_delivery_details_info.requested_quantity '||l_delivery_details_info.requested_quantity);
10797: END IF;
10798: END IF;
10799: l_delivery_details_info.picked_quantity2 := nvl(l_qty2,FND_API.G_MISS_NUM);
10800:
10801: -- Bug 16722851
10802: IF p_source_code = 'OE' THEN --Added for bug 16833534
10803: IF p_fulfillment_base = 'P' and nvl(l_delivery_details_info.picked_quantity2,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
10804: IF l_debug_on THEN
10805: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity',p_old_delivery_detail_rec.picked_quantity);
10806: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.shipped_quantity',p_old_delivery_detail_rec.shipped_quantity);
10807: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity2',p_old_delivery_detail_rec.picked_quantity2);
10808: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.shipped_quantity2',p_old_delivery_detail_rec.shipped_quantity2);
10809: END IF;
10802: IF p_source_code = 'OE' THEN --Added for bug 16833534
10803: IF p_fulfillment_base = 'P' and nvl(l_delivery_details_info.picked_quantity2,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
10804: IF l_debug_on THEN
10805: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity',p_old_delivery_detail_rec.picked_quantity);
10806: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.shipped_quantity',p_old_delivery_detail_rec.shipped_quantity);
10807: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity2',p_old_delivery_detail_rec.picked_quantity2);
10808: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.shipped_quantity2',p_old_delivery_detail_rec.shipped_quantity2);
10809: END IF;
10810:
10803: IF p_fulfillment_base = 'P' and nvl(l_delivery_details_info.picked_quantity2,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
10804: IF l_debug_on THEN
10805: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity',p_old_delivery_detail_rec.picked_quantity);
10806: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.shipped_quantity',p_old_delivery_detail_rec.shipped_quantity);
10807: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity2',p_old_delivery_detail_rec.picked_quantity2);
10808: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.shipped_quantity2',p_old_delivery_detail_rec.shipped_quantity2);
10809: END IF;
10810:
10811: -- Bug 16722851: Prorate the Secondary Picked/Shipped/Backordered quantities based on primary quantities
10804: IF l_debug_on THEN
10805: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity',p_old_delivery_detail_rec.picked_quantity);
10806: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.shipped_quantity',p_old_delivery_detail_rec.shipped_quantity);
10807: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity2',p_old_delivery_detail_rec.picked_quantity2);
10808: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.shipped_quantity2',p_old_delivery_detail_rec.shipped_quantity2);
10809: END IF;
10810:
10811: -- Bug 16722851: Prorate the Secondary Picked/Shipped/Backordered quantities based on primary quantities
10812: l_delivery_details_info.picked_quantity2 := (p_old_delivery_detail_rec.picked_quantity2 * l_delivery_details_info.picked_quantity) / p_old_delivery_detail_rec.picked_quantity;
10826: l_original_cc_qty2 := p_old_delivery_detail_rec.cycle_count_quantity2 - l_split_cc_qty2;
10827: x_rsv_to_split2 := l_delivery_details_info.picked_quantity2;
10828:
10829: IF l_debug_on THEN
10830: WSH_DEBUG_SV.log(l_module_name, 'New l_split_shipped_qty2',l_split_shipped_qty2);
10831: WSH_DEBUG_SV.log(l_module_name, 'New l_split_cc_qty2',l_split_cc_qty2);
10832: WSH_DEBUG_SV.log(l_module_name, 'New l_original_shipped_qty2',l_original_shipped_qty2);
10833: WSH_DEBUG_SV.log(l_module_name, 'New l_original_cc_qty2',l_original_cc_qty2);
10834: WSH_DEBUG_SV.log(l_module_name, 'x_rsv_to_split2',x_rsv_to_split2);
10827: x_rsv_to_split2 := l_delivery_details_info.picked_quantity2;
10828:
10829: IF l_debug_on THEN
10830: WSH_DEBUG_SV.log(l_module_name, 'New l_split_shipped_qty2',l_split_shipped_qty2);
10831: WSH_DEBUG_SV.log(l_module_name, 'New l_split_cc_qty2',l_split_cc_qty2);
10832: WSH_DEBUG_SV.log(l_module_name, 'New l_original_shipped_qty2',l_original_shipped_qty2);
10833: WSH_DEBUG_SV.log(l_module_name, 'New l_original_cc_qty2',l_original_cc_qty2);
10834: WSH_DEBUG_SV.log(l_module_name, 'x_rsv_to_split2',x_rsv_to_split2);
10835: END IF;
10828:
10829: IF l_debug_on THEN
10830: WSH_DEBUG_SV.log(l_module_name, 'New l_split_shipped_qty2',l_split_shipped_qty2);
10831: WSH_DEBUG_SV.log(l_module_name, 'New l_split_cc_qty2',l_split_cc_qty2);
10832: WSH_DEBUG_SV.log(l_module_name, 'New l_original_shipped_qty2',l_original_shipped_qty2);
10833: WSH_DEBUG_SV.log(l_module_name, 'New l_original_cc_qty2',l_original_cc_qty2);
10834: WSH_DEBUG_SV.log(l_module_name, 'x_rsv_to_split2',x_rsv_to_split2);
10835: END IF;
10836: ELSIF p_fulfillment_base = 'S' and l_delivery_details_info.picked_quantity > 0 THEN
10829: IF l_debug_on THEN
10830: WSH_DEBUG_SV.log(l_module_name, 'New l_split_shipped_qty2',l_split_shipped_qty2);
10831: WSH_DEBUG_SV.log(l_module_name, 'New l_split_cc_qty2',l_split_cc_qty2);
10832: WSH_DEBUG_SV.log(l_module_name, 'New l_original_shipped_qty2',l_original_shipped_qty2);
10833: WSH_DEBUG_SV.log(l_module_name, 'New l_original_cc_qty2',l_original_cc_qty2);
10834: WSH_DEBUG_SV.log(l_module_name, 'x_rsv_to_split2',x_rsv_to_split2);
10835: END IF;
10836: ELSIF p_fulfillment_base = 'S' and l_delivery_details_info.picked_quantity > 0 THEN
10837: IF l_debug_on THEN
10830: WSH_DEBUG_SV.log(l_module_name, 'New l_split_shipped_qty2',l_split_shipped_qty2);
10831: WSH_DEBUG_SV.log(l_module_name, 'New l_split_cc_qty2',l_split_cc_qty2);
10832: WSH_DEBUG_SV.log(l_module_name, 'New l_original_shipped_qty2',l_original_shipped_qty2);
10833: WSH_DEBUG_SV.log(l_module_name, 'New l_original_cc_qty2',l_original_cc_qty2);
10834: WSH_DEBUG_SV.log(l_module_name, 'x_rsv_to_split2',x_rsv_to_split2);
10835: END IF;
10836: ELSIF p_fulfillment_base = 'S' and l_delivery_details_info.picked_quantity > 0 THEN
10837: IF l_debug_on THEN
10838: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity',p_old_delivery_detail_rec.picked_quantity);
10834: WSH_DEBUG_SV.log(l_module_name, 'x_rsv_to_split2',x_rsv_to_split2);
10835: END IF;
10836: ELSIF p_fulfillment_base = 'S' and l_delivery_details_info.picked_quantity > 0 THEN
10837: IF l_debug_on THEN
10838: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity',p_old_delivery_detail_rec.picked_quantity);
10839: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.shipped_quantity',p_old_delivery_detail_rec.shipped_quantity);
10840: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity2',p_old_delivery_detail_rec.picked_quantity2);
10841: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.shipped_quantity2',p_old_delivery_detail_rec.shipped_quantity2);
10842: END IF;
10835: END IF;
10836: ELSIF p_fulfillment_base = 'S' and l_delivery_details_info.picked_quantity > 0 THEN
10837: IF l_debug_on THEN
10838: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity',p_old_delivery_detail_rec.picked_quantity);
10839: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.shipped_quantity',p_old_delivery_detail_rec.shipped_quantity);
10840: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity2',p_old_delivery_detail_rec.picked_quantity2);
10841: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.shipped_quantity2',p_old_delivery_detail_rec.shipped_quantity2);
10842: END IF;
10843:
10836: ELSIF p_fulfillment_base = 'S' and l_delivery_details_info.picked_quantity > 0 THEN
10837: IF l_debug_on THEN
10838: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity',p_old_delivery_detail_rec.picked_quantity);
10839: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.shipped_quantity',p_old_delivery_detail_rec.shipped_quantity);
10840: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity2',p_old_delivery_detail_rec.picked_quantity2);
10841: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.shipped_quantity2',p_old_delivery_detail_rec.shipped_quantity2);
10842: END IF;
10843:
10844: -- Bug 16722851: Prorate the Primary Picked/Shipped/Backordered quantities based on secondary quantities
10837: IF l_debug_on THEN
10838: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity',p_old_delivery_detail_rec.picked_quantity);
10839: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.shipped_quantity',p_old_delivery_detail_rec.shipped_quantity);
10840: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.picked_quantity2',p_old_delivery_detail_rec.picked_quantity2);
10841: WSH_DEBUG_SV.log(l_module_name, '*** p_old_delivery_detail_rec.shipped_quantity2',p_old_delivery_detail_rec.shipped_quantity2);
10842: END IF;
10843:
10844: -- Bug 16722851: Prorate the Primary Picked/Shipped/Backordered quantities based on secondary quantities
10845: l_delivery_details_info.picked_quantity := (p_old_delivery_detail_rec.picked_quantity * l_delivery_details_info.picked_quantity2) / p_old_delivery_detail_rec.picked_quantity2;
10859: l_original_cc_qty := p_old_delivery_detail_rec.cycle_count_quantity - l_split_cc_qty;
10860: x_rsv_to_split := l_delivery_details_info.picked_quantity;
10861:
10862: IF l_debug_on THEN
10863: WSH_DEBUG_SV.log(l_module_name, 'New l_split_shipped_qty',l_split_shipped_qty);
10864: WSH_DEBUG_SV.log(l_module_name, 'New l_split_cc_qty',l_split_cc_qty);
10865: WSH_DEBUG_SV.log(l_module_name, 'New l_original_shipped_qty',l_original_shipped_qty);
10866: WSH_DEBUG_SV.log(l_module_name, 'New l_original_cc_qty',l_original_cc_qty);
10867: WSH_DEBUG_SV.log(l_module_name, 'x_rsv_to_split',x_rsv_to_split);
10860: x_rsv_to_split := l_delivery_details_info.picked_quantity;
10861:
10862: IF l_debug_on THEN
10863: WSH_DEBUG_SV.log(l_module_name, 'New l_split_shipped_qty',l_split_shipped_qty);
10864: WSH_DEBUG_SV.log(l_module_name, 'New l_split_cc_qty',l_split_cc_qty);
10865: WSH_DEBUG_SV.log(l_module_name, 'New l_original_shipped_qty',l_original_shipped_qty);
10866: WSH_DEBUG_SV.log(l_module_name, 'New l_original_cc_qty',l_original_cc_qty);
10867: WSH_DEBUG_SV.log(l_module_name, 'x_rsv_to_split',x_rsv_to_split);
10868: END IF;
10861:
10862: IF l_debug_on THEN
10863: WSH_DEBUG_SV.log(l_module_name, 'New l_split_shipped_qty',l_split_shipped_qty);
10864: WSH_DEBUG_SV.log(l_module_name, 'New l_split_cc_qty',l_split_cc_qty);
10865: WSH_DEBUG_SV.log(l_module_name, 'New l_original_shipped_qty',l_original_shipped_qty);
10866: WSH_DEBUG_SV.log(l_module_name, 'New l_original_cc_qty',l_original_cc_qty);
10867: WSH_DEBUG_SV.log(l_module_name, 'x_rsv_to_split',x_rsv_to_split);
10868: END IF;
10869: END IF;
10862: IF l_debug_on THEN
10863: WSH_DEBUG_SV.log(l_module_name, 'New l_split_shipped_qty',l_split_shipped_qty);
10864: WSH_DEBUG_SV.log(l_module_name, 'New l_split_cc_qty',l_split_cc_qty);
10865: WSH_DEBUG_SV.log(l_module_name, 'New l_original_shipped_qty',l_original_shipped_qty);
10866: WSH_DEBUG_SV.log(l_module_name, 'New l_original_cc_qty',l_original_cc_qty);
10867: WSH_DEBUG_SV.log(l_module_name, 'x_rsv_to_split',x_rsv_to_split);
10868: END IF;
10869: END IF;
10870: END IF;
10863: WSH_DEBUG_SV.log(l_module_name, 'New l_split_shipped_qty',l_split_shipped_qty);
10864: WSH_DEBUG_SV.log(l_module_name, 'New l_split_cc_qty',l_split_cc_qty);
10865: WSH_DEBUG_SV.log(l_module_name, 'New l_original_shipped_qty',l_original_shipped_qty);
10866: WSH_DEBUG_SV.log(l_module_name, 'New l_original_cc_qty',l_original_cc_qty);
10867: WSH_DEBUG_SV.log(l_module_name, 'x_rsv_to_split',x_rsv_to_split);
10868: END IF;
10869: END IF;
10870: END IF;
10871: END IF;
10870: END IF;
10871: END IF;
10872:
10873: IF l_debug_on THEN
10874: WSH_DEBUG_SV.log(l_module_name, ' l_delivery_details_info.requested_quantity2',l_delivery_details_info.requested_quantity2);
10875: END IF;
10876:
10877: --Bug 7291415. 0 to be considered as valid value. Following IF condition modified.
10878: --IF ( NVL(l_qty2, 0) = 0 OR l_qty2 < 0 ) THEN
10904:
10905:
10906: --}
10907: IF l_debug_on THEN
10908: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty ',l_original_req_qty);
10909: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty2 ',l_original_req_qty2);
10910: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty ',l_original_picked_qty);
10911: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
10912: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
10905:
10906: --}
10907: IF l_debug_on THEN
10908: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty ',l_original_req_qty);
10909: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty2 ',l_original_req_qty2);
10910: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty ',l_original_picked_qty);
10911: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
10912: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
10913: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty2 ',l_original_shipped_qty2);
10906: --}
10907: IF l_debug_on THEN
10908: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty ',l_original_req_qty);
10909: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty2 ',l_original_req_qty2);
10910: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty ',l_original_picked_qty);
10911: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
10912: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
10913: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty2 ',l_original_shipped_qty2);
10914: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty ',l_original_recvd_qty);
10907: IF l_debug_on THEN
10908: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty ',l_original_req_qty);
10909: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty2 ',l_original_req_qty2);
10910: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty ',l_original_picked_qty);
10911: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
10912: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
10913: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty2 ',l_original_shipped_qty2);
10914: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty ',l_original_recvd_qty);
10915: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty2 ',l_original_recvd_qty2);
10908: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty ',l_original_req_qty);
10909: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty2 ',l_original_req_qty2);
10910: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty ',l_original_picked_qty);
10911: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
10912: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
10913: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty2 ',l_original_shipped_qty2);
10914: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty ',l_original_recvd_qty);
10915: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty2 ',l_original_recvd_qty2);
10916: END IF;
10909: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty2 ',l_original_req_qty2);
10910: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty ',l_original_picked_qty);
10911: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
10912: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
10913: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty2 ',l_original_shipped_qty2);
10914: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty ',l_original_recvd_qty);
10915: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty2 ',l_original_recvd_qty2);
10916: END IF;
10917: ELSE -- -- J-IB-NPARIKH
10910: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty ',l_original_picked_qty);
10911: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
10912: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
10913: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty2 ',l_original_shipped_qty2);
10914: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty ',l_original_recvd_qty);
10915: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty2 ',l_original_recvd_qty2);
10916: END IF;
10917: ELSE -- -- J-IB-NPARIKH
10918: --{
10911: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
10912: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
10913: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty2 ',l_original_shipped_qty2);
10914: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty ',l_original_recvd_qty);
10915: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty2 ',l_original_recvd_qty2);
10916: END IF;
10917: ELSE -- -- J-IB-NPARIKH
10918: --{
10919: --
11007: 0
11008: );
11009:
11010: IF l_debug_on THEN
11011: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.requested_quantity', l_delivery_details_info.requested_quantity);
11012: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.requested_quantity2',l_delivery_details_info.requested_quantity2);
11013: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.shipped_quantity', l_delivery_details_info.shipped_quantity);
11014: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.shipped_quantity2',l_delivery_details_info.shipped_quantity2);
11015: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.received_quantity', l_delivery_details_info.received_quantity);
11008: );
11009:
11010: IF l_debug_on THEN
11011: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.requested_quantity', l_delivery_details_info.requested_quantity);
11012: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.requested_quantity2',l_delivery_details_info.requested_quantity2);
11013: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.shipped_quantity', l_delivery_details_info.shipped_quantity);
11014: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.shipped_quantity2',l_delivery_details_info.shipped_quantity2);
11015: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.received_quantity', l_delivery_details_info.received_quantity);
11016: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.received_quantity2',l_delivery_details_info.received_quantity2);
11009:
11010: IF l_debug_on THEN
11011: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.requested_quantity', l_delivery_details_info.requested_quantity);
11012: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.requested_quantity2',l_delivery_details_info.requested_quantity2);
11013: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.shipped_quantity', l_delivery_details_info.shipped_quantity);
11014: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.shipped_quantity2',l_delivery_details_info.shipped_quantity2);
11015: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.received_quantity', l_delivery_details_info.received_quantity);
11016: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.received_quantity2',l_delivery_details_info.received_quantity2);
11017: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.returned_quantity', l_delivery_details_info.returned_quantity);
11010: IF l_debug_on THEN
11011: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.requested_quantity', l_delivery_details_info.requested_quantity);
11012: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.requested_quantity2',l_delivery_details_info.requested_quantity2);
11013: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.shipped_quantity', l_delivery_details_info.shipped_quantity);
11014: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.shipped_quantity2',l_delivery_details_info.shipped_quantity2);
11015: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.received_quantity', l_delivery_details_info.received_quantity);
11016: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.received_quantity2',l_delivery_details_info.received_quantity2);
11017: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.returned_quantity', l_delivery_details_info.returned_quantity);
11018: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.returned_quantity2',l_delivery_details_info.returned_quantity2);
11011: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.requested_quantity', l_delivery_details_info.requested_quantity);
11012: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.requested_quantity2',l_delivery_details_info.requested_quantity2);
11013: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.shipped_quantity', l_delivery_details_info.shipped_quantity);
11014: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.shipped_quantity2',l_delivery_details_info.shipped_quantity2);
11015: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.received_quantity', l_delivery_details_info.received_quantity);
11016: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.received_quantity2',l_delivery_details_info.received_quantity2);
11017: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.returned_quantity', l_delivery_details_info.returned_quantity);
11018: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.returned_quantity2',l_delivery_details_info.returned_quantity2);
11019: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity',l_delivery_details_info.picked_quantity);
11012: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.requested_quantity2',l_delivery_details_info.requested_quantity2);
11013: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.shipped_quantity', l_delivery_details_info.shipped_quantity);
11014: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.shipped_quantity2',l_delivery_details_info.shipped_quantity2);
11015: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.received_quantity', l_delivery_details_info.received_quantity);
11016: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.received_quantity2',l_delivery_details_info.received_quantity2);
11017: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.returned_quantity', l_delivery_details_info.returned_quantity);
11018: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.returned_quantity2',l_delivery_details_info.returned_quantity2);
11019: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity',l_delivery_details_info.picked_quantity);
11020: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity2',l_delivery_details_info.picked_quantity2);
11013: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.shipped_quantity', l_delivery_details_info.shipped_quantity);
11014: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.shipped_quantity2',l_delivery_details_info.shipped_quantity2);
11015: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.received_quantity', l_delivery_details_info.received_quantity);
11016: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.received_quantity2',l_delivery_details_info.received_quantity2);
11017: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.returned_quantity', l_delivery_details_info.returned_quantity);
11018: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.returned_quantity2',l_delivery_details_info.returned_quantity2);
11019: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity',l_delivery_details_info.picked_quantity);
11020: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity2',l_delivery_details_info.picked_quantity2);
11021: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty',l_original_shipped_qty);
11014: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.shipped_quantity2',l_delivery_details_info.shipped_quantity2);
11015: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.received_quantity', l_delivery_details_info.received_quantity);
11016: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.received_quantity2',l_delivery_details_info.received_quantity2);
11017: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.returned_quantity', l_delivery_details_info.returned_quantity);
11018: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.returned_quantity2',l_delivery_details_info.returned_quantity2);
11019: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity',l_delivery_details_info.picked_quantity);
11020: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity2',l_delivery_details_info.picked_quantity2);
11021: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty',l_original_shipped_qty);
11022: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty2',l_original_shipped_qty2);
11015: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.received_quantity', l_delivery_details_info.received_quantity);
11016: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.received_quantity2',l_delivery_details_info.received_quantity2);
11017: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.returned_quantity', l_delivery_details_info.returned_quantity);
11018: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.returned_quantity2',l_delivery_details_info.returned_quantity2);
11019: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity',l_delivery_details_info.picked_quantity);
11020: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity2',l_delivery_details_info.picked_quantity2);
11021: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty',l_original_shipped_qty);
11022: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty2',l_original_shipped_qty2);
11023: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty',l_original_cc_qty);
11016: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.received_quantity2',l_delivery_details_info.received_quantity2);
11017: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.returned_quantity', l_delivery_details_info.returned_quantity);
11018: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.returned_quantity2',l_delivery_details_info.returned_quantity2);
11019: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity',l_delivery_details_info.picked_quantity);
11020: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity2',l_delivery_details_info.picked_quantity2);
11021: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty',l_original_shipped_qty);
11022: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty2',l_original_shipped_qty2);
11023: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty',l_original_cc_qty);
11024: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty2',l_original_cc_qty2);
11017: WSH_DEBUG_SV.log(l_module_name,' l_delivery_details_info.returned_quantity', l_delivery_details_info.returned_quantity);
11018: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.returned_quantity2',l_delivery_details_info.returned_quantity2);
11019: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity',l_delivery_details_info.picked_quantity);
11020: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity2',l_delivery_details_info.picked_quantity2);
11021: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty',l_original_shipped_qty);
11022: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty2',l_original_shipped_qty2);
11023: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty',l_original_cc_qty);
11024: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty2',l_original_cc_qty2);
11025: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty',l_original_req_qty);
11018: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.returned_quantity2',l_delivery_details_info.returned_quantity2);
11019: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity',l_delivery_details_info.picked_quantity);
11020: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity2',l_delivery_details_info.picked_quantity2);
11021: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty',l_original_shipped_qty);
11022: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty2',l_original_shipped_qty2);
11023: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty',l_original_cc_qty);
11024: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty2',l_original_cc_qty2);
11025: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty',l_original_req_qty);
11026: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty2',l_original_req_qty2);
11019: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity',l_delivery_details_info.picked_quantity);
11020: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity2',l_delivery_details_info.picked_quantity2);
11021: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty',l_original_shipped_qty);
11022: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty2',l_original_shipped_qty2);
11023: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty',l_original_cc_qty);
11024: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty2',l_original_cc_qty2);
11025: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty',l_original_req_qty);
11026: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty2',l_original_req_qty2);
11027: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty',l_original_picked_qty);
11020: WSH_DEBUG_SV.log(l_module_name,'l_delivery_details_info.picked_quantity2',l_delivery_details_info.picked_quantity2);
11021: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty',l_original_shipped_qty);
11022: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty2',l_original_shipped_qty2);
11023: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty',l_original_cc_qty);
11024: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty2',l_original_cc_qty2);
11025: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty',l_original_req_qty);
11026: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty2',l_original_req_qty2);
11027: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty',l_original_picked_qty);
11028: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty2',l_original_picked_qty2);
11021: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty',l_original_shipped_qty);
11022: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty2',l_original_shipped_qty2);
11023: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty',l_original_cc_qty);
11024: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty2',l_original_cc_qty2);
11025: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty',l_original_req_qty);
11026: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty2',l_original_req_qty2);
11027: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty',l_original_picked_qty);
11028: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty2',l_original_picked_qty2);
11029: WSH_DEBUG_SV.log(l_module_name,'l_original_recvd_qty',l_original_recvd_qty);
11022: WSH_DEBUG_SV.log(l_module_name,'l_original_shipped_qty2',l_original_shipped_qty2);
11023: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty',l_original_cc_qty);
11024: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty2',l_original_cc_qty2);
11025: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty',l_original_req_qty);
11026: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty2',l_original_req_qty2);
11027: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty',l_original_picked_qty);
11028: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty2',l_original_picked_qty2);
11029: WSH_DEBUG_SV.log(l_module_name,'l_original_recvd_qty',l_original_recvd_qty);
11030: WSH_DEBUG_SV.log(l_module_name,'l_original_recvd_qty2',l_original_recvd_qty2);
11023: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty',l_original_cc_qty);
11024: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty2',l_original_cc_qty2);
11025: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty',l_original_req_qty);
11026: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty2',l_original_req_qty2);
11027: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty',l_original_picked_qty);
11028: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty2',l_original_picked_qty2);
11029: WSH_DEBUG_SV.log(l_module_name,'l_original_recvd_qty',l_original_recvd_qty);
11030: WSH_DEBUG_SV.log(l_module_name,'l_original_recvd_qty2',l_original_recvd_qty2);
11031: WSH_DEBUG_SV.log(l_module_name,'l_original_rtv_qty',l_original_rtv_qty);
11024: WSH_DEBUG_SV.log(l_module_name,'l_original_cc_qty2',l_original_cc_qty2);
11025: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty',l_original_req_qty);
11026: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty2',l_original_req_qty2);
11027: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty',l_original_picked_qty);
11028: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty2',l_original_picked_qty2);
11029: WSH_DEBUG_SV.log(l_module_name,'l_original_recvd_qty',l_original_recvd_qty);
11030: WSH_DEBUG_SV.log(l_module_name,'l_original_recvd_qty2',l_original_recvd_qty2);
11031: WSH_DEBUG_SV.log(l_module_name,'l_original_rtv_qty',l_original_rtv_qty);
11032: WSH_DEBUG_SV.log(l_module_name,'l_original_rtv_qty2',l_original_rtv_qty2);
11025: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty',l_original_req_qty);
11026: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty2',l_original_req_qty2);
11027: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty',l_original_picked_qty);
11028: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty2',l_original_picked_qty2);
11029: WSH_DEBUG_SV.log(l_module_name,'l_original_recvd_qty',l_original_recvd_qty);
11030: WSH_DEBUG_SV.log(l_module_name,'l_original_recvd_qty2',l_original_recvd_qty2);
11031: WSH_DEBUG_SV.log(l_module_name,'l_original_rtv_qty',l_original_rtv_qty);
11032: WSH_DEBUG_SV.log(l_module_name,'l_original_rtv_qty2',l_original_rtv_qty2);
11033: END IF;
11026: WSH_DEBUG_SV.log(l_module_name,'l_original_req_qty2',l_original_req_qty2);
11027: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty',l_original_picked_qty);
11028: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty2',l_original_picked_qty2);
11029: WSH_DEBUG_SV.log(l_module_name,'l_original_recvd_qty',l_original_recvd_qty);
11030: WSH_DEBUG_SV.log(l_module_name,'l_original_recvd_qty2',l_original_recvd_qty2);
11031: WSH_DEBUG_SV.log(l_module_name,'l_original_rtv_qty',l_original_rtv_qty);
11032: WSH_DEBUG_SV.log(l_module_name,'l_original_rtv_qty2',l_original_rtv_qty2);
11033: END IF;
11034:
11027: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty',l_original_picked_qty);
11028: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty2',l_original_picked_qty2);
11029: WSH_DEBUG_SV.log(l_module_name,'l_original_recvd_qty',l_original_recvd_qty);
11030: WSH_DEBUG_SV.log(l_module_name,'l_original_recvd_qty2',l_original_recvd_qty2);
11031: WSH_DEBUG_SV.log(l_module_name,'l_original_rtv_qty',l_original_rtv_qty);
11032: WSH_DEBUG_SV.log(l_module_name,'l_original_rtv_qty2',l_original_rtv_qty2);
11033: END IF;
11034:
11035: --
11028: WSH_DEBUG_SV.log(l_module_name,'l_original_picked_qty2',l_original_picked_qty2);
11029: WSH_DEBUG_SV.log(l_module_name,'l_original_recvd_qty',l_original_recvd_qty);
11030: WSH_DEBUG_SV.log(l_module_name,'l_original_recvd_qty2',l_original_recvd_qty2);
11031: WSH_DEBUG_SV.log(l_module_name,'l_original_rtv_qty',l_original_rtv_qty);
11032: WSH_DEBUG_SV.log(l_module_name,'l_original_rtv_qty2',l_original_rtv_qty2);
11033: END IF;
11034:
11035: --
11036: --}
11049: IF p_old_delivery_detail_rec.wv_frozen_flag = 'Y' THEN
11050: l_org_wv_qty := NVL(p_old_delivery_detail_rec.received_quantity,NVL(p_old_delivery_detail_rec.shipped_quantity,NVL(p_old_delivery_detail_rec.picked_quantity, p_old_delivery_detail_rec.requested_quantity)));
11051:
11052: IF l_debug_on THEN
11053: WSH_DEBUG_SV.logmsg(l_module_name, 'Frozen Y');
11054: END IF;
11055:
11056: IF (p_manual_split = 'Y') THEN
11057: -- p_manual_split is 'Y' only when splitting for staged delivery details during ship confirm
11162: END IF; -- are there serial numbers to split?
11163:
11164: --
11165: IF l_debug_on THEN
11166: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.CREATE_NEW_DETAIL_FROM_OLD',WSH_DEBUG_SV.C_PROC_LEVEL);
11167: END IF;
11168: --
11169: WSH_DELIVERY_DETAILS_PKG.create_new_detail_from_old(
11170: p_delivery_detail_rec => l_delivery_details_info,
11187: -- During Partial Shipping with the remain qty as staged, w/v value should not be
11188: -- deducted again from the original line since during entering shipped_quantity
11189: -- w/v has been calculated for the original line but W/V should be calculated on split staged DD.
11190: IF l_debug_on THEN
11191: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DETAIL_WEIGHT_VOLUME',WSH_DEBUG_SV.C_PROC_LEVEL);
11192: END IF;
11193: WSH_WV_UTILS.Detail_Weight_Volume(
11194: p_delivery_detail_id => l_new_delivery_detail_id,
11195: p_update_flag => 'Y',
11199: IF (l_split_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
11200: RAISE new_det_wt_vol_failed;
11201: END IF;
11202: IF l_debug_on THEN
11203: WSH_DEBUG_SV.logmsg(l_module_name, ' After Update w/v');
11204: WSH_DEBUG_SV.log(l_module_name, 'l_split_weight',l_split_weight);
11205: WSH_DEBUG_SV.log(l_module_name, 'l_split_volume',l_split_volume);
11206: WSH_DEBUG_SV.log(l_module_name, 'p_manual_split',p_manual_split);
11207: END IF;
11200: RAISE new_det_wt_vol_failed;
11201: END IF;
11202: IF l_debug_on THEN
11203: WSH_DEBUG_SV.logmsg(l_module_name, ' After Update w/v');
11204: WSH_DEBUG_SV.log(l_module_name, 'l_split_weight',l_split_weight);
11205: WSH_DEBUG_SV.log(l_module_name, 'l_split_volume',l_split_volume);
11206: WSH_DEBUG_SV.log(l_module_name, 'p_manual_split',p_manual_split);
11207: END IF;
11208: -- Bug 4416863
11201: END IF;
11202: IF l_debug_on THEN
11203: WSH_DEBUG_SV.logmsg(l_module_name, ' After Update w/v');
11204: WSH_DEBUG_SV.log(l_module_name, 'l_split_weight',l_split_weight);
11205: WSH_DEBUG_SV.log(l_module_name, 'l_split_volume',l_split_volume);
11206: WSH_DEBUG_SV.log(l_module_name, 'p_manual_split',p_manual_split);
11207: END IF;
11208: -- Bug 4416863
11209: -- During Partial Shipping with the remain qty as staged, w/v value should not be
11202: IF l_debug_on THEN
11203: WSH_DEBUG_SV.logmsg(l_module_name, ' After Update w/v');
11204: WSH_DEBUG_SV.log(l_module_name, 'l_split_weight',l_split_weight);
11205: WSH_DEBUG_SV.log(l_module_name, 'l_split_volume',l_split_volume);
11206: WSH_DEBUG_SV.log(l_module_name, 'p_manual_split',p_manual_split);
11207: END IF;
11208: -- Bug 4416863
11209: -- During Partial Shipping with the remain qty as staged, w/v value should not be
11210: -- deducted again from the original line since during entering shipped_quantity
11242:
11243: l_delivery_assignments_info.delivery_detail_id := l_new_delivery_detail_id;
11244: --
11245: IF l_debug_on THEN
11246: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.CREATE_DELIVERY_ASSIGNMENTS',WSH_DEBUG_SV.C_PROC_LEVEL);
11247: END IF;
11248: --
11249: wsh_delivery_details_pkg.create_delivery_assignments(
11250: l_delivery_assignments_info,
11303:
11304: x_split_detail_id := l_new_delivery_detail_id;
11305:
11306: IF l_debug_on THEN
11307: WSH_DEBUG_SV.logmsg(l_module_name, 'Before Update wsh_delivery_details');
11308: WSH_DEBUG_SV.log(l_module_name, 'serial_number',l_updated_delivery_detail_rec.serial_number);
11309: WSH_DEBUG_SV.log(l_module_name, 'to_serial_number',l_updated_delivery_detail_rec.to_serial_number);
11310: WSH_DEBUG_SV.log(l_module_name, 'transaction_temp_id',l_updated_delivery_detail_rec.transaction_temp_id);
11311: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty ',l_original_req_qty);
11304: x_split_detail_id := l_new_delivery_detail_id;
11305:
11306: IF l_debug_on THEN
11307: WSH_DEBUG_SV.logmsg(l_module_name, 'Before Update wsh_delivery_details');
11308: WSH_DEBUG_SV.log(l_module_name, 'serial_number',l_updated_delivery_detail_rec.serial_number);
11309: WSH_DEBUG_SV.log(l_module_name, 'to_serial_number',l_updated_delivery_detail_rec.to_serial_number);
11310: WSH_DEBUG_SV.log(l_module_name, 'transaction_temp_id',l_updated_delivery_detail_rec.transaction_temp_id);
11311: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty ',l_original_req_qty);
11312: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty2 ',l_original_req_qty2);
11305:
11306: IF l_debug_on THEN
11307: WSH_DEBUG_SV.logmsg(l_module_name, 'Before Update wsh_delivery_details');
11308: WSH_DEBUG_SV.log(l_module_name, 'serial_number',l_updated_delivery_detail_rec.serial_number);
11309: WSH_DEBUG_SV.log(l_module_name, 'to_serial_number',l_updated_delivery_detail_rec.to_serial_number);
11310: WSH_DEBUG_SV.log(l_module_name, 'transaction_temp_id',l_updated_delivery_detail_rec.transaction_temp_id);
11311: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty ',l_original_req_qty);
11312: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty2 ',l_original_req_qty2);
11313: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty ',l_original_picked_qty);
11306: IF l_debug_on THEN
11307: WSH_DEBUG_SV.logmsg(l_module_name, 'Before Update wsh_delivery_details');
11308: WSH_DEBUG_SV.log(l_module_name, 'serial_number',l_updated_delivery_detail_rec.serial_number);
11309: WSH_DEBUG_SV.log(l_module_name, 'to_serial_number',l_updated_delivery_detail_rec.to_serial_number);
11310: WSH_DEBUG_SV.log(l_module_name, 'transaction_temp_id',l_updated_delivery_detail_rec.transaction_temp_id);
11311: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty ',l_original_req_qty);
11312: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty2 ',l_original_req_qty2);
11313: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty ',l_original_picked_qty);
11314: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
11307: WSH_DEBUG_SV.logmsg(l_module_name, 'Before Update wsh_delivery_details');
11308: WSH_DEBUG_SV.log(l_module_name, 'serial_number',l_updated_delivery_detail_rec.serial_number);
11309: WSH_DEBUG_SV.log(l_module_name, 'to_serial_number',l_updated_delivery_detail_rec.to_serial_number);
11310: WSH_DEBUG_SV.log(l_module_name, 'transaction_temp_id',l_updated_delivery_detail_rec.transaction_temp_id);
11311: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty ',l_original_req_qty);
11312: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty2 ',l_original_req_qty2);
11313: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty ',l_original_picked_qty);
11314: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
11315: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
11308: WSH_DEBUG_SV.log(l_module_name, 'serial_number',l_updated_delivery_detail_rec.serial_number);
11309: WSH_DEBUG_SV.log(l_module_name, 'to_serial_number',l_updated_delivery_detail_rec.to_serial_number);
11310: WSH_DEBUG_SV.log(l_module_name, 'transaction_temp_id',l_updated_delivery_detail_rec.transaction_temp_id);
11311: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty ',l_original_req_qty);
11312: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty2 ',l_original_req_qty2);
11313: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty ',l_original_picked_qty);
11314: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
11315: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
11316: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty2 ',l_original_shipped_qty2);
11309: WSH_DEBUG_SV.log(l_module_name, 'to_serial_number',l_updated_delivery_detail_rec.to_serial_number);
11310: WSH_DEBUG_SV.log(l_module_name, 'transaction_temp_id',l_updated_delivery_detail_rec.transaction_temp_id);
11311: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty ',l_original_req_qty);
11312: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty2 ',l_original_req_qty2);
11313: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty ',l_original_picked_qty);
11314: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
11315: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
11316: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty2 ',l_original_shipped_qty2);
11317: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty ',l_original_recvd_qty);
11310: WSH_DEBUG_SV.log(l_module_name, 'transaction_temp_id',l_updated_delivery_detail_rec.transaction_temp_id);
11311: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty ',l_original_req_qty);
11312: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty2 ',l_original_req_qty2);
11313: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty ',l_original_picked_qty);
11314: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
11315: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
11316: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty2 ',l_original_shipped_qty2);
11317: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty ',l_original_recvd_qty);
11318: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty2 ',l_original_recvd_qty2);--
11311: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty ',l_original_req_qty);
11312: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty2 ',l_original_req_qty2);
11313: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty ',l_original_picked_qty);
11314: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
11315: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
11316: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty2 ',l_original_shipped_qty2);
11317: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty ',l_original_recvd_qty);
11318: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty2 ',l_original_recvd_qty2);--
11319: WSH_DEBUG_SV.log(l_module_name, ' l_original_rtv_qty ',l_original_rtv_qty);
11312: WSH_DEBUG_SV.log(l_module_name, ' l_original_req_qty2 ',l_original_req_qty2);
11313: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty ',l_original_picked_qty);
11314: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
11315: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
11316: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty2 ',l_original_shipped_qty2);
11317: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty ',l_original_recvd_qty);
11318: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty2 ',l_original_recvd_qty2);--
11319: WSH_DEBUG_SV.log(l_module_name, ' l_original_rtv_qty ',l_original_rtv_qty);
11320: WSH_DEBUG_SV.log(l_module_name, ' l_original_rtv_qty2 ',l_original_rtv_qty2);
11313: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty ',l_original_picked_qty);
11314: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
11315: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
11316: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty2 ',l_original_shipped_qty2);
11317: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty ',l_original_recvd_qty);
11318: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty2 ',l_original_recvd_qty2);--
11319: WSH_DEBUG_SV.log(l_module_name, ' l_original_rtv_qty ',l_original_rtv_qty);
11320: WSH_DEBUG_SV.log(l_module_name, ' l_original_rtv_qty2 ',l_original_rtv_qty2);
11321: WSH_DEBUG_SV.log(l_module_name, ' l_original_cc_qty ',l_original_cc_qty);
11314: WSH_DEBUG_SV.log(l_module_name, ' l_original_picked_qty2 ',l_original_picked_qty2);
11315: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
11316: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty2 ',l_original_shipped_qty2);
11317: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty ',l_original_recvd_qty);
11318: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty2 ',l_original_recvd_qty2);--
11319: WSH_DEBUG_SV.log(l_module_name, ' l_original_rtv_qty ',l_original_rtv_qty);
11320: WSH_DEBUG_SV.log(l_module_name, ' l_original_rtv_qty2 ',l_original_rtv_qty2);
11321: WSH_DEBUG_SV.log(l_module_name, ' l_original_cc_qty ',l_original_cc_qty);
11322: WSH_DEBUG_SV.log(l_module_name, ' l_original_cc_qty2 ',l_original_cc_qty2);
11315: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty ',l_original_shipped_qty);
11316: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty2 ',l_original_shipped_qty2);
11317: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty ',l_original_recvd_qty);
11318: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty2 ',l_original_recvd_qty2);--
11319: WSH_DEBUG_SV.log(l_module_name, ' l_original_rtv_qty ',l_original_rtv_qty);
11320: WSH_DEBUG_SV.log(l_module_name, ' l_original_rtv_qty2 ',l_original_rtv_qty2);
11321: WSH_DEBUG_SV.log(l_module_name, ' l_original_cc_qty ',l_original_cc_qty);
11322: WSH_DEBUG_SV.log(l_module_name, ' l_original_cc_qty2 ',l_original_cc_qty2);
11323: END IF;
11316: WSH_DEBUG_SV.log(l_module_name, ' l_original_shipped_qty2 ',l_original_shipped_qty2);
11317: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty ',l_original_recvd_qty);
11318: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty2 ',l_original_recvd_qty2);--
11319: WSH_DEBUG_SV.log(l_module_name, ' l_original_rtv_qty ',l_original_rtv_qty);
11320: WSH_DEBUG_SV.log(l_module_name, ' l_original_rtv_qty2 ',l_original_rtv_qty2);
11321: WSH_DEBUG_SV.log(l_module_name, ' l_original_cc_qty ',l_original_cc_qty);
11322: WSH_DEBUG_SV.log(l_module_name, ' l_original_cc_qty2 ',l_original_cc_qty2);
11323: END IF;
11324:
11317: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty ',l_original_recvd_qty);
11318: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty2 ',l_original_recvd_qty2);--
11319: WSH_DEBUG_SV.log(l_module_name, ' l_original_rtv_qty ',l_original_rtv_qty);
11320: WSH_DEBUG_SV.log(l_module_name, ' l_original_rtv_qty2 ',l_original_rtv_qty2);
11321: WSH_DEBUG_SV.log(l_module_name, ' l_original_cc_qty ',l_original_cc_qty);
11322: WSH_DEBUG_SV.log(l_module_name, ' l_original_cc_qty2 ',l_original_cc_qty2);
11323: END IF;
11324:
11325: UPDATE wsh_delivery_details
11318: WSH_DEBUG_SV.log(l_module_name, ' l_original_recvd_qty2 ',l_original_recvd_qty2);--
11319: WSH_DEBUG_SV.log(l_module_name, ' l_original_rtv_qty ',l_original_rtv_qty);
11320: WSH_DEBUG_SV.log(l_module_name, ' l_original_rtv_qty2 ',l_original_rtv_qty2);
11321: WSH_DEBUG_SV.log(l_module_name, ' l_original_cc_qty ',l_original_cc_qty);
11322: WSH_DEBUG_SV.log(l_module_name, ' l_original_cc_qty2 ',l_original_cc_qty2);
11323: END IF;
11324:
11325: UPDATE wsh_delivery_details
11326: SET requested_quantity = l_original_req_qty, -- J-IB-NPARIKH, GREATEST(requested_quantity - l_delivery_details_info.requested_quantity, 0),
11355: -- Update of wsh_delivery_details where requested_quantity/released_status
11356: -- are changed, call DBI API after the update.
11357: -- This API will also check for DBI Installed or not
11358: IF l_debug_on THEN
11359: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail id-',p_old_delivery_detail_rec.delivery_detail_id);
11360: END IF;
11361: l_detail_tab(1) := p_old_delivery_detail_rec.delivery_detail_id;
11362: WSH_INTEGRATION.DBI_Update_Detail_Log
11363: (p_delivery_detail_id_tab => l_detail_tab,
11364: p_dml_type => 'UPDATE',
11365: x_return_status => l_dbi_rs);
11366:
11367: IF l_debug_on THEN
11368: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
11369: END IF;
11370: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
11371: x_return_status := l_dbi_rs;
11372: -- just pass this return status to caller API
11370: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
11371: x_return_status := l_dbi_rs;
11372: -- just pass this return status to caller API
11373: IF l_debug_on THEN
11374: WSH_DEBUG_SV.pop(l_module_name);
11375: END IF;
11376: return;
11377: END IF;
11378: -- End of Code for DBI Project
11378: -- End of Code for DBI Project
11379: --
11380: -- bug # 7580785 : W/V should be populated on delivery.
11381: IF l_debug_on THEN
11382: WSH_DEBUG_SV.log(l_module_name, 'l_upd_wv_on_split_stg_dd',l_upd_wv_on_split_stg_dd);
11383: END IF;
11384: IF (l_upd_wv_on_split_stg_dd = 'Y') THEN
11385: --{
11386: IF l_debug_on THEN
11383: END IF;
11384: IF (l_upd_wv_on_split_stg_dd = 'Y') THEN
11385: --{
11386: IF l_debug_on THEN
11387: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
11388: END IF;
11389: WSH_WV_UTILS.DD_WV_Post_Process(
11390: p_delivery_detail_id => l_new_delivery_detail_id,
11391: p_diff_gross_wt => l_split_weight,
11403: -- J: W/V Changes
11404: -- Decrement the DD W/V from parent if p_unassign_flag is 'Y'
11405: IF (p_unassign_flag = 'Y') THEN
11406: IF l_debug_on THEN
11407: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
11408: END IF;
11409: --
11410: WSH_WV_UTILS.DD_WV_Post_Process(
11411: p_delivery_detail_id => p_old_delivery_detail_rec.delivery_detail_id,
11418: --
11419: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11420: WSH_UTIL_CORE.Add_Message(x_return_status);
11421: IF l_debug_on THEN
11422: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
11423: WSH_DEBUG_SV.pop(l_module_name);
11424: END IF;
11425: return;
11426: END IF;
11419: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11420: WSH_UTIL_CORE.Add_Message(x_return_status);
11421: IF l_debug_on THEN
11422: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
11423: WSH_DEBUG_SV.pop(l_module_name);
11424: END IF;
11425: return;
11426: END IF;
11427: END IF;
11427: END IF;
11428:
11429: --
11430: IF l_debug_on THEN
11431: WSH_DEBUG_SV.pop(l_module_name);
11432: END IF;
11433: --
11434: EXCEPTION
11435: -- HW OPMCONV. Removed OPM exception
11440: FND_MESSAGE.SET_TOKEN('DETAIL_ID', p_old_delivery_detail_rec.delivery_detail_id);
11441: wsh_util_core.add_message(x_return_status,l_module_name);
11442: --
11443: IF l_debug_on THEN
11444: WSH_DEBUG_SV.logmsg(l_module_name,'OLD_DET_WT_VOL_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11445: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OLD_DET_WT_VOL_FAILED');
11446: END IF;
11447: --
11448: WHEN new_det_wt_vol_failed THEN
11441: wsh_util_core.add_message(x_return_status,l_module_name);
11442: --
11443: IF l_debug_on THEN
11444: WSH_DEBUG_SV.logmsg(l_module_name,'OLD_DET_WT_VOL_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11445: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OLD_DET_WT_VOL_FAILED');
11446: END IF;
11447: --
11448: WHEN new_det_wt_vol_failed THEN
11449: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11451: FND_MESSAGE.SET_TOKEN('DETAIL_ID', l_new_DELIVERY_DETAIL_ID);
11452: wsh_util_core.add_message(x_return_status,l_module_name);
11453: --
11454: IF l_debug_on THEN
11455: WSH_DEBUG_SV.logmsg(l_module_name,'NEW_DET_WT_VOL_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11456: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NEW_DET_WT_VOL_FAILED');
11457: END IF;
11458: --
11459: WHEN WSH_SN_SPLIT_ERR THEN
11452: wsh_util_core.add_message(x_return_status,l_module_name);
11453: --
11454: IF l_debug_on THEN
11455: WSH_DEBUG_SV.logmsg(l_module_name,'NEW_DET_WT_VOL_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11456: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NEW_DET_WT_VOL_FAILED');
11457: END IF;
11458: --
11459: WHEN WSH_SN_SPLIT_ERR THEN
11460: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11461: fnd_message.set_name('WSH', 'WSH_SN_SPLIT_ERR');
11462: wsh_util_core.add_message(x_return_status,l_module_name);
11463: --
11464: IF l_debug_on THEN
11465: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_SN_SPLIT_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11466: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_SN_SPLIT_ERR');
11467: END IF;
11468: --
11469: WHEN WSH_CREATE_DET_ERR THEN
11462: wsh_util_core.add_message(x_return_status,l_module_name);
11463: --
11464: IF l_debug_on THEN
11465: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_SN_SPLIT_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11466: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_SN_SPLIT_ERR');
11467: END IF;
11468: --
11469: WHEN WSH_CREATE_DET_ERR THEN
11470: x_return_status := l_cr_dt_status;
11468: --
11469: WHEN WSH_CREATE_DET_ERR THEN
11470: x_return_status := l_cr_dt_status;
11471: IF l_debug_on THEN
11472: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_SN_SPLIT_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11473: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_CREATE_DET_ERR');
11474: END IF;
11475:
11476: WHEN others THEN
11469: WHEN WSH_CREATE_DET_ERR THEN
11470: x_return_status := l_cr_dt_status;
11471: IF l_debug_on THEN
11472: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_SN_SPLIT_ERR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
11473: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_CREATE_DET_ERR');
11474: END IF;
11475:
11476: WHEN others THEN
11477: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11477: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11478: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DETAIL_INT',l_module_name);
11479: --
11480: IF l_debug_on THEN
11481: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11482: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11483: END IF;
11484: --
11485: END SPLIT_DETAIL_INT;
11478: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DETAIL_INT',l_module_name);
11479: --
11480: IF l_debug_on THEN
11481: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11482: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
11483: END IF;
11484: --
11485: END SPLIT_DETAIL_INT;
11486:
11552: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
11553: --
11554: IF l_debug_on IS NULL
11555: THEN
11556: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
11557: END IF;
11558: --
11559: IF l_debug_on THEN
11560: WSH_DEBUG_SV.push(l_module_name);
11556: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
11557: END IF;
11558: --
11559: IF l_debug_on THEN
11560: WSH_DEBUG_SV.push(l_module_name);
11561: --
11562: WSH_DEBUG_SV.log(l_module_name,'P_OLD_SHIPPED_QUANTITY',P_OLD_SHIPPED_QUANTITY);
11563: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SHIPPED_QUANTITY',P_NEW_SHIPPED_QUANTITY);
11564: WSH_DEBUG_SV.log(l_module_name,'old serial_number',
11558: --
11559: IF l_debug_on THEN
11560: WSH_DEBUG_SV.push(l_module_name);
11561: --
11562: WSH_DEBUG_SV.log(l_module_name,'P_OLD_SHIPPED_QUANTITY',P_OLD_SHIPPED_QUANTITY);
11563: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SHIPPED_QUANTITY',P_NEW_SHIPPED_QUANTITY);
11564: WSH_DEBUG_SV.log(l_module_name,'old serial_number',
11565: x_old_detail_rec.serial_number);
11566: WSH_DEBUG_SV.log(l_module_name,'old to_serial_number',
11559: IF l_debug_on THEN
11560: WSH_DEBUG_SV.push(l_module_name);
11561: --
11562: WSH_DEBUG_SV.log(l_module_name,'P_OLD_SHIPPED_QUANTITY',P_OLD_SHIPPED_QUANTITY);
11563: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SHIPPED_QUANTITY',P_NEW_SHIPPED_QUANTITY);
11564: WSH_DEBUG_SV.log(l_module_name,'old serial_number',
11565: x_old_detail_rec.serial_number);
11566: WSH_DEBUG_SV.log(l_module_name,'old to_serial_number',
11567: x_old_detail_rec.to_serial_number);
11560: WSH_DEBUG_SV.push(l_module_name);
11561: --
11562: WSH_DEBUG_SV.log(l_module_name,'P_OLD_SHIPPED_QUANTITY',P_OLD_SHIPPED_QUANTITY);
11563: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SHIPPED_QUANTITY',P_NEW_SHIPPED_QUANTITY);
11564: WSH_DEBUG_SV.log(l_module_name,'old serial_number',
11565: x_old_detail_rec.serial_number);
11566: WSH_DEBUG_SV.log(l_module_name,'old to_serial_number',
11567: x_old_detail_rec.to_serial_number);
11568: WSH_DEBUG_SV.log(l_module_name,'old transaction_temp_id',
11562: WSH_DEBUG_SV.log(l_module_name,'P_OLD_SHIPPED_QUANTITY',P_OLD_SHIPPED_QUANTITY);
11563: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SHIPPED_QUANTITY',P_NEW_SHIPPED_QUANTITY);
11564: WSH_DEBUG_SV.log(l_module_name,'old serial_number',
11565: x_old_detail_rec.serial_number);
11566: WSH_DEBUG_SV.log(l_module_name,'old to_serial_number',
11567: x_old_detail_rec.to_serial_number);
11568: WSH_DEBUG_SV.log(l_module_name,'old transaction_temp_id',
11569: x_old_detail_rec.transaction_temp_id);
11570: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity',
11564: WSH_DEBUG_SV.log(l_module_name,'old serial_number',
11565: x_old_detail_rec.serial_number);
11566: WSH_DEBUG_SV.log(l_module_name,'old to_serial_number',
11567: x_old_detail_rec.to_serial_number);
11568: WSH_DEBUG_SV.log(l_module_name,'old transaction_temp_id',
11569: x_old_detail_rec.transaction_temp_id);
11570: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity',
11571: x_old_detail_rec.shipped_quantity);
11572: WSH_DEBUG_SV.log(l_module_name,'old delivery_detail_id',
11566: WSH_DEBUG_SV.log(l_module_name,'old to_serial_number',
11567: x_old_detail_rec.to_serial_number);
11568: WSH_DEBUG_SV.log(l_module_name,'old transaction_temp_id',
11569: x_old_detail_rec.transaction_temp_id);
11570: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity',
11571: x_old_detail_rec.shipped_quantity);
11572: WSH_DEBUG_SV.log(l_module_name,'old delivery_detail_id',
11573: x_old_detail_rec.delivery_detail_id);
11574: WSH_DEBUG_SV.log(l_module_name,'old organization_id',
11568: WSH_DEBUG_SV.log(l_module_name,'old transaction_temp_id',
11569: x_old_detail_rec.transaction_temp_id);
11570: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity',
11571: x_old_detail_rec.shipped_quantity);
11572: WSH_DEBUG_SV.log(l_module_name,'old delivery_detail_id',
11573: x_old_detail_rec.delivery_detail_id);
11574: WSH_DEBUG_SV.log(l_module_name,'old organization_id',
11575: x_old_detail_rec.organization_id);
11576: WSH_DEBUG_SV.log(l_module_name,'old inventory_item_id',
11570: WSH_DEBUG_SV.log(l_module_name,'old shipped_quantity',
11571: x_old_detail_rec.shipped_quantity);
11572: WSH_DEBUG_SV.log(l_module_name,'old delivery_detail_id',
11573: x_old_detail_rec.delivery_detail_id);
11574: WSH_DEBUG_SV.log(l_module_name,'old organization_id',
11575: x_old_detail_rec.organization_id);
11576: WSH_DEBUG_SV.log(l_module_name,'old inventory_item_id',
11577: x_old_detail_rec.inventory_item_id);
11578:
11572: WSH_DEBUG_SV.log(l_module_name,'old delivery_detail_id',
11573: x_old_detail_rec.delivery_detail_id);
11574: WSH_DEBUG_SV.log(l_module_name,'old organization_id',
11575: x_old_detail_rec.organization_id);
11576: WSH_DEBUG_SV.log(l_module_name,'old inventory_item_id',
11577: x_old_detail_rec.inventory_item_id);
11578:
11579: END IF;
11580: --
11634: x_new_delivery_detail_rec.to_serial_number := l_new_to_sn;
11635:
11636: END IF; -- l_range_count > p_old_shipped_quantity
11637: IF l_debug_on THEN
11638: WSH_DEBUG_SV.log(l_module_name,'serial_number',
11639: x_new_delivery_detail_rec.serial_number);
11640: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',
11641: x_new_delivery_detail_rec.to_serial_number);
11642: END IF;
11636: END IF; -- l_range_count > p_old_shipped_quantity
11637: IF l_debug_on THEN
11638: WSH_DEBUG_SV.log(l_module_name,'serial_number',
11639: x_new_delivery_detail_rec.serial_number);
11640: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',
11641: x_new_delivery_detail_rec.to_serial_number);
11642: END IF;
11643:
11644: END IF; -- x_old_detail_rec.to_serail_number IS NULL
11647:
11648: -- we have at least one record in MTL_SERIAL_NUMBERS_TEMP
11649: --
11650: IF l_debug_on THEN
11651: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.GET_SERIAL_QTY',WSH_DEBUG_SV.C_PROC_LEVEL);
11652: END IF;
11653: --
11654: l_ser_qty := WSH_DELIVERY_DETAILS_INV.Get_Serial_Qty(
11655: p_organization_id => x_old_detail_rec.organization_id,
11656: p_delivery_detail_id => x_old_detail_rec.delivery_detail_id);
11657: l_qty_to_split := l_ser_qty - p_old_shipped_quantity;
11658: --
11659: IF l_debug_on THEN
11660: WSH_DEBUG_SV.log(l_module_name,'L_QTY_TO_SPLIT',l_qty_to_split);
11661: END IF;
11662: --
11663:
11664: IF l_qty_to_split >= 1 THEN
11672: CLOSE c_temp_id;
11673: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11674: --
11675: IF l_debug_on THEN
11676: WSH_DEBUG_SV.log(l_module_name,'Return Status is error',x_return_status);
11677: WSH_DEBUG_SV.pop(l_module_name);
11678: END IF;
11679: --
11680: return;
11673: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11674: --
11675: IF l_debug_on THEN
11676: WSH_DEBUG_SV.log(l_module_name,'Return Status is error',x_return_status);
11677: WSH_DEBUG_SV.pop(l_module_name);
11678: END IF;
11679: --
11680: return;
11681: END IF;
11680: return;
11681: END IF;
11682: CLOSE c_temp_id;
11683: IF l_debug_on THEN
11684: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',
11685: l_transaction_temp_id);
11686: END IF;
11687: END IF;
11688: x_new_delivery_detail_rec.transaction_temp_id := nvl(l_transaction_temp_id,FND_API.G_MISS_NUM);
11693: IF (l_qty_to_split <= 0) THEN
11694: EXIT; -- finished with splitting serial numbers
11695: END IF;
11696: IF l_debug_on THEN
11697: WSH_DEBUG_SV.log(l_module_name,'c.to_serial_number',
11698: c.to_serial_number);
11699: WSH_DEBUG_SV.log(l_module_name,'c.fm_serial_number',
11700: c.fm_serial_number);
11701: END IF;
11695: END IF;
11696: IF l_debug_on THEN
11697: WSH_DEBUG_SV.log(l_module_name,'c.to_serial_number',
11698: c.to_serial_number);
11699: WSH_DEBUG_SV.log(l_module_name,'c.fm_serial_number',
11700: c.fm_serial_number);
11701: END IF;
11702:
11703: -- OR condition added for bug 4424259, making l_range_count = 1 if from and to serial numbers are same.
11714: l_prefix_length + 1));
11715: l_range_count := l_to_numeric - l_fm_numeric + 1;
11716: END IF; -- c.to_serial_number IS NULL
11717: IF l_debug_on THEN
11718: WSH_DEBUG_SV.log(l_module_name,'l_range_count',
11719: l_range_count);
11720: WSH_DEBUG_SV.log(l_module_name,'l_qty_to_split',
11721: l_qty_to_split);
11722: END IF;
11716: END IF; -- c.to_serial_number IS NULL
11717: IF l_debug_on THEN
11718: WSH_DEBUG_SV.log(l_module_name,'l_range_count',
11719: l_range_count);
11720: WSH_DEBUG_SV.log(l_module_name,'l_qty_to_split',
11721: l_qty_to_split);
11722: END IF;
11723:
11724: IF l_range_count > l_qty_to_split THEN
11736: IF p_old_shipped_quantity >= 1 THEN
11737: -- Bug 3782838 : Retain id for single serial number
11738: -- update record only if old delivery line still has at least 1 to ship.
11739: IF l_debug_on THEN
11740: WSH_DEBUG_SV.log(l_module_name,'l_old_to_sn',l_old_to_sn);
11741: END IF;
11742: UPDATE mtl_serial_numbers_temp
11743: SET to_serial_number = l_old_to_sn,
11744: serial_prefix = TO_CHAR(l_range_count - l_qty_to_split),
11747: last_update_login = FND_GLOBAL.LOGIN_ID
11748: WHERE rowid = c.rowid;
11749: END IF;
11750: IF l_debug_on THEN
11751: WSH_DEBUG_SV.log(l_module_name,
11752: 'inserting into mtl_serial_numbers_temp'
11753: ,l_transaction_temp_id);
11754: END IF;
11755:
11813: -- End of changes for 3782838
11814:
11815: -- bug 2740681
11816: IF l_debug_on THEN
11817: WSH_DEBUG_SV.logmsg(l_module_name,'Before Calling Serial_Check.Inv_Unmark_Serial');
11818: WSH_DEBUG_SV.log(l_module_name,'l_new_sn,l_new_to_sn,inventory_item_id', l_new_sn
11819: ||','||l_new_to_sn
11820: ||','||x_old_detail_rec.inventory_item_id);
11821: END IF;
11814:
11815: -- bug 2740681
11816: IF l_debug_on THEN
11817: WSH_DEBUG_SV.logmsg(l_module_name,'Before Calling Serial_Check.Inv_Unmark_Serial');
11818: WSH_DEBUG_SV.log(l_module_name,'l_new_sn,l_new_to_sn,inventory_item_id', l_new_sn
11819: ||','||l_new_to_sn
11820: ||','||x_old_detail_rec.inventory_item_id);
11821: END IF;
11822: Serial_Check.Inv_Unmark_Serial(
11828: NULL,
11829: x_old_detail_rec.inventory_item_id);
11830:
11831: IF l_debug_on THEN
11832: WSH_DEBUG_SV.logmsg(l_module_name,'After Calling Serial_Check.Inv_Unmark_Serial');
11833: END IF;
11834: IF l_debug_on THEN
11835: WSH_DEBUG_SV.logmsg(l_module_name,'Before Calling Serial_Check.Inv_mark_Serial');
11836: WSH_DEBUG_SV.log(l_module_name,'l_new_sn',l_new_sn);
11831: IF l_debug_on THEN
11832: WSH_DEBUG_SV.logmsg(l_module_name,'After Calling Serial_Check.Inv_Unmark_Serial');
11833: END IF;
11834: IF l_debug_on THEN
11835: WSH_DEBUG_SV.logmsg(l_module_name,'Before Calling Serial_Check.Inv_mark_Serial');
11836: WSH_DEBUG_SV.log(l_module_name,'l_new_sn',l_new_sn);
11837: WSH_DEBUG_SV.log(l_module_name,'l_new_to_sn',l_new_to_sn);
11838: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',x_old_detail_rec.inventory_item_id);
11839: WSH_DEBUG_SV.log(l_module_name,'organization_id',x_old_detail_rec.organization_id);
11832: WSH_DEBUG_SV.logmsg(l_module_name,'After Calling Serial_Check.Inv_Unmark_Serial');
11833: END IF;
11834: IF l_debug_on THEN
11835: WSH_DEBUG_SV.logmsg(l_module_name,'Before Calling Serial_Check.Inv_mark_Serial');
11836: WSH_DEBUG_SV.log(l_module_name,'l_new_sn',l_new_sn);
11837: WSH_DEBUG_SV.log(l_module_name,'l_new_to_sn',l_new_to_sn);
11838: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',x_old_detail_rec.inventory_item_id);
11839: WSH_DEBUG_SV.log(l_module_name,'organization_id',x_old_detail_rec.organization_id);
11840: WSH_DEBUG_SV.log(l_module_name,'source_header_id',x_old_detail_rec.source_header_id);
11833: END IF;
11834: IF l_debug_on THEN
11835: WSH_DEBUG_SV.logmsg(l_module_name,'Before Calling Serial_Check.Inv_mark_Serial');
11836: WSH_DEBUG_SV.log(l_module_name,'l_new_sn',l_new_sn);
11837: WSH_DEBUG_SV.log(l_module_name,'l_new_to_sn',l_new_to_sn);
11838: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',x_old_detail_rec.inventory_item_id);
11839: WSH_DEBUG_SV.log(l_module_name,'organization_id',x_old_detail_rec.organization_id);
11840: WSH_DEBUG_SV.log(l_module_name,'source_header_id',x_old_detail_rec.source_header_id);
11841: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
11834: IF l_debug_on THEN
11835: WSH_DEBUG_SV.logmsg(l_module_name,'Before Calling Serial_Check.Inv_mark_Serial');
11836: WSH_DEBUG_SV.log(l_module_name,'l_new_sn',l_new_sn);
11837: WSH_DEBUG_SV.log(l_module_name,'l_new_to_sn',l_new_to_sn);
11838: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',x_old_detail_rec.inventory_item_id);
11839: WSH_DEBUG_SV.log(l_module_name,'organization_id',x_old_detail_rec.organization_id);
11840: WSH_DEBUG_SV.log(l_module_name,'source_header_id',x_old_detail_rec.source_header_id);
11841: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
11842: WSH_DEBUG_SV.log(l_module_name,'source_line_id',x_old_detail_rec.source_line_id);
11835: WSH_DEBUG_SV.logmsg(l_module_name,'Before Calling Serial_Check.Inv_mark_Serial');
11836: WSH_DEBUG_SV.log(l_module_name,'l_new_sn',l_new_sn);
11837: WSH_DEBUG_SV.log(l_module_name,'l_new_to_sn',l_new_to_sn);
11838: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',x_old_detail_rec.inventory_item_id);
11839: WSH_DEBUG_SV.log(l_module_name,'organization_id',x_old_detail_rec.organization_id);
11840: WSH_DEBUG_SV.log(l_module_name,'source_header_id',x_old_detail_rec.source_header_id);
11841: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
11842: WSH_DEBUG_SV.log(l_module_name,'source_line_id',x_old_detail_rec.source_line_id);
11843: END IF;
11836: WSH_DEBUG_SV.log(l_module_name,'l_new_sn',l_new_sn);
11837: WSH_DEBUG_SV.log(l_module_name,'l_new_to_sn',l_new_to_sn);
11838: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',x_old_detail_rec.inventory_item_id);
11839: WSH_DEBUG_SV.log(l_module_name,'organization_id',x_old_detail_rec.organization_id);
11840: WSH_DEBUG_SV.log(l_module_name,'source_header_id',x_old_detail_rec.source_header_id);
11841: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
11842: WSH_DEBUG_SV.log(l_module_name,'source_line_id',x_old_detail_rec.source_line_id);
11843: END IF;
11844: --RTV Changes
11837: WSH_DEBUG_SV.log(l_module_name,'l_new_to_sn',l_new_to_sn);
11838: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',x_old_detail_rec.inventory_item_id);
11839: WSH_DEBUG_SV.log(l_module_name,'organization_id',x_old_detail_rec.organization_id);
11840: WSH_DEBUG_SV.log(l_module_name,'source_header_id',x_old_detail_rec.source_header_id);
11841: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
11842: WSH_DEBUG_SV.log(l_module_name,'source_line_id',x_old_detail_rec.source_line_id);
11843: END IF;
11844: --RTV Changes
11845: IF x_old_detail_rec.source_code = 'RTV' THEN
11838: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',x_old_detail_rec.inventory_item_id);
11839: WSH_DEBUG_SV.log(l_module_name,'organization_id',x_old_detail_rec.organization_id);
11840: WSH_DEBUG_SV.log(l_module_name,'source_header_id',x_old_detail_rec.source_header_id);
11841: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
11842: WSH_DEBUG_SV.log(l_module_name,'source_line_id',x_old_detail_rec.source_line_id);
11843: END IF;
11844: --RTV Changes
11845: IF x_old_detail_rec.source_code = 'RTV' THEN
11846: Serial_Check.Inv_Mark_Serial(
11852: l_transaction_temp_id,
11853: x_old_detail_rec.source_line_id,
11854: l_success);
11855: IF l_debug_on THEN
11856: WSH_DEBUG_SV.log(l_module_name,'After Serial_Check.Inv_mark_Serial l_success',l_success);
11857: END IF;
11858: ELSE
11859: Serial_Check.Inv_Mark_Serial(
11860: l_new_sn,
11865: l_transaction_temp_id,
11866: l_transaction_temp_id,
11867: l_success);
11868: IF l_debug_on THEN
11869: WSH_DEBUG_SV.log(l_module_name,'After Serial_Check.Inv_mark_Serial l_success',l_success);
11870: END IF;
11871: END IF;
11872: --RTV Changes
11873: IF l_success < 0 THEN
11885:
11886: l_qty_to_split := 0;
11887:
11888: IF l_debug_on THEN
11889: WSH_DEBUG_SV.log(l_module_name,'new serial_number',
11890: x_new_delivery_detail_rec.serial_number);
11891: END IF;
11892: ELSE
11893: IF l_debug_on THEN
11890: x_new_delivery_detail_rec.serial_number);
11891: END IF;
11892: ELSE
11893: IF l_debug_on THEN
11894: WSH_DEBUG_SV.logmsg(l_module_name,'Split qty is grater than range');
11895: END IF;
11896:
11897: IF l_transaction_temp_id IS NOT NULL THEN
11898: IF l_debug_on THEN
11895: END IF;
11896:
11897: IF l_transaction_temp_id IS NOT NULL THEN
11898: IF l_debug_on THEN
11899: WSH_DEBUG_SV.log(l_module_name,
11900: 'Updating mtl_serial_numbers_temp',
11901: l_transaction_temp_id);
11902: END IF;
11903: -- we need to assign the full serial number range to the new line
11909: WHERE rowid = c.rowid;
11910:
11911: --Bug 2740681
11912: IF l_debug_on THEN
11913: WSH_DEBUG_SV.logmsg(l_module_name,'Before Calling Serial_Check.Inv_Unmark_Serial');
11914: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number,to_serial_number,inventory_item_id', c.fm_serial_number ||','||c.to_serial_number ||','||x_old_detail_rec.inventory_item_id);
11915: END IF;
11916: Serial_Check.Inv_Unmark_Serial(
11917: c.fm_serial_number,
11910:
11911: --Bug 2740681
11912: IF l_debug_on THEN
11913: WSH_DEBUG_SV.logmsg(l_module_name,'Before Calling Serial_Check.Inv_Unmark_Serial');
11914: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number,to_serial_number,inventory_item_id', c.fm_serial_number ||','||c.to_serial_number ||','||x_old_detail_rec.inventory_item_id);
11915: END IF;
11916: Serial_Check.Inv_Unmark_Serial(
11917: c.fm_serial_number,
11918: c.to_serial_number,
11921: NULL,
11922: NULL,
11923: x_old_detail_rec.inventory_item_id);
11924: IF l_debug_on THEN
11925: WSH_DEBUG_SV.logmsg(l_module_name,'After Calling Serial_Check.Inv_Unmark_Serial');
11926: END IF;
11927: IF l_debug_on THEN
11928: WSH_DEBUG_SV.logmsg(l_module_name,'Before Calling Serial_Check.Inv_mark_Serial');
11929: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',c.fm_serial_number);
11924: IF l_debug_on THEN
11925: WSH_DEBUG_SV.logmsg(l_module_name,'After Calling Serial_Check.Inv_Unmark_Serial');
11926: END IF;
11927: IF l_debug_on THEN
11928: WSH_DEBUG_SV.logmsg(l_module_name,'Before Calling Serial_Check.Inv_mark_Serial');
11929: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',c.fm_serial_number);
11930: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',c.to_serial_number);
11931: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',x_old_detail_rec.inventory_item_id);
11932: WSH_DEBUG_SV.log(l_module_name,'organization_id',x_old_detail_rec.organization_id);
11925: WSH_DEBUG_SV.logmsg(l_module_name,'After Calling Serial_Check.Inv_Unmark_Serial');
11926: END IF;
11927: IF l_debug_on THEN
11928: WSH_DEBUG_SV.logmsg(l_module_name,'Before Calling Serial_Check.Inv_mark_Serial');
11929: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',c.fm_serial_number);
11930: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',c.to_serial_number);
11931: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',x_old_detail_rec.inventory_item_id);
11932: WSH_DEBUG_SV.log(l_module_name,'organization_id',x_old_detail_rec.organization_id);
11933: WSH_DEBUG_SV.log(l_module_name,'source_header_id',x_old_detail_rec.source_header_id);
11926: END IF;
11927: IF l_debug_on THEN
11928: WSH_DEBUG_SV.logmsg(l_module_name,'Before Calling Serial_Check.Inv_mark_Serial');
11929: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',c.fm_serial_number);
11930: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',c.to_serial_number);
11931: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',x_old_detail_rec.inventory_item_id);
11932: WSH_DEBUG_SV.log(l_module_name,'organization_id',x_old_detail_rec.organization_id);
11933: WSH_DEBUG_SV.log(l_module_name,'source_header_id',x_old_detail_rec.source_header_id);
11934: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
11927: IF l_debug_on THEN
11928: WSH_DEBUG_SV.logmsg(l_module_name,'Before Calling Serial_Check.Inv_mark_Serial');
11929: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',c.fm_serial_number);
11930: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',c.to_serial_number);
11931: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',x_old_detail_rec.inventory_item_id);
11932: WSH_DEBUG_SV.log(l_module_name,'organization_id',x_old_detail_rec.organization_id);
11933: WSH_DEBUG_SV.log(l_module_name,'source_header_id',x_old_detail_rec.source_header_id);
11934: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
11935: WSH_DEBUG_SV.log(l_module_name,'source_line_id',x_old_detail_rec.source_line_id);
11928: WSH_DEBUG_SV.logmsg(l_module_name,'Before Calling Serial_Check.Inv_mark_Serial');
11929: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',c.fm_serial_number);
11930: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',c.to_serial_number);
11931: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',x_old_detail_rec.inventory_item_id);
11932: WSH_DEBUG_SV.log(l_module_name,'organization_id',x_old_detail_rec.organization_id);
11933: WSH_DEBUG_SV.log(l_module_name,'source_header_id',x_old_detail_rec.source_header_id);
11934: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
11935: WSH_DEBUG_SV.log(l_module_name,'source_line_id',x_old_detail_rec.source_line_id);
11936: END IF;
11929: WSH_DEBUG_SV.log(l_module_name,'fm_serial_number',c.fm_serial_number);
11930: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',c.to_serial_number);
11931: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',x_old_detail_rec.inventory_item_id);
11932: WSH_DEBUG_SV.log(l_module_name,'organization_id',x_old_detail_rec.organization_id);
11933: WSH_DEBUG_SV.log(l_module_name,'source_header_id',x_old_detail_rec.source_header_id);
11934: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
11935: WSH_DEBUG_SV.log(l_module_name,'source_line_id',x_old_detail_rec.source_line_id);
11936: END IF;
11937: --RTV Changes
11930: WSH_DEBUG_SV.log(l_module_name,'to_serial_number',c.to_serial_number);
11931: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',x_old_detail_rec.inventory_item_id);
11932: WSH_DEBUG_SV.log(l_module_name,'organization_id',x_old_detail_rec.organization_id);
11933: WSH_DEBUG_SV.log(l_module_name,'source_header_id',x_old_detail_rec.source_header_id);
11934: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
11935: WSH_DEBUG_SV.log(l_module_name,'source_line_id',x_old_detail_rec.source_line_id);
11936: END IF;
11937: --RTV Changes
11938: IF x_old_detail_rec.source_code = 'RTV' THEN
11931: WSH_DEBUG_SV.log(l_module_name,'inventory_item_id',x_old_detail_rec.inventory_item_id);
11932: WSH_DEBUG_SV.log(l_module_name,'organization_id',x_old_detail_rec.organization_id);
11933: WSH_DEBUG_SV.log(l_module_name,'source_header_id',x_old_detail_rec.source_header_id);
11934: WSH_DEBUG_SV.log(l_module_name,'l_transaction_temp_id',l_transaction_temp_id);
11935: WSH_DEBUG_SV.log(l_module_name,'source_line_id',x_old_detail_rec.source_line_id);
11936: END IF;
11937: --RTV Changes
11938: IF x_old_detail_rec.source_code = 'RTV' THEN
11939: Serial_Check.Inv_Mark_Serial(
11945: l_transaction_temp_id,
11946: x_old_detail_rec.source_line_id,
11947: l_success);
11948: IF l_debug_on THEN
11949: WSH_DEBUG_SV.log(l_module_name,'After Serial_Check.Inv_mark_Serial l_success',l_success);
11950: END IF;
11951: ELSE
11952: Serial_Check.Inv_Mark_Serial(
11953: c.fm_serial_number,
11958: l_transaction_temp_id,
11959: l_transaction_temp_id,
11960: l_success);
11961: IF l_debug_on THEN
11962: WSH_DEBUG_SV.log(l_module_name,'After Serial_Check.Inv_mark_Serial l_success',l_success);
11963: END IF;
11964: END IF;
11965: --RTV changes
11966: IF l_success < 0 THEN
11981: l_qty_to_split := l_qty_to_split - l_range_count;
11982:
11983: END IF; -- l_range_count > l_qty_to_split
11984: IF l_debug_on THEN
11985: WSH_DEBUG_SV.log(l_module_name,'l_qty_to_split',
11986: l_qty_to_split);
11987: END IF;
11988:
11989: IF (l_qty_to_split <= 0) AND (p_old_shipped_quantity > 1) THEN
12000: END IF; -- p_old_shipped_quantity < x_old_detail_rec.shipped_quantity
12001:
12002: --
12003: IF l_debug_on THEN
12004: WSH_DEBUG_SV.pop(l_module_name);
12005: END IF;
12006: --
12007: EXCEPTION
12008: WHEN others THEN
12010: wsh_util_core.default_handler('WSH_USA_ACTIONS_PVT.SPLIT_SERIAL_NUMBERS_INT',l_module_name);
12011:
12012: --
12013: IF l_debug_on THEN
12014: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12015: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
12016: END IF;
12017: --
12018: END Split_Serial_Numbers_INT;
12011:
12012: --
12013: IF l_debug_on THEN
12014: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12015: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
12016: END IF;
12017: --
12018: END Split_Serial_Numbers_INT;
12019:
12119: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
12120: --
12121: IF l_debug_on IS NULL
12122: THEN
12123: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
12124: END IF;
12125: --
12126: IF l_debug_on THEN
12127: WSH_DEBUG_SV.push(l_module_name);
12123: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
12124: END IF;
12125: --
12126: IF l_debug_on THEN
12127: WSH_DEBUG_SV.push(l_module_name);
12128: --
12129: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
12130: END IF;
12131:
12125: --
12126: IF l_debug_on THEN
12127: WSH_DEBUG_SV.push(l_module_name);
12128: --
12129: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATE_FLAG',P_VALIDATE_FLAG);
12130: END IF;
12131:
12132: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12133:
12133:
12134: IF ( p_ids_tobe_unassigned.COUNT = 0 ) THEN
12135: --
12136: IF l_debug_on THEN
12137: WSH_DEBUG_SV.pop(l_module_name);
12138: END IF;
12139: --
12140: RETURN;
12141: END IF;
12141: END IF;
12142:
12143: FOR i in 1..p_ids_tobe_unassigned.COUNT LOOP
12144: IF l_debug_on THEN
12145: WSH_DEBUG_SV.log(l_module_name,'detail to be unassigned ',p_ids_tobe_unassigned(i));
12146: END IF;
12147: -- Get the parent container, if it exists
12148: OPEN get_container(p_ids_tobe_unassigned(i));
12149: FETCH get_container
12154: END IF;
12155: CLOSE get_container;
12156:
12157: IF l_debug_on THEN
12158: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_DETAIL_FROM_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
12159: END IF;
12160:
12161: -- Unassign the Line or Container
12162: -- because this
12167: );
12168:
12169: --
12170: IF l_debug_on THEN
12171: WSH_DEBUG_SV.log(l_module_name, 'AFTER CALLING UNASSIGN_DETAIL_FROM_DELIVERY: ', L_RETURN_STATUS);
12172: END IF;
12173: --
12174: -- Check if the Parent Container is empty, if yes, recursivelly call this API
12175: IF ( l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
12180: WSH_UTIL_CORE.ADD_MESSAGE(x_return_status,l_module_name);
12181: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12182: --
12183: --IF l_debug_on THEN
12184: --WSH_DEBUG_SV.pop(l_module_name);
12185: --END IF;
12186: --
12187: --RETURN; LPN CONV. rv
12188: raise e_return_excp; -- LPN CONV. rv
12197: END IF;
12198: CLOSE get_lines;
12199:
12200: IF l_debug_on THEN
12201: WSH_DEBUG_SV.log(l_module_name, 'L_LINE_ID ', L_LINE_ID);
12202: END IF;
12203:
12204: IF l_line_id IS NULL THEN
12205: IF l_debug_on THEN
12202: END IF;
12203:
12204: IF l_line_id IS NULL THEN
12205: IF l_debug_on THEN
12206: WSH_DEBUG_SV.log(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNASSIGN_UNPACK_EMPTY_CONT
12207: recursively for ',l_parent_container_id(1));
12208: END IF;
12209:
12210: -- lpn conv
12232: unassign_unpack_empty_cont ( p_ids_tobe_unassigned => l_parent_container_id,
12233: p_validate_flag => p_validate_flag,
12234: x_return_status => l_return_status);
12235: IF l_debug_on THEN
12236: WSH_DEBUG_SV.log(l_module_name, 'After calling UNASSIGN_UNPACK_EMPTY_CONT: ', L_RETURN_STATUS);
12237: END IF;
12238: IF ( l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
12239: IF x_return_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12240: x_return_status := l_return_status ;
12243: END IF;
12244: END IF;
12245: IF x_return_status IN ( WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ) THEN
12246: --IF l_debug_on THEN
12247: --WSH_DEBUG_SV.pop(l_module_name);
12248: --END IF;
12249: --RETURN; LPN CONV. rv
12250: raise e_return_excp; -- LPN CONV. rv
12251: END IF;
12261: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
12262: THEN
12263: --{
12264: IF l_debug_on THEN
12265: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
12266: END IF;
12267:
12268: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
12269: (
12273: );
12274: --
12275: --
12276: IF l_debug_on THEN
12277: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
12278: END IF;
12279: --
12280: --
12281: IF ( l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
12292: -- K LPN CONV. rv
12293: --
12294: -- Added a pop as it was missing.
12295: IF l_debug_on THEN
12296: WSH_DEBUG_SV.pop(l_module_name);
12297: END IF;
12298:
12299: EXCEPTION
12300: WHEN e_return_excp THEN
12304: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
12305: THEN
12306: --{
12307: IF l_debug_on THEN
12308: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
12309: END IF;
12310:
12311: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
12312: (
12316: );
12317: --
12318: --
12319: IF l_debug_on THEN
12320: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
12321: END IF;
12322: --
12323: --
12324: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR,WSH_UTIL_CORE.G_RET_STS_ERROR) AND x_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
12330: --
12331: -- K LPN CONV. rv
12332: --
12333: IF l_debug_on THEN
12334: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:e_return_excp');
12335: END IF;
12336:
12337: WHEN OTHERS THEN
12338: wsh_util_core.default_handler('WSH_NEW_DELIVERY_ACTIONS.unassign_unpack_empty_cont');
12338: wsh_util_core.default_handler('WSH_NEW_DELIVERY_ACTIONS.unassign_unpack_empty_cont');
12339: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
12340: --
12341: IF l_debug_on THEN
12342: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12343: END IF;
12344: --
12345: --
12346: -- K LPN CONV. rv
12348: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
12349: THEN
12350: --{
12351: IF l_debug_on THEN
12352: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
12353: END IF;
12354:
12355: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
12356: (
12360: );
12361: --
12362: --
12363: IF l_debug_on THEN
12364: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
12365: END IF;
12366: --
12367: --
12368: --}
12373: --
12374: -- Debug Statements
12375: --
12376: IF l_debug_on THEN
12377: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
12378: END IF;
12379: --
12380:
12381: END unassign_unpack_empty_cont;
12467: --
12468: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
12469: --
12470: IF l_debug_on IS NULL THEN
12471: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
12472: END IF;
12473: --
12474: IF l_debug_on THEN
12475: WSH_DEBUG_SV.push(l_module_name);
12471: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
12472: END IF;
12473: --
12474: IF l_debug_on THEN
12475: WSH_DEBUG_SV.push(l_module_name);
12476: --
12477: WSH_DEBUG_SV.log(l_module_name,'P_OLD_DELIVERY_DETAIL_ID',P_OLD_DELIVERY_DETAIL_ID);
12478: WSH_DEBUG_SV.log(l_module_name,'P_NEW_DELIVERY_DETAIL_ID',P_NEW_DELIVERY_DETAIL_ID);
12479: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
12473: --
12474: IF l_debug_on THEN
12475: WSH_DEBUG_SV.push(l_module_name);
12476: --
12477: WSH_DEBUG_SV.log(l_module_name,'P_OLD_DELIVERY_DETAIL_ID',P_OLD_DELIVERY_DETAIL_ID);
12478: WSH_DEBUG_SV.log(l_module_name,'P_NEW_DELIVERY_DETAIL_ID',P_NEW_DELIVERY_DETAIL_ID);
12479: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
12480: --
12481: END IF;
12474: IF l_debug_on THEN
12475: WSH_DEBUG_SV.push(l_module_name);
12476: --
12477: WSH_DEBUG_SV.log(l_module_name,'P_OLD_DELIVERY_DETAIL_ID',P_OLD_DELIVERY_DETAIL_ID);
12478: WSH_DEBUG_SV.log(l_module_name,'P_NEW_DELIVERY_DETAIL_ID',P_NEW_DELIVERY_DETAIL_ID);
12479: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
12480: --
12481: END IF;
12482:
12475: WSH_DEBUG_SV.push(l_module_name);
12476: --
12477: WSH_DEBUG_SV.log(l_module_name,'P_OLD_DELIVERY_DETAIL_ID',P_OLD_DELIVERY_DETAIL_ID);
12478: WSH_DEBUG_SV.log(l_module_name,'P_NEW_DELIVERY_DETAIL_ID',P_NEW_DELIVERY_DETAIL_ID);
12479: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
12480: --
12481: END IF;
12482:
12483: select requested_quantity,requested_quantity2 into l_qty1,l_qty2
12484: from wsh_delivery_details
12485: where delivery_detail_id = p_new_delivery_detail_id;
12486:
12487: IF l_debug_on THEN
12488: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
12489: END IF;
12490: --
12491: FOR pexceptions in parent_del_exception
12492: LOOP
12512: -- To ensure exceptions are logged against split delivery detail, its required
12513: -- to pass null to l_dummy_exception_id which is used to determine, when to INSERT
12514: -- and when to UPDATE exceptions
12515: IF l_debug_on THEN
12516: WSH_DEBUG_SV.log(l_module_name,'EXCEPTION NAME-',pexceptions.exception_name);
12517: WSH_DEBUG_SV.log(l_module_name,'p_action -',p_action);
12518:
12519: END IF;
12520:
12513: -- to pass null to l_dummy_exception_id which is used to determine, when to INSERT
12514: -- and when to UPDATE exceptions
12515: IF l_debug_on THEN
12516: WSH_DEBUG_SV.log(l_module_name,'EXCEPTION NAME-',pexceptions.exception_name);
12517: WSH_DEBUG_SV.log(l_module_name,'p_action -',p_action);
12518:
12519: END IF;
12520:
12521: l_dummy_exception_id := NULL;
12584: --
12585: -- Debug Statements
12586: --
12587: IF l_debug_on THEN
12588: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH_XC_UTIL.LOG_EXCEPTION DID NOTRETURN SUCCESS' );
12589: END IF;
12590: --
12591: END IF;
12592:
12590: --
12591: END IF;
12592:
12593: IF l_debug_on THEN
12594: WSH_DEBUG_SV.pop(l_module_name);
12595: END IF;
12596:
12597: EXCEPTION
12598: WHEN OTHERS THEN
12596:
12597: EXCEPTION
12598: WHEN OTHERS THEN
12599: IF l_debug_on THEN
12600: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12601: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
12602: END IF;
12603:
12604: END Log_Exceptions;
12597: EXCEPTION
12598: WHEN OTHERS THEN
12599: IF l_debug_on THEN
12600: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
12601: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
12602: END IF;
12603:
12604: END Log_Exceptions;
12605: /*2442099*/
12708: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
12709: --
12710: IF l_debug_on IS NULL THEN
12711:
12712: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
12713: END IF;
12714: --
12715: IF l_debug_on THEN
12716:
12713: END IF;
12714: --
12715: IF l_debug_on THEN
12716:
12717: WSH_DEBUG_SV.push(l_module_name);
12718: END IF;
12719: --
12720:
12721: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
12728: --
12729: -- Debug Statements
12730: --
12731: IF l_debug_on THEN
12732: WSH_DEBUG_SV.log(l_module_name,'********* Processing the Delivery Detail Id:',p_Cons_Source_Line_Rec_Tab(i).delivery_detail_id);
12733: END IF;
12734: --
12735: l_temp_cnt := l_delete_dd_ids.COUNT;
12736: l_total_req_qty := 0;
12746: -- Debug Statements
12747: --
12748: IF l_debug_on THEN
12749: --
12750: WSH_DEBUG_SV.log(l_module_name,'Found Existing Back Order Del Det line: ',l_del_det_Id);
12751: END IF;
12752: --
12753: l_delete_dd_ids(l_delete_dd_ids.COUNT + 1) :=l_del_det_Id;
12754: l_total_req_qty := l_total_req_qty + l_req_qty;
12773: --
12774: -- Debug Statements
12775: --
12776: IF l_debug_on THEN
12777: WSH_DEBUG_SV.log(l_module_name,'Consolidated Into Delivery Detail Id ',l_cons_dd_ids(l_cons_dd_ids.COUNT));
12778: END IF;
12779:
12780: -- Getting the shipping and packing instructions from the source line id. which are to be assigned
12781: -- to final delivery detail for the given source line id.
12785:
12786: -- muom
12787: l_fulfill_base := NVL(p_Cons_Source_Line_Rec_Tab(i).fulfillment_base,'P');
12788: IF l_debug_on THEN
12789: WSH_DEBUG_SV.logmsg(l_module_name,'Fulfillment Base is '||l_fulfill_base);
12790: WSH_DEBUG_SV.logmsg(l_module_name,'p_Cons_Source_Line_Rec_Tab(i).bo_qty '||p_Cons_Source_Line_Rec_Tab(i).bo_qty||' p_Cons_Source_Line_Rec_Tab(i).req_qty '||p_Cons_Source_Line_Rec_Tab(i).req_qty);
12791: WSH_DEBUG_SV.logmsg(l_module_name,'p_Cons_Source_Line_Rec_Tab(i).bo_qty2 '||p_Cons_Source_Line_Rec_Tab(i).bo_qty2||' p_Cons_Source_Line_Rec_Tab(i).req_qty2 '||p_Cons_Source_Line_Rec_Tab(i).req_qty2);
12792: END IF;
12793:
12786: -- muom
12787: l_fulfill_base := NVL(p_Cons_Source_Line_Rec_Tab(i).fulfillment_base,'P');
12788: IF l_debug_on THEN
12789: WSH_DEBUG_SV.logmsg(l_module_name,'Fulfillment Base is '||l_fulfill_base);
12790: WSH_DEBUG_SV.logmsg(l_module_name,'p_Cons_Source_Line_Rec_Tab(i).bo_qty '||p_Cons_Source_Line_Rec_Tab(i).bo_qty||' p_Cons_Source_Line_Rec_Tab(i).req_qty '||p_Cons_Source_Line_Rec_Tab(i).req_qty);
12791: WSH_DEBUG_SV.logmsg(l_module_name,'p_Cons_Source_Line_Rec_Tab(i).bo_qty2 '||p_Cons_Source_Line_Rec_Tab(i).bo_qty2||' p_Cons_Source_Line_Rec_Tab(i).req_qty2 '||p_Cons_Source_Line_Rec_Tab(i).req_qty2);
12792: END IF;
12793:
12794: -- Storing the final delivery detail id in the out parameter
12787: l_fulfill_base := NVL(p_Cons_Source_Line_Rec_Tab(i).fulfillment_base,'P');
12788: IF l_debug_on THEN
12789: WSH_DEBUG_SV.logmsg(l_module_name,'Fulfillment Base is '||l_fulfill_base);
12790: WSH_DEBUG_SV.logmsg(l_module_name,'p_Cons_Source_Line_Rec_Tab(i).bo_qty '||p_Cons_Source_Line_Rec_Tab(i).bo_qty||' p_Cons_Source_Line_Rec_Tab(i).req_qty '||p_Cons_Source_Line_Rec_Tab(i).req_qty);
12791: WSH_DEBUG_SV.logmsg(l_module_name,'p_Cons_Source_Line_Rec_Tab(i).bo_qty2 '||p_Cons_Source_Line_Rec_Tab(i).bo_qty2||' p_Cons_Source_Line_Rec_Tab(i).req_qty2 '||p_Cons_Source_Line_Rec_Tab(i).req_qty2);
12792: END IF;
12793:
12794: -- Storing the final delivery detail id in the out parameter
12795: x_consolidate_ids(i):= l_cons_dd_ids(l_cons_dd_ids.COUNT);
12807: --
12808: -- Debug Statements
12809: --
12810: IF l_debug_on THEN
12811: WSH_DEBUG_SV.log(l_module_name,'Updating Req Qty for the Del Det Id (Bo Qty < Req. Qty) ',l_partial_dd_ids (l_partial_dd_ids.COUNT));
12812: END IF;
12813: --
12814: ELSE
12815: l_delete_dd_ids(l_delete_dd_ids.COUNT+1):= p_Cons_Source_Line_Rec_Tab(i).delivery_detail_id;
12816: --
12817: -- Debug Statements
12818: --
12819: IF l_debug_on THEN
12820: WSH_DEBUG_SV.log(l_module_name,'Deleting the Del Det Id (Bo Qty = Req qty)',l_delete_dd_ids(l_delete_dd_ids.COUNT));
12821: END IF;
12822: --
12823: END IF; --} Is it Partial BO
12824: ELSE -- No consolidation if possible for the delivery Detail id
12825: --
12826: -- Debug Statements
12827: --
12828: IF l_debug_on THEN
12829: WSH_DEBUG_SV.log(l_module_name,'No Existing Back Order Del Det Lines found');
12830: END IF;
12831: --
12832: x_consolidate_ids (i) := p_Cons_Source_Line_Rec_Tab(i).delivery_detail_id;
12833: END IF; --} Check for existing back order lines
12847: --
12848: -- Debug Statements
12849: --
12850: IF l_debug_on THEN
12851: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.DELETE_DELIVERY_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
12852: END IF;
12853: --
12854: WSH_DELIVERY_DETAILS_PKG.Delete_Delivery_Details(
12855: p_delivery_detail_id => l_delete_dd_ids(i),
12856: x_return_status => l_return_status );
12857:
12858: --
12859: IF l_debug_on THEN
12860: WSH_DEBUG_SV.logmsg(l_module_name, 'After calling DELETE_DELIVERY_DETAILS: ' || l_return_status );
12861: END IF;
12862: --
12863: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12864: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12868:
12869: END LOOP; -- }
12870:
12871: IF l_debug_on THEN
12872: WSH_DEBUG_SV.log(l_module_name,'Updating details for consolidation.Detail Count-',l_cons_dd_ids.count);
12873: END IF;
12874: -- Updating the selected Delivery Details for the consolidation with corresponding total Qty
12875: FOR i IN 1..l_cons_dd_ids.COUNT LOOP
12876: -- HW OPM BUG#:3121616 added qty2s
12900: -- Update of wsh_delivery_details where requested_quantity/released_status
12901: -- are changed, call DBI API after the update.
12902: -- DBI API will check if DBI is installed
12903: IF l_debug_on THEN
12904: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail Count-',l_cons_dd_ids.count);
12905: END IF;
12906: WSH_INTEGRATION.DBI_Update_Detail_Log
12907: (p_delivery_detail_id_tab => l_cons_dd_ids,
12908: p_dml_type => 'UPDATE',
12908: p_dml_type => 'UPDATE',
12909: x_return_status => l_dbi_rs);
12910:
12911: IF l_debug_on THEN
12912: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
12913: END IF;
12914: -- Only Handle Unexpected error
12915: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
12916: --
12924: FORALL i IN 1..l_cons_dd_ids.COUNT
12925: DELETE FROM WSH_FREIGHT_COSTS
12926: WHERE delivery_detail_id = l_cons_dd_ids(i);
12927: IF l_debug_on THEN
12928: WSH_DEBUG_SV.log(l_module_name,'Freight Cost Rows deleted',SQL%ROWCOUNT);
12929: END IF;
12930:
12931: -- J: W/V Changes
12932: IF l_debug_on THEN
12929: END IF;
12930:
12931: -- J: W/V Changes
12932: IF l_debug_on THEN
12933: WSH_DEBUG_SV.logmsg(l_module_name,'l_cons_dd_ids.COUNT '||l_cons_dd_ids.COUNT);
12934: END IF;
12935:
12936: IF l_cons_dd_ids.COUNT > 0 THEN
12937:
12937:
12938: FOR l_index in l_cons_dd_ids.FIRST..l_cons_dd_ids.LAST LOOP
12939:
12940: IF l_debug_on THEN
12941: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DETAIL_WEIGHT_VOLUME',WSH_DEBUG_SV.C_PROC_LEVEL);
12942: END IF;
12943: --
12944: WSH_WV_UTILS.Detail_Weight_Volume(
12945: p_delivery_detail_id => l_cons_dd_ids(l_index),
12949: x_net_weight => l_tmp_weight,
12950: x_volume => l_tmp_volume,
12951: x_return_status => l_return_status);
12952: IF l_debug_on THEN
12953: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
12954: END IF;
12955: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12956: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12957: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
12963: END LOOP;
12964: END IF;
12965:
12966: IF l_debug_on THEN
12967: WSH_DEBUG_SV.log(l_module_name,'Updating partial bkorder cases.Detail Count-',l_partial_dd_ids.count);
12968: END IF;
12969: -- Updating the partial Back order cases. Qty should be subtracted for the partial case
12970: FORALL i IN 1..l_partial_dd_ids.COUNT
12971: -- HW OPM BUG#:3121616 added qty2s
12979: -- Update of wsh_delivery_details where requested_quantity/released_status
12980: -- are changed, call DBI API after the update.
12981: -- DBI API will check if DBI is installed
12982: IF l_debug_on THEN
12983: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail Count-',l_partial_dd_ids.count);
12984: END IF;
12985: WSH_INTEGRATION.DBI_Update_Detail_Log
12986: (p_delivery_detail_id_tab => l_partial_dd_ids,
12987: p_dml_type => 'UPDATE',
12987: p_dml_type => 'UPDATE',
12988: x_return_status => l_dbi_rs);
12989:
12990: IF l_debug_on THEN
12991: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
12992: END IF;
12993: -- Only Handle Unexpected error
12994: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
12995: --
13001: -- We need to adjust the W/V if DDs W/V is frozen
13002: IF l_partial_dd_ids.COUNT > 0 THEN
13003:
13004: IF l_debug_on THEN
13005: WSH_DEBUG_SV.logmsg(l_module_name,'l_partial_dd_ids.COUNT '||l_partial_dd_ids.COUNT);
13006: END IF;
13007:
13008: FOR l_index in l_partial_dd_ids.FIRST..l_partial_dd_ids.LAST LOOP
13009:
13020:
13021: IF l_wv_frozen_flag = 'Y' THEN
13022:
13023: IF l_debug_on THEN
13024: WSH_DEBUG_SV.logmsg(l_module_name,'W/V Frozen flag is Y for DD '||l_partial_dd_ids(l_index));
13025: END IF;
13026:
13027: l_new_gross_wt := round(l_gross_weight * (l_partial_req_qtys(l_index)/l_partial_org_req_qtys(l_index)) ,5);
13028: l_new_net_wt := round(l_net_weight * (l_partial_req_qtys(l_index)/l_partial_org_req_qtys(l_index)) ,5);
13028: l_new_net_wt := round(l_net_weight * (l_partial_req_qtys(l_index)/l_partial_org_req_qtys(l_index)) ,5);
13029: l_new_vol := round(l_volume * (l_partial_req_qtys(l_index)/l_partial_org_req_qtys(l_index)) ,5);
13030:
13031: IF l_debug_on THEN
13032: WSH_DEBUG_SV.logmsg(l_module_name,'Updating DD '||l_partial_dd_ids(l_index)||' with Gross '||l_new_gross_wt||' Net '||l_new_net_wt||' Vol '||l_new_vol);
13033: END IF;
13034:
13035: UPDATE wsh_delivery_details
13036: set gross_weight = l_new_gross_wt,
13038: volume = l_new_vol
13039: WHERE delivery_detail_id = l_partial_dd_ids(l_index);
13040:
13041: IF l_debug_on THEN
13042: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.DD_WV_Post_Process',WSH_DEBUG_SV.C_PROC_LEVEL);
13043: END IF;
13044:
13045: WSH_WV_UTILS.DD_WV_Post_Process(
13046: p_delivery_detail_id => l_partial_dd_ids(l_index),
13053: --
13054: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13055: WSH_UTIL_CORE.Add_Message(x_return_status);
13056: IF l_debug_on THEN
13057: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
13058: WSH_DEBUG_SV.pop(l_module_name);
13059: END IF;
13060: return;
13061: END IF;
13054: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13055: WSH_UTIL_CORE.Add_Message(x_return_status);
13056: IF l_debug_on THEN
13057: WSH_DEBUG_SV.log(l_module_name,'Return Status',x_return_status);
13058: WSH_DEBUG_SV.pop(l_module_name);
13059: END IF;
13060: return;
13061: END IF;
13062:
13067: --
13068: -- Debug Statements
13069: --
13070: IF l_debug_on THEN
13071: WSH_DEBUG_SV.pop(l_module_name);
13072: END IF;
13073: --
13074: EXCEPTION
13075:
13077: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13078:
13079: --
13080: IF l_debug_on THEN
13081: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
13082: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
13083: END IF;
13084: --
13085: return;
13078:
13079: --
13080: IF l_debug_on THEN
13081: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
13082: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
13083: END IF;
13084: --
13085: return;
13086: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
13086: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
13087: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
13088: --
13089: IF l_debug_on THEN
13090: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
13091: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
13092: END IF;
13093: --
13094: return;
13087: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
13088: --
13089: IF l_debug_on THEN
13090: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
13091: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
13092: END IF;
13093: --
13094: return;
13095:
13100: --
13101: -- Debug Statements
13102: --
13103: IF l_debug_on THEN
13104: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13105: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
13106: END IF;
13107: --
13108: END Consolidate_Source_Line;
13101: -- Debug Statements
13102: --
13103: IF l_debug_on THEN
13104: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13105: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
13106: END IF;
13107: --
13108: END Consolidate_Source_Line;
13109:
13169: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
13170: --
13171: IF l_debug_on IS NULL
13172: THEN
13173: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
13174: END IF;
13175: --
13176: IF l_debug_on THEN
13177: WSH_DEBUG_SV.push(l_module_name);
13173: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
13174: END IF;
13175: --
13176: IF l_debug_on THEN
13177: WSH_DEBUG_SV.push(l_module_name);
13178: --
13179: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',p_delivery_detail_id);
13180: WSH_DEBUG_SV.log(l_module_name,'P_BO_QTY',p_bo_qty);
13181: WSH_DEBUG_SV.log(l_module_name,'P_OVERPICK_QTY',p_overpick_qty);
13175: --
13176: IF l_debug_on THEN
13177: WSH_DEBUG_SV.push(l_module_name);
13178: --
13179: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',p_delivery_detail_id);
13180: WSH_DEBUG_SV.log(l_module_name,'P_BO_QTY',p_bo_qty);
13181: WSH_DEBUG_SV.log(l_module_name,'P_OVERPICK_QTY',p_overpick_qty);
13182: -- muom
13183: WSH_DEBUG_SV.log(l_module_name,'P_BO_QTY2S',p_bo_qty2s);
13176: IF l_debug_on THEN
13177: WSH_DEBUG_SV.push(l_module_name);
13178: --
13179: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',p_delivery_detail_id);
13180: WSH_DEBUG_SV.log(l_module_name,'P_BO_QTY',p_bo_qty);
13181: WSH_DEBUG_SV.log(l_module_name,'P_OVERPICK_QTY',p_overpick_qty);
13182: -- muom
13183: WSH_DEBUG_SV.log(l_module_name,'P_BO_QTY2S',p_bo_qty2s);
13184: WSH_DEBUG_SV.log(l_module_name,'P_OVERPICK_QTY2S',p_overpick_qty2s);
13177: WSH_DEBUG_SV.push(l_module_name);
13178: --
13179: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',p_delivery_detail_id);
13180: WSH_DEBUG_SV.log(l_module_name,'P_BO_QTY',p_bo_qty);
13181: WSH_DEBUG_SV.log(l_module_name,'P_OVERPICK_QTY',p_overpick_qty);
13182: -- muom
13183: WSH_DEBUG_SV.log(l_module_name,'P_BO_QTY2S',p_bo_qty2s);
13184: WSH_DEBUG_SV.log(l_module_name,'P_OVERPICK_QTY2S',p_overpick_qty2s);
13185: WSH_DEBUG_SV.log(l_module_name,'P_BO_MODE',P_BO_MODE);
13179: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',p_delivery_detail_id);
13180: WSH_DEBUG_SV.log(l_module_name,'P_BO_QTY',p_bo_qty);
13181: WSH_DEBUG_SV.log(l_module_name,'P_OVERPICK_QTY',p_overpick_qty);
13182: -- muom
13183: WSH_DEBUG_SV.log(l_module_name,'P_BO_QTY2S',p_bo_qty2s);
13184: WSH_DEBUG_SV.log(l_module_name,'P_OVERPICK_QTY2S',p_overpick_qty2s);
13185: WSH_DEBUG_SV.log(l_module_name,'P_BO_MODE',P_BO_MODE);
13186: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_FLAG',P_DELETE_FLAG);
13187: END IF;
13180: WSH_DEBUG_SV.log(l_module_name,'P_BO_QTY',p_bo_qty);
13181: WSH_DEBUG_SV.log(l_module_name,'P_OVERPICK_QTY',p_overpick_qty);
13182: -- muom
13183: WSH_DEBUG_SV.log(l_module_name,'P_BO_QTY2S',p_bo_qty2s);
13184: WSH_DEBUG_SV.log(l_module_name,'P_OVERPICK_QTY2S',p_overpick_qty2s);
13185: WSH_DEBUG_SV.log(l_module_name,'P_BO_MODE',P_BO_MODE);
13186: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_FLAG',P_DELETE_FLAG);
13187: END IF;
13188: --
13181: WSH_DEBUG_SV.log(l_module_name,'P_OVERPICK_QTY',p_overpick_qty);
13182: -- muom
13183: WSH_DEBUG_SV.log(l_module_name,'P_BO_QTY2S',p_bo_qty2s);
13184: WSH_DEBUG_SV.log(l_module_name,'P_OVERPICK_QTY2S',p_overpick_qty2s);
13185: WSH_DEBUG_SV.log(l_module_name,'P_BO_MODE',P_BO_MODE);
13186: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_FLAG',P_DELETE_FLAG);
13187: END IF;
13188: --
13189: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
13182: -- muom
13183: WSH_DEBUG_SV.log(l_module_name,'P_BO_QTY2S',p_bo_qty2s);
13184: WSH_DEBUG_SV.log(l_module_name,'P_OVERPICK_QTY2S',p_overpick_qty2s);
13185: WSH_DEBUG_SV.log(l_module_name,'P_BO_MODE',P_BO_MODE);
13186: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_FLAG',P_DELETE_FLAG);
13187: END IF;
13188: --
13189: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
13190:
13191: --
13192: -- Debug Statements
13193: --
13194: IF l_debug_on THEN
13195: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.unassign_unpack_empty_cont',WSH_DEBUG_SV.C_PROC_LEVEL);
13196: END IF;
13197: --
13198: l_delivery_detail_ids(1) := p_delivery_detail_id;
13199: IF (p_delete_flag = 'Y') THEN --{
13224: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
13225: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13226: END IF;
13227: IF l_debug_on THEN
13228: WSH_DEBUG_SV.LOG(l_module_name, 'Is item lot divisible?', l_item_info.lot_divisible_flag);
13229: -- muom
13230: WSH_DEBUG_SV.LOG(l_module_name, 'l_fulfillment_base', l_fulfillment_base);
13231: END IF;
13232:
13226: END IF;
13227: IF l_debug_on THEN
13228: WSH_DEBUG_SV.LOG(l_module_name, 'Is item lot divisible?', l_item_info.lot_divisible_flag);
13229: -- muom
13230: WSH_DEBUG_SV.LOG(l_module_name, 'l_fulfillment_base', l_fulfillment_base);
13231: END IF;
13232:
13233: IF l_item_info.lot_divisible_flag = 'Y' OR l_item_info.lot_control_code <> 2 THEN --{
13234: -- muom
13236: --
13237: -- Debug Statements
13238: --
13239: IF l_debug_on THEN
13240: WSH_DEBUG_SV.logmsg(l_module_name,'Unreserving the Backordered quantity ');
13241: WSH_DEBUG_SV.logmsg(l_module_name,'... delivery_detail_id '|| p_delivery_detail_id);
13242: -- muom
13243: WSH_DEBUG_SV.logmsg(l_module_name,'... backordered quantity '||p_bo_qty||' backordered quantity2 '||p_bo_qty2s );
13244: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNRESERVE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
13237: -- Debug Statements
13238: --
13239: IF l_debug_on THEN
13240: WSH_DEBUG_SV.logmsg(l_module_name,'Unreserving the Backordered quantity ');
13241: WSH_DEBUG_SV.logmsg(l_module_name,'... delivery_detail_id '|| p_delivery_detail_id);
13242: -- muom
13243: WSH_DEBUG_SV.logmsg(l_module_name,'... backordered quantity '||p_bo_qty||' backordered quantity2 '||p_bo_qty2s );
13244: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNRESERVE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
13245: END IF;
13239: IF l_debug_on THEN
13240: WSH_DEBUG_SV.logmsg(l_module_name,'Unreserving the Backordered quantity ');
13241: WSH_DEBUG_SV.logmsg(l_module_name,'... delivery_detail_id '|| p_delivery_detail_id);
13242: -- muom
13243: WSH_DEBUG_SV.logmsg(l_module_name,'... backordered quantity '||p_bo_qty||' backordered quantity2 '||p_bo_qty2s );
13244: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNRESERVE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
13245: END IF;
13246: --
13247: IF (l_fulfillment_base='S' AND p_overpick_qty2s= 0 AND p_overpick_qty>0 ) THEN
13240: WSH_DEBUG_SV.logmsg(l_module_name,'Unreserving the Backordered quantity ');
13241: WSH_DEBUG_SV.logmsg(l_module_name,'... delivery_detail_id '|| p_delivery_detail_id);
13242: -- muom
13243: WSH_DEBUG_SV.logmsg(l_module_name,'... backordered quantity '||p_bo_qty||' backordered quantity2 '||p_bo_qty2s );
13244: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNRESERVE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
13245: END IF;
13246: --
13247: IF (l_fulfillment_base='S' AND p_overpick_qty2s= 0 AND p_overpick_qty>0 ) THEN
13248: WSH_DEBUG_SV.logmsg(l_module_name,'..with . backordered quantity+overpicked quantity '||p_bo_qty||'+'||p_overpick_qty||' backordered quantity2 '||p_bo_qty2s );
13244: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNRESERVE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
13245: END IF;
13246: --
13247: IF (l_fulfillment_base='S' AND p_overpick_qty2s= 0 AND p_overpick_qty>0 ) THEN
13248: WSH_DEBUG_SV.logmsg(l_module_name,'..with . backordered quantity+overpicked quantity '||p_bo_qty||'+'||p_overpick_qty||' backordered quantity2 '||p_bo_qty2s );
13249: wsh_delivery_details_actions.unreserve_delivery_detail(
13250: p_delivery_Detail_id => p_delivery_detail_id,
13251: p_unreserve_mode => p_bo_mode ,
13252: p_quantity_to_unreserve => p_bo_qty+p_overpick_qty,
13277: --
13278: -- Debug Statements
13279: --
13280: IF l_debug_on THEN
13281: WSH_DEBUG_SV.logmsg(l_module_name,'Unreserving the Backordered quantity ');
13282: WSH_DEBUG_SV.logmsg(l_module_name,'... delivery_detail_id '|| p_delivery_detail_id);
13283: WSH_DEBUG_SV.logmsg(l_module_name,'... overpicked quantity '||p_overpick_qty||' overpicked quantity2 '||p_overpick_qty2s );
13284: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNRESERVE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
13285: END IF;
13278: -- Debug Statements
13279: --
13280: IF l_debug_on THEN
13281: WSH_DEBUG_SV.logmsg(l_module_name,'Unreserving the Backordered quantity ');
13282: WSH_DEBUG_SV.logmsg(l_module_name,'... delivery_detail_id '|| p_delivery_detail_id);
13283: WSH_DEBUG_SV.logmsg(l_module_name,'... overpicked quantity '||p_overpick_qty||' overpicked quantity2 '||p_overpick_qty2s );
13284: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNRESERVE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
13285: END IF;
13286: --
13279: --
13280: IF l_debug_on THEN
13281: WSH_DEBUG_SV.logmsg(l_module_name,'Unreserving the Backordered quantity ');
13282: WSH_DEBUG_SV.logmsg(l_module_name,'... delivery_detail_id '|| p_delivery_detail_id);
13283: WSH_DEBUG_SV.logmsg(l_module_name,'... overpicked quantity '||p_overpick_qty||' overpicked quantity2 '||p_overpick_qty2s );
13284: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNRESERVE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
13285: END IF;
13286: --
13287:
13280: IF l_debug_on THEN
13281: WSH_DEBUG_SV.logmsg(l_module_name,'Unreserving the Backordered quantity ');
13282: WSH_DEBUG_SV.logmsg(l_module_name,'... delivery_detail_id '|| p_delivery_detail_id);
13283: WSH_DEBUG_SV.logmsg(l_module_name,'... overpicked quantity '||p_overpick_qty||' overpicked quantity2 '||p_overpick_qty2s );
13284: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNRESERVE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
13285: END IF;
13286: --
13287:
13288: --Bug 4721577 Do not retain reservation for overpicked quantities
13362: --resulting in negative value.
13363: -----
13364:
13365: IF l_debug_on THEN
13366: WSH_DEBUG_SV.logmsg(l_module_name,'Unreserving the Backordered quantity ');
13367: WSH_DEBUG_SV.logmsg(l_module_name,'... delivery_detail_id '|| p_delivery_detail_id);
13368: WSH_DEBUG_SV.logmsg(l_module_name,'... backordered quantity '||l_qty_unres );
13369: -- muom
13370: WSH_DEBUG_SV.logmsg(l_module_name,'... backordered quantity2 '||l_qty2_unres );
13363: -----
13364:
13365: IF l_debug_on THEN
13366: WSH_DEBUG_SV.logmsg(l_module_name,'Unreserving the Backordered quantity ');
13367: WSH_DEBUG_SV.logmsg(l_module_name,'... delivery_detail_id '|| p_delivery_detail_id);
13368: WSH_DEBUG_SV.logmsg(l_module_name,'... backordered quantity '||l_qty_unres );
13369: -- muom
13370: WSH_DEBUG_SV.logmsg(l_module_name,'... backordered quantity2 '||l_qty2_unres );
13371: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNRESERVE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
13364:
13365: IF l_debug_on THEN
13366: WSH_DEBUG_SV.logmsg(l_module_name,'Unreserving the Backordered quantity ');
13367: WSH_DEBUG_SV.logmsg(l_module_name,'... delivery_detail_id '|| p_delivery_detail_id);
13368: WSH_DEBUG_SV.logmsg(l_module_name,'... backordered quantity '||l_qty_unres );
13369: -- muom
13370: WSH_DEBUG_SV.logmsg(l_module_name,'... backordered quantity2 '||l_qty2_unres );
13371: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNRESERVE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
13372: END IF;
13366: WSH_DEBUG_SV.logmsg(l_module_name,'Unreserving the Backordered quantity ');
13367: WSH_DEBUG_SV.logmsg(l_module_name,'... delivery_detail_id '|| p_delivery_detail_id);
13368: WSH_DEBUG_SV.logmsg(l_module_name,'... backordered quantity '||l_qty_unres );
13369: -- muom
13370: WSH_DEBUG_SV.logmsg(l_module_name,'... backordered quantity2 '||l_qty2_unres );
13371: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNRESERVE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
13372: END IF;
13373: --
13374: -- muom
13367: WSH_DEBUG_SV.logmsg(l_module_name,'... delivery_detail_id '|| p_delivery_detail_id);
13368: WSH_DEBUG_SV.logmsg(l_module_name,'... backordered quantity '||l_qty_unres );
13369: -- muom
13370: WSH_DEBUG_SV.logmsg(l_module_name,'... backordered quantity2 '||l_qty2_unres );
13371: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.UNRESERVE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
13372: END IF;
13373: --
13374: -- muom
13375: IF l_fulfillment_base = 'P' THEN
13406: --
13407: -- Debug Statements
13408: --
13409: IF l_debug_on THEN
13410: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.Delete_Delivery_Details',WSH_DEBUG_SV.C_PROC_LEVEL);
13411: END IF;
13412: --
13413:
13414: WSH_DELIVERY_DETAILS_PKG.Delete_Delivery_Details(
13422: END IF;
13423: END IF; --}
13424:
13425: IF l_debug_on THEN
13426: WSH_DEBUG_SV.pop(l_module_name);
13427: END IF;
13428:
13429: EXCEPTION
13430: WHEN FND_API.G_EXC_ERROR then
13432: IF c_detail%ISOPEN THEN
13433: CLOSE c_detail;
13434: END IF;
13435: IF l_debug_on THEN
13436: WSH_DEBUG_SV.pop(l_module_name);
13437: END IF;
13438: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
13439: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
13440: IF c_detail%ISOPEN THEN
13440: IF c_detail%ISOPEN THEN
13441: CLOSE c_detail;
13442: END IF;
13443: IF l_debug_on THEN
13444: WSH_DEBUG_SV.pop(l_module_name);
13445: END IF;
13446: WHEN others THEN
13447: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
13448: IF c_detail%ISOPEN THEN
13450: END IF;
13451: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.Process_Delivery_Details',l_module_name);
13452: --
13453: IF l_debug_on THEN
13454: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13455: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
13456: END IF;
13457: --
13458: END Process_Delivery_Details;
13451: wsh_util_core.default_handler('WSH_DELIVERY_DETAILS_PKG.Process_Delivery_Details',l_module_name);
13452: --
13453: IF l_debug_on THEN
13454: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13455: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
13456: END IF;
13457: --
13458: END Process_Delivery_Details;
13459:
13538: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
13539: --
13540: IF l_debug_on IS NULL
13541: THEN
13542: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
13543: END IF;
13544: --
13545: IF l_debug_on THEN
13546: WSH_DEBUG_SV.push(l_module_name);
13542: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
13543: END IF;
13544: --
13545: IF l_debug_on THEN
13546: WSH_DEBUG_SV.push(l_module_name);
13547:
13548: WSH_DEBUG_SV.log(l_module_name,'P_BO_MODE',p_bo_mode);
13549: END IF;
13550: --
13544: --
13545: IF l_debug_on THEN
13546: WSH_DEBUG_SV.push(l_module_name);
13547:
13548: WSH_DEBUG_SV.log(l_module_name,'P_BO_MODE',p_bo_mode);
13549: END IF;
13550: --
13551:
13552: l_return_status := FND_API.G_RET_STS_SUCCESS;
13601: l_idx := p_delivery_details_tab.NEXT(l_idx);
13602: END LOOP; --}
13603:
13604: IF l_debug_on THEN
13605: WSH_DEBUG_SV.logmsg(l_module_name,'Finding the delivery detail to Consolidate into, from the input list',WSH_DEBUG_SV.C_PROC_LEVEL);
13606: END IF;
13607:
13608: -- Mark the corresponding entry in l_cons_dd_flags(i) to 'Y', if l_detail_ids(i) is
13609: -- the consolidated delivery detail. Mark l_cons_dd_flags(i) to 'N' otherwise.
13672: x_remain_bo_qty2s(x_cons_delivery_details_tab.COUNT) := 0;
13673:
13674: IF l_debug_on THEN
13675: IF p_delivery_details_tab(l_idx).req_qty > 0 THEN
13676: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery details of the Source Line '||p_delivery_details_tab(l_idx).source_line_id ||
13677: ' are getting consolidated into dd_id :'||p_delivery_details_tab(l_idx).delivery_detail_id,WSH_DEBUG_SV.C_PROC_LEVEL);
13678: END IF;
13679: END IF;
13680: END IF; --}
13673:
13674: IF l_debug_on THEN
13675: IF p_delivery_details_tab(l_idx).req_qty > 0 THEN
13676: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery details of the Source Line '||p_delivery_details_tab(l_idx).source_line_id ||
13677: ' are getting consolidated into dd_id :'||p_delivery_details_tab(l_idx).delivery_detail_id,WSH_DEBUG_SV.C_PROC_LEVEL);
13678: END IF;
13679: END IF;
13680: END IF; --}
13681: l_idx := p_delivery_details_tab.NEXT(l_idx);
13713: (l_fulfillment_base(l_cmp_idx) = 'S' and l_bo_qty2s(l_cmp_idx) = l_req_qty2s(l_cmp_idx)) THEN
13714: --{
13715: --
13716: IF l_debug_on THEN
13717: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Process_Delivery_Details',WSH_DEBUG_SV.C_PROC_LEVEL);
13718: WSH_DEBUG_SV.logmsg(l_module_name,'.. to process completely backordered delivery detail '||l_detail_ids(l_cmp_idx),WSH_DEBUG_SV.C_PROC_LEVEL);
13719: END IF;
13720: --
13721: Process_Delivery_Details (
13714: --{
13715: --
13716: IF l_debug_on THEN
13717: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Process_Delivery_Details',WSH_DEBUG_SV.C_PROC_LEVEL);
13718: WSH_DEBUG_SV.logmsg(l_module_name,'.. to process completely backordered delivery detail '||l_detail_ids(l_cmp_idx),WSH_DEBUG_SV.C_PROC_LEVEL);
13719: END IF;
13720: --
13721: Process_Delivery_Details (
13722: p_delivery_detail_id => l_detail_ids(l_cmp_idx),
13742: ELSIF (l_fulfillment_base(l_cmp_idx) = 'P' AND (l_bo_qtys(l_cmp_idx) > 0 OR l_overpick_qtys(l_cmp_idx) > 0)) OR
13743: (l_fulfillment_base(l_cmp_idx) = 'S' AND (l_bo_qty2s(l_cmp_idx) > 0 OR l_overpick_qty2s(l_cmp_idx) > 0)) THEN
13744: --
13745: IF l_debug_on THEN
13746: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Process_Delivery_Details',WSH_DEBUG_SV.C_PROC_LEVEL);
13747: WSH_DEBUG_SV.logmsg(l_module_name,'.. to process partially backordered delivery detail '||l_detail_ids(l_cmp_idx),WSH_DEBUG_SV.C_PROC_LEVEL);
13748: END IF;
13749: --
13750: Process_Delivery_Details (
13743: (l_fulfillment_base(l_cmp_idx) = 'S' AND (l_bo_qty2s(l_cmp_idx) > 0 OR l_overpick_qty2s(l_cmp_idx) > 0)) THEN
13744: --
13745: IF l_debug_on THEN
13746: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Process_Delivery_Details',WSH_DEBUG_SV.C_PROC_LEVEL);
13747: WSH_DEBUG_SV.logmsg(l_module_name,'.. to process partially backordered delivery detail '||l_detail_ids(l_cmp_idx),WSH_DEBUG_SV.C_PROC_LEVEL);
13748: END IF;
13749: --
13750: Process_Delivery_Details (
13751: p_delivery_detail_id => l_detail_ids(l_cmp_idx),
13792: -- Update of wsh_delivery_details where requested_quantity/released_status
13793: -- are changed, call DBI API after the update.
13794: -- This API will also check for DBI Installed or not
13795: IF l_debug_on THEN
13796: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail count-',l_detail_tab.count);
13797: END IF;
13798: WSH_INTEGRATION.DBI_Update_Detail_Log
13799: (p_delivery_detail_id_tab => l_detail_tab,
13800: p_dml_type => 'UPDATE',
13800: p_dml_type => 'UPDATE',
13801: x_return_status => l_dbi_rs);
13802:
13803: IF l_debug_on THEN
13804: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
13805: END IF;
13806: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
13807: -- just pass this return status to caller API
13808: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13845: l_next_idx := x_cons_delivery_details_tab.NEXT(l_next_idx);
13846: END LOOP; --}
13847: --
13848: IF l_debug_on THEN
13849: WSH_DEBUG_SV.logmsg(l_module_name,'Consolidated Backordered Quantity of the Source Line '||l_curr_line_id||' is '||l_total_bo_qty,WSH_DEBUG_SV.C_PROC_LEVEL);
13850: -- HW OPM BUG#:3121616 added qty2s
13851: WSH_DEBUG_SV.logmsg(l_module_name,'Consolidated Backordered Quantity2 of the Source Line '||l_curr_line_id||' is '||l_total_bo_qty2,WSH_DEBUG_SV.C_PROC_LEVEL);
13852: END IF;
13853: l_idx := l_detail_ids.NEXT(l_idx);
13847: --
13848: IF l_debug_on THEN
13849: WSH_DEBUG_SV.logmsg(l_module_name,'Consolidated Backordered Quantity of the Source Line '||l_curr_line_id||' is '||l_total_bo_qty,WSH_DEBUG_SV.C_PROC_LEVEL);
13850: -- HW OPM BUG#:3121616 added qty2s
13851: WSH_DEBUG_SV.logmsg(l_module_name,'Consolidated Backordered Quantity2 of the Source Line '||l_curr_line_id||' is '||l_total_bo_qty2,WSH_DEBUG_SV.C_PROC_LEVEL);
13852: END IF;
13853: l_idx := l_detail_ids.NEXT(l_idx);
13854: END LOOP; -- } Outer Loop(l_idx)
13855:
13858: FORALL i IN 1..l_freight_detail_ids.COUNT
13859: DELETE FROM WSH_FREIGHT_COSTS
13860: WHERE delivery_detail_id = l_freight_detail_ids(i);
13861: IF l_debug_on THEN
13862: WSH_DEBUG_SV.log(l_module_name,'Freight Cost Rows deleted',SQL%ROWCOUNT);
13863: END IF;
13864:
13865: l_req_qtys.DELETE;
13866: l_bo_qtys.DELETE;
13870: --
13871: -- Debug Statements
13872: --
13873: IF l_debug_on THEN
13874: WSH_DEBUG_SV.pop(l_module_name);
13875: END IF;
13876: --
13877:
13878: EXCEPTION
13879: WHEN FND_API.G_EXC_ERROR THEN
13880: x_return_status := FND_API.G_RET_STS_ERROR;
13881: --
13882: IF l_debug_on THEN
13883: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occired.',wsh_debug_sv.c_excep_level);
13884: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
13885: END IF;
13886: --
13887:
13880: x_return_status := FND_API.G_RET_STS_ERROR;
13881: --
13882: IF l_debug_on THEN
13883: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occired.',wsh_debug_sv.c_excep_level);
13884: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
13885: END IF;
13886: --
13887:
13888: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
13888: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
13889: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13890: --
13891: IF l_debug_on THEN
13892: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
13893: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
13894: END IF;
13895: --
13896:
13889: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13890: --
13891: IF l_debug_on THEN
13892: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
13893: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
13894: END IF;
13895: --
13896:
13897: WHEN OTHERS THEN
13900: --
13901: -- Debug Statements
13902: --
13903: IF l_debug_on THEN
13904: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13905: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
13906: END IF;
13907: --
13908:
13901: -- Debug Statements
13902: --
13903: IF l_debug_on THEN
13904: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13905: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
13906: END IF;
13907: --
13908:
13909: END Consolidate_Delivery_Details;
13921: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
13922: --
13923: IF l_debug_on IS NULL
13924: THEN
13925: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
13926: END IF;
13927: IF l_debug_on THEN
13928: WSH_DEBUG_SV.push(l_module_name);
13929: END IF;
13924: THEN
13925: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
13926: END IF;
13927: IF l_debug_on THEN
13928: WSH_DEBUG_SV.push(l_module_name);
13929: END IF;
13930:
13931: x_return_status := FND_API.G_RET_STS_SUCCESS;
13932:
13944: and type = 'C';
13945:
13946: END IF;
13947: IF l_debug_on THEN
13948: WSH_DEBUG_SV.pop(l_module_name);
13949: END IF;
13950: EXCEPTION
13951: WHEN OTHERS THEN
13952: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13954: --
13955: -- Debug Statements
13956: --
13957: IF l_debug_on THEN
13958: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13959: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
13960: END IF;
13961: --
13962: END Delete_Consol_Record;
13955: -- Debug Statements
13956: --
13957: IF l_debug_on THEN
13958: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13959: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
13960: END IF;
13961: --
13962: END Delete_Consol_Record;
13963:
13990: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
13991: --
13992: IF l_debug_on IS NULL
13993: THEN
13994: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
13995: END IF;
13996: IF l_debug_on THEN
13997: WSH_DEBUG_SV.push(l_module_name);
13998: WSH_DEBUG_SV.log(l_module_name, 'p_detail_id_tab.count',p_detail_id_tab.count );
13993: THEN
13994: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
13995: END IF;
13996: IF l_debug_on THEN
13997: WSH_DEBUG_SV.push(l_module_name);
13998: WSH_DEBUG_SV.log(l_module_name, 'p_detail_id_tab.count',p_detail_id_tab.count );
13999: END IF;
14000:
14001: x_return_status := FND_API.G_RET_STS_SUCCESS;
13994: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
13995: END IF;
13996: IF l_debug_on THEN
13997: WSH_DEBUG_SV.push(l_module_name);
13998: WSH_DEBUG_SV.log(l_module_name, 'p_detail_id_tab.count',p_detail_id_tab.count );
13999: END IF;
14000:
14001: x_return_status := FND_API.G_RET_STS_SUCCESS;
14002:
14004:
14005: WHILE i is NOT NULL LOOP
14006:
14007: IF l_debug_on THEN
14008: WSH_DEBUG_SV.log(l_module_name, 'p_detail_id_tab(i)', p_detail_id_tab(i) );
14009: END IF;
14010: OPEN c_get_consolidation_delivery(p_detail_id_tab(i));
14011: FETCH c_get_consolidation_delivery
14012: INTO l_delivery_id, l_consol_delivery_id;
14023:
14024: IF l_detail_id_tab.count > 0 THEN
14025:
14026: IF l_debug_on THEN
14027: WSH_DEBUG_SV.logmsg(l_module_name, 'updating tabcount', l_detail_id_tab.count);
14028: END IF;
14029: FORALL i in l_detail_id_tab.first..l_detail_id_tab.count
14030: update wsh_delivery_assignments
14031: set type = 'O',
14074: END IF;
14075:
14076:
14077: IF l_debug_on THEN
14078: WSH_DEBUG_SV.pop(l_module_name);
14079: END IF;
14080:
14081: EXCEPTION
14082:
14086: --
14087: -- Debug Statements
14088: --
14089: IF l_debug_on THEN
14090: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
14091: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
14092: END IF;
14093: --
14094: END Create_Consol_Record;
14087: -- Debug Statements
14088: --
14089: IF l_debug_on THEN
14090: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
14091: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
14092: END IF;
14093: --
14094: END Create_Consol_Record;
14095: