31: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
32: --
33: IF l_debug_on IS NULL
34: THEN
35: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
36: END IF;
37: --
38: IF l_debug_on THEN
39: WSH_DEBUG_SV.push(l_module_name); -- bug 4992250
35: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
36: END IF;
37: --
38: IF l_debug_on THEN
39: WSH_DEBUG_SV.push(l_module_name); -- bug 4992250
40: END IF;
41: --
42:
43: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
108: FND_GLOBAL.LOGIN_ID);
109:
110: --
111: IF l_debug_on THEN
112: WSH_DEBUG_SV.log(l_module_name,'x_dd_txn_id',x_dd_txn_id);
113: WSH_DEBUG_SV.pop(l_module_name);
114: END IF;
115: --
116:
109:
110: --
111: IF l_debug_on THEN
112: WSH_DEBUG_SV.log(l_module_name,'x_dd_txn_id',x_dd_txn_id);
113: WSH_DEBUG_SV.pop(l_module_name);
114: END IF;
115: --
116:
117: EXCEPTION
120: wsh_util_core.default_handler('WSH_DD_TXNS_PVT.INSERT_DD_TXN',l_module_name);
121: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
122: --
123: IF l_debug_on THEN
124: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
125: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
126: END IF;
127: --
128: END Insert_DD_Txn;
121: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
122: --
123: IF l_debug_on THEN
124: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
125: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
126: END IF;
127: --
128: END Insert_DD_Txn;
129:
168: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
169: --
170: IF l_debug_on IS NULL
171: THEN
172: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
173: END IF;
174: --
175: IF l_debug_on THEN
176: WSH_DEBUG_SV.push(l_module_name);
172: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
173: END IF;
174: --
175: IF l_debug_on THEN
176: WSH_DEBUG_SV.push(l_module_name);
177: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_id',p_delivery_detail_id);
178: END IF;
179: --
180: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
173: END IF;
174: --
175: IF l_debug_on THEN
176: WSH_DEBUG_SV.push(l_module_name);
177: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_id',p_delivery_detail_id);
178: END IF;
179: --
180: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
181:
193: CLOSE c_dd_rec;
194:
195: --
196: IF l_debug_on THEN
197: WSH_DEBUG_SV.pop(l_module_name); -- bug 4992250
198: END IF;
199:
200:
201: EXCEPTION
203: wsh_util_core.default_handler('WSH_DD_TXNS_PVT.Get_DD_Snapshot',l_module_name);
204: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
205: --
206: IF l_debug_on THEN
207: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
208: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
209: END IF;
210: --
211: END Get_DD_Snapshot;
204: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
205: --
206: IF l_debug_on THEN
207: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
208: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
209: END IF;
210: --
211: END Get_DD_Snapshot;
212:
235: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
236: --
237: IF l_debug_on IS NULL
238: THEN
239: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
240: END IF;
241: --
242: IF l_debug_on THEN
243: WSH_DEBUG_SV.push(l_module_name);
239: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
240: END IF;
241: --
242: IF l_debug_on THEN
243: WSH_DEBUG_SV.push(l_module_name);
244: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_id',p_delivery_detail_id);
245: END IF;
246: --
247: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
240: END IF;
241: --
242: IF l_debug_on THEN
243: WSH_DEBUG_SV.push(l_module_name);
244: WSH_DEBUG_SV.log(l_module_name,'p_delivery_detail_id',p_delivery_detail_id);
245: END IF;
246: --
247: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
248: --
250: -- If not installed, then do not proceed , return Success
251: IF (WSH_INTEGRATION.DBI_Installed = 'N')
252: THEN
253: IF l_debug_on THEN
254: WSH_DEBUG_SV.log(l_module_name,'DBI Installed flag-',WSH_INTEGRATION.DBI_Installed);
255: WSH_DEBUG_SV.pop(l_module_name);
256: END IF;
257: RETURN;
258: END IF;
251: IF (WSH_INTEGRATION.DBI_Installed = 'N')
252: THEN
253: IF l_debug_on THEN
254: WSH_DEBUG_SV.log(l_module_name,'DBI Installed flag-',WSH_INTEGRATION.DBI_Installed);
255: WSH_DEBUG_SV.pop(l_module_name);
256: END IF;
257: RETURN;
258: END IF;
259: --
261: l_delivery_detail_id := p_delivery_detail_id;
262:
263: --
264: IF l_debug_on THEN
265: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling Get_DD_Snapshot');
266: END IF;
267: --
268: Get_DD_Snapshot (p_delivery_detail_id => l_delivery_detail_id,
269: x_dd_txn_info => l_dd_txn_info,
271:
272: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
273: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
274: IF l_debug_on THEN
275: WSH_DEBUG_SV.logmsg(l_module_name,' Error in Get_DD_Snapshot');
276: WSH_DEBUG_SV.pop(l_module_name); -- bug 4992250
277: END IF;
278: RETURN;
279: END IF;
272: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
273: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
274: IF l_debug_on THEN
275: WSH_DEBUG_SV.logmsg(l_module_name,' Error in Get_DD_Snapshot');
276: WSH_DEBUG_SV.pop(l_module_name); -- bug 4992250
277: END IF;
278: RETURN;
279: END IF;
280:
279: END IF;
280:
281: --
282: IF l_debug_on THEN
283: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling Insert_DD_Txn');
284: END IF;
285: --
286:
287: Insert_DD_Txn(p_dd_txn_info => l_dd_txn_info,
291:
292: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
293: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
294: IF l_debug_on THEN
295: WSH_DEBUG_SV.logmsg(l_module_name,' Error in Insert_DD_Txn');
296: WSH_DEBUG_SV.pop(l_module_name); -- bug 4992250
297: END IF;
298: RETURN;
299: END IF;
292: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
293: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
294: IF l_debug_on THEN
295: WSH_DEBUG_SV.logmsg(l_module_name,' Error in Insert_DD_Txn');
296: WSH_DEBUG_SV.pop(l_module_name); -- bug 4992250
297: END IF;
298: RETURN;
299: END IF;
300:
298: RETURN;
299: END IF;
300:
301: IF l_debug_on THEN
302: WSH_DEBUG_SV.pop(l_module_name); -- bug 4992250
303: END IF;
304:
305: EXCEPTION
306:
308: wsh_util_core.default_handler('WSH_DD_TXNS_PVT.create_dd_txn_from_dd',l_module_name);
309: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
310: --
311: IF l_debug_on THEN
312: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
313: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
314: END IF;
315: --
316:
309: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
310: --
311: IF l_debug_on THEN
312: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
313: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
314: END IF;
315: --
316:
317: END create_dd_txn_from_dd;