125: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
126: --
127: IF l_debug_on IS NULL
128: THEN
129: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
130: END IF;
131: --
132:
133: IF l_debug_on THEN
130: END IF;
131: --
132:
133: IF l_debug_on THEN
134: WSH_DEBUG_SV.push(l_module_name);
135: WSH_DEBUG_SV.log(l_module_name,'p_api_version_number',p_api_version_number);
136: WSH_DEBUG_SV.log(l_module_name,'p_init_msg_list',p_init_msg_list);
137: WSH_DEBUG_SV.log(l_module_name,'p_commit',p_commit);
138: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.caller',p_action_prms.caller);
131: --
132:
133: IF l_debug_on THEN
134: WSH_DEBUG_SV.push(l_module_name);
135: WSH_DEBUG_SV.log(l_module_name,'p_api_version_number',p_api_version_number);
136: WSH_DEBUG_SV.log(l_module_name,'p_init_msg_list',p_init_msg_list);
137: WSH_DEBUG_SV.log(l_module_name,'p_commit',p_commit);
138: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.caller',p_action_prms.caller);
139: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
132:
133: IF l_debug_on THEN
134: WSH_DEBUG_SV.push(l_module_name);
135: WSH_DEBUG_SV.log(l_module_name,'p_api_version_number',p_api_version_number);
136: WSH_DEBUG_SV.log(l_module_name,'p_init_msg_list',p_init_msg_list);
137: WSH_DEBUG_SV.log(l_module_name,'p_commit',p_commit);
138: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.caller',p_action_prms.caller);
139: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
140: WSH_DEBUG_SV.log(l_module_name,'x_action_out_rec.x_delivery_id',x_action_out_rec.x_delivery_id);
133: IF l_debug_on THEN
134: WSH_DEBUG_SV.push(l_module_name);
135: WSH_DEBUG_SV.log(l_module_name,'p_api_version_number',p_api_version_number);
136: WSH_DEBUG_SV.log(l_module_name,'p_init_msg_list',p_init_msg_list);
137: WSH_DEBUG_SV.log(l_module_name,'p_commit',p_commit);
138: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.caller',p_action_prms.caller);
139: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
140: WSH_DEBUG_SV.log(l_module_name,'x_action_out_rec.x_delivery_id',x_action_out_rec.x_delivery_id);
141: WSH_DEBUG_SV.log(l_module_name,'x_action_out_rec.x_trip_id',x_action_out_rec.x_trip_id);
134: WSH_DEBUG_SV.push(l_module_name);
135: WSH_DEBUG_SV.log(l_module_name,'p_api_version_number',p_api_version_number);
136: WSH_DEBUG_SV.log(l_module_name,'p_init_msg_list',p_init_msg_list);
137: WSH_DEBUG_SV.log(l_module_name,'p_commit',p_commit);
138: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.caller',p_action_prms.caller);
139: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
140: WSH_DEBUG_SV.log(l_module_name,'x_action_out_rec.x_delivery_id',x_action_out_rec.x_delivery_id);
141: WSH_DEBUG_SV.log(l_module_name,'x_action_out_rec.x_trip_id',x_action_out_rec.x_trip_id);
142: WSH_DEBUG_SV.log(l_module_name,'p_rec_attr_tab.count',p_rec_attr_tab.count);
135: WSH_DEBUG_SV.log(l_module_name,'p_api_version_number',p_api_version_number);
136: WSH_DEBUG_SV.log(l_module_name,'p_init_msg_list',p_init_msg_list);
137: WSH_DEBUG_SV.log(l_module_name,'p_commit',p_commit);
138: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.caller',p_action_prms.caller);
139: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
140: WSH_DEBUG_SV.log(l_module_name,'x_action_out_rec.x_delivery_id',x_action_out_rec.x_delivery_id);
141: WSH_DEBUG_SV.log(l_module_name,'x_action_out_rec.x_trip_id',x_action_out_rec.x_trip_id);
142: WSH_DEBUG_SV.log(l_module_name,'p_rec_attr_tab.count',p_rec_attr_tab.count);
143: END IF;
136: WSH_DEBUG_SV.log(l_module_name,'p_init_msg_list',p_init_msg_list);
137: WSH_DEBUG_SV.log(l_module_name,'p_commit',p_commit);
138: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.caller',p_action_prms.caller);
139: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
140: WSH_DEBUG_SV.log(l_module_name,'x_action_out_rec.x_delivery_id',x_action_out_rec.x_delivery_id);
141: WSH_DEBUG_SV.log(l_module_name,'x_action_out_rec.x_trip_id',x_action_out_rec.x_trip_id);
142: WSH_DEBUG_SV.log(l_module_name,'p_rec_attr_tab.count',p_rec_attr_tab.count);
143: END IF;
144:
137: WSH_DEBUG_SV.log(l_module_name,'p_commit',p_commit);
138: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.caller',p_action_prms.caller);
139: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
140: WSH_DEBUG_SV.log(l_module_name,'x_action_out_rec.x_delivery_id',x_action_out_rec.x_delivery_id);
141: WSH_DEBUG_SV.log(l_module_name,'x_action_out_rec.x_trip_id',x_action_out_rec.x_trip_id);
142: WSH_DEBUG_SV.log(l_module_name,'p_rec_attr_tab.count',p_rec_attr_tab.count);
143: END IF;
144:
145: -- OTM R12, there was no initialization to 'S' for x_return_status
138: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.caller',p_action_prms.caller);
139: WSH_DEBUG_SV.log(l_module_name,'p_action_prms.action_code',p_action_prms.action_code);
140: WSH_DEBUG_SV.log(l_module_name,'x_action_out_rec.x_delivery_id',x_action_out_rec.x_delivery_id);
141: WSH_DEBUG_SV.log(l_module_name,'x_action_out_rec.x_trip_id',x_action_out_rec.x_trip_id);
142: WSH_DEBUG_SV.log(l_module_name,'p_rec_attr_tab.count',p_rec_attr_tab.count);
143: END IF;
144:
145: -- OTM R12, there was no initialization to 'S' for x_return_status
146: -- Also, x_return_status was being used to add message earlier,
150: l_tms_interface_flag := NULL;
151:
152: IF NOT FND_API.compatible_api_call(l_api_version,p_api_version_number,l_api_name,G_PKG_NAME) THEN
153: IF l_debug_on THEN
154: WSH_DEBUG_SV.log(l_module_name,'Not comatible');
155: END IF;
156: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
157: END IF;
158:
208: p_action => p_action_prms.action_code,
209: x_return_status => l_return_status);
210:
211: IF l_debug_on THEN
212: WSH_DEBUG_SV.log(l_module_name,'C_LOCK_RECORDS_LVL',
213: WSH_ACTIONS_LEVELS.g_validation_level_tab(WSH_ACTIONS_LEVELS.C_LOCK_RECORDS_LVL));
214: WSH_DEBUG_SV.log(l_module_name,'C_TRIP_SMC_LVL',
215: WSH_ACTIONS_LEVELS.g_validation_level_tab(WSH_ACTIONS_LEVELS.C_TRIP_SMC_LVL));
216: END IF;
210:
211: IF l_debug_on THEN
212: WSH_DEBUG_SV.log(l_module_name,'C_LOCK_RECORDS_LVL',
213: WSH_ACTIONS_LEVELS.g_validation_level_tab(WSH_ACTIONS_LEVELS.C_LOCK_RECORDS_LVL));
214: WSH_DEBUG_SV.log(l_module_name,'C_TRIP_SMC_LVL',
215: WSH_ACTIONS_LEVELS.g_validation_level_tab(WSH_ACTIONS_LEVELS.C_TRIP_SMC_LVL));
216: END IF;
217: WSH_UTIL_CORE.api_post_call(p_return_status =>l_return_status,
218: x_num_warnings =>l_num_warnings,
254:
255: CLOSE get_parent_leg;
256:
257: IF l_debug_on THEN
258: WSH_DEBUG_SV.log(l_module_name,'p_rec_attr_tab(l_index).delivery_leg_id',p_rec_attr_tab(l_index).delivery_leg_id);
259: WSH_DEBUG_SV.log(l_module_name,'l_parent_delivery_leg_id',l_parent_delivery_leg_id);
260: WSH_DEBUG_SV.log(l_module_name,'l_delivery_leg_id',l_delivery_leg_id);
261: WSH_DEBUG_SV.log(l_module_name,'l_parent_delivery_id',l_parent_delivery_id);
262: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id',l_delivery_id);
255: CLOSE get_parent_leg;
256:
257: IF l_debug_on THEN
258: WSH_DEBUG_SV.log(l_module_name,'p_rec_attr_tab(l_index).delivery_leg_id',p_rec_attr_tab(l_index).delivery_leg_id);
259: WSH_DEBUG_SV.log(l_module_name,'l_parent_delivery_leg_id',l_parent_delivery_leg_id);
260: WSH_DEBUG_SV.log(l_module_name,'l_delivery_leg_id',l_delivery_leg_id);
261: WSH_DEBUG_SV.log(l_module_name,'l_parent_delivery_id',l_parent_delivery_id);
262: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id',l_delivery_id);
263: END IF;
256:
257: IF l_debug_on THEN
258: WSH_DEBUG_SV.log(l_module_name,'p_rec_attr_tab(l_index).delivery_leg_id',p_rec_attr_tab(l_index).delivery_leg_id);
259: WSH_DEBUG_SV.log(l_module_name,'l_parent_delivery_leg_id',l_parent_delivery_leg_id);
260: WSH_DEBUG_SV.log(l_module_name,'l_delivery_leg_id',l_delivery_leg_id);
261: WSH_DEBUG_SV.log(l_module_name,'l_parent_delivery_id',l_parent_delivery_id);
262: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id',l_delivery_id);
263: END IF;
264:
257: IF l_debug_on THEN
258: WSH_DEBUG_SV.log(l_module_name,'p_rec_attr_tab(l_index).delivery_leg_id',p_rec_attr_tab(l_index).delivery_leg_id);
259: WSH_DEBUG_SV.log(l_module_name,'l_parent_delivery_leg_id',l_parent_delivery_leg_id);
260: WSH_DEBUG_SV.log(l_module_name,'l_delivery_leg_id',l_delivery_leg_id);
261: WSH_DEBUG_SV.log(l_module_name,'l_parent_delivery_id',l_parent_delivery_id);
262: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id',l_delivery_id);
263: END IF;
264:
265:
258: WSH_DEBUG_SV.log(l_module_name,'p_rec_attr_tab(l_index).delivery_leg_id',p_rec_attr_tab(l_index).delivery_leg_id);
259: WSH_DEBUG_SV.log(l_module_name,'l_parent_delivery_leg_id',l_parent_delivery_leg_id);
260: WSH_DEBUG_SV.log(l_module_name,'l_delivery_leg_id',l_delivery_leg_id);
261: WSH_DEBUG_SV.log(l_module_name,'l_parent_delivery_id',l_parent_delivery_id);
262: WSH_DEBUG_SV.log(l_module_name,'l_delivery_id',l_delivery_id);
263: END IF;
264:
265:
266: IF (p_action_prms.action_code = 'GENERATE-BOL') THEN
290: IF (l_ship_method_code IS NULL ) THEN
291: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
292: /*3301344*/
293: IF l_debug_on THEN
294: WSH_DEBUG_SV.log(l_module_name,'l_ship_method_code',l_ship_method_code);
295: END IF;
296:
297: FND_MESSAGE.SET_NAME('WSH','WSH_BOL_NULL_SHIP_METHOD_ERROR');
298: FND_MESSAGE.SET_TOKEN('TRIP_NAME',l_trip_name);
304:
305: /*3301344 : Commented out the following code*/
306:
307: /* IF l_debug_on THEN
308: WSH_DEBUG_SV.log(l_module_name,'l_ship_method_code',l_ship_method_code);
309: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
310: END IF;
311: WSH_UTIL_CORE.api_post_call(p_return_status =>l_return_status,
312: x_num_warnings =>l_loop_warnings,
305: /*3301344 : Commented out the following code*/
306:
307: /* IF l_debug_on THEN
308: WSH_DEBUG_SV.log(l_module_name,'l_ship_method_code',l_ship_method_code);
309: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
310: END IF;
311: WSH_UTIL_CORE.api_post_call(p_return_status =>l_return_status,
312: x_num_warnings =>l_loop_warnings,
313: x_num_errors =>l_num_errors);
327: CLOSE get_delivery_info;
328:
329: --OTM R12, glog proj, add debug
330: IF l_debug_on THEN
331: WSH_DEBUG_SV.log(l_module_name,'Delivery id',x_action_out_rec.x_delivery_id);
332: WSH_DEBUG_SV.log(l_module_name,'Organization id',l_organization_id);
333: WSH_DEBUG_SV.log(l_module_name,'Status_Code',l_status_code);
334: WSH_DEBUG_SV.log(l_module_name,'Planned_Flag',l_planned_flag);
335: WSH_DEBUG_SV.log(l_module_name,'Shipment Direction',l_shipment_direction);
328:
329: --OTM R12, glog proj, add debug
330: IF l_debug_on THEN
331: WSH_DEBUG_SV.log(l_module_name,'Delivery id',x_action_out_rec.x_delivery_id);
332: WSH_DEBUG_SV.log(l_module_name,'Organization id',l_organization_id);
333: WSH_DEBUG_SV.log(l_module_name,'Status_Code',l_status_code);
334: WSH_DEBUG_SV.log(l_module_name,'Planned_Flag',l_planned_flag);
335: WSH_DEBUG_SV.log(l_module_name,'Shipment Direction',l_shipment_direction);
336: WSH_DEBUG_SV.log(l_module_name,'Ignore for Planning',l_ignore);
329: --OTM R12, glog proj, add debug
330: IF l_debug_on THEN
331: WSH_DEBUG_SV.log(l_module_name,'Delivery id',x_action_out_rec.x_delivery_id);
332: WSH_DEBUG_SV.log(l_module_name,'Organization id',l_organization_id);
333: WSH_DEBUG_SV.log(l_module_name,'Status_Code',l_status_code);
334: WSH_DEBUG_SV.log(l_module_name,'Planned_Flag',l_planned_flag);
335: WSH_DEBUG_SV.log(l_module_name,'Shipment Direction',l_shipment_direction);
336: WSH_DEBUG_SV.log(l_module_name,'Ignore for Planning',l_ignore);
337: WSH_DEBUG_SV.log(l_module_name,'Tms Interface Flag',l_tms_interface_flag);
330: IF l_debug_on THEN
331: WSH_DEBUG_SV.log(l_module_name,'Delivery id',x_action_out_rec.x_delivery_id);
332: WSH_DEBUG_SV.log(l_module_name,'Organization id',l_organization_id);
333: WSH_DEBUG_SV.log(l_module_name,'Status_Code',l_status_code);
334: WSH_DEBUG_SV.log(l_module_name,'Planned_Flag',l_planned_flag);
335: WSH_DEBUG_SV.log(l_module_name,'Shipment Direction',l_shipment_direction);
336: WSH_DEBUG_SV.log(l_module_name,'Ignore for Planning',l_ignore);
337: WSH_DEBUG_SV.log(l_module_name,'Tms Interface Flag',l_tms_interface_flag);
338: END IF;
331: WSH_DEBUG_SV.log(l_module_name,'Delivery id',x_action_out_rec.x_delivery_id);
332: WSH_DEBUG_SV.log(l_module_name,'Organization id',l_organization_id);
333: WSH_DEBUG_SV.log(l_module_name,'Status_Code',l_status_code);
334: WSH_DEBUG_SV.log(l_module_name,'Planned_Flag',l_planned_flag);
335: WSH_DEBUG_SV.log(l_module_name,'Shipment Direction',l_shipment_direction);
336: WSH_DEBUG_SV.log(l_module_name,'Ignore for Planning',l_ignore);
337: WSH_DEBUG_SV.log(l_module_name,'Tms Interface Flag',l_tms_interface_flag);
338: END IF;
339:
332: WSH_DEBUG_SV.log(l_module_name,'Organization id',l_organization_id);
333: WSH_DEBUG_SV.log(l_module_name,'Status_Code',l_status_code);
334: WSH_DEBUG_SV.log(l_module_name,'Planned_Flag',l_planned_flag);
335: WSH_DEBUG_SV.log(l_module_name,'Shipment Direction',l_shipment_direction);
336: WSH_DEBUG_SV.log(l_module_name,'Ignore for Planning',l_ignore);
337: WSH_DEBUG_SV.log(l_module_name,'Tms Interface Flag',l_tms_interface_flag);
338: END IF;
339:
340:
333: WSH_DEBUG_SV.log(l_module_name,'Status_Code',l_status_code);
334: WSH_DEBUG_SV.log(l_module_name,'Planned_Flag',l_planned_flag);
335: WSH_DEBUG_SV.log(l_module_name,'Shipment Direction',l_shipment_direction);
336: WSH_DEBUG_SV.log(l_module_name,'Ignore for Planning',l_ignore);
337: WSH_DEBUG_SV.log(l_module_name,'Tms Interface Flag',l_tms_interface_flag);
338: END IF;
339:
340:
341: l_dlvy_rec_tab(1).delivery_id := x_action_out_rec.x_delivery_id;
355: x_error_ids => l_error_ids,
356: x_valid_index_tab => l_valid_index_tab);
357:
358: IF l_debug_on THEN
359: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_VALIDATIONS.Is_Action_Enabled l_return_status',l_return_status);
360: END IF;
361:
362: WSH_UTIL_CORE.api_post_call(p_return_status =>l_return_status,
363: x_num_warnings =>l_loop_warnings,
377: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
378: END IF;
379:
380: IF l_debug_on THEN
381: WSH_DEBUG_SV.log(l_module_name,'l_bol_number',l_bol_number);
382: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
383: END IF;
384: WSH_UTIL_CORE.api_post_call(p_return_status =>l_return_status,
385: x_num_warnings =>l_loop_warnings,
378: END IF;
379:
380: IF l_debug_on THEN
381: WSH_DEBUG_SV.log(l_module_name,'l_bol_number',l_bol_number);
382: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
383: END IF;
384: WSH_UTIL_CORE.api_post_call(p_return_status =>l_return_status,
385: x_num_warnings =>l_loop_warnings,
386: x_num_errors =>l_num_errors);
406: p_drop_off_location_Id => p_action_prms.p_Drop_Off_Location_Id,
407: p_carrier_id => p_action_prms.p_Carrier_Id);
408:
409: IF l_debug_on THEN
410: WSH_DEBUG_SV.log(l_module_name,' x_action_out_rec.x_bol_number: '|| x_action_out_rec.x_bol_number);
411: WSH_DEBUG_SV.log(l_module_name,'WSH_BOLS_PVT.Insert_Row l_return_status',l_return_status);
412: END IF;
413: WSH_UTIL_CORE.api_post_call(p_return_status =>l_return_status,
414: x_num_warnings =>l_loop_warnings,
407: p_carrier_id => p_action_prms.p_Carrier_Id);
408:
409: IF l_debug_on THEN
410: WSH_DEBUG_SV.log(l_module_name,' x_action_out_rec.x_bol_number: '|| x_action_out_rec.x_bol_number);
411: WSH_DEBUG_SV.log(l_module_name,'WSH_BOLS_PVT.Insert_Row l_return_status',l_return_status);
412: END IF;
413: WSH_UTIL_CORE.api_post_call(p_return_status =>l_return_status,
414: x_num_warnings =>l_loop_warnings,
415: x_num_errors =>l_num_errors);
438: AND wdi.status <> 'CANCELLED'
439: AND wdl.delivery_leg_id = l_delivery_leg_id;
440:
441: IF l_debug_on THEN
442: wsh_debug_sv.log(l_module_name, 'BOL count for delivery', l_bol_number);
443: wsh_debug_sv.log(l_module_name, 'delivery leg', l_delivery_leg_id);
444: END IF;
445:
446: OPEN get_delivery_info(x_action_out_rec.x_delivery_id);
439: AND wdl.delivery_leg_id = l_delivery_leg_id;
440:
441: IF l_debug_on THEN
442: wsh_debug_sv.log(l_module_name, 'BOL count for delivery', l_bol_number);
443: wsh_debug_sv.log(l_module_name, 'delivery leg', l_delivery_leg_id);
444: END IF;
445:
446: OPEN get_delivery_info(x_action_out_rec.x_delivery_id);
447: FETCH get_delivery_info
455: CLOSE get_delivery_info;
456:
457: --OTM R12, glog proj, add debug
458: IF l_debug_on THEN
459: WSH_DEBUG_SV.log(l_module_name,'Delivery id',x_action_out_rec.x_delivery_id);
460: WSH_DEBUG_SV.log(l_module_name,'Organization id',l_organization_id);
461: WSH_DEBUG_SV.log(l_module_name,'Status_Code',l_status_code);
462: WSH_DEBUG_SV.log(l_module_name,'Planned_Flag',l_planned_flag);
463: WSH_DEBUG_SV.log(l_module_name,'Shipment Direction',l_shipment_direction);
456:
457: --OTM R12, glog proj, add debug
458: IF l_debug_on THEN
459: WSH_DEBUG_SV.log(l_module_name,'Delivery id',x_action_out_rec.x_delivery_id);
460: WSH_DEBUG_SV.log(l_module_name,'Organization id',l_organization_id);
461: WSH_DEBUG_SV.log(l_module_name,'Status_Code',l_status_code);
462: WSH_DEBUG_SV.log(l_module_name,'Planned_Flag',l_planned_flag);
463: WSH_DEBUG_SV.log(l_module_name,'Shipment Direction',l_shipment_direction);
464: WSH_DEBUG_SV.log(l_module_name,'Ignore for Planning',l_ignore);
457: --OTM R12, glog proj, add debug
458: IF l_debug_on THEN
459: WSH_DEBUG_SV.log(l_module_name,'Delivery id',x_action_out_rec.x_delivery_id);
460: WSH_DEBUG_SV.log(l_module_name,'Organization id',l_organization_id);
461: WSH_DEBUG_SV.log(l_module_name,'Status_Code',l_status_code);
462: WSH_DEBUG_SV.log(l_module_name,'Planned_Flag',l_planned_flag);
463: WSH_DEBUG_SV.log(l_module_name,'Shipment Direction',l_shipment_direction);
464: WSH_DEBUG_SV.log(l_module_name,'Ignore for Planning',l_ignore);
465: WSH_DEBUG_SV.log(l_module_name,'Tms Interface Flag',l_tms_interface_flag);
458: IF l_debug_on THEN
459: WSH_DEBUG_SV.log(l_module_name,'Delivery id',x_action_out_rec.x_delivery_id);
460: WSH_DEBUG_SV.log(l_module_name,'Organization id',l_organization_id);
461: WSH_DEBUG_SV.log(l_module_name,'Status_Code',l_status_code);
462: WSH_DEBUG_SV.log(l_module_name,'Planned_Flag',l_planned_flag);
463: WSH_DEBUG_SV.log(l_module_name,'Shipment Direction',l_shipment_direction);
464: WSH_DEBUG_SV.log(l_module_name,'Ignore for Planning',l_ignore);
465: WSH_DEBUG_SV.log(l_module_name,'Tms Interface Flag',l_tms_interface_flag);
466: END IF;
459: WSH_DEBUG_SV.log(l_module_name,'Delivery id',x_action_out_rec.x_delivery_id);
460: WSH_DEBUG_SV.log(l_module_name,'Organization id',l_organization_id);
461: WSH_DEBUG_SV.log(l_module_name,'Status_Code',l_status_code);
462: WSH_DEBUG_SV.log(l_module_name,'Planned_Flag',l_planned_flag);
463: WSH_DEBUG_SV.log(l_module_name,'Shipment Direction',l_shipment_direction);
464: WSH_DEBUG_SV.log(l_module_name,'Ignore for Planning',l_ignore);
465: WSH_DEBUG_SV.log(l_module_name,'Tms Interface Flag',l_tms_interface_flag);
466: END IF;
467:
460: WSH_DEBUG_SV.log(l_module_name,'Organization id',l_organization_id);
461: WSH_DEBUG_SV.log(l_module_name,'Status_Code',l_status_code);
462: WSH_DEBUG_SV.log(l_module_name,'Planned_Flag',l_planned_flag);
463: WSH_DEBUG_SV.log(l_module_name,'Shipment Direction',l_shipment_direction);
464: WSH_DEBUG_SV.log(l_module_name,'Ignore for Planning',l_ignore);
465: WSH_DEBUG_SV.log(l_module_name,'Tms Interface Flag',l_tms_interface_flag);
466: END IF;
467:
468: l_dlvy_rec_tab(1).delivery_id := x_action_out_rec.x_delivery_id;
461: WSH_DEBUG_SV.log(l_module_name,'Status_Code',l_status_code);
462: WSH_DEBUG_SV.log(l_module_name,'Planned_Flag',l_planned_flag);
463: WSH_DEBUG_SV.log(l_module_name,'Shipment Direction',l_shipment_direction);
464: WSH_DEBUG_SV.log(l_module_name,'Ignore for Planning',l_ignore);
465: WSH_DEBUG_SV.log(l_module_name,'Tms Interface Flag',l_tms_interface_flag);
466: END IF;
467:
468: l_dlvy_rec_tab(1).delivery_id := x_action_out_rec.x_delivery_id;
469: l_dlvy_rec_tab(1).organization_id := l_organization_id;
516: IF ( l_doc_set_id IS NOT NULL )
517: THEN
518: l_delivery_id_tab(1) := l_delivery_id;
519: IF l_debug_on THEN
520: wsh_debug_sv.log(l_module_name, 'Calling Print_Document_Sets for delivery', l_delivery_id);
521: END IF;
522:
523: WSH_DOCUMENT_SETS.Print_Document_Sets(
524: p_report_set_id => l_doc_set_id,
576: --
577: -- Debug Statements
578: --
579: IF l_debug_on THEN
580: WSH_DEBUG_SV.logmsg(l_module_name,'DELIVERY_LEG_ACTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
581: END IF;
582: --
583: IF l_debug_on THEN
584: WSH_DEBUG_SV.pop(l_module_name);
580: WSH_DEBUG_SV.logmsg(l_module_name,'DELIVERY_LEG_ACTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
581: END IF;
582: --
583: IF l_debug_on THEN
584: WSH_DEBUG_SV.pop(l_module_name);
585: END IF;
586:
587: RETURN;
588:
686: );
687:
688:
689: IF l_debug_on THEN
690: WSH_DEBUG_SV.pop(l_module_name);
691: END IF;
692:
693: EXCEPTION
694: WHEN RECORD_LOCKED THEN
699: p_count => x_msg_count,
700: p_data => x_msg_data,
701: p_encoded => FND_API.G_FALSE);
702: IF l_debug_on THEN
703: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
704: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
705: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
706: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
707: END IF;
700: p_data => x_msg_data,
701: p_encoded => FND_API.G_FALSE);
702: IF l_debug_on THEN
703: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
704: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
705: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
706: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
707: END IF;
708:
701: p_encoded => FND_API.G_FALSE);
702: IF l_debug_on THEN
703: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
704: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
705: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
706: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
707: END IF;
708:
709:
702: IF l_debug_on THEN
703: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
704: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
705: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
706: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
707: END IF;
708:
709:
710: WHEN FND_API.G_EXC_ERROR THEN
713: p_count => x_msg_count,
714: p_data => x_msg_data,
715: p_encoded => FND_API.G_FALSE);
716: IF l_debug_on THEN
717: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
718: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
719: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
720: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
721: END IF;
714: p_data => x_msg_data,
715: p_encoded => FND_API.G_FALSE);
716: IF l_debug_on THEN
717: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
718: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
719: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
720: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
721: END IF;
722:
715: p_encoded => FND_API.G_FALSE);
716: IF l_debug_on THEN
717: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
718: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
719: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
720: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
721: END IF;
722:
723:
716: IF l_debug_on THEN
717: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
718: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
719: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
720: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
721: END IF;
722:
723:
724: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
727: p_count => x_msg_count,
728: p_data => x_msg_data,
729: p_encoded => FND_API.G_FALSE);
730: IF l_debug_on THEN
731: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
732: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
733: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
734: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
735: END IF;
728: p_data => x_msg_data,
729: p_encoded => FND_API.G_FALSE);
730: IF l_debug_on THEN
731: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
732: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
733: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
734: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
735: END IF;
736:
729: p_encoded => FND_API.G_FALSE);
730: IF l_debug_on THEN
731: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
732: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
733: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
734: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
735: END IF;
736:
737:
730: IF l_debug_on THEN
731: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
732: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
733: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
734: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
735: END IF;
736:
737:
738: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
741: p_count => x_msg_count,
742: p_data => x_msg_data,
743: p_encoded => FND_API.G_FALSE);
744: IF l_debug_on THEN
745: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
746: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
747: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
748: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
749: END IF;
742: p_data => x_msg_data,
743: p_encoded => FND_API.G_FALSE);
744: IF l_debug_on THEN
745: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
746: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
747: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
748: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
749: END IF;
750:
743: p_encoded => FND_API.G_FALSE);
744: IF l_debug_on THEN
745: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
746: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
747: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
748: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
749: END IF;
750:
751:
744: IF l_debug_on THEN
745: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
746: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
747: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
748: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
749: END IF;
750:
751:
752: WHEN OTHERS THEN
756: p_count => x_msg_count,
757: p_data => x_msg_data,
758: p_encoded => FND_API.G_FALSE);
759: IF l_debug_on THEN
760: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
761: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
762: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
763: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
764:
757: p_data => x_msg_data,
758: p_encoded => FND_API.G_FALSE);
759: IF l_debug_on THEN
760: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
761: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
762: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
763: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
764:
765: END IF;
758: p_encoded => FND_API.G_FALSE);
759: IF l_debug_on THEN
760: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
761: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
762: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
763: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
764:
765: END IF;
766:
759: IF l_debug_on THEN
760: WSH_DEBUG_SV.log(l_module_name,'Message Count',x_msg_count);
761: WSH_DEBUG_SV.log(l_module_name,'Message Data', x_msg_data);
762: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
763: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
764:
765: END IF;
766:
767:
827: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
828: --
829: IF l_debug_on IS NULL
830: THEN
831: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
832: END IF;
833: IF l_debug_on THEN
834: WSH_DEBUG_SV.push(l_module_name);
835: END IF;
830: THEN
831: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
832: END IF;
833: IF l_debug_on THEN
834: WSH_DEBUG_SV.push(l_module_name);
835: END IF;
836:
837: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
838:
873: END IF;
874:
875:
876: IF l_debug_on THEN
877: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit Get_Disabled_List',WSH_DEBUG_SV.C_PROC_LEVEL);
878: END IF;
879: Get_Disabled_List(p_del_leg_rec => p_delivery_leg_tab(l_index),
880: p_action => 'UPDATE',
881: x_del_leg_rec => l_delivery_leg_rec,
883:
884:
885: IF x_return_status in (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
886: IF l_debug_on THEN
887: WSH_DEBUG_SV.pop(l_module_name);
888: END IF;
889:
890: RETURN;
891:
891:
892: END IF;
893:
894: IF l_debug_on THEN
895: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_PVT.Update_Delivery_Leg',WSH_DEBUG_SV.C_PROC_LEVEL);
896: END IF;
897: WSH_DELIVERY_LEGS_PVT.Update_Delivery_Leg(
898: p_rowid => NULL,
899: p_delivery_leg_info => l_delivery_leg_rec,
899: p_delivery_leg_info => l_delivery_leg_rec,
900: x_return_status => l_return_status);
901:
902: IF l_debug_on THEN
903: WSH_DEBUG_SV.log(l_module_name,'Update_Delivery_Leg x_return_status',l_return_status);
904: END IF;
905: WSH_UTIL_CORE.api_post_call(
906: p_return_status => l_return_status,
907: x_num_warnings => l_num_warnings,
915:
916: END IF;
917:
918: IF l_debug_on THEN
919: WSH_DEBUG_SV.pop(l_module_name);
920: END IF;
921:
922:
923: EXCEPTION
926: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
927: FND_MESSAGE.Set_Name('WSH', 'WSH_NO_LOCK');
928: wsh_util_core.add_message(x_return_status,l_module_name);
929: IF l_debug_on THEN
930: wsh_debug_sv.log(l_module_name, 'Could not lock delivery', l_delivery_id);
931: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
932: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
933: END IF;
934: --
927: FND_MESSAGE.Set_Name('WSH', 'WSH_NO_LOCK');
928: wsh_util_core.add_message(x_return_status,l_module_name);
929: IF l_debug_on THEN
930: wsh_debug_sv.log(l_module_name, 'Could not lock delivery', l_delivery_id);
931: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
932: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
933: END IF;
934: --
935:
928: wsh_util_core.add_message(x_return_status,l_module_name);
929: IF l_debug_on THEN
930: wsh_debug_sv.log(l_module_name, 'Could not lock delivery', l_delivery_id);
931: WSH_DEBUG_SV.logmsg(l_module_name,'APP_EXCEPTION.APPLICATION_EXCEPTION exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
932: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:APP_EXCEPTION.APPLICATION_EXCEPTION');
933: END IF;
934: --
935:
936: WHEN others THEN
941: wsh_util_core.default_handler('WSH_DELIVERY_LEGS_GRP.Update_Delivery_Leg',l_module_name);
942: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
943: --
944: IF l_debug_on THEN
945: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
946: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
947: END IF;
948:
949: END Update_Delivery_Leg;
942: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
943: --
944: IF l_debug_on THEN
945: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
946: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
947: END IF;
948:
949: END Update_Delivery_Leg;
950:
1041: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1042: --
1043: IF l_debug_on IS NULL
1044: THEN
1045: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1046: END IF;
1047: IF l_debug_on THEN
1048: WSH_DEBUG_SV.push(l_module_name);
1049: END IF;
1044: THEN
1045: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1046: END IF;
1047: IF l_debug_on THEN
1048: WSH_DEBUG_SV.push(l_module_name);
1049: END IF;
1050:
1051: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1052:
1393:
1394: x_del_leg_rec := l_dleg_rec;
1395:
1396: IF l_debug_on THEN
1397: WSH_DEBUG_SV.pop(l_module_name);
1398: END IF;
1399:
1400: EXCEPTION
1401:
1406: IF c_get_leg_record%isopen THEN
1407: CLOSE c_get_leg_record;
1408: END IF;
1409: IF l_debug_on THEN
1410: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1411: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1412: END IF;
1413:
1414: END get_disabled_list;
1407: CLOSE c_get_leg_record;
1408: END IF;
1409: IF l_debug_on THEN
1410: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1411: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1412: END IF;
1413:
1414: END get_disabled_list;
1415: