[Home] [Help]
117: l_return_status varchar2(1);
118: BEGIN
119: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
120: IF l_debug_on IS NULL THEN
121: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
122: END IF;
123:
124: IF l_debug_on THEN
125: WSH_DEBUG_SV.push(l_module_name);
121: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
122: END IF;
123:
124: IF l_debug_on THEN
125: WSH_DEBUG_SV.push(l_module_name);
126: WSH_DEBUG_SV.log(l_module_name,'p_index',p_index);
127: END IF;
128:
129: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
122: END IF;
123:
124: IF l_debug_on THEN
125: WSH_DEBUG_SV.push(l_module_name);
126: WSH_DEBUG_SV.log(l_module_name,'p_index',p_index);
127: END IF;
128:
129: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
130:
146: p_address.action(p_index):= NULL;
147: p_address.error_flag(p_index):= 'N';
148:
149: IF l_debug_on THEN
150: WSH_DEBUG_SV.pop(l_module_name);
151: END IF;
152: EXCEPTION
153: WHEN OTHERS THEN
154: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
152: EXCEPTION
153: WHEN OTHERS THEN
154: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
155: IF l_debug_on THEN
156: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
157: Oracle error message is '||
158:
159: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
160: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
155: IF l_debug_on THEN
156: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
157: Oracle error message is '||
158:
159: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
160: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
161: END IF;
162: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
163: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
156: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
157: Oracle error message is '||
158:
159: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
160: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
161: END IF;
162: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
163: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
164: fnd_msg_pub.add;
186: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'Create_Line_Record';
187: BEGIN
188: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
189: IF l_debug_on IS NULL THEN
190: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
191: END IF;
192:
193: IF l_debug_on THEN
194: WSH_DEBUG_SV.push(l_module_name);
190: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
191: END IF;
192:
193: IF l_debug_on THEN
194: WSH_DEBUG_SV.push(l_module_name);
195: WSH_DEBUG_SV.log(l_module_name,'p_index',p_index);
196: END IF;
197:
198: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
191: END IF;
192:
193: IF l_debug_on THEN
194: WSH_DEBUG_SV.push(l_module_name);
195: WSH_DEBUG_SV.log(l_module_name,'p_index',p_index);
196: END IF;
197:
198: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
199:
213: p_line.Latest_pickup_date(p_index):= NULL;
214: p_line.error_flag(p_index):= 'N';
215:
216: IF l_debug_on THEN
217: WSH_DEBUG_SV.pop(l_module_name);
218: END IF;
219: EXCEPTION
220: WHEN OTHERS THEN
221: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
219: EXCEPTION
220: WHEN OTHERS THEN
221: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
222: IF l_debug_on THEN
223: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
224: Oracle error message is '||
225:
226: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
227: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
222: IF l_debug_on THEN
223: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
224: Oracle error message is '||
225:
226: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
227: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
228: END IF;
229: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
230: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
223: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
224: Oracle error message is '||
225:
226: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
227: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
228: END IF;
229: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
230: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
231: fnd_msg_pub.add;
253: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'Create_Delivery_Record';
254: BEGIN
255: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
256: IF l_debug_on IS NULL THEN
257: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
258: END IF;
259:
260: IF l_debug_on THEN
261: WSH_DEBUG_SV.push(l_module_name);
257: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
258: END IF;
259:
260: IF l_debug_on THEN
261: WSH_DEBUG_SV.push(l_module_name);
262: WSH_DEBUG_SV.log(l_module_name,'p_index',p_index);
263: END IF;
264:
265: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
258: END IF;
259:
260: IF l_debug_on THEN
261: WSH_DEBUG_SV.push(l_module_name);
262: WSH_DEBUG_SV.log(l_module_name,'p_index',p_index);
263: END IF;
264:
265: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
266: p_Delivery.Header_line_number(p_index):= NULL;
286: p_Delivery.remark(p_index):= NULL;
287: p_Delivery.error_flag(p_index):= 'N';
288:
289: IF l_debug_on THEN
290: WSH_DEBUG_SV.pop(l_module_name);
291: END IF;
292: EXCEPTION
293: WHEN OTHERS THEN
294: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
292: EXCEPTION
293: WHEN OTHERS THEN
294: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
295: IF l_debug_on THEN
296: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
297: Oracle error message is '||
298:
299: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
300: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
295: IF l_debug_on THEN
296: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
297: Oracle error message is '||
298:
299: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
300: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
301: END IF;
302: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
303: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
296: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
297: Oracle error message is '||
298:
299: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
300: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
301: END IF;
302: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
303: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
304: fnd_msg_pub.add;
327: 'Create_Header_Record';
328: BEGIN
329: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
330: IF l_debug_on IS NULL THEN
331: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
332: END IF;
333:
334: IF l_debug_on THEN
335: WSH_DEBUG_SV.push(l_module_name);
331: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
332: END IF;
333:
334: IF l_debug_on THEN
335: WSH_DEBUG_SV.push(l_module_name);
336: WSH_DEBUG_SV.log(l_module_name,'p_index',p_index);
337: END IF;
338:
339: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
332: END IF;
333:
334: IF l_debug_on THEN
335: WSH_DEBUG_SV.push(l_module_name);
336: WSH_DEBUG_SV.log(l_module_name,'p_index',p_index);
337: END IF;
338:
339: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
340:
344: p_header.request_revision(p_index):= NULL;
345: p_header.error_flag(p_index):= 'N';
346:
347: IF l_debug_on THEN
348: WSH_DEBUG_SV.pop(l_module_name);
349: END IF;
350: EXCEPTION
351: WHEN OTHERS THEN
352: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
350: EXCEPTION
351: WHEN OTHERS THEN
352: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
353: IF l_debug_on THEN
354: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
355: Oracle error message is '||
356:
357: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
358: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
353: IF l_debug_on THEN
354: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
355: Oracle error message is '||
356:
357: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
358: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
359: END IF;
360: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
361: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
354: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
355: Oracle error message is '||
356:
357: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
358: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
359: END IF;
360: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
361: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
362: fnd_msg_pub.add;
391: l_error_count number:=0;
392: BEGIN
393: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
394: IF l_debug_on IS NULL THEN
395: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
396: END IF;
397:
398: IF l_debug_on THEN
399: WSH_DEBUG_SV.push(l_module_name);
395: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
396: END IF;
397:
398: IF l_debug_on THEN
399: WSH_DEBUG_SV.push(l_module_name);
400: WSH_DEBUG_SV.log(l_module_name,'p_error_tbl.count',p_error_tbl.count);
401: END IF;
402:
403: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
396: END IF;
397:
398: IF l_debug_on THEN
399: WSH_DEBUG_SV.push(l_module_name);
400: WSH_DEBUG_SV.log(l_module_name,'p_error_tbl.count',p_error_tbl.count);
401: END IF;
402:
403: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
404:
424: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
425: END IF;
426:
427: IF l_debug_on THEN
428: WSH_DEBUG_SV.log(l_module_name,'l_count',l_count);
429: WSH_DEBUG_SV.log(l_module_name,'l_error_count',l_error_count);
430: WSH_DEBUG_SV.pop(l_module_name);
431: END IF;
432:
425: END IF;
426:
427: IF l_debug_on THEN
428: WSH_DEBUG_SV.log(l_module_name,'l_count',l_count);
429: WSH_DEBUG_SV.log(l_module_name,'l_error_count',l_error_count);
430: WSH_DEBUG_SV.pop(l_module_name);
431: END IF;
432:
433:
426:
427: IF l_debug_on THEN
428: WSH_DEBUG_SV.log(l_module_name,'l_count',l_count);
429: WSH_DEBUG_SV.log(l_module_name,'l_error_count',l_error_count);
430: WSH_DEBUG_SV.pop(l_module_name);
431: END IF;
432:
433:
434: EXCEPTION
434: EXCEPTION
435: WHEN OTHERS THEN
436: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
437: IF l_debug_on THEN
438: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
439: Oracle error message is '||
440:
441: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
442: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
437: IF l_debug_on THEN
438: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
439: Oracle error message is '||
440:
441: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
442: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
443: END IF;
444:
445: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
438: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
439: Oracle error message is '||
440:
441: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
442: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
443: END IF;
444:
445: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
446: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
473: l_msg varchar2(2000);
474: BEGIN
475: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
476: IF l_debug_on IS NULL THEN
477: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
478: END IF;
479:
480: IF l_debug_on THEN
481: WSH_DEBUG_SV.push(l_module_name);
477: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
478: END IF;
479:
480: IF l_debug_on THEN
481: WSH_DEBUG_SV.push(l_module_name);
482: WSH_DEBUG_SV.log(l_module_name,'p_msg_name',p_msg_name);
483: WSH_DEBUG_SV.log(l_module_name,'p_product',p_product);
484: END IF;
485:
478: END IF;
479:
480: IF l_debug_on THEN
481: WSH_DEBUG_SV.push(l_module_name);
482: WSH_DEBUG_SV.log(l_module_name,'p_msg_name',p_msg_name);
483: WSH_DEBUG_SV.log(l_module_name,'p_product',p_product);
484: END IF;
485:
486: --Set the message to FND stack, so that translation is taken care off.
479:
480: IF l_debug_on THEN
481: WSH_DEBUG_SV.push(l_module_name);
482: WSH_DEBUG_SV.log(l_module_name,'p_msg_name',p_msg_name);
483: WSH_DEBUG_SV.log(l_module_name,'p_product',p_product);
484: END IF;
485:
486: --Set the message to FND stack, so that translation is taken care off.
487: FND_MESSAGE.SET_NAME(p_product, p_msg_name);
487: FND_MESSAGE.SET_NAME(p_product, p_msg_name);
488: l_msg :=FND_MESSAGE.GET;
489:
490: IF l_debug_on THEN
491: WSH_DEBUG_SV.log(l_module_name,'Message',l_msg);
492: WSH_DEBUG_SV.pop(l_module_name);
493: END IF;
494:
495: RETURN l_msg;
488: l_msg :=FND_MESSAGE.GET;
489:
490: IF l_debug_on THEN
491: WSH_DEBUG_SV.log(l_module_name,'Message',l_msg);
492: WSH_DEBUG_SV.pop(l_module_name);
493: END IF;
494:
495: RETURN l_msg;
496:
496:
497: EXCEPTION
498: WHEN OTHERS THEN
499: IF l_debug_on THEN
500: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
501: Oracle error message is '||
502:
503: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
504: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
499: IF l_debug_on THEN
500: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
501: Oracle error message is '||
502:
503: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
504: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
505: END IF;
506:
507: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
500: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
501: Oracle error message is '||
502:
503: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
504: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
505: END IF;
506:
507: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
508: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
537: l_new_date date;
538: BEGIN
539: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
540: IF l_debug_on IS NULL THEN
541: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
542: END IF;
543:
544: IF l_debug_on THEN
545: WSH_DEBUG_SV.push(l_module_name);
541: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
542: END IF;
543:
544: IF l_debug_on THEN
545: WSH_DEBUG_SV.push(l_module_name);
546: WSH_DEBUG_SV.log(l_module_name,'p_date',p_date);
547: WSH_DEBUG_SV.log(l_module_name,'p_type',p_type);
548: END IF;
549:
542: END IF;
543:
544: IF l_debug_on THEN
545: WSH_DEBUG_SV.push(l_module_name);
546: WSH_DEBUG_SV.log(l_module_name,'p_date',p_date);
547: WSH_DEBUG_SV.log(l_module_name,'p_type',p_type);
548: END IF;
549:
550: l_new_date := p_date;
543:
544: IF l_debug_on THEN
545: WSH_DEBUG_SV.push(l_module_name);
546: WSH_DEBUG_SV.log(l_module_name,'p_date',p_date);
547: WSH_DEBUG_SV.log(l_module_name,'p_type',p_type);
548: END IF;
549:
550: l_new_date := p_date;
551:
550: l_new_date := p_date;
551:
552: IF (p_date - trunc(p_date) = 0 ) THEN
553: IF l_debug_on THEN
554: WSH_DEBUG_SV.log(l_module_name,'Adding the time',p_date - trunc(p_date));
555: END IF;
556:
557: IF (p_type='F') THEN
558: l_new_date := to_date(to_char(p_date,'mm/dd/yyyy') || '00:00:00','mm/dd/yyyy HH24:MI:SS');
562:
563: END IF;
564:
565: IF l_debug_on THEN
566: WSH_DEBUG_SV.log(l_module_name,'l_new_date',l_new_date);
567: WSH_DEBUG_SV.pop(l_module_name);
568: END IF;
569:
570: RETURN l_new_date;
563: END IF;
564:
565: IF l_debug_on THEN
566: WSH_DEBUG_SV.log(l_module_name,'l_new_date',l_new_date);
567: WSH_DEBUG_SV.pop(l_module_name);
568: END IF;
569:
570: RETURN l_new_date;
571:
571:
572: EXCEPTION
573: WHEN OTHERS THEN
574: IF l_debug_on THEN
575: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
576: Oracle error message is '||
577:
578: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
579: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
574: IF l_debug_on THEN
575: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
576: Oracle error message is '||
577:
578: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
579: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
580: END IF;
581:
582: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
575: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
576: Oracle error message is '||
577:
578: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
579: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
580: END IF;
581:
582: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
583: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
610:
611: BEGIN
612: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
613: IF l_debug_on IS NULL THEN
614: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
615: END IF;
616:
617: IF l_debug_on THEN
618: WSH_DEBUG_SV.push(l_module_name);
614: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
615: END IF;
616:
617: IF l_debug_on THEN
618: WSH_DEBUG_SV.push(l_module_name);
619: END IF;
620:
621:
622: IF l_debug_on THEN
619: END IF;
620:
621:
622: IF l_debug_on THEN
623: WSH_DEBUG_SV.log(l_module_name,'Message Count:',FND_MSG_PUB.Count_Msg);
624: END IF;
625:
626:
627: IF (FND_MSG_PUB.Count_Msg > 0 ) THEN
628: --Loop through all the messages in stack.
629: FOR i IN 1..FND_MSG_PUB.Count_Msg LOOP
630: l_msg := FND_MSG_PUB.get(i, FND_API.G_FALSE);
631: IF l_debug_on THEN
632: WSH_DEBUG_SV.log(l_module_name,'Stack Message :',l_msg);
633: END IF;
634:
635: --Collect the Translated message from FND stack.
636: g_error_tbl(g_error_tbl.count + 1) := l_msg;
641: --duplicate message being collected.
642: FND_MSG_PUB.initialize;
643:
644: IF l_debug_on THEN
645: WSH_DEBUG_SV.log(l_module_name,'After Init Message
646: Count:',FND_MSG_PUB.Count_Msg);
647: END IF;
648: IF l_debug_on THEN
649: WSH_DEBUG_SV.pop(l_module_name);
645: WSH_DEBUG_SV.log(l_module_name,'After Init Message
646: Count:',FND_MSG_PUB.Count_Msg);
647: END IF;
648: IF l_debug_on THEN
649: WSH_DEBUG_SV.pop(l_module_name);
650: END IF;
651: EXCEPTION
652: WHEN OTHERS THEN
653: IF l_debug_on THEN
650: END IF;
651: EXCEPTION
652: WHEN OTHERS THEN
653: IF l_debug_on THEN
654: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
655: Oracle error message is '||
656:
657: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
658: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
653: IF l_debug_on THEN
654: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
655: Oracle error message is '||
656:
657: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
658: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
659: END IF;
660:
661: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
654: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
655: Oracle error message is '||
656:
657: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
658: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
659: END IF;
660:
661: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
662: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
680: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'Init_Routing_Req_Validation';
681: BEGIN
682: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
683: IF l_debug_on IS NULL THEN
684: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
685: END IF;
686:
687: IF l_debug_on THEN
688: WSH_DEBUG_SV.push(l_module_name);
684: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
685: END IF;
686:
687: IF l_debug_on THEN
688: WSH_DEBUG_SV.push(l_module_name);
689: END IF;
690:
691: --For Header
692: g_field.name(c_Supplier_name):=set_message('FTE','FTE_RR_HDR_SUP_NAME');
881: g_field.max_size(c_latest_pickup_date):=NULL;
882: g_field.supplied(c_latest_pickup_date):='N';
883:
884: IF l_debug_on THEN
885: WSH_DEBUG_SV.pop(l_module_name);
886: END IF;
887: EXCEPTION
888: WHEN OTHERS THEN
889: IF l_debug_on THEN
886: END IF;
887: EXCEPTION
888: WHEN OTHERS THEN
889: IF l_debug_on THEN
890: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
891: Oracle error message is '||
892:
893: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
894: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
889: IF l_debug_on THEN
890: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
891: Oracle error message is '||
892:
893: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
894: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
895: END IF;
896:
897: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
890: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
891: Oracle error message is '||
892:
893: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
894: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
895: END IF;
896:
897: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
898: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
919: 'Init_Supplier_Validation';
920: BEGIN
921: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
922: IF l_debug_on IS NULL THEN
923: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
924: END IF;
925:
926: IF l_debug_on THEN
927: WSH_DEBUG_SV.push(l_module_name);
923: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
924: END IF;
925:
926: IF l_debug_on THEN
927: WSH_DEBUG_SV.push(l_module_name);
928: END IF;
929:
930: g_field.name(cs_Supplier_name):=set_message('FTE','FTE_RR_HDR_SUP_NAME');
931: g_field.requried(cs_Supplier_name):='Y';
1008: g_field.max_size(cs_action ):=30;
1009: g_field.supplied(cs_action ):='N';
1010:
1011: IF l_debug_on THEN
1012: WSH_DEBUG_SV.pop(l_module_name);
1013: END IF;
1014: EXCEPTION
1015: WHEN OTHERS THEN
1016: IF l_debug_on THEN
1013: END IF;
1014: EXCEPTION
1015: WHEN OTHERS THEN
1016: IF l_debug_on THEN
1017: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1018: Oracle error message is '||
1019:
1020: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1021: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1016: IF l_debug_on THEN
1017: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1018: Oracle error message is '||
1019:
1020: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1021: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1022: END IF;
1023:
1024: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1017: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1018: Oracle error message is '||
1019:
1020: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1021: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1022: END IF;
1023:
1024: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1025: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1058:
1059: BEGIN
1060: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1061: IF l_debug_on IS NULL THEN
1062: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1063: END IF;
1064:
1065: IF l_debug_on THEN
1066: WSH_DEBUG_SV.push(l_module_name);
1062: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1063: END IF;
1064:
1065: IF l_debug_on THEN
1066: WSH_DEBUG_SV.push(l_module_name);
1067: WSH_DEBUG_SV.log(l_module_name,'p_level',p_level);
1068: END IF;
1069:
1070: --Determine the start and end index of global validation(g_field) table based on level to find the missing column.
1063: END IF;
1064:
1065: IF l_debug_on THEN
1066: WSH_DEBUG_SV.push(l_module_name);
1067: WSH_DEBUG_SV.log(l_module_name,'p_level',p_level);
1068: END IF;
1069:
1070: --Determine the start and end index of global validation(g_field) table based on level to find the missing column.
1071: IF (p_level=1 ) THEN
1091: END IF;
1092:
1093:
1094: IF l_debug_on THEN
1095: WSH_DEBUG_SV.log(l_module_name,'l_start_index',l_start_index);
1096: WSH_DEBUG_SV.log(l_module_name,'l_end_index',l_end_index);
1097: END IF;
1098:
1099: --Loop through all the columns of level,
1092:
1093:
1094: IF l_debug_on THEN
1095: WSH_DEBUG_SV.log(l_module_name,'l_start_index',l_start_index);
1096: WSH_DEBUG_SV.log(l_module_name,'l_end_index',l_end_index);
1097: END IF;
1098:
1099: --Loop through all the columns of level,
1100: --error if not supplied and mandatory field.
1101: FOR i IN l_start_index..l_end_index LOOP
1102: IF (g_field.supplied(i) = 'N') THEN
1103:
1104: IF l_debug_on THEN
1105: WSH_DEBUG_SV.log(l_module_name,'Missing Column',g_field.name(i));
1106: END IF;
1107:
1108: IF (g_field.requried(i) = 'Y' ) THEN
1109: l_find_miss_column:= true;
1117: g_field.supplied(i):= 'N';
1118: END LOOP;
1119:
1120: IF l_debug_on THEN
1121: WSH_DEBUG_SV.pop(l_module_name);
1122: END IF;
1123: RETURN l_find_miss_column;
1124:
1125: EXCEPTION
1124:
1125: EXCEPTION
1126: WHEN OTHERS THEN
1127: IF l_debug_on THEN
1128: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1129: Oracle error message is '||
1130:
1131: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1132: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1127: IF l_debug_on THEN
1128: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1129: Oracle error message is '||
1130:
1131: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1132: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1133: END IF;
1134: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1135: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1128: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1129: Oracle error message is '||
1130:
1131: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1132: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1133: END IF;
1134: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1135: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1136: fnd_msg_pub.add;
1169:
1170: BEGIN
1171: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1172: IF l_debug_on IS NULL THEN
1173: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1174: END IF;
1175:
1176: IF l_debug_on THEN
1177: WSH_DEBUG_SV.push(l_module_name);
1173: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1174: END IF;
1175:
1176: IF l_debug_on THEN
1177: WSH_DEBUG_SV.push(l_module_name);
1178: WSH_DEBUG_SV.log(l_module_name,'p_index',p_index);
1179: WSH_DEBUG_SV.log(l_module_name,'p_field_value',p_field_value);
1180: WSH_DEBUG_SV.log(l_module_name,'p_field_value size',length(p_field_value));
1181: END IF;
1174: END IF;
1175:
1176: IF l_debug_on THEN
1177: WSH_DEBUG_SV.push(l_module_name);
1178: WSH_DEBUG_SV.log(l_module_name,'p_index',p_index);
1179: WSH_DEBUG_SV.log(l_module_name,'p_field_value',p_field_value);
1180: WSH_DEBUG_SV.log(l_module_name,'p_field_value size',length(p_field_value));
1181: END IF;
1182:
1175:
1176: IF l_debug_on THEN
1177: WSH_DEBUG_SV.push(l_module_name);
1178: WSH_DEBUG_SV.log(l_module_name,'p_index',p_index);
1179: WSH_DEBUG_SV.log(l_module_name,'p_field_value',p_field_value);
1180: WSH_DEBUG_SV.log(l_module_name,'p_field_value size',length(p_field_value));
1181: END IF;
1182:
1183: --This field is part of Routing Request /Supplier Address Book file.
1176: IF l_debug_on THEN
1177: WSH_DEBUG_SV.push(l_module_name);
1178: WSH_DEBUG_SV.log(l_module_name,'p_index',p_index);
1179: WSH_DEBUG_SV.log(l_module_name,'p_field_value',p_field_value);
1180: WSH_DEBUG_SV.log(l_module_name,'p_field_value size',length(p_field_value));
1181: END IF;
1182:
1183: --This field is part of Routing Request /Supplier Address Book file.
1184: g_field.supplied(p_index):='Y';
1248:
1249:
1250: IF l_debug_on THEN
1251:
1252: WSH_DEBUG_SV.log(l_module_name,'l_field_value',l_field_value);
1253: IF l_status THEN
1254: WSH_DEBUG_SV.logmsg(l_module_name,'Field Valid TRUE');
1255: ELSE
1256: WSH_DEBUG_SV.logmsg(l_module_name,'Field Valid FALSE');
1250: IF l_debug_on THEN
1251:
1252: WSH_DEBUG_SV.log(l_module_name,'l_field_value',l_field_value);
1253: IF l_status THEN
1254: WSH_DEBUG_SV.logmsg(l_module_name,'Field Valid TRUE');
1255: ELSE
1256: WSH_DEBUG_SV.logmsg(l_module_name,'Field Valid FALSE');
1257: END IF;
1258:
1252: WSH_DEBUG_SV.log(l_module_name,'l_field_value',l_field_value);
1253: IF l_status THEN
1254: WSH_DEBUG_SV.logmsg(l_module_name,'Field Valid TRUE');
1255: ELSE
1256: WSH_DEBUG_SV.logmsg(l_module_name,'Field Valid FALSE');
1257: END IF;
1258:
1259: WSH_DEBUG_SV.pop(l_module_name);
1260: END IF;
1255: ELSE
1256: WSH_DEBUG_SV.logmsg(l_module_name,'Field Valid FALSE');
1257: END IF;
1258:
1259: WSH_DEBUG_SV.pop(l_module_name);
1260: END IF;
1261:
1262: RETURN l_status;
1263: EXCEPTION
1262: RETURN l_status;
1263: EXCEPTION
1264: WHEN OTHERS THEN
1265: IF l_debug_on THEN
1266: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1267: Oracle error message is '||
1268:
1269: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1270: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1265: IF l_debug_on THEN
1266: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1267: Oracle error message is '||
1268:
1269: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1270: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1271: END IF;
1272: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1273: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1266: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1267: Oracle error message is '||
1268:
1269: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1270: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1271: END IF;
1272: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1273: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1274: fnd_msg_pub.add;
1310: l_error boolean:=false;
1311: BEGIN
1312: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1313: IF l_debug_on IS NULL THEN
1314: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1315: END IF;
1316:
1317: IF l_debug_on THEN
1318: WSH_DEBUG_SV.push(l_module_name);
1314: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1315: END IF;
1316:
1317: IF l_debug_on THEN
1318: WSH_DEBUG_SV.push(l_module_name);
1319: END IF;
1320:
1321: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1322:
1452: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1453: END IF;
1454:
1455: IF l_debug_on THEN
1456: WSH_DEBUG_SV.pop(l_module_name);
1457: END IF;
1458: EXCEPTION
1459: WHEN OTHERS THEN
1460: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1459: WHEN OTHERS THEN
1460: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1461:
1462: IF l_debug_on THEN
1463: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1464: Oracle error message is '||
1465:
1466: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1467: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1462: IF l_debug_on THEN
1463: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1464: Oracle error message is '||
1465:
1466: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1467: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1468: END IF;
1469:
1470: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
1463: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1464: Oracle error message is '||
1465:
1466: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1467: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1468: END IF;
1469:
1470: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
1471: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
1523:
1524: BEGIN
1525: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1526: IF l_debug_on IS NULL THEN
1527: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1528: END IF;
1529:
1530: IF l_debug_on THEN
1531: WSH_DEBUG_SV.push(l_module_name);
1527: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1528: END IF;
1529:
1530: IF l_debug_on THEN
1531: WSH_DEBUG_SV.push(l_module_name);
1532:
1533: WSH_DEBUG_SV.log(l_module_name,'p_file_fields.level_number.count',p_file_fields.level_number.count);
1534: END IF;
1535:
1529:
1530: IF l_debug_on THEN
1531: WSH_DEBUG_SV.push(l_module_name);
1532:
1533: WSH_DEBUG_SV.log(l_module_name,'p_file_fields.level_number.count',p_file_fields.level_number.count);
1534: END IF;
1535:
1536: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1537:
1581: p_Address => l_Address,
1582: x_return_status => l_return_status);
1583:
1584: IF l_debug_on THEN
1585: WSH_DEBUG_SV.log(l_module_name,'Process_Address
1586: l_return_status',l_return_status);
1587: END IF;
1588:
1589: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
1602: END IF;
1603:
1604:
1605: IF l_debug_on THEN
1606: WSH_DEBUG_SV.logmsg(l_module_name,'***************************');
1607: WSH_DEBUG_SV.logmsg(l_module_name,'Printing Address');
1608: END IF;
1609:
1610:
1603:
1604:
1605: IF l_debug_on THEN
1606: WSH_DEBUG_SV.logmsg(l_module_name,'***************************');
1607: WSH_DEBUG_SV.logmsg(l_module_name,'Printing Address');
1608: END IF;
1609:
1610:
1611: l_hi := l_Address.Supplier_name.first;
1610:
1611: l_hi := l_Address.Supplier_name.first;
1612: WHILE (l_hi IS NOT NULL ) LOOP
1613: IF l_debug_on THEN
1614: WSH_DEBUG_SV.log(l_module_name,'Index',l_hi);
1615:
1616: WSH_DEBUG_SV.log(l_module_name,'Supplier_name',l_Address.Supplier_name(l_hi));
1617: WSH_DEBUG_SV.log(l_module_name,'P_address1',
1618: l_Address.ship_from_address1(l_hi));
1612: WHILE (l_hi IS NOT NULL ) LOOP
1613: IF l_debug_on THEN
1614: WSH_DEBUG_SV.log(l_module_name,'Index',l_hi);
1615:
1616: WSH_DEBUG_SV.log(l_module_name,'Supplier_name',l_Address.Supplier_name(l_hi));
1617: WSH_DEBUG_SV.log(l_module_name,'P_address1',
1618: l_Address.ship_from_address1(l_hi));
1619: WSH_DEBUG_SV.log(l_module_name,'P_address2',
1620: l_Address.ship_from_address2(l_hi));
1613: IF l_debug_on THEN
1614: WSH_DEBUG_SV.log(l_module_name,'Index',l_hi);
1615:
1616: WSH_DEBUG_SV.log(l_module_name,'Supplier_name',l_Address.Supplier_name(l_hi));
1617: WSH_DEBUG_SV.log(l_module_name,'P_address1',
1618: l_Address.ship_from_address1(l_hi));
1619: WSH_DEBUG_SV.log(l_module_name,'P_address2',
1620: l_Address.ship_from_address2(l_hi));
1621: WSH_DEBUG_SV.log(l_module_name,'P_address3',
1615:
1616: WSH_DEBUG_SV.log(l_module_name,'Supplier_name',l_Address.Supplier_name(l_hi));
1617: WSH_DEBUG_SV.log(l_module_name,'P_address1',
1618: l_Address.ship_from_address1(l_hi));
1619: WSH_DEBUG_SV.log(l_module_name,'P_address2',
1620: l_Address.ship_from_address2(l_hi));
1621: WSH_DEBUG_SV.log(l_module_name,'P_address3',
1622: l_Address.ship_from_address3(l_hi));
1623: WSH_DEBUG_SV.log(l_module_name,'P_address4',
1617: WSH_DEBUG_SV.log(l_module_name,'P_address1',
1618: l_Address.ship_from_address1(l_hi));
1619: WSH_DEBUG_SV.log(l_module_name,'P_address2',
1620: l_Address.ship_from_address2(l_hi));
1621: WSH_DEBUG_SV.log(l_module_name,'P_address3',
1622: l_Address.ship_from_address3(l_hi));
1623: WSH_DEBUG_SV.log(l_module_name,'P_address4',
1624: l_Address.ship_from_address4(l_hi));
1625:
1619: WSH_DEBUG_SV.log(l_module_name,'P_address2',
1620: l_Address.ship_from_address2(l_hi));
1621: WSH_DEBUG_SV.log(l_module_name,'P_address3',
1622: l_Address.ship_from_address3(l_hi));
1623: WSH_DEBUG_SV.log(l_module_name,'P_address4',
1624: l_Address.ship_from_address4(l_hi));
1625:
1626: WSH_DEBUG_SV.log(l_module_name,'P_city',l_Address.ship_from_city(l_hi));
1627:
1622: l_Address.ship_from_address3(l_hi));
1623: WSH_DEBUG_SV.log(l_module_name,'P_address4',
1624: l_Address.ship_from_address4(l_hi));
1625:
1626: WSH_DEBUG_SV.log(l_module_name,'P_city',l_Address.ship_from_city(l_hi));
1627:
1628: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',l_Address.ship_from_postal_code(l_hi));
1629:
1630: WSH_DEBUG_SV.log(l_module_name,'P_state',l_Address.ship_from_state(l_hi));
1624: l_Address.ship_from_address4(l_hi));
1625:
1626: WSH_DEBUG_SV.log(l_module_name,'P_city',l_Address.ship_from_city(l_hi));
1627:
1628: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',l_Address.ship_from_postal_code(l_hi));
1629:
1630: WSH_DEBUG_SV.log(l_module_name,'P_state',l_Address.ship_from_state(l_hi));
1631:
1632: WSH_DEBUG_SV.log(l_module_name,'P_province',l_Address.ship_from_province(l_hi));
1626: WSH_DEBUG_SV.log(l_module_name,'P_city',l_Address.ship_from_city(l_hi));
1627:
1628: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',l_Address.ship_from_postal_code(l_hi));
1629:
1630: WSH_DEBUG_SV.log(l_module_name,'P_state',l_Address.ship_from_state(l_hi));
1631:
1632: WSH_DEBUG_SV.log(l_module_name,'P_province',l_Address.ship_from_province(l_hi));
1633:
1634: WSH_DEBUG_SV.log(l_module_name,'P_county',l_Address.ship_from_county(l_hi));
1628: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',l_Address.ship_from_postal_code(l_hi));
1629:
1630: WSH_DEBUG_SV.log(l_module_name,'P_state',l_Address.ship_from_state(l_hi));
1631:
1632: WSH_DEBUG_SV.log(l_module_name,'P_province',l_Address.ship_from_province(l_hi));
1633:
1634: WSH_DEBUG_SV.log(l_module_name,'P_county',l_Address.ship_from_county(l_hi));
1635: WSH_DEBUG_SV.log(l_module_name,'p_country',
1636: l_Address.ship_from_country(l_hi));
1630: WSH_DEBUG_SV.log(l_module_name,'P_state',l_Address.ship_from_state(l_hi));
1631:
1632: WSH_DEBUG_SV.log(l_module_name,'P_province',l_Address.ship_from_province(l_hi));
1633:
1634: WSH_DEBUG_SV.log(l_module_name,'P_county',l_Address.ship_from_county(l_hi));
1635: WSH_DEBUG_SV.log(l_module_name,'p_country',
1636: l_Address.ship_from_country(l_hi));
1637:
1638: WSH_DEBUG_SV.log(l_module_name,'p_shipper_name',l_Address.shipper_name(l_hi));
1631:
1632: WSH_DEBUG_SV.log(l_module_name,'P_province',l_Address.ship_from_province(l_hi));
1633:
1634: WSH_DEBUG_SV.log(l_module_name,'P_county',l_Address.ship_from_county(l_hi));
1635: WSH_DEBUG_SV.log(l_module_name,'p_country',
1636: l_Address.ship_from_country(l_hi));
1637:
1638: WSH_DEBUG_SV.log(l_module_name,'p_shipper_name',l_Address.shipper_name(l_hi));
1639: WSH_DEBUG_SV.log(l_module_name,'p_phone',l_Address.phone(l_hi));
1634: WSH_DEBUG_SV.log(l_module_name,'P_county',l_Address.ship_from_county(l_hi));
1635: WSH_DEBUG_SV.log(l_module_name,'p_country',
1636: l_Address.ship_from_country(l_hi));
1637:
1638: WSH_DEBUG_SV.log(l_module_name,'p_shipper_name',l_Address.shipper_name(l_hi));
1639: WSH_DEBUG_SV.log(l_module_name,'p_phone',l_Address.phone(l_hi));
1640: WSH_DEBUG_SV.log(l_module_name,'p_email',l_Address.email(l_hi));
1641: wSH_DEBUG_SV.log(l_module_name,'p_action',l_Address.action(l_hi));
1642:
1635: WSH_DEBUG_SV.log(l_module_name,'p_country',
1636: l_Address.ship_from_country(l_hi));
1637:
1638: WSH_DEBUG_SV.log(l_module_name,'p_shipper_name',l_Address.shipper_name(l_hi));
1639: WSH_DEBUG_SV.log(l_module_name,'p_phone',l_Address.phone(l_hi));
1640: WSH_DEBUG_SV.log(l_module_name,'p_email',l_Address.email(l_hi));
1641: wSH_DEBUG_SV.log(l_module_name,'p_action',l_Address.action(l_hi));
1642:
1643: WSH_DEBUG_SV.log(l_module_name,'Error_flag',l_Address.error_flag(l_hi));
1636: l_Address.ship_from_country(l_hi));
1637:
1638: WSH_DEBUG_SV.log(l_module_name,'p_shipper_name',l_Address.shipper_name(l_hi));
1639: WSH_DEBUG_SV.log(l_module_name,'p_phone',l_Address.phone(l_hi));
1640: WSH_DEBUG_SV.log(l_module_name,'p_email',l_Address.email(l_hi));
1641: wSH_DEBUG_SV.log(l_module_name,'p_action',l_Address.action(l_hi));
1642:
1643: WSH_DEBUG_SV.log(l_module_name,'Error_flag',l_Address.error_flag(l_hi));
1644: END IF;
1637:
1638: WSH_DEBUG_SV.log(l_module_name,'p_shipper_name',l_Address.shipper_name(l_hi));
1639: WSH_DEBUG_SV.log(l_module_name,'p_phone',l_Address.phone(l_hi));
1640: WSH_DEBUG_SV.log(l_module_name,'p_email',l_Address.email(l_hi));
1641: wSH_DEBUG_SV.log(l_module_name,'p_action',l_Address.action(l_hi));
1642:
1643: WSH_DEBUG_SV.log(l_module_name,'Error_flag',l_Address.error_flag(l_hi));
1644: END IF;
1645:
1639: WSH_DEBUG_SV.log(l_module_name,'p_phone',l_Address.phone(l_hi));
1640: WSH_DEBUG_SV.log(l_module_name,'p_email',l_Address.email(l_hi));
1641: wSH_DEBUG_SV.log(l_module_name,'p_action',l_Address.action(l_hi));
1642:
1643: WSH_DEBUG_SV.log(l_module_name,'Error_flag',l_Address.error_flag(l_hi));
1644: END IF;
1645:
1646: l_hi :=l_Address.Supplier_name.next(l_hi);
1647: END LOOP;
1652: x_return_status => x_return_status);
1653:
1654:
1655: IF l_debug_on THEN
1656: WSH_DEBUG_SV.log(l_module_name,'Is_All_Line_Error
1657: x_return_status',x_return_status);
1658: END IF;
1659:
1660: IF (x_return_status NOT IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
1667: x_error_tbl => g_error_tbl,
1668: x_return_status=> x_return_status);
1669:
1670: IF l_debug_on THEN
1671: WSH_DEBUG_SV.log(l_module_name,'Process_Address
1672: x_return_status',x_return_status);
1673: END IF;
1674: END IF;
1675:
1689:
1690: --Insert as message Debug information if debugger is on
1691: IF l_debug_on THEN
1692: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
1693: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
1694:
1695: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
1696: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
1697:
1701: END IF;
1702:
1703:
1704: IF l_debug_on THEN
1705: WSH_DEBUG_SV.pop(l_module_name);
1706: END IF;
1707: EXCEPTION
1708: WHEN FND_API.G_EXC_ERROR THEN
1709: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
1708: WHEN FND_API.G_EXC_ERROR THEN
1709: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
1710:
1711: IF l_debug_on THEN
1712: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
1713: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1714: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1715: END IF;
1716:
1709: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
1710:
1711: IF l_debug_on THEN
1712: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
1713: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1714: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1715: END IF;
1716:
1717: WHEN OTHERS THEN
1710:
1711: IF l_debug_on THEN
1712: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
1713: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1714: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1715: END IF;
1716:
1717: WHEN OTHERS THEN
1718: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1717: WHEN OTHERS THEN
1718: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1719:
1720: IF l_debug_on THEN
1721: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1722: Oracle error message is '||
1723:
1724: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1725: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1720: IF l_debug_on THEN
1721: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1722: Oracle error message is '||
1723:
1724: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1725: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1726: END IF;
1727: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1728: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1721: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1722: Oracle error message is '||
1723:
1724: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1725: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1726: END IF;
1727: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
1728: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
1729: l_msg_count:= l_msg_count + 1;
1765: l_error boolean:=false;
1766: BEGIN
1767: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1768: IF l_debug_on IS NULL THEN
1769: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1770: END IF;
1771:
1772: IF l_debug_on THEN
1773: WSH_DEBUG_SV.push(l_module_name);
1769: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1770: END IF;
1771:
1772: IF l_debug_on THEN
1773: WSH_DEBUG_SV.push(l_module_name);
1774: WSH_DEBUG_SV.log(l_module_name,'p_col_name',p_col_name);
1775: END IF;
1776:
1777: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1770: END IF;
1771:
1772: IF l_debug_on THEN
1773: WSH_DEBUG_SV.push(l_module_name);
1774: WSH_DEBUG_SV.log(l_module_name,'p_col_name',p_col_name);
1775: END IF;
1776:
1777: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1778:
1888: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1889: END IF;
1890:
1891: IF l_debug_on THEN
1892: WSH_DEBUG_SV.pop(l_module_name);
1893: END IF;
1894: EXCEPTION
1895: WHEN OTHERS THEN
1896: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1895: WHEN OTHERS THEN
1896: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1897:
1898: IF l_debug_on THEN
1899: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1900: Oracle error message is '||
1901:
1902: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1903: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1898: IF l_debug_on THEN
1899: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1900: Oracle error message is '||
1901:
1902: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1903: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1904: END IF;
1905: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
1906: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
1899: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
1900: Oracle error message is '||
1901:
1902: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1903: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1904: END IF;
1905: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
1906: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
1907: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
1947: l_error boolean:=false;
1948: BEGIN
1949: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1950: IF l_debug_on IS NULL THEN
1951: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1952: END IF;
1953:
1954: IF l_debug_on THEN
1955: WSH_DEBUG_SV.push(l_module_name);
1951: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1952: END IF;
1953:
1954: IF l_debug_on THEN
1955: WSH_DEBUG_SV.push(l_module_name);
1956: END IF;
1957:
1958: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1959:
2122: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2123: END IF;
2124:
2125: IF l_debug_on THEN
2126: WSH_DEBUG_SV.pop(l_module_name);
2127: END IF;
2128: EXCEPTION
2129: WHEN OTHERS THEN
2130: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2129: WHEN OTHERS THEN
2130: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2131:
2132: IF l_debug_on THEN
2133: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2134: Oracle error message is '||
2135:
2136: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2137: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2132: IF l_debug_on THEN
2133: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2134: Oracle error message is '||
2135:
2136: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2137: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2138: END IF;
2139: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
2140: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
2133: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2134: Oracle error message is '||
2135:
2136: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2137: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2138: END IF;
2139: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
2140: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
2141: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
2180: l_error boolean:=false;
2181: BEGIN
2182: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2183: IF l_debug_on IS NULL THEN
2184: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2185: END IF;
2186:
2187: IF l_debug_on THEN
2188: WSH_DEBUG_SV.push(l_module_name);
2184: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2185: END IF;
2186:
2187: IF l_debug_on THEN
2188: WSH_DEBUG_SV.push(l_module_name);
2189: END IF;
2190:
2191: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2192:
2228: END IF;
2229:
2230:
2231: IF l_debug_on THEN
2232: WSH_DEBUG_SV.pop(l_module_name);
2233: END IF;
2234: EXCEPTION
2235: WHEN OTHERS THEN
2236: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2235: WHEN OTHERS THEN
2236: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2237:
2238: IF l_debug_on THEN
2239: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2240: Oracle error message is '||
2241:
2242: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2243: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2238: IF l_debug_on THEN
2239: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2240: Oracle error message is '||
2241:
2242: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2243: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2244: END IF;
2245: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
2246: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
2239: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2240: Oracle error message is '||
2241:
2242: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2243: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2244: END IF;
2245: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_FIELD');
2246: FND_MESSAGE.SET_TOKEN('FIELD_NAME', p_col_name);
2247: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', p_index);
2299:
2300: BEGIN
2301: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2302: IF l_debug_on IS NULL THEN
2303: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2304: END IF;
2305:
2306: IF l_debug_on THEN
2307: WSH_DEBUG_SV.push(l_module_name);
2303: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2304: END IF;
2305:
2306: IF l_debug_on THEN
2307: WSH_DEBUG_SV.push(l_module_name);
2308: WSH_DEBUG_SV.log(l_module_name,'p_uom_type',p_uom_type);
2309: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
2310: WSH_DEBUG_SV.log(l_module_name,'p_detail_uom_code',p_detail_uom_code);
2311: WSH_DEBUG_SV.log(l_module_name,'p_rr_uom_code',p_rr_uom_code);
2304: END IF;
2305:
2306: IF l_debug_on THEN
2307: WSH_DEBUG_SV.push(l_module_name);
2308: WSH_DEBUG_SV.log(l_module_name,'p_uom_type',p_uom_type);
2309: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
2310: WSH_DEBUG_SV.log(l_module_name,'p_detail_uom_code',p_detail_uom_code);
2311: WSH_DEBUG_SV.log(l_module_name,'p_rr_uom_code',p_rr_uom_code);
2312: WSH_DEBUG_SV.log(l_module_name,'p_rr_qty',p_rr_qty);
2305:
2306: IF l_debug_on THEN
2307: WSH_DEBUG_SV.push(l_module_name);
2308: WSH_DEBUG_SV.log(l_module_name,'p_uom_type',p_uom_type);
2309: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
2310: WSH_DEBUG_SV.log(l_module_name,'p_detail_uom_code',p_detail_uom_code);
2311: WSH_DEBUG_SV.log(l_module_name,'p_rr_uom_code',p_rr_uom_code);
2312: WSH_DEBUG_SV.log(l_module_name,'p_rr_qty',p_rr_qty);
2313: END IF;
2306: IF l_debug_on THEN
2307: WSH_DEBUG_SV.push(l_module_name);
2308: WSH_DEBUG_SV.log(l_module_name,'p_uom_type',p_uom_type);
2309: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
2310: WSH_DEBUG_SV.log(l_module_name,'p_detail_uom_code',p_detail_uom_code);
2311: WSH_DEBUG_SV.log(l_module_name,'p_rr_uom_code',p_rr_uom_code);
2312: WSH_DEBUG_SV.log(l_module_name,'p_rr_qty',p_rr_qty);
2313: END IF;
2314:
2307: WSH_DEBUG_SV.push(l_module_name);
2308: WSH_DEBUG_SV.log(l_module_name,'p_uom_type',p_uom_type);
2309: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
2310: WSH_DEBUG_SV.log(l_module_name,'p_detail_uom_code',p_detail_uom_code);
2311: WSH_DEBUG_SV.log(l_module_name,'p_rr_uom_code',p_rr_uom_code);
2312: WSH_DEBUG_SV.log(l_module_name,'p_rr_qty',p_rr_qty);
2313: END IF;
2314:
2315: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2308: WSH_DEBUG_SV.log(l_module_name,'p_uom_type',p_uom_type);
2309: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
2310: WSH_DEBUG_SV.log(l_module_name,'p_detail_uom_code',p_detail_uom_code);
2311: WSH_DEBUG_SV.log(l_module_name,'p_rr_uom_code',p_rr_uom_code);
2312: WSH_DEBUG_SV.log(l_module_name,'p_rr_qty',p_rr_qty);
2313: END IF;
2314:
2315: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2316:
2333: x_return_status =>l_return_status);
2334: END IF;
2335:
2336: IF l_debug_on THEN
2337: WSH_DEBUG_SV.log(l_module_name,'wsh_util_validate.validate_uom
2338: l_return_status',l_return_status);
2339: END IF;
2340: wsh_util_core.api_post_call(
2341: p_return_status => l_return_status,
2358: x_conv_qty => x_convert_qty,
2359: x_return_status => l_return_status);
2360:
2361: IF l_debug_on THEN
2362: WSH_DEBUG_SV.log(l_module_name,'convert_quantity l_return_status',l_return_status);
2363: WSH_DEBUG_SV.log(l_module_name,'x_convert_qty',x_convert_qty);
2364: END IF;
2365:
2366: wsh_util_core.api_post_call(
2359: x_return_status => l_return_status);
2360:
2361: IF l_debug_on THEN
2362: WSH_DEBUG_SV.log(l_module_name,'convert_quantity l_return_status',l_return_status);
2363: WSH_DEBUG_SV.log(l_module_name,'x_convert_qty',x_convert_qty);
2364: END IF;
2365:
2366: wsh_util_core.api_post_call(
2367: p_return_status => l_return_status,
2376: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2377: END IF;
2378:
2379: IF l_debug_on THEN
2380: WSH_DEBUG_SV.pop(l_module_name);
2381: END IF;
2382: EXCEPTION
2383: WHEN FND_API.G_EXC_ERROR THEN
2384: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2383: WHEN FND_API.G_EXC_ERROR THEN
2384: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2385:
2386: IF l_debug_on THEN
2387: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
2388: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2389: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2390: END IF;
2391:
2384: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2385:
2386: IF l_debug_on THEN
2387: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
2388: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2389: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2390: END IF;
2391:
2392: WHEN OTHERS THEN
2385:
2386: IF l_debug_on THEN
2387: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
2388: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2389: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2390: END IF;
2391:
2392: WHEN OTHERS THEN
2393: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2392: WHEN OTHERS THEN
2393: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2394:
2395: IF l_debug_on THEN
2396: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2397: Oracle error message is '||
2398:
2399: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2400: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2395: IF l_debug_on THEN
2396: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2397: Oracle error message is '||
2398:
2399: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2400: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2401: END IF;
2402:
2403: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2396: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2397: Oracle error message is '||
2398:
2399: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2400: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2401: END IF;
2402:
2403: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2404: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2486:
2487: BEGIN
2488: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2489: IF l_debug_on IS NULL THEN
2490: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2491: END IF;
2492:
2493: IF l_debug_on THEN
2494: WSH_DEBUG_SV.push(l_module_name);
2490: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2491: END IF;
2492:
2493: IF l_debug_on THEN
2494: WSH_DEBUG_SV.push(l_module_name);
2495: WSH_DEBUG_SV.log(l_module_name,'P_vendor_id',P_vendor_id);
2496: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
2497: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
2498: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2491: END IF;
2492:
2493: IF l_debug_on THEN
2494: WSH_DEBUG_SV.push(l_module_name);
2495: WSH_DEBUG_SV.log(l_module_name,'P_vendor_id',P_vendor_id);
2496: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
2497: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
2498: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2499: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2492:
2493: IF l_debug_on THEN
2494: WSH_DEBUG_SV.push(l_module_name);
2495: WSH_DEBUG_SV.log(l_module_name,'P_vendor_id',P_vendor_id);
2496: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
2497: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
2498: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2499: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2500: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2493: IF l_debug_on THEN
2494: WSH_DEBUG_SV.push(l_module_name);
2495: WSH_DEBUG_SV.log(l_module_name,'P_vendor_id',P_vendor_id);
2496: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
2497: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
2498: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2499: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2500: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2501: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2494: WSH_DEBUG_SV.push(l_module_name);
2495: WSH_DEBUG_SV.log(l_module_name,'P_vendor_id',P_vendor_id);
2496: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
2497: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
2498: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2499: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2500: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2501: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2502: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2495: WSH_DEBUG_SV.log(l_module_name,'P_vendor_id',P_vendor_id);
2496: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
2497: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
2498: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2499: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2500: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2501: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2502: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2503: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2496: WSH_DEBUG_SV.log(l_module_name,'P_party_id',P_party_id);
2497: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
2498: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2499: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2500: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2501: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2502: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2503: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2504: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2497: WSH_DEBUG_SV.log(l_module_name,'p_location_code',p_location_code);
2498: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2499: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2500: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2501: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2502: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2503: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2504: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2505: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2498: WSH_DEBUG_SV.log(l_module_name,'P_address1',P_address1);
2499: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2500: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2501: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2502: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2503: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2504: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2505: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2506: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2499: WSH_DEBUG_SV.log(l_module_name,'P_address2',P_address2);
2500: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2501: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2502: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2503: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2504: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2505: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2506: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2507: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2500: WSH_DEBUG_SV.log(l_module_name,'P_address3',P_address3);
2501: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2502: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2503: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2504: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2505: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2506: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2507: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2508: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2501: WSH_DEBUG_SV.log(l_module_name,'P_address4',P_address4);
2502: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2503: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2504: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2505: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2506: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2507: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2508: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2509: WSH_DEBUG_SV.log(l_module_name,'p_email',p_email);
2502: WSH_DEBUG_SV.log(l_module_name,'P_city',P_city);
2503: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2504: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2505: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2506: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2507: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2508: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2509: WSH_DEBUG_SV.log(l_module_name,'p_email',p_email);
2510: END IF;
2503: WSH_DEBUG_SV.log(l_module_name,'P_postal_code',P_postal_code);
2504: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2505: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2506: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2507: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2508: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2509: WSH_DEBUG_SV.log(l_module_name,'p_email',p_email);
2510: END IF;
2511:
2504: WSH_DEBUG_SV.log(l_module_name,'P_state',P_state);
2505: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2506: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2507: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2508: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2509: WSH_DEBUG_SV.log(l_module_name,'p_email',p_email);
2510: END IF;
2511:
2512: IF (p_vendor_id IS NULL) THEN
2505: WSH_DEBUG_SV.log(l_module_name,'P_Province',P_Province);
2506: WSH_DEBUG_SV.log(l_module_name,'P_county',P_county);
2507: WSH_DEBUG_SV.log(l_module_name,'p_country',p_country);
2508: WSH_DEBUG_SV.log(l_module_name,'p_phone',p_phone);
2509: WSH_DEBUG_SV.log(l_module_name,'p_email',p_email);
2510: END IF;
2511:
2512: IF (p_vendor_id IS NULL) THEN
2513: FND_MESSAGE.SET_NAME('WSH','WSH_REQUIRED_FIELD_NULL');
2528: OPEN check_location_csr(p_party_id,p_location_code||'|'||p_party_id);
2529: FETCH check_location_csr INTO x_location_id,l_party_site_id,l_party_id,l_party_site_status; -- IB-phase-2
2530: --
2531: IF l_debug_on THEN
2532: WSH_DEBUG_SV.log(l_module_name,'x_location_id',x_location_id);
2533: WSH_DEBUG_SV.log(l_module_name,'l_party_site_id',l_party_site_id);
2534: WSH_DEBUG_SV.log(l_module_name,'l_party_id',l_party_id);
2535: WSH_DEBUG_SV.log(l_module_name,'l_party_site_status',l_party_site_status);
2536: END IF;
2529: FETCH check_location_csr INTO x_location_id,l_party_site_id,l_party_id,l_party_site_status; -- IB-phase-2
2530: --
2531: IF l_debug_on THEN
2532: WSH_DEBUG_SV.log(l_module_name,'x_location_id',x_location_id);
2533: WSH_DEBUG_SV.log(l_module_name,'l_party_site_id',l_party_site_id);
2534: WSH_DEBUG_SV.log(l_module_name,'l_party_id',l_party_id);
2535: WSH_DEBUG_SV.log(l_module_name,'l_party_site_status',l_party_site_status);
2536: END IF;
2537: --
2530: --
2531: IF l_debug_on THEN
2532: WSH_DEBUG_SV.log(l_module_name,'x_location_id',x_location_id);
2533: WSH_DEBUG_SV.log(l_module_name,'l_party_site_id',l_party_site_id);
2534: WSH_DEBUG_SV.log(l_module_name,'l_party_id',l_party_id);
2535: WSH_DEBUG_SV.log(l_module_name,'l_party_site_status',l_party_site_status);
2536: END IF;
2537: --
2538: IF (check_location_csr%NOTFOUND) THEN --{
2531: IF l_debug_on THEN
2532: WSH_DEBUG_SV.log(l_module_name,'x_location_id',x_location_id);
2533: WSH_DEBUG_SV.log(l_module_name,'l_party_site_id',l_party_site_id);
2534: WSH_DEBUG_SV.log(l_module_name,'l_party_id',l_party_id);
2535: WSH_DEBUG_SV.log(l_module_name,'l_party_site_status',l_party_site_status);
2536: END IF;
2537: --
2538: IF (check_location_csr%NOTFOUND) THEN --{
2539:
2559: x_party_site_id => x_party_site_id,
2560: x_return_status => l_return_status);
2561:
2562: IF l_debug_on THEN
2563: WSH_DEBUG_SV.log(l_module_name,'Create_Address l_return_status',l_return_status);
2564: WSH_DEBUG_SV.log(l_module_name,'x_location_id',x_location_id);
2565: WSH_DEBUG_SV.log(l_module_name,'l_party_site_id',l_party_site_id);
2566: END IF;
2567:
2560: x_return_status => l_return_status);
2561:
2562: IF l_debug_on THEN
2563: WSH_DEBUG_SV.log(l_module_name,'Create_Address l_return_status',l_return_status);
2564: WSH_DEBUG_SV.log(l_module_name,'x_location_id',x_location_id);
2565: WSH_DEBUG_SV.log(l_module_name,'l_party_site_id',l_party_site_id);
2566: END IF;
2567:
2568: wsh_util_core.api_post_call(
2561:
2562: IF l_debug_on THEN
2563: WSH_DEBUG_SV.log(l_module_name,'Create_Address l_return_status',l_return_status);
2564: WSH_DEBUG_SV.log(l_module_name,'x_location_id',x_location_id);
2565: WSH_DEBUG_SV.log(l_module_name,'l_party_site_id',l_party_site_id);
2566: END IF;
2567:
2568: wsh_util_core.api_post_call(
2569: p_return_status => l_return_status,
2604: p_email => p_email,
2605: x_return_status => l_return_status);
2606:
2607: IF l_debug_on THEN
2608: WSH_DEBUG_SV.log(l_module_name,'Update_Address l_return_status',l_return_status);
2609: END IF;
2610:
2611: wsh_util_core.api_post_call(
2612: p_return_status => l_return_status,
2622: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2623: END IF;
2624:
2625: IF l_debug_on THEN
2626: WSH_DEBUG_SV.pop(l_module_name);
2627: END IF;
2628: EXCEPTION
2629: WHEN FND_API.G_EXC_ERROR THEN
2630: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2633: CLOSE check_location_csr;
2634: END IF;
2635:
2636: IF l_debug_on THEN
2637: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
2638: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2639: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2640: END IF;
2641:
2634: END IF;
2635:
2636: IF l_debug_on THEN
2637: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
2638: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2639: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2640: END IF;
2641:
2642: WHEN OTHERS THEN
2635:
2636: IF l_debug_on THEN
2637: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
2638: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2639: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2640: END IF;
2641:
2642: WHEN OTHERS THEN
2643: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2645: IF (check_location_csr%ISOPEN) THEN
2646: CLOSE check_location_csr;
2647: END IF;
2648: IF l_debug_on THEN
2649: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2650: Oracle error message is '||
2651:
2652: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2653: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2648: IF l_debug_on THEN
2649: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2650: Oracle error message is '||
2651:
2652: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2653: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2654: END IF;
2655: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2656: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2649: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2650: Oracle error message is '||
2651:
2652: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2653: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2654: END IF;
2655: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2656: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2657: fnd_msg_pub.add;
2696: l_tab_count number;
2697: BEGIN
2698: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2699: IF l_debug_on IS NULL THEN
2700: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2701: END IF;
2702:
2703: IF l_debug_on THEN
2704: WSH_DEBUG_SV.push(l_module_name);
2700: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2701: END IF;
2702:
2703: IF l_debug_on THEN
2704: WSH_DEBUG_SV.push(l_module_name);
2705:
2706: WSH_DEBUG_SV.log(l_module_name,'p_po_line_location_id',p_po_line_location_id);
2707: END IF;
2708:
2702:
2703: IF l_debug_on THEN
2704: WSH_DEBUG_SV.push(l_module_name);
2705:
2706: WSH_DEBUG_SV.log(l_module_name,'p_po_line_location_id',p_po_line_location_id);
2707: END IF;
2708:
2709: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2710:
2716: x_return_status => l_return_status);
2717:
2718: IF l_debug_on THEN
2719:
2720: WSH_DEBUG_SV.log(l_module_name,'WSH_INBOUND_UTIL_PKG.get_po_rcv_attributes
2721: l_return_status',l_return_status);
2722: END IF;
2723:
2724: wsh_util_core.api_post_call(
2728:
2729: l_index := l_line_rec.header_id.first;
2730:
2731: IF l_debug_on THEN
2732: WSH_DEBUG_SV.log(l_module_name,'l_index',l_index);
2733: WSH_DEBUG_SV.log(l_module_name,'header_id',l_line_rec.header_id(l_index));
2734: WSH_DEBUG_SV.log(l_module_name,'line_id',l_line_rec.line_id(l_index));
2735: WSH_DEBUG_SV.log(l_module_name,'vendor_id',l_line_rec.vendor_id(l_index));
2736: END IF;
2729: l_index := l_line_rec.header_id.first;
2730:
2731: IF l_debug_on THEN
2732: WSH_DEBUG_SV.log(l_module_name,'l_index',l_index);
2733: WSH_DEBUG_SV.log(l_module_name,'header_id',l_line_rec.header_id(l_index));
2734: WSH_DEBUG_SV.log(l_module_name,'line_id',l_line_rec.line_id(l_index));
2735: WSH_DEBUG_SV.log(l_module_name,'vendor_id',l_line_rec.vendor_id(l_index));
2736: END IF;
2737:
2730:
2731: IF l_debug_on THEN
2732: WSH_DEBUG_SV.log(l_module_name,'l_index',l_index);
2733: WSH_DEBUG_SV.log(l_module_name,'header_id',l_line_rec.header_id(l_index));
2734: WSH_DEBUG_SV.log(l_module_name,'line_id',l_line_rec.line_id(l_index));
2735: WSH_DEBUG_SV.log(l_module_name,'vendor_id',l_line_rec.vendor_id(l_index));
2736: END IF;
2737:
2738: --Populate additional line information.
2731: IF l_debug_on THEN
2732: WSH_DEBUG_SV.log(l_module_name,'l_index',l_index);
2733: WSH_DEBUG_SV.log(l_module_name,'header_id',l_line_rec.header_id(l_index));
2734: WSH_DEBUG_SV.log(l_module_name,'line_id',l_line_rec.line_id(l_index));
2735: WSH_DEBUG_SV.log(l_module_name,'vendor_id',l_line_rec.vendor_id(l_index));
2736: END IF;
2737:
2738: --Populate additional line information.
2739: WSH_PO_CMG_PVT.populate_additional_line_info(
2742: p_additional_line_info_rec => l_additional_line_info_rec ,
2743: x_return_status => l_return_status);
2744:
2745: IF l_debug_on THEN
2746: WSH_DEBUG_SV.log(l_module_name,'WSH_PO_CMG_PVT.populate_additional_line_info l_return_status',l_return_status);
2747: WSH_DEBUG_SV.log(l_module_name,'l_additional_line_info_rec.service_level.count',l_additional_line_info_rec.service_level.count);
2748: END IF;
2749: wsh_util_core.api_post_call(
2750: p_return_status => l_return_status,
2743: x_return_status => l_return_status);
2744:
2745: IF l_debug_on THEN
2746: WSH_DEBUG_SV.log(l_module_name,'WSH_PO_CMG_PVT.populate_additional_line_info l_return_status',l_return_status);
2747: WSH_DEBUG_SV.log(l_module_name,'l_additional_line_info_rec.service_level.count',l_additional_line_info_rec.service_level.count);
2748: END IF;
2749: wsh_util_core.api_post_call(
2750: p_return_status => l_return_status,
2751: x_num_warnings => l_num_warnings,
2776: p_additional_line_info_rec => l_additional_line_info_rec,
2777: X_return_status => l_return_status);
2778:
2779: IF l_debug_on THEN
2780: WSH_DEBUG_SV.log(l_module_name,'WSH_BULK_PROCESS_PVT.bulk_insert_details
2781: l_return_status',l_return_status);
2782: END IF;
2783: wsh_util_core.api_post_call(
2784: p_return_status => l_return_status,
2797: END IF;
2798:
2799: IF l_debug_on THEN
2800:
2801: WSH_DEBUG_SV.log(l_module_name,'x_delivery_detail_id',x_delivery_detail_id);
2802: WSH_DEBUG_SV.pop(l_module_name);
2803: END IF;
2804:
2805: EXCEPTION
2798:
2799: IF l_debug_on THEN
2800:
2801: WSH_DEBUG_SV.log(l_module_name,'x_delivery_detail_id',x_delivery_detail_id);
2802: WSH_DEBUG_SV.pop(l_module_name);
2803: END IF;
2804:
2805: EXCEPTION
2806: WHEN FND_API.G_EXC_ERROR THEN
2806: WHEN FND_API.G_EXC_ERROR THEN
2807: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2808:
2809: IF l_debug_on THEN
2810: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
2811: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2812: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2813: END IF;
2814:
2807: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2808:
2809: IF l_debug_on THEN
2810: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
2811: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2812: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2813: END IF;
2814:
2815: WHEN OTHERS THEN
2808:
2809: IF l_debug_on THEN
2810: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
2811: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2812: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2813: END IF;
2814:
2815: WHEN OTHERS THEN
2816: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2815: WHEN OTHERS THEN
2816: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2817:
2818: IF l_debug_on THEN
2819: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2820: Oracle error message is '||
2821:
2822: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2823: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2818: IF l_debug_on THEN
2819: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2820: Oracle error message is '||
2821:
2822: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2823: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2824: END IF;
2825: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2826: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2819: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2820: Oracle error message is '||
2821:
2822: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2823: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2824: END IF;
2825: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
2826: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2827: fnd_msg_pub.add;
2873:
2874: BEGIN
2875: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2876: IF l_debug_on IS NULL THEN
2877: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2878: END IF;
2879:
2880: IF l_debug_on THEN
2881: WSH_DEBUG_SV.push(l_module_name);
2877: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2878: END IF;
2879:
2880: IF l_debug_on THEN
2881: WSH_DEBUG_SV.push(l_module_name);
2882: WSH_DEBUG_SV.log(l_module_name,'p_header_id',p_header_id);
2883: WSH_DEBUG_SV.log(l_module_name,'p_header',p_header);
2884: WSH_DEBUG_SV.log(l_module_name,'p_line_id',p_line_id);
2885: WSH_DEBUG_SV.log(l_module_name,'p_line_location_id',p_line_location_id);
2878: END IF;
2879:
2880: IF l_debug_on THEN
2881: WSH_DEBUG_SV.push(l_module_name);
2882: WSH_DEBUG_SV.log(l_module_name,'p_header_id',p_header_id);
2883: WSH_DEBUG_SV.log(l_module_name,'p_header',p_header);
2884: WSH_DEBUG_SV.log(l_module_name,'p_line_id',p_line_id);
2885: WSH_DEBUG_SV.log(l_module_name,'p_line_location_id',p_line_location_id);
2886: WSH_DEBUG_SV.log(l_module_name,'p_release_id',p_release_id);
2879:
2880: IF l_debug_on THEN
2881: WSH_DEBUG_SV.push(l_module_name);
2882: WSH_DEBUG_SV.log(l_module_name,'p_header_id',p_header_id);
2883: WSH_DEBUG_SV.log(l_module_name,'p_header',p_header);
2884: WSH_DEBUG_SV.log(l_module_name,'p_line_id',p_line_id);
2885: WSH_DEBUG_SV.log(l_module_name,'p_line_location_id',p_line_location_id);
2886: WSH_DEBUG_SV.log(l_module_name,'p_release_id',p_release_id);
2887: WSH_DEBUG_SV.log(l_module_name,'Current_Release',PO_CODE_RELEASE_GRP.Current_Release);
2880: IF l_debug_on THEN
2881: WSH_DEBUG_SV.push(l_module_name);
2882: WSH_DEBUG_SV.log(l_module_name,'p_header_id',p_header_id);
2883: WSH_DEBUG_SV.log(l_module_name,'p_header',p_header);
2884: WSH_DEBUG_SV.log(l_module_name,'p_line_id',p_line_id);
2885: WSH_DEBUG_SV.log(l_module_name,'p_line_location_id',p_line_location_id);
2886: WSH_DEBUG_SV.log(l_module_name,'p_release_id',p_release_id);
2887: WSH_DEBUG_SV.log(l_module_name,'Current_Release',PO_CODE_RELEASE_GRP.Current_Release);
2888: WSH_DEBUG_SV.log(l_module_name,'PRC_11i_Family_Pack_J',PO_CODE_RELEASE_GRP.PRC_11i_Family_Pack_J);
2881: WSH_DEBUG_SV.push(l_module_name);
2882: WSH_DEBUG_SV.log(l_module_name,'p_header_id',p_header_id);
2883: WSH_DEBUG_SV.log(l_module_name,'p_header',p_header);
2884: WSH_DEBUG_SV.log(l_module_name,'p_line_id',p_line_id);
2885: WSH_DEBUG_SV.log(l_module_name,'p_line_location_id',p_line_location_id);
2886: WSH_DEBUG_SV.log(l_module_name,'p_release_id',p_release_id);
2887: WSH_DEBUG_SV.log(l_module_name,'Current_Release',PO_CODE_RELEASE_GRP.Current_Release);
2888: WSH_DEBUG_SV.log(l_module_name,'PRC_11i_Family_Pack_J',PO_CODE_RELEASE_GRP.PRC_11i_Family_Pack_J);
2889: END IF;
2882: WSH_DEBUG_SV.log(l_module_name,'p_header_id',p_header_id);
2883: WSH_DEBUG_SV.log(l_module_name,'p_header',p_header);
2884: WSH_DEBUG_SV.log(l_module_name,'p_line_id',p_line_id);
2885: WSH_DEBUG_SV.log(l_module_name,'p_line_location_id',p_line_location_id);
2886: WSH_DEBUG_SV.log(l_module_name,'p_release_id',p_release_id);
2887: WSH_DEBUG_SV.log(l_module_name,'Current_Release',PO_CODE_RELEASE_GRP.Current_Release);
2888: WSH_DEBUG_SV.log(l_module_name,'PRC_11i_Family_Pack_J',PO_CODE_RELEASE_GRP.PRC_11i_Family_Pack_J);
2889: END IF;
2890:
2883: WSH_DEBUG_SV.log(l_module_name,'p_header',p_header);
2884: WSH_DEBUG_SV.log(l_module_name,'p_line_id',p_line_id);
2885: WSH_DEBUG_SV.log(l_module_name,'p_line_location_id',p_line_location_id);
2886: WSH_DEBUG_SV.log(l_module_name,'p_release_id',p_release_id);
2887: WSH_DEBUG_SV.log(l_module_name,'Current_Release',PO_CODE_RELEASE_GRP.Current_Release);
2888: WSH_DEBUG_SV.log(l_module_name,'PRC_11i_Family_Pack_J',PO_CODE_RELEASE_GRP.PRC_11i_Family_Pack_J);
2889: END IF;
2890:
2891: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2884: WSH_DEBUG_SV.log(l_module_name,'p_line_id',p_line_id);
2885: WSH_DEBUG_SV.log(l_module_name,'p_line_location_id',p_line_location_id);
2886: WSH_DEBUG_SV.log(l_module_name,'p_release_id',p_release_id);
2887: WSH_DEBUG_SV.log(l_module_name,'Current_Release',PO_CODE_RELEASE_GRP.Current_Release);
2888: WSH_DEBUG_SV.log(l_module_name,'PRC_11i_Family_Pack_J',PO_CODE_RELEASE_GRP.PRC_11i_Family_Pack_J);
2889: END IF;
2890:
2891: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2892:
2892:
2893: --Validate status only if code release is PRC_11i_Family_Pack_J or later.
2894: IF (PO_CODE_RELEASE_GRP.Current_Release >=PO_CODE_RELEASE_GRP.PRC_11i_Family_Pack_J) THEN
2895: IF l_debug_on THEN
2896: WSH_DEBUG_SV.logmsg(l_module_name,'Before calling PO_FTE_INTEGRATION_GRP.po_status_check');
2897: END IF;
2898:
2899: PO_FTE_INTEGRATION_GRP.po_status_check (
2900: p_api_version => 1,
2906: x_po_status_rec => l_po_status_rec,
2907: x_return_status => l_return_status);
2908:
2909: IF l_debug_on THEN
2910: WSH_DEBUG_SV.log(l_module_name,'PO_FTE_INTEGRATION_GRP.po_status_check l_return_status',l_return_status);
2911: END IF;
2912:
2913: wsh_util_core.api_post_call(
2914: p_return_status => l_return_status,
2923:
2924: l_index:=l_po_status_rec.approval_flag.first;
2925: WHILE (l_index IS NOT NULL) LOOP
2926: IF l_debug_on THEN
2927: WSH_DEBUG_SV.log(l_module_name,'approval_flag',l_po_status_rec.approval_flag(l_index));
2928: WSH_DEBUG_SV.log(l_module_name,'cancel_flag',l_po_status_rec.cancel_flag(l_index));
2929: WSH_DEBUG_SV.log(l_module_name,'closed_code',l_po_status_rec.closed_code(l_index));
2930: WSH_DEBUG_SV.log(l_module_name,'hold_flag',l_po_status_rec.hold_flag(l_index));
2931: END IF;
2924: l_index:=l_po_status_rec.approval_flag.first;
2925: WHILE (l_index IS NOT NULL) LOOP
2926: IF l_debug_on THEN
2927: WSH_DEBUG_SV.log(l_module_name,'approval_flag',l_po_status_rec.approval_flag(l_index));
2928: WSH_DEBUG_SV.log(l_module_name,'cancel_flag',l_po_status_rec.cancel_flag(l_index));
2929: WSH_DEBUG_SV.log(l_module_name,'closed_code',l_po_status_rec.closed_code(l_index));
2930: WSH_DEBUG_SV.log(l_module_name,'hold_flag',l_po_status_rec.hold_flag(l_index));
2931: END IF;
2932:
2925: WHILE (l_index IS NOT NULL) LOOP
2926: IF l_debug_on THEN
2927: WSH_DEBUG_SV.log(l_module_name,'approval_flag',l_po_status_rec.approval_flag(l_index));
2928: WSH_DEBUG_SV.log(l_module_name,'cancel_flag',l_po_status_rec.cancel_flag(l_index));
2929: WSH_DEBUG_SV.log(l_module_name,'closed_code',l_po_status_rec.closed_code(l_index));
2930: WSH_DEBUG_SV.log(l_module_name,'hold_flag',l_po_status_rec.hold_flag(l_index));
2931: END IF;
2932:
2933: --IF PO is 'CLOSED','FINALLY CLOSED','CLOSED FOR RECEIVING' and not Cancelled.
2926: IF l_debug_on THEN
2927: WSH_DEBUG_SV.log(l_module_name,'approval_flag',l_po_status_rec.approval_flag(l_index));
2928: WSH_DEBUG_SV.log(l_module_name,'cancel_flag',l_po_status_rec.cancel_flag(l_index));
2929: WSH_DEBUG_SV.log(l_module_name,'closed_code',l_po_status_rec.closed_code(l_index));
2930: WSH_DEBUG_SV.log(l_module_name,'hold_flag',l_po_status_rec.hold_flag(l_index));
2931: END IF;
2932:
2933: --IF PO is 'CLOSED','FINALLY CLOSED','CLOSED FOR RECEIVING' and not Cancelled.
2934: IF (nvl(l_po_status_rec.closed_code(l_index),'N') IN ('CLOSED','FINALLY CLOSED','CLOSED FOR RECEIVING')
2974: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
2975: END IF;
2976:
2977: IF l_debug_on THEN
2978: WSH_DEBUG_SV.pop(l_module_name);
2979: END IF;
2980: EXCEPTION
2981: WHEN FND_API.G_EXC_ERROR THEN
2982: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2981: WHEN FND_API.G_EXC_ERROR THEN
2982: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2983:
2984: IF l_debug_on THEN
2985: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
2986: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2987: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2988: END IF;
2989:
2982: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
2983:
2984: IF l_debug_on THEN
2985: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
2986: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2987: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2988: END IF;
2989:
2990: WHEN OTHERS THEN
2983:
2984: IF l_debug_on THEN
2985: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
2986: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2987: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
2988: END IF;
2989:
2990: WHEN OTHERS THEN
2991: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2990: WHEN OTHERS THEN
2991: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2992:
2993: IF l_debug_on THEN
2994: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2995: Oracle error message is '||
2996:
2997: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2998: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2993: IF l_debug_on THEN
2994: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2995: Oracle error message is '||
2996:
2997: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2998: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2999: END IF;
3000: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3001: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
2994: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
2995: Oracle error message is '||
2996:
2997: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2998: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2999: END IF;
3000: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3001: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
3002: fnd_msg_pub.add;
3067: l_num_errors number;
3068: BEGIN
3069: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3070: IF l_debug_on IS NULL THEN
3071: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3072: END IF;
3073:
3074: IF l_debug_on THEN
3075: WSH_DEBUG_SV.push(l_module_name);
3071: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3072: END IF;
3073:
3074: IF l_debug_on THEN
3075: WSH_DEBUG_SV.push(l_module_name);
3076: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
3077: WSH_DEBUG_SV.log(l_module_name,'p_item_id',p_item_id);
3078: WSH_DEBUG_SV.log(l_module_name,'p_line_index',p_line_index);
3079: WSH_DEBUG_SV.log(l_module_name,'p_line.delivery_line_number.count',p_line.delivery_line_number.count);
3072: END IF;
3073:
3074: IF l_debug_on THEN
3075: WSH_DEBUG_SV.push(l_module_name);
3076: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
3077: WSH_DEBUG_SV.log(l_module_name,'p_item_id',p_item_id);
3078: WSH_DEBUG_SV.log(l_module_name,'p_line_index',p_line_index);
3079: WSH_DEBUG_SV.log(l_module_name,'p_line.delivery_line_number.count',p_line.delivery_line_number.count);
3080: WSH_DEBUG_SV.log(l_module_name,'earliest_pickup_date',p_line.earliest_pickup_date(p_line_index));
3073:
3074: IF l_debug_on THEN
3075: WSH_DEBUG_SV.push(l_module_name);
3076: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
3077: WSH_DEBUG_SV.log(l_module_name,'p_item_id',p_item_id);
3078: WSH_DEBUG_SV.log(l_module_name,'p_line_index',p_line_index);
3079: WSH_DEBUG_SV.log(l_module_name,'p_line.delivery_line_number.count',p_line.delivery_line_number.count);
3080: WSH_DEBUG_SV.log(l_module_name,'earliest_pickup_date',p_line.earliest_pickup_date(p_line_index));
3081: WSH_DEBUG_SV.log(l_module_name,'latest_pickup_date',p_line.latest_pickup_date(p_line_index));
3074: IF l_debug_on THEN
3075: WSH_DEBUG_SV.push(l_module_name);
3076: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
3077: WSH_DEBUG_SV.log(l_module_name,'p_item_id',p_item_id);
3078: WSH_DEBUG_SV.log(l_module_name,'p_line_index',p_line_index);
3079: WSH_DEBUG_SV.log(l_module_name,'p_line.delivery_line_number.count',p_line.delivery_line_number.count);
3080: WSH_DEBUG_SV.log(l_module_name,'earliest_pickup_date',p_line.earliest_pickup_date(p_line_index));
3081: WSH_DEBUG_SV.log(l_module_name,'latest_pickup_date',p_line.latest_pickup_date(p_line_index));
3082: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',p_line.Item_quantity(p_line_index));
3075: WSH_DEBUG_SV.push(l_module_name);
3076: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
3077: WSH_DEBUG_SV.log(l_module_name,'p_item_id',p_item_id);
3078: WSH_DEBUG_SV.log(l_module_name,'p_line_index',p_line_index);
3079: WSH_DEBUG_SV.log(l_module_name,'p_line.delivery_line_number.count',p_line.delivery_line_number.count);
3080: WSH_DEBUG_SV.log(l_module_name,'earliest_pickup_date',p_line.earliest_pickup_date(p_line_index));
3081: WSH_DEBUG_SV.log(l_module_name,'latest_pickup_date',p_line.latest_pickup_date(p_line_index));
3082: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',p_line.Item_quantity(p_line_index));
3083: WSH_DEBUG_SV.log(l_module_name,'weight',p_line.weight(p_line_index));
3076: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
3077: WSH_DEBUG_SV.log(l_module_name,'p_item_id',p_item_id);
3078: WSH_DEBUG_SV.log(l_module_name,'p_line_index',p_line_index);
3079: WSH_DEBUG_SV.log(l_module_name,'p_line.delivery_line_number.count',p_line.delivery_line_number.count);
3080: WSH_DEBUG_SV.log(l_module_name,'earliest_pickup_date',p_line.earliest_pickup_date(p_line_index));
3081: WSH_DEBUG_SV.log(l_module_name,'latest_pickup_date',p_line.latest_pickup_date(p_line_index));
3082: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',p_line.Item_quantity(p_line_index));
3083: WSH_DEBUG_SV.log(l_module_name,'weight',p_line.weight(p_line_index));
3084: WSH_DEBUG_SV.log(l_module_name,'weight_uom', p_line.weight_uom(p_line_index));
3077: WSH_DEBUG_SV.log(l_module_name,'p_item_id',p_item_id);
3078: WSH_DEBUG_SV.log(l_module_name,'p_line_index',p_line_index);
3079: WSH_DEBUG_SV.log(l_module_name,'p_line.delivery_line_number.count',p_line.delivery_line_number.count);
3080: WSH_DEBUG_SV.log(l_module_name,'earliest_pickup_date',p_line.earliest_pickup_date(p_line_index));
3081: WSH_DEBUG_SV.log(l_module_name,'latest_pickup_date',p_line.latest_pickup_date(p_line_index));
3082: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',p_line.Item_quantity(p_line_index));
3083: WSH_DEBUG_SV.log(l_module_name,'weight',p_line.weight(p_line_index));
3084: WSH_DEBUG_SV.log(l_module_name,'weight_uom', p_line.weight_uom(p_line_index));
3085: WSH_DEBUG_SV.log(l_module_name,'volume',p_line.volume(p_line_index));
3078: WSH_DEBUG_SV.log(l_module_name,'p_line_index',p_line_index);
3079: WSH_DEBUG_SV.log(l_module_name,'p_line.delivery_line_number.count',p_line.delivery_line_number.count);
3080: WSH_DEBUG_SV.log(l_module_name,'earliest_pickup_date',p_line.earliest_pickup_date(p_line_index));
3081: WSH_DEBUG_SV.log(l_module_name,'latest_pickup_date',p_line.latest_pickup_date(p_line_index));
3082: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',p_line.Item_quantity(p_line_index));
3083: WSH_DEBUG_SV.log(l_module_name,'weight',p_line.weight(p_line_index));
3084: WSH_DEBUG_SV.log(l_module_name,'weight_uom', p_line.weight_uom(p_line_index));
3085: WSH_DEBUG_SV.log(l_module_name,'volume',p_line.volume(p_line_index));
3086: WSH_DEBUG_SV.log(l_module_name,'volume_uom',p_line.volume_uom(p_line_index));
3079: WSH_DEBUG_SV.log(l_module_name,'p_line.delivery_line_number.count',p_line.delivery_line_number.count);
3080: WSH_DEBUG_SV.log(l_module_name,'earliest_pickup_date',p_line.earliest_pickup_date(p_line_index));
3081: WSH_DEBUG_SV.log(l_module_name,'latest_pickup_date',p_line.latest_pickup_date(p_line_index));
3082: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',p_line.Item_quantity(p_line_index));
3083: WSH_DEBUG_SV.log(l_module_name,'weight',p_line.weight(p_line_index));
3084: WSH_DEBUG_SV.log(l_module_name,'weight_uom', p_line.weight_uom(p_line_index));
3085: WSH_DEBUG_SV.log(l_module_name,'volume',p_line.volume(p_line_index));
3086: WSH_DEBUG_SV.log(l_module_name,'volume_uom',p_line.volume_uom(p_line_index));
3087: END IF;
3080: WSH_DEBUG_SV.log(l_module_name,'earliest_pickup_date',p_line.earliest_pickup_date(p_line_index));
3081: WSH_DEBUG_SV.log(l_module_name,'latest_pickup_date',p_line.latest_pickup_date(p_line_index));
3082: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',p_line.Item_quantity(p_line_index));
3083: WSH_DEBUG_SV.log(l_module_name,'weight',p_line.weight(p_line_index));
3084: WSH_DEBUG_SV.log(l_module_name,'weight_uom', p_line.weight_uom(p_line_index));
3085: WSH_DEBUG_SV.log(l_module_name,'volume',p_line.volume(p_line_index));
3086: WSH_DEBUG_SV.log(l_module_name,'volume_uom',p_line.volume_uom(p_line_index));
3087: END IF;
3088:
3081: WSH_DEBUG_SV.log(l_module_name,'latest_pickup_date',p_line.latest_pickup_date(p_line_index));
3082: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',p_line.Item_quantity(p_line_index));
3083: WSH_DEBUG_SV.log(l_module_name,'weight',p_line.weight(p_line_index));
3084: WSH_DEBUG_SV.log(l_module_name,'weight_uom', p_line.weight_uom(p_line_index));
3085: WSH_DEBUG_SV.log(l_module_name,'volume',p_line.volume(p_line_index));
3086: WSH_DEBUG_SV.log(l_module_name,'volume_uom',p_line.volume_uom(p_line_index));
3087: END IF;
3088:
3089: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3082: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',p_line.Item_quantity(p_line_index));
3083: WSH_DEBUG_SV.log(l_module_name,'weight',p_line.weight(p_line_index));
3084: WSH_DEBUG_SV.log(l_module_name,'weight_uom', p_line.weight_uom(p_line_index));
3085: WSH_DEBUG_SV.log(l_module_name,'volume',p_line.volume(p_line_index));
3086: WSH_DEBUG_SV.log(l_module_name,'volume_uom',p_line.volume_uom(p_line_index));
3087: END IF;
3088:
3089: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3090:
3182: --{
3183: IF (p_item_id IS NULL) THEN
3184: --For One time Item directly validate the UOM from mtl_units_of_measure.
3185: IF l_debug_on THEN
3186: WSH_DEBUG_SV.logmsg(l_module_name,' Lose Item');
3187: END IF;
3188:
3189: OPEN get_item_uom(p_line.item_uom(p_line_index));
3190: FETCH get_item_uom INTO l_tmp;
3209: x_conv_qty => l_item_qty,
3210: x_return_status => l_return_status);
3211:
3212: IF l_debug_on THEN
3213: WSH_DEBUG_SV.log(l_module_name,'convert_quantity l_return_status',l_return_status);
3214: WSH_DEBUG_SV.log(l_module_name,'x_convert_qty',l_item_qty);
3215: END IF;
3216:
3217: wsh_util_core.api_post_call(
3210: x_return_status => l_return_status);
3211:
3212: IF l_debug_on THEN
3213: WSH_DEBUG_SV.log(l_module_name,'convert_quantity l_return_status',l_return_status);
3214: WSH_DEBUG_SV.log(l_module_name,'x_convert_qty',l_item_qty);
3215: END IF;
3216:
3217: wsh_util_core.api_post_call(
3218: p_return_status => l_return_status,
3232: x_convert_qty => l_item_qty,
3233: x_return_status => l_return_status);
3234:
3235: IF l_debug_on THEN
3236: WSH_DEBUG_SV.log(l_module_name,'validate_uom l_return_status',l_return_status);
3237: WSH_DEBUG_SV.log(l_module_name,'l_item_qty',l_item_qty);
3238: END IF;
3239:
3240: wsh_util_core.api_post_call(
3233: x_return_status => l_return_status);
3234:
3235: IF l_debug_on THEN
3236: WSH_DEBUG_SV.log(l_module_name,'validate_uom l_return_status',l_return_status);
3237: WSH_DEBUG_SV.log(l_module_name,'l_item_qty',l_item_qty);
3238: END IF;
3239:
3240: wsh_util_core.api_post_call(
3241: p_return_status => l_return_status,
3257: x_output_quantity =>x_detail_item_qty,
3258: x_return_status =>l_return_status);
3259:
3260: IF l_debug_on THEN
3261: WSH_DEBUG_SV.log(l_module_name,'WSH_DETAILS_VALIDATIONS.check_decimal_quantity l_return_status',l_return_status);
3262: WSH_DEBUG_SV.log(l_module_name,'x_detail_item_qty',x_detail_item_qty);
3263: END IF;
3264: wsh_util_core.api_post_call(
3265: p_return_status => l_return_status,
3258: x_return_status =>l_return_status);
3259:
3260: IF l_debug_on THEN
3261: WSH_DEBUG_SV.log(l_module_name,'WSH_DETAILS_VALIDATIONS.check_decimal_quantity l_return_status',l_return_status);
3262: WSH_DEBUG_SV.log(l_module_name,'x_detail_item_qty',x_detail_item_qty);
3263: END IF;
3264: wsh_util_core.api_post_call(
3265: p_return_status => l_return_status,
3266: x_num_warnings => l_num_warnings,
3279: x_convert_qty => x_detail_weight_qty,
3280: x_return_status => l_return_status);
3281:
3282: IF l_debug_on THEN
3283: WSH_DEBUG_SV.log(l_module_name,'validate_uom l_return_status',l_return_status);
3284: END IF;
3285:
3286: wsh_util_core.api_post_call(
3287: p_return_status => l_return_status,
3297: x_convert_qty => x_detail_volume_qty,
3298: x_return_status => l_return_status);
3299:
3300: IF l_debug_on THEN
3301: WSH_DEBUG_SV.log(l_module_name,'validate_uom l_return_status',l_return_status);
3302: END IF;
3303: wsh_util_core.api_post_call(
3304: p_return_status => l_return_status,
3305: x_num_warnings => l_num_warnings,
3312: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3313: END IF;
3314:
3315: IF l_debug_on THEN
3316: WSH_DEBUG_SV.pop(l_module_name);
3317: END IF;
3318: EXCEPTION
3319: WHEN FND_API.G_EXC_ERROR THEN
3320: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
3319: WHEN FND_API.G_EXC_ERROR THEN
3320: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
3321:
3322: IF l_debug_on THEN
3323: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
3324: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3325: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3326: END IF;
3327:
3320: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
3321:
3322: IF l_debug_on THEN
3323: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
3324: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3325: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3326: END IF;
3327:
3328: WHEN OTHERS THEN
3321:
3322: IF l_debug_on THEN
3323: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
3324: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3325: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3326: END IF;
3327:
3328: WHEN OTHERS THEN
3329: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3328: WHEN OTHERS THEN
3329: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3330:
3331: IF l_debug_on THEN
3332: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
3333: Oracle error message is '||
3334:
3335: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3336: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3331: IF l_debug_on THEN
3332: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
3333: Oracle error message is '||
3334:
3335: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3336: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3337: END IF;
3338:
3339: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3332: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
3333: Oracle error message is '||
3334:
3335: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3336: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3337: END IF;
3338:
3339: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3340: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
3378: l_num_errors number;
3379: BEGIN
3380: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3381: IF l_debug_on IS NULL THEN
3382: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3383: END IF;
3384:
3385: IF l_debug_on THEN
3386: WSH_DEBUG_SV.push(l_module_name);
3382: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3383: END IF;
3384:
3385: IF l_debug_on THEN
3386: WSH_DEBUG_SV.push(l_module_name);
3387: WSH_DEBUG_SV.log(l_module_name,'p_delivery_index',p_delivery_index);
3388: WSH_DEBUG_SV.log(l_module_name,'p_delivery.Ship_From_Address1.count',p_delivery.Ship_From_Address1.count);
3389: END IF;
3390:
3383: END IF;
3384:
3385: IF l_debug_on THEN
3386: WSH_DEBUG_SV.push(l_module_name);
3387: WSH_DEBUG_SV.log(l_module_name,'p_delivery_index',p_delivery_index);
3388: WSH_DEBUG_SV.log(l_module_name,'p_delivery.Ship_From_Address1.count',p_delivery.Ship_From_Address1.count);
3389: END IF;
3390:
3391: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3384:
3385: IF l_debug_on THEN
3386: WSH_DEBUG_SV.push(l_module_name);
3387: WSH_DEBUG_SV.log(l_module_name,'p_delivery_index',p_delivery_index);
3388: WSH_DEBUG_SV.log(l_module_name,'p_delivery.Ship_From_Address1.count',p_delivery.Ship_From_Address1.count);
3389: END IF;
3390:
3391: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3392:
3476: x_party_site_id => p_detail_att.party_site_id,
3477: x_return_status => l_return_status);
3478:
3479: IF l_debug_on THEN
3480: WSH_DEBUG_SV.log(l_module_name,'Process_Address l_return_status',l_return_status);
3481: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id',p_detail_att.ship_from_location_id);
3482: WSH_DEBUG_SV.log(l_module_name,'party_site_id',p_detail_att.party_site_id);
3483: END IF;
3484: wsh_util_core.api_post_call(
3477: x_return_status => l_return_status);
3478:
3479: IF l_debug_on THEN
3480: WSH_DEBUG_SV.log(l_module_name,'Process_Address l_return_status',l_return_status);
3481: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id',p_detail_att.ship_from_location_id);
3482: WSH_DEBUG_SV.log(l_module_name,'party_site_id',p_detail_att.party_site_id);
3483: END IF;
3484: wsh_util_core.api_post_call(
3485: p_return_status => l_return_status,
3478:
3479: IF l_debug_on THEN
3480: WSH_DEBUG_SV.log(l_module_name,'Process_Address l_return_status',l_return_status);
3481: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id',p_detail_att.ship_from_location_id);
3482: WSH_DEBUG_SV.log(l_module_name,'party_site_id',p_detail_att.party_site_id);
3483: END IF;
3484: wsh_util_core.api_post_call(
3485: p_return_status => l_return_status,
3486: x_num_warnings => l_num_warnings,
3492: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3493: END IF;
3494:
3495: IF l_debug_on THEN
3496: WSH_DEBUG_SV.pop(l_module_name);
3497: END IF;
3498: EXCEPTION
3499: WHEN FND_API.G_EXC_ERROR THEN
3500: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
3502: p_delivery.error_flag(p_delivery_index):= 'Y';
3503:
3504:
3505: IF l_debug_on THEN
3506: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
3507: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3508: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3509: END IF;
3510:
3503:
3504:
3505: IF l_debug_on THEN
3506: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
3507: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3508: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3509: END IF;
3510:
3511: WHEN OTHERS THEN
3504:
3505: IF l_debug_on THEN
3506: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
3507: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3508: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3509: END IF;
3510:
3511: WHEN OTHERS THEN
3512: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3513:
3514: p_delivery.error_flag(p_delivery_index):= 'Y';
3515:
3516: IF l_debug_on THEN
3517: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
3518: Oracle error message is '||
3519:
3520: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3521: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3516: IF l_debug_on THEN
3517: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
3518: Oracle error message is '||
3519:
3520: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3521: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3522: END IF;
3523:
3524: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3517: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
3518: Oracle error message is '||
3519:
3520: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3521: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3522: END IF;
3523:
3524: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3525: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
3557: l_num_errors number;
3558: BEGIN
3559: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3560: IF l_debug_on IS NULL THEN
3561: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3562: END IF;
3563:
3564: IF l_debug_on THEN
3565: WSH_DEBUG_SV.push(l_module_name);
3561: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3562: END IF;
3563:
3564: IF l_debug_on THEN
3565: WSH_DEBUG_SV.push(l_module_name);
3566: WSH_DEBUG_SV.log(l_module_name,'p_delivery_index',p_delivery_index);
3567: WSH_DEBUG_SV.log(l_module_name,'p_delivery.Ship_From_Address1.count',p_delivery.Ship_From_Address1.count);
3568: END IF;
3569:
3562: END IF;
3563:
3564: IF l_debug_on THEN
3565: WSH_DEBUG_SV.push(l_module_name);
3566: WSH_DEBUG_SV.log(l_module_name,'p_delivery_index',p_delivery_index);
3567: WSH_DEBUG_SV.log(l_module_name,'p_delivery.Ship_From_Address1.count',p_delivery.Ship_From_Address1.count);
3568: END IF;
3569:
3570: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3563:
3564: IF l_debug_on THEN
3565: WSH_DEBUG_SV.push(l_module_name);
3566: WSH_DEBUG_SV.log(l_module_name,'p_delivery_index',p_delivery_index);
3567: WSH_DEBUG_SV.log(l_module_name,'p_delivery.Ship_From_Address1.count',p_delivery.Ship_From_Address1.count);
3568: END IF;
3569:
3570: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3571:
3579: x_convert_qty => l_convert_qty,
3580: x_return_status => l_return_status);
3581:
3582: IF l_debug_on THEN
3583: WSH_DEBUG_SV.log(l_module_name,'validate_uom l_return_status',l_return_status);
3584: END IF;
3585:
3586: wsh_util_core.api_post_call(
3587: p_return_status => l_return_status,
3598: x_convert_qty => l_convert_qty,
3599: x_return_status => l_return_status);
3600:
3601: IF l_debug_on THEN
3602: WSH_DEBUG_SV.log(l_module_name,'validate_uom l_return_status',l_return_status);
3603: END IF;
3604: wsh_util_core.api_post_call(
3605: p_return_status => l_return_status,
3606: x_num_warnings => l_num_warnings,
3614: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3615: END IF;
3616:
3617: IF l_debug_on THEN
3618: WSH_DEBUG_SV.pop(l_module_name);
3619: END IF;
3620: EXCEPTION
3621: WHEN FND_API.G_EXC_ERROR THEN
3622: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
3624: p_delivery.error_flag(p_delivery_index):= 'Y';
3625:
3626:
3627: IF l_debug_on THEN
3628: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
3629: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3630: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3631: END IF;
3632:
3625:
3626:
3627: IF l_debug_on THEN
3628: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
3629: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3630: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3631: END IF;
3632:
3633: WHEN OTHERS THEN
3626:
3627: IF l_debug_on THEN
3628: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
3629: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3630: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3631: END IF;
3632:
3633: WHEN OTHERS THEN
3634: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3635:
3636: p_delivery.error_flag(p_delivery_index):= 'Y';
3637:
3638: IF l_debug_on THEN
3639: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
3640: Oracle error message is '||
3641:
3642: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3643: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3638: IF l_debug_on THEN
3639: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
3640: Oracle error message is '||
3641:
3642: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3643: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3644: END IF;
3645:
3646: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3639: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
3640: Oracle error message is '||
3641:
3642: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3643: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3644: END IF;
3645:
3646: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3647: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
3710:
3711: BEGIN
3712: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3713: IF l_debug_on IS NULL THEN
3714: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3715: END IF;
3716:
3717: IF l_debug_on THEN
3718: WSH_DEBUG_SV.push(l_module_name);
3714: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3715: END IF;
3716:
3717: IF l_debug_on THEN
3718: WSH_DEBUG_SV.push(l_module_name);
3719: WSH_DEBUG_SV.log(l_module_name,'p_detail_ids.count',p_detail_ids.count);
3720: END IF;
3721:
3722: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3715: END IF;
3716:
3717: IF l_debug_on THEN
3718: WSH_DEBUG_SV.push(l_module_name);
3719: WSH_DEBUG_SV.log(l_module_name,'p_detail_ids.count',p_detail_ids.count);
3720: END IF;
3721:
3722: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3723:
3725: l_index := p_detail_ids.first;
3726: l_first_detail_id:=p_detail_ids(l_index);
3727:
3728: IF l_debug_on THEN
3729: WSH_DEBUG_SV.log(l_module_name,'item_quantity',p_detail_att.item_quantity);
3730: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_detail_att.requested_quantity);
3731: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',p_detail_att.requested_quantity2);
3732: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',l_first_detail_id);
3733: WSH_DEBUG_SV.log(l_module_name,'dd_net_weight',p_detail_att.dd_net_weight);
3726: l_first_detail_id:=p_detail_ids(l_index);
3727:
3728: IF l_debug_on THEN
3729: WSH_DEBUG_SV.log(l_module_name,'item_quantity',p_detail_att.item_quantity);
3730: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_detail_att.requested_quantity);
3731: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',p_detail_att.requested_quantity2);
3732: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',l_first_detail_id);
3733: WSH_DEBUG_SV.log(l_module_name,'dd_net_weight',p_detail_att.dd_net_weight);
3734: WSH_DEBUG_SV.log(l_module_name,'dd_gross_weight',p_detail_att.dd_gross_weight);
3727:
3728: IF l_debug_on THEN
3729: WSH_DEBUG_SV.log(l_module_name,'item_quantity',p_detail_att.item_quantity);
3730: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_detail_att.requested_quantity);
3731: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',p_detail_att.requested_quantity2);
3732: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',l_first_detail_id);
3733: WSH_DEBUG_SV.log(l_module_name,'dd_net_weight',p_detail_att.dd_net_weight);
3734: WSH_DEBUG_SV.log(l_module_name,'dd_gross_weight',p_detail_att.dd_gross_weight);
3735: WSH_DEBUG_SV.log(l_module_name,'dd_volume',p_detail_att.dd_volume);
3728: IF l_debug_on THEN
3729: WSH_DEBUG_SV.log(l_module_name,'item_quantity',p_detail_att.item_quantity);
3730: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_detail_att.requested_quantity);
3731: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',p_detail_att.requested_quantity2);
3732: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',l_first_detail_id);
3733: WSH_DEBUG_SV.log(l_module_name,'dd_net_weight',p_detail_att.dd_net_weight);
3734: WSH_DEBUG_SV.log(l_module_name,'dd_gross_weight',p_detail_att.dd_gross_weight);
3735: WSH_DEBUG_SV.log(l_module_name,'dd_volume',p_detail_att.dd_volume);
3736: WSH_DEBUG_SV.log(l_module_name,'dd_wv_frozen_flag',p_detail_att.dd_wv_frozen_flag);
3729: WSH_DEBUG_SV.log(l_module_name,'item_quantity',p_detail_att.item_quantity);
3730: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_detail_att.requested_quantity);
3731: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',p_detail_att.requested_quantity2);
3732: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',l_first_detail_id);
3733: WSH_DEBUG_SV.log(l_module_name,'dd_net_weight',p_detail_att.dd_net_weight);
3734: WSH_DEBUG_SV.log(l_module_name,'dd_gross_weight',p_detail_att.dd_gross_weight);
3735: WSH_DEBUG_SV.log(l_module_name,'dd_volume',p_detail_att.dd_volume);
3736: WSH_DEBUG_SV.log(l_module_name,'dd_wv_frozen_flag',p_detail_att.dd_wv_frozen_flag);
3737: END IF;
3730: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_detail_att.requested_quantity);
3731: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',p_detail_att.requested_quantity2);
3732: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',l_first_detail_id);
3733: WSH_DEBUG_SV.log(l_module_name,'dd_net_weight',p_detail_att.dd_net_weight);
3734: WSH_DEBUG_SV.log(l_module_name,'dd_gross_weight',p_detail_att.dd_gross_weight);
3735: WSH_DEBUG_SV.log(l_module_name,'dd_volume',p_detail_att.dd_volume);
3736: WSH_DEBUG_SV.log(l_module_name,'dd_wv_frozen_flag',p_detail_att.dd_wv_frozen_flag);
3737: END IF;
3738:
3731: WSH_DEBUG_SV.log(l_module_name,'requested_quantity2',p_detail_att.requested_quantity2);
3732: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',l_first_detail_id);
3733: WSH_DEBUG_SV.log(l_module_name,'dd_net_weight',p_detail_att.dd_net_weight);
3734: WSH_DEBUG_SV.log(l_module_name,'dd_gross_weight',p_detail_att.dd_gross_weight);
3735: WSH_DEBUG_SV.log(l_module_name,'dd_volume',p_detail_att.dd_volume);
3736: WSH_DEBUG_SV.log(l_module_name,'dd_wv_frozen_flag',p_detail_att.dd_wv_frozen_flag);
3737: END IF;
3738:
3739:
3732: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',l_first_detail_id);
3733: WSH_DEBUG_SV.log(l_module_name,'dd_net_weight',p_detail_att.dd_net_weight);
3734: WSH_DEBUG_SV.log(l_module_name,'dd_gross_weight',p_detail_att.dd_gross_weight);
3735: WSH_DEBUG_SV.log(l_module_name,'dd_volume',p_detail_att.dd_volume);
3736: WSH_DEBUG_SV.log(l_module_name,'dd_wv_frozen_flag',p_detail_att.dd_wv_frozen_flag);
3737: END IF;
3738:
3739:
3740: --Update the line with grater of item or requested qty and the split if requried.
3768: l_frozen_flag:='N';
3769: END IF;
3770:
3771: IF l_debug_on THEN
3772: WSH_DEBUG_SV.log(l_module_name,'l_picked_quantity',l_picked_quantity);
3773: WSH_DEBUG_SV.log(l_module_name,'l_ratio',l_ratio);
3774: WSH_DEBUG_SV.log(l_module_name,'l_picked_quantity2',l_picked_quantity2);
3775: WSH_DEBUG_SV.log(l_module_name,'l_frozen_flag',l_frozen_flag);
3776: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_detail_att.requested_quantity);
3769: END IF;
3770:
3771: IF l_debug_on THEN
3772: WSH_DEBUG_SV.log(l_module_name,'l_picked_quantity',l_picked_quantity);
3773: WSH_DEBUG_SV.log(l_module_name,'l_ratio',l_ratio);
3774: WSH_DEBUG_SV.log(l_module_name,'l_picked_quantity2',l_picked_quantity2);
3775: WSH_DEBUG_SV.log(l_module_name,'l_frozen_flag',l_frozen_flag);
3776: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_detail_att.requested_quantity);
3777: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id',p_detail_att.ship_from_location_id);
3770:
3771: IF l_debug_on THEN
3772: WSH_DEBUG_SV.log(l_module_name,'l_picked_quantity',l_picked_quantity);
3773: WSH_DEBUG_SV.log(l_module_name,'l_ratio',l_ratio);
3774: WSH_DEBUG_SV.log(l_module_name,'l_picked_quantity2',l_picked_quantity2);
3775: WSH_DEBUG_SV.log(l_module_name,'l_frozen_flag',l_frozen_flag);
3776: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_detail_att.requested_quantity);
3777: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id',p_detail_att.ship_from_location_id);
3778: WSH_DEBUG_SV.log(l_module_name,'party_id',p_detail_att.party_id);
3771: IF l_debug_on THEN
3772: WSH_DEBUG_SV.log(l_module_name,'l_picked_quantity',l_picked_quantity);
3773: WSH_DEBUG_SV.log(l_module_name,'l_ratio',l_ratio);
3774: WSH_DEBUG_SV.log(l_module_name,'l_picked_quantity2',l_picked_quantity2);
3775: WSH_DEBUG_SV.log(l_module_name,'l_frozen_flag',l_frozen_flag);
3776: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_detail_att.requested_quantity);
3777: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id',p_detail_att.ship_from_location_id);
3778: WSH_DEBUG_SV.log(l_module_name,'party_id',p_detail_att.party_id);
3779: END IF;
3772: WSH_DEBUG_SV.log(l_module_name,'l_picked_quantity',l_picked_quantity);
3773: WSH_DEBUG_SV.log(l_module_name,'l_ratio',l_ratio);
3774: WSH_DEBUG_SV.log(l_module_name,'l_picked_quantity2',l_picked_quantity2);
3775: WSH_DEBUG_SV.log(l_module_name,'l_frozen_flag',l_frozen_flag);
3776: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_detail_att.requested_quantity);
3777: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id',p_detail_att.ship_from_location_id);
3778: WSH_DEBUG_SV.log(l_module_name,'party_id',p_detail_att.party_id);
3779: END IF;
3780:
3773: WSH_DEBUG_SV.log(l_module_name,'l_ratio',l_ratio);
3774: WSH_DEBUG_SV.log(l_module_name,'l_picked_quantity2',l_picked_quantity2);
3775: WSH_DEBUG_SV.log(l_module_name,'l_frozen_flag',l_frozen_flag);
3776: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_detail_att.requested_quantity);
3777: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id',p_detail_att.ship_from_location_id);
3778: WSH_DEBUG_SV.log(l_module_name,'party_id',p_detail_att.party_id);
3779: END IF;
3780:
3781: IF (p_detail_att.item_quantity > 0 ) THEN -- {
3774: WSH_DEBUG_SV.log(l_module_name,'l_picked_quantity2',l_picked_quantity2);
3775: WSH_DEBUG_SV.log(l_module_name,'l_frozen_flag',l_frozen_flag);
3776: WSH_DEBUG_SV.log(l_module_name,'requested_quantity',p_detail_att.requested_quantity);
3777: WSH_DEBUG_SV.log(l_module_name,'ship_from_location_id',p_detail_att.ship_from_location_id);
3778: WSH_DEBUG_SV.log(l_module_name,'party_id',p_detail_att.party_id);
3779: END IF;
3780:
3781: IF (p_detail_att.item_quantity > 0 ) THEN -- {
3782:
3780:
3781: IF (p_detail_att.item_quantity > 0 ) THEN -- {
3782:
3783: IF l_debug_on THEN
3784: WSH_DEBUG_SV.log(l_module_name,'p_detail_att.earliest_pickup_date',p_detail_att.earliest_pickup_date);
3785: WSH_DEBUG_SV.log(l_module_name,'p_detail_att.latest_pickup_date',p_detail_att.latest_pickup_date);
3786: END IF;
3787:
3788: l_earliest_pickup_date := add_time_to_date(p_detail_att.earliest_pickup_date,'F');
3781: IF (p_detail_att.item_quantity > 0 ) THEN -- {
3782:
3783: IF l_debug_on THEN
3784: WSH_DEBUG_SV.log(l_module_name,'p_detail_att.earliest_pickup_date',p_detail_att.earliest_pickup_date);
3785: WSH_DEBUG_SV.log(l_module_name,'p_detail_att.latest_pickup_date',p_detail_att.latest_pickup_date);
3786: END IF;
3787:
3788: l_earliest_pickup_date := add_time_to_date(p_detail_att.earliest_pickup_date,'F');
3789: l_latest_pickup_date := add_time_to_date(p_detail_att.latest_pickup_date,'L');
3788: l_earliest_pickup_date := add_time_to_date(p_detail_att.earliest_pickup_date,'F');
3789: l_latest_pickup_date := add_time_to_date(p_detail_att.latest_pickup_date,'L');
3790:
3791: IF l_debug_on THEN
3792: WSH_DEBUG_SV.log(l_module_name,'l_earliest_pickup_date',l_earliest_pickup_date);
3793: WSH_DEBUG_SV.log(l_module_name,'l_latest_pickup_date',l_latest_pickup_date);
3794: END IF;
3795:
3796: --Update the first line of p_detail_att
3789: l_latest_pickup_date := add_time_to_date(p_detail_att.latest_pickup_date,'L');
3790:
3791: IF l_debug_on THEN
3792: WSH_DEBUG_SV.log(l_module_name,'l_earliest_pickup_date',l_earliest_pickup_date);
3793: WSH_DEBUG_SV.log(l_module_name,'l_latest_pickup_date',l_latest_pickup_date);
3794: END IF;
3795:
3796: --Update the first line of p_detail_att
3797: UPDATE wsh_delivery_details
3822: -- Update of wsh_delivery_details where requested_quantity/released_status
3823: -- are changed, call DBI API after the update.
3824: -- DBI API will check if DBI is installed
3825: IF l_debug_on THEN
3826: WSH_DEBUG_SV.log(l_module_name,'Calling DBI API.Detail Count-',x_new_detail_ids.count);
3827: END IF;
3828: WSH_INTEGRATION.DBI_Update_Detail_Log
3829: (p_delivery_detail_id_tab => x_new_detail_ids,
3830: p_dml_type => 'UPDATE',
3830: p_dml_type => 'UPDATE',
3831: x_return_status => l_dbi_rs);
3832:
3833: IF l_debug_on THEN
3834: WSH_DEBUG_SV.log(l_module_name,'Return Status after DBI Call-',l_dbi_rs);
3835: END IF;
3836: -- Only Handle Unexpected error
3837: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3838: --
3837: IF l_dbi_rs = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3838: --
3839: x_return_status := l_dbi_rs;
3840: IF l_debug_on THEN
3841: WSH_DEBUG_SV.pop(l_module_name);
3842: END IF;
3843: --
3844: RETURN;
3845: END IF;
3851: --Qty to be split.
3852: l_item_quantity := p_detail_att.requested_quantity - p_detail_att.item_quantity;
3853:
3854: IF l_debug_on THEN
3855: WSH_DEBUG_SV.log(l_module_name,'p_detail_att.requested_quantity2',p_detail_att.requested_quantity2);
3856: END IF;
3857:
3858: --Calculate the secondary split qty.
3859: IF (p_detail_att.requested_quantity2 <> 0) THEN
3863: l_item_quantity2 := NULL;
3864: END IF;
3865:
3866: IF l_debug_on THEN
3867: WSH_DEBUG_SV.log(l_module_name,'l_item_quantity',l_item_quantity);
3868: WSH_DEBUG_SV.log(l_module_name,'l_item_quantity2',l_item_quantity2);
3869: END IF;
3870:
3871: --Split the first detail line already updated with routing request attributes.
3864: END IF;
3865:
3866: IF l_debug_on THEN
3867: WSH_DEBUG_SV.log(l_module_name,'l_item_quantity',l_item_quantity);
3868: WSH_DEBUG_SV.log(l_module_name,'l_item_quantity2',l_item_quantity2);
3869: END IF;
3870:
3871: --Split the first detail line already updated with routing request attributes.
3872: WSH_DELIVERY_DETAILS_ACTIONS.Split_Delivery_Details (
3879: x_new_detail_id => l_split_delivery_detail_id,
3880: x_return_status => l_return_status);
3881:
3882: IF l_debug_on THEN
3883: WSH_DEBUG_SV.log(l_module_name,'Split_Delivery_Details l_return_status',l_return_status);
3884: WSH_DEBUG_SV.log(l_module_name,'l_split_delivery_detail_id',l_split_delivery_detail_id);
3885: WSH_DEBUG_SV.log(l_module_name,'l_item_quantity',l_item_quantity);
3886: END IF;
3887: wsh_util_core.api_post_call(
3880: x_return_status => l_return_status);
3881:
3882: IF l_debug_on THEN
3883: WSH_DEBUG_SV.log(l_module_name,'Split_Delivery_Details l_return_status',l_return_status);
3884: WSH_DEBUG_SV.log(l_module_name,'l_split_delivery_detail_id',l_split_delivery_detail_id);
3885: WSH_DEBUG_SV.log(l_module_name,'l_item_quantity',l_item_quantity);
3886: END IF;
3887: wsh_util_core.api_post_call(
3888: p_return_status => l_return_status,
3881:
3882: IF l_debug_on THEN
3883: WSH_DEBUG_SV.log(l_module_name,'Split_Delivery_Details l_return_status',l_return_status);
3884: WSH_DEBUG_SV.log(l_module_name,'l_split_delivery_detail_id',l_split_delivery_detail_id);
3885: WSH_DEBUG_SV.log(l_module_name,'l_item_quantity',l_item_quantity);
3886: END IF;
3887: wsh_util_core.api_post_call(
3888: p_return_status => l_return_status,
3889: x_num_warnings => l_num_warnings,
3925:
3926: WHILE (l_index IS NOT NULL) LOOP
3927:
3928: IF l_debug_on THEN
3929: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',p_detail_ids(l_index));
3930: END IF;
3931:
3932: WSH_DELIVERY_DETAILS_PKG.Delete_Delivery_Details (
3933: p_delivery_detail_id => p_detail_ids(l_index),
3933: p_delivery_detail_id => p_detail_ids(l_index),
3934: x_return_status => l_return_status);
3935:
3936: IF l_debug_on THEN
3937: WSH_DEBUG_SV.log(l_module_name,'Delete_Delivery_Details l_return_status',l_return_status);
3938: END IF;
3939: wsh_util_core.api_post_call(
3940: p_return_status => l_return_status,
3941: x_num_warnings => l_num_warnings,
3955: END IF;
3956:
3957: IF l_debug_on THEN
3958:
3959: WSH_DEBUG_SV.log(l_module_name,'x_new_detail_ids.count',x_new_detail_ids.count);
3960: WSH_DEBUG_SV.pop(l_module_name);
3961: END IF;
3962: EXCEPTION
3963: WHEN FND_API.G_EXC_ERROR THEN
3956:
3957: IF l_debug_on THEN
3958:
3959: WSH_DEBUG_SV.log(l_module_name,'x_new_detail_ids.count',x_new_detail_ids.count);
3960: WSH_DEBUG_SV.pop(l_module_name);
3961: END IF;
3962: EXCEPTION
3963: WHEN FND_API.G_EXC_ERROR THEN
3964: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
3963: WHEN FND_API.G_EXC_ERROR THEN
3964: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
3965:
3966: IF l_debug_on THEN
3967: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
3968: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3969: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3970: END IF;
3971:
3964: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
3965:
3966: IF l_debug_on THEN
3967: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
3968: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3969: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3970: END IF;
3971:
3972: WHEN OTHERS THEN
3965:
3966: IF l_debug_on THEN
3967: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
3968: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3969: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3970: END IF;
3971:
3972: WHEN OTHERS THEN
3973: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3972: WHEN OTHERS THEN
3973: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3974:
3975: IF l_debug_on THEN
3976: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
3977: Oracle error message is '||
3978:
3979: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3980: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3975: IF l_debug_on THEN
3976: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
3977: Oracle error message is '||
3978:
3979: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3980: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3981: END IF;
3982:
3983: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3976: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
3977: Oracle error message is '||
3978:
3979: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3980: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3981: END IF;
3982:
3983: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
3984: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
4029: l_num_errors number;
4030: BEGIN
4031: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4032: IF l_debug_on IS NULL THEN
4033: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4034: END IF;
4035:
4036: IF l_debug_on THEN
4037: WSH_DEBUG_SV.push(l_module_name);
4033: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4034: END IF;
4035:
4036: IF l_debug_on THEN
4037: WSH_DEBUG_SV.push(l_module_name);
4038: WSH_DEBUG_SV.log(l_module_name,'p_routing_req_id',p_routing_req_id);
4039: END IF;
4040:
4041: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4034: END IF;
4035:
4036: IF l_debug_on THEN
4037: WSH_DEBUG_SV.push(l_module_name);
4038: WSH_DEBUG_SV.log(l_module_name,'p_routing_req_id',p_routing_req_id);
4039: END IF;
4040:
4041: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4042:
4042:
4043:
4044: FOR del_rec IN unassign_del_csr LOOP
4045: IF l_debug_on THEN
4046: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',del_rec.delivery_detail_id);
4047: WSH_DEBUG_SV.log(l_module_name,'released_status',del_rec.released_status);
4048: WSH_DEBUG_SV.log(l_module_name,'delivery_id',del_rec.delivery_id);
4049: WSH_DEBUG_SV.log(l_module_name,'l_prev_delivery_id',l_prev_delivery_id);
4050: END IF;
4043:
4044: FOR del_rec IN unassign_del_csr LOOP
4045: IF l_debug_on THEN
4046: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',del_rec.delivery_detail_id);
4047: WSH_DEBUG_SV.log(l_module_name,'released_status',del_rec.released_status);
4048: WSH_DEBUG_SV.log(l_module_name,'delivery_id',del_rec.delivery_id);
4049: WSH_DEBUG_SV.log(l_module_name,'l_prev_delivery_id',l_prev_delivery_id);
4050: END IF;
4051:
4044: FOR del_rec IN unassign_del_csr LOOP
4045: IF l_debug_on THEN
4046: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',del_rec.delivery_detail_id);
4047: WSH_DEBUG_SV.log(l_module_name,'released_status',del_rec.released_status);
4048: WSH_DEBUG_SV.log(l_module_name,'delivery_id',del_rec.delivery_id);
4049: WSH_DEBUG_SV.log(l_module_name,'l_prev_delivery_id',l_prev_delivery_id);
4050: END IF;
4051:
4052: --Unassigned allowed only lines are released status 'X' i.e. Inbound open lines.
4045: IF l_debug_on THEN
4046: WSH_DEBUG_SV.log(l_module_name,'delivery_detail_id',del_rec.delivery_detail_id);
4047: WSH_DEBUG_SV.log(l_module_name,'released_status',del_rec.released_status);
4048: WSH_DEBUG_SV.log(l_module_name,'delivery_id',del_rec.delivery_id);
4049: WSH_DEBUG_SV.log(l_module_name,'l_prev_delivery_id',l_prev_delivery_id);
4050: END IF;
4051:
4052: --Unassigned allowed only lines are released status 'X' i.e. Inbound open lines.
4053: IF (del_rec.released_status <> 'X' ) THEN
4072: (p_del_rows => l_dlvy_ids,
4073: x_return_status =>l_return_status);
4074:
4075: IF l_debug_on THEN
4076: WSH_DEBUG_SV.log(l_module_name,'WSH_NEW_DELIVERY_ACTIONS.plan l_return_status',l_return_status);
4077: END IF;
4078:
4079: wsh_util_core.api_post_call(
4080: p_return_status => l_return_status,
4094: p_action_prms => l_action_prms,
4095: x_return_status => l_return_status);
4096:
4097: IF l_debug_on THEN
4098: WSH_DEBUG_SV.log(l_module_name,'Unassign_Multiple_Details
4099: l_return_status',l_return_status);
4100: END IF;
4101:
4102: wsh_util_core.api_post_call(
4111: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4112: END IF;
4113:
4114: IF l_debug_on THEN
4115: WSH_DEBUG_SV.pop(l_module_name);
4116: END IF;
4117: EXCEPTION
4118: WHEN FND_API.G_EXC_ERROR THEN
4119: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
4118: WHEN FND_API.G_EXC_ERROR THEN
4119: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
4120:
4121: IF l_debug_on THEN
4122: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
4123: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4124: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4125: END IF;
4126:
4119: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
4120:
4121: IF l_debug_on THEN
4122: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
4123: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4124: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4125: END IF;
4126:
4127: WHEN OTHERS THEN
4120:
4121: IF l_debug_on THEN
4122: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
4123: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4124: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4125: END IF;
4126:
4127: WHEN OTHERS THEN
4128: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4127: WHEN OTHERS THEN
4128: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4129:
4130: IF l_debug_on THEN
4131: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
4132: Oracle error message is '||
4133:
4134: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4135: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4130: IF l_debug_on THEN
4131: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
4132: Oracle error message is '||
4133:
4134: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4135: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4136: END IF;
4137:
4138:
4131: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
4132: Oracle error message is '||
4133:
4134: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4135: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4136: END IF;
4137:
4138:
4139: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
4224:
4225: BEGIN
4226: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4227: IF l_debug_on IS NULL THEN
4228: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4229: END IF;
4230:
4231: IF l_debug_on THEN
4232: WSH_DEBUG_SV.push(l_module_name);
4228: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4229: END IF;
4230:
4231: IF l_debug_on THEN
4232: WSH_DEBUG_SV.push(l_module_name);
4233: WSH_DEBUG_SV.log(l_module_name,'p_detail_ids.count',p_detail_ids.count);
4234: WSH_DEBUG_SV.log(l_module_name,'p_delivery_index',p_delivery_index);
4235: WSH_DEBUG_SV.log(l_module_name,'p_delivery.Ship_From_Address1.count',p_delivery.Ship_From_Address1.count);
4236: END IF;
4229: END IF;
4230:
4231: IF l_debug_on THEN
4232: WSH_DEBUG_SV.push(l_module_name);
4233: WSH_DEBUG_SV.log(l_module_name,'p_detail_ids.count',p_detail_ids.count);
4234: WSH_DEBUG_SV.log(l_module_name,'p_delivery_index',p_delivery_index);
4235: WSH_DEBUG_SV.log(l_module_name,'p_delivery.Ship_From_Address1.count',p_delivery.Ship_From_Address1.count);
4236: END IF;
4237:
4230:
4231: IF l_debug_on THEN
4232: WSH_DEBUG_SV.push(l_module_name);
4233: WSH_DEBUG_SV.log(l_module_name,'p_detail_ids.count',p_detail_ids.count);
4234: WSH_DEBUG_SV.log(l_module_name,'p_delivery_index',p_delivery_index);
4235: WSH_DEBUG_SV.log(l_module_name,'p_delivery.Ship_From_Address1.count',p_delivery.Ship_From_Address1.count);
4236: END IF;
4237:
4238: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4231: IF l_debug_on THEN
4232: WSH_DEBUG_SV.push(l_module_name);
4233: WSH_DEBUG_SV.log(l_module_name,'p_detail_ids.count',p_detail_ids.count);
4234: WSH_DEBUG_SV.log(l_module_name,'p_delivery_index',p_delivery_index);
4235: WSH_DEBUG_SV.log(l_module_name,'p_delivery.Ship_From_Address1.count',p_delivery.Ship_From_Address1.count);
4236: END IF;
4237:
4238: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4239:
4255: x_action_out_rec => l_dd_action_out_rec);
4256:
4257:
4258: IF l_debug_on THEN
4259: WSH_DEBUG_SV.log(l_module_name,'wsh_util_validate.validate_uom l_return_status',l_return_status);
4260: WSH_DEBUG_SV.log(l_module_name,'l_dd_action_out_rec.count',l_dd_action_out_rec.delivery_id_tab.count);
4261: END IF;
4262:
4263: wsh_util_core.api_post_call(
4256:
4257:
4258: IF l_debug_on THEN
4259: WSH_DEBUG_SV.log(l_module_name,'wsh_util_validate.validate_uom l_return_status',l_return_status);
4260: WSH_DEBUG_SV.log(l_module_name,'l_dd_action_out_rec.count',l_dd_action_out_rec.delivery_id_tab.count);
4261: END IF;
4262:
4263: wsh_util_core.api_post_call(
4264: p_return_status => l_return_status,
4265: x_num_warnings => l_num_warnings,
4266: x_num_errors => l_num_errors);
4267:
4268: IF l_debug_on THEN
4269: WSH_DEBUG_SV.log(l_module_name,'first out delivery',l_dd_action_out_rec.delivery_id_tab(l_dd_action_out_rec.delivery_id_tab.first));
4270: END IF;
4271:
4272: --Number of delivery created should always be one.
4273: IF (l_dd_action_out_rec.delivery_id_tab.count= 1 ) THEN
4273: IF (l_dd_action_out_rec.delivery_id_tab.count= 1 ) THEN
4274: FOR i IN p_detail_ids.first..p_detail_ids.last LOOP
4275:
4276: IF l_debug_on THEN
4277: WSH_DEBUG_SV.log(l_module_name,'Index i',i);
4278: WSH_DEBUG_SV.log(l_module_name,'delivert_detail_id',p_detail_ids(i));
4279: END IF;
4280:
4281: OPEN get_del_info ( p_detail_ids(i));
4274: FOR i IN p_detail_ids.first..p_detail_ids.last LOOP
4275:
4276: IF l_debug_on THEN
4277: WSH_DEBUG_SV.log(l_module_name,'Index i',i);
4278: WSH_DEBUG_SV.log(l_module_name,'delivert_detail_id',p_detail_ids(i));
4279: END IF;
4280:
4281: OPEN get_del_info ( p_detail_ids(i));
4282: FETCH get_del_info INTO l_del_info;
4282: FETCH get_del_info INTO l_del_info;
4283: CLOSE get_del_info;
4284:
4285: IF l_debug_on THEN
4286: WSH_DEBUG_SV.log(l_module_name,'delivery_id',l_del_info.delivery_id);
4287: WSH_DEBUG_SV.log(l_module_name,'source_header_number',l_del_info.source_header_number);
4288: WSH_DEBUG_SV.log(l_module_name,'source_line_number',l_del_info.source_line_number);
4289: WSH_DEBUG_SV.log(l_module_name,'po_shipment_line_number',l_del_info.po_shipment_line_number);
4290: WSH_DEBUG_SV.log(l_module_name,'source_blanket_reference_num',l_del_info.source_blanket_reference_num);
4283: CLOSE get_del_info;
4284:
4285: IF l_debug_on THEN
4286: WSH_DEBUG_SV.log(l_module_name,'delivery_id',l_del_info.delivery_id);
4287: WSH_DEBUG_SV.log(l_module_name,'source_header_number',l_del_info.source_header_number);
4288: WSH_DEBUG_SV.log(l_module_name,'source_line_number',l_del_info.source_line_number);
4289: WSH_DEBUG_SV.log(l_module_name,'po_shipment_line_number',l_del_info.po_shipment_line_number);
4290: WSH_DEBUG_SV.log(l_module_name,'source_blanket_reference_num',l_del_info.source_blanket_reference_num);
4291: END IF;
4284:
4285: IF l_debug_on THEN
4286: WSH_DEBUG_SV.log(l_module_name,'delivery_id',l_del_info.delivery_id);
4287: WSH_DEBUG_SV.log(l_module_name,'source_header_number',l_del_info.source_header_number);
4288: WSH_DEBUG_SV.log(l_module_name,'source_line_number',l_del_info.source_line_number);
4289: WSH_DEBUG_SV.log(l_module_name,'po_shipment_line_number',l_del_info.po_shipment_line_number);
4290: WSH_DEBUG_SV.log(l_module_name,'source_blanket_reference_num',l_del_info.source_blanket_reference_num);
4291: END IF;
4292:
4285: IF l_debug_on THEN
4286: WSH_DEBUG_SV.log(l_module_name,'delivery_id',l_del_info.delivery_id);
4287: WSH_DEBUG_SV.log(l_module_name,'source_header_number',l_del_info.source_header_number);
4288: WSH_DEBUG_SV.log(l_module_name,'source_line_number',l_del_info.source_line_number);
4289: WSH_DEBUG_SV.log(l_module_name,'po_shipment_line_number',l_del_info.po_shipment_line_number);
4290: WSH_DEBUG_SV.log(l_module_name,'source_blanket_reference_num',l_del_info.source_blanket_reference_num);
4291: END IF;
4292:
4293: -- Scan through details line, delivery associated is same for all lines.
4286: WSH_DEBUG_SV.log(l_module_name,'delivery_id',l_del_info.delivery_id);
4287: WSH_DEBUG_SV.log(l_module_name,'source_header_number',l_del_info.source_header_number);
4288: WSH_DEBUG_SV.log(l_module_name,'source_line_number',l_del_info.source_line_number);
4289: WSH_DEBUG_SV.log(l_module_name,'po_shipment_line_number',l_del_info.po_shipment_line_number);
4290: WSH_DEBUG_SV.log(l_module_name,'source_blanket_reference_num',l_del_info.source_blanket_reference_num);
4291: END IF;
4292:
4293: -- Scan through details line, delivery associated is same for all lines.
4294: IF (l_prev_delivery_id IS NOT NULL AND l_prev_delivery_id <> l_del_info.delivery_id) THEN
4312: -- E.g Line with different ship to location are part of Routing Request Delivery.
4313: FOR i IN p_detail_ids.first..p_detail_ids.last LOOP
4314:
4315: IF l_debug_on THEN
4316: WSH_DEBUG_SV.log(l_module_name,'Index i',i);
4317: WSH_DEBUG_SV.log(l_module_name,'delivert_detail_id',p_detail_ids(i));
4318: END IF;
4319:
4320: OPEN get_del_info ( p_detail_ids(i));
4313: FOR i IN p_detail_ids.first..p_detail_ids.last LOOP
4314:
4315: IF l_debug_on THEN
4316: WSH_DEBUG_SV.log(l_module_name,'Index i',i);
4317: WSH_DEBUG_SV.log(l_module_name,'delivert_detail_id',p_detail_ids(i));
4318: END IF;
4319:
4320: OPEN get_del_info ( p_detail_ids(i));
4321: FETCH get_del_info INTO l_del_info;
4321: FETCH get_del_info INTO l_del_info;
4322: CLOSE get_del_info;
4323:
4324: IF l_debug_on THEN
4325: WSH_DEBUG_SV.log(l_module_name,'delivery_id',l_del_info.delivery_id);
4326: WSH_DEBUG_SV.log(l_module_name,'source_header_number',l_del_info.source_header_number);
4327: WSH_DEBUG_SV.log(l_module_name,'source_line_number',l_del_info.source_line_number);
4328: WSH_DEBUG_SV.log(l_module_name,'po_shipment_line_number',l_del_info.po_shipment_line_number);
4329: WSH_DEBUG_SV.log(l_module_name,'source_blanket_reference_num',l_del_info.source_blanket_reference_num);
4322: CLOSE get_del_info;
4323:
4324: IF l_debug_on THEN
4325: WSH_DEBUG_SV.log(l_module_name,'delivery_id',l_del_info.delivery_id);
4326: WSH_DEBUG_SV.log(l_module_name,'source_header_number',l_del_info.source_header_number);
4327: WSH_DEBUG_SV.log(l_module_name,'source_line_number',l_del_info.source_line_number);
4328: WSH_DEBUG_SV.log(l_module_name,'po_shipment_line_number',l_del_info.po_shipment_line_number);
4329: WSH_DEBUG_SV.log(l_module_name,'source_blanket_reference_num',l_del_info.source_blanket_reference_num);
4330: END IF;
4323:
4324: IF l_debug_on THEN
4325: WSH_DEBUG_SV.log(l_module_name,'delivery_id',l_del_info.delivery_id);
4326: WSH_DEBUG_SV.log(l_module_name,'source_header_number',l_del_info.source_header_number);
4327: WSH_DEBUG_SV.log(l_module_name,'source_line_number',l_del_info.source_line_number);
4328: WSH_DEBUG_SV.log(l_module_name,'po_shipment_line_number',l_del_info.po_shipment_line_number);
4329: WSH_DEBUG_SV.log(l_module_name,'source_blanket_reference_num',l_del_info.source_blanket_reference_num);
4330: END IF;
4331:
4324: IF l_debug_on THEN
4325: WSH_DEBUG_SV.log(l_module_name,'delivery_id',l_del_info.delivery_id);
4326: WSH_DEBUG_SV.log(l_module_name,'source_header_number',l_del_info.source_header_number);
4327: WSH_DEBUG_SV.log(l_module_name,'source_line_number',l_del_info.source_line_number);
4328: WSH_DEBUG_SV.log(l_module_name,'po_shipment_line_number',l_del_info.po_shipment_line_number);
4329: WSH_DEBUG_SV.log(l_module_name,'source_blanket_reference_num',l_del_info.source_blanket_reference_num);
4330: END IF;
4331:
4332:
4325: WSH_DEBUG_SV.log(l_module_name,'delivery_id',l_del_info.delivery_id);
4326: WSH_DEBUG_SV.log(l_module_name,'source_header_number',l_del_info.source_header_number);
4327: WSH_DEBUG_SV.log(l_module_name,'source_line_number',l_del_info.source_line_number);
4328: WSH_DEBUG_SV.log(l_module_name,'po_shipment_line_number',l_del_info.po_shipment_line_number);
4329: WSH_DEBUG_SV.log(l_module_name,'source_blanket_reference_num',l_del_info.source_blanket_reference_num);
4330: END IF;
4331:
4332:
4333: FND_MESSAGE.SET_NAME('WSH','WSH_RR_PO_GROUP_NOT_MATCH');
4353: (p_del_rows =>x_new_deliveries,
4354: x_return_status => l_return_status);
4355:
4356: IF l_debug_on THEN
4357: WSH_DEBUG_SV.log(l_module_name,'WSH_NEW_DELIVERY_ACTIONS.plan l_return_status',l_return_status);
4358: END IF;
4359:
4360: wsh_util_core.api_post_call(
4361: p_return_status => l_return_status,
4397: --compare the old and new weights
4398: IF (p_delivery.total_weight(p_delivery_index) IS NOT NULL ) THEN
4399: IF ((NVL(l_old_gross_weight,0) <> p_delivery.total_weight(p_delivery_index)) OR (NVL(l_old_net_weight,0) <> p_delivery.total_weight(p_delivery_index))) THEN
4400: IF l_debug_on THEN
4401: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.PRORATE_WEIGHT',WSH_DEBUG_SV.C_PROC_LEVEL);
4402: END IF;
4403:
4404: WSH_WV_UTILS.PRORATE_WEIGHT
4405: (
4413: x_return_status => l_return_status
4414: );
4415:
4416: IF l_debug_on THEN
4417: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
4418: END IF;
4419:
4420: wsh_util_core.api_post_call(
4421: p_return_status => l_return_status,
4464: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4465: END IF;
4466:
4467: IF l_debug_on THEN
4468: WSH_DEBUG_SV.pop(l_module_name);
4469: END IF;
4470: EXCEPTION
4471: WHEN FND_API.G_EXC_ERROR THEN
4472: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
4473:
4474: p_delivery.error_flag(p_delivery_index):= 'Y';
4475:
4476: IF l_debug_on THEN
4477: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
4478: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4479: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4480: END IF;
4481:
4474: p_delivery.error_flag(p_delivery_index):= 'Y';
4475:
4476: IF l_debug_on THEN
4477: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
4478: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4479: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4480: END IF;
4481:
4482: WHEN OTHERS THEN
4475:
4476: IF l_debug_on THEN
4477: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
4478: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4479: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4480: END IF;
4481:
4482: WHEN OTHERS THEN
4483: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4484:
4485: p_delivery.error_flag(p_delivery_index):= 'Y';
4486:
4487: IF l_debug_on THEN
4488: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
4489: Oracle error message is '||
4490:
4491: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4492: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4487: IF l_debug_on THEN
4488: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
4489: Oracle error message is '||
4490:
4491: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4492: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4493: END IF;
4494:
4495: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
4488: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
4489: Oracle error message is '||
4490:
4491: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4492: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4493: END IF;
4494:
4495: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
4496: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
4550:
4551: BEGIN
4552: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4553: IF l_debug_on IS NULL THEN
4554: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4555: END IF;
4556:
4557: IF l_debug_on THEN
4558: WSH_DEBUG_SV.push(l_module_name);
4554: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4555: END IF;
4556:
4557: IF l_debug_on THEN
4558: WSH_DEBUG_SV.push(l_module_name);
4559: WSH_DEBUG_SV.log(l_module_name,'p_request_number',p_request_number);
4560: WSH_DEBUG_SV.log(l_module_name,'p_request_revision',p_request_revision);
4561: WSH_DEBUG_SV.log(l_module_name,'p_supplier_name',p_supplier_name);
4562: END IF;
4555: END IF;
4556:
4557: IF l_debug_on THEN
4558: WSH_DEBUG_SV.push(l_module_name);
4559: WSH_DEBUG_SV.log(l_module_name,'p_request_number',p_request_number);
4560: WSH_DEBUG_SV.log(l_module_name,'p_request_revision',p_request_revision);
4561: WSH_DEBUG_SV.log(l_module_name,'p_supplier_name',p_supplier_name);
4562: END IF;
4563:
4556:
4557: IF l_debug_on THEN
4558: WSH_DEBUG_SV.push(l_module_name);
4559: WSH_DEBUG_SV.log(l_module_name,'p_request_number',p_request_number);
4560: WSH_DEBUG_SV.log(l_module_name,'p_request_revision',p_request_revision);
4561: WSH_DEBUG_SV.log(l_module_name,'p_supplier_name',p_supplier_name);
4562: END IF;
4563:
4564: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4557: IF l_debug_on THEN
4558: WSH_DEBUG_SV.push(l_module_name);
4559: WSH_DEBUG_SV.log(l_module_name,'p_request_number',p_request_number);
4560: WSH_DEBUG_SV.log(l_module_name,'p_request_revision',p_request_revision);
4561: WSH_DEBUG_SV.log(l_module_name,'p_supplier_name',p_supplier_name);
4562: END IF;
4563:
4564: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4565:
4581: x_party_id => p_detail_att.party_id,
4582: x_return_status => l_return_status);
4583:
4584: IF l_debug_on THEN
4585: WSH_DEBUG_SV.log(l_module_name,'Validate_Supplier l_return_status',l_return_status);
4586: WSH_DEBUG_SV.log(l_module_name,'vendor_id',p_detail_att.vendor_id);
4587: WSH_DEBUG_SV.log(l_module_name,'party_id',p_detail_att.party_id);
4588: END IF;
4589: wsh_util_core.api_post_call(
4582: x_return_status => l_return_status);
4583:
4584: IF l_debug_on THEN
4585: WSH_DEBUG_SV.log(l_module_name,'Validate_Supplier l_return_status',l_return_status);
4586: WSH_DEBUG_SV.log(l_module_name,'vendor_id',p_detail_att.vendor_id);
4587: WSH_DEBUG_SV.log(l_module_name,'party_id',p_detail_att.party_id);
4588: END IF;
4589: wsh_util_core.api_post_call(
4590: p_return_status => l_return_status,
4583:
4584: IF l_debug_on THEN
4585: WSH_DEBUG_SV.log(l_module_name,'Validate_Supplier l_return_status',l_return_status);
4586: WSH_DEBUG_SV.log(l_module_name,'vendor_id',p_detail_att.vendor_id);
4587: WSH_DEBUG_SV.log(l_module_name,'party_id',p_detail_att.party_id);
4588: END IF;
4589: wsh_util_core.api_post_call(
4590: p_return_status => l_return_status,
4591: x_num_warnings => l_num_warnings,
4599: IF (get_revision_number_csr%FOUND ) THEN
4600: --This is routing request revision
4601:
4602: IF l_debug_on THEN
4603: WSH_DEBUG_SV.logmsg(l_module_name,'get_revision_number_csr FOUND');
4604: END IF;
4605:
4606: IF (p_request_revision <= nvl(l_revision_number,-99) ) THEN
4607: FND_MESSAGE.SET_NAME('WSH', 'WSH_RR_INVALID_REVISION');
4618: p_routing_req_id => p_detail_att.prev_routing_req_id ,
4619: x_return_status => l_return_status);
4620:
4621: IF l_debug_on THEN
4622: WSH_DEBUG_SV.log(l_module_name,'Unassign_Details l_return_status',l_return_status);
4623: END IF;
4624:
4625: wsh_util_core.api_post_call(
4626: p_return_status => l_return_status,
4629: END IF;
4630: CLOSE get_revision_number_csr;
4631:
4632: IF l_debug_on THEN
4633: WSH_DEBUG_SV.logmsg(l_module_name,'get_revision_number_csr NOT FOUND');
4634: END IF;
4635:
4636:
4637: --Store the current information in Inbound History table.
4647: x_txn_id => p_detail_att.routing_req_id,
4648: x_return_status => l_return_status);
4649:
4650: IF l_debug_on THEN
4651: WSH_DEBUG_SV.log(l_module_name,'WSH_INBOUND_TXN_HISTORY_PKG.create_txn_history
4652: l_return_status',l_return_status);
4653: END IF;
4654: wsh_util_core.api_post_call(
4655: p_return_status => l_return_status,
4662: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4663: END IF;
4664:
4665: IF l_debug_on THEN
4666: WSH_DEBUG_SV.pop(l_module_name);
4667: END IF;
4668: EXCEPTION
4669: WHEN FND_API.G_EXC_ERROR THEN
4670: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
4669: WHEN FND_API.G_EXC_ERROR THEN
4670: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
4671:
4672: IF l_debug_on THEN
4673: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
4674: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4675: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4676: END IF;
4677:
4670: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
4671:
4672: IF l_debug_on THEN
4673: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
4674: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4675: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4676: END IF;
4677:
4678: IF ( get_revision_number_csr%ISOPEN) THEN
4671:
4672: IF l_debug_on THEN
4673: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
4674: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4675: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4676: END IF;
4677:
4678: IF ( get_revision_number_csr%ISOPEN) THEN
4679: CLOSE get_revision_number_csr;
4682: WHEN OTHERS THEN
4683: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4684:
4685: IF l_debug_on THEN
4686: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
4687: Oracle error message is '||
4688:
4689: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4690: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4685: IF l_debug_on THEN
4686: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
4687: Oracle error message is '||
4688:
4689: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4690: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4691: END IF;
4692:
4693: IF ( get_revision_number_csr%ISOPEN) THEN
4686: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
4687: Oracle error message is '||
4688:
4689: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4690: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4691: END IF;
4692:
4693: IF ( get_revision_number_csr%ISOPEN) THEN
4694: CLOSE get_revision_number_csr;
4731:
4732: BEGIN
4733: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4734: IF l_debug_on IS NULL THEN
4735: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4736: END IF;
4737:
4738: IF l_debug_on THEN
4739: WSH_DEBUG_SV.push(l_module_name);
4735: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4736: END IF;
4737:
4738: IF l_debug_on THEN
4739: WSH_DEBUG_SV.push(l_module_name);
4740: WSH_DEBUG_SV.log(l_module_name,'p_org_name',p_org_name);
4741: END IF;
4742:
4743: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4736: END IF;
4737:
4738: IF l_debug_on THEN
4739: WSH_DEBUG_SV.push(l_module_name);
4740: WSH_DEBUG_SV.log(l_module_name,'p_org_name',p_org_name);
4741: END IF;
4742:
4743: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4744:
4747: FETCH get_org_csr INTO x_org_id;
4748: CLOSE get_org_csr;
4749:
4750: IF l_debug_on THEN
4751: WSH_DEBUG_SV.log(l_module_name,'x_org_id',x_org_id);
4752: END IF;
4753: IF (x_org_id is NULL) THEN
4754: raise fnd_api.g_exc_error;
4755: END IF;
4755: END IF;
4756:
4757:
4758: IF l_debug_on THEN
4759: WSH_DEBUG_SV.pop(l_module_name);
4760: END IF;
4761: EXCEPTION
4762: WHEN FND_API.G_EXC_ERROR THEN
4763: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
4762: WHEN FND_API.G_EXC_ERROR THEN
4763: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
4764:
4765: IF l_debug_on THEN
4766: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
4767: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4768: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4769: END IF;
4770:
4763: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
4764:
4765: IF l_debug_on THEN
4766: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
4767: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4768: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4769: END IF;
4770:
4771: FND_MESSAGE.SET_NAME('WSH','WSH_OI_INVALID_ORG');
4764:
4765: IF l_debug_on THEN
4766: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
4767: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4768: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4769: END IF;
4770:
4771: FND_MESSAGE.SET_NAME('WSH','WSH_OI_INVALID_ORG');
4772: fnd_msg_pub.add;
4774: WHEN OTHERS THEN
4775: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4776:
4777: IF l_debug_on THEN
4778: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
4779: Oracle error message is '||
4780:
4781: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4782: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4777: IF l_debug_on THEN
4778: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
4779: Oracle error message is '||
4780:
4781: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4782: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4783: END IF;
4784:
4785: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
4778: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
4779: Oracle error message is '||
4780:
4781: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4782: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4783: END IF;
4784:
4785: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
4786: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
4970:
4971: BEGIN
4972: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4973: IF l_debug_on IS NULL THEN
4974: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4975: END IF;
4976:
4977: IF l_debug_on THEN
4978: WSH_DEBUG_SV.push(l_module_name);
4974: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4975: END IF;
4976:
4977: IF l_debug_on THEN
4978: WSH_DEBUG_SV.push(l_module_name);
4979: WSH_DEBUG_SV.logmsg(l_module_name,'heali');
4980: WSH_DEBUG_SV.log(l_module_name,'p_header.count',p_header.supplier_name.count);
4981: WSH_DEBUG_SV.log(l_module_name,'p_delivery.count',p_delivery.ship_from_address1.count);
4982: WSH_DEBUG_SV.log(l_module_name,'p_line.count',p_line.po_header_number.count);
4975: END IF;
4976:
4977: IF l_debug_on THEN
4978: WSH_DEBUG_SV.push(l_module_name);
4979: WSH_DEBUG_SV.logmsg(l_module_name,'heali');
4980: WSH_DEBUG_SV.log(l_module_name,'p_header.count',p_header.supplier_name.count);
4981: WSH_DEBUG_SV.log(l_module_name,'p_delivery.count',p_delivery.ship_from_address1.count);
4982: WSH_DEBUG_SV.log(l_module_name,'p_line.count',p_line.po_header_number.count);
4983: END IF;
4976:
4977: IF l_debug_on THEN
4978: WSH_DEBUG_SV.push(l_module_name);
4979: WSH_DEBUG_SV.logmsg(l_module_name,'heali');
4980: WSH_DEBUG_SV.log(l_module_name,'p_header.count',p_header.supplier_name.count);
4981: WSH_DEBUG_SV.log(l_module_name,'p_delivery.count',p_delivery.ship_from_address1.count);
4982: WSH_DEBUG_SV.log(l_module_name,'p_line.count',p_line.po_header_number.count);
4983: END IF;
4984:
4977: IF l_debug_on THEN
4978: WSH_DEBUG_SV.push(l_module_name);
4979: WSH_DEBUG_SV.logmsg(l_module_name,'heali');
4980: WSH_DEBUG_SV.log(l_module_name,'p_header.count',p_header.supplier_name.count);
4981: WSH_DEBUG_SV.log(l_module_name,'p_delivery.count',p_delivery.ship_from_address1.count);
4982: WSH_DEBUG_SV.log(l_module_name,'p_line.count',p_line.po_header_number.count);
4983: END IF;
4984:
4985: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
4978: WSH_DEBUG_SV.push(l_module_name);
4979: WSH_DEBUG_SV.logmsg(l_module_name,'heali');
4980: WSH_DEBUG_SV.log(l_module_name,'p_header.count',p_header.supplier_name.count);
4981: WSH_DEBUG_SV.log(l_module_name,'p_delivery.count',p_delivery.ship_from_address1.count);
4982: WSH_DEBUG_SV.log(l_module_name,'p_line.count',p_line.po_header_number.count);
4983: END IF;
4984:
4985: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
4986:
4996: BEGIN
4997: --Loop through header record.
4998:
4999: IF l_debug_on THEN
5000: WSH_DEBUG_SV.log(l_module_name,'l_header_index',l_header_index);
5001: END IF;
5002:
5003:
5004: -- Hedaer is invalid ,ignore remaining lines
5017: p_detail_att =>l_detail_att,
5018: x_return_status =>l_return_status);
5019:
5020: IF l_debug_on THEN
5021: WSH_DEBUG_SV.log(l_module_name,'Validate_Header l_return_status',l_return_status);
5022: END IF;
5023: wsh_util_core.api_post_call(
5024: p_return_status => l_return_status,
5025: x_num_warnings => l_num_warnings,
5037:
5038: l_delivery_index := p_line.delivery_line_number(l_line_index);
5039:
5040: IF l_debug_on THEN
5041: WSH_DEBUG_SV.logmsg(l_module_name,'---------------------');
5042: WSH_DEBUG_SV.log(l_module_name,'l_line_index',l_line_index);
5043: WSH_DEBUG_SV.log(l_module_name,'l_delivery_index',l_delivery_index);
5044: WSH_DEBUG_SV.log(l_module_name,'l_prev_delivery_index',l_prev_delivery_index);
5045: WSH_DEBUG_SV.log(l_module_name,'p_delivery.error_flag',p_delivery.error_flag(l_delivery_index));
5038: l_delivery_index := p_line.delivery_line_number(l_line_index);
5039:
5040: IF l_debug_on THEN
5041: WSH_DEBUG_SV.logmsg(l_module_name,'---------------------');
5042: WSH_DEBUG_SV.log(l_module_name,'l_line_index',l_line_index);
5043: WSH_DEBUG_SV.log(l_module_name,'l_delivery_index',l_delivery_index);
5044: WSH_DEBUG_SV.log(l_module_name,'l_prev_delivery_index',l_prev_delivery_index);
5045: WSH_DEBUG_SV.log(l_module_name,'p_delivery.error_flag',p_delivery.error_flag(l_delivery_index));
5046: WSH_DEBUG_SV.log(l_module_name,'p_line.item_quantity',p_line.item_quantity(l_line_index));
5039:
5040: IF l_debug_on THEN
5041: WSH_DEBUG_SV.logmsg(l_module_name,'---------------------');
5042: WSH_DEBUG_SV.log(l_module_name,'l_line_index',l_line_index);
5043: WSH_DEBUG_SV.log(l_module_name,'l_delivery_index',l_delivery_index);
5044: WSH_DEBUG_SV.log(l_module_name,'l_prev_delivery_index',l_prev_delivery_index);
5045: WSH_DEBUG_SV.log(l_module_name,'p_delivery.error_flag',p_delivery.error_flag(l_delivery_index));
5046: WSH_DEBUG_SV.log(l_module_name,'p_line.item_quantity',p_line.item_quantity(l_line_index));
5047: WSH_DEBUG_SV.log(l_module_name,'prev_routing_req_id',l_detail_att.prev_routing_req_id);
5040: IF l_debug_on THEN
5041: WSH_DEBUG_SV.logmsg(l_module_name,'---------------------');
5042: WSH_DEBUG_SV.log(l_module_name,'l_line_index',l_line_index);
5043: WSH_DEBUG_SV.log(l_module_name,'l_delivery_index',l_delivery_index);
5044: WSH_DEBUG_SV.log(l_module_name,'l_prev_delivery_index',l_prev_delivery_index);
5045: WSH_DEBUG_SV.log(l_module_name,'p_delivery.error_flag',p_delivery.error_flag(l_delivery_index));
5046: WSH_DEBUG_SV.log(l_module_name,'p_line.item_quantity',p_line.item_quantity(l_line_index));
5047: WSH_DEBUG_SV.log(l_module_name,'prev_routing_req_id',l_detail_att.prev_routing_req_id);
5048: WSH_DEBUG_SV.log(l_module_name,'Message Count :',FND_MSG_PUB.Count_Msg);
5041: WSH_DEBUG_SV.logmsg(l_module_name,'---------------------');
5042: WSH_DEBUG_SV.log(l_module_name,'l_line_index',l_line_index);
5043: WSH_DEBUG_SV.log(l_module_name,'l_delivery_index',l_delivery_index);
5044: WSH_DEBUG_SV.log(l_module_name,'l_prev_delivery_index',l_prev_delivery_index);
5045: WSH_DEBUG_SV.log(l_module_name,'p_delivery.error_flag',p_delivery.error_flag(l_delivery_index));
5046: WSH_DEBUG_SV.log(l_module_name,'p_line.item_quantity',p_line.item_quantity(l_line_index));
5047: WSH_DEBUG_SV.log(l_module_name,'prev_routing_req_id',l_detail_att.prev_routing_req_id);
5048: WSH_DEBUG_SV.log(l_module_name,'Message Count :',FND_MSG_PUB.Count_Msg);
5049: END IF;
5042: WSH_DEBUG_SV.log(l_module_name,'l_line_index',l_line_index);
5043: WSH_DEBUG_SV.log(l_module_name,'l_delivery_index',l_delivery_index);
5044: WSH_DEBUG_SV.log(l_module_name,'l_prev_delivery_index',l_prev_delivery_index);
5045: WSH_DEBUG_SV.log(l_module_name,'p_delivery.error_flag',p_delivery.error_flag(l_delivery_index));
5046: WSH_DEBUG_SV.log(l_module_name,'p_line.item_quantity',p_line.item_quantity(l_line_index));
5047: WSH_DEBUG_SV.log(l_module_name,'prev_routing_req_id',l_detail_att.prev_routing_req_id);
5048: WSH_DEBUG_SV.log(l_module_name,'Message Count :',FND_MSG_PUB.Count_Msg);
5049: END IF;
5050:
5043: WSH_DEBUG_SV.log(l_module_name,'l_delivery_index',l_delivery_index);
5044: WSH_DEBUG_SV.log(l_module_name,'l_prev_delivery_index',l_prev_delivery_index);
5045: WSH_DEBUG_SV.log(l_module_name,'p_delivery.error_flag',p_delivery.error_flag(l_delivery_index));
5046: WSH_DEBUG_SV.log(l_module_name,'p_line.item_quantity',p_line.item_quantity(l_line_index));
5047: WSH_DEBUG_SV.log(l_module_name,'prev_routing_req_id',l_detail_att.prev_routing_req_id);
5048: WSH_DEBUG_SV.log(l_module_name,'Message Count :',FND_MSG_PUB.Count_Msg);
5049: END IF;
5050:
5051: l_new_detail_ids.delete;
5044: WSH_DEBUG_SV.log(l_module_name,'l_prev_delivery_index',l_prev_delivery_index);
5045: WSH_DEBUG_SV.log(l_module_name,'p_delivery.error_flag',p_delivery.error_flag(l_delivery_index));
5046: WSH_DEBUG_SV.log(l_module_name,'p_line.item_quantity',p_line.item_quantity(l_line_index));
5047: WSH_DEBUG_SV.log(l_module_name,'prev_routing_req_id',l_detail_att.prev_routing_req_id);
5048: WSH_DEBUG_SV.log(l_module_name,'Message Count :',FND_MSG_PUB.Count_Msg);
5049: END IF;
5050:
5051: l_new_detail_ids.delete;
5052:
5053: IF (l_prev_delivery_index IS NOT NULL and l_prev_delivery_index <> l_delivery_index) THEN --{
5054: --Create the previous delivery
5055:
5056: IF l_debug_on THEN
5057: WSH_DEBUG_SV.logmsg(l_module_name,'Creating Previous Delivery');
5058: WSH_DEBUG_SV.log(l_module_name,'Delivery Error flag',p_delivery.error_flag(l_prev_delivery_index));
5059: WSH_DEBUG_SV.log(l_module_name,'l_sum_new_detail_ids.count',l_sum_new_detail_ids.count);
5060: END IF;
5061:
5054: --Create the previous delivery
5055:
5056: IF l_debug_on THEN
5057: WSH_DEBUG_SV.logmsg(l_module_name,'Creating Previous Delivery');
5058: WSH_DEBUG_SV.log(l_module_name,'Delivery Error flag',p_delivery.error_flag(l_prev_delivery_index));
5059: WSH_DEBUG_SV.log(l_module_name,'l_sum_new_detail_ids.count',l_sum_new_detail_ids.count);
5060: END IF;
5061:
5062: IF (p_delivery.error_flag(l_prev_delivery_index) <> 'Y' and l_sum_new_detail_ids.count > 0) THEN
5055:
5056: IF l_debug_on THEN
5057: WSH_DEBUG_SV.logmsg(l_module_name,'Creating Previous Delivery');
5058: WSH_DEBUG_SV.log(l_module_name,'Delivery Error flag',p_delivery.error_flag(l_prev_delivery_index));
5059: WSH_DEBUG_SV.log(l_module_name,'l_sum_new_detail_ids.count',l_sum_new_detail_ids.count);
5060: END IF;
5061:
5062: IF (p_delivery.error_flag(l_prev_delivery_index) <> 'Y' and l_sum_new_detail_ids.count > 0) THEN
5063:
5068: x_new_deliveries => l_new_deliveries,
5069: x_return_status => l_return_status);
5070:
5071: IF l_debug_on THEN
5072: WSH_DEBUG_SV.log(l_module_name,'Create_Delivery l_return_status',l_return_status);
5073: WSH_DEBUG_SV.log(l_module_name,'l_new_deliveries.count',l_new_deliveries.count);
5074: END IF;
5075:
5076: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,WSH_UTIL_CORE.G_RET_STS_WARNING)) THEN
5069: x_return_status => l_return_status);
5070:
5071: IF l_debug_on THEN
5072: WSH_DEBUG_SV.log(l_module_name,'Create_Delivery l_return_status',l_return_status);
5073: WSH_DEBUG_SV.log(l_module_name,'l_new_deliveries.count',l_new_deliveries.count);
5074: END IF;
5075:
5076: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,WSH_UTIL_CORE.G_RET_STS_WARNING)) THEN
5077: l_del_new_index:=l_new_deliveries.first;
5116: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_prev_delivery_index);
5117: fnd_msg_pub.add;
5118:
5119: IF l_debug_on THEN
5120: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery Rollback to save point l_delivery_savepoint');
5121: END IF;
5122: rollback to savepoint l_delivery_savepoint;
5123: END IF;
5124:
5148: --This is because sequence of processing is line and associated delivery.
5149: IF (nvl(l_prev_delivery_index,-99) <> l_delivery_index) THEN --{
5150:
5151: IF l_debug_on THEN
5152: WSH_DEBUG_SV.logmsg(l_module_name,'Establishing save point l_delivery_savepoint');
5153: END IF;
5154: savepoint l_delivery_savepoint;
5155:
5156: IF ( p_delivery.error_flag(l_delivery_index) <> 'Y' ) THEN
5161: p_delivery => p_delivery,
5162: x_return_status => l_return_status);
5163:
5164: IF l_debug_on THEN
5165: WSH_DEBUG_SV.log(l_module_name,'Validate_Delivery l_return_status',l_return_status);
5166: END IF;
5167:
5168: wsh_util_core.api_post_call(
5169: p_return_status => l_return_status,
5190: x_org_id => l_detail_att.org_id,
5191: x_return_status => l_return_status);
5192:
5193: IF l_debug_on THEN
5194: WSH_DEBUG_SV.log(l_module_name,'WSH_UTIL_VALIDATE.Validate_Org l_return_status',l_return_status);
5195: WSH_DEBUG_SV.log(l_module_name,'l_org_id',l_detail_att.org_id);
5196: END IF;
5197:
5198: wsh_util_core.api_post_call(
5191: x_return_status => l_return_status);
5192:
5193: IF l_debug_on THEN
5194: WSH_DEBUG_SV.log(l_module_name,'WSH_UTIL_VALIDATE.Validate_Org l_return_status',l_return_status);
5195: WSH_DEBUG_SV.log(l_module_name,'l_org_id',l_detail_att.org_id);
5196: END IF;
5197:
5198: wsh_util_core.api_post_call(
5199: p_return_status => l_return_status,
5214: l_wv_frozen_flag:='N';
5215:
5216:
5217: IF l_debug_on THEN
5218: WSH_DEBUG_SV.log(l_module_name,'org_id',l_detail_att.org_id);
5219: WSH_DEBUG_SV.log(l_module_name,'po_header_number',p_line.po_header_number(l_line_index));
5220: WSH_DEBUG_SV.log(l_module_name,'po_line_number',p_line.po_line_number(l_line_index));
5221: WSH_DEBUG_SV.log(l_module_name,'po_release_number',p_line.po_release_number(l_line_index));
5222: WSH_DEBUG_SV.log(l_module_name,'po_shipment_number',p_line.po_shipment_number(l_line_index));
5215:
5216:
5217: IF l_debug_on THEN
5218: WSH_DEBUG_SV.log(l_module_name,'org_id',l_detail_att.org_id);
5219: WSH_DEBUG_SV.log(l_module_name,'po_header_number',p_line.po_header_number(l_line_index));
5220: WSH_DEBUG_SV.log(l_module_name,'po_line_number',p_line.po_line_number(l_line_index));
5221: WSH_DEBUG_SV.log(l_module_name,'po_release_number',p_line.po_release_number(l_line_index));
5222: WSH_DEBUG_SV.log(l_module_name,'po_shipment_number',p_line.po_shipment_number(l_line_index));
5223: WSH_DEBUG_SV.log(l_module_name,'vendor_id',l_detail_att.vendor_id);
5216:
5217: IF l_debug_on THEN
5218: WSH_DEBUG_SV.log(l_module_name,'org_id',l_detail_att.org_id);
5219: WSH_DEBUG_SV.log(l_module_name,'po_header_number',p_line.po_header_number(l_line_index));
5220: WSH_DEBUG_SV.log(l_module_name,'po_line_number',p_line.po_line_number(l_line_index));
5221: WSH_DEBUG_SV.log(l_module_name,'po_release_number',p_line.po_release_number(l_line_index));
5222: WSH_DEBUG_SV.log(l_module_name,'po_shipment_number',p_line.po_shipment_number(l_line_index));
5223: WSH_DEBUG_SV.log(l_module_name,'vendor_id',l_detail_att.vendor_id);
5224: END IF;
5217: IF l_debug_on THEN
5218: WSH_DEBUG_SV.log(l_module_name,'org_id',l_detail_att.org_id);
5219: WSH_DEBUG_SV.log(l_module_name,'po_header_number',p_line.po_header_number(l_line_index));
5220: WSH_DEBUG_SV.log(l_module_name,'po_line_number',p_line.po_line_number(l_line_index));
5221: WSH_DEBUG_SV.log(l_module_name,'po_release_number',p_line.po_release_number(l_line_index));
5222: WSH_DEBUG_SV.log(l_module_name,'po_shipment_number',p_line.po_shipment_number(l_line_index));
5223: WSH_DEBUG_SV.log(l_module_name,'vendor_id',l_detail_att.vendor_id);
5224: END IF;
5225:
5218: WSH_DEBUG_SV.log(l_module_name,'org_id',l_detail_att.org_id);
5219: WSH_DEBUG_SV.log(l_module_name,'po_header_number',p_line.po_header_number(l_line_index));
5220: WSH_DEBUG_SV.log(l_module_name,'po_line_number',p_line.po_line_number(l_line_index));
5221: WSH_DEBUG_SV.log(l_module_name,'po_release_number',p_line.po_release_number(l_line_index));
5222: WSH_DEBUG_SV.log(l_module_name,'po_shipment_number',p_line.po_shipment_number(l_line_index));
5223: WSH_DEBUG_SV.log(l_module_name,'vendor_id',l_detail_att.vendor_id);
5224: END IF;
5225:
5226: --Cursor to get the valid PO details from wsh_delivery_detail table.
5219: WSH_DEBUG_SV.log(l_module_name,'po_header_number',p_line.po_header_number(l_line_index));
5220: WSH_DEBUG_SV.log(l_module_name,'po_line_number',p_line.po_line_number(l_line_index));
5221: WSH_DEBUG_SV.log(l_module_name,'po_release_number',p_line.po_release_number(l_line_index));
5222: WSH_DEBUG_SV.log(l_module_name,'po_shipment_number',p_line.po_shipment_number(l_line_index));
5223: WSH_DEBUG_SV.log(l_module_name,'vendor_id',l_detail_att.vendor_id);
5224: END IF;
5225:
5226: --Cursor to get the valid PO details from wsh_delivery_detail table.
5227: FOR l_po_info IN get_po_info_csr(l_detail_att.org_id, --{
5233: LOOP
5234: l_po_rec_found:= true;
5235:
5236: IF l_debug_on THEN
5237: WSH_DEBUG_SV.logmsg(l_module_name,'WDD line found');
5238: END IF;
5239:
5240: IF ( (l_po_info.source_blanket_reference_id IS NOT NULL
5241: AND p_line.po_release_number(l_line_index) IS NULL)
5256: p_line_location_id => l_po_info.po_shipment_line_id,
5257: p_release_id => l_po_info.source_blanket_reference_id,
5258: x_return_status => l_return_status);
5259: IF l_debug_on THEN
5260: WSH_DEBUG_SV.log(l_module_name,'Validate_PO l_return_status',l_return_status);
5261: END IF;
5262:
5263: wsh_util_core.api_post_call(
5264: p_return_status => l_return_status,
5266: x_num_errors => l_num_errors);
5267:
5268:
5269: IF l_debug_on THEN
5270: WSH_DEBUG_SV.log(l_module_name,'Before updates');
5271: WSH_DEBUG_SV.log(l_module_name,'l_po_info.delivery_detail_id',l_po_info.delivery_detail_id);
5272: WSH_DEBUG_SV.log(l_module_name,'l_po_info.requested_quantity',l_po_info.requested_quantity);
5273: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty',l_total_req_qty);
5274: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty2',l_total_req_qty2);
5267:
5268:
5269: IF l_debug_on THEN
5270: WSH_DEBUG_SV.log(l_module_name,'Before updates');
5271: WSH_DEBUG_SV.log(l_module_name,'l_po_info.delivery_detail_id',l_po_info.delivery_detail_id);
5272: WSH_DEBUG_SV.log(l_module_name,'l_po_info.requested_quantity',l_po_info.requested_quantity);
5273: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty',l_total_req_qty);
5274: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty2',l_total_req_qty2);
5275: WSH_DEBUG_SV.log(l_module_name,'l_dd_net_weight',l_dd_net_weight);
5268:
5269: IF l_debug_on THEN
5270: WSH_DEBUG_SV.log(l_module_name,'Before updates');
5271: WSH_DEBUG_SV.log(l_module_name,'l_po_info.delivery_detail_id',l_po_info.delivery_detail_id);
5272: WSH_DEBUG_SV.log(l_module_name,'l_po_info.requested_quantity',l_po_info.requested_quantity);
5273: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty',l_total_req_qty);
5274: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty2',l_total_req_qty2);
5275: WSH_DEBUG_SV.log(l_module_name,'l_dd_net_weight',l_dd_net_weight);
5276: WSH_DEBUG_SV.log(l_module_name,'l_dd_gross_weight',l_dd_gross_weight);
5269: IF l_debug_on THEN
5270: WSH_DEBUG_SV.log(l_module_name,'Before updates');
5271: WSH_DEBUG_SV.log(l_module_name,'l_po_info.delivery_detail_id',l_po_info.delivery_detail_id);
5272: WSH_DEBUG_SV.log(l_module_name,'l_po_info.requested_quantity',l_po_info.requested_quantity);
5273: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty',l_total_req_qty);
5274: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty2',l_total_req_qty2);
5275: WSH_DEBUG_SV.log(l_module_name,'l_dd_net_weight',l_dd_net_weight);
5276: WSH_DEBUG_SV.log(l_module_name,'l_dd_gross_weight',l_dd_gross_weight);
5277: WSH_DEBUG_SV.log(l_module_name,'l_dd_volume',l_dd_volume);
5270: WSH_DEBUG_SV.log(l_module_name,'Before updates');
5271: WSH_DEBUG_SV.log(l_module_name,'l_po_info.delivery_detail_id',l_po_info.delivery_detail_id);
5272: WSH_DEBUG_SV.log(l_module_name,'l_po_info.requested_quantity',l_po_info.requested_quantity);
5273: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty',l_total_req_qty);
5274: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty2',l_total_req_qty2);
5275: WSH_DEBUG_SV.log(l_module_name,'l_dd_net_weight',l_dd_net_weight);
5276: WSH_DEBUG_SV.log(l_module_name,'l_dd_gross_weight',l_dd_gross_weight);
5277: WSH_DEBUG_SV.log(l_module_name,'l_dd_volume',l_dd_volume);
5278: WSH_DEBUG_SV.log(l_module_name,'l_wv_frozen_flag',l_wv_frozen_flag);
5271: WSH_DEBUG_SV.log(l_module_name,'l_po_info.delivery_detail_id',l_po_info.delivery_detail_id);
5272: WSH_DEBUG_SV.log(l_module_name,'l_po_info.requested_quantity',l_po_info.requested_quantity);
5273: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty',l_total_req_qty);
5274: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty2',l_total_req_qty2);
5275: WSH_DEBUG_SV.log(l_module_name,'l_dd_net_weight',l_dd_net_weight);
5276: WSH_DEBUG_SV.log(l_module_name,'l_dd_gross_weight',l_dd_gross_weight);
5277: WSH_DEBUG_SV.log(l_module_name,'l_dd_volume',l_dd_volume);
5278: WSH_DEBUG_SV.log(l_module_name,'l_wv_frozen_flag',l_wv_frozen_flag);
5279: END IF;
5272: WSH_DEBUG_SV.log(l_module_name,'l_po_info.requested_quantity',l_po_info.requested_quantity);
5273: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty',l_total_req_qty);
5274: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty2',l_total_req_qty2);
5275: WSH_DEBUG_SV.log(l_module_name,'l_dd_net_weight',l_dd_net_weight);
5276: WSH_DEBUG_SV.log(l_module_name,'l_dd_gross_weight',l_dd_gross_weight);
5277: WSH_DEBUG_SV.log(l_module_name,'l_dd_volume',l_dd_volume);
5278: WSH_DEBUG_SV.log(l_module_name,'l_wv_frozen_flag',l_wv_frozen_flag);
5279: END IF;
5280:
5273: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty',l_total_req_qty);
5274: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty2',l_total_req_qty2);
5275: WSH_DEBUG_SV.log(l_module_name,'l_dd_net_weight',l_dd_net_weight);
5276: WSH_DEBUG_SV.log(l_module_name,'l_dd_gross_weight',l_dd_gross_weight);
5277: WSH_DEBUG_SV.log(l_module_name,'l_dd_volume',l_dd_volume);
5278: WSH_DEBUG_SV.log(l_module_name,'l_wv_frozen_flag',l_wv_frozen_flag);
5279: END IF;
5280:
5281: --Collect the attributes of detail line and
5274: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty2',l_total_req_qty2);
5275: WSH_DEBUG_SV.log(l_module_name,'l_dd_net_weight',l_dd_net_weight);
5276: WSH_DEBUG_SV.log(l_module_name,'l_dd_gross_weight',l_dd_gross_weight);
5277: WSH_DEBUG_SV.log(l_module_name,'l_dd_volume',l_dd_volume);
5278: WSH_DEBUG_SV.log(l_module_name,'l_wv_frozen_flag',l_wv_frozen_flag);
5279: END IF;
5280:
5281: --Collect the attributes of detail line and
5282: --sum of requested quantities,weight and volume.
5296: l_wv_frozen_flag:='Y';
5297: END IF;
5298:
5299: IF l_debug_on THEN
5300: WSH_DEBUG_SV.log(l_module_name,'After updates');
5301: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty',l_total_req_qty);
5302: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty2',l_total_req_qty2);
5303: WSH_DEBUG_SV.log(l_module_name,'l_dd_net_weight',l_dd_net_weight);
5304: WSH_DEBUG_SV.log(l_module_name,'l_dd_gross_weight',l_dd_gross_weight);
5297: END IF;
5298:
5299: IF l_debug_on THEN
5300: WSH_DEBUG_SV.log(l_module_name,'After updates');
5301: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty',l_total_req_qty);
5302: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty2',l_total_req_qty2);
5303: WSH_DEBUG_SV.log(l_module_name,'l_dd_net_weight',l_dd_net_weight);
5304: WSH_DEBUG_SV.log(l_module_name,'l_dd_gross_weight',l_dd_gross_weight);
5305: WSH_DEBUG_SV.log(l_module_name,'l_dd_volume',l_dd_volume);
5298:
5299: IF l_debug_on THEN
5300: WSH_DEBUG_SV.log(l_module_name,'After updates');
5301: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty',l_total_req_qty);
5302: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty2',l_total_req_qty2);
5303: WSH_DEBUG_SV.log(l_module_name,'l_dd_net_weight',l_dd_net_weight);
5304: WSH_DEBUG_SV.log(l_module_name,'l_dd_gross_weight',l_dd_gross_weight);
5305: WSH_DEBUG_SV.log(l_module_name,'l_dd_volume',l_dd_volume);
5306: WSH_DEBUG_SV.log(l_module_name,'l_wv_frozen_flag',l_wv_frozen_flag);
5299: IF l_debug_on THEN
5300: WSH_DEBUG_SV.log(l_module_name,'After updates');
5301: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty',l_total_req_qty);
5302: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty2',l_total_req_qty2);
5303: WSH_DEBUG_SV.log(l_module_name,'l_dd_net_weight',l_dd_net_weight);
5304: WSH_DEBUG_SV.log(l_module_name,'l_dd_gross_weight',l_dd_gross_weight);
5305: WSH_DEBUG_SV.log(l_module_name,'l_dd_volume',l_dd_volume);
5306: WSH_DEBUG_SV.log(l_module_name,'l_wv_frozen_flag',l_wv_frozen_flag);
5307: END IF;
5300: WSH_DEBUG_SV.log(l_module_name,'After updates');
5301: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty',l_total_req_qty);
5302: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty2',l_total_req_qty2);
5303: WSH_DEBUG_SV.log(l_module_name,'l_dd_net_weight',l_dd_net_weight);
5304: WSH_DEBUG_SV.log(l_module_name,'l_dd_gross_weight',l_dd_gross_weight);
5305: WSH_DEBUG_SV.log(l_module_name,'l_dd_volume',l_dd_volume);
5306: WSH_DEBUG_SV.log(l_module_name,'l_wv_frozen_flag',l_wv_frozen_flag);
5307: END IF;
5308: END LOOP; --}
5301: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty',l_total_req_qty);
5302: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty2',l_total_req_qty2);
5303: WSH_DEBUG_SV.log(l_module_name,'l_dd_net_weight',l_dd_net_weight);
5304: WSH_DEBUG_SV.log(l_module_name,'l_dd_gross_weight',l_dd_gross_weight);
5305: WSH_DEBUG_SV.log(l_module_name,'l_dd_volume',l_dd_volume);
5306: WSH_DEBUG_SV.log(l_module_name,'l_wv_frozen_flag',l_wv_frozen_flag);
5307: END IF;
5308: END LOOP; --}
5309:
5302: WSH_DEBUG_SV.log(l_module_name,'l_total_req_qty2',l_total_req_qty2);
5303: WSH_DEBUG_SV.log(l_module_name,'l_dd_net_weight',l_dd_net_weight);
5304: WSH_DEBUG_SV.log(l_module_name,'l_dd_gross_weight',l_dd_gross_weight);
5305: WSH_DEBUG_SV.log(l_module_name,'l_dd_volume',l_dd_volume);
5306: WSH_DEBUG_SV.log(l_module_name,'l_wv_frozen_flag',l_wv_frozen_flag);
5307: END IF;
5308: END LOOP; --}
5309:
5310:
5312: --try to get the PO line information based on header,line,release
5313: --and shipment number using cursor get_po_not_found_detail.
5314: IF (NOT l_po_rec_found) THEN --{
5315: IF l_debug_on THEN
5316: WSH_DEBUG_SV.logmsg(l_module_name,'No WDD line found');
5317: END IF;
5318:
5319: OPEN get_po_not_found_detail (l_detail_att.org_id,
5320: p_line.po_header_number(l_line_index),
5355: p_release_id => l_po_not_found_detail.source_blanket_reference_id,
5356: x_return_status => l_return_status);
5357:
5358: IF l_debug_on THEN
5359: WSH_DEBUG_SV.log(l_module_name,'Validate_PO l_return_status',l_return_status);
5360: END IF;
5361:
5362: wsh_util_core.api_post_call(
5363: p_return_status => l_return_status,
5385: x_delivery_detail_id => l_detail_att.delivery_detail_id,
5386: x_return_status => l_return_status);
5387:
5388: IF l_debug_on THEN
5389: WSH_DEBUG_SV.log(l_module_name,'Create_PO l_return_status',l_return_status);
5390: END IF;
5391: wsh_util_core.api_post_call(
5392: p_return_status => l_return_status,
5393: x_num_warnings => l_num_warnings,
5425: p_delivery => p_delivery,
5426: x_return_status => l_return_status);
5427:
5428: IF l_debug_on THEN
5429: WSH_DEBUG_SV.log(l_module_name,'Validate_Delivery_uom l_return_status',l_return_status);
5430: END IF;
5431:
5432: wsh_util_core.api_post_call(
5433: p_return_status => l_return_status,
5452: p_line => p_line,
5453: x_return_status => l_return_status);
5454:
5455: IF l_debug_on THEN
5456: WSH_DEBUG_SV.log(l_module_name,'Validate_line l_return_status',l_return_status);
5457: WSH_DEBUG_SV.log(l_module_name,'l_item_qty',l_item_qty);
5458: END IF;
5459: wsh_util_core.api_post_call(
5460: p_return_status => l_return_status,
5453: x_return_status => l_return_status);
5454:
5455: IF l_debug_on THEN
5456: WSH_DEBUG_SV.log(l_module_name,'Validate_line l_return_status',l_return_status);
5457: WSH_DEBUG_SV.log(l_module_name,'l_item_qty',l_item_qty);
5458: END IF;
5459: wsh_util_core.api_post_call(
5460: p_return_status => l_return_status,
5461: x_num_warnings => l_num_warnings,
5485: x_new_detail_ids => l_new_detail_ids,
5486: x_return_status => l_return_status);
5487:
5488: IF l_debug_on THEN
5489: WSH_DEBUG_SV.log(l_module_name,'Update_Split_Details l_return_status',l_return_status);
5490: END IF;
5491: wsh_util_core.api_post_call(
5492: p_return_status => l_return_status,
5493: x_num_warnings => l_num_warnings,
5500:
5501: EXCEPTION
5502: WHEN FND_API.G_EXC_ERROR THEN
5503: IF l_debug_on THEN
5504: WSH_DEBUG_SV.log(l_module_name,'Line e_line_error :',l_return_status);
5505: END IF;
5506:
5507: p_line.error_flag(l_line_index):='Y';
5508: p_delivery.error_flag(l_delivery_index):='Y';
5514: CLOSE get_po_not_found_detail;
5515: END IF;
5516:
5517: IF l_debug_on THEN
5518: WSH_DEBUG_SV.logmsg(l_module_name,'Line Rollback to save point l_delivery_savepoint');
5519: END IF;
5520: rollback to savepoint l_delivery_savepoint;
5521:
5522: --halock
5521:
5522: --halock
5523: WHEN e_wdd_locked THEN
5524: IF l_debug_on THEN
5525: WSH_DEBUG_SV.log(l_module_name,'Detail lines are locked:',l_line_index);
5526: END IF;
5527:
5528: p_line.error_flag(l_line_index):='Y';
5529: p_delivery.error_flag(l_delivery_index):='Y';
5539: CLOSE get_po_not_found_detail;
5540: END IF;
5541:
5542: IF l_debug_on THEN
5543: WSH_DEBUG_SV.logmsg(l_module_name,'Line Rollback to save point l_delivery_savepoint');
5544: END IF;
5545: rollback to savepoint l_delivery_savepoint;
5546: --halock
5547:
5546: --halock
5547:
5548: WHEN e_ignore_line THEN
5549: IF l_debug_on THEN
5550: WSH_DEBUG_SV.logmsg(l_module_name,'Line e_ignore_line');
5551: END IF;
5552:
5553:
5554: WHEN e_delivery_invalid THEN
5552:
5553:
5554: WHEN e_delivery_invalid THEN
5555: IF l_debug_on THEN
5556: WSH_DEBUG_SV.logmsg(l_module_name,'Line e_delivery_invalid');
5557: END IF;
5558:
5559: WHEN others THEN
5560: IF l_debug_on THEN
5557: END IF;
5558:
5559: WHEN others THEN
5560: IF l_debug_on THEN
5561: WSH_DEBUG_SV.logmsg(l_module_name,'Line others');
5562: END IF;
5563: p_line.error_flag(l_line_index):='Y';
5564: p_delivery.error_flag(l_delivery_index):='Y';
5565:
5575:
5576: l_id := l_new_detail_ids.first;
5577: WHILE (l_id IS NOT NULL ) LOOP
5578: IF l_debug_on THEN
5579: WSH_DEBUG_SV.log(l_module_name,'Collecting detail ids',l_new_detail_ids(l_id));
5580: END IF;
5581: l_sum_new_detail_ids(l_sum_new_detail_ids.count + 1):=l_new_detail_ids(l_id);
5582:
5583: l_id := l_new_detail_ids.next(l_id);
5589: IF ( l_line_last = l_line_index and p_delivery.error_flag(l_delivery_index) <> 'Y' and l_sum_new_detail_ids.count > 0) THEN
5590: --{
5591:
5592: IF l_debug_on THEN
5593: WSH_DEBUG_SV.logmsg(l_module_name,'Creating last delivery');
5594: WSH_DEBUG_SV.log(l_module_name,'l_sum_new_detail_ids.count',l_sum_new_detail_ids.count);
5595: END IF;
5596:
5597: Create_Delivery(
5590: --{
5591:
5592: IF l_debug_on THEN
5593: WSH_DEBUG_SV.logmsg(l_module_name,'Creating last delivery');
5594: WSH_DEBUG_SV.log(l_module_name,'l_sum_new_detail_ids.count',l_sum_new_detail_ids.count);
5595: END IF;
5596:
5597: Create_Delivery(
5598: p_detail_ids => l_sum_new_detail_ids,
5602: x_return_status => l_return_status);
5603:
5604:
5605: IF l_debug_on THEN
5606: WSH_DEBUG_SV.log(l_module_name,'Create_Delivery l_return_status',l_return_status);
5607: WSH_DEBUG_SV.log(l_module_name,'l_new_deliveries.count',l_new_deliveries.count);
5608: END IF;
5609:
5610: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,WSH_UTIL_CORE.G_RET_STS_WARNING)) THEN
5603:
5604:
5605: IF l_debug_on THEN
5606: WSH_DEBUG_SV.log(l_module_name,'Create_Delivery l_return_status',l_return_status);
5607: WSH_DEBUG_SV.log(l_module_name,'l_new_deliveries.count',l_new_deliveries.count);
5608: END IF;
5609:
5610: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,WSH_UTIL_CORE.G_RET_STS_WARNING)) THEN
5611: l_del_new_index:=l_new_deliveries.first;
5650: FND_MESSAGE.SET_TOKEN('LINE_NUMBER', l_delivery_index);
5651: fnd_msg_pub.add;
5652:
5653: IF l_debug_on THEN
5654: WSH_DEBUG_SV.logmsg(l_module_name,'Delivery Rollback to save point l_delivery_savepoint');
5655: END IF;
5656: rollback to savepoint l_delivery_savepoint;
5657: END IF;
5658:
5673:
5674: EXCEPTION
5675: WHEN FND_API.G_EXC_ERROR THEN
5676: IF l_debug_on THEN
5677: WSH_DEBUG_SV.log(l_module_name,'Header error: ',l_return_status);
5678: END IF;
5679:
5680: l_header_error := l_header_error + 1;
5681: p_header.error_flag(l_header_index):='Y';
5685:
5686:
5687: WHEN others THEN
5688: IF l_debug_on THEN
5689: WSH_DEBUG_SV.logmsg(l_module_name,'Header others');
5690: END IF;
5691: l_header_error := l_header_error + 1;
5692: p_header.error_flag(l_header_index):='Y';
5693:
5705: END LOOP; --} Header Loop
5706:
5707:
5708: IF l_debug_on THEN
5709: WSH_DEBUG_SV.log(l_module_name,'l_warn_count',l_warn_count);
5710: END IF;
5711: IF (l_warn_count > 0 ) THEN
5712: raise wsh_util_core.g_exc_warning;
5713: END IF;
5713: END IF;
5714:
5715:
5716: IF l_debug_on THEN
5717: WSH_DEBUG_SV.log(l_module_name,'l_header_error',l_header_error);
5718: END IF;
5719:
5720: IF (l_header_error >= p_header.supplier_name.count) THEN
5721: --All header records are error.
5728: --If all the deliveries are error than error out.
5729: Is_All_Line_Error(p_error_tbl => p_delivery.error_flag,
5730: x_return_status => x_return_status);
5731: IF l_debug_on THEN
5732: WSH_DEBUG_SV.log(l_module_name,'Is_All_Line_Error x_return_status',x_return_status);
5733: END IF;
5734:
5735: IF l_debug_on THEN
5736: WSH_DEBUG_SV.pop(l_module_name);
5732: WSH_DEBUG_SV.log(l_module_name,'Is_All_Line_Error x_return_status',x_return_status);
5733: END IF;
5734:
5735: IF l_debug_on THEN
5736: WSH_DEBUG_SV.pop(l_module_name);
5737: END IF;
5738:
5739: EXCEPTION
5740: WHEN FND_API.G_EXC_ERROR THEN
5740: WHEN FND_API.G_EXC_ERROR THEN
5741: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
5742:
5743: IF l_debug_on THEN
5744: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
5745: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5746: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
5747: END IF;
5748:
5741: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR ;
5742:
5743: IF l_debug_on THEN
5744: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
5745: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5746: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
5747: END IF;
5748:
5749: WHEN wsh_util_core.g_exc_warning THEN
5742:
5743: IF l_debug_on THEN
5744: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
5745: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5746: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
5747: END IF;
5748:
5749: WHEN wsh_util_core.g_exc_warning THEN
5750: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING ;
5749: WHEN wsh_util_core.g_exc_warning THEN
5750: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING ;
5751:
5752: IF l_debug_on THEN
5753: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.g_exc_warning
5754: exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5755: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
5756: END IF;
5757:
5750: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING ;
5751:
5752: IF l_debug_on THEN
5753: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.g_exc_warning
5754: exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5755: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
5756: END IF;
5757:
5758:
5751:
5752: IF l_debug_on THEN
5753: WSH_DEBUG_SV.logmsg(l_module_name,'wsh_util_core.g_exc_warning
5754: exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
5755: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
5756: END IF;
5757:
5758:
5759: WHEN OTHERS THEN
5759: WHEN OTHERS THEN
5760: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5761:
5762: IF l_debug_on THEN
5763: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
5764: Oracle error message is '||
5765:
5766: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5767: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5762: IF l_debug_on THEN
5763: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
5764: Oracle error message is '||
5765:
5766: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5767: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5768: END IF;
5769:
5770: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
5763: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
5764: Oracle error message is '||
5765:
5766: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5767: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5768: END IF;
5769:
5770: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
5771: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
5837: END IF;
5838:
5839: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5840: IF l_debug_on IS NULL THEN
5841: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5842: END IF;
5843:
5844: IF l_debug_on THEN
5845: WSH_DEBUG_SV.push(l_module_name);
5841: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5842: END IF;
5843:
5844: IF l_debug_on THEN
5845: WSH_DEBUG_SV.push(l_module_name);
5846: WSH_DEBUG_SV.log(l_module_name,'p_file_fields.level_number.count',p_file_fields.level_number.count);
5847: END IF;
5848:
5849: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5842: END IF;
5843:
5844: IF l_debug_on THEN
5845: WSH_DEBUG_SV.push(l_module_name);
5846: WSH_DEBUG_SV.log(l_module_name,'p_file_fields.level_number.count',p_file_fields.level_number.count);
5847: END IF;
5848:
5849: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5850:
5880: WHILE (l_index IS NOT NULL ) LOOP --{
5881: g_file_line_number := p_file_fields.file_line_number(l_index);
5882:
5883: IF l_debug_on THEN
5884: WSH_DEBUG_SV.log(l_module_name,'l_index',l_index);
5885: WSH_DEBUG_SV.log(l_module_name,'l_prev_line_number',l_prev_line_number);
5886: WSH_DEBUG_SV.log(l_module_name,'g_file_line_number',g_file_line_number);
5887: WSH_DEBUG_SV.log(l_module_name,'l_prev_level_number',l_prev_level_number);
5888: END IF;
5881: g_file_line_number := p_file_fields.file_line_number(l_index);
5882:
5883: IF l_debug_on THEN
5884: WSH_DEBUG_SV.log(l_module_name,'l_index',l_index);
5885: WSH_DEBUG_SV.log(l_module_name,'l_prev_line_number',l_prev_line_number);
5886: WSH_DEBUG_SV.log(l_module_name,'g_file_line_number',g_file_line_number);
5887: WSH_DEBUG_SV.log(l_module_name,'l_prev_level_number',l_prev_level_number);
5888: END IF;
5889:
5882:
5883: IF l_debug_on THEN
5884: WSH_DEBUG_SV.log(l_module_name,'l_index',l_index);
5885: WSH_DEBUG_SV.log(l_module_name,'l_prev_line_number',l_prev_line_number);
5886: WSH_DEBUG_SV.log(l_module_name,'g_file_line_number',g_file_line_number);
5887: WSH_DEBUG_SV.log(l_module_name,'l_prev_level_number',l_prev_level_number);
5888: END IF;
5889:
5890: --When file number changes
5883: IF l_debug_on THEN
5884: WSH_DEBUG_SV.log(l_module_name,'l_index',l_index);
5885: WSH_DEBUG_SV.log(l_module_name,'l_prev_line_number',l_prev_line_number);
5886: WSH_DEBUG_SV.log(l_module_name,'g_file_line_number',g_file_line_number);
5887: WSH_DEBUG_SV.log(l_module_name,'l_prev_level_number',l_prev_level_number);
5888: END IF;
5889:
5890: --When file number changes
5891: IF ( l_prev_line_number <> g_file_line_number) THEN --{
5949: p_header => l_header,
5950: x_return_status => l_return_status);
5951:
5952: IF l_debug_on THEN
5953: WSH_DEBUG_SV.log(l_module_name,'Process_header l_return_status',l_return_status);
5954: END IF;
5955: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
5956: l_header.error_flag(g_file_line_number):='Y';
5957: END IF;
5967: p_delivery => l_delivery,
5968: x_return_status => l_return_status);
5969:
5970: IF l_debug_on THEN
5971: WSH_DEBUG_SV.log(l_module_name,'Process_Delivery l_return_status',l_return_status);
5972: END IF;
5973: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
5974: l_delivery.error_flag(g_file_line_number):='Y';
5975: END IF;
5985: p_Line => l_Line,
5986: x_return_status => l_return_status);
5987:
5988: IF l_debug_on THEN
5989: WSH_DEBUG_SV.log(l_module_name,'Process_Line l_return_status',l_return_status);
5990: END IF;
5991: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
5992: l_Line.error_flag(g_file_line_number):='Y';
5993: l_delivery.error_flag(p_file_fields.Level_Ref_Number(l_index)):='Y';
6034: END IF;
6035:
6036:
6037: IF l_debug_on THEN
6038: WSH_DEBUG_SV.logmsg(l_module_name,'***************************');
6039: WSH_DEBUG_SV.logmsg(l_module_name,'Printing Header');
6040: END IF;
6041:
6042: l_hi := l_header.Supplier_name.first;
6035:
6036:
6037: IF l_debug_on THEN
6038: WSH_DEBUG_SV.logmsg(l_module_name,'***************************');
6039: WSH_DEBUG_SV.logmsg(l_module_name,'Printing Header');
6040: END IF;
6041:
6042: l_hi := l_header.Supplier_name.first;
6043: WHILE (l_hi IS NOT NULL ) LOOP
6041:
6042: l_hi := l_header.Supplier_name.first;
6043: WHILE (l_hi IS NOT NULL ) LOOP
6044: IF l_debug_on THEN
6045: WSH_DEBUG_SV.logmsg(l_module_name,'-------------------------');
6046: WSH_DEBUG_SV.log(l_module_name,'Index',l_hi);
6047: WSH_DEBUG_SV.log(l_module_name,'Supplier_name',l_header.Supplier_name(l_hi));
6048: WSH_DEBUG_SV.log(l_module_name,'Request_date',l_header.Request_date(l_hi));
6049: WSH_DEBUG_SV.log(l_module_name,'Request_Number',l_header.Request_Number(l_hi));
6042: l_hi := l_header.Supplier_name.first;
6043: WHILE (l_hi IS NOT NULL ) LOOP
6044: IF l_debug_on THEN
6045: WSH_DEBUG_SV.logmsg(l_module_name,'-------------------------');
6046: WSH_DEBUG_SV.log(l_module_name,'Index',l_hi);
6047: WSH_DEBUG_SV.log(l_module_name,'Supplier_name',l_header.Supplier_name(l_hi));
6048: WSH_DEBUG_SV.log(l_module_name,'Request_date',l_header.Request_date(l_hi));
6049: WSH_DEBUG_SV.log(l_module_name,'Request_Number',l_header.Request_Number(l_hi));
6050: WSH_DEBUG_SV.log(l_module_name,'Request_revision',l_header.Request_revision(l_hi));
6043: WHILE (l_hi IS NOT NULL ) LOOP
6044: IF l_debug_on THEN
6045: WSH_DEBUG_SV.logmsg(l_module_name,'-------------------------');
6046: WSH_DEBUG_SV.log(l_module_name,'Index',l_hi);
6047: WSH_DEBUG_SV.log(l_module_name,'Supplier_name',l_header.Supplier_name(l_hi));
6048: WSH_DEBUG_SV.log(l_module_name,'Request_date',l_header.Request_date(l_hi));
6049: WSH_DEBUG_SV.log(l_module_name,'Request_Number',l_header.Request_Number(l_hi));
6050: WSH_DEBUG_SV.log(l_module_name,'Request_revision',l_header.Request_revision(l_hi));
6051: WSH_DEBUG_SV.log(l_module_name,'error_flag',l_header.error_flag(l_hi));
6044: IF l_debug_on THEN
6045: WSH_DEBUG_SV.logmsg(l_module_name,'-------------------------');
6046: WSH_DEBUG_SV.log(l_module_name,'Index',l_hi);
6047: WSH_DEBUG_SV.log(l_module_name,'Supplier_name',l_header.Supplier_name(l_hi));
6048: WSH_DEBUG_SV.log(l_module_name,'Request_date',l_header.Request_date(l_hi));
6049: WSH_DEBUG_SV.log(l_module_name,'Request_Number',l_header.Request_Number(l_hi));
6050: WSH_DEBUG_SV.log(l_module_name,'Request_revision',l_header.Request_revision(l_hi));
6051: WSH_DEBUG_SV.log(l_module_name,'error_flag',l_header.error_flag(l_hi));
6052: END IF;
6045: WSH_DEBUG_SV.logmsg(l_module_name,'-------------------------');
6046: WSH_DEBUG_SV.log(l_module_name,'Index',l_hi);
6047: WSH_DEBUG_SV.log(l_module_name,'Supplier_name',l_header.Supplier_name(l_hi));
6048: WSH_DEBUG_SV.log(l_module_name,'Request_date',l_header.Request_date(l_hi));
6049: WSH_DEBUG_SV.log(l_module_name,'Request_Number',l_header.Request_Number(l_hi));
6050: WSH_DEBUG_SV.log(l_module_name,'Request_revision',l_header.Request_revision(l_hi));
6051: WSH_DEBUG_SV.log(l_module_name,'error_flag',l_header.error_flag(l_hi));
6052: END IF;
6053:
6046: WSH_DEBUG_SV.log(l_module_name,'Index',l_hi);
6047: WSH_DEBUG_SV.log(l_module_name,'Supplier_name',l_header.Supplier_name(l_hi));
6048: WSH_DEBUG_SV.log(l_module_name,'Request_date',l_header.Request_date(l_hi));
6049: WSH_DEBUG_SV.log(l_module_name,'Request_Number',l_header.Request_Number(l_hi));
6050: WSH_DEBUG_SV.log(l_module_name,'Request_revision',l_header.Request_revision(l_hi));
6051: WSH_DEBUG_SV.log(l_module_name,'error_flag',l_header.error_flag(l_hi));
6052: END IF;
6053:
6054: l_hi :=l_header.Supplier_name.next(l_hi);
6047: WSH_DEBUG_SV.log(l_module_name,'Supplier_name',l_header.Supplier_name(l_hi));
6048: WSH_DEBUG_SV.log(l_module_name,'Request_date',l_header.Request_date(l_hi));
6049: WSH_DEBUG_SV.log(l_module_name,'Request_Number',l_header.Request_Number(l_hi));
6050: WSH_DEBUG_SV.log(l_module_name,'Request_revision',l_header.Request_revision(l_hi));
6051: WSH_DEBUG_SV.log(l_module_name,'error_flag',l_header.error_flag(l_hi));
6052: END IF;
6053:
6054: l_hi :=l_header.Supplier_name.next(l_hi);
6055: END LOOP;
6055: END LOOP;
6056:
6057:
6058: IF l_debug_on THEN
6059: WSH_DEBUG_SV.logmsg(l_module_name,'***************************');
6060: WSH_DEBUG_SV.logmsg(l_module_name,'Printing Delivery');
6061: END IF;
6062:
6063: l_di := l_delivery.Ship_From_Address1.first;
6056:
6057:
6058: IF l_debug_on THEN
6059: WSH_DEBUG_SV.logmsg(l_module_name,'***************************');
6060: WSH_DEBUG_SV.logmsg(l_module_name,'Printing Delivery');
6061: END IF;
6062:
6063: l_di := l_delivery.Ship_From_Address1.first;
6064: WHILE (l_di IS NOT NULL ) LOOP
6062:
6063: l_di := l_delivery.Ship_From_Address1.first;
6064: WHILE (l_di IS NOT NULL ) LOOP
6065: IF l_debug_on THEN
6066: WSH_DEBUG_SV.logmsg(l_module_name,'-------------------------');
6067: WSH_DEBUG_SV.log(l_module_name,'Index',l_di);
6068: WSH_DEBUG_SV.log(l_module_name,'Header_line_number',l_delivery.Header_line_number(l_di));
6069: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address1',l_delivery.Ship_From_Address1(l_di));
6070: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address2',l_delivery.Ship_From_Address2(l_di));
6063: l_di := l_delivery.Ship_From_Address1.first;
6064: WHILE (l_di IS NOT NULL ) LOOP
6065: IF l_debug_on THEN
6066: WSH_DEBUG_SV.logmsg(l_module_name,'-------------------------');
6067: WSH_DEBUG_SV.log(l_module_name,'Index',l_di);
6068: WSH_DEBUG_SV.log(l_module_name,'Header_line_number',l_delivery.Header_line_number(l_di));
6069: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address1',l_delivery.Ship_From_Address1(l_di));
6070: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address2',l_delivery.Ship_From_Address2(l_di));
6071: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address3',l_delivery.Ship_From_Address3(l_di));
6064: WHILE (l_di IS NOT NULL ) LOOP
6065: IF l_debug_on THEN
6066: WSH_DEBUG_SV.logmsg(l_module_name,'-------------------------');
6067: WSH_DEBUG_SV.log(l_module_name,'Index',l_di);
6068: WSH_DEBUG_SV.log(l_module_name,'Header_line_number',l_delivery.Header_line_number(l_di));
6069: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address1',l_delivery.Ship_From_Address1(l_di));
6070: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address2',l_delivery.Ship_From_Address2(l_di));
6071: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address3',l_delivery.Ship_From_Address3(l_di));
6072: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address4',l_delivery.Ship_From_Address4(l_di));
6065: IF l_debug_on THEN
6066: WSH_DEBUG_SV.logmsg(l_module_name,'-------------------------');
6067: WSH_DEBUG_SV.log(l_module_name,'Index',l_di);
6068: WSH_DEBUG_SV.log(l_module_name,'Header_line_number',l_delivery.Header_line_number(l_di));
6069: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address1',l_delivery.Ship_From_Address1(l_di));
6070: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address2',l_delivery.Ship_From_Address2(l_di));
6071: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address3',l_delivery.Ship_From_Address3(l_di));
6072: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address4',l_delivery.Ship_From_Address4(l_di));
6073: WSH_DEBUG_SV.log(l_module_name,'Ship_From_city',l_delivery.Ship_From_city(l_di));
6066: WSH_DEBUG_SV.logmsg(l_module_name,'-------------------------');
6067: WSH_DEBUG_SV.log(l_module_name,'Index',l_di);
6068: WSH_DEBUG_SV.log(l_module_name,'Header_line_number',l_delivery.Header_line_number(l_di));
6069: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address1',l_delivery.Ship_From_Address1(l_di));
6070: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address2',l_delivery.Ship_From_Address2(l_di));
6071: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address3',l_delivery.Ship_From_Address3(l_di));
6072: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address4',l_delivery.Ship_From_Address4(l_di));
6073: WSH_DEBUG_SV.log(l_module_name,'Ship_From_city',l_delivery.Ship_From_city(l_di));
6074: WSH_DEBUG_SV.log(l_module_name,'Ship_From_state',l_delivery.Ship_From_state(l_di));
6067: WSH_DEBUG_SV.log(l_module_name,'Index',l_di);
6068: WSH_DEBUG_SV.log(l_module_name,'Header_line_number',l_delivery.Header_line_number(l_di));
6069: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address1',l_delivery.Ship_From_Address1(l_di));
6070: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address2',l_delivery.Ship_From_Address2(l_di));
6071: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address3',l_delivery.Ship_From_Address3(l_di));
6072: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address4',l_delivery.Ship_From_Address4(l_di));
6073: WSH_DEBUG_SV.log(l_module_name,'Ship_From_city',l_delivery.Ship_From_city(l_di));
6074: WSH_DEBUG_SV.log(l_module_name,'Ship_From_state',l_delivery.Ship_From_state(l_di));
6075: WSH_DEBUG_SV.log(l_module_name,'Ship_From_county',l_delivery.Ship_From_county(l_di));
6068: WSH_DEBUG_SV.log(l_module_name,'Header_line_number',l_delivery.Header_line_number(l_di));
6069: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address1',l_delivery.Ship_From_Address1(l_di));
6070: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address2',l_delivery.Ship_From_Address2(l_di));
6071: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address3',l_delivery.Ship_From_Address3(l_di));
6072: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address4',l_delivery.Ship_From_Address4(l_di));
6073: WSH_DEBUG_SV.log(l_module_name,'Ship_From_city',l_delivery.Ship_From_city(l_di));
6074: WSH_DEBUG_SV.log(l_module_name,'Ship_From_state',l_delivery.Ship_From_state(l_di));
6075: WSH_DEBUG_SV.log(l_module_name,'Ship_From_county',l_delivery.Ship_From_county(l_di));
6076: WSH_DEBUG_SV.log(l_module_name,'Ship_From_country',l_delivery.Ship_From_country(l_di));
6069: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address1',l_delivery.Ship_From_Address1(l_di));
6070: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address2',l_delivery.Ship_From_Address2(l_di));
6071: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address3',l_delivery.Ship_From_Address3(l_di));
6072: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address4',l_delivery.Ship_From_Address4(l_di));
6073: WSH_DEBUG_SV.log(l_module_name,'Ship_From_city',l_delivery.Ship_From_city(l_di));
6074: WSH_DEBUG_SV.log(l_module_name,'Ship_From_state',l_delivery.Ship_From_state(l_di));
6075: WSH_DEBUG_SV.log(l_module_name,'Ship_From_county',l_delivery.Ship_From_county(l_di));
6076: WSH_DEBUG_SV.log(l_module_name,'Ship_From_country',l_delivery.Ship_From_country(l_di));
6077: WSH_DEBUG_SV.log(l_module_name,'Ship_From_province',l_delivery.Ship_From_province(l_di));
6070: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address2',l_delivery.Ship_From_Address2(l_di));
6071: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address3',l_delivery.Ship_From_Address3(l_di));
6072: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address4',l_delivery.Ship_From_Address4(l_di));
6073: WSH_DEBUG_SV.log(l_module_name,'Ship_From_city',l_delivery.Ship_From_city(l_di));
6074: WSH_DEBUG_SV.log(l_module_name,'Ship_From_state',l_delivery.Ship_From_state(l_di));
6075: WSH_DEBUG_SV.log(l_module_name,'Ship_From_county',l_delivery.Ship_From_county(l_di));
6076: WSH_DEBUG_SV.log(l_module_name,'Ship_From_country',l_delivery.Ship_From_country(l_di));
6077: WSH_DEBUG_SV.log(l_module_name,'Ship_From_province',l_delivery.Ship_From_province(l_di));
6078: WSH_DEBUG_SV.log(l_module_name,'Ship_From_postal_code',l_delivery.Ship_From_postal_code(l_di));
6071: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address3',l_delivery.Ship_From_Address3(l_di));
6072: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address4',l_delivery.Ship_From_Address4(l_di));
6073: WSH_DEBUG_SV.log(l_module_name,'Ship_From_city',l_delivery.Ship_From_city(l_di));
6074: WSH_DEBUG_SV.log(l_module_name,'Ship_From_state',l_delivery.Ship_From_state(l_di));
6075: WSH_DEBUG_SV.log(l_module_name,'Ship_From_county',l_delivery.Ship_From_county(l_di));
6076: WSH_DEBUG_SV.log(l_module_name,'Ship_From_country',l_delivery.Ship_From_country(l_di));
6077: WSH_DEBUG_SV.log(l_module_name,'Ship_From_province',l_delivery.Ship_From_province(l_di));
6078: WSH_DEBUG_SV.log(l_module_name,'Ship_From_postal_code',l_delivery.Ship_From_postal_code(l_di));
6079: WSH_DEBUG_SV.log(l_module_name,'Ship_From_code',l_delivery.Ship_From_code(l_di));
6072: WSH_DEBUG_SV.log(l_module_name,'Ship_From_Address4',l_delivery.Ship_From_Address4(l_di));
6073: WSH_DEBUG_SV.log(l_module_name,'Ship_From_city',l_delivery.Ship_From_city(l_di));
6074: WSH_DEBUG_SV.log(l_module_name,'Ship_From_state',l_delivery.Ship_From_state(l_di));
6075: WSH_DEBUG_SV.log(l_module_name,'Ship_From_county',l_delivery.Ship_From_county(l_di));
6076: WSH_DEBUG_SV.log(l_module_name,'Ship_From_country',l_delivery.Ship_From_country(l_di));
6077: WSH_DEBUG_SV.log(l_module_name,'Ship_From_province',l_delivery.Ship_From_province(l_di));
6078: WSH_DEBUG_SV.log(l_module_name,'Ship_From_postal_code',l_delivery.Ship_From_postal_code(l_di));
6079: WSH_DEBUG_SV.log(l_module_name,'Ship_From_code',l_delivery.Ship_From_code(l_di));
6080: WSH_DEBUG_SV.log(l_module_name,'Shipper_name',l_delivery.Shipper_name(l_di));
6073: WSH_DEBUG_SV.log(l_module_name,'Ship_From_city',l_delivery.Ship_From_city(l_di));
6074: WSH_DEBUG_SV.log(l_module_name,'Ship_From_state',l_delivery.Ship_From_state(l_di));
6075: WSH_DEBUG_SV.log(l_module_name,'Ship_From_county',l_delivery.Ship_From_county(l_di));
6076: WSH_DEBUG_SV.log(l_module_name,'Ship_From_country',l_delivery.Ship_From_country(l_di));
6077: WSH_DEBUG_SV.log(l_module_name,'Ship_From_province',l_delivery.Ship_From_province(l_di));
6078: WSH_DEBUG_SV.log(l_module_name,'Ship_From_postal_code',l_delivery.Ship_From_postal_code(l_di));
6079: WSH_DEBUG_SV.log(l_module_name,'Ship_From_code',l_delivery.Ship_From_code(l_di));
6080: WSH_DEBUG_SV.log(l_module_name,'Shipper_name',l_delivery.Shipper_name(l_di));
6081: WSH_DEBUG_SV.log(l_module_name,'Phone',l_delivery.Phone(l_di));
6074: WSH_DEBUG_SV.log(l_module_name,'Ship_From_state',l_delivery.Ship_From_state(l_di));
6075: WSH_DEBUG_SV.log(l_module_name,'Ship_From_county',l_delivery.Ship_From_county(l_di));
6076: WSH_DEBUG_SV.log(l_module_name,'Ship_From_country',l_delivery.Ship_From_country(l_di));
6077: WSH_DEBUG_SV.log(l_module_name,'Ship_From_province',l_delivery.Ship_From_province(l_di));
6078: WSH_DEBUG_SV.log(l_module_name,'Ship_From_postal_code',l_delivery.Ship_From_postal_code(l_di));
6079: WSH_DEBUG_SV.log(l_module_name,'Ship_From_code',l_delivery.Ship_From_code(l_di));
6080: WSH_DEBUG_SV.log(l_module_name,'Shipper_name',l_delivery.Shipper_name(l_di));
6081: WSH_DEBUG_SV.log(l_module_name,'Phone',l_delivery.Phone(l_di));
6082: WSH_DEBUG_SV.log(l_module_name,'email',l_delivery.email(l_di));
6075: WSH_DEBUG_SV.log(l_module_name,'Ship_From_county',l_delivery.Ship_From_county(l_di));
6076: WSH_DEBUG_SV.log(l_module_name,'Ship_From_country',l_delivery.Ship_From_country(l_di));
6077: WSH_DEBUG_SV.log(l_module_name,'Ship_From_province',l_delivery.Ship_From_province(l_di));
6078: WSH_DEBUG_SV.log(l_module_name,'Ship_From_postal_code',l_delivery.Ship_From_postal_code(l_di));
6079: WSH_DEBUG_SV.log(l_module_name,'Ship_From_code',l_delivery.Ship_From_code(l_di));
6080: WSH_DEBUG_SV.log(l_module_name,'Shipper_name',l_delivery.Shipper_name(l_di));
6081: WSH_DEBUG_SV.log(l_module_name,'Phone',l_delivery.Phone(l_di));
6082: WSH_DEBUG_SV.log(l_module_name,'email',l_delivery.email(l_di));
6083: WSH_DEBUG_SV.log(l_module_name,'Number_of_containers',l_delivery.Number_of_containers(l_di));
6076: WSH_DEBUG_SV.log(l_module_name,'Ship_From_country',l_delivery.Ship_From_country(l_di));
6077: WSH_DEBUG_SV.log(l_module_name,'Ship_From_province',l_delivery.Ship_From_province(l_di));
6078: WSH_DEBUG_SV.log(l_module_name,'Ship_From_postal_code',l_delivery.Ship_From_postal_code(l_di));
6079: WSH_DEBUG_SV.log(l_module_name,'Ship_From_code',l_delivery.Ship_From_code(l_di));
6080: WSH_DEBUG_SV.log(l_module_name,'Shipper_name',l_delivery.Shipper_name(l_di));
6081: WSH_DEBUG_SV.log(l_module_name,'Phone',l_delivery.Phone(l_di));
6082: WSH_DEBUG_SV.log(l_module_name,'email',l_delivery.email(l_di));
6083: WSH_DEBUG_SV.log(l_module_name,'Number_of_containers',l_delivery.Number_of_containers(l_di));
6084: WSH_DEBUG_SV.log(l_module_name,'total_weight',l_delivery.total_weight(l_di));
6077: WSH_DEBUG_SV.log(l_module_name,'Ship_From_province',l_delivery.Ship_From_province(l_di));
6078: WSH_DEBUG_SV.log(l_module_name,'Ship_From_postal_code',l_delivery.Ship_From_postal_code(l_di));
6079: WSH_DEBUG_SV.log(l_module_name,'Ship_From_code',l_delivery.Ship_From_code(l_di));
6080: WSH_DEBUG_SV.log(l_module_name,'Shipper_name',l_delivery.Shipper_name(l_di));
6081: WSH_DEBUG_SV.log(l_module_name,'Phone',l_delivery.Phone(l_di));
6082: WSH_DEBUG_SV.log(l_module_name,'email',l_delivery.email(l_di));
6083: WSH_DEBUG_SV.log(l_module_name,'Number_of_containers',l_delivery.Number_of_containers(l_di));
6084: WSH_DEBUG_SV.log(l_module_name,'total_weight',l_delivery.total_weight(l_di));
6085: WSH_DEBUG_SV.log(l_module_name,'weight_uom',l_delivery.weight_uom(l_di));
6078: WSH_DEBUG_SV.log(l_module_name,'Ship_From_postal_code',l_delivery.Ship_From_postal_code(l_di));
6079: WSH_DEBUG_SV.log(l_module_name,'Ship_From_code',l_delivery.Ship_From_code(l_di));
6080: WSH_DEBUG_SV.log(l_module_name,'Shipper_name',l_delivery.Shipper_name(l_di));
6081: WSH_DEBUG_SV.log(l_module_name,'Phone',l_delivery.Phone(l_di));
6082: WSH_DEBUG_SV.log(l_module_name,'email',l_delivery.email(l_di));
6083: WSH_DEBUG_SV.log(l_module_name,'Number_of_containers',l_delivery.Number_of_containers(l_di));
6084: WSH_DEBUG_SV.log(l_module_name,'total_weight',l_delivery.total_weight(l_di));
6085: WSH_DEBUG_SV.log(l_module_name,'weight_uom',l_delivery.weight_uom(l_di));
6086: WSH_DEBUG_SV.log(l_module_name,'total_volume',l_delivery.total_volume(l_di));
6079: WSH_DEBUG_SV.log(l_module_name,'Ship_From_code',l_delivery.Ship_From_code(l_di));
6080: WSH_DEBUG_SV.log(l_module_name,'Shipper_name',l_delivery.Shipper_name(l_di));
6081: WSH_DEBUG_SV.log(l_module_name,'Phone',l_delivery.Phone(l_di));
6082: WSH_DEBUG_SV.log(l_module_name,'email',l_delivery.email(l_di));
6083: WSH_DEBUG_SV.log(l_module_name,'Number_of_containers',l_delivery.Number_of_containers(l_di));
6084: WSH_DEBUG_SV.log(l_module_name,'total_weight',l_delivery.total_weight(l_di));
6085: WSH_DEBUG_SV.log(l_module_name,'weight_uom',l_delivery.weight_uom(l_di));
6086: WSH_DEBUG_SV.log(l_module_name,'total_volume',l_delivery.total_volume(l_di));
6087: WSH_DEBUG_SV.log(l_module_name,'volume_UOM',l_delivery.volume_UOM(l_di));
6080: WSH_DEBUG_SV.log(l_module_name,'Shipper_name',l_delivery.Shipper_name(l_di));
6081: WSH_DEBUG_SV.log(l_module_name,'Phone',l_delivery.Phone(l_di));
6082: WSH_DEBUG_SV.log(l_module_name,'email',l_delivery.email(l_di));
6083: WSH_DEBUG_SV.log(l_module_name,'Number_of_containers',l_delivery.Number_of_containers(l_di));
6084: WSH_DEBUG_SV.log(l_module_name,'total_weight',l_delivery.total_weight(l_di));
6085: WSH_DEBUG_SV.log(l_module_name,'weight_uom',l_delivery.weight_uom(l_di));
6086: WSH_DEBUG_SV.log(l_module_name,'total_volume',l_delivery.total_volume(l_di));
6087: WSH_DEBUG_SV.log(l_module_name,'volume_UOM',l_delivery.volume_UOM(l_di));
6088: WSH_DEBUG_SV.log(l_module_name,'remark',l_delivery.remark(l_di));
6081: WSH_DEBUG_SV.log(l_module_name,'Phone',l_delivery.Phone(l_di));
6082: WSH_DEBUG_SV.log(l_module_name,'email',l_delivery.email(l_di));
6083: WSH_DEBUG_SV.log(l_module_name,'Number_of_containers',l_delivery.Number_of_containers(l_di));
6084: WSH_DEBUG_SV.log(l_module_name,'total_weight',l_delivery.total_weight(l_di));
6085: WSH_DEBUG_SV.log(l_module_name,'weight_uom',l_delivery.weight_uom(l_di));
6086: WSH_DEBUG_SV.log(l_module_name,'total_volume',l_delivery.total_volume(l_di));
6087: WSH_DEBUG_SV.log(l_module_name,'volume_UOM',l_delivery.volume_UOM(l_di));
6088: WSH_DEBUG_SV.log(l_module_name,'remark',l_delivery.remark(l_di));
6089: WSH_DEBUG_SV.log(l_module_name,'error_flag',l_delivery.error_flag(l_di));
6082: WSH_DEBUG_SV.log(l_module_name,'email',l_delivery.email(l_di));
6083: WSH_DEBUG_SV.log(l_module_name,'Number_of_containers',l_delivery.Number_of_containers(l_di));
6084: WSH_DEBUG_SV.log(l_module_name,'total_weight',l_delivery.total_weight(l_di));
6085: WSH_DEBUG_SV.log(l_module_name,'weight_uom',l_delivery.weight_uom(l_di));
6086: WSH_DEBUG_SV.log(l_module_name,'total_volume',l_delivery.total_volume(l_di));
6087: WSH_DEBUG_SV.log(l_module_name,'volume_UOM',l_delivery.volume_UOM(l_di));
6088: WSH_DEBUG_SV.log(l_module_name,'remark',l_delivery.remark(l_di));
6089: WSH_DEBUG_SV.log(l_module_name,'error_flag',l_delivery.error_flag(l_di));
6090: END IF;
6083: WSH_DEBUG_SV.log(l_module_name,'Number_of_containers',l_delivery.Number_of_containers(l_di));
6084: WSH_DEBUG_SV.log(l_module_name,'total_weight',l_delivery.total_weight(l_di));
6085: WSH_DEBUG_SV.log(l_module_name,'weight_uom',l_delivery.weight_uom(l_di));
6086: WSH_DEBUG_SV.log(l_module_name,'total_volume',l_delivery.total_volume(l_di));
6087: WSH_DEBUG_SV.log(l_module_name,'volume_UOM',l_delivery.volume_UOM(l_di));
6088: WSH_DEBUG_SV.log(l_module_name,'remark',l_delivery.remark(l_di));
6089: WSH_DEBUG_SV.log(l_module_name,'error_flag',l_delivery.error_flag(l_di));
6090: END IF;
6091:
6084: WSH_DEBUG_SV.log(l_module_name,'total_weight',l_delivery.total_weight(l_di));
6085: WSH_DEBUG_SV.log(l_module_name,'weight_uom',l_delivery.weight_uom(l_di));
6086: WSH_DEBUG_SV.log(l_module_name,'total_volume',l_delivery.total_volume(l_di));
6087: WSH_DEBUG_SV.log(l_module_name,'volume_UOM',l_delivery.volume_UOM(l_di));
6088: WSH_DEBUG_SV.log(l_module_name,'remark',l_delivery.remark(l_di));
6089: WSH_DEBUG_SV.log(l_module_name,'error_flag',l_delivery.error_flag(l_di));
6090: END IF;
6091:
6092:
6085: WSH_DEBUG_SV.log(l_module_name,'weight_uom',l_delivery.weight_uom(l_di));
6086: WSH_DEBUG_SV.log(l_module_name,'total_volume',l_delivery.total_volume(l_di));
6087: WSH_DEBUG_SV.log(l_module_name,'volume_UOM',l_delivery.volume_UOM(l_di));
6088: WSH_DEBUG_SV.log(l_module_name,'remark',l_delivery.remark(l_di));
6089: WSH_DEBUG_SV.log(l_module_name,'error_flag',l_delivery.error_flag(l_di));
6090: END IF;
6091:
6092:
6093: l_di :=l_delivery.Ship_From_Address1.next(l_di);
6094: END LOOP;
6095:
6096:
6097: IF l_debug_on THEN
6098: WSH_DEBUG_SV.logmsg(l_module_name,'***************************');
6099: WSH_DEBUG_SV.logmsg(l_module_name,'Printing Line');
6100: END IF;
6101:
6102: l_li := l_line.Po_Header_number.first;
6095:
6096:
6097: IF l_debug_on THEN
6098: WSH_DEBUG_SV.logmsg(l_module_name,'***************************');
6099: WSH_DEBUG_SV.logmsg(l_module_name,'Printing Line');
6100: END IF;
6101:
6102: l_li := l_line.Po_Header_number.first;
6103: WHILE (l_li IS NOT NULL ) LOOP
6101:
6102: l_li := l_line.Po_Header_number.first;
6103: WHILE (l_li IS NOT NULL ) LOOP
6104: IF l_debug_on THEN
6105: WSH_DEBUG_SV.logmsg(l_module_name,'-------------------------');
6106: WSH_DEBUG_SV.log(l_module_name,'Index',l_li);
6107: WSH_DEBUG_SV.log(l_module_name,'Delivery_line_number',l_line.Delivery_line_number(l_li));
6108: WSH_DEBUG_SV.log(l_module_name,'Po_Header_number',l_line.Po_Header_number(l_li));
6109: WSH_DEBUG_SV.log(l_module_name,'Po_Release_number',l_line.Po_Release_number(l_li));
6102: l_li := l_line.Po_Header_number.first;
6103: WHILE (l_li IS NOT NULL ) LOOP
6104: IF l_debug_on THEN
6105: WSH_DEBUG_SV.logmsg(l_module_name,'-------------------------');
6106: WSH_DEBUG_SV.log(l_module_name,'Index',l_li);
6107: WSH_DEBUG_SV.log(l_module_name,'Delivery_line_number',l_line.Delivery_line_number(l_li));
6108: WSH_DEBUG_SV.log(l_module_name,'Po_Header_number',l_line.Po_Header_number(l_li));
6109: WSH_DEBUG_SV.log(l_module_name,'Po_Release_number',l_line.Po_Release_number(l_li));
6110: WSH_DEBUG_SV.log(l_module_name,'PO_Line_number',l_line.PO_Line_number(l_li));
6103: WHILE (l_li IS NOT NULL ) LOOP
6104: IF l_debug_on THEN
6105: WSH_DEBUG_SV.logmsg(l_module_name,'-------------------------');
6106: WSH_DEBUG_SV.log(l_module_name,'Index',l_li);
6107: WSH_DEBUG_SV.log(l_module_name,'Delivery_line_number',l_line.Delivery_line_number(l_li));
6108: WSH_DEBUG_SV.log(l_module_name,'Po_Header_number',l_line.Po_Header_number(l_li));
6109: WSH_DEBUG_SV.log(l_module_name,'Po_Release_number',l_line.Po_Release_number(l_li));
6110: WSH_DEBUG_SV.log(l_module_name,'PO_Line_number',l_line.PO_Line_number(l_li));
6111: WSH_DEBUG_SV.log(l_module_name,'PO_Shipment_number',l_line.PO_Shipment_number(l_li));
6104: IF l_debug_on THEN
6105: WSH_DEBUG_SV.logmsg(l_module_name,'-------------------------');
6106: WSH_DEBUG_SV.log(l_module_name,'Index',l_li);
6107: WSH_DEBUG_SV.log(l_module_name,'Delivery_line_number',l_line.Delivery_line_number(l_li));
6108: WSH_DEBUG_SV.log(l_module_name,'Po_Header_number',l_line.Po_Header_number(l_li));
6109: WSH_DEBUG_SV.log(l_module_name,'Po_Release_number',l_line.Po_Release_number(l_li));
6110: WSH_DEBUG_SV.log(l_module_name,'PO_Line_number',l_line.PO_Line_number(l_li));
6111: WSH_DEBUG_SV.log(l_module_name,'PO_Shipment_number',l_line.PO_Shipment_number(l_li));
6112: WSH_DEBUG_SV.log(l_module_name,'Po_Operating_unit',l_line.Po_Operating_unit(l_li));
6105: WSH_DEBUG_SV.logmsg(l_module_name,'-------------------------');
6106: WSH_DEBUG_SV.log(l_module_name,'Index',l_li);
6107: WSH_DEBUG_SV.log(l_module_name,'Delivery_line_number',l_line.Delivery_line_number(l_li));
6108: WSH_DEBUG_SV.log(l_module_name,'Po_Header_number',l_line.Po_Header_number(l_li));
6109: WSH_DEBUG_SV.log(l_module_name,'Po_Release_number',l_line.Po_Release_number(l_li));
6110: WSH_DEBUG_SV.log(l_module_name,'PO_Line_number',l_line.PO_Line_number(l_li));
6111: WSH_DEBUG_SV.log(l_module_name,'PO_Shipment_number',l_line.PO_Shipment_number(l_li));
6112: WSH_DEBUG_SV.log(l_module_name,'Po_Operating_unit',l_line.Po_Operating_unit(l_li));
6113: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',l_line.Item_quantity(l_li));
6106: WSH_DEBUG_SV.log(l_module_name,'Index',l_li);
6107: WSH_DEBUG_SV.log(l_module_name,'Delivery_line_number',l_line.Delivery_line_number(l_li));
6108: WSH_DEBUG_SV.log(l_module_name,'Po_Header_number',l_line.Po_Header_number(l_li));
6109: WSH_DEBUG_SV.log(l_module_name,'Po_Release_number',l_line.Po_Release_number(l_li));
6110: WSH_DEBUG_SV.log(l_module_name,'PO_Line_number',l_line.PO_Line_number(l_li));
6111: WSH_DEBUG_SV.log(l_module_name,'PO_Shipment_number',l_line.PO_Shipment_number(l_li));
6112: WSH_DEBUG_SV.log(l_module_name,'Po_Operating_unit',l_line.Po_Operating_unit(l_li));
6113: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',l_line.Item_quantity(l_li));
6114: WSH_DEBUG_SV.log(l_module_name,'Item_uom',l_line.Item_uom(l_li));
6107: WSH_DEBUG_SV.log(l_module_name,'Delivery_line_number',l_line.Delivery_line_number(l_li));
6108: WSH_DEBUG_SV.log(l_module_name,'Po_Header_number',l_line.Po_Header_number(l_li));
6109: WSH_DEBUG_SV.log(l_module_name,'Po_Release_number',l_line.Po_Release_number(l_li));
6110: WSH_DEBUG_SV.log(l_module_name,'PO_Line_number',l_line.PO_Line_number(l_li));
6111: WSH_DEBUG_SV.log(l_module_name,'PO_Shipment_number',l_line.PO_Shipment_number(l_li));
6112: WSH_DEBUG_SV.log(l_module_name,'Po_Operating_unit',l_line.Po_Operating_unit(l_li));
6113: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',l_line.Item_quantity(l_li));
6114: WSH_DEBUG_SV.log(l_module_name,'Item_uom',l_line.Item_uom(l_li));
6115: WSH_DEBUG_SV.log(l_module_name,'weight',l_line.weight(l_li));
6108: WSH_DEBUG_SV.log(l_module_name,'Po_Header_number',l_line.Po_Header_number(l_li));
6109: WSH_DEBUG_SV.log(l_module_name,'Po_Release_number',l_line.Po_Release_number(l_li));
6110: WSH_DEBUG_SV.log(l_module_name,'PO_Line_number',l_line.PO_Line_number(l_li));
6111: WSH_DEBUG_SV.log(l_module_name,'PO_Shipment_number',l_line.PO_Shipment_number(l_li));
6112: WSH_DEBUG_SV.log(l_module_name,'Po_Operating_unit',l_line.Po_Operating_unit(l_li));
6113: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',l_line.Item_quantity(l_li));
6114: WSH_DEBUG_SV.log(l_module_name,'Item_uom',l_line.Item_uom(l_li));
6115: WSH_DEBUG_SV.log(l_module_name,'weight',l_line.weight(l_li));
6116: WSH_DEBUG_SV.log(l_module_name,'Weight_uom',l_line.Weight_uom(l_li));
6109: WSH_DEBUG_SV.log(l_module_name,'Po_Release_number',l_line.Po_Release_number(l_li));
6110: WSH_DEBUG_SV.log(l_module_name,'PO_Line_number',l_line.PO_Line_number(l_li));
6111: WSH_DEBUG_SV.log(l_module_name,'PO_Shipment_number',l_line.PO_Shipment_number(l_li));
6112: WSH_DEBUG_SV.log(l_module_name,'Po_Operating_unit',l_line.Po_Operating_unit(l_li));
6113: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',l_line.Item_quantity(l_li));
6114: WSH_DEBUG_SV.log(l_module_name,'Item_uom',l_line.Item_uom(l_li));
6115: WSH_DEBUG_SV.log(l_module_name,'weight',l_line.weight(l_li));
6116: WSH_DEBUG_SV.log(l_module_name,'Weight_uom',l_line.Weight_uom(l_li));
6117: WSH_DEBUG_SV.log(l_module_name,'volume',l_line.volume(l_li));
6110: WSH_DEBUG_SV.log(l_module_name,'PO_Line_number',l_line.PO_Line_number(l_li));
6111: WSH_DEBUG_SV.log(l_module_name,'PO_Shipment_number',l_line.PO_Shipment_number(l_li));
6112: WSH_DEBUG_SV.log(l_module_name,'Po_Operating_unit',l_line.Po_Operating_unit(l_li));
6113: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',l_line.Item_quantity(l_li));
6114: WSH_DEBUG_SV.log(l_module_name,'Item_uom',l_line.Item_uom(l_li));
6115: WSH_DEBUG_SV.log(l_module_name,'weight',l_line.weight(l_li));
6116: WSH_DEBUG_SV.log(l_module_name,'Weight_uom',l_line.Weight_uom(l_li));
6117: WSH_DEBUG_SV.log(l_module_name,'volume',l_line.volume(l_li));
6118: WSH_DEBUG_SV.log(l_module_name,'Volume_UOM',l_line.Volume_UOM(l_li));
6111: WSH_DEBUG_SV.log(l_module_name,'PO_Shipment_number',l_line.PO_Shipment_number(l_li));
6112: WSH_DEBUG_SV.log(l_module_name,'Po_Operating_unit',l_line.Po_Operating_unit(l_li));
6113: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',l_line.Item_quantity(l_li));
6114: WSH_DEBUG_SV.log(l_module_name,'Item_uom',l_line.Item_uom(l_li));
6115: WSH_DEBUG_SV.log(l_module_name,'weight',l_line.weight(l_li));
6116: WSH_DEBUG_SV.log(l_module_name,'Weight_uom',l_line.Weight_uom(l_li));
6117: WSH_DEBUG_SV.log(l_module_name,'volume',l_line.volume(l_li));
6118: WSH_DEBUG_SV.log(l_module_name,'Volume_UOM',l_line.Volume_UOM(l_li));
6119: WSH_DEBUG_SV.log(l_module_name,'Earliest_pickup_date',l_line.Earliest_pickup_date(l_li));
6112: WSH_DEBUG_SV.log(l_module_name,'Po_Operating_unit',l_line.Po_Operating_unit(l_li));
6113: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',l_line.Item_quantity(l_li));
6114: WSH_DEBUG_SV.log(l_module_name,'Item_uom',l_line.Item_uom(l_li));
6115: WSH_DEBUG_SV.log(l_module_name,'weight',l_line.weight(l_li));
6116: WSH_DEBUG_SV.log(l_module_name,'Weight_uom',l_line.Weight_uom(l_li));
6117: WSH_DEBUG_SV.log(l_module_name,'volume',l_line.volume(l_li));
6118: WSH_DEBUG_SV.log(l_module_name,'Volume_UOM',l_line.Volume_UOM(l_li));
6119: WSH_DEBUG_SV.log(l_module_name,'Earliest_pickup_date',l_line.Earliest_pickup_date(l_li));
6120: WSH_DEBUG_SV.log(l_module_name,'Latest_pickup_date',l_line.Latest_pickup_date(l_li));
6113: WSH_DEBUG_SV.log(l_module_name,'Item_quantity',l_line.Item_quantity(l_li));
6114: WSH_DEBUG_SV.log(l_module_name,'Item_uom',l_line.Item_uom(l_li));
6115: WSH_DEBUG_SV.log(l_module_name,'weight',l_line.weight(l_li));
6116: WSH_DEBUG_SV.log(l_module_name,'Weight_uom',l_line.Weight_uom(l_li));
6117: WSH_DEBUG_SV.log(l_module_name,'volume',l_line.volume(l_li));
6118: WSH_DEBUG_SV.log(l_module_name,'Volume_UOM',l_line.Volume_UOM(l_li));
6119: WSH_DEBUG_SV.log(l_module_name,'Earliest_pickup_date',l_line.Earliest_pickup_date(l_li));
6120: WSH_DEBUG_SV.log(l_module_name,'Latest_pickup_date',l_line.Latest_pickup_date(l_li));
6121: WSH_DEBUG_SV.log(l_module_name,'error_flag',l_line.error_flag(l_li));
6114: WSH_DEBUG_SV.log(l_module_name,'Item_uom',l_line.Item_uom(l_li));
6115: WSH_DEBUG_SV.log(l_module_name,'weight',l_line.weight(l_li));
6116: WSH_DEBUG_SV.log(l_module_name,'Weight_uom',l_line.Weight_uom(l_li));
6117: WSH_DEBUG_SV.log(l_module_name,'volume',l_line.volume(l_li));
6118: WSH_DEBUG_SV.log(l_module_name,'Volume_UOM',l_line.Volume_UOM(l_li));
6119: WSH_DEBUG_SV.log(l_module_name,'Earliest_pickup_date',l_line.Earliest_pickup_date(l_li));
6120: WSH_DEBUG_SV.log(l_module_name,'Latest_pickup_date',l_line.Latest_pickup_date(l_li));
6121: WSH_DEBUG_SV.log(l_module_name,'error_flag',l_line.error_flag(l_li));
6122: END IF;
6115: WSH_DEBUG_SV.log(l_module_name,'weight',l_line.weight(l_li));
6116: WSH_DEBUG_SV.log(l_module_name,'Weight_uom',l_line.Weight_uom(l_li));
6117: WSH_DEBUG_SV.log(l_module_name,'volume',l_line.volume(l_li));
6118: WSH_DEBUG_SV.log(l_module_name,'Volume_UOM',l_line.Volume_UOM(l_li));
6119: WSH_DEBUG_SV.log(l_module_name,'Earliest_pickup_date',l_line.Earliest_pickup_date(l_li));
6120: WSH_DEBUG_SV.log(l_module_name,'Latest_pickup_date',l_line.Latest_pickup_date(l_li));
6121: WSH_DEBUG_SV.log(l_module_name,'error_flag',l_line.error_flag(l_li));
6122: END IF;
6123:
6116: WSH_DEBUG_SV.log(l_module_name,'Weight_uom',l_line.Weight_uom(l_li));
6117: WSH_DEBUG_SV.log(l_module_name,'volume',l_line.volume(l_li));
6118: WSH_DEBUG_SV.log(l_module_name,'Volume_UOM',l_line.Volume_UOM(l_li));
6119: WSH_DEBUG_SV.log(l_module_name,'Earliest_pickup_date',l_line.Earliest_pickup_date(l_li));
6120: WSH_DEBUG_SV.log(l_module_name,'Latest_pickup_date',l_line.Latest_pickup_date(l_li));
6121: WSH_DEBUG_SV.log(l_module_name,'error_flag',l_line.error_flag(l_li));
6122: END IF;
6123:
6124: l_li :=l_line.Po_Header_number.next(l_li);
6117: WSH_DEBUG_SV.log(l_module_name,'volume',l_line.volume(l_li));
6118: WSH_DEBUG_SV.log(l_module_name,'Volume_UOM',l_line.Volume_UOM(l_li));
6119: WSH_DEBUG_SV.log(l_module_name,'Earliest_pickup_date',l_line.Earliest_pickup_date(l_li));
6120: WSH_DEBUG_SV.log(l_module_name,'Latest_pickup_date',l_line.Latest_pickup_date(l_li));
6121: WSH_DEBUG_SV.log(l_module_name,'error_flag',l_line.error_flag(l_li));
6122: END IF;
6123:
6124: l_li :=l_line.Po_Header_number.next(l_li);
6125: END LOOP;
6129: Is_All_Line_Error(p_error_tbl => l_header.error_flag,
6130: x_return_status => x_return_status);
6131:
6132: IF l_debug_on THEN
6133: WSH_DEBUG_SV.log(l_module_name,'Is_All_Line_Error for Headers
6134: x_return_status',x_return_status);
6135: END IF;
6136:
6137: IF (x_return_status NOT IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
6141: Is_All_Line_Error(p_error_tbl => l_delivery.error_flag,
6142: x_return_status => x_return_status);
6143:
6144: IF l_debug_on THEN
6145: WSH_DEBUG_SV.log(l_module_name,'Is_All_Line_Error x_return_status',x_return_status);
6146: END IF;
6147: get_message;
6148:
6149: IF (x_return_status NOT IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) ) THEN
6156: x_success_tbl => x_message_tbl,
6157: x_return_status=> x_return_status);
6158:
6159: IF l_debug_on THEN
6160: WSH_DEBUG_SV.log(l_module_name,'Process_Routing_request x_return_status',x_return_status);
6161: END IF;
6162: END IF;
6163:
6164: END IF;
6187: --{
6188: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
6189: --{
6190: IF l_debug_on THEN
6191: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6192: END IF;
6193:
6194: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
6195: x_return_status => l_return_status);
6195: x_return_status => l_return_status);
6196:
6197:
6198: IF l_debug_on THEN
6199: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6200: END IF;
6201:
6202: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
6203: x_return_status := l_return_status;
6211: --{
6212: l_reset_flags := TRUE;
6213:
6214: IF l_debug_on THEN
6215: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Process_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6216: END IF;
6217:
6218: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
6219: x_return_status => l_return_status);
6218: WSH_UTIL_CORE.Process_stops_for_load_tender(p_reset_flags => l_reset_flags,
6219: x_return_status => l_return_status);
6220:
6221: IF l_debug_on THEN
6222: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6223: END IF;
6224:
6225: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,
6226: WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR,
6238:
6239: --Insert Debug information as message ,if debugger is on.
6240: IF l_debug_on THEN
6241: fnd_profile.get('WSH_DEBUG_LOG_DIRECTORY',l_debugfile);
6242: l_debugfile := l_debugfile||'/'||WSH_DEBUG_SV.g_file;
6243:
6244: FND_MESSAGE.SET_NAME('WSH','WSH_DEBUG_FILE_NAME');
6245: FND_MESSAGE.SET_TOKEN('DEBUG_FILE_NAME',l_debugfile);
6246:
6249: x_message_tbl(l_msg_count):= FND_MESSAGE.GET;
6250: END IF;
6251:
6252: IF l_debug_on THEN
6253: WSH_DEBUG_SV.pop(l_module_name);
6254: END IF;
6255:
6256: EXCEPTION
6257: WHEN FND_API.G_EXC_ERROR THEN
6263: --{
6264: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
6265: --{
6266: IF l_debug_on THEN
6267: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6268: END IF;
6269:
6270: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
6271: x_return_status => l_return_status);
6271: x_return_status => l_return_status);
6272:
6273:
6274: IF l_debug_on THEN
6275: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6276: END IF;
6277:
6278: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
6279: x_return_status := l_return_status;
6285: --
6286: -- End of Code Bugfix 4070732
6287: --
6288: IF l_debug_on THEN
6289: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
6290: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6291: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6292: END IF;
6293:
6286: -- End of Code Bugfix 4070732
6287: --
6288: IF l_debug_on THEN
6289: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
6290: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6291: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6292: END IF;
6293:
6294: WHEN OTHERS THEN
6287: --
6288: IF l_debug_on THEN
6289: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has
6290: occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6291: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6292: END IF;
6293:
6294: WHEN OTHERS THEN
6295: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6300: --{
6301: IF NOT(WSH_UTIL_CORE.G_CALL_FTE_LOAD_TENDER_API) THEN
6302: --{
6303: IF l_debug_on THEN
6304: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6305: END IF;
6306:
6307: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags => TRUE,
6308: x_return_status => l_return_status);
6308: x_return_status => l_return_status);
6309:
6310:
6311: IF l_debug_on THEN
6312: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6313: END IF;
6314:
6315: IF (l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
6316: x_return_status := l_return_status;
6323: -- End of Code Bugfix 4070732
6324: --
6325:
6326: IF l_debug_on THEN
6327: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
6328: Oracle error message is '||
6329:
6330: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6331: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6326: IF l_debug_on THEN
6327: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
6328: Oracle error message is '||
6329:
6330: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6331: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6332: END IF;
6333:
6334: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
6327: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.
6328: Oracle error message is '||
6329:
6330: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6331: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6332: END IF;
6333:
6334: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
6335: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);
6380: x_message_tbl.delete;
6381:
6382: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6383: IF l_debug_on IS NULL THEN
6384: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6385: END IF;
6386:
6387: IF l_debug_on THEN
6388: WSH_DEBUG_SV.push(l_module_name);
6384: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6385: END IF;
6386:
6387: IF l_debug_on THEN
6388: WSH_DEBUG_SV.push(l_module_name);
6389: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6390: WSH_DEBUG_SV.log(l_module_name,'p_txn_type',p_txn_type);
6391: WSH_DEBUG_SV.log(l_module_name,'p_user_id',p_user_id);
6392: WSH_DEBUG_SV.log(l_module_name,'p_date_format',p_date_format);
6385: END IF;
6386:
6387: IF l_debug_on THEN
6388: WSH_DEBUG_SV.push(l_module_name);
6389: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6390: WSH_DEBUG_SV.log(l_module_name,'p_txn_type',p_txn_type);
6391: WSH_DEBUG_SV.log(l_module_name,'p_user_id',p_user_id);
6392: WSH_DEBUG_SV.log(l_module_name,'p_date_format',p_date_format);
6393:
6386:
6387: IF l_debug_on THEN
6388: WSH_DEBUG_SV.push(l_module_name);
6389: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6390: WSH_DEBUG_SV.log(l_module_name,'p_txn_type',p_txn_type);
6391: WSH_DEBUG_SV.log(l_module_name,'p_user_id',p_user_id);
6392: WSH_DEBUG_SV.log(l_module_name,'p_date_format',p_date_format);
6393:
6394: WSH_DEBUG_SV.log(l_module_name,'x_message_tbl.count',x_message_tbl.count);
6387: IF l_debug_on THEN
6388: WSH_DEBUG_SV.push(l_module_name);
6389: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6390: WSH_DEBUG_SV.log(l_module_name,'p_txn_type',p_txn_type);
6391: WSH_DEBUG_SV.log(l_module_name,'p_user_id',p_user_id);
6392: WSH_DEBUG_SV.log(l_module_name,'p_date_format',p_date_format);
6393:
6394: WSH_DEBUG_SV.log(l_module_name,'x_message_tbl.count',x_message_tbl.count);
6395: WSH_DEBUG_SV.log(l_module_name,'g_error_tbl.count',g_error_tbl.count);
6388: WSH_DEBUG_SV.push(l_module_name);
6389: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
6390: WSH_DEBUG_SV.log(l_module_name,'p_txn_type',p_txn_type);
6391: WSH_DEBUG_SV.log(l_module_name,'p_user_id',p_user_id);
6392: WSH_DEBUG_SV.log(l_module_name,'p_date_format',p_date_format);
6393:
6394: WSH_DEBUG_SV.log(l_module_name,'x_message_tbl.count',x_message_tbl.count);
6395: WSH_DEBUG_SV.log(l_module_name,'g_error_tbl.count',g_error_tbl.count);
6396: END IF;
6390: WSH_DEBUG_SV.log(l_module_name,'p_txn_type',p_txn_type);
6391: WSH_DEBUG_SV.log(l_module_name,'p_user_id',p_user_id);
6392: WSH_DEBUG_SV.log(l_module_name,'p_date_format',p_date_format);
6393:
6394: WSH_DEBUG_SV.log(l_module_name,'x_message_tbl.count',x_message_tbl.count);
6395: WSH_DEBUG_SV.log(l_module_name,'g_error_tbl.count',g_error_tbl.count);
6396: END IF;
6397:
6398: --Initialize error message and fnd message table.
6391: WSH_DEBUG_SV.log(l_module_name,'p_user_id',p_user_id);
6392: WSH_DEBUG_SV.log(l_module_name,'p_date_format',p_date_format);
6393:
6394: WSH_DEBUG_SV.log(l_module_name,'x_message_tbl.count',x_message_tbl.count);
6395: WSH_DEBUG_SV.log(l_module_name,'g_error_tbl.count',g_error_tbl.count);
6396: END IF;
6397:
6398: --Initialize error message and fnd message table.
6399: g_error_tbl.delete;
6416: x_message_tbl => x_message_tbl,
6417: x_return_status => x_return_status);
6418:
6419: IF l_debug_on THEN
6420: WSH_DEBUG_SV.log(l_module_name,'Process_Routing_Request_File x_return_status',x_return_status);
6421: END IF;
6422: ELSE
6423: --Process Supplier Address Book.
6424: Process_Address_File(
6427: x_message_tbl => x_message_tbl,
6428: x_return_status => x_return_status);
6429:
6430: IF l_debug_on THEN
6431: WSH_DEBUG_SV.log(l_module_name,'Process_Address_File x_return_status',x_return_status);
6432: END IF;
6433: END IF;
6434:
6435: IF l_debug_on THEN
6432: END IF;
6433: END IF;
6434:
6435: IF l_debug_on THEN
6436: WSH_DEBUG_SV.log(l_module_name,'After x_message_tbl.count',x_message_tbl.count);
6437: WSH_DEBUG_SV.log(l_module_name,'After g_error_tbl.count',g_error_tbl.count);
6438: WSH_DEBUG_SV.pop(l_module_name);
6439: END IF;
6440: EXCEPTION
6433: END IF;
6434:
6435: IF l_debug_on THEN
6436: WSH_DEBUG_SV.log(l_module_name,'After x_message_tbl.count',x_message_tbl.count);
6437: WSH_DEBUG_SV.log(l_module_name,'After g_error_tbl.count',g_error_tbl.count);
6438: WSH_DEBUG_SV.pop(l_module_name);
6439: END IF;
6440: EXCEPTION
6441: WHEN OTHERS THEN
6434:
6435: IF l_debug_on THEN
6436: WSH_DEBUG_SV.log(l_module_name,'After x_message_tbl.count',x_message_tbl.count);
6437: WSH_DEBUG_SV.log(l_module_name,'After g_error_tbl.count',g_error_tbl.count);
6438: WSH_DEBUG_SV.pop(l_module_name);
6439: END IF;
6440: EXCEPTION
6441: WHEN OTHERS THEN
6442: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6441: WHEN OTHERS THEN
6442: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6443:
6444: IF l_debug_on THEN
6445: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occurred.
6446: Oracle error message is '||
6447:
6448: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6449: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6444: IF l_debug_on THEN
6445: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occurred.
6446: Oracle error message is '||
6447:
6448: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6449: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6450: END IF;
6451:
6452: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
6445: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occurred.
6446: Oracle error message is '||
6447:
6448: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6449: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6450: END IF;
6451:
6452: FND_MESSAGE.SET_NAME('WSH','WSH_UTIL_MESSAGE_U');
6453: FND_MESSAGE.SET_TOKEN('MSG_TEXT',sqlerrm);