[Home] [Help]
245: ||':'||P_OVERRIDE_RETAIN_ATO_RSV);
246: END IF;
247: --
248: IF p_quantity_to_unreserve is null OR
249: p_quantity_to_unreserve = FND_API.G_MISS_NUM THEN
250: goto end_of_loop;
251: END IF;
252:
253: --
469: p_move_order_line_id => l_line_rec.move_order_line_id,
470: x_detail_id => l_rsv_rec.demand_source_line_detail,
471: x_return_status => l_return_status);
472:
473: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
474: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
475: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
476: RAISE FND_API.G_EXC_ERROR;
477: END IF;
470: x_detail_id => l_rsv_rec.demand_source_line_detail,
471: x_return_status => l_return_status);
472:
473: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
474: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
475: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
476: RAISE FND_API.G_EXC_ERROR;
477: END IF;
478: END IF;
471: x_return_status => l_return_status);
472:
473: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
474: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
475: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
476: RAISE FND_API.G_EXC_ERROR;
477: END IF;
478: END IF;
479: --end of X-dock
472:
473: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
474: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
475: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
476: RAISE FND_API.G_EXC_ERROR;
477: END IF;
478: END IF;
479: --end of X-dock
480:
479: --end of X-dock
480:
481: inv_reservation_pub.query_reservation
482: (p_api_version_number => 1.0,
483: p_init_msg_lst => fnd_api.g_true,
484: x_return_status => l_return_status,
485: x_msg_count => l_msg_count,
486: x_msg_data => l_msg_data,
487: p_query_input => l_rsv_rec,
537:
538: END IF;
539:
540: IF ( l_qty2_to_unreserve is NOT NULL OR
541: l_qty2_to_unreserve <> FND_API.G_MISS_NUM ) THEN
542:
543: l_qty2_to_unreserve := WSH_WV_UTILS.convert_uom
544: (
545: item_id => l_line_rec.inventory_item_id
563: l_qty_to_unreserve);
564: END IF;
565:
566: IF ( l_qty_to_unreserve is NOT NULL OR
567: l_qty_to_unreserve <> FND_API.G_MISS_NUM ) THEN
568:
569: l_qty_to_unreserve := WSH_WV_UTILS.convert_uom
570: (
571: item_id => l_line_rec.inventory_item_id
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
668: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
669: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
670: RAISE FND_API.G_EXC_ERROR;
671: END IF;
664: END IF;
665: --
666:
667: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
668: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
669: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
670: RAISE FND_API.G_EXC_ERROR;
671: END IF;
672:
665: --
666:
667: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
668: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
669: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
670: RAISE FND_API.G_EXC_ERROR;
671: END IF;
672:
673: IF l_debug_on THEN
666:
667: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
668: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
669: ELSIF l_return_status = FND_API.G_RET_STS_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 ; ',
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
812: l_rsv_new_rec.secondary_reservation_quantity = FND_API.G_MISS_NUM )
813: OR ( l_rsv_new_rec.secondary_detailed_quantity = 0 OR
814: l_rsv_new_rec.secondary_detailed_quantity = FND_API.G_MISS_NUM ) ) THEN
815: l_rsv_new_rec.secondary_reservation_quantity := NULL;
816: l_rsv_new_rec.secondary_detailed_quantity := NULL;
810: -- HW OPMCONV - NULL Qty2 if they are not presents
811: IF ( ( l_rsv_new_rec.secondary_reservation_quantity = 0 OR
812: l_rsv_new_rec.secondary_reservation_quantity = FND_API.G_MISS_NUM )
813: OR ( l_rsv_new_rec.secondary_detailed_quantity = 0 OR
814: l_rsv_new_rec.secondary_detailed_quantity = FND_API.G_MISS_NUM ) ) THEN
815: l_rsv_new_rec.secondary_reservation_quantity := NULL;
816: l_rsv_new_rec.secondary_detailed_quantity := NULL;
817: END IF;
818:
822:
823:
824: inv_reservation_pub.update_reservation
825: (p_api_version_number => 1.0,
826: p_init_msg_lst => fnd_api.g_true,
827: x_return_status => l_return_status,
828: x_msg_count => l_msg_count,
829: x_msg_data => l_msg_data,
830: p_original_rsv_rec => l_rsv_rec,
830: p_original_rsv_rec => l_rsv_rec,
831: p_to_rsv_rec => l_rsv_new_rec,
832: p_original_serial_number => l_dummy_sn, -- no serial contorl
833: p_to_serial_number => l_dummy_sn, -- no serial control
834: p_validation_flag => fnd_api.g_true,
835: -- Bug 5099694
836: p_over_reservation_flag =>3
837: );
838:
846: l_rsv_new_rec.secondary_reservation_quantity ||':'||
847: l_rsv_tbl(I).secondary_detailed_quantity);
848: END IF;
849:
850: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
851: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
852: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
853: RAISE FND_API.G_EXC_ERROR;
854: END IF;
847: l_rsv_tbl(I).secondary_detailed_quantity);
848: END IF;
849:
850: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
851: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
852: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
853: RAISE FND_API.G_EXC_ERROR;
854: END IF;
855:
848: END IF;
849:
850: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
851: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
852: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
853: RAISE FND_API.G_EXC_ERROR;
854: END IF;
855:
856: ELSE
849:
850: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
851: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
852: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
853: RAISE FND_API.G_EXC_ERROR;
854: END IF;
855:
856: ELSE
857:
860: END IF;
861:
862: inv_reservation_pub.delete_reservation
863: ( p_api_version_number => 1.0
864: , p_init_msg_lst => fnd_api.g_true
865: , x_return_status => l_return_status
866: , x_msg_count => l_msg_count
867: , x_msg_data => l_msg_data
868: , p_rsv_rec => l_rsv_rec
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;
878: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
879: RAISE FND_API.G_EXC_ERROR;
880: END IF;
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;
878: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
879: RAISE FND_API.G_EXC_ERROR;
880: END IF;
881:
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;
878: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
879: RAISE FND_API.G_EXC_ERROR;
880: END IF;
881:
882: END IF;
875:
876: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
877: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
878: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
879: RAISE FND_API.G_EXC_ERROR;
880: END IF;
881:
882: END IF;
883:
934: l_rsv_new_rec.requirement_date := l_line_rec.date_scheduled;
935: l_rsv_new_rec.ship_ready_flag := 2;
936: l_rsv_new_rec.staged_flag := 'N';
937: IF ( ( l_rsv_new_rec.secondary_reservation_quantity = 0 OR
938: l_rsv_new_rec.secondary_reservation_quantity = FND_API.G_MISS_NUM )
939: OR ( l_rsv_new_rec.secondary_detailed_quantity = 0 OR
940: l_rsv_new_rec.secondary_detailed_quantity = FND_API.G_MISS_NUM ) ) THEN
941: l_rsv_new_rec.secondary_reservation_quantity := NULL;
942: l_rsv_new_rec.secondary_detailed_quantity := NULL;
936: l_rsv_new_rec.staged_flag := 'N';
937: IF ( ( l_rsv_new_rec.secondary_reservation_quantity = 0 OR
938: l_rsv_new_rec.secondary_reservation_quantity = FND_API.G_MISS_NUM )
939: OR ( l_rsv_new_rec.secondary_detailed_quantity = 0 OR
940: l_rsv_new_rec.secondary_detailed_quantity = FND_API.G_MISS_NUM ) ) THEN
941: l_rsv_new_rec.secondary_reservation_quantity := NULL;
942: l_rsv_new_rec.secondary_detailed_quantity := NULL;
943: END IF;
944: --
948: --
949: INV_RESERVATION_PUB.transfer_reservation
950: (
951: p_api_version_number => 1.0
952: , p_init_msg_lst => fnd_api.g_true
953: , x_return_status => l_return_status
954: , x_msg_count => l_msg_count
955: , x_msg_data => l_msg_data
956: , p_original_rsv_rec => l_rsv_rec
956: , p_original_rsv_rec => l_rsv_rec
957: , p_to_rsv_rec => l_rsv_new_rec
958: , p_original_serial_number => l_dummy_sn -- no serial contorl
959: , p_to_serial_number => l_dummy_sn -- no serial control
960: , p_validation_flag => fnd_api.g_true
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
970: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
971: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
972: RAISE FND_API.G_EXC_ERROR;
973: END IF;
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;
971: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
972: RAISE FND_API.G_EXC_ERROR;
973: END IF;
974: --} transfer/update reservation.
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;
971: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
972: RAISE FND_API.G_EXC_ERROR;
973: END IF;
974: --} transfer/update reservation.
975: END IF;
968: --
969: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
970: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
971: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
972: RAISE FND_API.G_EXC_ERROR;
973: END IF;
974: --} transfer/update reservation.
975: END IF;
976: --- Bug # 9583775 : End
987: --
988:
989: inv_reservation_pub.delete_reservation
990: (p_api_version_number => 1.0,
991: p_init_msg_lst => fnd_api.g_true,
992: x_return_status => l_return_status,
993: x_msg_count => l_msg_count,
994: x_msg_data => l_msg_data,
995: p_rsv_rec => l_rsv_rec,
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
1005: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1006: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1007: RAISE FND_API.G_EXC_ERROR;
1008: END IF;
1001: END IF;
1002: --
1003:
1004: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1005: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1006: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1007: RAISE FND_API.G_EXC_ERROR;
1008: END IF;
1009: END IF; -- ATO line
1002: --
1003:
1004: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1005: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1006: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1007: RAISE FND_API.G_EXC_ERROR;
1008: END IF;
1009: END IF; -- ATO line
1010: else -- p_unreserve_mode = 'CYCLE_COUNT'
1003:
1004: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1005: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1006: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1007: RAISE FND_API.G_EXC_ERROR;
1008: END IF;
1009: END IF; -- ATO line
1010: else -- p_unreserve_mode = 'CYCLE_COUNT'
1011: --
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
1022: l_rsv_rec.secondary_reservation_quantity := NULL;
1023: END IF;
1024: -- HW INVCONV - Added Qty2
1025: Inv_Pick_Release_Pub.Reserve_Unconfirmed_Quantity(
1023: END IF;
1024: -- HW INVCONV - Added Qty2
1025: Inv_Pick_Release_Pub.Reserve_Unconfirmed_Quantity(
1026: p_api_version => 1.0,
1027: p_init_msg_list => FND_API.G_FALSE,
1028: p_commit => FND_API.G_FALSE,
1029: x_return_status => l_reserve_status,
1030: x_msg_count => l_reserve_msg_count,
1031: x_msg_data => l_reserve_msg_data,
1024: -- HW INVCONV - Added Qty2
1025: Inv_Pick_Release_Pub.Reserve_Unconfirmed_Quantity(
1026: p_api_version => 1.0,
1027: p_init_msg_list => FND_API.G_FALSE,
1028: p_commit => FND_API.G_FALSE,
1029: x_return_status => l_reserve_status,
1030: x_msg_count => l_reserve_msg_count,
1031: x_msg_data => l_reserve_msg_data,
1032: -- muom: We should no longer be using reservation_quantity as it will not be in primary uom always
1174: --
1175:
1176: -- HW OPMCONV - NULL Qty2 if they are not presents
1177: IF ( ( l_rsv_new_rec.secondary_reservation_quantity = 0 OR
1178: l_rsv_new_rec.secondary_reservation_quantity = FND_API.G_MISS_NUM )
1179: OR ( l_rsv_new_rec.secondary_detailed_quantity = 0 OR
1180: l_rsv_new_rec.secondary_detailed_quantity = FND_API.G_MISS_NUM ) ) THEN
1181: l_rsv_new_rec.secondary_reservation_quantity := NULL;
1182: l_rsv_new_rec.secondary_detailed_quantity := NULL;
1176: -- HW OPMCONV - NULL Qty2 if they are not presents
1177: IF ( ( l_rsv_new_rec.secondary_reservation_quantity = 0 OR
1178: l_rsv_new_rec.secondary_reservation_quantity = FND_API.G_MISS_NUM )
1179: OR ( l_rsv_new_rec.secondary_detailed_quantity = 0 OR
1180: l_rsv_new_rec.secondary_detailed_quantity = FND_API.G_MISS_NUM ) ) THEN
1181: l_rsv_new_rec.secondary_reservation_quantity := NULL;
1182: l_rsv_new_rec.secondary_detailed_quantity := NULL;
1183: END IF;
1184:
1184:
1185:
1186: INV_RESERVATION_PUB.transfer_reservation
1187: (p_api_version_number => 1.0,
1188: p_init_msg_lst => fnd_api.g_true,
1189: x_return_status => l_return_status,
1190: x_msg_count => l_msg_count,
1191: x_msg_data => l_msg_data,
1192: p_original_rsv_rec => l_rsv_rec,
1192: p_original_rsv_rec => l_rsv_rec,
1193: p_to_rsv_rec => l_rsv_new_rec,
1194: p_original_serial_number => l_dummy_sn, -- no serial contorl
1195: p_to_serial_number => l_dummy_sn, -- no serial control
1196: p_validation_flag => fnd_api.g_true,
1197: -- Bug 5099694
1198: p_over_reservation_flag =>3,
1199: x_to_reservation_id => l_new_rsv_id
1200: );
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
1209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1210: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1211: RAISE FND_API.G_EXC_ERROR;
1212: END IF;
1205: END IF;
1206: --
1207:
1208: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1210: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1211: RAISE FND_API.G_EXC_ERROR;
1212: END IF;
1213:
1206: --
1207:
1208: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1210: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1211: RAISE FND_API.G_EXC_ERROR;
1212: END IF;
1213:
1214: ELSE -- (i.e. Not an ATO )
1207:
1208: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1210: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1211: RAISE FND_API.G_EXC_ERROR;
1212: END IF;
1213:
1214: ELSE -- (i.e. Not an ATO )
1215: -- 2587777
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
1253: l_rsv_new_rec.secondary_reservation_quantity = FND_API.G_MISS_NUM ) THEN
1254:
1255: l_rsv_new_rec.secondary_reservation_quantity := NULL;
1256:
1257: END IF;
1257: END IF;
1258:
1259: inv_reservation_pub.update_reservation
1260: (p_api_version_number => 1.0,
1261: p_init_msg_lst => fnd_api.g_true,
1262: x_return_status => l_return_status,
1263: x_msg_count => l_msg_count,
1264: x_msg_data => l_msg_data,
1265: p_original_rsv_rec => l_rsv_rec,
1265: p_original_rsv_rec => l_rsv_rec,
1266: p_to_rsv_rec => l_rsv_new_rec,
1267: p_original_serial_number => l_dummy_sn, -- no serial contorl
1268: p_to_serial_number => l_dummy_sn, -- no serial control
1269: p_validation_flag => fnd_api.g_true,
1270: -- Bug 5099694
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;
1280: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN -- STS Error
1281: IF l_msg_data is not null THEN -- msg.data not null
1282: fnd_message.set_encoded(l_msg_data);
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;
1280: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN -- STS Error
1281: IF l_msg_data is not null THEN -- msg.data not null
1282: fnd_message.set_encoded(l_msg_data);
1283: l_buffer := fnd_message.get;
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;
1280: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN -- STS Error
1281: IF l_msg_data is not null THEN -- msg.data not null
1282: fnd_message.set_encoded(l_msg_data);
1283: l_buffer := fnd_message.get;
1284: --
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;
1297: END IF; -- UnExp Error
1298: END IF; -- (if ATO ..)
1299: else -- p_unreserve_mode = 'CYCLE_COUNT'
1300: --
1305:
1306: END IF;
1307: --
1308:
1309: IF ( l_qty2_to_unreserve = 0 or l_qty2_to_unreserve = FND_API.G_MISS_NUM) THEN
1310: l_qty2_to_unreserve := NULL;
1311: END IF;
1312:
1313: Inv_Pick_Release_Pub.Reserve_Unconfirmed_Quantity(
1311: END IF;
1312:
1313: Inv_Pick_Release_Pub.Reserve_Unconfirmed_Quantity(
1314: p_api_version => 1.0,
1315: p_init_msg_list => FND_API.G_FALSE,
1316: p_commit => FND_API.G_FALSE,
1317: x_return_status => l_reserve_status,
1318: x_msg_count => l_reserve_msg_count,
1319: x_msg_data => l_reserve_msg_data,
1312:
1313: Inv_Pick_Release_Pub.Reserve_Unconfirmed_Quantity(
1314: p_api_version => 1.0,
1315: p_init_msg_list => FND_API.G_FALSE,
1316: p_commit => FND_API.G_FALSE,
1317: x_return_status => l_reserve_status,
1318: x_msg_count => l_reserve_msg_count,
1319: x_msg_data => l_reserve_msg_data,
1320: p_missing_quantity => l_qty_to_unreserve ,
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);
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
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
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);
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:
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;
1899:
1900: ELSIF (p_assignment_type IN ('DD2C', 'C2C')) THEN
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
1954:
1955: l_is_delivery_empty := WSH_NEW_DELIVERY_ACTIONS.IS_DELIVERY_EMPTY(l_delivery2);
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;
1965:
1966: ELSE
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:
1973: IF l_debug_on THEN
1974: WSH_DEBUG_SV.log(l_module_name, 'x_delivery_was_empty', x_delivery_was_empty);
1982: WSH_DEBUG_SV.pop(l_module_name);
1983: END IF;
1984:
1985: EXCEPTION
1986: WHEN FND_API.G_EXC_ERROR THEN
1987: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1988:
1989: IF c_get_gross_weight%ISOPEN THEN
1990: CLOSE c_get_gross_weight;
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';
2094: ELSIF (l_is_delivery_empty = 'N') THEN
2095: IF (p_tms_interface_flag IS NOT NULL) THEN
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;
2110: END IF;
2111: l_tms_interface_flag := nvl(l_delivery_info.tms_interface_flag, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT);
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;
2149: END IF;
2150: END IF;
2159: WSH_DEBUG_SV.pop(l_module_name);
2160: END IF;
2161:
2162: EXCEPTION
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);
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:
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;
3255: END IF;
3256: END IF;
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;
3415: -- End of OTM R12 : assign delivery detail
3416:
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;
3510: END IF;
3511: END IF;
3631: --
3632: exception
3633:
3634: -- OTM R12 : assign delivery detail
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);
4330: THEN
4331: --{
4332: FND_MESSAGE.SET_NAME('WSH', 'WSH_REQUIRED_FIELD_NULL');
4333: FND_MESSAGE.SET_TOKEN('FIELD_NAME', 'x_dlvy_has_lines');
4334: RAISE FND_API.G_EXC_ERROR;
4335: --}
4336: END IF;
4337: -- J-IB-NPARIKH-}
4338: --
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;
4401: -- End of OTM R12 : assign delivery detail
4402:
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;
5062: END IF;
5063: END IF;
5131: END IF;
5132: --
5133: EXCEPTION
5134: -- J-IB-NPARIKH-{
5135: WHEN FND_API.G_EXC_ERROR THEN
5136: x_return_status := WSH_UTIL_CORE.g_ret_sts_error;
5137: WSH_UTIL_CORE.add_message (WSH_UTIL_CORE.g_ret_sts_error,l_module_name);
5138: --
5139: IF l_debug_on
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
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;
5617: -- End of OTM R12 : assign delivery detail
5618:
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;
6230: END IF;
6231:
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;
6394: END IF;
6395: END IF;
6614: --
6615: exception
6616:
6617: -- OTM R12 : assign delivery detail
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);
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;
7385: ELSIF (l_is_delivery_empty = 'N') THEN
7386: l_interface_flag_tab(1) := NULL;
8232: END IF;
8233:
8234: EXCEPTION
8235: -- J-IB-NPARIKH-{
8236: WHEN fnd_api.g_exc_error THEN
8237: x_return_status := fnd_api.g_ret_sts_error;
8238: --
8239: -- K LPN CONV. rv
8240: --
8233:
8234: EXCEPTION
8235: -- J-IB-NPARIKH-{
8236: WHEN fnd_api.g_exc_error THEN
8237: x_return_status := fnd_api.g_ret_sts_error;
8238: --
8239: -- K LPN CONV. rv
8240: --
8241: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
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;
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;
8276: --
8277: --
8278: -- K LPN CONV. rv
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;
8276: --
8277: --
8278: -- K LPN CONV. rv
8279: --
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-}
9100: -- Bug 4455732 : Combining transaction_temp_id and serial_number update into single cursor
9101: -- since single quantity detail can have transaction_temp_id also.
9102: FORALL i IN 1..l_dd_id_tab.count
9103: UPDATE wsh_delivery_details
9104: SET serial_number = decode(l_serial_number_tab(i),FND_API.G_MISS_CHAR,NULL,
9105: NULL,serial_number,l_serial_number_tab(i)) ,
9106: transaction_temp_id = decode(l_transaction_id_tab(i),FND_API.G_MISS_NUM,NULL,
9107: NULL,transaction_temp_id,l_transaction_id_tab(i))
9108: WHERE delivery_detail_id = l_dd_id_tab(i);
9102: FORALL i IN 1..l_dd_id_tab.count
9103: UPDATE wsh_delivery_details
9104: SET serial_number = decode(l_serial_number_tab(i),FND_API.G_MISS_CHAR,NULL,
9105: NULL,serial_number,l_serial_number_tab(i)) ,
9106: transaction_temp_id = decode(l_transaction_id_tab(i),FND_API.G_MISS_NUM,NULL,
9107: NULL,transaction_temp_id,l_transaction_id_tab(i))
9108: WHERE delivery_detail_id = l_dd_id_tab(i);
9109:
9110: END IF; -- end of transaction temp id is not null
9488: l_delivery_details_info.requested_quantity := LEAST(p_old_delivery_detail_rec.requested_quantity, p_quantity_to_split);
9489: l_delivery_details_info.picked_quantity := p_quantity_to_split;
9490: -- HW OPM for OM changes
9491: -- HW OPMCONV. No need to use l_new_pick_qty2
9492: --l_delivery_details_info.picked_quantity2 := nvl(nvl(l_qty2,l_new_pick_qty2),FND_API.G_MISS_NUM);
9493: l_delivery_details_info.picked_quantity2 := nvl(l_qty2,FND_API.G_MISS_NUM);
9494:
9495: END IF;
9496:
9489: l_delivery_details_info.picked_quantity := p_quantity_to_split;
9490: -- HW OPM for OM changes
9491: -- HW OPMCONV. No need to use l_new_pick_qty2
9492: --l_delivery_details_info.picked_quantity2 := nvl(nvl(l_qty2,l_new_pick_qty2),FND_API.G_MISS_NUM);
9493: l_delivery_details_info.picked_quantity2 := nvl(l_qty2,FND_API.G_MISS_NUM);
9494:
9495: END IF;
9496:
9497: IF l_debug_on THEN
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
9503: IF ( NVL(l_qty2, -999) = -999 OR l_qty2 < 0 ) THEN
9504:
9505: l_delivery_details_info.requested_quantity2 := FND_API.G_MISS_NUM;
9506: ELSE
9507: l_delivery_details_info.requested_quantity2 := l_qty2;
9508: END IF;
9509:
9525: -- p_manual_split is 'Y' only when splitting for staged delivery details during ship confirm
9526: -- Staged delivery details W/V should always be reset back to original W/V
9527: l_new_wv_qty := 0;
9528: ELSE
9529: SELECT NVL(decode(l_split_shipped_qty,FND_API.G_MISS_NUM,null,l_split_shipped_qty),
9530: NVL(decode(l_delivery_details_info.picked_quantity,FND_API.G_MISS_NUM,null,l_delivery_details_info.picked_quantity),
9531: decode(l_delivery_details_info.requested_quantity,FND_API.G_MISS_NUM,null,l_delivery_details_info.requested_quantity)))
9532: INTO l_new_wv_qty
9533: FROM dual;
9526: -- Staged delivery details W/V should always be reset back to original W/V
9527: l_new_wv_qty := 0;
9528: ELSE
9529: SELECT NVL(decode(l_split_shipped_qty,FND_API.G_MISS_NUM,null,l_split_shipped_qty),
9530: NVL(decode(l_delivery_details_info.picked_quantity,FND_API.G_MISS_NUM,null,l_delivery_details_info.picked_quantity),
9531: decode(l_delivery_details_info.requested_quantity,FND_API.G_MISS_NUM,null,l_delivery_details_info.requested_quantity)))
9532: INTO l_new_wv_qty
9533: FROM dual;
9534: END IF;
9527: l_new_wv_qty := 0;
9528: ELSE
9529: SELECT NVL(decode(l_split_shipped_qty,FND_API.G_MISS_NUM,null,l_split_shipped_qty),
9530: NVL(decode(l_delivery_details_info.picked_quantity,FND_API.G_MISS_NUM,null,l_delivery_details_info.picked_quantity),
9531: decode(l_delivery_details_info.requested_quantity,FND_API.G_MISS_NUM,null,l_delivery_details_info.requested_quantity)))
9532: INTO l_new_wv_qty
9533: FROM dual;
9534: END IF;
9535:
9552: END IF;
9553: l_delivery_details_info.weight_uom_code := p_old_delivery_detail_rec.weight_uom_code;
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
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
9563: l_delivery_details_info.shipped_quantity2 := l_split_shipped_qty2;
9564: END IF;
9565: IF ( NVL(l_qty2, 0) = 0 OR l_qty2 < 0 ) THEN
9562: ELSE
9563: l_delivery_details_info.shipped_quantity2 := l_split_shipped_qty2;
9564: END IF;
9565: IF ( NVL(l_qty2, 0) = 0 OR l_qty2 < 0 ) THEN
9566: l_delivery_details_info.cancelled_quantity2 := FND_API.G_MISS_NUM;
9567: ELSE
9568: -- Bug 2116595
9569: l_delivery_details_info.cancelled_quantity2 := FND_API.G_MISS_NUM;
9570: END IF;
9565: IF ( NVL(l_qty2, 0) = 0 OR l_qty2 < 0 ) THEN
9566: l_delivery_details_info.cancelled_quantity2 := FND_API.G_MISS_NUM;
9567: ELSE
9568: -- Bug 2116595
9569: l_delivery_details_info.cancelled_quantity2 := FND_API.G_MISS_NUM;
9570: END IF;
9571:
9572: l_delivery_details_info.cycle_count_quantity := nvl(l_split_cc_qty,FND_API.G_MISS_NUM);
9573: -- HW OPMCONV - No need to branch
9568: -- Bug 2116595
9569: l_delivery_details_info.cancelled_quantity2 := FND_API.G_MISS_NUM;
9570: END IF;
9571:
9572: l_delivery_details_info.cycle_count_quantity := nvl(l_split_cc_qty,FND_API.G_MISS_NUM);
9573: -- HW OPMCONV - No need to branch
9574: -- IF ( p_process_flag = FND_API.G_TRUE ) THEN
9575: l_delivery_details_info.cycle_count_quantity2 := nvl(l_split_cc_qty2,FND_API.G_MISS_NUM);
9576: -- END IF;
9570: END IF;
9571:
9572: l_delivery_details_info.cycle_count_quantity := nvl(l_split_cc_qty,FND_API.G_MISS_NUM);
9573: -- HW OPMCONV - No need to branch
9574: -- IF ( p_process_flag = FND_API.G_TRUE ) THEN
9575: l_delivery_details_info.cycle_count_quantity2 := nvl(l_split_cc_qty2,FND_API.G_MISS_NUM);
9576: -- END IF;
9577:
9578: -- Bug 2116595
9571:
9572: l_delivery_details_info.cycle_count_quantity := nvl(l_split_cc_qty,FND_API.G_MISS_NUM);
9573: -- HW OPMCONV - No need to branch
9574: -- IF ( p_process_flag = FND_API.G_TRUE ) THEN
9575: l_delivery_details_info.cycle_count_quantity2 := nvl(l_split_cc_qty2,FND_API.G_MISS_NUM);
9576: -- END IF;
9577:
9578: -- Bug 2116595
9579: l_delivery_details_info.cancelled_quantity := FND_API.G_MISS_NUM;
9575: l_delivery_details_info.cycle_count_quantity2 := nvl(l_split_cc_qty2,FND_API.G_MISS_NUM);
9576: -- END IF;
9577:
9578: -- Bug 2116595
9579: l_delivery_details_info.cancelled_quantity := FND_API.G_MISS_NUM;
9580: l_delivery_details_info.split_from_detail_id := p_old_delivery_detail_rec.delivery_detail_id;
9581:
9582: l_delivery_details_info.container_flag := p_old_delivery_detail_rec.container_flag;
9583: l_delivery_details_info.master_serial_number := FND_API.G_MISS_CHAR;
9579: l_delivery_details_info.cancelled_quantity := FND_API.G_MISS_NUM;
9580: l_delivery_details_info.split_from_detail_id := p_old_delivery_detail_rec.delivery_detail_id;
9581:
9582: l_delivery_details_info.container_flag := p_old_delivery_detail_rec.container_flag;
9583: l_delivery_details_info.master_serial_number := FND_API.G_MISS_CHAR;
9584: l_delivery_details_info.serial_number := FND_API.G_MISS_CHAR;
9585: l_delivery_details_info.to_serial_number := FND_API.G_MISS_CHAR;
9586: l_delivery_details_info.transaction_temp_id := FND_API.G_MISS_NUM;
9587: l_delivery_details_info.last_update_date := SYSDATE;
9580: l_delivery_details_info.split_from_detail_id := p_old_delivery_detail_rec.delivery_detail_id;
9581:
9582: l_delivery_details_info.container_flag := p_old_delivery_detail_rec.container_flag;
9583: l_delivery_details_info.master_serial_number := FND_API.G_MISS_CHAR;
9584: l_delivery_details_info.serial_number := FND_API.G_MISS_CHAR;
9585: l_delivery_details_info.to_serial_number := FND_API.G_MISS_CHAR;
9586: l_delivery_details_info.transaction_temp_id := FND_API.G_MISS_NUM;
9587: l_delivery_details_info.last_update_date := SYSDATE;
9588: l_delivery_details_info.last_updated_by := FND_GLOBAL.USER_ID;
9581:
9582: l_delivery_details_info.container_flag := p_old_delivery_detail_rec.container_flag;
9583: l_delivery_details_info.master_serial_number := FND_API.G_MISS_CHAR;
9584: l_delivery_details_info.serial_number := FND_API.G_MISS_CHAR;
9585: l_delivery_details_info.to_serial_number := FND_API.G_MISS_CHAR;
9586: l_delivery_details_info.transaction_temp_id := FND_API.G_MISS_NUM;
9587: l_delivery_details_info.last_update_date := SYSDATE;
9588: l_delivery_details_info.last_updated_by := FND_GLOBAL.USER_ID;
9589: l_delivery_details_info.last_update_login := FND_GLOBAL.LOGIN_ID;
9582: l_delivery_details_info.container_flag := p_old_delivery_detail_rec.container_flag;
9583: l_delivery_details_info.master_serial_number := FND_API.G_MISS_CHAR;
9584: l_delivery_details_info.serial_number := FND_API.G_MISS_CHAR;
9585: l_delivery_details_info.to_serial_number := FND_API.G_MISS_CHAR;
9586: l_delivery_details_info.transaction_temp_id := FND_API.G_MISS_NUM;
9587: l_delivery_details_info.last_update_date := SYSDATE;
9588: l_delivery_details_info.last_updated_by := FND_GLOBAL.USER_ID;
9589: l_delivery_details_info.last_update_login := FND_GLOBAL.LOGIN_ID;
9590: -- Bug 2419301
9708: IF l_req_qty_update_index <= l_dd_id_tab.count THEN
9709: -- 12345 HW added qty2
9710: update wsh_delivery_details
9711: set requested_quantity = l_requested_quantity - ((l_req_qty_update_index - 1) * l_delivery_details_info.requested_quantity),
9712: requested_quantity2 = decode(l_delivery_details_info.requested_quantity2, fnd_api.g_miss_num, NULL, l_requested_quantity2 - ((l_req_qty2_update_index - 1) * l_delivery_details_info.requested_quantity2))
9713: where delivery_detail_id = l_dd_id_tab(l_req_qty_update_index);
9714: END IF;
9715: END IF;
9716:
9921: shipped_quantity2 = l_original_shipped_qty2 - GREATEST((l_num_of_split -1) * nvl(l_qty2,0),0),
9922: --shipped_quantity2 = l_original_shipped_qty2 - ((greatest(l_num_of_split -1),0) * p_quantity_to_split),
9923: cycle_count_quantity = l_original_cc_qty,
9924: cycle_count_quantity2 = l_original_cc_qty2,
9925: serial_number = decode(l_updated_delivery_detail_rec.serial_number,FND_API.G_MISS_CHAR,NULL,
9926: NULL,serial_number,l_updated_delivery_detail_rec.serial_number),
9927: to_serial_number = decode(l_updated_delivery_detail_rec.to_serial_number,FND_API.G_MISS_CHAR,NULL,
9928: NULL,to_serial_number,l_updated_delivery_detail_rec.to_serial_number),
9929: transaction_temp_id = decode(l_updated_delivery_detail_rec.transaction_temp_id,FND_API.G_MISS_NUM,NULL,
9923: cycle_count_quantity = l_original_cc_qty,
9924: cycle_count_quantity2 = l_original_cc_qty2,
9925: serial_number = decode(l_updated_delivery_detail_rec.serial_number,FND_API.G_MISS_CHAR,NULL,
9926: NULL,serial_number,l_updated_delivery_detail_rec.serial_number),
9927: to_serial_number = decode(l_updated_delivery_detail_rec.to_serial_number,FND_API.G_MISS_CHAR,NULL,
9928: NULL,to_serial_number,l_updated_delivery_detail_rec.to_serial_number),
9929: transaction_temp_id = decode(l_updated_delivery_detail_rec.transaction_temp_id,FND_API.G_MISS_NUM,NULL,
9930: NULL,transaction_temp_id,l_updated_delivery_detail_rec.transaction_temp_id),
9931: -- J: W/V Changes
9925: serial_number = decode(l_updated_delivery_detail_rec.serial_number,FND_API.G_MISS_CHAR,NULL,
9926: NULL,serial_number,l_updated_delivery_detail_rec.serial_number),
9927: to_serial_number = decode(l_updated_delivery_detail_rec.to_serial_number,FND_API.G_MISS_CHAR,NULL,
9928: NULL,to_serial_number,l_updated_delivery_detail_rec.to_serial_number),
9929: transaction_temp_id = decode(l_updated_delivery_detail_rec.transaction_temp_id,FND_API.G_MISS_NUM,NULL,
9930: NULL,transaction_temp_id,l_updated_delivery_detail_rec.transaction_temp_id),
9931: -- J: W/V Changes
9932: gross_weight = gross_weight - l_total_gross_wt,
9933: net_weight = net_weight - l_total_net_wt,
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
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);
10878: --IF ( NVL(l_qty2, 0) = 0 OR l_qty2 < 0 ) THEN
10879: -- muom
10880: IF p_fulfillment_base = 'P' THEN
10881: IF ( NVL(l_qty2, -999) = -999 OR l_qty2 < 0 ) THEN
10882: l_delivery_details_info.requested_quantity2 := FND_API.G_MISS_NUM;
10883: ELSE
10884: l_delivery_details_info.requested_quantity2 := l_qty2;
10885: END IF;
10886: END IF;
10942: l_split_picked_qty2 := least(p_old_delivery_detail_rec.picked_quantity2, l_qty2);
10943: l_split_req_qty2 := least(p_old_delivery_detail_rec.requested_quantity2,l_qty2);
10944: --
10945: --
10946: l_delivery_details_info.requested_quantity := nvl(l_split_req_qty, FND_API.G_MISS_NUM);
10947: l_delivery_details_info.requested_quantity2 := nvl(l_split_req_qty2,FND_API.G_MISS_NUM);
10948: l_delivery_details_info.picked_quantity := nvl(l_split_picked_qty, FND_API.G_MISS_NUM);
10949: l_delivery_details_info.picked_quantity2 := nvl(l_split_picked_qty2,FND_API.G_MISS_NUM);
10950: l_delivery_details_info.shipped_quantity := nvl(l_split_shipped_qty, FND_API.G_MISS_NUM);
10943: l_split_req_qty2 := least(p_old_delivery_detail_rec.requested_quantity2,l_qty2);
10944: --
10945: --
10946: l_delivery_details_info.requested_quantity := nvl(l_split_req_qty, FND_API.G_MISS_NUM);
10947: l_delivery_details_info.requested_quantity2 := nvl(l_split_req_qty2,FND_API.G_MISS_NUM);
10948: l_delivery_details_info.picked_quantity := nvl(l_split_picked_qty, FND_API.G_MISS_NUM);
10949: l_delivery_details_info.picked_quantity2 := nvl(l_split_picked_qty2,FND_API.G_MISS_NUM);
10950: l_delivery_details_info.shipped_quantity := nvl(l_split_shipped_qty, FND_API.G_MISS_NUM);
10951: l_delivery_details_info.shipped_quantity2 := nvl(l_split_shipped_qty2,FND_API.G_MISS_NUM);
10944: --
10945: --
10946: l_delivery_details_info.requested_quantity := nvl(l_split_req_qty, FND_API.G_MISS_NUM);
10947: l_delivery_details_info.requested_quantity2 := nvl(l_split_req_qty2,FND_API.G_MISS_NUM);
10948: l_delivery_details_info.picked_quantity := nvl(l_split_picked_qty, FND_API.G_MISS_NUM);
10949: l_delivery_details_info.picked_quantity2 := nvl(l_split_picked_qty2,FND_API.G_MISS_NUM);
10950: l_delivery_details_info.shipped_quantity := nvl(l_split_shipped_qty, FND_API.G_MISS_NUM);
10951: l_delivery_details_info.shipped_quantity2 := nvl(l_split_shipped_qty2,FND_API.G_MISS_NUM);
10952: l_delivery_details_info.received_quantity := nvl(l_split_recvd_qty, FND_API.G_MISS_NUM);
10945: --
10946: l_delivery_details_info.requested_quantity := nvl(l_split_req_qty, FND_API.G_MISS_NUM);
10947: l_delivery_details_info.requested_quantity2 := nvl(l_split_req_qty2,FND_API.G_MISS_NUM);
10948: l_delivery_details_info.picked_quantity := nvl(l_split_picked_qty, FND_API.G_MISS_NUM);
10949: l_delivery_details_info.picked_quantity2 := nvl(l_split_picked_qty2,FND_API.G_MISS_NUM);
10950: l_delivery_details_info.shipped_quantity := nvl(l_split_shipped_qty, FND_API.G_MISS_NUM);
10951: l_delivery_details_info.shipped_quantity2 := nvl(l_split_shipped_qty2,FND_API.G_MISS_NUM);
10952: l_delivery_details_info.received_quantity := nvl(l_split_recvd_qty, FND_API.G_MISS_NUM);
10953: l_delivery_details_info.received_quantity2 := nvl(l_split_recvd_qty2,FND_API.G_MISS_NUM);
10946: l_delivery_details_info.requested_quantity := nvl(l_split_req_qty, FND_API.G_MISS_NUM);
10947: l_delivery_details_info.requested_quantity2 := nvl(l_split_req_qty2,FND_API.G_MISS_NUM);
10948: l_delivery_details_info.picked_quantity := nvl(l_split_picked_qty, FND_API.G_MISS_NUM);
10949: l_delivery_details_info.picked_quantity2 := nvl(l_split_picked_qty2,FND_API.G_MISS_NUM);
10950: l_delivery_details_info.shipped_quantity := nvl(l_split_shipped_qty, FND_API.G_MISS_NUM);
10951: l_delivery_details_info.shipped_quantity2 := nvl(l_split_shipped_qty2,FND_API.G_MISS_NUM);
10952: l_delivery_details_info.received_quantity := nvl(l_split_recvd_qty, FND_API.G_MISS_NUM);
10953: l_delivery_details_info.received_quantity2 := nvl(l_split_recvd_qty2,FND_API.G_MISS_NUM);
10954: l_delivery_details_info.returned_quantity := nvl(l_split_rtv_qty, FND_API.G_MISS_NUM);
10947: l_delivery_details_info.requested_quantity2 := nvl(l_split_req_qty2,FND_API.G_MISS_NUM);
10948: l_delivery_details_info.picked_quantity := nvl(l_split_picked_qty, FND_API.G_MISS_NUM);
10949: l_delivery_details_info.picked_quantity2 := nvl(l_split_picked_qty2,FND_API.G_MISS_NUM);
10950: l_delivery_details_info.shipped_quantity := nvl(l_split_shipped_qty, FND_API.G_MISS_NUM);
10951: l_delivery_details_info.shipped_quantity2 := nvl(l_split_shipped_qty2,FND_API.G_MISS_NUM);
10952: l_delivery_details_info.received_quantity := nvl(l_split_recvd_qty, FND_API.G_MISS_NUM);
10953: l_delivery_details_info.received_quantity2 := nvl(l_split_recvd_qty2,FND_API.G_MISS_NUM);
10954: l_delivery_details_info.returned_quantity := nvl(l_split_rtv_qty, FND_API.G_MISS_NUM);
10955: l_delivery_details_info.returned_quantity2 := nvl(l_split_rtv_qty2,FND_API.G_MISS_NUM);
10948: l_delivery_details_info.picked_quantity := nvl(l_split_picked_qty, FND_API.G_MISS_NUM);
10949: l_delivery_details_info.picked_quantity2 := nvl(l_split_picked_qty2,FND_API.G_MISS_NUM);
10950: l_delivery_details_info.shipped_quantity := nvl(l_split_shipped_qty, FND_API.G_MISS_NUM);
10951: l_delivery_details_info.shipped_quantity2 := nvl(l_split_shipped_qty2,FND_API.G_MISS_NUM);
10952: l_delivery_details_info.received_quantity := nvl(l_split_recvd_qty, FND_API.G_MISS_NUM);
10953: l_delivery_details_info.received_quantity2 := nvl(l_split_recvd_qty2,FND_API.G_MISS_NUM);
10954: l_delivery_details_info.returned_quantity := nvl(l_split_rtv_qty, FND_API.G_MISS_NUM);
10955: l_delivery_details_info.returned_quantity2 := nvl(l_split_rtv_qty2,FND_API.G_MISS_NUM);
10956: --
10949: l_delivery_details_info.picked_quantity2 := nvl(l_split_picked_qty2,FND_API.G_MISS_NUM);
10950: l_delivery_details_info.shipped_quantity := nvl(l_split_shipped_qty, FND_API.G_MISS_NUM);
10951: l_delivery_details_info.shipped_quantity2 := nvl(l_split_shipped_qty2,FND_API.G_MISS_NUM);
10952: l_delivery_details_info.received_quantity := nvl(l_split_recvd_qty, FND_API.G_MISS_NUM);
10953: l_delivery_details_info.received_quantity2 := nvl(l_split_recvd_qty2,FND_API.G_MISS_NUM);
10954: l_delivery_details_info.returned_quantity := nvl(l_split_rtv_qty, FND_API.G_MISS_NUM);
10955: l_delivery_details_info.returned_quantity2 := nvl(l_split_rtv_qty2,FND_API.G_MISS_NUM);
10956: --
10957: --
10950: l_delivery_details_info.shipped_quantity := nvl(l_split_shipped_qty, FND_API.G_MISS_NUM);
10951: l_delivery_details_info.shipped_quantity2 := nvl(l_split_shipped_qty2,FND_API.G_MISS_NUM);
10952: l_delivery_details_info.received_quantity := nvl(l_split_recvd_qty, FND_API.G_MISS_NUM);
10953: l_delivery_details_info.received_quantity2 := nvl(l_split_recvd_qty2,FND_API.G_MISS_NUM);
10954: l_delivery_details_info.returned_quantity := nvl(l_split_rtv_qty, FND_API.G_MISS_NUM);
10955: l_delivery_details_info.returned_quantity2 := nvl(l_split_rtv_qty2,FND_API.G_MISS_NUM);
10956: --
10957: --
10958: l_original_shipped_qty := GREATEST(
10951: l_delivery_details_info.shipped_quantity2 := nvl(l_split_shipped_qty2,FND_API.G_MISS_NUM);
10952: l_delivery_details_info.received_quantity := nvl(l_split_recvd_qty, FND_API.G_MISS_NUM);
10953: l_delivery_details_info.received_quantity2 := nvl(l_split_recvd_qty2,FND_API.G_MISS_NUM);
10954: l_delivery_details_info.returned_quantity := nvl(l_split_rtv_qty, FND_API.G_MISS_NUM);
10955: l_delivery_details_info.returned_quantity2 := nvl(l_split_rtv_qty2,FND_API.G_MISS_NUM);
10956: --
10957: --
10958: l_original_shipped_qty := GREATEST(
10959: p_old_delivery_detail_rec.shipped_quantity
11057: -- p_manual_split is 'Y' only when splitting for staged delivery details during ship confirm
11058: -- Staged delivery details W/V should always be reset back to original W/V
11059: l_new_wv_qty := 0;
11060: ELSE
11061: SELECT NVL(decode(l_split_recvd_qty,FND_API.G_MISS_NUM,null,l_split_recvd_qty),
11062: NVL(decode(l_split_shipped_qty,FND_API.G_MISS_NUM,null,l_split_shipped_qty),
11063: NVL(decode(l_delivery_details_info.picked_quantity,FND_API.G_MISS_NUM,null,l_delivery_details_info.picked_quantity),
11064: decode(l_delivery_details_info.requested_quantity,FND_API.G_MISS_NUM,null,l_delivery_details_info.requested_quantity))))
11065: INTO l_new_wv_qty
11058: -- Staged delivery details W/V should always be reset back to original W/V
11059: l_new_wv_qty := 0;
11060: ELSE
11061: SELECT NVL(decode(l_split_recvd_qty,FND_API.G_MISS_NUM,null,l_split_recvd_qty),
11062: NVL(decode(l_split_shipped_qty,FND_API.G_MISS_NUM,null,l_split_shipped_qty),
11063: NVL(decode(l_delivery_details_info.picked_quantity,FND_API.G_MISS_NUM,null,l_delivery_details_info.picked_quantity),
11064: decode(l_delivery_details_info.requested_quantity,FND_API.G_MISS_NUM,null,l_delivery_details_info.requested_quantity))))
11065: INTO l_new_wv_qty
11066: FROM dual;
11059: l_new_wv_qty := 0;
11060: ELSE
11061: SELECT NVL(decode(l_split_recvd_qty,FND_API.G_MISS_NUM,null,l_split_recvd_qty),
11062: NVL(decode(l_split_shipped_qty,FND_API.G_MISS_NUM,null,l_split_shipped_qty),
11063: NVL(decode(l_delivery_details_info.picked_quantity,FND_API.G_MISS_NUM,null,l_delivery_details_info.picked_quantity),
11064: decode(l_delivery_details_info.requested_quantity,FND_API.G_MISS_NUM,null,l_delivery_details_info.requested_quantity))))
11065: INTO l_new_wv_qty
11066: FROM dual;
11067: END IF;
11060: ELSE
11061: SELECT NVL(decode(l_split_recvd_qty,FND_API.G_MISS_NUM,null,l_split_recvd_qty),
11062: NVL(decode(l_split_shipped_qty,FND_API.G_MISS_NUM,null,l_split_shipped_qty),
11063: NVL(decode(l_delivery_details_info.picked_quantity,FND_API.G_MISS_NUM,null,l_delivery_details_info.picked_quantity),
11064: decode(l_delivery_details_info.requested_quantity,FND_API.G_MISS_NUM,null,l_delivery_details_info.requested_quantity))))
11065: INTO l_new_wv_qty
11066: FROM dual;
11067: END IF;
11068:
11086: END IF;
11087: l_delivery_details_info.weight_uom_code := p_old_delivery_detail_rec.weight_uom_code;
11088: l_delivery_details_info.volume_uom_code := p_old_delivery_detail_rec.volume_uom_code;
11089:
11090: l_delivery_details_info.shipped_quantity := nvl(l_split_shipped_qty,FND_API.G_MISS_NUM);
11091: IF ( NVL(l_split_shipped_qty2, 0) = 0 ) THEN
11092: l_delivery_details_info.shipped_quantity2 := FND_API.G_MISS_NUM;
11093: ELSE
11094: l_delivery_details_info.shipped_quantity2 := l_split_shipped_qty2;
11088: l_delivery_details_info.volume_uom_code := p_old_delivery_detail_rec.volume_uom_code;
11089:
11090: l_delivery_details_info.shipped_quantity := nvl(l_split_shipped_qty,FND_API.G_MISS_NUM);
11091: IF ( NVL(l_split_shipped_qty2, 0) = 0 ) THEN
11092: l_delivery_details_info.shipped_quantity2 := FND_API.G_MISS_NUM;
11093: ELSE
11094: l_delivery_details_info.shipped_quantity2 := l_split_shipped_qty2;
11095: END IF;
11096: --
11094: l_delivery_details_info.shipped_quantity2 := l_split_shipped_qty2;
11095: END IF;
11096: --
11097: --
11098: l_delivery_details_info.received_quantity := nvl(l_split_recvd_qty, FND_API.G_MISS_NUM);
11099: l_delivery_details_info.received_quantity2 := nvl(l_split_recvd_qty2,FND_API.G_MISS_NUM);
11100: --
11101: IF ( NVL(l_qty2, 0) = 0 OR l_qty2 < 0 ) THEN
11102: l_delivery_details_info.cancelled_quantity2 := FND_API.G_MISS_NUM;
11095: END IF;
11096: --
11097: --
11098: l_delivery_details_info.received_quantity := nvl(l_split_recvd_qty, FND_API.G_MISS_NUM);
11099: l_delivery_details_info.received_quantity2 := nvl(l_split_recvd_qty2,FND_API.G_MISS_NUM);
11100: --
11101: IF ( NVL(l_qty2, 0) = 0 OR l_qty2 < 0 ) THEN
11102: l_delivery_details_info.cancelled_quantity2 := FND_API.G_MISS_NUM;
11103: ELSE
11098: l_delivery_details_info.received_quantity := nvl(l_split_recvd_qty, FND_API.G_MISS_NUM);
11099: l_delivery_details_info.received_quantity2 := nvl(l_split_recvd_qty2,FND_API.G_MISS_NUM);
11100: --
11101: IF ( NVL(l_qty2, 0) = 0 OR l_qty2 < 0 ) THEN
11102: l_delivery_details_info.cancelled_quantity2 := FND_API.G_MISS_NUM;
11103: ELSE
11104: -- Bug 2116595
11105: l_delivery_details_info.cancelled_quantity2 := FND_API.G_MISS_NUM;
11106: END IF;
11101: IF ( NVL(l_qty2, 0) = 0 OR l_qty2 < 0 ) THEN
11102: l_delivery_details_info.cancelled_quantity2 := FND_API.G_MISS_NUM;
11103: ELSE
11104: -- Bug 2116595
11105: l_delivery_details_info.cancelled_quantity2 := FND_API.G_MISS_NUM;
11106: END IF;
11107:
11108: l_delivery_details_info.cycle_count_quantity := nvl(l_split_cc_qty,FND_API.G_MISS_NUM);
11109: -- HW OPMCONV. No need to fork code
11104: -- Bug 2116595
11105: l_delivery_details_info.cancelled_quantity2 := FND_API.G_MISS_NUM;
11106: END IF;
11107:
11108: l_delivery_details_info.cycle_count_quantity := nvl(l_split_cc_qty,FND_API.G_MISS_NUM);
11109: -- HW OPMCONV. No need to fork code
11110: -- IF ( p_process_flag = FND_API.G_TRUE ) THEN
11111: l_delivery_details_info.cycle_count_quantity2 := nvl(l_split_cc_qty2,FND_API.G_MISS_NUM);
11112: -- END IF;
11106: END IF;
11107:
11108: l_delivery_details_info.cycle_count_quantity := nvl(l_split_cc_qty,FND_API.G_MISS_NUM);
11109: -- HW OPMCONV. No need to fork code
11110: -- IF ( p_process_flag = FND_API.G_TRUE ) THEN
11111: l_delivery_details_info.cycle_count_quantity2 := nvl(l_split_cc_qty2,FND_API.G_MISS_NUM);
11112: -- END IF;
11113:
11114: -- Bug 2116595
11107:
11108: l_delivery_details_info.cycle_count_quantity := nvl(l_split_cc_qty,FND_API.G_MISS_NUM);
11109: -- HW OPMCONV. No need to fork code
11110: -- IF ( p_process_flag = FND_API.G_TRUE ) THEN
11111: l_delivery_details_info.cycle_count_quantity2 := nvl(l_split_cc_qty2,FND_API.G_MISS_NUM);
11112: -- END IF;
11113:
11114: -- Bug 2116595
11115: l_delivery_details_info.cancelled_quantity := FND_API.G_MISS_NUM;
11111: l_delivery_details_info.cycle_count_quantity2 := nvl(l_split_cc_qty2,FND_API.G_MISS_NUM);
11112: -- END IF;
11113:
11114: -- Bug 2116595
11115: l_delivery_details_info.cancelled_quantity := FND_API.G_MISS_NUM;
11116: l_delivery_details_info.split_from_detail_id := p_old_delivery_detail_rec.delivery_detail_id;
11117:
11118: l_delivery_details_info.container_flag := p_old_delivery_detail_rec.container_flag;
11119: l_delivery_details_info.master_serial_number := FND_API.G_MISS_CHAR;
11115: l_delivery_details_info.cancelled_quantity := FND_API.G_MISS_NUM;
11116: l_delivery_details_info.split_from_detail_id := p_old_delivery_detail_rec.delivery_detail_id;
11117:
11118: l_delivery_details_info.container_flag := p_old_delivery_detail_rec.container_flag;
11119: l_delivery_details_info.master_serial_number := FND_API.G_MISS_CHAR;
11120: l_delivery_details_info.serial_number := FND_API.G_MISS_CHAR;
11121: l_delivery_details_info.to_serial_number := FND_API.G_MISS_CHAR;
11122: l_delivery_details_info.transaction_temp_id := FND_API.G_MISS_NUM;
11123: l_delivery_details_info.last_update_date := SYSDATE;
11116: l_delivery_details_info.split_from_detail_id := p_old_delivery_detail_rec.delivery_detail_id;
11117:
11118: l_delivery_details_info.container_flag := p_old_delivery_detail_rec.container_flag;
11119: l_delivery_details_info.master_serial_number := FND_API.G_MISS_CHAR;
11120: l_delivery_details_info.serial_number := FND_API.G_MISS_CHAR;
11121: l_delivery_details_info.to_serial_number := FND_API.G_MISS_CHAR;
11122: l_delivery_details_info.transaction_temp_id := FND_API.G_MISS_NUM;
11123: l_delivery_details_info.last_update_date := SYSDATE;
11124: l_delivery_details_info.last_updated_by := FND_GLOBAL.USER_ID;
11117:
11118: l_delivery_details_info.container_flag := p_old_delivery_detail_rec.container_flag;
11119: l_delivery_details_info.master_serial_number := FND_API.G_MISS_CHAR;
11120: l_delivery_details_info.serial_number := FND_API.G_MISS_CHAR;
11121: l_delivery_details_info.to_serial_number := FND_API.G_MISS_CHAR;
11122: l_delivery_details_info.transaction_temp_id := FND_API.G_MISS_NUM;
11123: l_delivery_details_info.last_update_date := SYSDATE;
11124: l_delivery_details_info.last_updated_by := FND_GLOBAL.USER_ID;
11125: l_delivery_details_info.last_update_login := FND_GLOBAL.LOGIN_ID;
11118: l_delivery_details_info.container_flag := p_old_delivery_detail_rec.container_flag;
11119: l_delivery_details_info.master_serial_number := FND_API.G_MISS_CHAR;
11120: l_delivery_details_info.serial_number := FND_API.G_MISS_CHAR;
11121: l_delivery_details_info.to_serial_number := FND_API.G_MISS_CHAR;
11122: l_delivery_details_info.transaction_temp_id := FND_API.G_MISS_NUM;
11123: l_delivery_details_info.last_update_date := SYSDATE;
11124: l_delivery_details_info.last_updated_by := FND_GLOBAL.USER_ID;
11125: l_delivery_details_info.last_update_login := FND_GLOBAL.LOGIN_ID;
11126: -- Bug 2419301
11334: --returned_quantity = l_original_rtv_qty, -- J-IB-NPARIKH
11335: --returned_quantity2 = l_original_rtv_qty2, -- J-IB-NPARIKH
11336: cycle_count_quantity = l_original_cc_qty,
11337: cycle_count_quantity2 = l_original_cc_qty2,
11338: serial_number = decode(l_updated_delivery_detail_rec.serial_number,FND_API.G_MISS_CHAR,NULL,
11339: NULL,serial_number,l_updated_delivery_detail_rec.serial_number),
11340: to_serial_number = decode(l_updated_delivery_detail_rec.to_serial_number,FND_API.G_MISS_CHAR,NULL,
11341: NULL,to_serial_number,l_updated_delivery_detail_rec.to_serial_number),
11342: transaction_temp_id = decode(l_updated_delivery_detail_rec.transaction_temp_id, FND_API.G_MISS_NUM,NULL,
11336: cycle_count_quantity = l_original_cc_qty,
11337: cycle_count_quantity2 = l_original_cc_qty2,
11338: serial_number = decode(l_updated_delivery_detail_rec.serial_number,FND_API.G_MISS_CHAR,NULL,
11339: NULL,serial_number,l_updated_delivery_detail_rec.serial_number),
11340: to_serial_number = decode(l_updated_delivery_detail_rec.to_serial_number,FND_API.G_MISS_CHAR,NULL,
11341: NULL,to_serial_number,l_updated_delivery_detail_rec.to_serial_number),
11342: transaction_temp_id = decode(l_updated_delivery_detail_rec.transaction_temp_id, FND_API.G_MISS_NUM,NULL,
11343: NULL,transaction_temp_id,l_updated_delivery_detail_rec.transaction_temp_id),
11344: -- J: W/V Changes
11338: serial_number = decode(l_updated_delivery_detail_rec.serial_number,FND_API.G_MISS_CHAR,NULL,
11339: NULL,serial_number,l_updated_delivery_detail_rec.serial_number),
11340: to_serial_number = decode(l_updated_delivery_detail_rec.to_serial_number,FND_API.G_MISS_CHAR,NULL,
11341: NULL,to_serial_number,l_updated_delivery_detail_rec.to_serial_number),
11342: transaction_temp_id = decode(l_updated_delivery_detail_rec.transaction_temp_id, FND_API.G_MISS_NUM,NULL,
11343: NULL,transaction_temp_id,l_updated_delivery_detail_rec.transaction_temp_id),
11344: -- J: W/V Changes
11345: gross_weight = gross_weight - l_total_gross_wt,
11346: net_weight = net_weight - l_total_net_wt,
11584: x_new_delivery_detail_rec.serial_number := x_old_detail_rec.serial_number;
11585: x_new_delivery_detail_rec.to_serial_number := x_old_detail_rec.to_serial_number;
11586: x_new_delivery_detail_rec.transaction_temp_id := x_old_detail_rec.transaction_temp_id;
11587:
11588: x_old_detail_rec.serial_number := FND_API.G_MISS_CHAR;
11589: x_old_detail_rec.to_serial_number := FND_API.G_MISS_CHAR;
11590: x_old_detail_rec.transaction_temp_id := FND_API.G_MISS_NUM;
11591:
11592: ELSIF p_old_shipped_quantity < x_old_detail_rec.shipped_quantity THEN
11585: x_new_delivery_detail_rec.to_serial_number := x_old_detail_rec.to_serial_number;
11586: x_new_delivery_detail_rec.transaction_temp_id := x_old_detail_rec.transaction_temp_id;
11587:
11588: x_old_detail_rec.serial_number := FND_API.G_MISS_CHAR;
11589: x_old_detail_rec.to_serial_number := FND_API.G_MISS_CHAR;
11590: x_old_detail_rec.transaction_temp_id := FND_API.G_MISS_NUM;
11591:
11592: ELSIF p_old_shipped_quantity < x_old_detail_rec.shipped_quantity THEN
11593: -- we are reducing old shipped quantity
11586: x_new_delivery_detail_rec.transaction_temp_id := x_old_detail_rec.transaction_temp_id;
11587:
11588: x_old_detail_rec.serial_number := FND_API.G_MISS_CHAR;
11589: x_old_detail_rec.to_serial_number := FND_API.G_MISS_CHAR;
11590: x_old_detail_rec.transaction_temp_id := FND_API.G_MISS_NUM;
11591:
11592: ELSIF p_old_shipped_quantity < x_old_detail_rec.shipped_quantity THEN
11593: -- we are reducing old shipped quantity
11594:
11622: '0');
11623:
11624: -- compress range of same serial numbers to individual serial number
11625: IF l_old_to_sn = x_old_detail_rec.serial_number THEN
11626: l_old_to_sn := FND_API.G_MISS_CHAR;
11627: END IF;
11628: IF l_new_to_sn = l_new_sn THEN
11629: l_new_to_sn := FND_API.G_MISS_CHAR;
11630: END IF;
11625: IF l_old_to_sn = x_old_detail_rec.serial_number THEN
11626: l_old_to_sn := FND_API.G_MISS_CHAR;
11627: END IF;
11628: IF l_new_to_sn = l_new_sn THEN
11629: l_new_to_sn := FND_API.G_MISS_CHAR;
11630: END IF;
11631:
11632: x_old_detail_rec.to_serial_number := l_old_to_sn;
11633: x_new_delivery_detail_rec.serial_number := l_new_sn;
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);
11689:
11690: FOR c IN c_sn_ranges(x_old_detail_rec.transaction_temp_id) LOOP
11691:
11692: -- Bug 3782838 : Retain transaction_temp_id for single serial number
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;
12865: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
12866: RAISE FND_API.G_EXC_ERROR;
12867: END IF;
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;
12865: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
12866: RAISE FND_API.G_EXC_ERROR;
12867: END IF;
12868:
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;
12865: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
12866: RAISE FND_API.G_EXC_ERROR;
12867: END IF;
12868:
12869: END LOOP; -- }
12862: --
12863: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12864: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12865: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
12866: RAISE FND_API.G_EXC_ERROR;
12867: END IF;
12868:
12869: END LOOP; -- }
12870:
12913: END IF;
12914: -- Only Handle Unexpected error
12915: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
12916: --
12917: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12918: END IF;
12919: -- End of Code for DBI Project
12920: --
12921:
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
12958: RAISE FND_API.G_EXC_ERROR;
12959: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
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
12958: RAISE FND_API.G_EXC_ERROR;
12959: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12960: x_return_status := l_return_status;
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
12958: RAISE FND_API.G_EXC_ERROR;
12959: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12960: x_return_status := l_return_status;
12961: END IF;
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
12958: RAISE FND_API.G_EXC_ERROR;
12959: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12960: x_return_status := l_return_status;
12961: END IF;
12962:
12992: END IF;
12993: -- Only Handle Unexpected error
12994: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
12995: --
12996: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12997: END IF;
12998: -- End of Code for DBI Project
12999: --
13000:
13072: END IF;
13073: --
13074: EXCEPTION
13075:
13076: WHEN FND_API.G_EXC_ERROR THEN
13077: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13078:
13079: --
13080: IF l_debug_on THEN
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
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
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);
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:
13094: return;
13095:
13096:
13097: WHEN OTHERS THEN
13098: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13099: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_ACTIONS.Consolidate_Source_Lines ' );
13100: --
13101: -- Debug Statements
13102: --
13202: p_validate_flag => 'N',
13203: x_return_status => l_return_status
13204: );
13205: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
13206: raise FND_API.G_EXC_ERROR;
13207: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
13208: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13209: END IF;
13210: END IF; --}
13204: );
13205: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
13206: raise FND_API.G_EXC_ERROR;
13207: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
13208: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13209: END IF;
13210: END IF; --}
13211: --Added for bug 10062808
13212: OPEN c_detail(p_delivery_detail_id );
13219: x_mtl_system_items_rec => l_item_info,
13220: x_return_status => l_return_status
13221: );
13222: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
13223: raise FND_API.G_EXC_ERROR;
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
13221: );
13222: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
13223: raise FND_API.G_EXC_ERROR;
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
13265: x_return_status => l_return_status
13266: );
13267: END IF;
13268: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
13269: raise FND_API.G_EXC_ERROR;
13270: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
13271: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13272: END IF;
13273: END IF; --}
13267: END IF;
13268: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
13269: raise FND_API.G_EXC_ERROR;
13270: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
13271: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13272: END IF;
13273: END IF; --}
13274:
13275: -- muom
13328: );
13329: END IF;
13330: END IF;
13331: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
13332: raise FND_API.G_EXC_ERROR;
13333: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
13334: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13335: END IF;
13336: END IF; --}
13330: END IF;
13331: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
13332: raise FND_API.G_EXC_ERROR;
13333: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
13334: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13335: END IF;
13336: END IF; --}
13337: ELSE
13338: -- muom
13391: x_return_status => l_return_status
13392: );
13393: END IF;
13394: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
13395: raise FND_API.G_EXC_ERROR;
13396: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
13397: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13398: END IF;
13399:
13393: END IF;
13394: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
13395: raise FND_API.G_EXC_ERROR;
13396: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
13397: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13398: END IF;
13399:
13400: END IF; --}
13401:
13415: p_delivery_detail_id => p_delivery_detail_id,
13416: p_cancel_flag => 'N',
13417: x_return_status => l_return_status);
13418: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
13419: raise FND_API.G_EXC_ERROR;
13420: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
13421: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13422: END IF;
13423: END IF; --}
13417: x_return_status => l_return_status);
13418: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
13419: raise FND_API.G_EXC_ERROR;
13420: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
13421: raise FND_API.G_EXC_UNEXPECTED_ERROR;
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
13431: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13432: IF c_detail%ISOPEN THEN
13433: CLOSE c_detail;
13434: END IF;
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
13441: CLOSE c_detail;
13442: END IF;
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;
13553: x_return_status := FND_API.G_RET_STS_SUCCESS;
13554:
13555: -- Store the passed parameter values into local pl/sql tables
13556: FOR i IN p_delivery_details_tab.FIRST .. p_delivery_details_tab.LAST LOOP --{
13549: END IF;
13550: --
13551:
13552: l_return_status := FND_API.G_RET_STS_SUCCESS;
13553: x_return_status := FND_API.G_RET_STS_SUCCESS;
13554:
13555: -- Store the passed parameter values into local pl/sql tables
13556: FOR i IN p_delivery_details_tab.FIRST .. p_delivery_details_tab.LAST LOOP --{
13557: -- RTV BO Cons Changes
13729: p_overpick_qty2s => l_overpick_qty2s(l_cmp_idx),
13730: x_return_status => l_return_status
13731: );
13732: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
13733: raise FND_API.G_EXC_ERROR;
13734: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
13735: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13736: END IF;
13737:
13731: );
13732: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
13733: raise FND_API.G_EXC_ERROR;
13734: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
13735: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13736: END IF;
13737:
13738: -- If a delivery detail is partially backordered , unreserve the backordered
13739: -- quantity and later update its requested quantity. This delivery detail should not be
13758: p_overpick_qty2s => l_overpick_qty2s(l_cmp_idx),
13759: x_return_status => l_return_status
13760: );
13761: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
13762: raise FND_API.G_EXC_ERROR;
13763: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
13764: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13765: END IF;
13766:
13760: );
13761: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
13762: raise FND_API.G_EXC_ERROR;
13763: ELSIF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
13764: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13765: END IF;
13766:
13767: -- HW OPM BUG#:3121616 added qty2s
13768: update wsh_delivery_details
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;
13809: END IF;
13810: -- End of Code for DBI Project
13811: --
13812:
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);
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');
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
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
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);
13885: END IF;
13886: --
13887:
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');
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
13894: END IF;
13895: --
13896:
13897: WHEN OTHERS THEN
13898: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13899: WSH_UTIL_CORE.Default_Handler('WSH_DELIVERY_DETAILS_ACTIONS.Consolidate_Delivery_Details',l_module_name);
13900: --
13901: -- Debug Statements
13902: --
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:
13933: FORALL i in p_detail_id_tab.first..p_detail_id_tab.LAST
13934: update wsh_delivery_assignments
13935: set type = 'S'
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;
13953: WSH_UTIL_CORE.Default_Handler('WSH_DELIVERY_DETAILS_ACTIONS.Unassign_Top_Detail_from_Delivery',l_module_name);
13954: --
13955: -- Debug Statements
13956: --
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:
14003: i := p_detail_id_tab.FIRST;
14004:
14005: WHILE i is NOT NULL LOOP
14080:
14081: EXCEPTION
14082:
14083: WHEN OTHERS THEN
14084: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14085: WSH_UTIL_CORE.Default_Handler('WSH_DELIVERY_DETAILS_ACTIONS.Create_Consol_Record',l_module_name);
14086: --
14087: -- Debug Statements
14088: --