1736: Input: Table of Record Types for Delivery Details
1737: Output: Return Status - success or failure
1738: ==============================================================================
1739: Logic: i) Delete records from the following tables:
1740: WSH_FREIGHT_COSTS, WSH_SERIAL_NUMBERS, WSH_EXCEPTIONS,
1741: wsh_delivery_assignments_v, WSH_DELIVERY_DETAILS
1742: -----------------------------------------------------------------------------*/
1743: PROCEDURE Purge_Delivery_Details(p_tbl_del_detail_purge_set Del_Detail_ID_Tbl_Type,
1744: x_return_status OUT NOCOPY VARCHAR2
1767: LOOP
1768: l_detail_id := p_tbl_del_detail_purge_set(l_loop_index).delivery_detail_id;
1769:
1770: DELETE
1771: FROM wsh_serial_numbers
1772: WHERE delivery_detail_id = l_detail_id;
1773:
1774: IF SQL%FOUND THEN
1775: IF l_debug_on THEN
1772: WHERE delivery_detail_id = l_detail_id;
1773:
1774: IF SQL%FOUND THEN
1775: IF l_debug_on THEN
1776: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_serial_numbers: DELIVERY_DETAIL_ID=' || l_detail_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1777: END IF;
1778: END IF;
1779:
1780: DELETE