[Home] [Help]
The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT wdd.source_line_id,
wdd.organization_id,
wdd.inventory_item_id,
wdd.serial_number,
wdd.to_serial_number, -- Bug fix 2652300
wdd.top_model_line_id, -- Bug fix 2652300
wdd.transaction_temp_id,
wdd.locator_id,
wdd.revision,
wdd.subinventory,
wdd.lot_number,
wdd.released_status,
wdd.requested_quantity_uom,
wdd.gross_weight,
wdd.net_weight,
wdd.weight_uom_code,
wdd.volume,
wdd.volume_uom_code,
wdd.container_name,
wdd.container_flag,
wdd.master_serial_number,
wdd.inspection_flag,
wdd.cycle_count_quantity,
wdd.shipped_quantity,
wdd.requested_quantity,
wdd.picked_quantity,
-- PK added for Bug 3055126 qty2's
wdd.cycle_count_quantity2,
wdd.shipped_quantity2,
wdd.requested_quantity2,
wdd.picked_quantity2,
wdd.pickable_flag,
wda.delivery_id,
wda.parent_delivery_detail_id
FROM wsh_delivery_details wdd,
wsh_delivery_assignments_v wda
WHERE wdd.delivery_detail_id = p_detail_id
AND wdd.delivery_detail_id = wda.delivery_detail_id;
PROCEDURE Update_Delivery_Detail(
p_detail_info_tab IN WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type ,
p_valid_index_tab IN wsh_util_core.id_tab_type,
x_return_status OUT NOCOPY varchar2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_caller IN VARCHAR2 DEFAULT NULL
);
SELECT delivery_id
FROM wsh_new_deliveries
WHERE NAME = p_delivery_name;
SELECT delivery_id
FROM wsh_new_deliveries
WHERE delivery_id = p_delivery_id;
SELECT wda.delivery_id
FROM wsh_delivery_assignments_v wda,
wsh_delivery_details wdd
WHERE wda.delivery_detail_id = c_delivery_detail_id
AND wda.delivery_detail_id = wdd.delivery_detail_id
AND wdd.container_flag = 'N'
AND NVL(wdd.line_direction,'O') in ('O','IO');
l_adjust_planned_del_tab.delete;
/* OPM changes NC . Added requsted_quantity2 in the select */
CURSOR c_find_delivery_detail(c_delivery_detail_id NUMBER) IS
SELECT NVL(LINE_DIRECTION,'O'),
NVL(received_quantity, shipped_quantity),
NVL(received_quantity2, shipped_quantity2),
NVL(picked_quantity, requested_quantity),
NVL(picked_quantity2, requested_quantity2)
FROM wsh_delivery_details
WHERE delivery_detail_id = c_delivery_detail_id;
SELECT inventory_item_id, organization_id, requested_quantity_uom, top_model_line_id
FROM wsh_delivery_details
WHERE delivery_detail_id = p_del_det_id;
PROCEDURE Update_Shipping_Attributes (
-- Standard parameters
p_api_version_number IN NUMBER
, p_init_msg_list IN VARCHAR2
, p_commit IN VARCHAR2
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2
-- Procedure specific parameters
, p_changed_attributes IN OUT NOCOPY WSH_INTERFACE.ChangedAttributeTabType
, p_source_code IN VARCHAR2
, p_container_flag IN VARCHAR2 DEFAULT NULL
)
IS
--
l_number_of_errors NUMBER := 0;
l_api_name VARCHAR2(30) := 'Update_Shipping_Attributes';
update_failed exception;
select organization_id
from wsh_delivery_details
where delivery_detail_id = p_detail_id;
l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'UPDATE_SHIPPING_ATTRIBUTES';
SAVEPOINT UPDATE_SHIPPING_ATTR_GRP;
l_detail_in_rec.action_code := 'UPDATE';
RAISE update_failed;
WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTERFACE_GRP.CREATE_UPDATE_DELIVERY_DETAIL',WSH_DEBUG_SV.C_PROC_LEVEL);
wsh_interface_grp.Create_Update_Delivery_Detail
(
p_api_version_number => l_api_version_number,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_detail_info_tab => l_detail_info_tab,
p_IN_rec => l_detail_in_rec,
x_OUT_rec => l_detail_out_rec
);
ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
WHEN update_failed THEN
ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
WSH_DEBUG_SV.logmsg(l_module_name,'UPDATE_FAILED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:UPDATE_FAILED');
ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
ROLLBACK TO UPDATE_SHIPPING_ATTR_GRP;
WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Update_Shipping_Attributes');
END Update_Shipping_Attributes;
SELECT delivery_id, parent_delivery_detail_id
FROM wsh_delivery_assignments_v
WHERE delivery_detail_id = p_delivery_detail_id;
SELECT status_code
FROM wsh_new_deliveries
WHERE delivery_id = c_del_id;
SELECT inventory_item_id
, organization_id
, requested_quantity_uom
, nvl(line_direction,'O') line_direction -- J-IB-NPARIKH
, released_status
FROM wsh_delivery_details
WHERE delivery_detail_id = p_del_det_id;
SELECT nvl(line_direction,'O') line_direction, requested_quantity_uom2
FROM wsh_delivery_details
WHERE delivery_detail_id = l_del_det_id;
SELECT released_status, requested_quantity, requested_quantity2,
picked_quantity, picked_quantity2 , shipped_quantity , shipped_quantity2,
organization_id, inventory_item_id
FROM wsh_delivery_details
WHERE delivery_detail_id = p_del_det_id;
SELECT organization_id,
status_code,
planned_flag,
nvl(shipment_direction, 'O'), -- shipment_direction jckwok
nvl(ignore_for_planning, 'N'), -- OTM R12 : WSHDEVLS record
nvl(tms_interface_flag, WSH_NEW_DELIVERIES_PVT.C_TMS_NOT_TO_BE_SENT) -- OTM R12 : WSHDEVLS record
FROM wsh_new_deliveries
WHERE delivery_id = p_dlvy_id;
SELECT wda.delivery_id
FROM wsh_delivery_assignments_v wda, wsh_delivery_details wdd
WHERE wdd.delivery_detail_id = p_del_det_id
AND wdd.delivery_detail_id = wda.delivery_detail_id
AND wdd.container_flag = 'N'
AND wdd.source_code = 'OE'
AND NVL(wdd.line_direction, 'O') in ('O', 'IO');
SELECT SHIP_METHOD_CODE, INTMED_SHIP_TO_LOCATION_ID
FROM wsh_new_deliveries
WHERE delivery_id = p_dlvy_id;
l_delivery_ids.delete;
AND p_action_prms.action_code = 'DELETE'
) THEN --BUG 4354579
wsh_delivery_details_pkg.Lock_Delivery_Details(
p_rec_attr_tab => p_rec_attr_tab,
p_caller => p_action_prms.caller,
p_valid_index_tab => l_valid_index_tab,
x_valid_ids_tab => l_valid_ids_tab,
x_return_status => l_return_status
);
x_action_out_rec.selection_issue_flag := 'Y';
l_id_tab_t.DELETE;
FND_MESSAGE.SET_NAME('WSH','WSH_UI_MULTI_SELECTION');
wsh_debug_sv.logmsg(l_module_name,'WSH_UI_MULTI_SELECTION');
WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERY_ACTIONS.ASSIGN_DELIVERY_UPDATE',WSH_DEBUG_SV.C_PROC_LEVEL);
wsh_new_delivery_actions.assign_delivery_update(
p_delivery_id => p_action_prms.delivery_id,
p_del_params => l_detail_group_params,
x_return_status => l_return_status);
update wsh_new_deliveries set INTMED_SHIP_TO_LOCATION_ID=null
where delivery_id=x_action_out_rec.delivery_id_tab(i);
update wsh_new_deliveries
set SHIP_METHOD_CODE=null,
CARRIER_ID = null,
MODE_OF_TRANSPORT = null,
SERVICE_LEVEL = null
where delivery_id=x_action_out_rec.delivery_id_tab(i);
WSH_WV_UTILS.G_RESET_WV := 'Y'; -- set to Y to enable the update
--Bug 3326794: Added code for the DELETE action.
ELSIF p_action_prms.action_code = 'DELETE' THEN
--{
IF l_debug_on THEN
--{
WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Delete',WSH_DEBUG_SV.C_PROC_LEVEL);
WSH_UTIL_CORE.Delete(
p_type => 'DLVB',
p_rows => l_id_tab,
x_return_status => l_return_status);
wsh_debug_sv.log(l_module_name,'Return Status After Calling Delete',l_return_status);
PROCEDURE Create_Update_Delivery_Detail
(
-- Standard Parameters
p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2,
p_commit IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
-- Procedure Specific Parameters
p_detail_info_tab IN WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type,
p_IN_rec IN WSH_GLBL_VAR_STRCT_GRP.detailInRecType,
x_OUT_rec OUT NOCOPY WSH_GLBL_VAR_STRCT_GRP.detailOutRecType
) IS
l_api_name CONSTANT VARCHAR2(30) := 'Create_Update_Delivery_Detail';
SELECT wda.delivery_id
FROM wsh_delivery_assignments_v wda
WHERE wda.delivery_detail_id = p_detail_id;
l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'CREATE_UPDATE_DELIVERY_DETAIL';
SAVEPOINT CREATE_UPDATE_DEL_DETAIL_GRP;
create_update_delivery_detail(
p_api_version_number => p_api_version_number,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_detail_info_tab => p_detail_info_tab,
p_IN_rec => p_in_rec,
x_OUT_rec => x_out_rec,
p_serial_range_tab => l_dummy_ser_range_tab
);
ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP;
ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP;
ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP;
WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_Update_Delivery_Detail');
END Create_Update_Delivery_Detail;
l_update_container_orig VARCHAR2(2) := WSH_WMS_LPN_GRP.g_update_to_container;
SELECT LPN_STARTING_NUMBER
FROM mtl_parameters
WHERE ORGANIZATION_ID = v_organization_id;
SELECT WMS_LICENSE_PLATE_NUMBERS_S2.nextval
FROM DUAL;
SELECT WMS_LICENSE_PLATE_NUMBERS_S2.currval
FROM DUAL;
WSH_WMS_LPN_GRP.g_update_to_container := 'N';
WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
WSH_WMS_LPN_GRP.g_update_to_container := 'N';
WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
WSH_WMS_LPN_GRP.g_update_to_container := l_update_container_orig;
SELECT source_line_id,
organization_id,
inventory_item_id,
serial_number,
transaction_temp_id,
locator_id,
revision,
subinventory,
lot_number,
released_status,
requested_quantity_uom
FROM wsh_delivery_details
WHERE delivery_detail_id = x_detail_info_tab(p_counter).delivery_detail_id;
SELECT primary_uom_code,
description,
hazard_class_id,
weight_uom_code,
unit_weight,
volume_uom_code,
unit_volume
FROM mtl_system_items
WHERE inventory_item_id = p_inventory_item_id
AND organization_id = p_organization_id;
ELSIF p_action = 'UPDATE' THEN
OPEN c_original_detail_cur(x_detail_info_tab(l_index).delivery_detail_id);
PROCEDURE Update_Delivery_Detail(
p_detail_info_tab IN WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type ,
p_valid_index_tab IN wsh_util_core.id_tab_type,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_caller IN VARCHAR2 DEFAULT NULL)
IS
cursor lock_delivery_details(p_del_det IN NUMBER) is
select delivery_detail_id
from wsh_delivery_details
where delivery_detail_id = p_del_det
for update nowait;
l_api_name CONSTANT VARCHAR2(30) := 'Update_Delivery_Detail';
l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'UPDATE_DELIVERY_DETAIL';
SAVEPOINT UPDATE_DEL_DETAIL_GRP;
WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_PKG.UPDATE_DELIVERY_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
wsh_delivery_details_pkg.Update_Delivery_Details(
p_rowid => p_detail_info_tab(l_index).rowid,
p_delivery_details_info => p_detail_info_tab(l_index),
x_return_status => l_return_status);
WSH_WMS_LPN_GRP.g_update_to_container := 'N';
ROLLBACK to UPDATE_DEL_DETAIL_GRP;
WSH_WMS_LPN_GRP.g_update_to_container := 'N';
ROLLBACK to UPDATE_DEL_DETAIL_GRP;
WSH_WMS_LPN_GRP.g_update_to_container := 'N';
WSH_WMS_LPN_GRP.g_update_to_container := 'N';
WSH_WMS_LPN_GRP.g_update_to_container := 'N';
ROLLBACK to UPDATE_DEL_DETAIL_GRP;
WSH_WMS_LPN_GRP.g_update_to_container := 'N';
WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Update_Delivery_Detail');
END Update_Delivery_Detail;
WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTERFACE.Update_Shipping_Attributes',WSH_DEBUG_SV.C_PROC_LEVEL);
WSH_INTERFACE.Update_Shipping_Attributes(
p_source_code => 'WSH',
p_changed_attributes => l_changed_attr_tab,
x_return_status => l_return_status
);
WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Delete_Delivery_Detail');
l_update_attributes BOOLEAN;
SELECT group_mark_id
FROM mtl_serial_numbers
WHERE serial_number = v_serial_number
AND inventory_item_id = v_item_id;
l_update_attributes := FALSE;
SELECT mtl_material_transactions_s.NEXTVAL
INTO l_transaction_id
FROM DUAL;
SELECT mtl_material_transactions_s.NEXTVAL
INTO l_transaction_id
FROM DUAL;
l_update_attributes := TRUE;
SELECT mtl_material_transactions_s.NEXTVAL
INTO l_transaction_id
FROM DUAL;
l_detail_ser_qty = 1 AND l_update_attributes = FALSE AND
x_detail_rec.serial_number <> fnd_api.g_miss_char
-- AND (x_detail_rec.serial_number IS NULL OR
-- x_detail_rec.serial_number <> p_original_rec.serial_number)
THEN
IF l_debug_on THEN
WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UNMARK_SERIAL_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
l_detail_ser_qty = 1 AND l_update_attributes = FALSE)
OR
(p_original_rec.transaction_temp_id IS NOT NULL AND
l_det_ser_range_tab.count > 0 AND
l_detail_ser_qty > 1)
THEN
-- derive serial number from MSNT for this transaction temp id
-- compare with x_detail_rec.serial_number
IF l_debug_on THEN
WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UNMARK_SERIAL_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
IF NOT l_update_attributes THEN
IF l_inv_controls.ser_flag = 'Y' THEN
IF l_det_ser_range_tab(l_det_index).to_serial_number IS NOT NULL THEN -- bug 1578114 condition added
IF l_debug_on THEN
WSH_DEBUG_SV.log(l_module_name, 'To Serial Number', l_det_ser_range_tab(l_det_index).to_serial_number);
END IF; -- IF NOT l_update_attributes THEN
WSH_DEBUG_SV.logmsg(l_module_name, 'Inserting record into msnt');
INSERT INTO mtl_serial_numbers_temp
(
transaction_temp_id, last_update_date,
last_updated_by, creation_date,
created_by, last_update_login, request_id,
program_application_id, program_id,
program_update_date, vendor_serial_number,
vendor_lot_number, fm_serial_number,
to_serial_number, serial_prefix,
ERROR_CODE, group_header_id,
parent_serial_number,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15,
dff_updated_flag
)
VALUES (
v1, v2,
v3, v4,
v5, v6, v7,
v8, v9,
v10, v11,
v12, v13,
v14, v15,
v16, v17,
v18,
v19,
v20,
v21,
v22,
v23,
v24,
v25,
v26,
v27,
v28,
v29,
v30,
v31,
v32,
v33,
v34,
v35
);
IF NOT l_update_attributes THEN
--{
IF l_transaction_id IS NOT NULL
THEN
-- (
wsh_delivery_details_inv.mark_serial_number(
p_delivery_detail_id => x_detail_rec.delivery_detail_id,
p_serial_number => NULL,
p_transaction_temp_id => l_transaction_id,
x_return_status => l_return_status
);
WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UPDATE_MARKED_SERIAL',WSH_DEBUG_SV.C_PROC_LEVEL);
WSH_DELIVERY_DETAILS_INV.Update_Marked_Serial(
p_from_serial_number => p_original_rec.serial_number,
p_to_serial_number => NULL, -- always pass NULL for single serial number
p_inventory_item_id => p_original_rec.inventory_item_id,
p_organization_id => l_org_id,
p_transaction_temp_id => l_transaction_id,
x_return_status => l_return_status);
wsh_debug_sv.log(l_module_name, 'Return status after Update_Marked_Serial ', l_return_status);
END IF; -- l_update_attributes;
SELECT parent_delivery_detail_id
FROM wsh_delivery_assignments_v
WHERE delivery_detail_id = p_detail_id;
FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_MASTER_SERIAL');
FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_MASTER_SERIAL');
FND_MESSAGE.SET_NAME('WSH', 'WSH_UPDATE_INSPECT_FLAG');
SELECT sum(nvl(msnt.serial_prefix, 0)) serial_qty
FROM mtl_serial_numbers_temp msnt
WHERE msnt.transaction_temp_id = p_transaction_temp_id
GROUP BY msnt.transaction_temp_id;
Procedure: Create_Update_Delivery_Detail (OVERLOADED)
Parameters:
Description: This procedure is the new API for wrapping the logic of CREATE/UPDATE of delivery details
This OVERLOADED procedure has the additional parameter 'p_serial_range_tab'
Created : Patchset I
----------------------------------------------------------------------- */
PROCEDURE Create_Update_Delivery_Detail
(
-- Standard Parameters
p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2,
p_commit IN VARCHAR2,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
-- Procedure Specific Parameters
p_detail_info_tab IN WSH_GLBL_VAR_STRCT_GRP.Delivery_Details_Attr_Tbl_Type,
p_IN_rec IN WSH_GLBL_VAR_STRCT_GRP.detailInRecType,
x_OUT_rec OUT NOCOPY WSH_GLBL_VAR_STRCT_GRP.detailOutRecType,
p_serial_range_tab IN WSH_GLBL_VAR_STRCT_GRP.ddSerialRangeTabType
) IS
l_api_name CONSTANT VARCHAR2(30) := 'Create_Update_Delivery_Detail2';
SELECT wda.delivery_id
FROM wsh_delivery_assignments_v wda
WHERE wda.delivery_detail_id = p_detail_id;
l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'CREATE_UPDATE_DELIVERY_DETAIL2';
SAVEPOINT CREATE_UPDATE_DEL_DETAIL_GRP2;
ELSIF(p_In_rec.action_code NOT IN('CREATE', 'UPDATE', 'CANCEL')
OR (p_In_rec.action_code = 'CANCEL' AND p_In_rec.caller <> 'WSH_INBOUND')) THEN
FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_ACTION_CODE');
IF p_In_rec.caller LIKE 'WMS%' AND p_in_rec.action_code ='UPDATE'
THEN
l_weight_uom_code := p_detail_info_tab(l_index).weight_uom_code;
AND p_in_rec.action_code ='UPDATE'
AND l_delivery_detail_rec.container_flag in ('Y', 'C')
THEN
IF l_weight_uom_code <>
l_delivery_detail_rec.weight_uom_code
AND l_weight_uom_code <> FND_API.G_MISS_CHAR
THEN
l_delivery_detail_rec.gross_weight :=
WSH_WV_UTILS.Convert_Uom_core (
from_uom => l_weight_uom_code,
to_uom => l_delivery_detail_rec.weight_uom_code,
quantity => l_delivery_detail_rec.gross_weight,
item_id => l_delivery_detail_rec.inventory_item_id,
x_return_status => l_return_status );
IF(p_in_rec.action_code ='UPDATE' AND l_detail_info_tab.count < 1) THEN
-- Should not proceed further
IF l_debug_on THEN
wsh_debug_sv.logmsg(l_module_name,'Table Count Zero');
ELSIF(p_In_rec.action_code = 'UPDATE') THEN
IF( WSH_UTIL_CORE.FTE_Is_Installed = 'Y') THEN
IF l_details_marked.count > 0 THEN
--
IF l_debug_on THEN
WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_ACTIONS.MARK_REPRICE_REQUIRED',WSH_DEBUG_SV.C_PROC_LEVEL);
Update_Delivery_Detail(
p_detail_info_tab => l_detail_info_tab,
p_valid_index_tab => l_valid_index_tab,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_caller => p_in_rec.caller);
ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
ROLLBACK TO CREATE_UPDATE_DEL_DETAIL_GRP2;
WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_GRP.Create_Update_Delivery_Detail');
END Create_Update_Delivery_Detail;
l_group_match_seq_tbl.delete;
select WSH_DELIVERY_GROUP_S.nextval into l_group_match_seq_tbl(i).delivery_group_id from dual;