1215: Input: Table of Record Types for Trips
1216: Output: Return Status - success or failure
1217: ==============================================================================
1218: Logic: i) Delete records from the following tables:
1219: WSH_EXCEPTIONS, WSH_FREIGHT_COSTS, WSH_DOCUMENT_INSTANCES,WSH_TRIPS
1220: -----------------------------------------------------------------------------*/
1221:
1222: PROCEDURE Purge_Trips( p_tbl_trip_purge_set Trip_ID_Tbl_Type,
1223: x_return_status OUT NOCOPY VARCHAR2
1248: LOOP
1249: l_trip_id := p_tbl_trip_purge_set(l_loop_index).trip_id;
1250:
1251: DELETE
1252: FROM wsh_exceptions
1253: WHERE trip_id = l_trip_id;
1254:
1255: IF SQL%FOUND THEN
1256: IF l_debug_on THEN
1253: WHERE trip_id = l_trip_id;
1254:
1255: IF SQL%FOUND THEN
1256: IF l_debug_on THEN
1257: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_exceptions: TRIP_ID=' || l_trip_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1258: END IF;
1259: END IF;
1260:
1261: DELETE
1318: Input: Table of Record Types for Deliveries
1319: Output: Return Status - success or failure
1320: ==============================================================================
1321: Logic: i) Delete records from the following tables:
1322: WSH_EXCEPTIONS, WSH_TRANSACTIONS_HISTORY, WSH_DOCUMENT_INSTANCES,
1323: WSH_FREIGHT_COSTS
1324:
1325: If FTE is installed,
1326: FTE_SHIPMENT_STATUS_DETAILS, FTE_SHIPMENT_STATUS_EXCEPTIONS,
1362:
1363: l_delivery_id := p_tbl_delivery_purge_set(l_loop_index).delivery_id;
1364:
1365: DELETE
1366: FROM wsh_exceptions
1367: WHERE delivery_id = l_delivery_id;
1368:
1369: IF SQL%FOUND THEN
1370: IF l_debug_on THEN
1367: WHERE delivery_id = l_delivery_id;
1368:
1369: IF SQL%FOUND THEN
1370: IF l_debug_on THEN
1371: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_exceptions: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1372: END IF;
1373: END IF;
1374:
1375: DELETE
1595: Input: Table of Record Types for Trip Stops
1596: Output: Return Status - success or failure
1597: ==============================================================================
1598: Logic: i) Delete records from the following tables:
1599: WSH_EXCEPTIONS, WSH_FREIGHT_COSTS, WSH_TRIP_STOPS
1600: -----------------------------------------------------------------------------*/
1601:
1602: PROCEDURE Purge_Trip_Stops( p_tbl_trip_stop_purge_set Trip_Stop_ID_Tbl_Type,
1603: x_return_status OUT NOCOPY VARCHAR2
1627: LOOP
1628: l_stop_id := p_tbl_trip_stop_purge_set(l_loop_index).stop_id;
1629:
1630: DELETE
1631: FROM wsh_exceptions
1632: WHERE trip_stop_id = l_stop_id;
1633:
1634: IF SQL%FOUND THEN
1635: IF l_debug_on THEN
1632: WHERE trip_stop_id = l_stop_id;
1633:
1634: IF SQL%FOUND THEN
1635: IF l_debug_on THEN
1636: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_exceptions: STOP_ID=' || l_stop_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1637: END IF;
1638: END IF;
1639:
1640: DELETE
1861: Input: Table of Record Types for Delivery Details
1862: Output: Return Status - success or failure
1863: ==============================================================================
1864: Logic: i) Delete records from the following tables:
1865: WSH_FREIGHT_COSTS, WSH_SERIAL_NUMBERS, WSH_EXCEPTIONS,
1866: wsh_delivery_assignments_v, WSH_DELIVERY_DETAILS
1867: -----------------------------------------------------------------------------*/
1868: PROCEDURE Purge_Delivery_Details(p_tbl_del_detail_purge_set Del_Detail_ID_Tbl_Type,
1869: x_return_status OUT NOCOPY VARCHAR2
1902: END IF;
1903: END IF;
1904:
1905: DELETE
1906: FROM wsh_exceptions
1907: WHERE delivery_detail_id = l_detail_id;
1908:
1909: IF SQL%FOUND THEN
1910: IF l_debug_on THEN
1907: WHERE delivery_detail_id = l_detail_id;
1908:
1909: IF SQL%FOUND THEN
1910: IF l_debug_on THEN
1911: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_exceptions: DELIVERY_DETAIL_ID=' || l_detail_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1912: END IF;
1913: END IF;
1914:
1915: DELETE
2008: l_container_id := p_tbl_containers_purge_set(l_loop_index).container_id;
2009:
2010:
2011: DELETE
2012: FROM wsh_exceptions
2013: WHERE delivery_detail_id = l_container_id;
2014:
2015: IF SQL%FOUND THEN
2016: IF l_debug_on THEN
2013: WHERE delivery_detail_id = l_container_id;
2014:
2015: IF SQL%FOUND THEN
2016: IF l_debug_on THEN
2017: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_exceptions: CONTAINER_ID=' || l_container_id, WSH_DEBUG_SV.C_PROC_LEVEL);
2018: END IF;
2019: END IF;
2020:
2021: DELETE