[Home] [Help]
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:
497: --
498: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
499: --
500: IF l_debug_on IS NULL THEN
501: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
502: END IF;
503:
504: IF l_debug_on THEN
505: WSH_DEBUG_SV.push(l_module_name);
501: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
502: END IF;
503:
504: IF l_debug_on THEN
505: WSH_DEBUG_SV.push(l_module_name);
506: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
507: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
508: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
509: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
502: END IF;
503:
504: IF l_debug_on THEN
505: WSH_DEBUG_SV.push(l_module_name);
506: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
507: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
508: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
509: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
510: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
503:
504: IF l_debug_on THEN
505: WSH_DEBUG_SV.push(l_module_name);
506: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
507: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
508: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
509: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
510: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
511: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
504: IF l_debug_on THEN
505: WSH_DEBUG_SV.push(l_module_name);
506: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
507: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
508: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
509: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
510: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
511: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
512: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
505: WSH_DEBUG_SV.push(l_module_name);
506: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
507: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
508: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
509: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
510: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
511: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
512: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
513: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
506: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
507: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
508: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
509: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
510: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
511: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
512: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
513: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
514: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
507: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
508: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
509: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
510: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
511: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
512: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
513: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
514: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
515: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
508: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
509: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
510: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
511: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
512: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
513: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
514: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
515: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
516: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
509: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
510: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
511: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
512: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
513: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
514: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
515: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
516: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
517: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
510: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
511: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
512: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
513: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
514: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
515: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
516: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
517: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
518: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
511: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
512: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
513: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
514: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
515: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
516: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
517: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
518: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
519: END IF;
512: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
513: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
514: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
515: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
516: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
517: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
518: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
519: END IF;
520:
513: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
514: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
515: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
516: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
517: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
518: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
519: END IF;
520:
521: x_return_status:=WSH_UTIL_CORE.G_RET_STS_SUCCESS;
514: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
515: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
516: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
517: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
518: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
519: END IF;
520:
521: x_return_status:=WSH_UTIL_CORE.G_RET_STS_SUCCESS;
522:
664: HAVING count ( outer.dd_id ) = (select dd_cnt from trip_inner_query where trip_id = outer.trip_id)';
665:
666: --end of trip_sql construct
667: IF l_debug_on THEN
668: WSH_DEBUG_SV.log(l_module_name,'trip_sql ==>',trip_sql);
669: END IF;
670: --check whether to delete empty records
671: IF (p_delete_empty_records ='Y') THEN
672: --construct delivery_sql for empty deliveries
784: CLOSE c_trip_purge_cur;
785:
786: IF x_tbl_trip_purge_set.COUNT > 0 THEN --check for number of records in plsql table
787: IF l_debug_on THEN
788: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.VALIDATE_TRIPS', WSH_DEBUG_SV.C_PROC_LEVEL);
789: END IF;
790: --Check whether LPNs belonging to the trips are eligible to purge from WMS
791: Validate_Trips( p_tbl_trip_purge_set => x_tbl_trip_purge_set,
792: x_tbl_trip_purge_set => l_tbl_trip_purge_set,
794:
795: x_tbl_trip_purge_set := l_tbl_trip_purge_set;
796:
797: IF l_debug_on THEN
798: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
799: END IF;
800:
801: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
802: x_return_status := l_return_status;
800:
801: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
802: x_return_status := l_return_status;
803: IF l_debug_on THEN
804: WSH_DEBUG_SV.pop(l_module_name);
805: END IF;
806: RETURN;
807: END IF;
808: END IF;
951: || to_date(SYSDATE - p_del_beyond_creation_days,'DD-MM-YYYY') ||'''' ;
952: END IF; --end check for taking creation dates
953:
954: IF l_debug_on THEN
955: WSH_DEBUG_SV.log(l_module_name,'cancel_wdd_sql', cancel_wdd_sql);
956: END IF;
957:
958: --fetch orphan canceled delivery detail ids
959: OPEN c_wdd_purge_cur FOR cancel_wdd_sql;
972: CLOSE c_wdd_purge_cur;
973: --Bug 12397111 - Ends
974:
975: IF l_debug_on THEN
976: WSH_DEBUG_SV.pop(l_module_name);
977: END IF;
978:
979: EXCEPTION
980: WHEN OTHERS THEN
979: EXCEPTION
980: WHEN OTHERS THEN
981: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
982: IF l_debug_on THEN
983: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
984: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
985: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
986: END IF;
987:
980: WHEN OTHERS THEN
981: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
982: IF l_debug_on THEN
983: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
984: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
985: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
986: END IF;
987:
988: END Get_Purge_Set;
981: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
982: IF l_debug_on THEN
983: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
984: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
985: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
986: END IF;
987:
988: END Get_Purge_Set;
989:
1031: --
1032: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1033: --
1034: IF l_debug_on IS NULL THEN
1035: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1036: END IF;
1037:
1038: IF l_debug_on THEN
1039: WSH_DEBUG_SV.push(l_module_name);
1035: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1036: END IF;
1037:
1038: IF l_debug_on THEN
1039: WSH_DEBUG_SV.push(l_module_name);
1040: END IF;
1041:
1042: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1043:
1042: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1043:
1044: IF p_tbl_del_details_purge_set.COUNT > 0 THEN
1045: IF l_debug_on THEN
1046: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.PURGE_DELIVERY_DETAILS', WSH_DEBUG_SV.C_PROC_LEVEL);
1047: END IF;
1048: --Purge Delivery Details
1049: Purge_Delivery_Details( p_tbl_del_detail_purge_set => p_tbl_del_details_purge_set,
1050: x_return_status => l_return_status);
1049: Purge_Delivery_Details( p_tbl_del_detail_purge_set => p_tbl_del_details_purge_set,
1050: x_return_status => l_return_status);
1051:
1052: IF l_debug_on THEN
1053: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
1054: END IF;
1055:
1056: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1057: x_return_status := l_return_status;
1055:
1056: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1057: x_return_status := l_return_status;
1058: IF l_debug_on THEN
1059: WSH_DEBUG_SV.pop(l_module_name);
1060: END IF;
1061: RETURN;
1062: END IF;
1063: END IF;
1063: END IF;
1064:
1065: IF p_tbl_containers_purge_set.COUNT > 0 THEN
1066: IF l_debug_on THEN
1067: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.PURGE_CONTAINERS', WSH_DEBUG_SV.C_PROC_LEVEL);
1068: END IF;
1069: --Purge Containers
1070: Purge_Containers(p_tbl_containers_purge_set => p_tbl_containers_purge_set,
1071: x_return_status => l_return_status);
1070: Purge_Containers(p_tbl_containers_purge_set => p_tbl_containers_purge_set,
1071: x_return_status => l_return_status);
1072:
1073: IF l_debug_on THEN
1074: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
1075: END IF;
1076:
1077: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1078: x_return_status := l_return_status;
1076:
1077: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1078: x_return_status := l_return_status;
1079: IF l_debug_on THEN
1080: WSH_DEBUG_SV.pop(l_module_name);
1081: END IF;
1082: RETURN;
1083: END IF;
1084: END IF;
1084: END IF;
1085:
1086: IF p_tbl_del_legs_purge_set.COUNT > 0 THEN
1087: IF l_debug_on THEN
1088: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.PURGE_DELIVERY_LEGS', WSH_DEBUG_SV.C_PROC_LEVEL);
1089: END IF;
1090: --Purge Delivery Legs
1091: Purge_Delivery_Legs(p_tbl_del_leg_purge_set => p_tbl_del_legs_purge_set,
1092: x_return_status => l_return_status);
1091: Purge_Delivery_Legs(p_tbl_del_leg_purge_set => p_tbl_del_legs_purge_set,
1092: x_return_status => l_return_status);
1093:
1094: IF l_debug_on THEN
1095: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
1096: END IF;
1097:
1098: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1099: x_return_status := l_return_status;
1097:
1098: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1099: x_return_status := l_return_status;
1100: IF l_debug_on THEN
1101: WSH_DEBUG_SV.pop(l_module_name);
1102: END IF;
1103: RETURN;
1104: END IF;
1105: END IF;
1105: END IF;
1106:
1107: IF p_tbl_trip_stops_purge_set.COUNT > 0 THEN
1108: IF l_debug_on THEN
1109: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.PURGE_TRIP_STOPS', WSH_DEBUG_SV.C_PROC_LEVEL);
1110: END IF;
1111: --Purge Trip Stops
1112: Purge_Trip_Stops(p_tbl_trip_stop_purge_set => p_tbl_trip_stops_purge_set,
1113: x_return_status => l_return_status);
1112: Purge_Trip_Stops(p_tbl_trip_stop_purge_set => p_tbl_trip_stops_purge_set,
1113: x_return_status => l_return_status);
1114:
1115: IF l_debug_on THEN
1116: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
1117: END IF;
1118:
1119: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1120: x_return_status := l_return_status;
1118:
1119: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1120: x_return_status := l_return_status;
1121: IF l_debug_on THEN
1122: WSH_DEBUG_SV.pop(l_module_name);
1123: END IF;
1124: RETURN;
1125: END IF;
1126: END IF;
1127:
1128: IF (p_tbl_delivery_purge_set.COUNT > 0 OR p_tbl_trip_purge_set.COUNT > 0) THEN
1129:
1130: IF l_debug_on THEN
1131: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.PURGE_WORKFLOW', WSH_DEBUG_SV.C_PROC_LEVEL);
1132: END IF;
1133: --Purge workflows related to Trips and Deliveries
1134: Purge_Workflow( p_tbl_trip_purge_set => p_tbl_trip_purge_set,
1135: p_tbl_delivery_purge_set=> p_tbl_delivery_purge_set,
1137:
1138: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1139: x_return_status := l_return_status;
1140: IF l_debug_on THEN
1141: WSH_DEBUG_SV.pop(l_module_name);
1142: END IF;
1143: RETURN;
1144: END IF;
1145: END IF;
1145: END IF;
1146:
1147: IF p_tbl_delivery_purge_set.COUNT > 0 THEN
1148: IF l_debug_on THEN
1149: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.PURGE_DELIVERIES', WSH_DEBUG_SV.C_PROC_LEVEL);
1150: END IF;
1151: --Purge Deliveries
1152: Purge_Deliveries(p_tbl_delivery_purge_set => p_tbl_delivery_purge_set,
1153: x_return_status => l_return_status);
1152: Purge_Deliveries(p_tbl_delivery_purge_set => p_tbl_delivery_purge_set,
1153: x_return_status => l_return_status);
1154:
1155: IF l_debug_on THEN
1156: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
1157: END IF;
1158:
1159: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1160: x_return_status := l_return_status;
1158:
1159: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1160: x_return_status := l_return_status;
1161: IF l_debug_on THEN
1162: WSH_DEBUG_SV.pop(l_module_name);
1163: END IF;
1164: RETURN;
1165: END IF;
1166: END IF;
1166: END IF;
1167:
1168: IF p_tbl_trip_purge_set.COUNT > 0 THEN
1169: IF l_debug_on THEN
1170: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PURGE.PURGE_TRIPS', WSH_DEBUG_SV.C_PROC_LEVEL);
1171: END IF;
1172: --Purge Trips
1173: Purge_Trips(p_tbl_trip_purge_set => p_tbl_trip_purge_set,
1174: x_return_status => l_return_status);
1173: Purge_Trips(p_tbl_trip_purge_set => p_tbl_trip_purge_set,
1174: x_return_status => l_return_status);
1175:
1176: IF l_debug_on THEN
1177: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
1178: END IF;
1179:
1180: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1181: x_return_status := l_return_status;
1179:
1180: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
1181: x_return_status := l_return_status;
1182: IF l_debug_on THEN
1183: WSH_DEBUG_SV.pop(l_module_name);
1184: END IF;
1185: RETURN;
1186: END IF;
1187: END IF;
1186: END IF;
1187: END IF;
1188:
1189: IF l_debug_on THEN
1190: WSH_DEBUG_SV.pop(l_module_name);
1191: END IF;
1192:
1193:
1194: EXCEPTION
1194: EXCEPTION
1195: WHEN OTHERS THEN
1196: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1197: IF l_debug_on THEN
1198: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1199: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1200: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1201: END IF;
1202:
1195: WHEN OTHERS THEN
1196: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1197: IF l_debug_on THEN
1198: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1199: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1200: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1201: END IF;
1202:
1203:
1196: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1197: IF l_debug_on THEN
1198: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1199: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1200: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1201: END IF;
1202:
1203:
1204: END Purge_Entities;
1234: --
1235: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1236: --
1237: IF l_debug_on IS NULL THEN
1238: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1239: END IF;
1240:
1241: IF l_debug_on THEN
1242: WSH_DEBUG_SV.push(l_module_name);
1238: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1239: END IF;
1240:
1241: IF l_debug_on THEN
1242: WSH_DEBUG_SV.push(l_module_name);
1243: END IF;
1244:
1245: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1246:
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
1263: WHERE trip_id = l_trip_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: TRIP_ID=' || l_trip_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1268: END IF;
1269: END IF;
1270:
1271: DELETE
1274: AND entity_name = 'WSH_TRIPS';
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: TRIP_ID=' || l_trip_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1279: END IF;
1280: END IF;
1281:
1282: DELETE
1284: WHERE trip_id = l_trip_id;
1285:
1286: IF SQL%FOUND THEN
1287: IF l_debug_on THEN
1288: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_trips: TRIP_ID=' || l_trip_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1289: END IF;
1290: END IF;
1291:
1292: END LOOP;
1291:
1292: END LOOP;
1293:
1294: IF l_debug_on THEN
1295: WSH_DEBUG_SV.pop(l_module_name);
1296: END IF;
1297:
1298: EXCEPTION
1299: WHEN OTHERS THEN
1298: EXCEPTION
1299: WHEN OTHERS THEN
1300: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1301: IF l_debug_on THEN
1302: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1303: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1304: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1305: END IF;
1306:
1299: WHEN OTHERS THEN
1300: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1301: IF l_debug_on THEN
1302: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1303: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1304: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1305: END IF;
1306:
1307: END Purge_Trips;
1300: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1301: IF l_debug_on THEN
1302: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1303: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1304: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1305: END IF;
1306:
1307: END Purge_Trips;
1308:
1347: --
1348: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1349: --
1350: IF l_debug_on IS NULL THEN
1351: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1352: END IF;
1353:
1354: IF l_debug_on THEN
1355: WSH_DEBUG_SV.push(l_module_name);
1351: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1352: END IF;
1353:
1354: IF l_debug_on THEN
1355: WSH_DEBUG_SV.push(l_module_name);
1356: END IF;
1357:
1358: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1359:
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
1378: AND entity_type = 'DLVY';
1379:
1380: IF SQL%FOUND THEN
1381: IF l_debug_on THEN
1382: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_transactions_history: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1383: END IF;
1384: END IF;
1385:
1386: DELETE
1388: WHERE delivery_id = l_delivery_id;
1389:
1390: IF SQL%FOUND THEN
1391: IF l_debug_on THEN
1392: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_freight_costs: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1393: END IF;
1394: END IF;
1395:
1396: DELETE
1399: AND entity_name = 'WSH_NEW_DELIVERIES';
1400:
1401: IF SQL%FOUND THEN
1402: IF l_debug_on THEN
1403: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_document_instances: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1404: END IF;
1405: END IF;
1406:
1407: IF (wsh_util_core.fte_is_installed='Y') THEN
1413: WHERE delivery_id = l_delivery_id);
1414:
1415: IF SQL%FOUND THEN
1416: IF l_debug_on THEN
1417: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_shipment_status_details: 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 fte_shipment_status_exceptions: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1430: END IF;
1431: END IF;
1432:
1433: DELETE
1437: WHERE delivery_id = l_delivery_id);
1438:
1439: IF SQL%FOUND THEN
1440: IF l_debug_on THEN
1441: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_message_partner: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1442: END IF;
1443: END IF;
1444:
1445: DELETE
1449: WHERE delivery_id = l_delivery_id);
1450:
1451: IF SQL%FOUND THEN
1452: IF l_debug_on THEN
1453: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_message_address: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1454: END IF;
1455: END IF;
1456:
1457: DELETE
1461: WHERE delivery_id = l_delivery_id);
1462:
1463: IF SQL%FOUND THEN
1464: IF l_debug_on THEN
1465: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_message_contact: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1466: END IF;
1467: END IF;
1468:
1469: DELETE
1473: WHERE delivery_id = l_delivery_id);
1474:
1475: IF SQL%FOUND THEN
1476: IF l_debug_on THEN
1477: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_message_location: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1478: END IF;
1479: END IF;
1480:
1481:
1486: WHERE delivery_id = l_delivery_id);
1487:
1488: IF SQL%FOUND THEN
1489: IF l_debug_on THEN
1490: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_delivery_proof: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1491: END IF;
1492: END IF;
1493:
1494:
1498:
1499:
1500: IF SQL%FOUND THEN
1501: IF l_debug_on THEN
1502: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_shipment_status_headers: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1503: END IF;
1504: END IF;
1505: END IF;
1506:
1514: AND wirc.service_type_code = 'WSH_EXPORT_COMPLIANCE' );
1515:
1516: IF SQL%FOUND THEN
1517: IF l_debug_on THEN
1518: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_itm_response_lines: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1519: END IF;
1520: END IF;
1521:
1522: DELETE
1527: AND service_type_code = 'WSH_EXPORT_COMPLIANCE' ) ;
1528:
1529: IF SQL%FOUND THEN
1530: IF l_debug_on THEN
1531: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_itm_response_headers: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1532: END IF;
1533: END IF;
1534:
1535: DELETE
1538: AND service_type_code = 'WSH_EXPORT_COMPLIANCE';
1539:
1540: IF SQL%FOUND THEN
1541: IF l_debug_on THEN
1542: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_itm_request_control: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1543: END IF;
1544: END IF;
1545:
1546: DELETE
1550: WHERE delivery_id = l_delivery_id) ;
1551:
1552: IF SQL%FOUND THEN
1553: IF l_debug_on THEN
1554: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_inbound_txn_history: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1555: END IF;
1556: END IF;
1557:
1558: DELETE
1560: WHERE delivery_id = l_delivery_id;
1561:
1562: IF SQL%FOUND THEN
1563: IF l_debug_on THEN
1564: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_new_deliveries: DELIVERY_ID=' || l_delivery_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1565: END IF;
1566: END IF;
1567:
1568: END LOOP;
1567:
1568: END LOOP;
1569:
1570: IF l_debug_on THEN
1571: WSH_DEBUG_SV.pop(l_module_name);
1572: END IF;
1573:
1574: EXCEPTION
1575: WHEN OTHERS THEN
1574: EXCEPTION
1575: WHEN OTHERS THEN
1576: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1577: IF l_debug_on THEN
1578: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1579: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1580: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1581: END IF;
1582:
1575: WHEN OTHERS THEN
1576: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1577: IF l_debug_on THEN
1578: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1579: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1580: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1581: END IF;
1582:
1583: END Purge_Deliveries;
1576: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1577: IF l_debug_on THEN
1578: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1579: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1580: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1581: END IF;
1582:
1583: END Purge_Deliveries;
1584:
1613: --
1614: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1615: --
1616: IF l_debug_on IS NULL THEN
1617: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1618: END IF;
1619:
1620: IF l_debug_on THEN
1621: WSH_DEBUG_SV.push(l_module_name);
1617: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1618: END IF;
1619:
1620: IF l_debug_on THEN
1621: WSH_DEBUG_SV.push(l_module_name);
1622: END IF;
1623:
1624: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1625:
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
1642: WHERE stop_id = l_stop_id;
1643:
1644: IF SQL%FOUND THEN
1645: IF l_debug_on THEN
1646: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_freight_costs: STOP_ID=' || l_stop_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1647: END IF;
1648: END IF;
1649:
1650: DELETE
1652: WHERE stop_id = l_stop_id;
1653:
1654: IF SQL%FOUND THEN
1655: IF l_debug_on THEN
1656: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_trip_stops: STOP_ID=' || l_stop_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1657: END IF;
1658: END IF;
1659:
1660: END LOOP;
1659:
1660: END LOOP;
1661:
1662: IF l_debug_on THEN
1663: WSH_DEBUG_SV.pop(l_module_name);
1664: END IF;
1665:
1666: EXCEPTION
1667: WHEN OTHERS THEN
1666: EXCEPTION
1667: WHEN OTHERS THEN
1668: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1669: IF l_debug_on THEN
1670: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1671: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1672: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1673: END IF;
1674:
1667: WHEN OTHERS THEN
1668: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1669: IF l_debug_on THEN
1670: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1671: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1672: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1673: END IF;
1674:
1675: END Purge_Trip_Stops;
1668: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1669: IF l_debug_on THEN
1670: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1671: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1672: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1673: END IF;
1674:
1675: END Purge_Trip_Stops;
1676:
1708: --
1709: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1710: --
1711: IF l_debug_on IS NULL THEN
1712: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1713: END IF;
1714:
1715: IF l_debug_on THEN
1716: WSH_DEBUG_SV.push(l_module_name);
1712: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1713: END IF;
1714:
1715: IF l_debug_on THEN
1716: WSH_DEBUG_SV.push(l_module_name);
1717: END IF;
1718:
1719: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1720:
1727: WHERE delivery_leg_id = l_leg_id;
1728:
1729: IF SQL%FOUND THEN
1730: IF l_debug_on THEN
1731: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_freight_costs: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1732: END IF;
1733: END IF;
1734:
1735: IF (wsh_util_core.fte_is_installed='Y') THEN
1744: AND wdi.sequence_number = fih.bol
1745: ) ;
1746: IF SQL%FOUND THEN
1747: IF l_debug_on THEN
1748: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_invoice_lines: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1749: END IF;
1750: END IF;
1751:
1752: DELETE
1757: AND entity_name = 'WSH_DELIVERY_LEGS') ;
1758:
1759: IF SQL%FOUND THEN
1760: IF l_debug_on THEN
1761: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_invoice_headers: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1762: END IF;
1763: END IF;
1764:
1765: DELETE
1770: AND entity_name = 'WSH_DELIVERY_LEGS') ;
1771:
1772: IF SQL%FOUND THEN
1773: IF l_debug_on THEN
1774: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_invoice_history: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1775: END IF;
1776: END IF;
1777:
1778: DELETE
1783: AND entity_name = 'WSH_DELIVERY_LEGS') ;
1784:
1785: IF SQL%FOUND THEN
1786: IF l_debug_on THEN
1787: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from fte_failure_reasons: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1788: END IF;
1789: END IF;
1790:
1791: END IF;
1796: AND entity_name = 'WSH_DELIVERY_LEGS';
1797:
1798: IF SQL%FOUND THEN
1799: IF l_debug_on THEN
1800: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_document_instances: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1801: END IF;
1802: END IF;
1803:
1804: DELETE
1806: WHERE delivery_leg_id = l_leg_id ;
1807:
1808: IF SQL%FOUND THEN
1809: IF l_debug_on THEN
1810: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_delivery_leg_activities: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1811: END IF;
1812: END IF;
1813:
1814: DELETE
1816: WHERE delivery_leg_id = l_leg_id;
1817:
1818: IF SQL%FOUND THEN
1819: IF l_debug_on THEN
1820: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_delivery_leg_details: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1821: END IF;
1822: END IF;
1823:
1824:
1827: WHERE delivery_leg_id = l_leg_id ;
1828:
1829: IF SQL%FOUND THEN
1830: IF l_debug_on THEN
1831: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_delivery_legs: LEG_ID=' || l_leg_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1832: END IF;
1833: END IF;
1834: END LOOP;
1835:
1833: END IF;
1834: END LOOP;
1835:
1836: IF l_debug_on THEN
1837: WSH_DEBUG_SV.pop(l_module_name);
1838: END IF;
1839:
1840: EXCEPTION
1841: WHEN OTHERS THEN
1840: EXCEPTION
1841: WHEN OTHERS THEN
1842: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1843: IF l_debug_on THEN
1844: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1845: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1846: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1847: END IF;
1848:
1841: WHEN OTHERS THEN
1842: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1843: IF l_debug_on THEN
1844: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1845: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1846: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1847: END IF;
1848:
1849: END Purge_Delivery_Legs;
1842: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1843: IF l_debug_on THEN
1844: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1845: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1846: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1847: END IF;
1848:
1849: END Purge_Delivery_Legs;
1850:
1878: --
1879: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1880: --
1881: IF l_debug_on IS NULL THEN
1882: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1883: END IF;
1884:
1885: IF l_debug_on THEN
1886: WSH_DEBUG_SV.push(l_module_name);
1882: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1883: END IF;
1884:
1885: IF l_debug_on THEN
1886: WSH_DEBUG_SV.push(l_module_name);
1887: END IF;
1888:
1889: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1890:
1897: WHERE delivery_detail_id = l_detail_id;
1898:
1899: IF SQL%FOUND THEN
1900: IF l_debug_on THEN
1901: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_serial_numbers: DELIVERY_DETAIL_ID=' || l_detail_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1902: END IF;
1903: END IF;
1904:
1905: DELETE
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
1917: WHERE delivery_detail_id = l_detail_id;
1918:
1919: IF SQL%FOUND THEN
1920: IF l_debug_on THEN
1921: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_freight_costs: DELIVERY_DETAIL_ID=' || l_detail_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1922: END IF;
1923: END IF;
1924:
1925: DELETE
1927: WHERE delivery_detail_id = l_detail_id;
1928:
1929: IF SQL%FOUND THEN
1930: IF l_debug_on THEN
1931: 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);
1932: END IF;
1933: END IF;
1934:
1935: DELETE
1937: WHERE delivery_detail_id = l_detail_id;
1938:
1939: IF SQL%FOUND THEN
1940: IF l_debug_on THEN
1941: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_delivery_details: DELIVERY_DETAIL_ID=' || l_detail_id, WSH_DEBUG_SV.C_PROC_LEVEL);
1942: END IF;
1943: END IF;
1944: END LOOP;
1945:
1943: END IF;
1944: END LOOP;
1945:
1946: IF l_debug_on THEN
1947: WSH_DEBUG_SV.pop(l_module_name);
1948: END IF;
1949:
1950: EXCEPTION
1951: WHEN OTHERS THEN
1950: EXCEPTION
1951: WHEN OTHERS THEN
1952: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1953: IF l_debug_on THEN
1954: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1955: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1956: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1957: END IF;
1958:
1951: WHEN OTHERS THEN
1952: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1953: IF l_debug_on THEN
1954: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1955: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1956: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1957: END IF;
1958:
1959: END Purge_Delivery_Details;
1952: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1953: IF l_debug_on THEN
1954: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1955: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1956: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1957: END IF;
1958:
1959: END Purge_Delivery_Details;
1960:
1993: --
1994: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1995: --
1996: IF l_debug_on IS NULL THEN
1997: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1998: END IF;
1999:
2000: IF l_debug_on THEN
2001: WSH_DEBUG_SV.push(l_module_name);
1997: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1998: END IF;
1999:
2000: IF l_debug_on THEN
2001: WSH_DEBUG_SV.push(l_module_name);
2002: END IF;
2003:
2004: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2005:
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
2023: WHERE delivery_detail_id = l_container_id;
2024:
2025: IF SQL%FOUND THEN
2026: IF l_debug_on THEN
2027: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_freight_costs: CONTAINER_ID=' || l_container_id, WSH_DEBUG_SV.C_PROC_LEVEL);
2028: END IF;
2029: END IF;
2030:
2031: DELETE
2033: WHERE delivery_detail_id = l_container_id;
2034:
2035: IF SQL%FOUND THEN
2036: IF l_debug_on THEN
2037: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_delivery_assignments_v: CONTAINER_ID=' || l_container_id, WSH_DEBUG_SV.C_PROC_LEVEL);
2038: END IF;
2039: END IF;
2040:
2041: DELETE
2044: RETURNING lpn_id INTO l_lpn_id;
2045:
2046: IF SQL%FOUND THEN
2047: IF l_debug_on THEN
2048: WSH_DEBUG_SV.logmsg(l_module_name,'Deleted from wsh_delivery_details: CONTAINER_ID=' || l_container_id, WSH_DEBUG_SV.C_PROC_LEVEL);
2049: END IF;
2050: END IF;
2051:
2052: IF l_lpn_id IS NOT NULL THEN -- Populate the LPN IDs in the table
2055: END LOOP;
2056:
2057: --Call the WMS API to DELETE the LPNs
2058: IF l_debug_on THEN
2059: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WMS_CONTAINER_GRP.LPN_PURGE_ACTIONS', WSH_DEBUG_SV.C_PROC_LEVEL);
2060: END IF;
2061:
2062: WMS_Container_GRP.LPN_Purge_Actions( p_api_version =>1.0,
2063: p_init_msg_list =>FND_API.G_TRUE,
2070: p_lpn_purge_rec => l_wms_lpn_record
2071: );
2072:
2073: IF l_debug_on THEN
2074: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
2075: WSH_DEBUG_SV.log(l_module_name,'L_MSG_DATA',l_msg_data);
2076: END IF;
2077:
2078: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2071: );
2072:
2073: IF l_debug_on THEN
2074: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
2075: WSH_DEBUG_SV.log(l_module_name,'L_MSG_DATA',l_msg_data);
2076: END IF;
2077:
2078: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2079: x_return_status := l_return_status;
2077:
2078: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2079: x_return_status := l_return_status;
2080: IF l_debug_on THEN
2081: WSH_DEBUG_SV.pop(l_module_name);
2082: END IF;
2083: RETURN;
2084: END IF;
2085:
2083: RETURN;
2084: END IF;
2085:
2086: IF l_debug_on THEN
2087: WSH_DEBUG_SV.pop(l_module_name);
2088: END IF;
2089:
2090: EXCEPTION
2091: WHEN OTHERS THEN
2090: EXCEPTION
2091: WHEN OTHERS THEN
2092: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2093: IF l_debug_on THEN
2094: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2095: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2096: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2097: END IF;
2098:
2091: WHEN OTHERS THEN
2092: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2093: IF l_debug_on THEN
2094: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2095: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2096: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2097: END IF;
2098:
2099: END Purge_Containers;
2092: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2093: IF l_debug_on THEN
2094: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2095: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2096: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2097: END IF;
2098:
2099: END Purge_Containers;
2100:
2290: --
2291: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2292: --
2293: IF l_debug_on IS NULL THEN
2294: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2295: END IF;
2296:
2297: IF l_debug_on THEN
2298: WSH_DEBUG_SV.push(l_module_name);
2294: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2295: END IF;
2296:
2297: IF l_debug_on THEN
2298: WSH_DEBUG_SV.push(l_module_name);
2299: END IF;
2300:
2301: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2302:
2306: l_empty_del_count := 0;
2307: l_empty_lpn_count := 0;
2308:
2309: IF l_debug_on THEN
2310: WSH_DEBUG_SV.log(l_module_name,'P_EXECUTION_MODE',p_execution_mode);
2311: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
2312: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
2313: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
2314: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2307: l_empty_lpn_count := 0;
2308:
2309: IF l_debug_on THEN
2310: WSH_DEBUG_SV.log(l_module_name,'P_EXECUTION_MODE',p_execution_mode);
2311: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
2312: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
2313: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
2314: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2315: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2308:
2309: IF l_debug_on THEN
2310: WSH_DEBUG_SV.log(l_module_name,'P_EXECUTION_MODE',p_execution_mode);
2311: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
2312: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
2313: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
2314: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2315: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2316: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2309: IF l_debug_on THEN
2310: WSH_DEBUG_SV.log(l_module_name,'P_EXECUTION_MODE',p_execution_mode);
2311: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
2312: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
2313: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
2314: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2315: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2316: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2317: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2310: WSH_DEBUG_SV.log(l_module_name,'P_EXECUTION_MODE',p_execution_mode);
2311: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
2312: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
2313: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
2314: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2315: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2316: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2317: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2318: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2311: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_SYSTEM',p_source_system);
2312: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
2313: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
2314: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2315: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2316: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2317: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2318: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2319: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2312: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_FROM_ORG',p_ship_from_org);
2313: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
2314: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2315: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2316: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2317: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2318: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2319: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2320: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2313: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_FROM',p_order_number_from);
2314: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2315: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2316: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2317: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2318: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2319: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2320: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2321: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2314: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_NUMBER_To',p_order_number_to);
2315: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2316: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2317: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2318: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2319: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2320: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2321: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2322: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2315: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_TYPE',p_order_type);
2316: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2317: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2318: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2319: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2320: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2321: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2322: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2323: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2316: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_FROM',p_ship_date_from);
2317: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2318: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2319: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2320: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2321: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2322: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2323: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2324: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2317: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_DATE_TO',p_ship_date_to);
2318: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2319: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2320: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2321: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2322: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2323: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2324: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2325: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2318: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_BEYOND_X_SHIP_DAYS',p_delete_beyond_x_ship_days);
2319: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2320: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2321: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2322: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2323: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2324: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2325: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2326: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_LEGS',p_count_legs);
2319: WSH_DEBUG_SV.log(l_module_name,'P_PURGE_INTRANSIT_TRIPS',p_purge_intransit_trips);
2320: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2321: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2322: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2323: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2324: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2325: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2326: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_LEGS',p_count_legs);
2327: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_STOPS',p_count_stops);
2320: WSH_DEBUG_SV.log(l_module_name,'P_DELETE_EMPTY_Records',p_delete_empty_records);
2321: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2322: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2323: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2324: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2325: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2326: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_LEGS',p_count_legs);
2327: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_STOPS',p_count_stops);
2328: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_DETAILS',p_count_details);
2321: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_FROM',p_create_date_from);
2322: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2323: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2324: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2325: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2326: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_LEGS',p_count_legs);
2327: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_STOPS',p_count_stops);
2328: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_DETAILS',p_count_details);
2329: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_ContainerS',p_count_containers);
2322: WSH_DEBUG_SV.log(l_module_name,'P_CREATE_DATE_TO',p_create_date_to);
2323: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2324: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2325: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2326: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_LEGS',p_count_legs);
2327: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_STOPS',p_count_stops);
2328: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_DETAILS',p_count_details);
2329: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_ContainerS',p_count_containers);
2330: END IF;
2323: WSH_DEBUG_SV.log(l_module_name,'P_DEL_BEYOND_CREATION_DAYS',p_del_beyond_creation_days);
2324: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2325: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2326: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_LEGS',p_count_legs);
2327: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_STOPS',p_count_stops);
2328: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_DETAILS',p_count_details);
2329: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_ContainerS',p_count_containers);
2330: END IF;
2331:
2324: WSH_DEBUG_SV.log(l_module_name,'P_SORT_PER_CRITERIA',p_sort_per_criteria);
2325: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2326: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_LEGS',p_count_legs);
2327: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_STOPS',p_count_stops);
2328: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_DETAILS',p_count_details);
2329: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_ContainerS',p_count_containers);
2330: END IF;
2331:
2332: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
2325: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_DETAIL',p_print_detail);
2326: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_LEGS',p_count_legs);
2327: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_STOPS',p_count_stops);
2328: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_DETAILS',p_count_details);
2329: WSH_DEBUG_SV.log(l_module_name,'P_COUNT_ContainerS',p_count_containers);
2330: END IF;
2331:
2332: -- FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
2333: --bug 12605679: Added encoding to UTF-8
2652: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'
2653: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
2654:
2655: IF l_debug_on THEN
2656: WSH_DEBUG_SV.pop(l_module_name);
2657: END IF;
2658:
2659: EXCEPTION
2660: WHEN OTHERS THEN
2661: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2662: l_err := SQLERRM;
2663:
2664: IF l_debug_on THEN
2665: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2666: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2667: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2668: END IF;
2669:
2662: l_err := SQLERRM;
2663:
2664: IF l_debug_on THEN
2665: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2666: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2667: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2668: END IF;
2669:
2670: END Generate_Purge_Report;
2663:
2664: IF l_debug_on THEN
2665: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
2666: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2667: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2668: END IF;
2669:
2670: END Generate_Purge_Report;
2671:
2700: --
2701: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2702: --
2703: IF l_debug_on IS NULL THEN
2704: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2705: END IF;
2706:
2707: IF l_debug_on THEN
2708: WSH_DEBUG_SV.push(l_module_name);
2704: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2705: END IF;
2706:
2707: IF l_debug_on THEN
2708: WSH_DEBUG_SV.push(l_module_name);
2709: END IF;
2710:
2711: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2712:
2717: l_delivery_ids_tab(l_delivery_index) := p_tbl_delivery_purge_set(l_delivery_index).delivery_id;
2718: END LOOP;
2719:
2720: IF l_debug_on THEN
2721: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.PURGE_ENTITY', WSH_DEBUG_SV.C_PROC_LEVEL);
2722: WSH_DEBUG_SV.logmsg(l_module_name,'no of delivery ids =' || l_delivery_ids_tab.count, WSH_DEBUG_SV.C_PROC_LEVEL);
2723: END IF;
2724:
2725: WSH_WF_STD.Purge_Entity(
2718: END LOOP;
2719:
2720: IF l_debug_on THEN
2721: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.PURGE_ENTITY', WSH_DEBUG_SV.C_PROC_LEVEL);
2722: WSH_DEBUG_SV.logmsg(l_module_name,'no of delivery ids =' || l_delivery_ids_tab.count, WSH_DEBUG_SV.C_PROC_LEVEL);
2723: END IF;
2724:
2725: WSH_WF_STD.Purge_Entity(
2726: p_entity_type => 'DELIVERY',
2730: x_success_count => l_success_count,
2731: x_return_status => l_return_status) ;
2732:
2733: IF l_debug_on THEN
2734: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
2735: WSH_DEBUG_SV.log(l_module_name,'L_SUCCESS_COUNT',l_success_count);
2736: END IF;
2737:
2738: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2731: x_return_status => l_return_status) ;
2732:
2733: IF l_debug_on THEN
2734: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
2735: WSH_DEBUG_SV.log(l_module_name,'L_SUCCESS_COUNT',l_success_count);
2736: END IF;
2737:
2738: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2739: x_return_status := l_return_status;
2737:
2738: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2739: x_return_status := l_return_status;
2740: IF l_debug_on THEN
2741: WSH_DEBUG_SV.pop(l_module_name);
2742: END IF;
2743: RETURN;
2744: END IF;
2745: END IF; --Check for number of ids in delivery table
2751: l_trip_ids_tab(l_trip_index) := p_tbl_trip_purge_set(l_trip_index).trip_id;
2752: END LOOP;
2753:
2754: IF l_debug_on THEN
2755: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WF_STD.PURGE_ENTITY', WSH_DEBUG_SV.C_PROC_LEVEL);
2756: END IF;
2757:
2758: WSH_WF_STD.Purge_Entity(
2759: p_entity_type => 'TRIP',
2763: x_success_count => l_success_count,
2764: x_return_status => l_return_status) ;
2765:
2766: IF l_debug_on THEN
2767: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
2768: WSH_DEBUG_SV.log(l_module_name,'L_SUCCESS_COUNT',l_success_count);
2769: END IF;
2770:
2771: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2764: x_return_status => l_return_status) ;
2765:
2766: IF l_debug_on THEN
2767: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
2768: WSH_DEBUG_SV.log(l_module_name,'L_SUCCESS_COUNT',l_success_count);
2769: END IF;
2770:
2771: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2772: x_return_status := l_return_status;
2770:
2771: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2772: x_return_status := l_return_status;
2773: IF l_debug_on THEN
2774: WSH_DEBUG_SV.pop(l_module_name);
2775: END IF;
2776: RETURN;
2777: END IF;
2778: END IF; --Check for number of ids in trip table
2777: END IF;
2778: END IF; --Check for number of ids in trip table
2779:
2780: IF l_debug_on THEN
2781: WSH_DEBUG_SV.pop(l_module_name);
2782: END IF;
2783:
2784: END Purge_Workflow;
2785:
2954: --
2955: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2956: --
2957: IF l_debug_on IS NULL THEN
2958: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2959: END IF;
2960:
2961: IF l_debug_on THEN
2962: WSH_DEBUG_SV.push(l_module_name);
2958: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2959: END IF;
2960:
2961: IF l_debug_on THEN
2962: WSH_DEBUG_SV.push(l_module_name);
2963: END IF;
2964:
2965: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2966: l_lpn_valid := TRUE;
2992: l_lpn_count := l_wms_lpn_record.LPN_IDs.COUNT;
2993:
2994: --call WMS API to check whether the LPN is eligible for purge
2995: IF l_debug_on THEN
2996: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WMS_CONTAINER_GRP.LPN_PURGE_ACTIONS', WSH_DEBUG_SV.C_PROC_LEVEL);
2997: END IF;
2998:
2999: WMS_Container_GRP.LPN_Purge_Actions( p_api_version =>1.0,
3000: p_init_msg_list =>FND_API.G_TRUE,
3007: p_lpn_purge_rec => l_wms_lpn_record
3008: );
3009:
3010: IF l_debug_on THEN
3011: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
3012: WSH_DEBUG_SV.log(l_module_name,'L_MSG_DATA',l_msg_data);
3013: END IF;
3014:
3015: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3008: );
3009:
3010: IF l_debug_on THEN
3011: WSH_DEBUG_SV.log(l_module_name,'L_RETURN_STATUS',l_return_status);
3012: WSH_DEBUG_SV.log(l_module_name,'L_MSG_DATA',l_msg_data);
3013: END IF;
3014:
3015: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3016: x_return_status := l_return_status;
3014:
3015: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3016: x_return_status := l_return_status;
3017: IF l_debug_on THEN
3018: WSH_DEBUG_SV.pop(l_module_name);
3019: END IF;
3020: RETURN;
3021: END IF;
3022:
3097: END IF ;
3098: END LOOP;
3099:
3100: IF l_debug_on THEN
3101: WSH_DEBUG_SV.pop(l_module_name);
3102: END IF;
3103:
3104: EXCEPTION
3105: WHEN OTHERS THEN
3106: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3107: l_err := SQLERRM;
3108:
3109: IF l_debug_on THEN
3110: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
3111: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3112: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3113: END IF;
3114: END Validate_Trips ;
3107: l_err := SQLERRM;
3108:
3109: IF l_debug_on THEN
3110: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
3111: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3112: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3113: END IF;
3114: END Validate_Trips ;
3115:
3108:
3109: IF l_debug_on THEN
3110: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
3111: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3112: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3113: END IF;
3114: END Validate_Trips ;
3115:
3116: END WSH_PURGE;