106: --
107: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
108: --
109: IF l_debug_on IS NULL THEN
110: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
111: END IF;
112: --
113: IF l_debug_on THEN
114: WSH_DEBUG_SV.push(l_module_name);
110: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
111: END IF;
112: --
113: IF l_debug_on THEN
114: WSH_DEBUG_SV.push(l_module_name);
115: WSH_DEBUG_SV.log(l_module_name,'P_EXECUTION_MODE',p_execution_mode);
116: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
117: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
118: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
111: END IF;
112: --
113: IF l_debug_on THEN
114: WSH_DEBUG_SV.push(l_module_name);
115: WSH_DEBUG_SV.log(l_module_name,'P_EXECUTION_MODE',p_execution_mode);
116: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
117: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
118: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
119: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
112: --
113: IF l_debug_on THEN
114: WSH_DEBUG_SV.push(l_module_name);
115: WSH_DEBUG_SV.log(l_module_name,'P_EXECUTION_MODE',p_execution_mode);
116: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
117: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
118: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
119: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
120: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
113: IF l_debug_on THEN
114: WSH_DEBUG_SV.push(l_module_name);
115: WSH_DEBUG_SV.log(l_module_name,'P_EXECUTION_MODE',p_execution_mode);
116: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
117: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
118: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
119: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
120: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
121: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
114: WSH_DEBUG_SV.push(l_module_name);
115: WSH_DEBUG_SV.log(l_module_name,'P_EXECUTION_MODE',p_execution_mode);
116: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
117: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
118: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
119: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
120: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
121: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
122: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
115: WSH_DEBUG_SV.log(l_module_name,'P_EXECUTION_MODE',p_execution_mode);
116: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
117: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
118: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
119: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
120: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
121: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
122: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
123: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
116: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
117: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
118: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
119: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
120: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
121: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
122: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
123: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
124: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
117: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
118: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
119: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
120: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
121: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
122: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
123: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
124: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
125: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
118: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
119: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
120: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
121: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
122: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
123: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
124: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
125: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
126: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
119: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
120: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
121: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
122: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
123: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
124: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
125: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
126: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
127: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
120: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
121: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
122: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
123: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
124: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
125: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
126: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
127: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
128: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
121: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
122: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
123: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
124: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
125: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
126: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
127: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
128: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
129: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
122: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
123: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
124: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
125: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
126: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
127: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
128: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
129: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
130: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
123: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
124: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
125: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
126: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
127: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
128: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
129: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
130: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
131: END IF;
124: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
125: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
126: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
127: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
128: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
129: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
130: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
131: END IF;
132:
125: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
126: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
127: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
128: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
129: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
130: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
131: END IF;
132:
133: IF l_debug_on THEN
126: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
127: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
128: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
129: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
130: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
131: END IF;
132:
133: IF l_debug_on THEN
134: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.GET_PURGE_SET', WSH_DEBUG_SV.C_PROC_LEVEL);
130: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
131: END IF;
132:
133: IF l_debug_on THEN
134: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.GET_PURGE_SET', WSH_DEBUG_SV.C_PROC_LEVEL);
135: END IF;
136:
137: --call Get_Purge_Set
138: Get_Purge_Set( p_source_system => p_source_system ,
157: x_return_status => l_return_status
158: );
159:
160: IF l_debug_on THEN
161: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
162: END IF;
163:
164: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
165: IF G_CONC_REQ = FND_API.G_TRUE THEN
167: retcode := '2';
168: END IF;
169:
170: IF l_debug_on THEN
171: WSH_DEBUG_SV.pop(l_module_name);
172: END IF;
173: RETURN;
174: END IF;
175:
173: RETURN;
174: END IF;
175:
176: IF l_debug_on THEN
177: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.GENERATE_PURGE_REPORT', WSH_DEBUG_SV.C_PROC_LEVEL);
178: END IF;
179: --call Generate_Purge_Report
180: Generate_Purge_Report( p_execution_mode => p_execution_mode ,
181: p_source_system => p_source_system ,
203: x_return_status => l_return_status
204: );
205:
206: IF l_debug_on THEN
207: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
208: END IF;
209:
210: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
211: IF G_CONC_REQ = FND_API.G_TRUE THEN
213: retcode := '2';
214: END IF;
215:
216: IF l_debug_on THEN
217: WSH_DEBUG_SV.pop(l_module_name);
218: END IF;
219: RETURN;
220: END IF;
221:
220: END IF;
221:
222: IF p_execution_mode = 'P' THEN
223: IF l_debug_on THEN
224: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.PURGE_ENTITIES', WSH_DEBUG_SV.C_PROC_LEVEL);
225: END IF;
226:
227: --call Purge_Entities
228: Purge_Entities(p_tbl_trip_purge_set => l_tbl_trip_purge_set ,
234: x_return_status => l_return_status
235: );
236:
237: IF l_debug_on THEN
238: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
239: END IF;
240:
241: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
242: IF G_CONC_REQ = FND_API.G_TRUE THEN
244: retcode := '2';
245: END IF;
246:
247: IF l_debug_on THEN
248: WSH_DEBUG_SV.pop(l_module_name);
249: END IF;
250: RETURN;
251: END IF;
252: END IF;
258: l_tbl_trip_stop_purge_set.DELETE;
259: l_tbl_container_purge_set.DELETE;
260:
261: IF l_debug_on THEN
262: WSH_DEBUG_SV.pop(l_module_name);
263: END IF;
264:
265: END Process_Purge;
266:
477: --
478: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
479: --
480: IF l_debug_on IS NULL THEN
481: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
482: END IF;
483:
484: IF l_debug_on THEN
485: WSH_DEBUG_SV.push(l_module_name);
481: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
482: END IF;
483:
484: IF l_debug_on THEN
485: WSH_DEBUG_SV.push(l_module_name);
486: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
487: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
488: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
489: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
482: END IF;
483:
484: IF l_debug_on THEN
485: WSH_DEBUG_SV.push(l_module_name);
486: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
487: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
488: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
489: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
490: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
483:
484: IF l_debug_on THEN
485: WSH_DEBUG_SV.push(l_module_name);
486: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
487: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
488: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
489: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
490: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
491: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
484: IF l_debug_on THEN
485: WSH_DEBUG_SV.push(l_module_name);
486: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
487: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
488: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
489: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
490: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
491: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
492: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
485: WSH_DEBUG_SV.push(l_module_name);
486: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
487: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
488: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
489: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
490: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
491: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
492: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
493: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
486: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
487: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
488: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
489: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
490: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
491: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
492: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
493: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
494: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
487: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
488: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
489: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
490: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
491: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
492: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
493: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
494: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
495: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
488: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
489: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
490: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
491: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
492: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
493: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
494: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
495: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
496: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
489: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
490: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
491: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
492: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
493: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
494: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
495: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
496: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
497: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
490: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
491: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
492: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
493: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
494: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
495: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
496: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
497: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
498: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
491: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
492: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
493: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
494: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
495: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
496: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
497: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
498: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
499: END IF;
492: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
493: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
494: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
495: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
496: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
497: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
498: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
499: END IF;
500:
493: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
494: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
495: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
496: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
497: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
498: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
499: END IF;
500:
501: x_return_status:=WSH_UTIL_CORE.G_RET_STS_SUCCESS;
494: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
495: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
496: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
497: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
498: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
499: END IF;
500:
501: x_return_status:=WSH_UTIL_CORE.G_RET_STS_SUCCESS;
502:
708: CLOSE c_trip_purge_cur;
709:
710: IF x_tbl_trip_purge_set.COUNT > 0 THEN --check for number of records in plsql table
711: IF l_debug_on THEN
712: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.VALIDATE_TRIPS', WSH_DEBUG_SV.C_PROC_LEVEL);
713: END IF;
714: --Check whether LPNs belonging to the trips are eligible to purge from WMS
715: Validate_Trips( p_tbl_trip_purge_set => x_tbl_trip_purge_set,
716: x_tbl_trip_purge_set => l_tbl_trip_purge_set,
718:
719: x_tbl_trip_purge_set := l_tbl_trip_purge_set;
720:
721: IF l_debug_on THEN
722: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
723: END IF;
724:
725: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
726: x_return_status := l_return_status;
724:
725: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
726: x_return_status := l_return_status;
727: IF l_debug_on THEN
728: WSH_DEBUG_SV.pop(l_module_name);
729: END IF;
730: RETURN;
731: END IF;
732: END IF;
847: END LOOP;
848: END IF;
849:
850: IF l_debug_on THEN
851: WSH_DEBUG_SV.pop(l_module_name);
852: END IF;
853:
854: EXCEPTION
855: WHEN OTHERS THEN
854: EXCEPTION
855: WHEN OTHERS THEN
856: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
857: IF l_debug_on THEN
858: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
859: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
860: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
861: END IF;
862:
855: WHEN OTHERS THEN
856: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
857: IF l_debug_on THEN
858: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
859: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
860: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
861: END IF;
862:
863: END Get_Purge_Set;
856: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
857: IF l_debug_on THEN
858: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
859: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
860: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
861: END IF;
862:
863: END Get_Purge_Set;
864:
906: --
907: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
908: --
909: IF l_debug_on IS NULL THEN
910: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
911: END IF;
912:
913: IF l_debug_on THEN
914: WSH_DEBUG_SV.push(l_module_name);
910: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
911: END IF;
912:
913: IF l_debug_on THEN
914: WSH_DEBUG_SV.push(l_module_name);
915: END IF;
916:
917: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
918:
917: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
918:
919: IF p_tbl_del_details_purge_set.COUNT > 0 THEN
920: IF l_debug_on THEN
921: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.PURGE_DELIVERY_DETAILS', WSH_DEBUG_SV.C_PROC_LEVEL);
922: END IF;
923: --Purge Delivery Details
924: Purge_Delivery_Details( p_tbl_del_detail_purge_set => p_tbl_del_details_purge_set,
925: x_return_status => l_return_status);
924: Purge_Delivery_Details( p_tbl_del_detail_purge_set => p_tbl_del_details_purge_set,
925: x_return_status => l_return_status);
926:
927: IF l_debug_on THEN
928: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
929: END IF;
930:
931: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
932: x_return_status := l_return_status;
930:
931: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
932: x_return_status := l_return_status;
933: IF l_debug_on THEN
934: WSH_DEBUG_SV.pop(l_module_name);
935: END IF;
936: RETURN;
937: END IF;
938: END IF;
938: END IF;
939:
940: IF p_tbl_containers_purge_set.COUNT > 0 THEN
941: IF l_debug_on THEN
942: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.PURGE_CONTAINERS', WSH_DEBUG_SV.C_PROC_LEVEL);
943: END IF;
944: --Purge Containers
945: Purge_Containers(p_tbl_containers_purge_set => p_tbl_containers_purge_set,
946: x_return_status => l_return_status);
945: Purge_Containers(p_tbl_containers_purge_set => p_tbl_containers_purge_set,
946: x_return_status => l_return_status);
947:
948: IF l_debug_on THEN
949: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
950: END IF;
951:
952: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
953: x_return_status := l_return_status;
951:
952: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
953: x_return_status := l_return_status;
954: IF l_debug_on THEN
955: WSH_DEBUG_SV.pop(l_module_name);
956: END IF;
957: RETURN;
958: END IF;
959: END IF;
959: END IF;
960:
961: IF p_tbl_del_legs_purge_set.COUNT > 0 THEN
962: IF l_debug_on THEN
963: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.PURGE_DELIVERY_LEGS', WSH_DEBUG_SV.C_PROC_LEVEL);
964: END IF;
965: --Purge Delivery Legs
966: Purge_Delivery_Legs(p_tbl_del_leg_purge_set => p_tbl_del_legs_purge_set,
967: x_return_status => l_return_status);
966: Purge_Delivery_Legs(p_tbl_del_leg_purge_set => p_tbl_del_legs_purge_set,
967: x_return_status => l_return_status);
968:
969: IF l_debug_on THEN
970: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
971: END IF;
972:
973: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
974: x_return_status := l_return_status;
972:
973: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
974: x_return_status := l_return_status;
975: IF l_debug_on THEN
976: WSH_DEBUG_SV.pop(l_module_name);
977: END IF;
978: RETURN;
979: END IF;
980: END IF;
980: END IF;
981:
982: IF p_tbl_trip_stops_purge_set.COUNT > 0 THEN
983: IF l_debug_on THEN
984: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.PURGE_TRIP_STOPS', WSH_DEBUG_SV.C_PROC_LEVEL);
985: END IF;
986: --Purge Trip Stops
987: Purge_Trip_Stops(p_tbl_trip_stop_purge_set => p_tbl_trip_stops_purge_set,
988: x_return_status => l_return_status);
987: Purge_Trip_Stops(p_tbl_trip_stop_purge_set => p_tbl_trip_stops_purge_set,
988: x_return_status => l_return_status);
989:
990: IF l_debug_on THEN
991: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
992: END IF;
993:
994: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
995: x_return_status := l_return_status;
993:
994: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
995: x_return_status := l_return_status;
996: IF l_debug_on THEN
997: WSH_DEBUG_SV.pop(l_module_name);
998: END IF;
999: RETURN;
1000: END IF;
1001: END IF;
1002:
1003: IF (p_tbl_delivery_purge_set.COUNT > 0 OR p_tbl_trip_purge_set.COUNT > 0) THEN
1004:
1005: IF l_debug_on THEN
1006: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.PURGE_WORKFLOW', WSH_DEBUG_SV.C_PROC_LEVEL);
1007: END IF;
1008: --Purge workflows related to Trips and Deliveries
1009: Purge_Workflow( p_tbl_trip_purge_set => p_tbl_trip_purge_set,
1010: p_tbl_delivery_purge_set=> p_tbl_delivery_purge_set,
1012:
1013: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1014: x_return_status := l_return_status;
1015: IF l_debug_on THEN
1016: WSH_DEBUG_SV.pop(l_module_name);
1017: END IF;
1018: RETURN;
1019: END IF;
1020: END IF;
1020: END IF;
1021:
1022: IF p_tbl_delivery_purge_set.COUNT > 0 THEN
1023: IF l_debug_on THEN
1024: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.PURGE_DELIVERIES', WSH_DEBUG_SV.C_PROC_LEVEL);
1025: END IF;
1026: --Purge Deliveries
1027: Purge_Deliveries(p_tbl_delivery_purge_set => p_tbl_delivery_purge_set,
1028: x_return_status => l_return_status);
1027: Purge_Deliveries(p_tbl_delivery_purge_set => p_tbl_delivery_purge_set,
1028: x_return_status => l_return_status);
1029:
1030: IF l_debug_on THEN
1031: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
1032: END IF;
1033:
1034: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1035: x_return_status := l_return_status;
1033:
1034: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1035: x_return_status := l_return_status;
1036: IF l_debug_on THEN
1037: WSH_DEBUG_SV.pop(l_module_name);
1038: END IF;
1039: RETURN;
1040: END IF;
1041: END IF;
1041: END IF;
1042:
1043: IF p_tbl_trip_purge_set.COUNT > 0 THEN
1044: IF l_debug_on THEN
1045: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.PURGE_TRIPS', WSH_DEBUG_SV.C_PROC_LEVEL);
1046: END IF;
1047: --Purge Trips
1048: Purge_Trips(p_tbl_trip_purge_set => p_tbl_trip_purge_set,
1049: x_return_status => l_return_status);
1048: Purge_Trips(p_tbl_trip_purge_set => p_tbl_trip_purge_set,
1049: x_return_status => l_return_status);
1050:
1051: IF l_debug_on THEN
1052: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
1053: END IF;
1054:
1055: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1056: x_return_status := l_return_status;
1054:
1055: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1056: x_return_status := l_return_status;
1057: IF l_debug_on THEN
1058: WSH_DEBUG_SV.pop(l_module_name);
1059: END IF;
1060: RETURN;
1061: END IF;
1062: END IF;
1061: END IF;
1062: END IF;
1063:
1064: IF l_debug_on THEN
1065: WSH_DEBUG_SV.pop(l_module_name);
1066: END IF;
1067:
1068:
1069: EXCEPTION
1069: EXCEPTION
1070: WHEN OTHERS THEN
1071: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1072: IF l_debug_on THEN
1073: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1074: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1075: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1076: END IF;
1077:
1070: WHEN OTHERS THEN
1071: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1072: IF l_debug_on THEN
1073: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1074: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1075: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1076: END IF;
1077:
1078:
1071: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1072: IF l_debug_on THEN
1073: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1074: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1075: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1076: END IF;
1077:
1078:
1079: END Purge_Entities;
1109: --
1110: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1111: --
1112: IF l_debug_on IS NULL THEN
1113: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1114: END IF;
1115:
1116: IF l_debug_on THEN
1117: WSH_DEBUG_SV.push(l_module_name);
1113: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1114: END IF;
1115:
1116: IF l_debug_on THEN
1117: WSH_DEBUG_SV.push(l_module_name);
1118: END IF;
1119:
1120: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1121:
1128: WHERE trip_id = l_trip_id;
1129:
1130: IF SQL%FOUND THEN
1131: IF l_debug_on THEN
1132: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_exceptions: TRIP_ID=' || l_trip_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1133: END IF;
1134: END IF;
1135:
1136: DELETE
1138: WHERE trip_id = l_trip_id;
1139:
1140: IF SQL%FOUND THEN
1141: IF l_debug_on THEN
1142: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_freight_costs: TRIP_ID=' || l_trip_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1143: END IF;
1144: END IF;
1145:
1146: DELETE
1149: AND entity_name = 'WSH_TRIPS';
1150:
1151: IF SQL%FOUND THEN
1152: IF l_debug_on THEN
1153: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_document_instances: TRIP_ID=' || l_trip_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1154: END IF;
1155: END IF;
1156:
1157: DELETE
1159: WHERE trip_id = l_trip_id;
1160:
1161: IF SQL%FOUND THEN
1162: IF l_debug_on THEN
1163: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_trips: TRIP_ID=' || l_trip_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1164: END IF;
1165: END IF;
1166:
1167: END LOOP;
1166:
1167: END LOOP;
1168:
1169: IF l_debug_on THEN
1170: WSH_DEBUG_SV.pop(l_module_name);
1171: END IF;
1172:
1173: EXCEPTION
1174: WHEN OTHERS THEN
1173: EXCEPTION
1174: WHEN OTHERS THEN
1175: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1176: IF l_debug_on THEN
1177: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1178: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1179: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1180: END IF;
1181:
1174: WHEN OTHERS THEN
1175: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1176: IF l_debug_on THEN
1177: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1178: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1179: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1180: END IF;
1181:
1182: END Purge_Trips;
1175: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1176: IF l_debug_on THEN
1177: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1178: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1179: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1180: END IF;
1181:
1182: END Purge_Trips;
1183:
1222: --
1223: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1224: --
1225: IF l_debug_on IS NULL THEN
1226: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1227: END IF;
1228:
1229: IF l_debug_on THEN
1230: WSH_DEBUG_SV.push(l_module_name);
1226: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1227: END IF;
1228:
1229: IF l_debug_on THEN
1230: WSH_DEBUG_SV.push(l_module_name);
1231: END IF;
1232:
1233: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1234:
1242: WHERE delivery_id = l_delivery_id;
1243:
1244: IF SQL%FOUND THEN
1245: IF l_debug_on THEN
1246: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_exceptions: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1247: END IF;
1248: END IF;
1249:
1250: DELETE
1253: AND entity_type = 'DLVY';
1254:
1255: IF SQL%FOUND THEN
1256: IF l_debug_on THEN
1257: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_transactions_history: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1258: END IF;
1259: END IF;
1260:
1261: DELETE
1263: WHERE delivery_id = l_delivery_id;
1264:
1265: IF SQL%FOUND THEN
1266: IF l_debug_on THEN
1267: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_freight_costs: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1268: END IF;
1269: END IF;
1270:
1271: DELETE
1274: AND entity_name = 'WSH_NEW_DELIVERIES';
1275:
1276: IF SQL%FOUND THEN
1277: IF l_debug_on THEN
1278: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_document_instances: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1279: END IF;
1280: END IF;
1281:
1282: IF (wsh_util_core.fte_is_installed='Y') THEN
1288: WHERE delivery_id = l_delivery_id);
1289:
1290: IF SQL%FOUND THEN
1291: IF l_debug_on THEN
1292: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_shipment_status_details: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1293: END IF;
1294: END IF;
1295:
1296: DELETE
1300: WHERE delivery_id = l_delivery_id);
1301:
1302: IF SQL%FOUND THEN
1303: IF l_debug_on THEN
1304: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_shipment_status_exceptions: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1305: END IF;
1306: END IF;
1307:
1308: DELETE
1312: WHERE delivery_id = l_delivery_id);
1313:
1314: IF SQL%FOUND THEN
1315: IF l_debug_on THEN
1316: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_message_partner: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1317: END IF;
1318: END IF;
1319:
1320: DELETE
1324: WHERE delivery_id = l_delivery_id);
1325:
1326: IF SQL%FOUND THEN
1327: IF l_debug_on THEN
1328: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_message_address: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1329: END IF;
1330: END IF;
1331:
1332: DELETE
1336: WHERE delivery_id = l_delivery_id);
1337:
1338: IF SQL%FOUND THEN
1339: IF l_debug_on THEN
1340: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_message_contact: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1341: END IF;
1342: END IF;
1343:
1344: DELETE
1348: WHERE delivery_id = l_delivery_id);
1349:
1350: IF SQL%FOUND THEN
1351: IF l_debug_on THEN
1352: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_message_location: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1353: END IF;
1354: END IF;
1355:
1356:
1361: WHERE delivery_id = l_delivery_id);
1362:
1363: IF SQL%FOUND THEN
1364: IF l_debug_on THEN
1365: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_delivery_proof: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1366: END IF;
1367: END IF;
1368:
1369:
1373:
1374:
1375: IF SQL%FOUND THEN
1376: IF l_debug_on THEN
1377: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_shipment_status_headers: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1378: END IF;
1379: END IF;
1380: END IF;
1381:
1389: AND wirc.service_type_code = 'WSH_EXPORT_COMPLIANCE' );
1390:
1391: IF SQL%FOUND THEN
1392: IF l_debug_on THEN
1393: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_itm_response_lines: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1394: END IF;
1395: END IF;
1396:
1397: DELETE
1402: AND service_type_code = 'WSH_EXPORT_COMPLIANCE' ) ;
1403:
1404: IF SQL%FOUND THEN
1405: IF l_debug_on THEN
1406: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_itm_response_headers: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1407: END IF;
1408: END IF;
1409:
1410: DELETE
1413: AND service_type_code = 'WSH_EXPORT_COMPLIANCE';
1414:
1415: IF SQL%FOUND THEN
1416: IF l_debug_on THEN
1417: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_itm_request_control: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1418: END IF;
1419: END IF;
1420:
1421: DELETE
1425: WHERE delivery_id = l_delivery_id) ;
1426:
1427: IF SQL%FOUND THEN
1428: IF l_debug_on THEN
1429: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_inbound_txn_history: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1430: END IF;
1431: END IF;
1432:
1433: DELETE
1435: WHERE delivery_id = l_delivery_id;
1436:
1437: IF SQL%FOUND THEN
1438: IF l_debug_on THEN
1439: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_new_deliveries: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1440: END IF;
1441: END IF;
1442:
1443: END LOOP;
1442:
1443: END LOOP;
1444:
1445: IF l_debug_on THEN
1446: WSH_DEBUG_SV.pop(l_module_name);
1447: END IF;
1448:
1449: EXCEPTION
1450: WHEN OTHERS THEN
1449: EXCEPTION
1450: WHEN OTHERS THEN
1451: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1452: IF l_debug_on THEN
1453: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1454: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1455: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1456: END IF;
1457:
1450: WHEN OTHERS THEN
1451: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1452: IF l_debug_on THEN
1453: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1454: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1455: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1456: END IF;
1457:
1458: END Purge_Deliveries;
1451: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1452: IF l_debug_on THEN
1453: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1454: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1455: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1456: END IF;
1457:
1458: END Purge_Deliveries;
1459:
1488: --
1489: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1490: --
1491: IF l_debug_on IS NULL THEN
1492: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1493: END IF;
1494:
1495: IF l_debug_on THEN
1496: WSH_DEBUG_SV.push(l_module_name);
1492: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1493: END IF;
1494:
1495: IF l_debug_on THEN
1496: WSH_DEBUG_SV.push(l_module_name);
1497: END IF;
1498:
1499: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1500:
1507: WHERE trip_stop_id = l_stop_id;
1508:
1509: IF SQL%FOUND THEN
1510: IF l_debug_on THEN
1511: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_exceptions: STOP_ID=' || l_stop_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1512: END IF;
1513: END IF;
1514:
1515: DELETE
1517: WHERE stop_id = l_stop_id;
1518:
1519: IF SQL%FOUND THEN
1520: IF l_debug_on THEN
1521: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_freight_costs: STOP_ID=' || l_stop_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1522: END IF;
1523: END IF;
1524:
1525: DELETE
1527: WHERE stop_id = l_stop_id;
1528:
1529: IF SQL%FOUND THEN
1530: IF l_debug_on THEN
1531: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_trip_stops: STOP_ID=' || l_stop_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1532: END IF;
1533: END IF;
1534:
1535: END LOOP;
1534:
1535: END LOOP;
1536:
1537: IF l_debug_on THEN
1538: WSH_DEBUG_SV.pop(l_module_name);
1539: END IF;
1540:
1541: EXCEPTION
1542: WHEN OTHERS THEN
1541: EXCEPTION
1542: WHEN OTHERS THEN
1543: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1544: IF l_debug_on THEN
1545: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1546: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1547: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1548: END IF;
1549:
1542: WHEN OTHERS THEN
1543: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1544: IF l_debug_on THEN
1545: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1546: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1547: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1548: END IF;
1549:
1550: END Purge_Trip_Stops;
1543: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1544: IF l_debug_on THEN
1545: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1546: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1547: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1548: END IF;
1549:
1550: END Purge_Trip_Stops;
1551:
1583: --
1584: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1585: --
1586: IF l_debug_on IS NULL THEN
1587: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1588: END IF;
1589:
1590: IF l_debug_on THEN
1591: WSH_DEBUG_SV.push(l_module_name);
1587: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1588: END IF;
1589:
1590: IF l_debug_on THEN
1591: WSH_DEBUG_SV.push(l_module_name);
1592: END IF;
1593:
1594: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1595:
1602: WHERE delivery_leg_id = l_leg_id;
1603:
1604: IF SQL%FOUND THEN
1605: IF l_debug_on THEN
1606: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_freight_costs: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1607: END IF;
1608: END IF;
1609:
1610: IF (wsh_util_core.fte_is_installed='Y') THEN
1619: AND wdi.sequence_number = fih.bol
1620: ) ;
1621: IF SQL%FOUND THEN
1622: IF l_debug_on THEN
1623: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_invoice_lines: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1624: END IF;
1625: END IF;
1626:
1627: DELETE
1632: AND entity_name = 'WSH_DELIVERY_LEGS') ;
1633:
1634: IF SQL%FOUND THEN
1635: IF l_debug_on THEN
1636: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_invoice_headers: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1637: END IF;
1638: END IF;
1639:
1640: DELETE
1645: AND entity_name = 'WSH_DELIVERY_LEGS') ;
1646:
1647: IF SQL%FOUND THEN
1648: IF l_debug_on THEN
1649: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_invoice_history: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1650: END IF;
1651: END IF;
1652:
1653: DELETE
1658: AND entity_name = 'WSH_DELIVERY_LEGS') ;
1659:
1660: IF SQL%FOUND THEN
1661: IF l_debug_on THEN
1662: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_failure_reasons: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1663: END IF;
1664: END IF;
1665:
1666: END IF;
1671: AND entity_name = 'WSH_DELIVERY_LEGS';
1672:
1673: IF SQL%FOUND THEN
1674: IF l_debug_on THEN
1675: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_document_instances: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1676: END IF;
1677: END IF;
1678:
1679: DELETE
1681: WHERE delivery_leg_id = l_leg_id ;
1682:
1683: IF SQL%FOUND THEN
1684: IF l_debug_on THEN
1685: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_delivery_leg_activities: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1686: END IF;
1687: END IF;
1688:
1689: DELETE
1691: WHERE delivery_leg_id = l_leg_id;
1692:
1693: IF SQL%FOUND THEN
1694: IF l_debug_on THEN
1695: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_delivery_leg_details: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1696: END IF;
1697: END IF;
1698:
1699:
1702: WHERE delivery_leg_id = l_leg_id ;
1703:
1704: IF SQL%FOUND THEN
1705: IF l_debug_on THEN
1706: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_delivery_legs: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1707: END IF;
1708: END IF;
1709: END LOOP;
1710:
1708: END IF;
1709: END LOOP;
1710:
1711: IF l_debug_on THEN
1712: WSH_DEBUG_SV.pop(l_module_name);
1713: END IF;
1714:
1715: EXCEPTION
1716: WHEN OTHERS THEN
1715: EXCEPTION
1716: WHEN OTHERS THEN
1717: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1718: IF l_debug_on THEN
1719: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1720: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1721: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1722: END IF;
1723:
1716: WHEN OTHERS THEN
1717: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1718: IF l_debug_on THEN
1719: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1720: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1721: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1722: END IF;
1723:
1724: END Purge_Delivery_Legs;
1717: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1718: IF l_debug_on THEN
1719: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1720: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1721: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1722: END IF;
1723:
1724: END Purge_Delivery_Legs;
1725:
1753: --
1754: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1755: --
1756: IF l_debug_on IS NULL THEN
1757: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1758: END IF;
1759:
1760: IF l_debug_on THEN
1761: WSH_DEBUG_SV.push(l_module_name);
1757: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1758: END IF;
1759:
1760: IF l_debug_on THEN
1761: WSH_DEBUG_SV.push(l_module_name);
1762: END IF;
1763:
1764: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1765:
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
1782: WHERE delivery_detail_id = l_detail_id;
1783:
1784: IF SQL%FOUND THEN
1785: IF l_debug_on THEN
1786: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_exceptions: DELIVERY_DETAIL_ID=' || l_detail_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1787: END IF;
1788: END IF;
1789:
1790: DELETE
1792: WHERE delivery_detail_id = l_detail_id;
1793:
1794: IF SQL%FOUND THEN
1795: IF l_debug_on THEN
1796: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_freight_costs: DELIVERY_DETAIL_ID=' || l_detail_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1797: END IF;
1798: END IF;
1799:
1800: DELETE
1802: WHERE delivery_detail_id = l_detail_id;
1803:
1804: IF SQL%FOUND THEN
1805: IF l_debug_on THEN
1806: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_delivery_assignments_v: DELIVERY_DETAIL_ID=' || l_detail_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1807: END IF;
1808: END IF;
1809:
1810: DELETE
1812: WHERE delivery_detail_id = l_detail_id;
1813:
1814: IF SQL%FOUND THEN
1815: IF l_debug_on THEN
1816: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_delivery_details: DELIVERY_DETAIL_ID=' || l_detail_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1817: END IF;
1818: END IF;
1819: END LOOP;
1820:
1818: END IF;
1819: END LOOP;
1820:
1821: IF l_debug_on THEN
1822: WSH_DEBUG_SV.pop(l_module_name);
1823: END IF;
1824:
1825: EXCEPTION
1826: WHEN OTHERS THEN
1825: EXCEPTION
1826: WHEN OTHERS THEN
1827: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1828: IF l_debug_on THEN
1829: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1830: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1831: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1832: END IF;
1833:
1826: WHEN OTHERS THEN
1827: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1828: IF l_debug_on THEN
1829: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1830: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1831: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1832: END IF;
1833:
1834: END Purge_Delivery_Details;
1827: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1828: IF l_debug_on THEN
1829: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1830: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1831: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1832: END IF;
1833:
1834: END Purge_Delivery_Details;
1835:
1868: --
1869: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1870: --
1871: IF l_debug_on IS NULL THEN
1872: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1873: END IF;
1874:
1875: IF l_debug_on THEN
1876: WSH_DEBUG_SV.push(l_module_name);
1872: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1873: END IF;
1874:
1875: IF l_debug_on THEN
1876: WSH_DEBUG_SV.push(l_module_name);
1877: END IF;
1878:
1879: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1880:
1888: WHERE delivery_detail_id = l_container_id;
1889:
1890: IF SQL%FOUND THEN
1891: IF l_debug_on THEN
1892: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_exceptions: CONTAINER_ID=' || l_container_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1893: END IF;
1894: END IF;
1895:
1896: DELETE
1898: WHERE delivery_detail_id = l_container_id;
1899:
1900: IF SQL%FOUND THEN
1901: IF l_debug_on THEN
1902: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_freight_costs: CONTAINER_ID=' || l_container_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1903: END IF;
1904: END IF;
1905:
1906: DELETE
1908: WHERE delivery_detail_id = l_container_id;
1909:
1910: IF SQL%FOUND THEN
1911: IF l_debug_on THEN
1912: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_delivery_assignments_v: CONTAINER_ID=' || l_container_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1913: END IF;
1914: END IF;
1915:
1916: DELETE
1919: RETURNING lpn_id INTO l_lpn_id;
1920:
1921: IF SQL%FOUND THEN
1922: IF l_debug_on THEN
1923: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_delivery_details: CONTAINER_ID=' || l_container_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1924: END IF;
1925: END IF;
1926:
1927: IF l_lpn_id IS NOT NULL THEN -- Populate the LPN IDs in the table
1930: END LOOP;
1931:
1932: --Call the WMS API to DELETE the LPNs
1933: IF l_debug_on THEN
1934: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WMS_CONTAINER_GRP.LPN_PURGE_ACTIONS', WSH_DEBUG_SV.C_PROC_LEVEL);
1935: END IF;
1936:
1937: WMS_Container_GRP.LPN_Purge_Actions( p_api_version =>1.0,
1938: p_init_msg_list =>FND_API.G_TRUE,
1945: p_lpn_purge_rec => l_wms_lpn_record
1946: );
1947:
1948: IF l_debug_on THEN
1949: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
1950: WSH_DEBUG_SV.log(l_module_name,'L_MSG_DATA',l_msg_data);
1951: END IF;
1952:
1953: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1946: );
1947:
1948: IF l_debug_on THEN
1949: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
1950: WSH_DEBUG_SV.log(l_module_name,'L_MSG_DATA',l_msg_data);
1951: END IF;
1952:
1953: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1954: x_return_status := l_return_status;
1952:
1953: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1954: x_return_status := l_return_status;
1955: IF l_debug_on THEN
1956: WSH_DEBUG_SV.pop(l_module_name);
1957: END IF;
1958: RETURN;
1959: END IF;
1960:
1958: RETURN;
1959: END IF;
1960:
1961: IF l_debug_on THEN
1962: WSH_DEBUG_SV.pop(l_module_name);
1963: END IF;
1964:
1965: EXCEPTION
1966: WHEN OTHERS THEN
1965: EXCEPTION
1966: WHEN OTHERS THEN
1967: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1968: IF l_debug_on THEN
1969: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1970: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1971: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1972: END IF;
1973:
1966: WHEN OTHERS THEN
1967: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1968: IF l_debug_on THEN
1969: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1970: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1971: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1972: END IF;
1973:
1974: END Purge_Containers;
1967: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1968: IF l_debug_on THEN
1969: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1970: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1971: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1972: END IF;
1973:
1974: END Purge_Containers;
1975:
2164: --
2165: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2166: --
2167: IF l_debug_on IS NULL THEN
2168: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2169: END IF;
2170:
2171: IF l_debug_on THEN
2172: WSH_DEBUG_SV.push(l_module_name);
2168: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2169: END IF;
2170:
2171: IF l_debug_on THEN
2172: WSH_DEBUG_SV.push(l_module_name);
2173: END IF;
2174:
2175: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2176:
2180: l_empty_del_count := 0;
2181: l_empty_lpn_count := 0;
2182:
2183: IF l_debug_on THEN
2184: WSH_DEBUG_SV.log(l_module_name,'P_EXECUTION_MODE',p_execution_mode);
2185: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
2186: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
2187: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
2188: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2181: l_empty_lpn_count := 0;
2182:
2183: IF l_debug_on THEN
2184: WSH_DEBUG_SV.log(l_module_name,'P_EXECUTION_MODE',p_execution_mode);
2185: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
2186: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
2187: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
2188: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2189: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2182:
2183: IF l_debug_on THEN
2184: WSH_DEBUG_SV.log(l_module_name,'P_EXECUTION_MODE',p_execution_mode);
2185: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
2186: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
2187: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
2188: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2189: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2190: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2183: IF l_debug_on THEN
2184: WSH_DEBUG_SV.log(l_module_name,'P_EXECUTION_MODE',p_execution_mode);
2185: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
2186: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
2187: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
2188: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2189: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2190: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2191: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2184: WSH_DEBUG_SV.log(l_module_name,'P_EXECUTION_MODE',p_execution_mode);
2185: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
2186: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
2187: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
2188: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2189: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2190: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2191: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2192: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2185: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
2186: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
2187: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
2188: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2189: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2190: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2191: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2192: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2193: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2186: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
2187: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
2188: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2189: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2190: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2191: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2192: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2193: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2194: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2187: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
2188: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2189: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2190: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2191: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2192: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2193: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2194: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2195: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2188: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2189: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2190: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2191: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2192: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2193: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2194: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2195: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2196: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2189: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2190: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2191: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2192: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2193: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2194: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2195: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2196: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2197: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2190: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2191: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2192: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2193: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2194: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2195: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2196: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2197: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2198: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2191: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2192: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2193: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2194: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2195: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2196: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2197: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2198: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2199: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2192: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2193: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2194: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2195: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2196: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2197: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2198: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2199: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2200: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_LEGS',p_count_legs);
2193: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2194: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2195: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2196: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2197: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2198: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2199: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2200: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_LEGS',p_count_legs);
2201: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_STOPS',p_count_stops);
2194: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2195: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2196: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2197: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2198: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2199: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2200: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_LEGS',p_count_legs);
2201: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_STOPS',p_count_stops);
2202: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_DETAILS',p_count_details);
2195: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2196: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2197: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2198: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2199: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2200: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_LEGS',p_count_legs);
2201: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_STOPS',p_count_stops);
2202: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_DETAILS',p_count_details);
2203: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_ContainerS',p_count_containers);
2196: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2197: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2198: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2199: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2200: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_LEGS',p_count_legs);
2201: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_STOPS',p_count_stops);
2202: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_DETAILS',p_count_details);
2203: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_ContainerS',p_count_containers);
2204: END IF;
2197: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2198: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2199: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2200: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_LEGS',p_count_legs);
2201: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_STOPS',p_count_stops);
2202: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_DETAILS',p_count_details);
2203: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_ContainerS',p_count_containers);
2204: END IF;
2205:
2198: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2199: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2200: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_LEGS',p_count_legs);
2201: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_STOPS',p_count_stops);
2202: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_DETAILS',p_count_details);
2203: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_ContainerS',p_count_containers);
2204: END IF;
2205:
2206: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
2199: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2200: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_LEGS',p_count_legs);
2201: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_STOPS',p_count_stops);
2202: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_DETAILS',p_count_details);
2203: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_ContainerS',p_count_containers);
2204: END IF;
2205:
2206: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
2207: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '
2465: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'
2466: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
2467:
2468: IF l_debug_on THEN
2469: WSH_DEBUG_SV.pop(l_module_name);
2470: END IF;
2471:
2472: EXCEPTION
2473: WHEN OTHERS THEN
2474: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2475: l_err := SQLERRM;
2476:
2477: IF l_debug_on THEN
2478: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2479: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2480: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2481: END IF;
2482:
2475: l_err := SQLERRM;
2476:
2477: IF l_debug_on THEN
2478: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2479: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2480: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2481: END IF;
2482:
2483: END Generate_Purge_Report;
2476:
2477: IF l_debug_on THEN
2478: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2479: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2480: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2481: END IF;
2482:
2483: END Generate_Purge_Report;
2484:
2513: --
2514: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2515: --
2516: IF l_debug_on IS NULL THEN
2517: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2518: END IF;
2519:
2520: IF l_debug_on THEN
2521: WSH_DEBUG_SV.push(l_module_name);
2517: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2518: END IF;
2519:
2520: IF l_debug_on THEN
2521: WSH_DEBUG_SV.push(l_module_name);
2522: END IF;
2523:
2524: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2525:
2530: l_delivery_ids_tab(l_delivery_index) := p_tbl_delivery_purge_set(l_delivery_index).delivery_id;
2531: END LOOP;
2532:
2533: IF l_debug_on THEN
2534: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.PURGE_ENTITY', WSH_DEBUG_SV.C_PROC_LEVEL);
2535: WSH_DEBUG_SV.logmsg(l_module_name,'no of delivery ids =' || l_delivery_ids_tab.count, WSH_DEBUG_SV.C_PROC_LEVEL);
2536: END IF;
2537:
2538: WSH_WF_STD.Purge_Entity(
2531: END LOOP;
2532:
2533: IF l_debug_on THEN
2534: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.PURGE_ENTITY', WSH_DEBUG_SV.C_PROC_LEVEL);
2535: WSH_DEBUG_SV.logmsg(l_module_name,'no of delivery ids =' || l_delivery_ids_tab.count, WSH_DEBUG_SV.C_PROC_LEVEL);
2536: END IF;
2537:
2538: WSH_WF_STD.Purge_Entity(
2539: p_entity_type => 'DELIVERY',
2543: x_success_count => l_success_count,
2544: x_return_status => l_return_status) ;
2545:
2546: IF l_debug_on THEN
2547: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
2548: WSH_DEBUG_SV.log(l_module_name,'L_SUCCESS_COUNT',l_success_count);
2549: END IF;
2550:
2551: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2544: x_return_status => l_return_status) ;
2545:
2546: IF l_debug_on THEN
2547: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
2548: WSH_DEBUG_SV.log(l_module_name,'L_SUCCESS_COUNT',l_success_count);
2549: END IF;
2550:
2551: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2552: x_return_status := l_return_status;
2550:
2551: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2552: x_return_status := l_return_status;
2553: IF l_debug_on THEN
2554: WSH_DEBUG_SV.pop(l_module_name);
2555: END IF;
2556: RETURN;
2557: END IF;
2558: END IF; --Check for number of ids in delivery table
2564: l_trip_ids_tab(l_trip_index) := p_tbl_trip_purge_set(l_trip_index).trip_id;
2565: END LOOP;
2566:
2567: IF l_debug_on THEN
2568: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.PURGE_ENTITY', WSH_DEBUG_SV.C_PROC_LEVEL);
2569: END IF;
2570:
2571: WSH_WF_STD.Purge_Entity(
2572: p_entity_type => 'TRIP',
2576: x_success_count => l_success_count,
2577: x_return_status => l_return_status) ;
2578:
2579: IF l_debug_on THEN
2580: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
2581: WSH_DEBUG_SV.log(l_module_name,'L_SUCCESS_COUNT',l_success_count);
2582: END IF;
2583:
2584: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2577: x_return_status => l_return_status) ;
2578:
2579: IF l_debug_on THEN
2580: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
2581: WSH_DEBUG_SV.log(l_module_name,'L_SUCCESS_COUNT',l_success_count);
2582: END IF;
2583:
2584: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2585: x_return_status := l_return_status;
2583:
2584: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2585: x_return_status := l_return_status;
2586: IF l_debug_on THEN
2587: WSH_DEBUG_SV.pop(l_module_name);
2588: END IF;
2589: RETURN;
2590: END IF;
2591: END IF; --Check for number of ids in trip table
2590: END IF;
2591: END IF; --Check for number of ids in trip table
2592:
2593: IF l_debug_on THEN
2594: WSH_DEBUG_SV.pop(l_module_name);
2595: END IF;
2596:
2597: END Purge_Workflow;
2598:
2767: --
2768: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2769: --
2770: IF l_debug_on IS NULL THEN
2771: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2772: END IF;
2773:
2774: IF l_debug_on THEN
2775: WSH_DEBUG_SV.push(l_module_name);
2771: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2772: END IF;
2773:
2774: IF l_debug_on THEN
2775: WSH_DEBUG_SV.push(l_module_name);
2776: END IF;
2777:
2778: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2779: l_lpn_valid := TRUE;
2805: l_lpn_count := l_wms_lpn_record.LPN_IDs.COUNT;
2806:
2807: --call WMS API to check whether the LPN is eligible for purge
2808: IF l_debug_on THEN
2809: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WMS_CONTAINER_GRP.LPN_PURGE_ACTIONS', WSH_DEBUG_SV.C_PROC_LEVEL);
2810: END IF;
2811:
2812: WMS_Container_GRP.LPN_Purge_Actions( p_api_version =>1.0,
2813: p_init_msg_list =>FND_API.G_TRUE,
2820: p_lpn_purge_rec => l_wms_lpn_record
2821: );
2822:
2823: IF l_debug_on THEN
2824: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
2825: WSH_DEBUG_SV.log(l_module_name,'L_MSG_DATA',l_msg_data);
2826: END IF;
2827:
2828: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2821: );
2822:
2823: IF l_debug_on THEN
2824: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
2825: WSH_DEBUG_SV.log(l_module_name,'L_MSG_DATA',l_msg_data);
2826: END IF;
2827:
2828: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2829: x_return_status := l_return_status;
2827:
2828: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2829: x_return_status := l_return_status;
2830: IF l_debug_on THEN
2831: WSH_DEBUG_SV.pop(l_module_name);
2832: END IF;
2833: RETURN;
2834: END IF;
2835:
2910: END IF ;
2911: END LOOP;
2912:
2913: IF l_debug_on THEN
2914: WSH_DEBUG_SV.pop(l_module_name);
2915: END IF;
2916:
2917: EXCEPTION
2918: WHEN OTHERS THEN
2919: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2920: l_err := SQLERRM;
2921:
2922: IF l_debug_on THEN
2923: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2924: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2925: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2926: END IF;
2927: END Validate_Trips ;
2920: l_err := SQLERRM;
2921:
2922: IF l_debug_on THEN
2923: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2924: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2925: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2926: END IF;
2927: END Validate_Trips ;
2928:
2921:
2922: IF l_debug_on THEN
2923: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2924: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2925: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2926: END IF;
2927: END Validate_Trips ;
2928:
2929: END WSH_PURGE;