99: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
100: --
101: IF l_debug_on IS NULL
102: THEN
103: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
104: END IF;
105: --
106: IF l_debug_on THEN
107: WSH_DEBUG_SV.push(l_module_name);
103: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
104: END IF;
105: --
106: IF l_debug_on THEN
107: WSH_DEBUG_SV.push(l_module_name);
108: --
109: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION',P_API_VERSION);
110: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
111: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
105: --
106: IF l_debug_on THEN
107: WSH_DEBUG_SV.push(l_module_name);
108: --
109: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION',P_API_VERSION);
110: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
111: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
112: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATION_LEVEL',P_VALIDATION_LEVEL);
113: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
106: IF l_debug_on THEN
107: WSH_DEBUG_SV.push(l_module_name);
108: --
109: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION',P_API_VERSION);
110: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
111: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
112: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATION_LEVEL',P_VALIDATION_LEVEL);
113: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
114: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
107: WSH_DEBUG_SV.push(l_module_name);
108: --
109: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION',P_API_VERSION);
110: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
111: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
112: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATION_LEVEL',P_VALIDATION_LEVEL);
113: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
114: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
115: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
108: --
109: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION',P_API_VERSION);
110: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
111: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
112: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATION_LEVEL',P_VALIDATION_LEVEL);
113: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
114: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
115: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
116: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
109: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION',P_API_VERSION);
110: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
111: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
112: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATION_LEVEL',P_VALIDATION_LEVEL);
113: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
114: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
115: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
116: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
117: WSH_DEBUG_SV.log(l_module_name,'P_CONSOLIDATE_OPTION',P_CONSOLIDATE_OPTION);
110: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
111: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
112: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATION_LEVEL',P_VALIDATION_LEVEL);
113: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
114: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
115: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
116: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
117: WSH_DEBUG_SV.log(l_module_name,'P_CONSOLIDATE_OPTION',P_CONSOLIDATE_OPTION);
118: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
111: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
112: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATION_LEVEL',P_VALIDATION_LEVEL);
113: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
114: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
115: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
116: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
117: WSH_DEBUG_SV.log(l_module_name,'P_CONSOLIDATE_OPTION',P_CONSOLIDATE_OPTION);
118: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
119: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
112: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATION_LEVEL',P_VALIDATION_LEVEL);
113: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
114: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
115: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
116: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
117: WSH_DEBUG_SV.log(l_module_name,'P_CONSOLIDATE_OPTION',P_CONSOLIDATE_OPTION);
118: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
119: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
120: WSH_DEBUG_SV.log(l_module_name,'P_PICK_UP_LOCATION_ID',P_PICK_UP_LOCATION_ID);
113: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
114: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
115: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
116: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
117: WSH_DEBUG_SV.log(l_module_name,'P_CONSOLIDATE_OPTION',P_CONSOLIDATE_OPTION);
118: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
119: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
120: WSH_DEBUG_SV.log(l_module_name,'P_PICK_UP_LOCATION_ID',P_PICK_UP_LOCATION_ID);
121: WSH_DEBUG_SV.log(l_module_name,'P_DROP_OFF_LOCATION_ID',P_DROP_OFF_LOCATION_ID);
114: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
115: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
116: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
117: WSH_DEBUG_SV.log(l_module_name,'P_CONSOLIDATE_OPTION',P_CONSOLIDATE_OPTION);
118: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
119: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
120: WSH_DEBUG_SV.log(l_module_name,'P_PICK_UP_LOCATION_ID',P_PICK_UP_LOCATION_ID);
121: WSH_DEBUG_SV.log(l_module_name,'P_DROP_OFF_LOCATION_ID',P_DROP_OFF_LOCATION_ID);
122: WSH_DEBUG_SV.log(l_module_name,'P_CARRIER_ID',P_CARRIER_ID);
115: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
116: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
117: WSH_DEBUG_SV.log(l_module_name,'P_CONSOLIDATE_OPTION',P_CONSOLIDATE_OPTION);
118: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
119: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
120: WSH_DEBUG_SV.log(l_module_name,'P_PICK_UP_LOCATION_ID',P_PICK_UP_LOCATION_ID);
121: WSH_DEBUG_SV.log(l_module_name,'P_DROP_OFF_LOCATION_ID',P_DROP_OFF_LOCATION_ID);
122: WSH_DEBUG_SV.log(l_module_name,'P_CARRIER_ID',P_CARRIER_ID);
123: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
116: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
117: WSH_DEBUG_SV.log(l_module_name,'P_CONSOLIDATE_OPTION',P_CONSOLIDATE_OPTION);
118: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
119: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
120: WSH_DEBUG_SV.log(l_module_name,'P_PICK_UP_LOCATION_ID',P_PICK_UP_LOCATION_ID);
121: WSH_DEBUG_SV.log(l_module_name,'P_DROP_OFF_LOCATION_ID',P_DROP_OFF_LOCATION_ID);
122: WSH_DEBUG_SV.log(l_module_name,'P_CARRIER_ID',P_CARRIER_ID);
123: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
124: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
117: WSH_DEBUG_SV.log(l_module_name,'P_CONSOLIDATE_OPTION',P_CONSOLIDATE_OPTION);
118: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
119: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
120: WSH_DEBUG_SV.log(l_module_name,'P_PICK_UP_LOCATION_ID',P_PICK_UP_LOCATION_ID);
121: WSH_DEBUG_SV.log(l_module_name,'P_DROP_OFF_LOCATION_ID',P_DROP_OFF_LOCATION_ID);
122: WSH_DEBUG_SV.log(l_module_name,'P_CARRIER_ID',P_CARRIER_ID);
123: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
124: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
125: WSH_DEBUG_SV.log(l_module_name,'X_DOCUMENT_NUMBER',X_DOCUMENT_NUMBER);
118: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
119: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
120: WSH_DEBUG_SV.log(l_module_name,'P_PICK_UP_LOCATION_ID',P_PICK_UP_LOCATION_ID);
121: WSH_DEBUG_SV.log(l_module_name,'P_DROP_OFF_LOCATION_ID',P_DROP_OFF_LOCATION_ID);
122: WSH_DEBUG_SV.log(l_module_name,'P_CARRIER_ID',P_CARRIER_ID);
123: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
124: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
125: WSH_DEBUG_SV.log(l_module_name,'X_DOCUMENT_NUMBER',X_DOCUMENT_NUMBER);
126: END IF;
119: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
120: WSH_DEBUG_SV.log(l_module_name,'P_PICK_UP_LOCATION_ID',P_PICK_UP_LOCATION_ID);
121: WSH_DEBUG_SV.log(l_module_name,'P_DROP_OFF_LOCATION_ID',P_DROP_OFF_LOCATION_ID);
122: WSH_DEBUG_SV.log(l_module_name,'P_CARRIER_ID',P_CARRIER_ID);
123: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
124: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
125: WSH_DEBUG_SV.log(l_module_name,'X_DOCUMENT_NUMBER',X_DOCUMENT_NUMBER);
126: END IF;
127: --
120: WSH_DEBUG_SV.log(l_module_name,'P_PICK_UP_LOCATION_ID',P_PICK_UP_LOCATION_ID);
121: WSH_DEBUG_SV.log(l_module_name,'P_DROP_OFF_LOCATION_ID',P_DROP_OFF_LOCATION_ID);
122: WSH_DEBUG_SV.log(l_module_name,'P_CARRIER_ID',P_CARRIER_ID);
123: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
124: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
125: WSH_DEBUG_SV.log(l_module_name,'X_DOCUMENT_NUMBER',X_DOCUMENT_NUMBER);
126: END IF;
127: --
128:
121: WSH_DEBUG_SV.log(l_module_name,'P_DROP_OFF_LOCATION_ID',P_DROP_OFF_LOCATION_ID);
122: WSH_DEBUG_SV.log(l_module_name,'P_CARRIER_ID',P_CARRIER_ID);
123: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD',P_SHIP_METHOD);
124: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
125: WSH_DEBUG_SV.log(l_module_name,'X_DOCUMENT_NUMBER',X_DOCUMENT_NUMBER);
126: END IF;
127: --
128:
129: SELECT to_number(HOI.ORG_INFORMATION1) INTO l_ledger_id -- LE Uptake
133: AND HOI.ORG_INFORMATION_CONTEXT = 'Accounting Information'
134: AND wnd.delivery_id = p_delivery_id;
135:
136: IF l_debug_on THEN
137: WSH_DEBUG_SV.log(l_module_name,'l_ledger_id',l_ledger_id); -- LE Uptake
138: END IF;
139:
140:
141: SAVEPOINT sp1;
145: --
146: -- Debug Statements
147: --
148: IF l_debug_on THEN
149: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_Document_PVT.CREATE_DOCUMENT',WSH_DEBUG_SV.C_PROC_LEVEL);
150: END IF;
151: --
152: WSH_Document_PVT.create_document
153: ( 1.0,
180: --
181: -- Debug Statements
182: --
183: IF l_debug_on THEN
184: WSH_DEBUG_SV.log(l_module_name,'x_document_number',x_document_number);
185: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_Document_PVT.UPDATE_DOCUMENT',WSH_DEBUG_SV.C_PROC_LEVEL);
186: END IF;
187: --
188: WSH_Document_PVT.update_document
181: -- Debug Statements
182: --
183: IF l_debug_on THEN
184: WSH_DEBUG_SV.log(l_module_name,'x_document_number',x_document_number);
185: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_Document_PVT.UPDATE_DOCUMENT',WSH_DEBUG_SV.C_PROC_LEVEL);
186: END IF;
187: --
188: WSH_Document_PVT.update_document
189: ( p_api_version
207: --
208: -- Debug Statements
209: --
210: IF l_debug_on THEN
211: WSH_DEBUG_SV.pop(l_module_name);
212: END IF;
213: --
214: EXCEPTION
215: WHEN wsh_create_trip_error THEN
215: WHEN wsh_create_trip_error THEN
216: ROLLBACK TO sp1;
217: x_return_status := wsh_util_core.g_ret_sts_error;
218: IF l_debug_on THEN
219: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_CREATE_TRIP_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
220: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_CREATE_TRIP_ERROR');
221: END IF;
222: --
223: WHEN wsh_populate_trip_error THEN
216: ROLLBACK TO sp1;
217: x_return_status := wsh_util_core.g_ret_sts_error;
218: IF l_debug_on THEN
219: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_CREATE_TRIP_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
220: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_CREATE_TRIP_ERROR');
221: END IF;
222: --
223: WHEN wsh_populate_trip_error THEN
224: ROLLBACK TO sp1;
224: ROLLBACK TO sp1;
225: x_return_status := wsh_util_core.g_ret_sts_error;
226: --
227: IF l_debug_on THEN
228: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_POPULATE_TRIP_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
229: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_POPULATE_TRIP_ERROR');
230: END IF;
231: --
232: WHEN wsh_update_trip_error THEN
225: x_return_status := wsh_util_core.g_ret_sts_error;
226: --
227: IF l_debug_on THEN
228: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_POPULATE_TRIP_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
229: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_POPULATE_TRIP_ERROR');
230: END IF;
231: --
232: WHEN wsh_update_trip_error THEN
233: ROLLBACK TO sp1;
233: ROLLBACK TO sp1;
234: x_return_status := wsh_util_core.g_ret_sts_error;
235: --
236: IF l_debug_on THEN
237: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UPDATE_TRIP_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
238: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UPDATE_TRIP_ERROR');
239: END IF;
240: --
241: WHEN wsh_assign_delivery_error THEN
234: x_return_status := wsh_util_core.g_ret_sts_error;
235: --
236: IF l_debug_on THEN
237: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UPDATE_TRIP_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
238: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UPDATE_TRIP_ERROR');
239: END IF;
240: --
241: WHEN wsh_assign_delivery_error THEN
242: ROLLBACK TO sp1;
242: ROLLBACK TO sp1;
243: x_return_status := wsh_util_core.g_ret_sts_error;
244: --
245: IF l_debug_on THEN
246: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_ASSIGN_DELIVERY_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
247: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_ASSIGN_DELIVERY_ERROR');
248: END IF;
249: --
250: WHEN wsh_populate_leg_error THEN
243: x_return_status := wsh_util_core.g_ret_sts_error;
244: --
245: IF l_debug_on THEN
246: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_ASSIGN_DELIVERY_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
247: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_ASSIGN_DELIVERY_ERROR');
248: END IF;
249: --
250: WHEN wsh_populate_leg_error THEN
251: ROLLBACK TO sp1;
251: ROLLBACK TO sp1;
252: x_return_status := wsh_util_core.g_ret_sts_error;
253: --
254: IF l_debug_on THEN
255: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_POPULATE_LEG_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
256: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_POPULATE_LEG_ERROR');
257: END IF;
258: --
259: WHEN wsh_delete_leg_error THEN
252: x_return_status := wsh_util_core.g_ret_sts_error;
253: --
254: IF l_debug_on THEN
255: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_POPULATE_LEG_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
256: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_POPULATE_LEG_ERROR');
257: END IF;
258: --
259: WHEN wsh_delete_leg_error THEN
260: ROLLBACK TO sp1;
260: ROLLBACK TO sp1;
261: x_return_status := wsh_util_core.g_ret_sts_error;
262: --
263: IF l_debug_on THEN
264: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DELETE_LEG_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
265: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DELETE_LEG_ERROR');
266: END IF;
267: --
268: WHEN wsh_update_leg_error THEN
261: x_return_status := wsh_util_core.g_ret_sts_error;
262: --
263: IF l_debug_on THEN
264: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DELETE_LEG_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
265: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DELETE_LEG_ERROR');
266: END IF;
267: --
268: WHEN wsh_update_leg_error THEN
269: ROLLBACK TO sp1;
269: ROLLBACK TO sp1;
270: x_return_status := wsh_util_core.g_ret_sts_error;
271: --
272: IF l_debug_on THEN
273: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UPDATE_LEG_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
274: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UPDATE_LEG_ERROR');
275: END IF;
276: --
277: WHEN wsh_create_document_error THEN
270: x_return_status := wsh_util_core.g_ret_sts_error;
271: --
272: IF l_debug_on THEN
273: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UPDATE_LEG_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
274: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UPDATE_LEG_ERROR');
275: END IF;
276: --
277: WHEN wsh_create_document_error THEN
278: ROLLBACK TO sp1;
278: ROLLBACK TO sp1;
279: x_return_status := wsh_util_core.g_ret_sts_error;
280: --
281: IF l_debug_on THEN
282: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_CREATE_DOCUMENT_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
283: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_CREATE_DOCUMENT_ERROR');
284: END IF;
285: --
286: WHEN wsh_update_document_error THEN
279: x_return_status := wsh_util_core.g_ret_sts_error;
280: --
281: IF l_debug_on THEN
282: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_CREATE_DOCUMENT_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
283: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_CREATE_DOCUMENT_ERROR');
284: END IF;
285: --
286: WHEN wsh_update_document_error THEN
287: ROLLBACK TO sp1;
287: ROLLBACK TO sp1;
288: x_return_status := wsh_util_core.g_ret_sts_error;
289: --
290: IF l_debug_on THEN
291: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UPDATE_DOCUMENT_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
292: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UPDATE_DOCUMENT_ERROR');
293: END IF;
294: --
295: WHEN OTHERS THEN
288: x_return_status := wsh_util_core.g_ret_sts_error;
289: --
290: IF l_debug_on THEN
291: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UPDATE_DOCUMENT_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
292: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UPDATE_DOCUMENT_ERROR');
293: END IF;
294: --
295: WHEN OTHERS THEN
296: ROLLBACK TO sp1;
296: ROLLBACK TO sp1;
297: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
298: --
299: IF l_debug_on THEN
300: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
301: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
302: END IF;
303: --
304: END Update_Row;
297: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
298: --
299: IF l_debug_on THEN
300: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
301: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
302: END IF;
303: --
304: END Update_Row;
305:
348: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
349: --
350: IF l_debug_on IS NULL
351: THEN
352: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
353: END IF;
354: --
355: IF l_debug_on THEN
356: WSH_DEBUG_SV.push(l_module_name);
352: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
353: END IF;
354: --
355: IF l_debug_on THEN
356: WSH_DEBUG_SV.push(l_module_name);
357: --
358: WSH_DEBUG_SV.log(l_module_name,'X_RETURN_STATUS',X_RETURN_STATUS);
359: WSH_DEBUG_SV.log(l_module_name,'X_MSG_COUNT',X_MSG_COUNT);
360: WSH_DEBUG_SV.log(l_module_name,'X_MSG_DATA',X_MSG_DATA);
354: --
355: IF l_debug_on THEN
356: WSH_DEBUG_SV.push(l_module_name);
357: --
358: WSH_DEBUG_SV.log(l_module_name,'X_RETURN_STATUS',X_RETURN_STATUS);
359: WSH_DEBUG_SV.log(l_module_name,'X_MSG_COUNT',X_MSG_COUNT);
360: WSH_DEBUG_SV.log(l_module_name,'X_MSG_DATA',X_MSG_DATA);
361: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
362: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
355: IF l_debug_on THEN
356: WSH_DEBUG_SV.push(l_module_name);
357: --
358: WSH_DEBUG_SV.log(l_module_name,'X_RETURN_STATUS',X_RETURN_STATUS);
359: WSH_DEBUG_SV.log(l_module_name,'X_MSG_COUNT',X_MSG_COUNT);
360: WSH_DEBUG_SV.log(l_module_name,'X_MSG_DATA',X_MSG_DATA);
361: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
362: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
363: WSH_DEBUG_SV.log(l_module_name,'P_APPLICATION_ID',P_APPLICATION_ID);
356: WSH_DEBUG_SV.push(l_module_name);
357: --
358: WSH_DEBUG_SV.log(l_module_name,'X_RETURN_STATUS',X_RETURN_STATUS);
359: WSH_DEBUG_SV.log(l_module_name,'X_MSG_COUNT',X_MSG_COUNT);
360: WSH_DEBUG_SV.log(l_module_name,'X_MSG_DATA',X_MSG_DATA);
361: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
362: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
363: WSH_DEBUG_SV.log(l_module_name,'P_APPLICATION_ID',P_APPLICATION_ID);
364: WSH_DEBUG_SV.log(l_module_name,'P_LOCATION_ID',P_LOCATION_ID);
357: --
358: WSH_DEBUG_SV.log(l_module_name,'X_RETURN_STATUS',X_RETURN_STATUS);
359: WSH_DEBUG_SV.log(l_module_name,'X_MSG_COUNT',X_MSG_COUNT);
360: WSH_DEBUG_SV.log(l_module_name,'X_MSG_DATA',X_MSG_DATA);
361: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
362: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
363: WSH_DEBUG_SV.log(l_module_name,'P_APPLICATION_ID',P_APPLICATION_ID);
364: WSH_DEBUG_SV.log(l_module_name,'P_LOCATION_ID',P_LOCATION_ID);
365: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
358: WSH_DEBUG_SV.log(l_module_name,'X_RETURN_STATUS',X_RETURN_STATUS);
359: WSH_DEBUG_SV.log(l_module_name,'X_MSG_COUNT',X_MSG_COUNT);
360: WSH_DEBUG_SV.log(l_module_name,'X_MSG_DATA',X_MSG_DATA);
361: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
362: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
363: WSH_DEBUG_SV.log(l_module_name,'P_APPLICATION_ID',P_APPLICATION_ID);
364: WSH_DEBUG_SV.log(l_module_name,'P_LOCATION_ID',P_LOCATION_ID);
365: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
366: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_SUB_TYPE',P_DOCUMENT_SUB_TYPE);
359: WSH_DEBUG_SV.log(l_module_name,'X_MSG_COUNT',X_MSG_COUNT);
360: WSH_DEBUG_SV.log(l_module_name,'X_MSG_DATA',X_MSG_DATA);
361: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
362: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
363: WSH_DEBUG_SV.log(l_module_name,'P_APPLICATION_ID',P_APPLICATION_ID);
364: WSH_DEBUG_SV.log(l_module_name,'P_LOCATION_ID',P_LOCATION_ID);
365: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
366: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_SUB_TYPE',P_DOCUMENT_SUB_TYPE);
367: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
360: WSH_DEBUG_SV.log(l_module_name,'X_MSG_DATA',X_MSG_DATA);
361: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
362: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
363: WSH_DEBUG_SV.log(l_module_name,'P_APPLICATION_ID',P_APPLICATION_ID);
364: WSH_DEBUG_SV.log(l_module_name,'P_LOCATION_ID',P_LOCATION_ID);
365: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
366: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_SUB_TYPE',P_DOCUMENT_SUB_TYPE);
367: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
368: WSH_DEBUG_SV.log(l_module_name,'X_DOCUMENT_NUMBER',X_DOCUMENT_NUMBER);
361: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_NAME',P_ENTITY_NAME);
362: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
363: WSH_DEBUG_SV.log(l_module_name,'P_APPLICATION_ID',P_APPLICATION_ID);
364: WSH_DEBUG_SV.log(l_module_name,'P_LOCATION_ID',P_LOCATION_ID);
365: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
366: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_SUB_TYPE',P_DOCUMENT_SUB_TYPE);
367: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
368: WSH_DEBUG_SV.log(l_module_name,'X_DOCUMENT_NUMBER',X_DOCUMENT_NUMBER);
369: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
362: WSH_DEBUG_SV.log(l_module_name,'X_ENTITY_ID',X_ENTITY_ID);
363: WSH_DEBUG_SV.log(l_module_name,'P_APPLICATION_ID',P_APPLICATION_ID);
364: WSH_DEBUG_SV.log(l_module_name,'P_LOCATION_ID',P_LOCATION_ID);
365: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
366: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_SUB_TYPE',P_DOCUMENT_SUB_TYPE);
367: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
368: WSH_DEBUG_SV.log(l_module_name,'X_DOCUMENT_NUMBER',X_DOCUMENT_NUMBER);
369: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
370: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
363: WSH_DEBUG_SV.log(l_module_name,'P_APPLICATION_ID',P_APPLICATION_ID);
364: WSH_DEBUG_SV.log(l_module_name,'P_LOCATION_ID',P_LOCATION_ID);
365: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
366: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_SUB_TYPE',P_DOCUMENT_SUB_TYPE);
367: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
368: WSH_DEBUG_SV.log(l_module_name,'X_DOCUMENT_NUMBER',X_DOCUMENT_NUMBER);
369: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
370: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
371: WSH_DEBUG_SV.log(l_module_name,'X_DELIVERY_ID',X_DELIVERY_ID);
364: WSH_DEBUG_SV.log(l_module_name,'P_LOCATION_ID',P_LOCATION_ID);
365: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
366: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_SUB_TYPE',P_DOCUMENT_SUB_TYPE);
367: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
368: WSH_DEBUG_SV.log(l_module_name,'X_DOCUMENT_NUMBER',X_DOCUMENT_NUMBER);
369: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
370: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
371: WSH_DEBUG_SV.log(l_module_name,'X_DELIVERY_ID',X_DELIVERY_ID);
372: WSH_DEBUG_SV.log(l_module_name,'P_PICK_UP_LOCATION_ID',P_PICK_UP_LOCATION_ID);
365: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
366: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_SUB_TYPE',P_DOCUMENT_SUB_TYPE);
367: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
368: WSH_DEBUG_SV.log(l_module_name,'X_DOCUMENT_NUMBER',X_DOCUMENT_NUMBER);
369: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
370: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
371: WSH_DEBUG_SV.log(l_module_name,'X_DELIVERY_ID',X_DELIVERY_ID);
372: WSH_DEBUG_SV.log(l_module_name,'P_PICK_UP_LOCATION_ID',P_PICK_UP_LOCATION_ID);
373: WSH_DEBUG_SV.log(l_module_name,'P_DROP_OFF_LOCATION_ID',P_DROP_OFF_LOCATION_ID);
366: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_SUB_TYPE',P_DOCUMENT_SUB_TYPE);
367: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
368: WSH_DEBUG_SV.log(l_module_name,'X_DOCUMENT_NUMBER',X_DOCUMENT_NUMBER);
369: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
370: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
371: WSH_DEBUG_SV.log(l_module_name,'X_DELIVERY_ID',X_DELIVERY_ID);
372: WSH_DEBUG_SV.log(l_module_name,'P_PICK_UP_LOCATION_ID',P_PICK_UP_LOCATION_ID);
373: WSH_DEBUG_SV.log(l_module_name,'P_DROP_OFF_LOCATION_ID',P_DROP_OFF_LOCATION_ID);
374: WSH_DEBUG_SV.log(l_module_name,'P_CARRIER_ID',P_CARRIER_ID);
367: -- WSH_DEBUG_SV.log(l_module_name,'P_LEDGER_ID',P_LEDGER_ID); -- LE Uptake
368: WSH_DEBUG_SV.log(l_module_name,'X_DOCUMENT_NUMBER',X_DOCUMENT_NUMBER);
369: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
370: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
371: WSH_DEBUG_SV.log(l_module_name,'X_DELIVERY_ID',X_DELIVERY_ID);
372: WSH_DEBUG_SV.log(l_module_name,'P_PICK_UP_LOCATION_ID',P_PICK_UP_LOCATION_ID);
373: WSH_DEBUG_SV.log(l_module_name,'P_DROP_OFF_LOCATION_ID',P_DROP_OFF_LOCATION_ID);
374: WSH_DEBUG_SV.log(l_module_name,'P_CARRIER_ID',P_CARRIER_ID);
375: END IF;
368: WSH_DEBUG_SV.log(l_module_name,'X_DOCUMENT_NUMBER',X_DOCUMENT_NUMBER);
369: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
370: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
371: WSH_DEBUG_SV.log(l_module_name,'X_DELIVERY_ID',X_DELIVERY_ID);
372: WSH_DEBUG_SV.log(l_module_name,'P_PICK_UP_LOCATION_ID',P_PICK_UP_LOCATION_ID);
373: WSH_DEBUG_SV.log(l_module_name,'P_DROP_OFF_LOCATION_ID',P_DROP_OFF_LOCATION_ID);
374: WSH_DEBUG_SV.log(l_module_name,'P_CARRIER_ID',P_CARRIER_ID);
375: END IF;
376: --
369: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_ID',X_TRIP_ID);
370: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
371: WSH_DEBUG_SV.log(l_module_name,'X_DELIVERY_ID',X_DELIVERY_ID);
372: WSH_DEBUG_SV.log(l_module_name,'P_PICK_UP_LOCATION_ID',P_PICK_UP_LOCATION_ID);
373: WSH_DEBUG_SV.log(l_module_name,'P_DROP_OFF_LOCATION_ID',P_DROP_OFF_LOCATION_ID);
374: WSH_DEBUG_SV.log(l_module_name,'P_CARRIER_ID',P_CARRIER_ID);
375: END IF;
376: --
377: SAVEPOINT sp1;
370: WSH_DEBUG_SV.log(l_module_name,'X_TRIP_NAME',X_TRIP_NAME);
371: WSH_DEBUG_SV.log(l_module_name,'X_DELIVERY_ID',X_DELIVERY_ID);
372: WSH_DEBUG_SV.log(l_module_name,'P_PICK_UP_LOCATION_ID',P_PICK_UP_LOCATION_ID);
373: WSH_DEBUG_SV.log(l_module_name,'P_DROP_OFF_LOCATION_ID',P_DROP_OFF_LOCATION_ID);
374: WSH_DEBUG_SV.log(l_module_name,'P_CARRIER_ID',P_CARRIER_ID);
375: END IF;
376: --
377: SAVEPOINT sp1;
378:
386: AND wnd.delivery_id = x_delivery_id;
387:
388: --
389: IF l_debug_on THEN
390: WSH_DEBUG_SV.log(l_module_name,'l_ledger_id',l_ledger_id); -- LE Uptake
391: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_Document_PVT.CREATE_DOCUMENT',WSH_DEBUG_SV.C_PROC_LEVEL);
392: END IF;
393: --
394: WSH_Document_PVT.create_document
387:
388: --
389: IF l_debug_on THEN
390: WSH_DEBUG_SV.log(l_module_name,'l_ledger_id',l_ledger_id); -- LE Uptake
391: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_Document_PVT.CREATE_DOCUMENT',WSH_DEBUG_SV.C_PROC_LEVEL);
392: END IF;
393: --
394: WSH_Document_PVT.create_document
395: ( 1.0,
418: END IF;
419:
420: --
421: IF l_debug_on THEN
422: WSH_DEBUG_SV.log(l_module_name,'x_document_number',x_document_number);
423: WSH_DEBUG_SV.pop(l_module_name);
424: END IF;
425: --
426: EXCEPTION
419:
420: --
421: IF l_debug_on THEN
422: WSH_DEBUG_SV.log(l_module_name,'x_document_number',x_document_number);
423: WSH_DEBUG_SV.pop(l_module_name);
424: END IF;
425: --
426: EXCEPTION
427: WHEN wsh_create_trip_error THEN
428: ROLLBACK TO sp1;
429: x_return_status := wsh_util_core.g_ret_sts_error;
430: --
431: IF l_debug_on THEN
432: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_CREATE_TRIP_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
433: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_CREATE_TRIP_ERROR');
434: END IF;
435: --
436: WHEN wsh_populate_trip_error THEN
429: x_return_status := wsh_util_core.g_ret_sts_error;
430: --
431: IF l_debug_on THEN
432: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_CREATE_TRIP_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
433: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_CREATE_TRIP_ERROR');
434: END IF;
435: --
436: WHEN wsh_populate_trip_error THEN
437: ROLLBACK TO sp1;
437: ROLLBACK TO sp1;
438: x_return_status := wsh_util_core.g_ret_sts_error;
439: --
440: IF l_debug_on THEN
441: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_POPULATE_TRIP_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
442: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_POPULATE_TRIP_ERROR');
443: END IF;
444: --
445: WHEN wsh_update_trip_error THEN
438: x_return_status := wsh_util_core.g_ret_sts_error;
439: --
440: IF l_debug_on THEN
441: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_POPULATE_TRIP_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
442: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_POPULATE_TRIP_ERROR');
443: END IF;
444: --
445: WHEN wsh_update_trip_error THEN
446: ROLLBACK TO sp1;
446: ROLLBACK TO sp1;
447: x_return_status := wsh_util_core.g_ret_sts_error;
448: --
449: IF l_debug_on THEN
450: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UPDATE_TRIP_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
451: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UPDATE_TRIP_ERROR');
452: END IF;
453: --
454: WHEN wsh_assign_delivery_error THEN
447: x_return_status := wsh_util_core.g_ret_sts_error;
448: --
449: IF l_debug_on THEN
450: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UPDATE_TRIP_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
451: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UPDATE_TRIP_ERROR');
452: END IF;
453: --
454: WHEN wsh_assign_delivery_error THEN
455: ROLLBACK TO sp1;
455: ROLLBACK TO sp1;
456: x_return_status := wsh_util_core.g_ret_sts_error;
457: --
458: IF l_debug_on THEN
459: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_ASSIGN_DELIVERY_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
460: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_ASSIGN_DELIVERY_ERROR');
461: END IF;
462: --
463: WHEN wsh_create_document_error THEN
456: x_return_status := wsh_util_core.g_ret_sts_error;
457: --
458: IF l_debug_on THEN
459: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_ASSIGN_DELIVERY_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
460: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_ASSIGN_DELIVERY_ERROR');
461: END IF;
462: --
463: WHEN wsh_create_document_error THEN
464: ROLLBACK TO sp1;
464: ROLLBACK TO sp1;
465: x_return_status := wsh_util_core.g_ret_sts_error;
466: --
467: IF l_debug_on THEN
468: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_CREATE_DOCUMENT_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
469: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_CREATE_DOCUMENT_ERROR');
470: END IF;
471: --
472: WHEN OTHERS THEN
465: x_return_status := wsh_util_core.g_ret_sts_error;
466: --
467: IF l_debug_on THEN
468: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_CREATE_DOCUMENT_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
469: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_CREATE_DOCUMENT_ERROR');
470: END IF;
471: --
472: WHEN OTHERS THEN
473: ROLLBACK TO sp1;
473: ROLLBACK TO sp1;
474: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
475: --
476: IF l_debug_on THEN
477: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
478: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
479: END IF;
480: --
481: END Insert_Row;
474: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
475: --
476: IF l_debug_on THEN
477: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
478: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
479: END IF;
480: --
481: END Insert_Row;
482:
511: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
512: --
513: IF l_debug_on IS NULL
514: THEN
515: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
516: END IF;
517: --
518: IF l_debug_on THEN
519: WSH_DEBUG_SV.push(l_module_name);
515: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
516: END IF;
517: --
518: IF l_debug_on THEN
519: WSH_DEBUG_SV.push(l_module_name);
520: --
521: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION',P_API_VERSION);
522: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
523: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
517: --
518: IF l_debug_on THEN
519: WSH_DEBUG_SV.push(l_module_name);
520: --
521: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION',P_API_VERSION);
522: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
523: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
524: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATION_LEVEL',P_VALIDATION_LEVEL);
525: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
518: IF l_debug_on THEN
519: WSH_DEBUG_SV.push(l_module_name);
520: --
521: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION',P_API_VERSION);
522: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
523: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
524: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATION_LEVEL',P_VALIDATION_LEVEL);
525: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
526: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
519: WSH_DEBUG_SV.push(l_module_name);
520: --
521: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION',P_API_VERSION);
522: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
523: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
524: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATION_LEVEL',P_VALIDATION_LEVEL);
525: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
526: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
527: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_NUMBER',P_DOCUMENT_NUMBER);
520: --
521: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION',P_API_VERSION);
522: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
523: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
524: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATION_LEVEL',P_VALIDATION_LEVEL);
525: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
526: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
527: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_NUMBER',P_DOCUMENT_NUMBER);
528: END IF;
521: WSH_DEBUG_SV.log(l_module_name,'P_API_VERSION',P_API_VERSION);
522: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
523: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
524: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATION_LEVEL',P_VALIDATION_LEVEL);
525: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
526: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
527: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_NUMBER',P_DOCUMENT_NUMBER);
528: END IF;
529: --
522: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
523: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
524: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATION_LEVEL',P_VALIDATION_LEVEL);
525: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
526: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
527: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_NUMBER',P_DOCUMENT_NUMBER);
528: END IF;
529: --
530: SAVEPOINT sp1;
523: WSH_DEBUG_SV.log(l_module_name,'P_COMMIT',P_COMMIT);
524: WSH_DEBUG_SV.log(l_module_name,'P_VALIDATION_LEVEL',P_VALIDATION_LEVEL);
525: WSH_DEBUG_SV.log(l_module_name,'P_ENTITY_ID',P_ENTITY_ID);
526: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_TYPE',P_DOCUMENT_TYPE);
527: WSH_DEBUG_SV.log(l_module_name,'P_DOCUMENT_NUMBER',P_DOCUMENT_NUMBER);
528: END IF;
529: --
530: SAVEPOINT sp1;
531:
531:
532: IF p_document_number <> NULL THEN
533: --
534: IF l_debug_on THEN
535: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_Document_PVT.CANCEL_DOCUMENT',WSH_DEBUG_SV.C_PROC_LEVEL);
536: END IF;
537: --
538: WSH_Document_PVT.cancel_document
539: (P_API_VERSION
553: END IF;
554: END IF;
555:
556: IF l_debug_on THEN
557: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_LEGS_PVT.DELETE_DELIVERY_LEG',WSH_DEBUG_SV.C_PROC_LEVEL);
558: END IF;
559: --
560: wsh_delivery_legs_pvt.delete_delivery_leg
561: (l_rowid,
570: --
571: -- Debug Statements
572: --
573: IF l_debug_on THEN
574: WSH_DEBUG_SV.pop(l_module_name);
575: END IF;
576: --
577: EXCEPTION
578: WHEN wsh_delete_leg_error THEN
579: ROLLBACK TO sp1;
580: x_return_status := wsh_util_core.g_ret_sts_error;
581: --
582: IF l_debug_on THEN
583: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DELETE_LEG_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
584: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DELETE_LEG_ERROR');
585: END IF;
586: --
587: WHEN wsh_cancel_document_error THEN
580: x_return_status := wsh_util_core.g_ret_sts_error;
581: --
582: IF l_debug_on THEN
583: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DELETE_LEG_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
584: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DELETE_LEG_ERROR');
585: END IF;
586: --
587: WHEN wsh_cancel_document_error THEN
588: ROLLBACK TO sp1;
588: ROLLBACK TO sp1;
589: x_return_status := wsh_util_core.g_ret_sts_error;
590: --
591: IF l_debug_on THEN
592: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_CANCEL_DOCUMENT_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
593: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_CANCEL_DOCUMENT_ERROR');
594: END IF;
595: --
596: WHEN OTHERS THEN
589: x_return_status := wsh_util_core.g_ret_sts_error;
590: --
591: IF l_debug_on THEN
592: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_CANCEL_DOCUMENT_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
593: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_CANCEL_DOCUMENT_ERROR');
594: END IF;
595: --
596: WHEN OTHERS THEN
597: ROLLBACK TO sp1;
597: ROLLBACK TO sp1;
598: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
599: --
600: IF l_debug_on THEN
601: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
602: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
603: END IF;
604: --
605: END delete_row;
598: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
599: --
600: IF l_debug_on THEN
601: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
602: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
603: END IF;
604: --
605: END delete_row;
606:
704: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
705: --
706: IF l_debug_on IS NULL
707: THEN
708: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
709: END IF;
710: --
711: IF l_debug_on THEN
712: WSH_DEBUG_SV.push(l_module_name);
708: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
709: END IF;
710: --
711: IF l_debug_on THEN
712: WSH_DEBUG_SV.push(l_module_name);
713: --
714: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
715: WSH_DEBUG_SV.log(l_module_name,'P_OLD_SHIP_METHOD_CODE',P_OLD_SHIP_METHOD_CODE);
716: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SHIP_METHOD_CODE',P_NEW_SHIP_METHOD_CODE);
710: --
711: IF l_debug_on THEN
712: WSH_DEBUG_SV.push(l_module_name);
713: --
714: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
715: WSH_DEBUG_SV.log(l_module_name,'P_OLD_SHIP_METHOD_CODE',P_OLD_SHIP_METHOD_CODE);
716: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SHIP_METHOD_CODE',P_NEW_SHIP_METHOD_CODE);
717: END IF;
718: --
711: IF l_debug_on THEN
712: WSH_DEBUG_SV.push(l_module_name);
713: --
714: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
715: WSH_DEBUG_SV.log(l_module_name,'P_OLD_SHIP_METHOD_CODE',P_OLD_SHIP_METHOD_CODE);
716: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SHIP_METHOD_CODE',P_NEW_SHIP_METHOD_CODE);
717: END IF;
718: --
719: SAVEPOINT cancel_bol1;
712: WSH_DEBUG_SV.push(l_module_name);
713: --
714: WSH_DEBUG_SV.log(l_module_name,'P_TRIP_ID',P_TRIP_ID);
715: WSH_DEBUG_SV.log(l_module_name,'P_OLD_SHIP_METHOD_CODE',P_OLD_SHIP_METHOD_CODE);
716: WSH_DEBUG_SV.log(l_module_name,'P_NEW_SHIP_METHOD_CODE',P_NEW_SHIP_METHOD_CODE);
717: END IF;
718: --
719: SAVEPOINT cancel_bol1;
720:
741: close bol_num_cur_2;
742: END IF;
743:
744: IF l_debug_on THEN
745: WSH_DEBUG_SV.log(l_module_name,'l_bol_num_tab.COUNT',l_bol_num_tab.COUNT);
746: END IF;
747:
748: IF l_bol_num_tab.COUNT <> 0 THEN
749:
762: --
763: -- Debug Statements
764: --
765: IF l_debug_on THEN
766: WSH_DEBUG_SV.log(l_module_name,'delivery_leg_id',
767: l_bol_num_tab(i).delivery_leg_id);
768: WSH_DEBUG_SV.log(l_module_name,'stop_location_id',
769: l_bol_num_tab(i).stop_location_id);
770: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_Document_PVT.CANCEL_DOCUMENT',WSH_DEBUG_SV.C_PROC_LEVEL);
764: --
765: IF l_debug_on THEN
766: WSH_DEBUG_SV.log(l_module_name,'delivery_leg_id',
767: l_bol_num_tab(i).delivery_leg_id);
768: WSH_DEBUG_SV.log(l_module_name,'stop_location_id',
769: l_bol_num_tab(i).stop_location_id);
770: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_Document_PVT.CANCEL_DOCUMENT',WSH_DEBUG_SV.C_PROC_LEVEL);
771: END IF;
772: --
766: WSH_DEBUG_SV.log(l_module_name,'delivery_leg_id',
767: l_bol_num_tab(i).delivery_leg_id);
768: WSH_DEBUG_SV.log(l_module_name,'stop_location_id',
769: l_bol_num_tab(i).stop_location_id);
770: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_Document_PVT.CANCEL_DOCUMENT',WSH_DEBUG_SV.C_PROC_LEVEL);
771: END IF;
772: --
773: WSH_Document_PVT.cancel_document
774: (p_api_version => 1.0,
787: END IF;
788:
789: --
790: IF l_debug_on THEN
791: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
792: END IF;
793: --
794: l_dummy_exception_id := null; --Bugfix 3990683
795: wsh_xc_util.log_exception(
811:
812: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
813: --
814: IF l_debug_on THEN
815: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH_XC_UTIL.LOG_EXCEPTION DID NOT RETURN SUCCESS' );
816: END IF;
817: --
818: raise wsh_cancel_bol_error;
819: END IF;
823:
824: IF l_return_status is not null then
825: x_return_status := l_return_status;
826: IF l_debug_on THEN
827: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
828: END IF;
829: ELSE
830: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
831: END IF;
830: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
831: END IF;
832:
833: IF l_debug_on THEN
834: WSH_DEBUG_SV.pop(l_module_name);
835: END IF;
836: --
837: EXCEPTION
838: WHEN wsh_cancel_bol_error THEN
839: ROLLBACK TO cancel_bol1;
840: x_return_status := wsh_util_core.g_ret_sts_error;
841: --
842: IF l_debug_on THEN
843: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_CANCEL_BOL_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
844: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_CANCEL_BOL_ERROR');
845: END IF;
846: --
847: WHEN record_locked THEN
840: x_return_status := wsh_util_core.g_ret_sts_error;
841: --
842: IF l_debug_on THEN
843: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_CANCEL_BOL_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
844: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_CANCEL_BOL_ERROR');
845: END IF;
846: --
847: WHEN record_locked THEN
848: x_return_status := wsh_util_core.g_ret_sts_error;
849: FND_MESSAGE.Set_Name('WSH', 'WSH_NO_LOCK');
850: WSH_UTIL_CORE.add_message (x_return_status, l_module_name);
851: --
852: IF l_debug_on THEN
853: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
854: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
855: END IF;
856: --
857: WHEN OTHERS THEN
850: WSH_UTIL_CORE.add_message (x_return_status, l_module_name);
851: --
852: IF l_debug_on THEN
853: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
854: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
855: END IF;
856: --
857: WHEN OTHERS THEN
858: ROLLBACK TO cancel_bol1;
865: END IF;
866: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
867: --
868: IF l_debug_on THEN
869: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
870: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
871: END IF;
872: --
873: END cancel_bol;
866: x_return_status := wsh_util_core.g_ret_sts_unexp_error;
867: --
868: IF l_debug_on THEN
869: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
870: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
871: END IF;
872: --
873: END cancel_bol;
874: