[Home] [Help]
127: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
128: --
129: IF l_debug_on IS NULL
130: THEN
131: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
132: END IF;
133: --
134: IF l_debug_on THEN
135: WSH_DEBUG_SV.push(l_module_name);
131: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
132: END IF;
133: --
134: IF l_debug_on THEN
135: WSH_DEBUG_SV.push(l_module_name);
136: --
137: WSH_DEBUG_SV.log(l_module_name,'P_LOCATION_ID',P_LOCATION_ID);
138: WSH_DEBUG_SV.log(l_module_name,'P_FORMAT',P_FORMAT);
139: END IF;
133: --
134: IF l_debug_on THEN
135: WSH_DEBUG_SV.push(l_module_name);
136: --
137: WSH_DEBUG_SV.log(l_module_name,'P_LOCATION_ID',P_LOCATION_ID);
138: WSH_DEBUG_SV.log(l_module_name,'P_FORMAT',P_FORMAT);
139: END IF;
140: --
141: IF p_location_id IS NULL THEN
134: IF l_debug_on THEN
135: WSH_DEBUG_SV.push(l_module_name);
136: --
137: WSH_DEBUG_SV.log(l_module_name,'P_LOCATION_ID',P_LOCATION_ID);
138: WSH_DEBUG_SV.log(l_module_name,'P_FORMAT',P_FORMAT);
139: END IF;
140: --
141: IF p_location_id IS NULL THEN
142: --
140: --
141: IF p_location_id IS NULL THEN
142: --
143: IF l_debug_on THEN
144: WSH_DEBUG_SV.pop(l_module_name);
145: END IF;
146: --
147: RETURN NULL;
148: END IF;
169: IF Loc_Info_Cur%ISOPEN THEN
170: CLOSE Loc_Info_Cur;
171: END IF;
172: IF l_debug_on THEN
173: WSH_DEBUG_SV.log(l_module_name,'Loc_Info_Cur%NOTFOUND');
174: WSH_DEBUG_SV.pop(l_module_name);
175: END IF;
176: --
177: RETURN NULL;
170: CLOSE Loc_Info_Cur;
171: END IF;
172: IF l_debug_on THEN
173: WSH_DEBUG_SV.log(l_module_name,'Loc_Info_Cur%NOTFOUND');
174: WSH_DEBUG_SV.pop(l_module_name);
175: END IF;
176: --
177: RETURN NULL;
178: END IF;
192: FETCH c_hr_locs INTO g_loc_desc_Tab(l_counter).hr_location_code;
193: IF c_hr_locs%NOTFOUND THEN
194: CLOSE c_hr_locs;
195: IF l_debug_on THEN
196: WSH_DEBUG_SV.log(l_module_name,'c_hr_locs%NOTFOUND');
197: END IF;
198: END IF;
199: CLOSE c_hr_locs;
200: END IF;
199: CLOSE c_hr_locs;
200: END IF;
201: l_loc_string := g_loc_desc_Tab(l_counter).hr_location_code;
202: IF l_debug_on THEN
203: WSH_DEBUG_SV.log(l_module_name,'hr_location_code',l_loc_string);
204: END IF;
205: END IF;
206:
207: ELSIF p_format = 'NEW UI CODE' THEN
234: FND_MESSAGE.Set_Token('PARAMETER',p_format);
235: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,
236: l_module_name);
237: IF l_debug_on THEN
238: WSH_DEBUG_SV.pop(l_module_name);
239: END IF;
240: RAISE FND_API.G_EXC_ERROR;
241: /*
242: l_loc_string := 'WRONG'|| g_loc_desc_Tab(l_counter).location_code;
247: END IF;
248:
249: --
250: IF l_debug_on THEN
251: WSH_DEBUG_SV.pop(l_module_name);
252: END IF;
253: --
254: RETURN l_loc_string;
255:
255:
256: EXCEPTION
257: WHEN others THEN
258: IF l_debug_on THEN
259: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
260: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
261: raise;
262: END IF;
263:
256: EXCEPTION
257: WHEN others THEN
258: IF l_debug_on THEN
259: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
260: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
261: raise;
262: END IF;
263:
264: END Get_Location_Description;
293: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
294: --
295: IF l_debug_on IS NULL
296: THEN
297: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
298: END IF;
299: --
300: IF l_debug_on THEN
301: WSH_DEBUG_SV.push(l_module_name);
297: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
298: END IF;
299: --
300: IF l_debug_on THEN
301: WSH_DEBUG_SV.push(l_module_name);
302: --
303: WSH_DEBUG_SV.log(l_module_name,'P_SITE_CODE',P_SITE_CODE);
304: END IF;
305: --
299: --
300: IF l_debug_on THEN
301: WSH_DEBUG_SV.push(l_module_name);
302: --
303: WSH_DEBUG_SV.log(l_module_name,'P_SITE_CODE',P_SITE_CODE);
304: END IF;
305: --
306: p_site_id := NULL;
307: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
321: --
322: -- Debug Statements
323: --
324: IF l_debug_on THEN
325: WSH_DEBUG_SV.pop(l_module_name);
326: END IF;
327: --
328: Exception
329: when others then
336: --
337: -- Debug Statements
338: --
339: IF l_debug_on THEN
340: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
341: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
342: END IF;
343: --
344: END Site_Code_to_Site_id;
337: -- Debug Statements
338: --
339: IF l_debug_on THEN
340: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
341: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
342: END IF;
343: --
344: END Site_Code_to_Site_id;
345:
403: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
404: --
405: IF l_debug_on IS NULL
406: THEN
407: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
408: END IF;
409: --
410: IF l_debug_on THEN
411: WSH_DEBUG_SV.push(l_module_name);
407: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
408: END IF;
409: --
410: IF l_debug_on THEN
411: WSH_DEBUG_SV.push(l_module_name);
412: --
413: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
414: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_ID',P_SOURCE_ID);
415: WSH_DEBUG_SV.log(l_module_name,'p_transfer_location',p_transfer_location);
409: --
410: IF l_debug_on THEN
411: WSH_DEBUG_SV.push(l_module_name);
412: --
413: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
414: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_ID',P_SOURCE_ID);
415: WSH_DEBUG_SV.log(l_module_name,'p_transfer_location',p_transfer_location);
416: END IF;
417: --
410: IF l_debug_on THEN
411: WSH_DEBUG_SV.push(l_module_name);
412: --
413: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
414: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_ID',P_SOURCE_ID);
415: WSH_DEBUG_SV.log(l_module_name,'p_transfer_location',p_transfer_location);
416: END IF;
417: --
418: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
411: WSH_DEBUG_SV.push(l_module_name);
412: --
413: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
414: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_ID',P_SOURCE_ID);
415: WSH_DEBUG_SV.log(l_module_name,'p_transfer_location',p_transfer_location);
416: END IF;
417: --
418: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
419:
432: INTO l_location_id;
433: CLOSE org_to_loc;
434:
435: IF l_debug_on THEN
436: WSH_DEBUG_SV.log(l_module_name,'l_location_id',l_location_id);
437: END IF;
438:
439: IF (l_location_id IS NULL) THEN
440: --Bug 4891887 and 4891881 If call is made from Constraints then ignore the warning
448: x_location_id :=l_location_id;
449: END IF;
450: --
451: IF l_debug_on THEN
452: WSH_DEBUG_SV.pop(l_module_name);
453: END IF;
454: --
455: RETURN;
456: ELSE
455: RETURN;
456: ELSE
457:
458: IF l_debug_on THEN
459: WSH_DEBUG_SV.log(l_module_name,'Calling Transfer_Location');
460: END IF;
461:
462: WSH_MAP_LOCATION_REGION_PKG.Transfer_Location(
463: p_source_type => 'HR',
467: x_loc_rec => l_loc_rec,
468: x_return_status => l_return_status
469: );
470: IF l_debug_on THEN
471: WSH_DEBUG_SV.log(l_module_name,'Transfer_Location returns ',
472: l_return_status);
473: WSH_DEBUG_SV.log(l_module_name,'location_id returned ',
474: l_loc_rec.wsh_location_id);
475: END IF;
469: );
470: IF l_debug_on THEN
471: WSH_DEBUG_SV.log(l_module_name,'Transfer_Location returns ',
472: l_return_status);
473: WSH_DEBUG_SV.log(l_module_name,'location_id returned ',
474: l_loc_rec.wsh_location_id);
475: END IF;
476: wsh_util_core.api_post_call(
477: p_return_status => l_return_status,
478: x_num_warnings => l_num_warnings,
479: x_num_errors => l_num_errors);
480:
481: IF l_debug_on THEN
482: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
483: END IF;
484:
485: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
486: OR (l_loc_rec.WSH_LOCATION_ID IS NULL) THEN
512: CLOSE site_to_loc;
513: END IF;
514: --
515: IF l_debug_on THEN
516: WSH_DEBUG_SV.pop(l_module_name);
517: END IF;
518: --
519: RETURN;
520: ELSE
518: --
519: RETURN;
520: ELSE
521: IF l_debug_on THEN
522: WSH_DEBUG_SV.log(l_module_name,'Calling Transfer_Location');
523: END IF;
524:
525: WSH_MAP_LOCATION_REGION_PKG.Transfer_Location(
526: p_source_type => 'HZ',
535: x_num_warnings => l_num_warnings,
536: x_num_errors => l_num_errors);
537:
538: IF l_debug_on THEN
539: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
540: END IF;
541:
542: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS )
543: OR (l_loc_rec.WSH_LOCATION_ID IS NULL) THEN
553: ELSIF p_mode = 'VENDOR SITE' THEN
554: x_location_id := p_source_id;
555: --
556: IF l_debug_on THEN
557: WSH_DEBUG_SV.pop(l_module_name);
558: END IF;
559: --
560: RETURN;
561: ELSE
562: FND_MESSAGE.Set_Name('WSH','WSH_API_INVALID_PARAM_VALUE');
563: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
564: --
565: IF l_debug_on THEN
566: WSH_DEBUG_SV.pop(l_module_name);
567: END IF;
568: --
569: RETURN;
570: END IF;
569: RETURN;
570: END IF;
571:
572: IF l_debug_on THEN
573: WSH_DEBUG_SV.pop(l_module_name);
574: END IF;
575: --
576: EXCEPTION
577: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
579: fnd_message.set_name('WSH','WSH_XC_INVALID_LOCATION');
580: wsh_util_core.add_message(x_api_status,l_module_name);
581: --
582: IF l_debug_on THEN
583: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:G_RET_STS_WARNING');
584: END IF;
585: --
586: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
587: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
586: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
587: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
588: --
589: IF l_debug_on THEN
590: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:G_EXC_UNEXPECTED_ERROR');
591: END IF;
592: --
593: WHEN FND_API.G_EXC_ERROR THEN
594: IF (NOT p_transfer_location)
598: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
599: END IF;
600: --
601: IF l_debug_on THEN
602: WSH_DEBUG_SV.log(l_module_name,'x_api_status ',x_api_status);
603: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:G_EXC_ERROR');
604: END IF;
605: --
606: WHEN OTHERS THEN
599: END IF;
600: --
601: IF l_debug_on THEN
602: WSH_DEBUG_SV.log(l_module_name,'x_api_status ',x_api_status);
603: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:G_EXC_ERROR');
604: END IF;
605: --
606: WHEN OTHERS THEN
607: WSH_FTE_CONSTRAINT_FRAMEWORK.G_CALLING_API :=NULL;
615: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
616:
617: --
618: IF l_debug_on THEN
619: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
620: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
621: END IF;
622: --
623: END Get_Location_Id;
616:
617: --
618: IF l_debug_on THEN
619: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
620: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
621: END IF;
622: --
623: END Get_Location_Id;
624:
646: WHERE organization_id = c_org_id;
647:
648: org_not_found EXCEPTION;
649:
650: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
651: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'get_master_from_org';
652:
653: BEGIN
654:
655: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
656:
657: --
658: IF l_debug_on THEN
659: WSH_DEBUG_SV.push(l_module_name);
660: END IF;
661: --
662:
663: IF g_master_org_tab.EXISTS(p_org_id) THEN
679: END IF;
680:
681: --
682: IF l_debug_on THEN
683: WSH_DEBUG_SV.pop(l_module_name);
684: END IF;
685: --
686:
687: EXCEPTION
688: WHEN org_not_found THEN
689: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
690: --
691: IF l_debug_on THEN
692: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:org in mtl_parameters not found');
693: END IF;
694: --
695: WHEN others THEN
696: IF c_get_master_from_org%ISOPEN THEN
699: WSH_UTIL_CORE.default_handler('WSH_UTIL_CORE.get_master_from_org');
700: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
701: --
702: IF l_debug_on THEN
703: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
704: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
705: END IF;
706: --
707:
700: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
701: --
702: IF l_debug_on THEN
703: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
704: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
705: END IF;
706: --
707:
708: END get_master_from_org;
734: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
735: --
736: IF l_debug_on IS NULL
737: THEN
738: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
739: END IF;
740: --
741: IF l_debug_on THEN
742: WSH_DEBUG_SV.push(l_module_name);
738: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
739: END IF;
740: --
741: IF l_debug_on THEN
742: WSH_DEBUG_SV.push(l_module_name);
743: --
744: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
745: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
746: END IF;
740: --
741: IF l_debug_on THEN
742: WSH_DEBUG_SV.push(l_module_name);
743: --
744: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
745: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
746: END IF;
747: --
748: l_location_id := -1;
741: IF l_debug_on THEN
742: WSH_DEBUG_SV.push(l_module_name);
743: --
744: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
745: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
746: END IF;
747: --
748: l_location_id := -1;
749:
765: --
766: -- Debug Statements
767: --
768: IF l_debug_on THEN
769: WSH_DEBUG_SV.log(l_module_name,'LOCATION ID',l_location_id);
770: WSH_DEBUG_SV.pop(l_module_name);
771: END IF;
772: --
773: RETURN l_location_id;
766: -- Debug Statements
767: --
768: IF l_debug_on THEN
769: WSH_DEBUG_SV.log(l_module_name,'LOCATION ID',l_location_id);
770: WSH_DEBUG_SV.pop(l_module_name);
771: END IF;
772: --
773: RETURN l_location_id;
774:
803: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
804: --
805: IF l_debug_on IS NULL
806: THEN
807: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
808: END IF;
809: --
810: IF l_debug_on THEN
811: WSH_DEBUG_SV.push(l_module_name);
807: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
808: END IF;
809: --
810: IF l_debug_on THEN
811: WSH_DEBUG_SV.push(l_module_name);
812: --
813: WSH_DEBUG_SV.log(l_module_name,'P_SITE_ID',P_SITE_ID);
814: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
815: END IF;
809: --
810: IF l_debug_on THEN
811: WSH_DEBUG_SV.push(l_module_name);
812: --
813: WSH_DEBUG_SV.log(l_module_name,'P_SITE_ID',P_SITE_ID);
814: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
815: END IF;
816: --
817: l_location_id := -1;
810: IF l_debug_on THEN
811: WSH_DEBUG_SV.push(l_module_name);
812: --
813: WSH_DEBUG_SV.log(l_module_name,'P_SITE_ID',P_SITE_ID);
814: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
815: END IF;
816: --
817: l_location_id := -1;
818:
834: --
835: -- Debug Statements
836: --
837: IF l_debug_on THEN
838: WSH_DEBUG_SV.log(l_module_name,'LOCATION ID',l_location_id);
839: WSH_DEBUG_SV.pop(l_module_name);
840: END IF;
841: --
842: RETURN l_location_id;
835: -- Debug Statements
836: --
837: IF l_debug_on THEN
838: WSH_DEBUG_SV.log(l_module_name,'LOCATION ID',l_location_id);
839: WSH_DEBUG_SV.pop(l_module_name);
840: END IF;
841: --
842: RETURN l_location_id;
843:
871: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
872: --
873: IF l_debug_on IS NULL
874: THEN
875: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
876: END IF;
877: --
878: IF l_debug_on THEN
879: WSH_DEBUG_SV.push(l_module_name);
875: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
876: END IF;
877: --
878: IF l_debug_on THEN
879: WSH_DEBUG_SV.push(l_module_name);
880: --
881: WSH_DEBUG_SV.log(l_module_name,'P_SITE_ID',P_SITE_ID);
882: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
883: END IF;
877: --
878: IF l_debug_on THEN
879: WSH_DEBUG_SV.push(l_module_name);
880: --
881: WSH_DEBUG_SV.log(l_module_name,'P_SITE_ID',P_SITE_ID);
882: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
883: END IF;
884: --
885: l_location_id := -1;
878: IF l_debug_on THEN
879: WSH_DEBUG_SV.push(l_module_name);
880: --
881: WSH_DEBUG_SV.log(l_module_name,'P_SITE_ID',P_SITE_ID);
882: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
883: END IF;
884: --
885: l_location_id := -1;
886:
902: --
903: -- Debug Statements
904: --
905: IF l_debug_on THEN
906: WSH_DEBUG_SV.log(l_module_name,'LOCATION ID',l_location_id);
907: WSH_DEBUG_SV.pop(l_module_name);
908: END IF;
909: --
910: RETURN l_location_id;
903: -- Debug Statements
904: --
905: IF l_debug_on THEN
906: WSH_DEBUG_SV.log(l_module_name,'LOCATION ID',l_location_id);
907: WSH_DEBUG_SV.pop(l_module_name);
908: END IF;
909: --
910: RETURN l_location_id;
911:
958: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
959: --
960: IF l_debug_on IS NULL
961: THEN
962: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
963: END IF;
964: --
965: IF l_debug_on THEN
966: WSH_DEBUG_SV.push(l_module_name);
962: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
963: END IF;
964: --
965: IF l_debug_on THEN
966: WSH_DEBUG_SV.push(l_module_name);
967: --
968: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD_CODE',P_SHIP_METHOD_CODE);
969: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
970: END IF;
964: --
965: IF l_debug_on THEN
966: WSH_DEBUG_SV.push(l_module_name);
967: --
968: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD_CODE',P_SHIP_METHOD_CODE);
969: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
970: END IF;
971: --
972: IF (p_ship_method_code IS NULL) THEN
965: IF l_debug_on THEN
966: WSH_DEBUG_SV.push(l_module_name);
967: --
968: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD_CODE',P_SHIP_METHOD_CODE);
969: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
970: END IF;
971: --
972: IF (p_ship_method_code IS NULL) THEN
973: --
973: --
974: -- Debug Statements
975: --
976: IF l_debug_on THEN
977: WSH_DEBUG_SV.pop(l_module_name);
978: END IF;
979: --
980: RETURN NULL;
981: END IF;
995: --
996: -- Debug Statements
997: --
998: IF l_debug_on THEN
999: WSH_DEBUG_SV.pop(l_module_name);
1000: END IF;
1001: --
1002: RETURN l_freight_code;
1003:
1028: --l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1029: --
1030: --IF l_debug_on IS NULL
1031: --THEN
1032: --l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1033: --END IF;
1034: --
1035: G_ALLOW_PRINT := 'Y';
1036:
1063: --l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1064: --
1065: --IF l_debug_on IS NULL
1066: --THEN
1067: --l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1068: --END IF;
1069: --
1070: --IF l_debug_on THEN
1071: --WSH_DEBUG_SV.push(l_module_name);
1067: --l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1068: --END IF;
1069: --
1070: --IF l_debug_on THEN
1071: --WSH_DEBUG_SV.push(l_module_name);
1072: --
1073: --WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
1074: --END IF;
1075: --
1069: --
1070: --IF l_debug_on THEN
1071: --WSH_DEBUG_SV.push(l_module_name);
1072: --
1073: --WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
1074: --END IF;
1075: --
1076: --
1077: -- Added to turn on/off the WSH debugger depending on log level
1080: IF p_log_level > 0
1081: THEN
1082: --fnd_profile.put('WSH_DEBUG_MODE','T');
1083: fnd_profile.put('WSH_DEBUG_MODULE','%');
1084: fnd_profile.put('WSH_DEBUG_LEVEL',WSH_DEBUG_SV.C_STMT_LEVEL);
1085: wsh_debug_sv.start_debugger(l_file_name,l_return_status,l_msg_count,l_msg_data);
1086: --wsh_debug_sv.start_debugger(l_file_name,l_return_status,l_msg_data,l_msg_count);
1087: -- Ignore errors;
1088: ELSE
1081: THEN
1082: --fnd_profile.put('WSH_DEBUG_MODE','T');
1083: fnd_profile.put('WSH_DEBUG_MODULE','%');
1084: fnd_profile.put('WSH_DEBUG_LEVEL',WSH_DEBUG_SV.C_STMT_LEVEL);
1085: wsh_debug_sv.start_debugger(l_file_name,l_return_status,l_msg_count,l_msg_data);
1086: --wsh_debug_sv.start_debugger(l_file_name,l_return_status,l_msg_data,l_msg_count);
1087: -- Ignore errors;
1088: ELSE
1089: --fnd_profile.put('WSH_DEBUG_MODE','F');
1082: --fnd_profile.put('WSH_DEBUG_MODE','T');
1083: fnd_profile.put('WSH_DEBUG_MODULE','%');
1084: fnd_profile.put('WSH_DEBUG_LEVEL',WSH_DEBUG_SV.C_STMT_LEVEL);
1085: wsh_debug_sv.start_debugger(l_file_name,l_return_status,l_msg_count,l_msg_data);
1086: --wsh_debug_sv.start_debugger(l_file_name,l_return_status,l_msg_data,l_msg_count);
1087: -- Ignore errors;
1088: ELSE
1089: --fnd_profile.put('WSH_DEBUG_MODE','F');
1090: wsh_debug_sv.stop_debugger;
1086: --wsh_debug_sv.start_debugger(l_file_name,l_return_status,l_msg_data,l_msg_count);
1087: -- Ignore errors;
1088: ELSE
1089: --fnd_profile.put('WSH_DEBUG_MODE','F');
1090: wsh_debug_sv.stop_debugger;
1091: END IF;
1092: EXCEPTION
1093: WHEN OTHERS THEN
1094: NULL;
1098: --
1099: -- Debug Statements
1100: --
1101: --IF l_debug_on THEN
1102: --WSH_DEBUG_SV.pop(l_module_name);
1103: --END IF;
1104: --
1105: END Set_Log_Level;
1106:
1129: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1130: --
1131: IF l_debug_on IS NULL
1132: THEN
1133: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1134: END IF;
1135: --
1136: IF G_ALLOW_PRINT = 'Y' AND G_LOG_LEVEL > 0 THEN
1137: IF LENGTH(p_msg) > G_MAX_LENGTH THEN
1181: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1182: --
1183: IF l_debug_on IS NULL
1184: THEN
1185: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1186: END IF;
1187: --
1188: IF G_ALLOW_PRINT = 'Y' AND G_LOG_LEVEL > 0 THEN
1189: IF LENGTH(p_msg) > G_MAX_LENGTH THEN
1224: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1225: --
1226: IF l_debug_on IS NULL
1227: THEN
1228: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1229: END IF;
1230: --
1231: IF G_ALLOW_PRINT = 'Y' AND G_LOG_LEVEL > 0 THEN
1232: fnd_file.new_line(FND_FILE.LOG);
1262: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1263: --
1264: IF l_debug_on IS NULL
1265: THEN
1266: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1267: END IF;
1268: --
1269: IF G_ALLOW_PRINT = 'Y'THEN
1270: IF LENGTH(p_msg) > G_MAX_LENGTH THEN
1305: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1306: --
1307: IF l_debug_on IS NULL
1308: THEN
1309: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1310: END IF;
1311: --
1312: IF G_ALLOW_PRINT = 'Y' THEN
1313: fnd_file.new_line(FND_FILE.LOG);
1336: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1337: --
1338: IF l_debug_on IS NULL
1339: THEN
1340: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1341: END IF;
1342: --
1343: SELECT SYSDATE INTO l_date_time FROM dual;
1344: Println('Current Time: ' || to_char(l_date_time, 'DD-MON-YYYY HH24:MI:SS'));
1425: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1426: --
1427: IF l_debug_on IS NULL
1428: THEN
1429: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1430: END IF;
1431: --
1432: IF l_debug_on THEN
1433: WSH_DEBUG_SV.push(l_module_name);
1429: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1430: END IF;
1431: --
1432: IF l_debug_on THEN
1433: WSH_DEBUG_SV.push(l_module_name);
1434: --
1435: WSH_DEBUG_SV.log(l_module_name,'PROD_NAME',P_PROD_NAME);
1436: WSH_DEBUG_SV.log(l_module_name,'MSG_NAME',P_MSG_NAME);
1437: END IF;
1431: --
1432: IF l_debug_on THEN
1433: WSH_DEBUG_SV.push(l_module_name);
1434: --
1435: WSH_DEBUG_SV.log(l_module_name,'PROD_NAME',P_PROD_NAME);
1436: WSH_DEBUG_SV.log(l_module_name,'MSG_NAME',P_MSG_NAME);
1437: END IF;
1438:
1439: query_string := 'SELECT '||p_pkey1||' FROM '||p_table_name||' WHERE ';
1432: IF l_debug_on THEN
1433: WSH_DEBUG_SV.push(l_module_name);
1434: --
1435: WSH_DEBUG_SV.log(l_module_name,'PROD_NAME',P_PROD_NAME);
1436: WSH_DEBUG_SV.log(l_module_name,'MSG_NAME',P_MSG_NAME);
1437: END IF;
1438:
1439: query_string := 'SELECT '||p_pkey1||' FROM '||p_table_name||' WHERE ';
1440: query_param := query_string;
1513: END IF;
1514:
1515: --
1516: IF l_debug_on THEN
1517: WSH_DEBUG_SV.log(l_module_name,'query_string',query_string);
1518: END IF;
1519:
1520: rec_cursor := dbms_sql.open_cursor;
1521: dbms_sql.parse(rec_cursor,query_string,dbms_sql.v7);
1589: --
1590: -- Debug Statements
1591: --
1592: IF l_debug_on THEN
1593: WSH_DEBUG_SV.pop(l_module_name);
1594: END IF;
1595: --
1596: END;
1597:
1620: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1621: --
1622: IF l_debug_on IS NULL
1623: THEN
1624: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1625: END IF;
1626: --
1627: query_text := 'SELECT '|| P_COLUMN_NAME || ' FROM ' ||
1628: P_TABLE_NAME || ' WHERE ROWID = :x_row_id';
1626: --
1627: query_text := 'SELECT '|| P_COLUMN_NAME || ' FROM ' ||
1628: P_TABLE_NAME || ' WHERE ROWID = :x_row_id';
1629: IF l_debug_on THEN
1630: WSH_DEBUG_SV.push(l_module_name);
1631: --
1632: WSH_DEBUG_SV.log(l_module_name,'QUERY_TEXT',QUERY_TEXT);
1633: END IF;
1634:
1628: P_TABLE_NAME || ' WHERE ROWID = :x_row_id';
1629: IF l_debug_on THEN
1630: WSH_DEBUG_SV.push(l_module_name);
1631: --
1632: WSH_DEBUG_SV.log(l_module_name,'QUERY_TEXT',QUERY_TEXT);
1633: END IF;
1634:
1635: --
1636: rec_cursor := dbms_sql.open_cursor;
1653: --
1654: -- Debug Statements
1655: --
1656: IF l_debug_on THEN
1657: WSH_DEBUG_SV.pop(l_module_name);
1658: END IF;
1659: --
1660: EXCEPTION
1661: WHEN OTHERS THEN
1668: --
1669: -- Debug Statements
1670: --
1671: IF l_debug_on THEN
1672: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1673: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1674: END IF;
1675: --
1676: END Get_Active_Date;
1669: -- Debug Statements
1670: --
1671: IF l_debug_on THEN
1672: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1673: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1674: END IF;
1675: --
1676: END Get_Active_Date;
1677:
1694: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1695: --
1696: IF l_debug_on IS NULL
1697: THEN
1698: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1699: END IF;
1700: --
1701: IF l_debug_on THEN
1702: WSH_DEBUG_SV.push(l_module_name);
1698: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1699: END IF;
1700: --
1701: IF l_debug_on THEN
1702: WSH_DEBUG_SV.push(l_module_name);
1703: --
1704: WSH_DEBUG_SV.log(l_module_name,'QUERY_TEXT',QUERY_TEXT);
1705: END IF;
1706: --
1700: --
1701: IF l_debug_on THEN
1702: WSH_DEBUG_SV.push(l_module_name);
1703: --
1704: WSH_DEBUG_SV.log(l_module_name,'QUERY_TEXT',QUERY_TEXT);
1705: END IF;
1706: --
1707: rec_cursor := dbms_sql.open_cursor;
1708: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1722: --
1723: -- Debug Statements
1724: --
1725: IF l_debug_on THEN
1726: WSH_DEBUG_SV.pop(l_module_name);
1727: END IF;
1728: --
1729: EXCEPTION
1730: WHEN OTHERS THEN
1737: --
1738: -- Debug Statements
1739: --
1740: IF l_debug_on THEN
1741: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1742: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1743: END IF;
1744: --
1745: END Get_Active_Date;
1738: -- Debug Statements
1739: --
1740: IF l_debug_on THEN
1741: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1742: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1743: END IF;
1744: --
1745: END Get_Active_Date;
1746:
1773: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1774: --
1775: IF l_debug_on IS NULL
1776: THEN
1777: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1778: END IF;
1779: --
1780: IF l_debug_on THEN
1781: WSH_DEBUG_SV.push(l_module_name);
1777: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1778: END IF;
1779: --
1780: IF l_debug_on THEN
1781: WSH_DEBUG_SV.push(l_module_name);
1782: --
1783: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1784: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1785: END IF;
1779: --
1780: IF l_debug_on THEN
1781: WSH_DEBUG_SV.push(l_module_name);
1782: --
1783: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1784: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1785: END IF;
1786: --
1787: IF (p_message_type = 'E') THEN
1780: IF l_debug_on THEN
1781: WSH_DEBUG_SV.push(l_module_name);
1782: --
1783: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1784: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1785: END IF;
1786: --
1787: IF (p_message_type = 'E') THEN
1788: l_message_type := 'E';
1785: END IF;
1786: --
1787: IF (p_message_type = 'E') THEN
1788: l_message_type := 'E';
1789: l_exception_level := WSH_DEBUG_SV.C_ERR_LEVEL;
1790: ELSIF (p_message_type = 'U') THEN
1791: l_message_type := 'U';
1792: l_exception_level := WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL;
1793: ELSIF (p_message_type = 'W') THEN
1788: l_message_type := 'E';
1789: l_exception_level := WSH_DEBUG_SV.C_ERR_LEVEL;
1790: ELSIF (p_message_type = 'U') THEN
1791: l_message_type := 'U';
1792: l_exception_level := WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL;
1793: ELSIF (p_message_type = 'W') THEN
1794: l_message_type := 'W';
1795: l_exception_level := WSH_DEBUG_SV.C_ERR_LEVEL;
1796: END IF;
1791: l_message_type := 'U';
1792: l_exception_level := WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL;
1793: ELSIF (p_message_type = 'W') THEN
1794: l_message_type := 'W';
1795: l_exception_level := WSH_DEBUG_SV.C_ERR_LEVEL;
1796: END IF;
1797:
1798: --IF WSH_UTIL_CORE.G_STORE_MSG_IN_TABLE = FALSE THEN
1799: IF G_STORE_MSG_IN_TABLE = FALSE THEN
1800: IF (l_message_type IS NOT NULL) THEN
1801: msg_buffer := fnd_message.get;
1802: IF msg_buffer is not null THEN
1803: IF l_debug_on THEN
1804: WSH_DEBUG_SV.log(l_module_name,'msg_buffer',msg_buffer);
1805: END IF;
1806: fnd_message.set_name('WSH','WSH_UTIL_MESSAGE_'||l_message_type);
1807: fnd_message.set_token('MSG_TEXT',msg_buffer);
1808: END IF;
1811: --
1812: IF p_module_name IS NOT NULL
1813: AND l_debug_on
1814: THEN
1815: wsh_debug_sv.logmsg
1816: (
1817: p_module_name,
1818: l_message_type || ':' || msg_buffer,
1819: l_exception_level
1838: --
1839: IF p_module_name IS NOT NULL
1840: AND l_debug_on
1841: THEN
1842: wsh_debug_sv.logmsg
1843: (
1844: p_module_name,
1845: l_message_type || ':' || msg_buffer,
1846: l_exception_level
1851: --
1852: -- Debug Statements
1853: --
1854: IF l_debug_on THEN
1855: WSH_DEBUG_SV.pop(l_module_name);
1856: END IF;
1857: --
1858: END Add_Message;
1859:
1898: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1899: --
1900: IF l_debug_on IS NULL
1901: THEN
1902: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1903: END IF;
1904: --
1905: IF l_debug_on THEN
1906: WSH_DEBUG_SV.push(l_module_name);
1902: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1903: END IF;
1904: --
1905: IF l_debug_on THEN
1906: WSH_DEBUG_SV.push(l_module_name);
1907: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1908: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1909: WSH_DEBUG_SV.log(l_module_name,'p_error_name',p_error_name);
1910: WSH_DEBUG_SV.log(l_module_name,'p_token1',p_token1);
1903: END IF;
1904: --
1905: IF l_debug_on THEN
1906: WSH_DEBUG_SV.push(l_module_name);
1907: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1908: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1909: WSH_DEBUG_SV.log(l_module_name,'p_error_name',p_error_name);
1910: WSH_DEBUG_SV.log(l_module_name,'p_token1',p_token1);
1911: WSH_DEBUG_SV.log(l_module_name,'p_value1',p_value1);
1904: --
1905: IF l_debug_on THEN
1906: WSH_DEBUG_SV.push(l_module_name);
1907: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1908: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1909: WSH_DEBUG_SV.log(l_module_name,'p_error_name',p_error_name);
1910: WSH_DEBUG_SV.log(l_module_name,'p_token1',p_token1);
1911: WSH_DEBUG_SV.log(l_module_name,'p_value1',p_value1);
1912: END IF;
1905: IF l_debug_on THEN
1906: WSH_DEBUG_SV.push(l_module_name);
1907: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1908: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1909: WSH_DEBUG_SV.log(l_module_name,'p_error_name',p_error_name);
1910: WSH_DEBUG_SV.log(l_module_name,'p_token1',p_token1);
1911: WSH_DEBUG_SV.log(l_module_name,'p_value1',p_value1);
1912: END IF;
1913:
1906: WSH_DEBUG_SV.push(l_module_name);
1907: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1908: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1909: WSH_DEBUG_SV.log(l_module_name,'p_error_name',p_error_name);
1910: WSH_DEBUG_SV.log(l_module_name,'p_token1',p_token1);
1911: WSH_DEBUG_SV.log(l_module_name,'p_value1',p_value1);
1912: END IF;
1913:
1914: IF p_error_name IS NOT NULL THEN
1907: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1908: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1909: WSH_DEBUG_SV.log(l_module_name,'p_error_name',p_error_name);
1910: WSH_DEBUG_SV.log(l_module_name,'p_token1',p_token1);
1911: WSH_DEBUG_SV.log(l_module_name,'p_value1',p_value1);
1912: END IF;
1913:
1914: IF p_error_name IS NOT NULL THEN
1915: FND_MESSAGE.SET_NAME('WSH',p_error_name);
1920:
1921: --Bugfix 6816437 Start
1922: IF p_token2 IS NOT NULL AND p_value2 IS NOT NULL THEN
1923: IF l_debug_on THEN
1924: WSH_DEBUG_SV.log(l_module_name,'p_token2',p_token2);
1925: WSH_DEBUG_SV.log(l_module_name,'p_value2',p_value2);
1926: END IF;
1927: FND_MESSAGE.SET_TOKEN(p_token2, p_value2);
1928: END IF;
1921: --Bugfix 6816437 Start
1922: IF p_token2 IS NOT NULL AND p_value2 IS NOT NULL THEN
1923: IF l_debug_on THEN
1924: WSH_DEBUG_SV.log(l_module_name,'p_token2',p_token2);
1925: WSH_DEBUG_SV.log(l_module_name,'p_value2',p_value2);
1926: END IF;
1927: FND_MESSAGE.SET_TOKEN(p_token2, p_value2);
1928: END IF;
1929:
1928: END IF;
1929:
1930: IF p_token3 IS NOT NULL AND p_value3 IS NOT NULL THEN
1931: IF l_debug_on THEN
1932: WSH_DEBUG_SV.log(l_module_name,'p_token3',p_token3);
1933: WSH_DEBUG_SV.log(l_module_name,'p_value3',p_value3);
1934: END IF;
1935: FND_MESSAGE.SET_TOKEN(p_token3, p_value3);
1936: END IF;
1929:
1930: IF p_token3 IS NOT NULL AND p_value3 IS NOT NULL THEN
1931: IF l_debug_on THEN
1932: WSH_DEBUG_SV.log(l_module_name,'p_token3',p_token3);
1933: WSH_DEBUG_SV.log(l_module_name,'p_value3',p_value3);
1934: END IF;
1935: FND_MESSAGE.SET_TOKEN(p_token3, p_value3);
1936: END IF;
1937:
1936: END IF;
1937:
1938: IF p_token4 IS NOT NULL AND p_value4 IS NOT NULL THEN
1939: IF l_debug_on THEN
1940: WSH_DEBUG_SV.log(l_module_name,'p_token4',p_token4);
1941: WSH_DEBUG_SV.log(l_module_name,'p_value4',p_value4);
1942: END IF;
1943: FND_MESSAGE.SET_TOKEN(p_token4, p_value4);
1944: END IF;
1937:
1938: IF p_token4 IS NOT NULL AND p_value4 IS NOT NULL THEN
1939: IF l_debug_on THEN
1940: WSH_DEBUG_SV.log(l_module_name,'p_token4',p_token4);
1941: WSH_DEBUG_SV.log(l_module_name,'p_value4',p_value4);
1942: END IF;
1943: FND_MESSAGE.SET_TOKEN(p_token4, p_value4);
1944: END IF;
1945:
1944: END IF;
1945:
1946: IF p_token5 IS NOT NULL AND p_value5 IS NOT NULL THEN
1947: IF l_debug_on THEN
1948: WSH_DEBUG_SV.log(l_module_name,'p_token5',p_token5);
1949: WSH_DEBUG_SV.log(l_module_name,'p_value5',p_value5);
1950: END IF;
1951: FND_MESSAGE.SET_TOKEN(p_token5, p_value5);
1952: END IF;
1945:
1946: IF p_token5 IS NOT NULL AND p_value5 IS NOT NULL THEN
1947: IF l_debug_on THEN
1948: WSH_DEBUG_SV.log(l_module_name,'p_token5',p_token5);
1949: WSH_DEBUG_SV.log(l_module_name,'p_value5',p_value5);
1950: END IF;
1951: FND_MESSAGE.SET_TOKEN(p_token5, p_value5);
1952: END IF;
1953:
1952: END IF;
1953:
1954: IF p_token6 IS NOT NULL AND p_value6 IS NOT NULL THEN
1955: IF l_debug_on THEN
1956: WSH_DEBUG_SV.log(l_module_name,'p_token6',p_token6);
1957: WSH_DEBUG_SV.log(l_module_name,'p_value6',p_value6);
1958: END IF;
1959: FND_MESSAGE.SET_TOKEN(p_token6, p_value6);
1960: END IF;
1953:
1954: IF p_token6 IS NOT NULL AND p_value6 IS NOT NULL THEN
1955: IF l_debug_on THEN
1956: WSH_DEBUG_SV.log(l_module_name,'p_token6',p_token6);
1957: WSH_DEBUG_SV.log(l_module_name,'p_value6',p_value6);
1958: END IF;
1959: FND_MESSAGE.SET_TOKEN(p_token6, p_value6);
1960: END IF;
1961:
1960: END IF;
1961:
1962: IF p_token7 IS NOT NULL AND p_value7 IS NOT NULL THEN
1963: IF l_debug_on THEN
1964: WSH_DEBUG_SV.log(l_module_name,'p_token7',p_token7);
1965: WSH_DEBUG_SV.log(l_module_name,'p_value7',p_value7);
1966: END IF;
1967: FND_MESSAGE.SET_TOKEN(p_token7, p_value7);
1968: END IF;
1961:
1962: IF p_token7 IS NOT NULL AND p_value7 IS NOT NULL THEN
1963: IF l_debug_on THEN
1964: WSH_DEBUG_SV.log(l_module_name,'p_token7',p_token7);
1965: WSH_DEBUG_SV.log(l_module_name,'p_value7',p_value7);
1966: END IF;
1967: FND_MESSAGE.SET_TOKEN(p_token7, p_value7);
1968: END IF;
1969:
1968: END IF;
1969:
1970: IF p_token8 IS NOT NULL AND p_value8 IS NOT NULL THEN
1971: IF l_debug_on THEN
1972: WSH_DEBUG_SV.log(l_module_name,'p_token8',p_token8);
1973: WSH_DEBUG_SV.log(l_module_name,'p_value8',p_value8);
1974: END IF;
1975: FND_MESSAGE.SET_TOKEN(p_token8, p_value8);
1976: END IF;
1969:
1970: IF p_token8 IS NOT NULL AND p_value8 IS NOT NULL THEN
1971: IF l_debug_on THEN
1972: WSH_DEBUG_SV.log(l_module_name,'p_token8',p_token8);
1973: WSH_DEBUG_SV.log(l_module_name,'p_value8',p_value8);
1974: END IF;
1975: FND_MESSAGE.SET_TOKEN(p_token8, p_value8);
1976: END IF;
1977: --Bugfix 6816437 End
1979:
1980: add_message(p_message_type, p_module_name);
1981:
1982: IF l_debug_on THEN
1983: WSH_DEBUG_SV.pop(l_module_name);
1984: END IF;
1985:
1986: EXCEPTION
1987: WHEN OTHERS THEN
1985:
1986: EXCEPTION
1987: WHEN OTHERS THEN
1988: IF l_debug_on THEN
1989: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1990: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1991: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1992: END IF;
1993:
1986: EXCEPTION
1987: WHEN OTHERS THEN
1988: IF l_debug_on THEN
1989: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1990: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1991: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1992: END IF;
1993:
1994: END Add_Message;
1987: WHEN OTHERS THEN
1988: IF l_debug_on THEN
1989: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1990: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1991: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1992: END IF;
1993:
1994: END Add_Message;
1995: -- Harmonization Project I **heali
2020: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2021: --
2022: IF l_debug_on IS NULL
2023: THEN
2024: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2025: END IF;
2026: --
2027: IF l_debug_on THEN
2028: WSH_DEBUG_SV.push(l_module_name);
2024: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2025: END IF;
2026: --
2027: IF l_debug_on THEN
2028: WSH_DEBUG_SV.push(l_module_name);
2029: --
2030: WSH_DEBUG_SV.log(l_module_name,'P_TOTAL',P_TOTAL);
2031: WSH_DEBUG_SV.log(l_module_name,'P_WARNINGS',P_WARNINGS);
2032: WSH_DEBUG_SV.log(l_module_name,'P_ERRORS',P_ERRORS);
2026: --
2027: IF l_debug_on THEN
2028: WSH_DEBUG_SV.push(l_module_name);
2029: --
2030: WSH_DEBUG_SV.log(l_module_name,'P_TOTAL',P_TOTAL);
2031: WSH_DEBUG_SV.log(l_module_name,'P_WARNINGS',P_WARNINGS);
2032: WSH_DEBUG_SV.log(l_module_name,'P_ERRORS',P_ERRORS);
2033: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
2034: END IF;
2027: IF l_debug_on THEN
2028: WSH_DEBUG_SV.push(l_module_name);
2029: --
2030: WSH_DEBUG_SV.log(l_module_name,'P_TOTAL',P_TOTAL);
2031: WSH_DEBUG_SV.log(l_module_name,'P_WARNINGS',P_WARNINGS);
2032: WSH_DEBUG_SV.log(l_module_name,'P_ERRORS',P_ERRORS);
2033: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
2034: END IF;
2035: --
2028: WSH_DEBUG_SV.push(l_module_name);
2029: --
2030: WSH_DEBUG_SV.log(l_module_name,'P_TOTAL',P_TOTAL);
2031: WSH_DEBUG_SV.log(l_module_name,'P_WARNINGS',P_WARNINGS);
2032: WSH_DEBUG_SV.log(l_module_name,'P_ERRORS',P_ERRORS);
2033: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
2034: END IF;
2035: --
2036: l_total := nvl(p_total, 0);
2029: --
2030: WSH_DEBUG_SV.log(l_module_name,'P_TOTAL',P_TOTAL);
2031: WSH_DEBUG_SV.log(l_module_name,'P_WARNINGS',P_WARNINGS);
2032: WSH_DEBUG_SV.log(l_module_name,'P_ERRORS',P_ERRORS);
2033: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
2034: END IF;
2035: --
2036: l_total := nvl(p_total, 0);
2037: l_warnings := nvl(p_warnings, 0);
2059: --
2060: -- Debug Statements
2061: --
2062: IF l_debug_on THEN
2063: WSH_DEBUG_SV.log(l_module_name,'P_RETURN_STATUS',p_return_status);
2064: WSH_DEBUG_SV.pop(l_module_name);
2065: END IF;
2066: --
2067: END Add_Summary_Message;
2060: -- Debug Statements
2061: --
2062: IF l_debug_on THEN
2063: WSH_DEBUG_SV.log(l_module_name,'P_RETURN_STATUS',p_return_status);
2064: WSH_DEBUG_SV.pop(l_module_name);
2065: END IF;
2066: --
2067: END Add_Summary_Message;
2068:
2111: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2112: --
2113: IF l_debug_on IS NULL
2114: THEN
2115: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2116: END IF;
2117: --
2118: IF l_debug_on THEN
2119: WSH_DEBUG_SV.push(l_module_name);
2115: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2116: END IF;
2117: --
2118: IF l_debug_on THEN
2119: WSH_DEBUG_SV.push(l_module_name);
2120: --
2121: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2122: END IF;
2123: --
2117: --
2118: IF l_debug_on THEN
2119: WSH_DEBUG_SV.push(l_module_name);
2120: --
2121: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2122: END IF;
2123: --
2124: x_count := FND_MSG_PUB.count_msg;
2125:
2168: --
2169: -- Debug Statements
2170: --
2171: IF l_debug_on THEN
2172: WSH_DEBUG_SV.pop(l_module_name);
2173: END IF;
2174: --
2175: END;
2176:
2195: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2196: --
2197: IF l_debug_on IS NULL
2198: THEN
2199: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2200: END IF;
2201: --
2202: IF l_debug_on THEN
2203: WSH_DEBUG_SV.push(l_module_name);
2199: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2200: END IF;
2201: --
2202: IF l_debug_on THEN
2203: WSH_DEBUG_SV.push(l_module_name);
2204: --
2205: WSH_DEBUG_SV.log(l_module_name,'P_ROUTINE_NAME',P_ROUTINE_NAME);
2206: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
2207: END IF;
2201: --
2202: IF l_debug_on THEN
2203: WSH_DEBUG_SV.push(l_module_name);
2204: --
2205: WSH_DEBUG_SV.log(l_module_name,'P_ROUTINE_NAME',P_ROUTINE_NAME);
2206: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
2207: END IF;
2208: --
2209: FND_MESSAGE.SET_NAME('WSH','WSH_UNEXP_ERROR');
2202: IF l_debug_on THEN
2203: WSH_DEBUG_SV.push(l_module_name);
2204: --
2205: WSH_DEBUG_SV.log(l_module_name,'P_ROUTINE_NAME',P_ROUTINE_NAME);
2206: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
2207: END IF;
2208: --
2209: FND_MESSAGE.SET_NAME('WSH','WSH_UNEXP_ERROR');
2210: FND_MESSAGE.Set_Token('PACKAGE',p_routine_name);
2215: --
2216: -- Debug Statements
2217: --
2218: IF l_debug_on THEN
2219: WSH_DEBUG_SV.pop(l_module_name);
2220: END IF;
2221: --
2222: END default_handler;
2223:
2247: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2248: --
2249: IF l_debug_on IS NULL
2250: THEN
2251: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2252: END IF;
2253: --
2254: IF l_debug_on THEN
2255: WSH_DEBUG_SV.push(l_module_name);
2251: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2252: END IF;
2253: --
2254: IF l_debug_on THEN
2255: WSH_DEBUG_SV.push(l_module_name);
2256: END IF;
2257: --
2258: fnd_message.clear;
2259:
2260: --
2261: -- Debug Statements
2262: --
2263: IF l_debug_on THEN
2264: WSH_DEBUG_SV.pop(l_module_name);
2265: END IF;
2266: --
2267: END Clear_FND_Messages;
2268:
2293: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2294: --
2295: IF l_debug_on IS NULL
2296: THEN
2297: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2298: END IF;
2299: --
2300: IF l_debug_on THEN
2301: WSH_DEBUG_SV.push(l_module_name);
2297: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2298: END IF;
2299: --
2300: IF l_debug_on THEN
2301: WSH_DEBUG_SV.push(l_module_name);
2302: --
2303: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2304: END IF;
2305: --
2299: --
2300: IF l_debug_on THEN
2301: WSH_DEBUG_SV.push(l_module_name);
2302: --
2303: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2304: END IF;
2305: --
2306: IF (p_organization_id IS NULL) THEN
2307: raise others;
2314: --
2315: -- Debug Statements
2316: --
2317: IF l_debug_on THEN
2318: WSH_DEBUG_SV.log(l_module_name,'ORGANIZATION_NAME',org_name);
2319: WSH_DEBUG_SV.pop(l_module_name);
2320: END IF;
2321: --
2322: RETURN org_name;
2315: -- Debug Statements
2316: --
2317: IF l_debug_on THEN
2318: WSH_DEBUG_SV.log(l_module_name,'ORGANIZATION_NAME',org_name);
2319: WSH_DEBUG_SV.pop(l_module_name);
2320: END IF;
2321: --
2322: RETURN org_name;
2323:
2326: --
2327: -- Debug Statements
2328: --
2329: IF l_debug_on THEN
2330: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2331: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2332: END IF;
2333: --
2334: RETURN null;
2327: -- Debug Statements
2328: --
2329: IF l_debug_on THEN
2330: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2331: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2332: END IF;
2333: --
2334: RETURN null;
2335:
2361: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2362: --
2363: IF l_debug_on IS NULL
2364: THEN
2365: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2366: END IF;
2367: --
2368: IF l_debug_on THEN
2369: WSH_DEBUG_SV.push(l_module_name);
2365: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2366: END IF;
2367: --
2368: IF l_debug_on THEN
2369: WSH_DEBUG_SV.push(l_module_name);
2370: --
2371: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
2372: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2373: WSH_DEBUG_SV.log(l_module_name,'P_FLEX_CODE',P_FLEX_CODE);
2367: --
2368: IF l_debug_on THEN
2369: WSH_DEBUG_SV.push(l_module_name);
2370: --
2371: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
2372: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2373: WSH_DEBUG_SV.log(l_module_name,'P_FLEX_CODE',P_FLEX_CODE);
2374: WSH_DEBUG_SV.log(l_module_name,'P_STRUCT_NUM',P_STRUCT_NUM);
2375: END IF;
2368: IF l_debug_on THEN
2369: WSH_DEBUG_SV.push(l_module_name);
2370: --
2371: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
2372: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2373: WSH_DEBUG_SV.log(l_module_name,'P_FLEX_CODE',P_FLEX_CODE);
2374: WSH_DEBUG_SV.log(l_module_name,'P_STRUCT_NUM',P_STRUCT_NUM);
2375: END IF;
2376: --
2369: WSH_DEBUG_SV.push(l_module_name);
2370: --
2371: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
2372: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2373: WSH_DEBUG_SV.log(l_module_name,'P_FLEX_CODE',P_FLEX_CODE);
2374: WSH_DEBUG_SV.log(l_module_name,'P_STRUCT_NUM',P_STRUCT_NUM);
2375: END IF;
2376: --
2377: IF (p_item_id IS NULL) THEN
2370: --
2371: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
2372: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2373: WSH_DEBUG_SV.log(l_module_name,'P_FLEX_CODE',P_FLEX_CODE);
2374: WSH_DEBUG_SV.log(l_module_name,'P_STRUCT_NUM',P_STRUCT_NUM);
2375: END IF;
2376: --
2377: IF (p_item_id IS NULL) THEN
2378: raise others;
2392: --
2393: -- Debug Statements
2394: --
2395: IF l_debug_on THEN
2396: WSH_DEBUG_SV.pop(l_module_name);
2397: END IF;
2398: --
2399: RETURN item_name;
2400:
2404: --
2405: -- Debug Statements
2406: --
2407: IF l_debug_on THEN
2408: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2409: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2410: END IF;
2411: --
2412: RETURN null;
2405: -- Debug Statements
2406: --
2407: IF l_debug_on THEN
2408: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2409: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2410: END IF;
2411: --
2412: RETURN null;
2413:
2448: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2449: --
2450: IF l_debug_on IS NULL
2451: THEN
2452: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2453: END IF;
2454: --
2455: IF l_debug_on THEN
2456: WSH_DEBUG_SV.push(l_module_name);
2452: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2453: END IF;
2454: --
2455: IF l_debug_on THEN
2456: WSH_DEBUG_SV.push(l_module_name);
2457: --
2458: WSH_DEBUG_SV.log(l_module_name,'ENTITY_ID',ENTITY_ID);
2459: WSH_DEBUG_SV.log(l_module_name,'WAREHOUSE_ID',WAREHOUSE_ID);
2460: WSH_DEBUG_SV.log(l_module_name,'APP_NAME',APP_NAME);
2454: --
2455: IF l_debug_on THEN
2456: WSH_DEBUG_SV.push(l_module_name);
2457: --
2458: WSH_DEBUG_SV.log(l_module_name,'ENTITY_ID',ENTITY_ID);
2459: WSH_DEBUG_SV.log(l_module_name,'WAREHOUSE_ID',WAREHOUSE_ID);
2460: WSH_DEBUG_SV.log(l_module_name,'APP_NAME',APP_NAME);
2461: WSH_DEBUG_SV.log(l_module_name,'K_FLEX_CODE',K_FLEX_CODE);
2462: WSH_DEBUG_SV.log(l_module_name,'STRUCT_NUM',STRUCT_NUM);
2455: IF l_debug_on THEN
2456: WSH_DEBUG_SV.push(l_module_name);
2457: --
2458: WSH_DEBUG_SV.log(l_module_name,'ENTITY_ID',ENTITY_ID);
2459: WSH_DEBUG_SV.log(l_module_name,'WAREHOUSE_ID',WAREHOUSE_ID);
2460: WSH_DEBUG_SV.log(l_module_name,'APP_NAME',APP_NAME);
2461: WSH_DEBUG_SV.log(l_module_name,'K_FLEX_CODE',K_FLEX_CODE);
2462: WSH_DEBUG_SV.log(l_module_name,'STRUCT_NUM',STRUCT_NUM);
2463: END IF;
2456: WSH_DEBUG_SV.push(l_module_name);
2457: --
2458: WSH_DEBUG_SV.log(l_module_name,'ENTITY_ID',ENTITY_ID);
2459: WSH_DEBUG_SV.log(l_module_name,'WAREHOUSE_ID',WAREHOUSE_ID);
2460: WSH_DEBUG_SV.log(l_module_name,'APP_NAME',APP_NAME);
2461: WSH_DEBUG_SV.log(l_module_name,'K_FLEX_CODE',K_FLEX_CODE);
2462: WSH_DEBUG_SV.log(l_module_name,'STRUCT_NUM',STRUCT_NUM);
2463: END IF;
2464: --
2457: --
2458: WSH_DEBUG_SV.log(l_module_name,'ENTITY_ID',ENTITY_ID);
2459: WSH_DEBUG_SV.log(l_module_name,'WAREHOUSE_ID',WAREHOUSE_ID);
2460: WSH_DEBUG_SV.log(l_module_name,'APP_NAME',APP_NAME);
2461: WSH_DEBUG_SV.log(l_module_name,'K_FLEX_CODE',K_FLEX_CODE);
2462: WSH_DEBUG_SV.log(l_module_name,'STRUCT_NUM',STRUCT_NUM);
2463: END IF;
2464: --
2465: result := fnd_flex_keyval.validate_ccid
2458: WSH_DEBUG_SV.log(l_module_name,'ENTITY_ID',ENTITY_ID);
2459: WSH_DEBUG_SV.log(l_module_name,'WAREHOUSE_ID',WAREHOUSE_ID);
2460: WSH_DEBUG_SV.log(l_module_name,'APP_NAME',APP_NAME);
2461: WSH_DEBUG_SV.log(l_module_name,'K_FLEX_CODE',K_FLEX_CODE);
2462: WSH_DEBUG_SV.log(l_module_name,'STRUCT_NUM',STRUCT_NUM);
2463: END IF;
2464: --
2465: result := fnd_flex_keyval.validate_ccid
2466: (appl_short_name => 'INV',
2474: --
2475: -- Debug Statements
2476: --
2477: IF l_debug_on THEN
2478: WSH_DEBUG_SV.pop(l_module_name);
2479: END IF;
2480: --
2481: RETURN name;
2482: END generic_flex_name;
2565: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2566: --
2567: IF l_debug_on IS NULL
2568: THEN
2569: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2570: END IF;
2571: --
2572: IF l_debug_on THEN
2573: WSH_DEBUG_SV.push(l_module_name);
2569: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2570: END IF;
2571: --
2572: IF l_debug_on THEN
2573: WSH_DEBUG_SV.push(l_module_name);
2574: END IF;
2575: --
2576: num_errors := 0;
2577: num_warnings := 0;
2656: --
2657: -- Debug Statements
2658: --
2659: IF l_debug_on THEN
2660: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_GRP.GET_TRIP_DETAILS_PVT',WSH_DEBUG_SV.C_PROC_LEVEL);
2661: END IF;
2662: --
2663: wsh_trips_grp.get_trip_details_pvt
2664: (p_trip_id => p_rows(i),
2672: --
2673: -- Debug Statements
2674: --
2675: --IF l_debug_on THEN
2676: --WSH_DEBUG_SV.pop(l_module_name);
2677: --END IF;
2678: --
2679: --RETURN;
2680: raise e_return_excp; -- LPN CONV. rv
2684: --
2685: -- Debug Statements
2686: --
2687: IF l_debug_on THEN
2688: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FTE_INTEGRATION.TRIP_STOP_VALIDATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
2689: END IF;
2690: --
2691: wsh_fte_integration.trip_stop_validations
2692: (p_stop_rec => l_stop_rec,
2702: --
2703: -- Debug Statements
2704: --
2705: --IF l_debug_on THEN
2706: --WSH_DEBUG_SV.pop(l_module_name);
2707: --END IF;
2708: --
2709: --RETURN;
2710: raise e_return_excp; -- LPN CONV. rv
2715: --
2716: -- Debug Statements
2717: --
2718: IF l_debug_on THEN
2719: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_GRP.GET_STOP_DETAILS_PVT',WSH_DEBUG_SV.C_PROC_LEVEL);
2720: END IF;
2721: --
2722: wsh_trip_stops_grp.get_stop_details_pvt
2723: (p_stop_id => p_rows(i),
2731: --
2732: -- Debug Statements
2733: --
2734: --IF l_debug_on THEN
2735: --WSH_DEBUG_SV.pop(l_module_name);
2736: --END IF;
2737: --
2738: --RETURN;
2739: raise e_return_excp; -- LPN CONV. rv
2743: --
2744: -- Debug Statements
2745: --
2746: IF l_debug_on THEN
2747: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FTE_INTEGRATION.TRIP_STOP_VALIDATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
2748: END IF;
2749: --
2750: wsh_fte_integration.trip_stop_validations
2751: (p_stop_rec => l_stop_rec,
2760: --
2761: -- Debug Statements
2762: --
2763: --IF l_debug_on THEN
2764: --WSH_DEBUG_SV.pop(l_module_name);
2765: --END IF;
2766: --
2767: --RETURN;
2768: raise e_return_excp; -- LPN CONV. rv
2777: --
2778: -- Debug Statements
2779: --
2780: IF l_debug_on THEN
2781: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.DELETE_TRIP',WSH_DEBUG_SV.C_PROC_LEVEL);
2782: END IF;
2783: --
2784: wsh_trips_pvt.delete_trip(p_rowid => null,
2785: p_trip_id => p_rows(i),
2790: --
2791: -- Debug Statements
2792: --
2793: IF l_debug_on THEN
2794: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_PVT.DELETE_TRIP_STOP',WSH_DEBUG_SV.C_PROC_LEVEL);
2795: END IF;
2796: --
2797: --tkt
2798: wsh_trip_stops_pvt.delete_trip_stop(p_rowid => null,
2804: --
2805: -- Debug Statements
2806: --
2807: IF l_debug_on THEN
2808: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.DELETE_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
2809: END IF;
2810: --
2811: wsh_new_deliveries_pvt.delete_delivery(null, p_rows(i), cur_return_status);
2812: elsif (p_type = 'DLEG') then
2821: --
2822: -- Debug Statements
2823: --
2824: IF l_debug_on THEN
2825: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_ACTIONS.DELETE_CONTAINERS',WSH_DEBUG_SV.C_PROC_LEVEL);
2826: END IF;
2827: --
2828: --lpn conv
2829: IF c_wms_code_present = 'Y' THEN --{bmso
2898: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
2899: THEN
2900: --{
2901: IF l_debug_on THEN
2902: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
2903: END IF;
2904:
2905: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
2906: (
2910: );
2911: --
2912: --
2913: IF l_debug_on THEN
2914: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
2915: END IF;
2916: --
2917: --
2918: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2963: --
2964: -- Debug Statements
2965: --
2966: IF l_debug_on THEN
2967: WSH_DEBUG_SV.pop(l_module_name);
2968: END IF;
2969: --
2970: exception
2971: --
2976: THEN
2977: --{
2978: --
2979: IF l_debug_on THEN
2980: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
2981: END IF;
2982: --
2983: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
2984: (
2987: x_out_rec => l_lpn_out_sync_comm_rec
2988: );
2989: --
2990: IF l_debug_on THEN
2991: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
2992: END IF;
2993: IF (l_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR) AND x_return_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2994: x_return_status := l_return_status;
2995: END IF;
2996: --}
2997: END IF;
2998: --
2999: IF l_debug_on THEN
3000: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:E_RETURN_EXCP');
3001: END IF;
3002: -- LPN CONV. rv
3003: --
3004: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3005: ROLLBACK TO s_delete_savepoint;
3006: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3007:
3008: IF l_debug_on THEN
3009: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle
3010: error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3011: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3012: END IF;
3013: WHEN OTHERS THEN
3006: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3007:
3008: IF l_debug_on THEN
3009: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle
3010: error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3011: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3012: END IF;
3013: WHEN OTHERS THEN
3014: ROLLBACK TO s_delete_savepoint;
3007:
3008: IF l_debug_on THEN
3009: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle
3010: error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3011: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3012: END IF;
3013: WHEN OTHERS THEN
3014: ROLLBACK TO s_delete_savepoint;
3015: wsh_util_core.default_handler('WSH_UTIL_CORE.DELETE');
3018: --
3019: -- Debug Statements
3020: --
3021: IF l_debug_on THEN
3022: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3023: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3024: END IF;
3025: --
3026: end delete;
3019: -- Debug Statements
3020: --
3021: IF l_debug_on THEN
3022: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3023: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3024: END IF;
3025: --
3026: end delete;
3027:
3056: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3057: --
3058: IF l_debug_on IS NULL
3059: THEN
3060: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3061: END IF;
3062: --
3063: IF l_debug_on THEN
3064: WSH_DEBUG_SV.push(l_module_name);
3060: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3061: END IF;
3062: --
3063: IF l_debug_on THEN
3064: WSH_DEBUG_SV.push(l_module_name);
3065: --
3066: WSH_DEBUG_SV.log(l_module_name,'P_CITY',P_CITY);
3067: WSH_DEBUG_SV.log(l_module_name,'P_REGION',P_REGION);
3068: WSH_DEBUG_SV.log(l_module_name,'P_POSTAL_CODE',P_POSTAL_CODE);
3062: --
3063: IF l_debug_on THEN
3064: WSH_DEBUG_SV.push(l_module_name);
3065: --
3066: WSH_DEBUG_SV.log(l_module_name,'P_CITY',P_CITY);
3067: WSH_DEBUG_SV.log(l_module_name,'P_REGION',P_REGION);
3068: WSH_DEBUG_SV.log(l_module_name,'P_POSTAL_CODE',P_POSTAL_CODE);
3069: END IF;
3070: --
3063: IF l_debug_on THEN
3064: WSH_DEBUG_SV.push(l_module_name);
3065: --
3066: WSH_DEBUG_SV.log(l_module_name,'P_CITY',P_CITY);
3067: WSH_DEBUG_SV.log(l_module_name,'P_REGION',P_REGION);
3068: WSH_DEBUG_SV.log(l_module_name,'P_POSTAL_CODE',P_POSTAL_CODE);
3069: END IF;
3070: --
3071: IF p_city IS NOT NULL AND p_region IS NOT NULL THEN
3064: WSH_DEBUG_SV.push(l_module_name);
3065: --
3066: WSH_DEBUG_SV.log(l_module_name,'P_CITY',P_CITY);
3067: WSH_DEBUG_SV.log(l_module_name,'P_REGION',P_REGION);
3068: WSH_DEBUG_SV.log(l_module_name,'P_POSTAL_CODE',P_POSTAL_CODE);
3069: END IF;
3070: --
3071: IF p_city IS NOT NULL AND p_region IS NOT NULL THEN
3072: c_r_p := p_city || ', ' || p_region || ' ' || p_postal_code;
3082: --
3083: -- Debug Statements
3084: --
3085: IF l_debug_on THEN
3086: WSH_DEBUG_SV.pop(l_module_name);
3087: END IF;
3088: --
3089: RETURN c_r_p;
3090:
3151: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3152: --
3153: IF l_debug_on IS NULL
3154: THEN
3155: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3156: END IF;
3157: --
3158: IF l_debug_on THEN
3159: WSH_DEBUG_SV.push(l_module_name);
3155: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3156: END IF;
3157: --
3158: IF l_debug_on THEN
3159: WSH_DEBUG_SV.push(l_module_name);
3160: --
3161: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3162: END IF;
3163: --
3157: --
3158: IF l_debug_on THEN
3159: WSH_DEBUG_SV.push(l_module_name);
3160: --
3161: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3162: END IF;
3163: --
3164: OPEN get_ship_codes;
3165: FETCH get_ship_codes
3169: --
3170: -- Debug Statements
3171: --
3172: IF l_debug_on THEN
3173: WSH_DEBUG_SV.pop(l_module_name);
3174: END IF;
3175: --
3176: RETURN null;
3177: END IF;
3186: --
3187: -- Debug Statements
3188: --
3189: IF l_debug_on THEN
3190: WSH_DEBUG_SV.pop(l_module_name);
3191: END IF;
3192: --
3193: RETURN null;
3194: END IF;
3196: --
3197: -- Debug Statements
3198: --
3199: IF l_debug_on THEN
3200: WSH_DEBUG_SV.pop(l_module_name);
3201: END IF;
3202: --
3203: RETURN 'Mixed';
3204: ELSE
3210: --
3211: -- Debug Statements
3212: --
3213: IF l_debug_on THEN
3214: WSH_DEBUG_SV.pop(l_module_name);
3215: END IF;
3216: --
3217: RETURN v_first_code;
3218: END IF;
3220: --
3221: -- Debug Statements
3222: --
3223: IF l_debug_on THEN
3224: WSH_DEBUG_SV.pop(l_module_name);
3225: END IF;
3226: --
3227: RETURN 'Mixed';
3228: END IF;
3242: --
3243: -- Debug Statements
3244: --
3245: IF l_debug_on THEN
3246: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3247: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3248: END IF;
3249: --
3250: RETURN null;
3243: -- Debug Statements
3244: --
3245: IF l_debug_on THEN
3246: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3247: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3248: END IF;
3249: --
3250: RETURN null;
3251:
3301: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3302: --
3303: IF l_debug_on IS NULL
3304: THEN
3305: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3306: END IF;
3307: --
3308: IF l_debug_on THEN
3309: WSH_DEBUG_SV.push(l_module_name);
3305: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3306: END IF;
3307: --
3308: IF l_debug_on THEN
3309: WSH_DEBUG_SV.push(l_module_name);
3310: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
3311: WSH_DEBUG_SV.log(l_module_name,'G_OPERATING_UNIT_INFO.org_id',
3312: G_OPERATING_UNIT_INFO.org_id);
3313: END IF;
3306: END IF;
3307: --
3308: IF l_debug_on THEN
3309: WSH_DEBUG_SV.push(l_module_name);
3310: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
3311: WSH_DEBUG_SV.log(l_module_name,'G_OPERATING_UNIT_INFO.org_id',
3312: G_OPERATING_UNIT_INFO.org_id);
3313: END IF;
3314: --
3307: --
3308: IF l_debug_on THEN
3309: WSH_DEBUG_SV.push(l_module_name);
3310: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
3311: WSH_DEBUG_SV.log(l_module_name,'G_OPERATING_UNIT_INFO.org_id',
3312: G_OPERATING_UNIT_INFO.org_id);
3313: END IF;
3314: --
3315: x_ledger_id := NULL;
3319: IF p_org_id = G_OPERATING_UNIT_INFO.org_id THEN
3320: x_ledger_id := G_OPERATING_UNIT_INFO.ledger_id;
3321: x_func_currency := G_OPERATING_UNIT_INFO.currency_code;
3322: IF l_debug_on THEN
3323: WSH_DEBUG_SV.logmsg(l_module_name,'Return cached value for p_org = G_OPERATING_UNIT_INFO.org_id');
3324: END IF;
3325: ELSE
3326: IF l_debug_on THEN
3327: WSH_DEBUG_SV.logmsg(l_module_name,'Get Ledger id from p_org_id');
3323: WSH_DEBUG_SV.logmsg(l_module_name,'Return cached value for p_org = G_OPERATING_UNIT_INFO.org_id');
3324: END IF;
3325: ELSE
3326: IF l_debug_on THEN
3327: WSH_DEBUG_SV.logmsg(l_module_name,'Get Ledger id from p_org_id');
3328: END IF;
3329: OPEN c_ledger_and_func_curr( p_org_id);
3330: FETCH c_ledger_and_func_curr
3331: INTO l_org_id, x_ledger_id, x_func_currency;
3341: --
3342: -- Debug Statements
3343: --
3344: IF l_debug_on THEN
3345: WSH_DEBUG_SV.log(l_module_name,'LEDGER ID',x_ledger_id);
3346: WSH_DEBUG_SV.log(l_module_name,'FUNC CURRENCY',x_func_currency);
3347: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
3348: WSH_DEBUG_SV.pop(l_module_name);
3349: END IF;
3342: -- Debug Statements
3343: --
3344: IF l_debug_on THEN
3345: WSH_DEBUG_SV.log(l_module_name,'LEDGER ID',x_ledger_id);
3346: WSH_DEBUG_SV.log(l_module_name,'FUNC CURRENCY',x_func_currency);
3347: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
3348: WSH_DEBUG_SV.pop(l_module_name);
3349: END IF;
3350: --
3343: --
3344: IF l_debug_on THEN
3345: WSH_DEBUG_SV.log(l_module_name,'LEDGER ID',x_ledger_id);
3346: WSH_DEBUG_SV.log(l_module_name,'FUNC CURRENCY',x_func_currency);
3347: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
3348: WSH_DEBUG_SV.pop(l_module_name);
3349: END IF;
3350: --
3351: EXCEPTION
3344: IF l_debug_on THEN
3345: WSH_DEBUG_SV.log(l_module_name,'LEDGER ID',x_ledger_id);
3346: WSH_DEBUG_SV.log(l_module_name,'FUNC CURRENCY',x_func_currency);
3347: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
3348: WSH_DEBUG_SV.pop(l_module_name);
3349: END IF;
3350: --
3351: EXCEPTION
3352: WHEN WSH_GET_LEDGER_ERROR THEN
3359: fnd_message.set_name('WSH', 'WSH_LEDGER_ID_NOT_FOUND');
3360: WSH_UTIL_CORE.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
3361:
3362: IF l_debug_on THEN
3363: WSH_DEBUG_SV.pop(l_module_name);
3364: END IF;
3365:
3366: WHEN others THEN
3367: x_ledger_id := NULL;
3373: wsh_util_core.default_handler('WSH_UTIL_CORE.Get_Ledger_id_Func_Currency');
3374: -- Debug Statements
3375: --
3376: IF l_debug_on THEN
3377: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3378: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3379: END IF;
3380: --
3381: --
3374: -- Debug Statements
3375: --
3376: IF l_debug_on THEN
3377: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3378: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3379: END IF;
3380: --
3381: --
3382: END Get_Ledger_id_Func_Currency;
3444: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3445: --
3446: IF l_debug_on IS NULL
3447: THEN
3448: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3449: END IF;
3450: --
3451: IF l_debug_on THEN
3452: WSH_DEBUG_SV.push(l_module_name);
3448: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3449: END IF;
3450: --
3451: IF l_debug_on THEN
3452: WSH_DEBUG_SV.push(l_module_name);
3453: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID.COUNT',p_delivery_ids.count);
3454: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID.COUNT',p_stop_ids.count);
3455: END IF;
3456: --
3449: END IF;
3450: --
3451: IF l_debug_on THEN
3452: WSH_DEBUG_SV.push(l_module_name);
3453: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID.COUNT',p_delivery_ids.count);
3454: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID.COUNT',p_stop_ids.count);
3455: END IF;
3456: --
3457: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
3450: --
3451: IF l_debug_on THEN
3452: WSH_DEBUG_SV.push(l_module_name);
3453: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID.COUNT',p_delivery_ids.count);
3454: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID.COUNT',p_stop_ids.count);
3455: END IF;
3456: --
3457: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
3458: l_del_tab.delete;
3484: --
3485: -- Debug Statements
3486: --
3487: IF l_debug_on THEN
3488: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_LABEL_PUB.PRINT_LABEL',WSH_DEBUG_SV.C_PROC_LEVEL);
3489: END IF;
3490: --
3491: INV_LABEL_PUB.print_label (
3492: x_return_status => l_label_return_status,
3509: --
3510: -- Debug Statements
3511: --
3512: IF l_debug_on THEN
3513: WSH_DEBUG_SV.pop(l_module_name);
3514: END IF;
3515: --
3516: EXCEPTION
3517: WHEN others THEN
3528: --
3529: -- Debug Statements
3530: --
3531: IF l_debug_on THEN
3532: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3533: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3534: END IF;
3535: --
3536: END Print_Label;
3529: -- Debug Statements
3530: --
3531: IF l_debug_on THEN
3532: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3533: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3534: END IF;
3535: --
3536: END Print_Label;
3537:
3568: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3569: --
3570: IF l_debug_on IS NULL
3571: THEN
3572: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3573: END IF;
3574: --
3575: IF l_debug_on THEN
3576: WSH_DEBUG_SV.push(l_module_name);
3572: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3573: END IF;
3574: --
3575: IF l_debug_on THEN
3576: WSH_DEBUG_SV.push(l_module_name);
3577: END IF;
3578: --
3579: IF (wsh_fte_enabled.check_status = 'Y' AND
3580: Get_Otm_Install_Profile_Value = 'N') THEN -- OTM R12
3604: --
3605: -- Debug Statements
3606: --
3607: IF l_debug_on THEN
3608: WSH_DEBUG_SV.log(l_module_name,'G_FTE_IS_INSTALLED',G_FTE_IS_INSTALLED);
3609: WSH_DEBUG_SV.pop(l_module_name);
3610: END IF;
3611: --
3612: return G_FTE_IS_INSTALLED;
3605: -- Debug Statements
3606: --
3607: IF l_debug_on THEN
3608: WSH_DEBUG_SV.log(l_module_name,'G_FTE_IS_INSTALLED',G_FTE_IS_INSTALLED);
3609: WSH_DEBUG_SV.pop(l_module_name);
3610: END IF;
3611: --
3612: return G_FTE_IS_INSTALLED;
3613: END FTE_Is_Installed;
3640: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3641: --
3642: IF l_debug_on IS NULL
3643: THEN
3644: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3645: END IF;
3646: --
3647: IF l_debug_on THEN
3648: WSH_DEBUG_SV.push(l_module_name);
3644: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3645: END IF;
3646: --
3647: IF l_debug_on THEN
3648: WSH_DEBUG_SV.push(l_module_name);
3649: END IF;
3650: --
3651:
3652: --
3677: --
3678: -- Debug Statements
3679: --
3680: IF l_debug_on THEN
3681: WSH_DEBUG_SV.log(l_module_name,'G_TP_IS_INSTALLED',G_TP_IS_INSTALLED);
3682: WSH_DEBUG_SV.pop(l_module_name);
3683: END IF;
3684: --
3685: return G_TP_IS_INSTALLED;
3678: -- Debug Statements
3679: --
3680: IF l_debug_on THEN
3681: WSH_DEBUG_SV.log(l_module_name,'G_TP_IS_INSTALLED',G_TP_IS_INSTALLED);
3682: WSH_DEBUG_SV.pop(l_module_name);
3683: END IF;
3684: --
3685: return G_TP_IS_INSTALLED;
3686: EXCEPTION
3689: --
3690: -- Debug Statements
3691: --
3692: IF l_debug_on THEN
3693: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3694: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3695: END IF;
3696: --
3697: RETURN 'N';
3690: -- Debug Statements
3691: --
3692: IF l_debug_on THEN
3693: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3694: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3695: END IF;
3696: --
3697: RETURN 'N';
3698: END TP_Is_Installed;
3735: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3736: --
3737: IF l_debug_on IS NULL
3738: THEN
3739: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3740: END IF;
3741: --
3742: IF l_debug_on THEN
3743: WSH_DEBUG_SV.push(l_module_name);
3739: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3740: END IF;
3741: --
3742: IF l_debug_on THEN
3743: WSH_DEBUG_SV.push(l_module_name);
3744: --
3745: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_LEG_ID',P_DELIVERY_LEG_ID);
3746: END IF;
3747: --
3741: --
3742: IF l_debug_on THEN
3743: WSH_DEBUG_SV.push(l_module_name);
3744: --
3745: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_LEG_ID',P_DELIVERY_LEG_ID);
3746: END IF;
3747: --
3748: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
3749: OPEN c_get_trip_name;
3760: --
3761: -- Debug Statements
3762: --
3763: IF l_debug_on THEN
3764: WSH_DEBUG_SV.log(l_module_name,'TRIP NAME',x_trip_name);
3765: WSH_DEBUG_SV.log(l_module_name,'Reprice Required',x_reprice_required);
3766: WSH_DEBUG_SV.pop(l_module_name);
3767: END IF;
3768: --
3761: -- Debug Statements
3762: --
3763: IF l_debug_on THEN
3764: WSH_DEBUG_SV.log(l_module_name,'TRIP NAME',x_trip_name);
3765: WSH_DEBUG_SV.log(l_module_name,'Reprice Required',x_reprice_required);
3766: WSH_DEBUG_SV.pop(l_module_name);
3767: END IF;
3768: --
3769: EXCEPTION
3762: --
3763: IF l_debug_on THEN
3764: WSH_DEBUG_SV.log(l_module_name,'TRIP NAME',x_trip_name);
3765: WSH_DEBUG_SV.log(l_module_name,'Reprice Required',x_reprice_required);
3766: WSH_DEBUG_SV.pop(l_module_name);
3767: END IF;
3768: --
3769: EXCEPTION
3770: WHEN others THEN
3774: --
3775: -- Debug Statements
3776: --
3777: IF l_debug_on THEN
3778: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3779: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3780: END IF;
3781: --
3782: END Get_Trip_Name_by_Leg;
3775: -- Debug Statements
3776: --
3777: IF l_debug_on THEN
3778: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3779: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3780: END IF;
3781: --
3782: END Get_Trip_Name_by_Leg;
3783:
3794: -- p_raise_error_flag is defaulted to TRUE
3795: IS
3796: --
3797: --
3798: --l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
3799: --
3800: --l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'API_POST_CALL';
3801: --
3802: --
3804: --
3805: --
3806: /*
3807: IF l_debug_on THEN
3808: WSH_DEBUG_SV.push(l_module_name);
3809: --
3810: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3811: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3812: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3806: /*
3807: IF l_debug_on THEN
3808: WSH_DEBUG_SV.push(l_module_name);
3809: --
3810: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3811: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3812: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3813: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3814: END IF;
3807: IF l_debug_on THEN
3808: WSH_DEBUG_SV.push(l_module_name);
3809: --
3810: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3811: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3812: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3813: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3814: END IF;
3815: */
3808: WSH_DEBUG_SV.push(l_module_name);
3809: --
3810: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3811: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3812: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3813: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3814: END IF;
3815: */
3816:
3809: --
3810: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3811: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3812: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3813: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3814: END IF;
3815: */
3816:
3817: --
3840: --
3841: --
3842: /*
3843: IF l_debug_on THEN
3844: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3845: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3846: WSH_DEBUG_SV.pop(l_module_name);
3847: END IF;
3848: */
3841: --
3842: /*
3843: IF l_debug_on THEN
3844: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3845: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3846: WSH_DEBUG_SV.pop(l_module_name);
3847: END IF;
3848: */
3849: --
3842: /*
3843: IF l_debug_on THEN
3844: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3845: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3846: WSH_DEBUG_SV.pop(l_module_name);
3847: END IF;
3848: */
3849: --
3850: --
3864: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3865: --
3866: /*
3867: IF l_debug_on THEN
3868: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3869: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3870: END IF;
3871: */
3872: --
3865: --
3866: /*
3867: IF l_debug_on THEN
3868: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3869: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3870: END IF;
3871: */
3872: --
3873: --
3897: p_token8 IN VARCHAR2 DEFAULT NULL,
3898: p_value8 IN VARCHAR2 DEFAULT NULL,
3899: p_raise_error_flag IN BOOLEAN DEFAULT TRUE )
3900: IS
3901: --l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
3902: --
3903: --l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'API_POST_CALL';
3904: --
3905: --
3905: --
3906: BEGIN
3907: /*
3908: IF l_debug_on THEN
3909: WSH_DEBUG_SV.push(l_module_name);
3910: --
3911: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3912: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3913: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3907: /*
3908: IF l_debug_on THEN
3909: WSH_DEBUG_SV.push(l_module_name);
3910: --
3911: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3912: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3913: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3914: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3915: END IF;
3908: IF l_debug_on THEN
3909: WSH_DEBUG_SV.push(l_module_name);
3910: --
3911: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3912: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3913: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3914: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3915: END IF;
3916: */
3909: WSH_DEBUG_SV.push(l_module_name);
3910: --
3911: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3912: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3913: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3914: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3915: END IF;
3916: */
3917:
3910: --
3911: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3912: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3913: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3914: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3915: END IF;
3916: */
3917:
3918: --
3982: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3983: --
3984: IF l_debug_on IS NULL
3985: THEN
3986: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3987: END IF;
3988: --
3989: IF l_debug_on THEN
3990: WSH_DEBUG_SV.push(l_module_name);
3986: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3987: END IF;
3988: --
3989: IF l_debug_on THEN
3990: WSH_DEBUG_SV.push(l_module_name);
3991: --
3992: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
3993: END IF;
3994:
3988: --
3989: IF l_debug_on THEN
3990: WSH_DEBUG_SV.push(l_module_name);
3991: --
3992: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
3993: END IF;
3994:
3995: OPEN c_orgs(p_delivery_id) ;
3996: FETCH c_orgs INTO l_org_id, l_cnt;
3999: END IF;
4000: CLOSE c_orgs;
4001:
4002: IF l_debug_on THEN
4003: WSH_DEBUG_SV.log(l_module_name,'l_org_id',l_org_id);
4004: WSH_DEBUG_SV.log(l_module_name,'l_cnt',l_cnt);
4005: WSH_DEBUG_SV.pop(l_module_name);
4006: END IF;
4007:
4000: CLOSE c_orgs;
4001:
4002: IF l_debug_on THEN
4003: WSH_DEBUG_SV.log(l_module_name,'l_org_id',l_org_id);
4004: WSH_DEBUG_SV.log(l_module_name,'l_cnt',l_cnt);
4005: WSH_DEBUG_SV.pop(l_module_name);
4006: END IF;
4007:
4008: RETURN l_org_id;
4001:
4002: IF l_debug_on THEN
4003: WSH_DEBUG_SV.log(l_module_name,'l_org_id',l_org_id);
4004: WSH_DEBUG_SV.log(l_module_name,'l_cnt',l_cnt);
4005: WSH_DEBUG_SV.pop(l_module_name);
4006: END IF;
4007:
4008: RETURN l_org_id;
4009: EXCEPTION
4010: WHEN OTHERS THEN
4011: wsh_util_core.default_handler('WSH_UTIL_CORE.GET_OPERATINGUNIT_ID',
4012: l_module_name);
4013: IF l_debug_on THEN
4014: WSH_DEBUG_SV.pop(l_module_name);
4015: END IF;
4016: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4017: END get_operatingUnit_id;
4018:
4044: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4045: --
4046: IF l_debug_on IS NULL
4047: THEN
4048: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4049: END IF;
4050: --
4051: IF l_debug_on THEN
4052: WSH_DEBUG_SV.push(l_module_name);
4048: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4049: END IF;
4050: --
4051: IF l_debug_on THEN
4052: WSH_DEBUG_SV.push(l_module_name);
4053: --
4054: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_LEG_ID',P_STORE_FLAG);
4055: END IF;
4056: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
4050: --
4051: IF l_debug_on THEN
4052: WSH_DEBUG_SV.push(l_module_name);
4053: --
4054: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_LEG_ID',P_STORE_FLAG);
4055: END IF;
4056: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
4057: IF (p_store_flag = FALSE) THEN
4058: x_msg_rec_count.e_count := 0;
4082: --
4083: -- Debug Statements
4084: --
4085: IF l_debug_on THEN
4086: WSH_DEBUG_SV.log(l_module_name,'Error Count', x_msg_rec_count.e_count);
4087: WSH_DEBUG_SV.log(l_module_name,'Warning Count', x_msg_rec_count.w_count);
4088: WSH_DEBUG_SV.log(l_module_name,'Unexpected Error Count', x_msg_rec_count.u_count);
4089: WSH_DEBUG_SV.log(l_module_name,'Success Count', x_msg_rec_count.s_count);
4090: WSH_DEBUG_SV.pop(l_module_name);
4083: -- Debug Statements
4084: --
4085: IF l_debug_on THEN
4086: WSH_DEBUG_SV.log(l_module_name,'Error Count', x_msg_rec_count.e_count);
4087: WSH_DEBUG_SV.log(l_module_name,'Warning Count', x_msg_rec_count.w_count);
4088: WSH_DEBUG_SV.log(l_module_name,'Unexpected Error Count', x_msg_rec_count.u_count);
4089: WSH_DEBUG_SV.log(l_module_name,'Success Count', x_msg_rec_count.s_count);
4090: WSH_DEBUG_SV.pop(l_module_name);
4091: END IF;
4084: --
4085: IF l_debug_on THEN
4086: WSH_DEBUG_SV.log(l_module_name,'Error Count', x_msg_rec_count.e_count);
4087: WSH_DEBUG_SV.log(l_module_name,'Warning Count', x_msg_rec_count.w_count);
4088: WSH_DEBUG_SV.log(l_module_name,'Unexpected Error Count', x_msg_rec_count.u_count);
4089: WSH_DEBUG_SV.log(l_module_name,'Success Count', x_msg_rec_count.s_count);
4090: WSH_DEBUG_SV.pop(l_module_name);
4091: END IF;
4092: --
4085: IF l_debug_on THEN
4086: WSH_DEBUG_SV.log(l_module_name,'Error Count', x_msg_rec_count.e_count);
4087: WSH_DEBUG_SV.log(l_module_name,'Warning Count', x_msg_rec_count.w_count);
4088: WSH_DEBUG_SV.log(l_module_name,'Unexpected Error Count', x_msg_rec_count.u_count);
4089: WSH_DEBUG_SV.log(l_module_name,'Success Count', x_msg_rec_count.s_count);
4090: WSH_DEBUG_SV.pop(l_module_name);
4091: END IF;
4092: --
4093: EXCEPTION
4086: WSH_DEBUG_SV.log(l_module_name,'Error Count', x_msg_rec_count.e_count);
4087: WSH_DEBUG_SV.log(l_module_name,'Warning Count', x_msg_rec_count.w_count);
4088: WSH_DEBUG_SV.log(l_module_name,'Unexpected Error Count', x_msg_rec_count.u_count);
4089: WSH_DEBUG_SV.log(l_module_name,'Success Count', x_msg_rec_count.s_count);
4090: WSH_DEBUG_SV.pop(l_module_name);
4091: END IF;
4092: --
4093: EXCEPTION
4094: WHEN others THEN
4097: --
4098: -- Debug Statements
4099: --
4100: IF l_debug_on THEN
4101: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4102: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4103: END IF;
4104: --
4105:
4098: -- Debug Statements
4099: --
4100: IF l_debug_on THEN
4101: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4102: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4103: END IF;
4104: --
4105:
4106: END Store_Msg_In_Table;
4158: --
4159: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4160: IF l_debug_on IS NULL
4161: THEN
4162: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4163: END IF;
4164: --
4165: IF l_debug_on THEN
4166: wsh_debug_sv.push (l_module_name);
4162: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4163: END IF;
4164: --
4165: IF l_debug_on THEN
4166: wsh_debug_sv.push (l_module_name);
4167: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4168: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4169: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4170: END IF;
4163: END IF;
4164: --
4165: IF l_debug_on THEN
4166: wsh_debug_sv.push (l_module_name);
4167: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4168: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4169: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4170: END IF;
4171: --
4164: --
4165: IF l_debug_on THEN
4166: wsh_debug_sv.push (l_module_name);
4167: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4168: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4169: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4170: END IF;
4171: --
4172: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4165: IF l_debug_on THEN
4166: wsh_debug_sv.push (l_module_name);
4167: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4168: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4169: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4170: END IF;
4171: --
4172: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4173:
4173:
4174: IF p_action = 'PUT' THEN --{
4175: IF p_key IS NULL THEN
4176: IF l_debug_on THEN
4177: WSH_DEBUG_SV.log(l_module_name, 'p_key cannot be null', p_key);
4178: END IF;
4179: RAISE FND_API.G_EXC_ERROR ;
4180: END IF;
4181: IF p_key < C_INDEX_LIMIT THEN
4218: END IF;
4219: END IF; --}
4220: END IF;--}
4221: IF l_debug_on THEN
4222: WSH_DEBUG_SV.pop(l_module_name);
4223: END IF;
4224: EXCEPTION
4225: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4226: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4225: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4226: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4227: --
4228: IF l_debug_on THEN
4229: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4230: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4231: WSH_DEBUG_SV.pop(l_module_name);
4232: END IF;
4233: --
4226: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4227: --
4228: IF l_debug_on THEN
4229: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4230: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4231: WSH_DEBUG_SV.pop(l_module_name);
4232: END IF;
4233: --
4234:
4227: --
4228: IF l_debug_on THEN
4229: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4230: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4231: WSH_DEBUG_SV.pop(l_module_name);
4232: END IF;
4233: --
4234:
4235: WHEN FND_API.G_EXC_ERROR THEN
4235: WHEN FND_API.G_EXC_ERROR THEN
4236: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4237: --
4238: IF l_debug_on THEN
4239: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4240: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4241: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4242: END IF;
4243: --
4236: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4237: --
4238: IF l_debug_on THEN
4239: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4240: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4241: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4242: END IF;
4243: --
4244: WHEN OTHERS THEN
4237: --
4238: IF l_debug_on THEN
4239: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4240: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4241: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4242: END IF;
4243: --
4244: WHEN OTHERS THEN
4245: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4245: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4246: wsh_util_core.default_handler('WSH_UTIL_CORE.GET_CACHED_VALUE');
4247: --
4248: IF l_debug_on THEN
4249: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4250: 'Oracle error message is '||
4251: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4252: WSH_DEBUG_SV.pop(l_module_name,
4253: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4247: --
4248: IF l_debug_on THEN
4249: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4250: 'Oracle error message is '||
4251: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4252: WSH_DEBUG_SV.pop(l_module_name,
4253: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4254: END IF;
4255:
4248: IF l_debug_on THEN
4249: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4250: 'Oracle error message is '||
4251: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4252: WSH_DEBUG_SV.pop(l_module_name,
4253: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4254: END IF;
4255:
4256: END get_cached_value;
4309: --
4310: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4311: IF l_debug_on IS NULL
4312: THEN
4313: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4314: END IF;
4315: --
4316: IF l_debug_on THEN
4317: wsh_debug_sv.push (l_module_name);
4313: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4314: END IF;
4315: --
4316: IF l_debug_on THEN
4317: wsh_debug_sv.push (l_module_name);
4318: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4319: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4320: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4321: END IF;
4314: END IF;
4315: --
4316: IF l_debug_on THEN
4317: wsh_debug_sv.push (l_module_name);
4318: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4319: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4320: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4321: END IF;
4322: --
4315: --
4316: IF l_debug_on THEN
4317: wsh_debug_sv.push (l_module_name);
4318: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4319: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4320: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4321: END IF;
4322: --
4323: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4316: IF l_debug_on THEN
4317: wsh_debug_sv.push (l_module_name);
4318: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4319: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4320: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4321: END IF;
4322: --
4323: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4324:
4324:
4325: IF p_action = 'PUT' THEN --{
4326: IF p_key IS NULL THEN
4327: IF l_debug_on THEN
4328: WSH_DEBUG_SV.log(l_module_name, 'p_key cannot be null', p_key);
4329: END IF;
4330: RAISE FND_API.G_EXC_ERROR ;
4331: END IF;
4332: IF p_key < C_INDEX_LIMIT THEN
4369: END IF;
4370: END IF; --}
4371: END IF;--}
4372: IF l_debug_on THEN
4373: WSH_DEBUG_SV.pop(l_module_name);
4374: END IF;
4375:
4376: EXCEPTION
4377: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4377: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4378: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4379: --
4380: IF l_debug_on THEN
4381: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4382: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4383: WSH_DEBUG_SV.pop(l_module_name);
4384: END IF;
4385: --
4378: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4379: --
4380: IF l_debug_on THEN
4381: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4382: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4383: WSH_DEBUG_SV.pop(l_module_name);
4384: END IF;
4385: --
4386:
4379: --
4380: IF l_debug_on THEN
4381: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4382: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4383: WSH_DEBUG_SV.pop(l_module_name);
4384: END IF;
4385: --
4386:
4387: WHEN FND_API.G_EXC_ERROR THEN
4387: WHEN FND_API.G_EXC_ERROR THEN
4388: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4389: --
4390: IF l_debug_on THEN
4391: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4392: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4393: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4394: END IF;
4395: --
4388: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4389: --
4390: IF l_debug_on THEN
4391: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4392: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4393: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4394: END IF;
4395: --
4396: WHEN OTHERS THEN
4389: --
4390: IF l_debug_on THEN
4391: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4392: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4393: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4394: END IF;
4395: --
4396: WHEN OTHERS THEN
4397: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4397: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4398: wsh_util_core.default_handler('WSH_UTIL_CORE.GET_CACHED_VALUE');
4399: --
4400: IF l_debug_on THEN
4401: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4402: 'Oracle error message is '||
4403: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4404: WSH_DEBUG_SV.pop(l_module_name,
4405: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4399: --
4400: IF l_debug_on THEN
4401: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4402: 'Oracle error message is '||
4403: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4404: WSH_DEBUG_SV.pop(l_module_name,
4405: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4406: END IF;
4407:
4400: IF l_debug_on THEN
4401: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4402: 'Oracle error message is '||
4403: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4404: WSH_DEBUG_SV.pop(l_module_name,
4405: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4406: END IF;
4407:
4408: END get_cached_value;
4459: --
4460: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4461: IF l_debug_on IS NULL
4462: THEN
4463: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4464: END IF;
4465: --
4466: IF l_debug_on THEN
4467: wsh_debug_sv.push (l_module_name);
4463: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4464: END IF;
4465: --
4466: IF l_debug_on THEN
4467: wsh_debug_sv.push (l_module_name);
4468: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4469: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4470: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4471: END IF;
4464: END IF;
4465: --
4466: IF l_debug_on THEN
4467: wsh_debug_sv.push (l_module_name);
4468: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4469: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4470: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4471: END IF;
4472: --
4465: --
4466: IF l_debug_on THEN
4467: wsh_debug_sv.push (l_module_name);
4468: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4469: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4470: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4471: END IF;
4472: --
4473: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4466: IF l_debug_on THEN
4467: wsh_debug_sv.push (l_module_name);
4468: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4469: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4470: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4471: END IF;
4472: --
4473: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4474:
4474:
4475: IF p_action = 'PUT' THEN --{
4476: IF p_key IS NULL THEN
4477: IF l_debug_on THEN
4478: WSH_DEBUG_SV.log(l_module_name, 'p_key cannot be null', p_key);
4479: END IF;
4480: RAISE FND_API.G_EXC_ERROR ;
4481: END IF;
4482: IF p_key < C_INDEX_LIMIT THEN
4519: END IF;
4520: END IF; --}
4521: END IF;--}
4522: IF l_debug_on THEN
4523: WSH_DEBUG_SV.pop(l_module_name);
4524: END IF;
4525:
4526: EXCEPTION
4527: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4527: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4528: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4529: --
4530: IF l_debug_on THEN
4531: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4532: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4533: WSH_DEBUG_SV.pop(l_module_name);
4534: END IF;
4535: --
4528: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4529: --
4530: IF l_debug_on THEN
4531: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4532: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4533: WSH_DEBUG_SV.pop(l_module_name);
4534: END IF;
4535: --
4536:
4529: --
4530: IF l_debug_on THEN
4531: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4532: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4533: WSH_DEBUG_SV.pop(l_module_name);
4534: END IF;
4535: --
4536:
4537: WHEN FND_API.G_EXC_ERROR THEN
4537: WHEN FND_API.G_EXC_ERROR THEN
4538: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4539: --
4540: IF l_debug_on THEN
4541: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4542: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4543: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4544: END IF;
4545: --
4538: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4539: --
4540: IF l_debug_on THEN
4541: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4542: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4543: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4544: END IF;
4545: --
4546: WHEN OTHERS THEN
4539: --
4540: IF l_debug_on THEN
4541: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4542: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4543: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4544: END IF;
4545: --
4546: WHEN OTHERS THEN
4547: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4547: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4548: wsh_util_core.default_handler('WSH_UTIL_CORE.GET_CACHED_VALUE');
4549: --
4550: IF l_debug_on THEN
4551: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4552: 'Oracle error message is '||
4553: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4554: WSH_DEBUG_SV.pop(l_module_name,
4555: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4549: --
4550: IF l_debug_on THEN
4551: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4552: 'Oracle error message is '||
4553: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4554: WSH_DEBUG_SV.pop(l_module_name,
4555: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4556: END IF;
4557:
4550: IF l_debug_on THEN
4551: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4552: 'Oracle error message is '||
4553: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4554: WSH_DEBUG_SV.pop(l_module_name,
4555: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4556: END IF;
4557:
4558: END get_cached_value;
4570: --
4571: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4572: --
4573: IF l_debug_on IS NULL THEN
4574: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4575: END IF;
4576: --
4577: IF l_debug_on THEN
4578: wsh_debug_sv.push(l_module_name);
4574: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4575: END IF;
4576: --
4577: IF l_debug_on THEN
4578: wsh_debug_sv.push(l_module_name);
4579: wsh_debug_sv.log(l_module_name, 'p_dynamic_tab.COUNT', p_dynamic_tab.COUNT);
4580: END IF;
4581: --
4582:
4575: END IF;
4576: --
4577: IF l_debug_on THEN
4578: wsh_debug_sv.push(l_module_name);
4579: wsh_debug_sv.log(l_module_name, 'p_dynamic_tab.COUNT', p_dynamic_tab.COUNT);
4580: END IF;
4581: --
4582:
4583: IF (p_dynamic_tab.COUNT > 50 ) THEN
4581: --
4582:
4583: IF (p_dynamic_tab.COUNT > 50 ) THEN
4584: IF l_debug_on THEN
4585: wsh_debug_sv.logmsg(l_module_name, 'p_dynamic_tab.COUNT should not be grater than 50');
4586: wsh_debug_sv.pop(l_module_name);
4587: RETURN;
4588: END IF;
4589: END IF;
4582:
4583: IF (p_dynamic_tab.COUNT > 50 ) THEN
4584: IF l_debug_on THEN
4585: wsh_debug_sv.logmsg(l_module_name, 'p_dynamic_tab.COUNT should not be grater than 50');
4586: wsh_debug_sv.pop(l_module_name);
4587: RETURN;
4588: END IF;
4589: END IF;
4590:
6068: p_dynamic_tab(50);
6069: END IF;
6070: --
6071: IF l_debug_on THEN
6072: WSH_DEBUG_SV.pop(l_module_name);
6073: END IF;
6074: --
6075: EXCEPTION
6076: --
6076: --
6077: WHEN OTHERS THEN
6078: --
6079: IF l_debug_on THEN
6080: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6081: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6082: END IF;
6083: --
6084: END OpenDynamicCursor;
6077: WHEN OTHERS THEN
6078: --
6079: IF l_debug_on THEN
6080: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6081: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6082: END IF;
6083: --
6084: END OpenDynamicCursor;
6085: --HVOP heali
6115: BEGIN
6116: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6117:
6118: IF l_debug_on IS NULL THEN
6119: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6120: END IF;
6121:
6122: IF l_debug_on THEN
6123: WSH_DEBUG_SV.push(l_module_name);
6119: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6120: END IF;
6121:
6122: IF l_debug_on THEN
6123: WSH_DEBUG_SV.push(l_module_name);
6124: WSH_DEBUG_SV.log(l_module_name,'p_lookup_type',p_lookup_type);
6125: WSH_DEBUG_SV.log(l_module_name,'P_lookup_code',P_lookup_code);
6126: END IF;
6127:
6120: END IF;
6121:
6122: IF l_debug_on THEN
6123: WSH_DEBUG_SV.push(l_module_name);
6124: WSH_DEBUG_SV.log(l_module_name,'p_lookup_type',p_lookup_type);
6125: WSH_DEBUG_SV.log(l_module_name,'P_lookup_code',P_lookup_code);
6126: END IF;
6127:
6128: OPEN get_meaning;
6121:
6122: IF l_debug_on THEN
6123: WSH_DEBUG_SV.push(l_module_name);
6124: WSH_DEBUG_SV.log(l_module_name,'p_lookup_type',p_lookup_type);
6125: WSH_DEBUG_SV.log(l_module_name,'P_lookup_code',P_lookup_code);
6126: END IF;
6127:
6128: OPEN get_meaning;
6129: FETCH get_meaning INTO l_meaning;
6130: CLOSE get_meaning;
6131:
6132:
6133: IF l_debug_on THEN
6134: WSH_DEBUG_SV.log(l_module_name,'l_meaning',l_meaning);
6135: WSH_DEBUG_SV.pop(l_module_name);
6136: END IF;
6137:
6138: IF (l_meaning IS NULL) THEN
6131:
6132:
6133: IF l_debug_on THEN
6134: WSH_DEBUG_SV.log(l_module_name,'l_meaning',l_meaning);
6135: WSH_DEBUG_SV.pop(l_module_name);
6136: END IF;
6137:
6138: IF (l_meaning IS NULL) THEN
6139: return P_lookup_code;
6143:
6144: EXCEPTION
6145: WHEN others THEN
6146: IF l_debug_on THEN
6147: WSH_DEBUG_SV.pop(l_module_name);
6148: END IF;
6149: return P_lookup_code;
6150: END Get_Lookup_Meaning;
6151:
6176: BEGIN
6177: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6178:
6179: IF l_debug_on IS NULL THEN
6180: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6181: END IF;
6182:
6183: IF l_debug_on THEN
6184: WSH_DEBUG_SV.push(l_module_name);
6180: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6181: END IF;
6182:
6183: IF l_debug_on THEN
6184: WSH_DEBUG_SV.push(l_module_name);
6185: WSH_DEBUG_SV.log(l_module_name,'p_entity',p_entity);
6186: WSH_DEBUG_SV.log(l_module_name,'p_action_code',p_action_code);
6187: END IF;
6188:
6181: END IF;
6182:
6183: IF l_debug_on THEN
6184: WSH_DEBUG_SV.push(l_module_name);
6185: WSH_DEBUG_SV.log(l_module_name,'p_entity',p_entity);
6186: WSH_DEBUG_SV.log(l_module_name,'p_action_code',p_action_code);
6187: END IF;
6188:
6189: IF (p_entity ='DLVB') THEN
6182:
6183: IF l_debug_on THEN
6184: WSH_DEBUG_SV.push(l_module_name);
6185: WSH_DEBUG_SV.log(l_module_name,'p_entity',p_entity);
6186: WSH_DEBUG_SV.log(l_module_name,'p_action_code',p_action_code);
6187: END IF;
6188:
6189: IF (p_entity ='DLVB') THEN
6190: l_lookup_type :='DLVB_PRIVILEGE';
6189: IF (p_entity ='DLVB') THEN
6190: l_lookup_type :='DLVB_PRIVILEGE';
6191:
6192: IF l_debug_on THEN
6193: WSH_DEBUG_SV.log(l_module_name,'Inside DLVB l_lookup_type',l_lookup_type);
6194: END IF;
6195:
6196: IF (p_action_code = 'PICK-RELEASE' ) THEN
6197: l_lookup_code:= 'DLVB_LAUNCH_PR';
6282:
6283: l_lookup_type :='DLVY_PRIVILEGE';
6284:
6285: IF l_debug_on THEN
6286: WSH_DEBUG_SV.log(l_module_name,'Inside DLVY l_lookup_type',l_lookup_type);
6287: END IF;
6288:
6289: IF (p_action_code = 'CONFIRM') THEN
6290: l_lookup_code:= 'DLVY_SHIP_CONFIRM';
6411:
6412: l_lookup_type :='STOP_PRIVILEGE';
6413:
6414: IF l_debug_on THEN
6415: WSH_DEBUG_SV.log(l_module_name,'Inside STOP l_lookup_type',l_lookup_type);
6416: END IF;
6417:
6418: IF (p_action_code = 'UPDATE-STATUS') THEN
6419: l_lookup_code:= 'STOP_UPDATE_STATUS';
6462:
6463: l_lookup_type :='TRIP_PRIVILEGE';
6464:
6465: IF l_debug_on THEN
6466: WSH_DEBUG_SV.log(l_module_name,'Inside TRIP l_lookup_type',l_lookup_type);
6467: END IF;
6468:
6469: IF (p_action_code = 'GENERATE-ROUTING-RESPONSE') THEN
6470: l_lookup_code:= 'TRIP_GENERATE_ROUTING_RESPONSE'; --??
6532:
6533: l_meaning:= Get_Lookup_Meaning(l_lookup_type,l_lookup_code);
6534:
6535: IF l_debug_on THEN
6536: WSH_DEBUG_SV.log(l_module_name,'l_meaning',l_meaning);
6537: WSH_DEBUG_SV.pop(l_module_name);
6538: END IF;
6539:
6540: IF (l_meaning IS NULL) THEN
6533: l_meaning:= Get_Lookup_Meaning(l_lookup_type,l_lookup_code);
6534:
6535: IF l_debug_on THEN
6536: WSH_DEBUG_SV.log(l_module_name,'l_meaning',l_meaning);
6537: WSH_DEBUG_SV.pop(l_module_name);
6538: END IF;
6539:
6540: IF (l_meaning IS NULL) THEN
6541: return p_action_code;
6545:
6546: EXCEPTION
6547: WHEN others THEN
6548: IF l_debug_on THEN
6549: WSH_DEBUG_SV.pop(l_module_name);
6550: END IF;
6551: return p_action_code;
6552: END Get_action_Meaning;
6553:
6566: l_old_pos NUMBER;
6567: l_id_len NUMBER;
6568: l_idx NUMBER:=0;
6569:
6570: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
6571: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'get_idtab_from_string';
6572: BEGIN
6573: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6574: --
6572: BEGIN
6573: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6574: --
6575: IF l_debug_on THEN
6576: wsh_debug_sv.push (l_module_name);
6577: END IF;
6578: --
6579:
6580: IF (p_string IS NOT NULL) THEN
6591: END IF;
6592:
6593: --
6594: IF l_debug_on THEN
6595: wsh_debug_sv.pop (l_module_name);
6596: END IF;
6597: --
6598:
6599: EXCEPTION
6601: WSH_UTIL_CORE.default_handler('WSH_UTIL_CORE.GET_IDTAB_FROM_STRING');
6602: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6603: --
6604: IF l_debug_on THEN
6605: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6606: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6607: END IF;
6608: --
6609: END get_idtab_from_string;
6602: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6603: --
6604: IF l_debug_on THEN
6605: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6606: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6607: END IF;
6608: --
6609: END get_idtab_from_string;
6610:
6620: x_return_status OUT NOCOPY VARCHAR2) IS
6621:
6622: l_string VARCHAR2(32767);
6623: l_itr NUMBER;
6624: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
6625: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'get_string_from_idtab';
6626: BEGIN
6627: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6628: --
6626: BEGIN
6627: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6628: --
6629: IF l_debug_on THEN
6630: wsh_debug_sv.push (l_module_name);
6631: END IF;
6632: --
6633:
6634: l_itr := p_id_tab.FIRST;
6649: x_string := l_string;
6650:
6651: --
6652: IF l_debug_on THEN
6653: wsh_debug_sv.pop (l_module_name);
6654: END IF;
6655: --
6656:
6657: EXCEPTION
6659: WSH_UTIL_CORE.default_handler('WSH_UTIL_CORE.GET_STRING_FROM_IDTAB');
6660: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6661: --
6662: IF l_debug_on THEN
6663: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6664: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6665: END IF;
6666: --
6667: END get_string_from_idtab;
6660: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6661: --
6662: IF l_debug_on THEN
6663: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6664: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6665: END IF;
6666: --
6667: END get_string_from_idtab;
6668:
6689:
6690: p_return_status := null;
6691:
6692: IF l_debug_on IS NULL THEN
6693: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6694: END IF;
6695:
6696: IF l_debug_on THEN
6697: WSH_DEBUG_SV.push(l_module_name);
6693: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6694: END IF;
6695:
6696: IF l_debug_on THEN
6697: WSH_DEBUG_SV.push(l_module_name);
6698: END IF;
6699:
6700: IF p_in_entity_name = 'TRIP'
6701: THEN
6717:
6718: p_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6719:
6720: IF l_debug_on THEN
6721: WSH_DEBUG_SV.push(l_module_name);
6722: END IF;
6723: EXCEPTION
6724: WHEN OTHERS
6725: THEN
6725: THEN
6726: p_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6727: --
6728: IF l_debug_on THEN
6729: WSH_DEBUG_SV.logmsg(l_module_name,'Error has occured. Oracle error message is '|| SQLERRM);
6730: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6731: END IF;
6732: --
6733: END Get_Entity_Name;
6726: p_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6727: --
6728: IF l_debug_on THEN
6729: WSH_DEBUG_SV.logmsg(l_module_name,'Error has occured. Oracle error message is '|| SQLERRM);
6730: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6731: END IF;
6732: --
6733: END Get_Entity_Name;
6734:
6778: --
6779: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6780: IF l_debug_on IS NULL
6781: THEN
6782: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6783: END IF;
6784: --
6785: IF l_debug_on THEN
6786: wsh_debug_sv.push (l_module_name);
6782: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6783: END IF;
6784: --
6785: IF l_debug_on THEN
6786: wsh_debug_sv.push (l_module_name);
6787: wsh_debug_sv.log(l_module_name,'p_reset_flags',p_reset_flags);
6788: wsh_debug_sv.log(l_module_name,'count of stops : ',G_STOP_IDS_STOP_IDS_CACHE.count);
6789: wsh_debug_sv.log(l_module_name,'count of stops2 : ',G_STOP_IDS_STOP_IDS_EXT_CACHE.count);
6790: END IF;
6783: END IF;
6784: --
6785: IF l_debug_on THEN
6786: wsh_debug_sv.push (l_module_name);
6787: wsh_debug_sv.log(l_module_name,'p_reset_flags',p_reset_flags);
6788: wsh_debug_sv.log(l_module_name,'count of stops : ',G_STOP_IDS_STOP_IDS_CACHE.count);
6789: wsh_debug_sv.log(l_module_name,'count of stops2 : ',G_STOP_IDS_STOP_IDS_EXT_CACHE.count);
6790: END IF;
6791: --
6784: --
6785: IF l_debug_on THEN
6786: wsh_debug_sv.push (l_module_name);
6787: wsh_debug_sv.log(l_module_name,'p_reset_flags',p_reset_flags);
6788: wsh_debug_sv.log(l_module_name,'count of stops : ',G_STOP_IDS_STOP_IDS_CACHE.count);
6789: wsh_debug_sv.log(l_module_name,'count of stops2 : ',G_STOP_IDS_STOP_IDS_EXT_CACHE.count);
6790: END IF;
6791: --
6792: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6785: IF l_debug_on THEN
6786: wsh_debug_sv.push (l_module_name);
6787: wsh_debug_sv.log(l_module_name,'p_reset_flags',p_reset_flags);
6788: wsh_debug_sv.log(l_module_name,'count of stops : ',G_STOP_IDS_STOP_IDS_CACHE.count);
6789: wsh_debug_sv.log(l_module_name,'count of stops2 : ',G_STOP_IDS_STOP_IDS_EXT_CACHE.count);
6790: END IF;
6791: --
6792: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6793: l_num_warnings := 0;
6802: l_db_stop_id:= NULL; -- bug 5923014: reset stop id
6803: l_stop_id := G_STOP_IDS_STOP_IDS_CACHE(l_ind).value;
6804: --
6805: IF l_debug_on THEN
6806: WSH_DEBUG_SV.log(l_module_name,'Stop ID for FTE_LOAD_TENDER:',l_stop_id);
6807: END IF;
6808: --
6809: --
6810:
6817: IF (l_db_stop_id is not NULL) THEN
6818: --{
6819:
6820: IF l_debug_on THEN
6821: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6822: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6823: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6824: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6825: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6818: --{
6819:
6820: IF l_debug_on THEN
6821: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6822: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6823: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6824: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6825: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6826: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6819:
6820: IF l_debug_on THEN
6821: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6822: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6823: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6824: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6825: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6826: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6827: END IF;
6820: IF l_debug_on THEN
6821: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6822: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6823: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6824: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6825: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6826: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6827: END IF;
6828:
6821: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6822: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6823: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6824: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6825: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6826: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6827: END IF;
6828:
6829: WSH_TRIPS_ACTIONS.Fte_Load_Tender(
6822: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6823: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6824: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6825: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6826: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6827: END IF;
6828:
6829: WSH_TRIPS_ACTIONS.Fte_Load_Tender(
6830: p_stop_id => l_stop_id ,
6834: p_fill_percent => l_fill_percent ,
6835: x_return_status => l_return_status);
6836:
6837: IF l_debug_on THEN
6838: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6839: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6840: END IF;
6841:
6842: wsh_util_core.api_post_call
6835: x_return_status => l_return_status);
6836:
6837: IF l_debug_on THEN
6838: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6839: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6840: END IF;
6841:
6842: wsh_util_core.api_post_call
6843: (
6859: l_db_stop_id:= NULL; -- bug 5923014: reset stop id
6860: l_stop_id := G_STOP_IDS_STOP_IDS_EXT_CACHE(l_ind).value;
6861: --
6862: IF l_debug_on THEN
6863: WSH_DEBUG_SV.log(l_module_name,'Stop ID for FTE_LOAD_TENDER:',l_stop_id);
6864: END IF;
6865: --
6866: --
6867: open c_get_stop_info(l_stop_id);
6873: IF (l_db_stop_id is not NULL) THEN
6874: --{
6875:
6876: IF l_debug_on THEN
6877: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6878: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6879: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6880: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6881: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6874: --{
6875:
6876: IF l_debug_on THEN
6877: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6878: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6879: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6880: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6881: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6882: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6875:
6876: IF l_debug_on THEN
6877: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6878: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6879: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6880: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6881: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6882: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6883: END IF;
6876: IF l_debug_on THEN
6877: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6878: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6879: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6880: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6881: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6882: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6883: END IF;
6884:
6877: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6878: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6879: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6880: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6881: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6882: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6883: END IF;
6884:
6885: WSH_TRIPS_ACTIONS.Fte_Load_Tender(
6878: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6879: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6880: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6881: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6882: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6883: END IF;
6884:
6885: WSH_TRIPS_ACTIONS.Fte_Load_Tender(
6886: p_stop_id => l_stop_id ,
6890: p_fill_percent => l_fill_percent ,
6891: x_return_status => l_return_status);
6892:
6893: IF l_debug_on THEN
6894: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6895: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6896: END IF;
6897:
6898: wsh_util_core.api_post_call
6891: x_return_status => l_return_status);
6892:
6893: IF l_debug_on THEN
6894: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6895: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6896: END IF;
6897:
6898: wsh_util_core.api_post_call
6899: (
6908: l_ind := G_STOP_IDS_STOP_IDS_EXT_CACHE.NEXT(l_ind);
6909: END LOOP;
6910:
6911: IF l_debug_on THEN
6912: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6913: END IF;
6914:
6915:
6916: --call to reset the global cache tables
6916: --call to reset the global cache tables
6917: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags,x_return_status => l_return_status);
6918:
6919: IF l_debug_on THEN
6920: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6921: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6922: END IF;
6923:
6924: wsh_util_core.api_post_call
6917: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags,x_return_status => l_return_status);
6918:
6919: IF l_debug_on THEN
6920: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6921: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6922: END IF;
6923:
6924: wsh_util_core.api_post_call
6925: (
6936: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6937: END IF;
6938:
6939: IF l_debug_on THEN
6940: WSH_DEBUG_SV.pop(l_module_name);
6941: END IF;
6942:
6943:
6944: EXCEPTION
6947: --
6948: -- Debug Statements
6949: --
6950: IF l_debug_on THEN
6951: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6952: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6953: END IF;
6954: --
6955: --call to reset the global cache tables
6948: -- Debug Statements
6949: --
6950: IF l_debug_on THEN
6951: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6952: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6953: END IF;
6954: --
6955: --call to reset the global cache tables
6956: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags,x_return_status => l_return_status);
6960: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6961: END IF;
6962: --
6963: IF l_debug_on THEN
6964: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6965: END IF;
6966:
6967:
6968: WHEN others THEN
6968: WHEN others THEN
6969: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6970:
6971: IF l_debug_on THEN
6972: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6973: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6974: END IF;
6975: --
6976: --call to reset the global cache tables
6969: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6970:
6971: IF l_debug_on THEN
6972: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6973: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6974: END IF;
6975: --
6976: --call to reset the global cache tables
6977: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags,x_return_status => l_return_status);
6976: --call to reset the global cache tables
6977: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags,x_return_status => l_return_status);
6978:
6979: IF l_debug_on THEN
6980: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6981: END IF;
6982: --
6983:
6984: END Process_stops_for_load_tender;
7005: --
7006: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7007: IF l_debug_on IS NULL
7008: THEN
7009: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7010: END IF;
7011: --
7012: IF l_debug_on THEN
7013: wsh_debug_sv.push (l_module_name);
7009: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7010: END IF;
7011: --
7012: IF l_debug_on THEN
7013: wsh_debug_sv.push (l_module_name);
7014: wsh_debug_sv.log(l_module_name,'p_reset_flags',p_reset_flags);
7015: END IF;
7016: --
7017: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7010: END IF;
7011: --
7012: IF l_debug_on THEN
7013: wsh_debug_sv.push (l_module_name);
7014: wsh_debug_sv.log(l_module_name,'p_reset_flags',p_reset_flags);
7015: END IF;
7016: --
7017: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7018: --
7024: G_START_OF_SESSION_API := null;
7025: END IF;
7026:
7027: IF l_debug_on THEN
7028: WSH_DEBUG_SV.pop(l_module_name);
7029: END IF;
7030:
7031:
7032: EXCEPTION
7038: --
7039: -- Debug Statements
7040: --
7041: IF l_debug_on THEN
7042: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7043: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7044: END IF;
7045: --
7046:
7039: -- Debug Statements
7040: --
7041: IF l_debug_on THEN
7042: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7043: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7044: END IF;
7045: --
7046:
7047: END Reset_stops_for_load_tender;
7081: --
7082: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7083: --
7084: IF l_debug_on IS NULL THEN
7085: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7086: END IF;
7087: --
7088: IF l_debug_on THEN
7089: WSH_DEBUG_SV.push(l_module_name);
7085: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7086: END IF;
7087: --
7088: IF l_debug_on THEN
7089: WSH_DEBUG_SV.push(l_module_name);
7090: WSH_DEBUG_SV.log(l_module_name,'Ship Confirm Rule', p_ship_confirm_rule_id);
7091: WSH_DEBUG_SV.log(l_module_name,'Actual Departure Date', to_char(p_actual_departure_date,'DD/MM/YYYY HH24:MI:SS'));
7092: END IF;
7093: --
7086: END IF;
7087: --
7088: IF l_debug_on THEN
7089: WSH_DEBUG_SV.push(l_module_name);
7090: WSH_DEBUG_SV.log(l_module_name,'Ship Confirm Rule', p_ship_confirm_rule_id);
7091: WSH_DEBUG_SV.log(l_module_name,'Actual Departure Date', to_char(p_actual_departure_date,'DD/MM/YYYY HH24:MI:SS'));
7092: END IF;
7093: --
7094:
7087: --
7088: IF l_debug_on THEN
7089: WSH_DEBUG_SV.push(l_module_name);
7090: WSH_DEBUG_SV.log(l_module_name,'Ship Confirm Rule', p_ship_confirm_rule_id);
7091: WSH_DEBUG_SV.log(l_module_name,'Actual Departure Date', to_char(p_actual_departure_date,'DD/MM/YYYY HH24:MI:SS'));
7092: END IF;
7093: --
7094:
7095: -- Bug 4712256
7096:
7097: IF p_ship_confirm_rule_id IS NULL THEN
7098:
7099: IF l_debug_on THEN
7100: WSH_DEBUG_SV.pop(l_module_name, 'Returning TRUE');
7101: END IF;
7102:
7103: return TRUE;
7104:
7109: FROM WSH_SHIP_CONFIRM_RULES
7110: WHERE ship_confirm_rule_id = p_ship_confirm_rule_id;
7111: --
7112: IF l_debug_on THEN
7113: WSH_DEBUG_SV.log(l_module_name, 'AC Intransit Flag', v_ACIntransitFlag);
7114: END IF;
7115: --
7116: IF v_ACIntransitFlag = 'Y' THEN
7117: --{
7121: IF l_global_params.allow_future_ship_date = 'N' AND p_actual_departure_date > SYSDATE
7122: THEN
7123: --
7124: IF l_debug_on THEN
7125: WSH_DEBUG_SV.pop(l_module_name, 'Returning FALSE');
7126: END IF;
7127: --
7128: RETURN FALSE;
7129: --
7129: --
7130: ELSE
7131: --
7132: IF l_debug_on THEN
7133: WSH_DEBUG_SV.pop(l_module_name, 'Returning TRUE');
7134: END IF;
7135: --
7136: RETURN TRUE;
7137: --
7139: --}
7140: ELSE
7141: --
7142: IF l_debug_on THEN
7143: WSH_DEBUG_SV.pop(l_module_name, 'Returning TRUE');
7144: END IF;
7145: --
7146: RETURN TRUE;
7147: --
7153: --
7154: WSH_UTIL_CORE.default_handler('ValidateActualDepartureDate');
7155: --
7156: IF l_debug_on THEN
7157: WSH_DEBUG_SV.pop(l_module_name, 'Exception: WHEN OTHERS');
7158: END IF;
7159: --
7160: RETURN FALSE;
7161: --
7187: --
7188: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7189: --
7190: IF l_debug_on IS NULL THEN
7191: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7192: END IF;
7193: --
7194: IF l_debug_on THEN
7195: WSH_DEBUG_SV.push(l_module_name);
7191: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7192: END IF;
7193: --
7194: IF l_debug_on THEN
7195: WSH_DEBUG_SV.push(l_module_name);
7196: WSH_DEBUG_SV.log(l_module_name,'p_picking_rule_id', p_picking_rule_id);
7197: END IF;
7198: --
7199: SELECT ship_confirm_rule_id
7192: END IF;
7193: --
7194: IF l_debug_on THEN
7195: WSH_DEBUG_SV.push(l_module_name);
7196: WSH_DEBUG_SV.log(l_module_name,'p_picking_rule_id', p_picking_rule_id);
7197: END IF;
7198: --
7199: SELECT ship_confirm_rule_id
7200: INTO v_SCRuleID
7201: FROM wsh_picking_rules
7202: WHERE picking_rule_id = p_picking_rule_id;
7203: --
7204: IF l_debug_on THEN
7205: WSH_DEBUG_SV.log(l_module_name, 'Ship Confirm Rule', v_SCRuleID);
7206: END IF;
7207: --
7208: IF v_SCRuleID is NOT NULL THEN
7209: --
7207: --
7208: IF v_SCRuleID is NOT NULL THEN
7209: --
7210: IF l_debug_on THEN
7211: WSH_DEBUG_SV.pop(l_module_name);
7212: END IF;
7213: --
7214: RETURN v_SCRuleID;
7215: --
7215: --
7216: ELSE
7217: --
7218: IF l_debug_on THEN
7219: WSH_DEBUG_SV.pop(l_module_name);
7220: END IF;
7221: --
7222: RETURN NULL;
7223: --
7223: --
7224: END IF;
7225: --
7226: IF l_debug_on THEN
7227: WSH_DEBUG_SV.pop(l_module_name);
7228: END IF;
7229: --
7230: EXCEPTION
7231: --
7233: --
7234: WSH_UTIL_CORE.default_handler('GetShipConfirmRule');
7235: --
7236: IF l_debug_on THEN
7237: WSH_DEBUG_SV.pop(l_module_name, 'Exception: WHEN OTHERS');
7238: END IF;
7239: --
7240: RETURN NULL;
7241: --
7257: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7258: --
7259: IF l_debug_on IS NULL
7260: THEN
7261: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7262: END IF;
7263: --
7264: IF l_debug_on THEN
7265: WSH_DEBUG_SV.push(l_module_name);
7261: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7262: END IF;
7263: --
7264: IF l_debug_on THEN
7265: WSH_DEBUG_SV.push(l_module_name);
7266: END IF;
7267: --
7268: IF G_WMS_IS_INSTALLED is NULL THEN
7269: IF (fnd_installation.get(l_wms_application_id, l_wms_application_id,l_wms_install_status,l_industry)) THEN
7281: --
7282: -- Debug Statements
7283: --
7284: IF l_debug_on THEN
7285: WSH_DEBUG_SV.log(l_module_name,'G_WMS_IS_INSTALLED',G_WMS_IS_INSTALLED);
7286: WSH_DEBUG_SV.pop(l_module_name);
7287: END IF;
7288: --
7289: return G_WMS_IS_INSTALLED;
7282: -- Debug Statements
7283: --
7284: IF l_debug_on THEN
7285: WSH_DEBUG_SV.log(l_module_name,'G_WMS_IS_INSTALLED',G_WMS_IS_INSTALLED);
7286: WSH_DEBUG_SV.pop(l_module_name);
7287: END IF;
7288: --
7289: return G_WMS_IS_INSTALLED;
7290:
7290:
7291: EXCEPTION
7292: WHEN OTHERS THEN
7293: IF l_debug_on THEN
7294: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7295: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7296: END IF;
7297: --
7298: RETURN 'N';
7291: EXCEPTION
7292: WHEN OTHERS THEN
7293: IF l_debug_on THEN
7294: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7295: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7296: END IF;
7297: --
7298: RETURN 'N';
7299:
7333: i NUMBER := 0;
7334: l_return_status VARCHAR2(1);
7335: l_cust_string VARCHAR2(2000);
7336:
7337: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
7338: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'get_customer_from_loc';
7339:
7340: BEGIN
7341:
7341:
7342: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7343:
7344: IF l_debug_on THEN
7345: wsh_debug_sv.push(l_module_name);
7346: END IF;
7347:
7348: IF ( p_location_id < g_cache_max_size and g_customer_from_location.EXISTS(p_location_id)) THEN
7349:
7364:
7365: END IF;
7366:
7367: /*IF l_debug_on THEN
7368: wsh_debug_sv.push(l_module_name);
7369: END IF;*/
7370:
7371: /*
7372: x_customer_id := g_customer_from_location(p_location_id);
7402: x_string => l_cust_string,
7403: x_return_status => l_return_status);
7404:
7405: IF l_debug_on THEN
7406: WSH_DEBUG_SV.logmsg(l_module_name,'Org String '||l_cust_string);
7407: END IF;
7408:
7409: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
7410: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7428: IF l_debug_on THEN
7429: i := x_customer_id_tab.FIRST;
7430: IF (i IS NOT NULL) THEN
7431:
7432: WSH_DEBUG_SV.logmsg(l_module_name,'Number of Customers for the location '||p_location_id||'is :'|| x_customer_id_tab.COUNT);
7433: LOOP
7434: WSH_DEBUG_SV.logmsg(l_module_name,'Customer_id :'||x_customer_id_tab(i));
7435: EXIT WHEN i = x_customer_id_tab.LAST;
7436: i := x_customer_id_tab.NEXT(i);
7430: IF (i IS NOT NULL) THEN
7431:
7432: WSH_DEBUG_SV.logmsg(l_module_name,'Number of Customers for the location '||p_location_id||'is :'|| x_customer_id_tab.COUNT);
7433: LOOP
7434: WSH_DEBUG_SV.logmsg(l_module_name,'Customer_id :'||x_customer_id_tab(i));
7435: EXIT WHEN i = x_customer_id_tab.LAST;
7436: i := x_customer_id_tab.NEXT(i);
7437: END LOOP;
7438:
7436: i := x_customer_id_tab.NEXT(i);
7437: END LOOP;
7438:
7439: ELSE
7440: WSH_DEBUG_SV.logmsg(l_module_name,'No Organization assocaited with location '||p_location_id);
7441:
7442: END IF;
7443:
7444: WSH_DEBUG_SV.pop(l_module_name);
7440: WSH_DEBUG_SV.logmsg(l_module_name,'No Organization assocaited with location '||p_location_id);
7441:
7442: END IF;
7443:
7444: WSH_DEBUG_SV.pop(l_module_name);
7445: END IF;
7446: --
7447:
7448: EXCEPTION
7449: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7450: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7451: --
7452: IF l_debug_on THEN
7453: WSH_DEBUG_SV.pop(l_module_name,'FND_API.EXCEPTION:G_EXC_UNEXPECTED_ERROR');
7454: END IF;
7455: WHEN others THEN
7456: IF c_get_customer%ISOPEN THEN
7457: CLOSE c_get_customer;
7459: WSH_UTIL_CORE.default_handler('WSH_UTIL_CORE.get_customer_from_loc');
7460: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7461: --
7462: IF l_debug_on THEN
7463: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7464: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7465: END IF;
7466: --
7467: END get_customer_from_loc;
7460: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7461: --
7462: IF l_debug_on THEN
7463: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7464: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7465: END IF;
7466: --
7467: END get_customer_from_loc;
7468:
7500: i NUMBER;
7501: l_return_status VARCHAR2(1);
7502: l_org_string VARCHAR2(32767);
7503:
7504: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
7505: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'get_org_from_location';
7506:
7507: BEGIN
7508: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7507: BEGIN
7508: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7509:
7510: IF l_debug_on THEN
7511: wsh_debug_sv.push(l_module_name);
7512: END IF;
7513:
7514: IF (p_location_id < g_cache_max_size and g_organization_from_location.EXISTS(p_location_id)) THEN
7515:
7530:
7531: END IF;
7532:
7533: /*IF l_debug_on THEN
7534: wsh_debug_sv.push(l_module_name);
7535: END IF;*/
7536:
7537: ELSE
7538:
7556: x_string => l_org_string,
7557: x_return_status => l_return_status);
7558:
7559: IF l_debug_on THEN
7560: WSH_DEBUG_SV.logmsg(l_module_name,'Org String '||l_org_string);
7561: END IF;
7562:
7563: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
7564: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7577:
7578: i := x_organization_tab.FIRST;
7579: IF (i IS NOT NULL) THEN
7580:
7581: WSH_DEBUG_SV.logmsg(l_module_name,'Number of Organizations for the location '||p_location_id||'is :'|| x_organization_tab.COUNT);
7582: LOOP
7583: WSH_DEBUG_SV.logmsg(l_module_name,'Organization_id :'||x_organization_tab(i));
7584: EXIT WHEN i = x_organization_tab.LAST;
7585: i := x_organization_tab.NEXT(i);
7579: IF (i IS NOT NULL) THEN
7580:
7581: WSH_DEBUG_SV.logmsg(l_module_name,'Number of Organizations for the location '||p_location_id||'is :'|| x_organization_tab.COUNT);
7582: LOOP
7583: WSH_DEBUG_SV.logmsg(l_module_name,'Organization_id :'||x_organization_tab(i));
7584: EXIT WHEN i = x_organization_tab.LAST;
7585: i := x_organization_tab.NEXT(i);
7586: END LOOP;
7587:
7585: i := x_organization_tab.NEXT(i);
7586: END LOOP;
7587:
7588: ELSE
7589: WSH_DEBUG_SV.logmsg(l_module_name,'No Organization assocaited with location '||p_location_id);
7590:
7591: END IF;
7592:
7593: WSH_DEBUG_SV.pop(l_module_name);
7589: WSH_DEBUG_SV.logmsg(l_module_name,'No Organization assocaited with location '||p_location_id);
7590:
7591: END IF;
7592:
7593: WSH_DEBUG_SV.pop(l_module_name);
7594:
7595: END IF;
7596: --
7597:
7606: WSH_UTIL_CORE.default_handler('WSH_UTIL_CORE.get_org_from_loc');
7607:
7608: --
7609: IF l_debug_on THEN
7610: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7611: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7612: END IF;
7613: --
7614: END get_org_from_location;
7607:
7608: --
7609: IF l_debug_on THEN
7610: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7611: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7612: END IF;
7613: --
7614: END get_org_from_location;
7615:
7676: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7677: --
7678: IF l_debug_on IS NULL
7679: THEN
7680: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7681: END IF;
7682: --
7683: IF l_debug_on THEN
7684: --
7681: END IF;
7682: --
7683: IF l_debug_on THEN
7684: --
7685: WSH_DEBUG_SV.push(l_module_name);
7686: WSH_DEBUG_SV.log(l_module_name, 'p_entity_type', p_entity_type);
7687: WSH_DEBUG_SV.log(l_module_name, 'p_entity_id', p_entity_id);
7688: --
7689: END IF;
7682: --
7683: IF l_debug_on THEN
7684: --
7685: WSH_DEBUG_SV.push(l_module_name);
7686: WSH_DEBUG_SV.log(l_module_name, 'p_entity_type', p_entity_type);
7687: WSH_DEBUG_SV.log(l_module_name, 'p_entity_id', p_entity_id);
7688: --
7689: END IF;
7690: --
7683: IF l_debug_on THEN
7684: --
7685: WSH_DEBUG_SV.push(l_module_name);
7686: WSH_DEBUG_SV.log(l_module_name, 'p_entity_type', p_entity_type);
7687: WSH_DEBUG_SV.log(l_module_name, 'p_entity_id', p_entity_id);
7688: --
7689: END IF;
7690: --
7691: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7725: --
7726: l_error_flag := TRUE;
7727: --
7728: IF l_debug_on THEN
7729: WSH_DEBUG_SV.log(l_module_name, 'Error: Delivery line not found for LPN_ID', p_entity_id);
7730: END IF;
7731: --
7732: END IF;
7733:
7737: --
7738: l_error_flag := TRUE;
7739: --
7740: IF l_debug_on THEN
7741: WSH_DEBUG_SV.log(l_module_name, 'Error: There exists more than one delivery for LPN_ID', p_entity_id);
7742: END IF;
7743: --
7744: END IF;
7745: END IF;
7750: --
7751: -- Debug Statements
7752: --
7753: IF l_debug_on THEN
7754: WSH_DEBUG_SV.logmsg(l_module_name,'Invalid Entity Type Passed');
7755: END IF;
7756: --
7757: FND_MESSAGE.SET_NAME ( 'WSH', 'WSH_INVALID_ENTITY_TYPE' );
7758: FND_MESSAGE.SET_TOKEN ('ENT_TYPE', p_entity_type );
7775:
7776: --
7777: IF l_debug_on THEN
7778: --
7779: WSH_DEBUG_SV.pop(l_module_name);
7780: --
7781: END IF;
7782: --
7783:
7786: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
7787: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.Get_Delivery_Status');
7788: --
7789: IF l_debug_on THEN
7790: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM, WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7791: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:OTHERS');
7792: END IF;
7793: --
7794: IF ( c_get_delivery_status%ISOPEN ) THEN
7787: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.Get_Delivery_Status');
7788: --
7789: IF l_debug_on THEN
7790: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM, WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7791: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:OTHERS');
7792: END IF;
7793: --
7794: IF ( c_get_delivery_status%ISOPEN ) THEN
7795: close c_get_delivery_status;
7836: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7837: --
7838: IF l_debug_on IS NULL
7839: THEN
7840: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7841: END IF;
7842: --
7843: IF l_debug_on THEN
7844: WSH_DEBUG_SV.push(l_module_name);
7840: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7841: END IF;
7842: --
7843: IF l_debug_on THEN
7844: WSH_DEBUG_SV.push(l_module_name);
7845: END IF;
7846: --
7847:
7848: IF G_OTM_PROFILE_VALUE IS NULL THEN
7850: G_OTM_PROFILE_VALUE := NVL(fnd_profile.value('WSH_OTM_INSTALLED'), 'N');
7851: END IF;
7852:
7853: IF l_debug_on THEN
7854: WSH_DEBUG_SV.log(l_module_name,'G_OTM_PROFILE_VALUE',G_OTM_PROFILE_VALUE);
7855: WSH_DEBUG_SV.pop(l_module_name);
7856: END IF;
7857:
7858: return G_OTM_PROFILE_VALUE;
7851: END IF;
7852:
7853: IF l_debug_on THEN
7854: WSH_DEBUG_SV.log(l_module_name,'G_OTM_PROFILE_VALUE',G_OTM_PROFILE_VALUE);
7855: WSH_DEBUG_SV.pop(l_module_name);
7856: END IF;
7857:
7858: return G_OTM_PROFILE_VALUE;
7859: END Get_Otm_Install_Profile_Value;
7884: --
7885: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7886: --
7887: IF l_debug_on IS NULL THEN
7888: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7889: END IF;
7890: --
7891: IF l_debug_on THEN
7892: WSH_DEBUG_SV.push(l_module_name);
7888: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7889: END IF;
7890: --
7891: IF l_debug_on THEN
7892: WSH_DEBUG_SV.push(l_module_name);
7893: END IF;
7894: --
7895:
7896: IF G_GC3_IS_INSTALLED IS NULL THEN
7908: --
7909: -- Debug Statements
7910: --
7911: IF l_debug_on THEN
7912: WSH_DEBUG_SV.log(l_module_name,'G_GC3_IS_INSTALLED',G_GC3_IS_INSTALLED);
7913: WSH_DEBUG_SV.pop(l_module_name);
7914: END IF;
7915: --
7916: return G_GC3_IS_INSTALLED;
7909: -- Debug Statements
7910: --
7911: IF l_debug_on THEN
7912: WSH_DEBUG_SV.log(l_module_name,'G_GC3_IS_INSTALLED',G_GC3_IS_INSTALLED);
7913: WSH_DEBUG_SV.pop(l_module_name);
7914: END IF;
7915: --
7916: return G_GC3_IS_INSTALLED;
7917: END GC3_Is_Installed;
7947:
7948: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7949:
7950: IF l_debug_on IS NULL THEN
7951: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7952: END IF;
7953:
7954: IF l_debug_on THEN
7955: WSH_DEBUG_SV.push(l_module_name);
7951: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7952: END IF;
7953:
7954: IF l_debug_on THEN
7955: WSH_DEBUG_SV.push(l_module_name);
7956: END IF;
7957:
7958: x_curr_conv_type := NULL;
7959: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7960:
7961: -- no cached value, call fnd_profile.value
7962: IF G_CURRENCY_CONVERSION_TYPE IS NULL then
7963: IF l_debug_on THEN
7964: WSH_DEBUG_SV.logmsg(l_module_name, 'calling fnd_profile.value');
7965: END IF;
7966: G_CURRENCY_CONVERSION_TYPE := fnd_profile.value
7967: (name => 'WSH_OTM_CURR_CONV_TYPE');
7968: -- no value is defined for the profile option
7972: END IF;
7973: x_curr_conv_type := G_CURRENCY_CONVERSION_TYPE;
7974:
7975: IF l_debug_on THEN
7976: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
7977: WSH_DEBUG_SV.log(l_module_name, 'currency_conversion_type', x_curr_conv_type);
7978: WSH_DEBUG_SV.pop(l_module_name);
7979: END IF;
7980:
7973: x_curr_conv_type := G_CURRENCY_CONVERSION_TYPE;
7974:
7975: IF l_debug_on THEN
7976: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
7977: WSH_DEBUG_SV.log(l_module_name, 'currency_conversion_type', x_curr_conv_type);
7978: WSH_DEBUG_SV.pop(l_module_name);
7979: END IF;
7980:
7981: EXCEPTION
7974:
7975: IF l_debug_on THEN
7976: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
7977: WSH_DEBUG_SV.log(l_module_name, 'currency_conversion_type', x_curr_conv_type);
7978: WSH_DEBUG_SV.pop(l_module_name);
7979: END IF;
7980:
7981: EXCEPTION
7982: when CURR_CONV_TYPE_UNDEFINED_EXP then
7983: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
7984: fnd_message.set_name('WSH', 'WSH_CURR_CONV_TYPE_UNDEFINED');
7985: wsh_util_core.add_message(x_return_status);
7986: IF l_debug_on THEN
7987: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
7988: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH: Currency Conversion Type for OTM profile value is not defined.');
7989: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION');
7990: END IF;
7991:
7984: fnd_message.set_name('WSH', 'WSH_CURR_CONV_TYPE_UNDEFINED');
7985: wsh_util_core.add_message(x_return_status);
7986: IF l_debug_on THEN
7987: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
7988: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH: Currency Conversion Type for OTM profile value is not defined.');
7989: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION');
7990: END IF;
7991:
7992: when OTHERS then
7985: wsh_util_core.add_message(x_return_status);
7986: IF l_debug_on THEN
7987: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
7988: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH: Currency Conversion Type for OTM profile value is not defined.');
7989: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION');
7990: END IF;
7991:
7992: when OTHERS then
7993: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7993: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7994: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_UTIL_CORE.get_currency_conversion_type', l_module_name);
7995:
7996: IF l_debug_on THEN
7997: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
7998: WSH_DEBUG_SV.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7999: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:OTHERS');
8000: END IF;
8001: END Get_Currency_Conversion_Type;
7994: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_UTIL_CORE.get_currency_conversion_type', l_module_name);
7995:
7996: IF l_debug_on THEN
7997: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
7998: WSH_DEBUG_SV.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7999: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:OTHERS');
8000: END IF;
8001: END Get_Currency_Conversion_Type;
8002:
7995:
7996: IF l_debug_on THEN
7997: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
7998: WSH_DEBUG_SV.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7999: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:OTHERS');
8000: END IF;
8001: END Get_Currency_Conversion_Type;
8002:
8003: /* OTM - R12 - o/b BPEL */
8022: --{
8023:
8024: l_api_name CONSTANT VARCHAR2(30) := 'GET_TRIP_ORGANIZATION_ID';
8025: l_api_version CONSTANT NUMBER := 1.0;
8026: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
8027: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || l_api_name;
8028:
8029:
8030: l_first_stop_loc_id NUMBER;
8047: BEGIN
8048:
8049:
8050: IF l_debug_on THEN
8051: WSH_DEBUG_SV.push(l_module_name);
8052: END IF;
8053:
8054: l_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8055: l_number_of_warnings := 0;
8063: -- location, Org Id and the there by carrier site.
8064:
8065: IF l_debug_on
8066: THEN
8067: WSH_DEBUG_SV.logmsg(l_module_name,' Getting trip stop information ',
8068: WSH_DEBUG_SV.C_PROC_LEVEL);
8069: END IF;
8070:
8071: GET_FIRST_LAST_STOP_INFO(x_return_status => l_return_status,
8064:
8065: IF l_debug_on
8066: THEN
8067: WSH_DEBUG_SV.logmsg(l_module_name,' Getting trip stop information ',
8068: WSH_DEBUG_SV.C_PROC_LEVEL);
8069: END IF;
8070:
8071: GET_FIRST_LAST_STOP_INFO(x_return_status => l_return_status,
8072: x_arrival_date => l_arrival_date,
8115: END IF;
8116: EXCEPTION
8117: WHEN OTHERS THEN
8118: IF l_debug_on THEN
8119: WSH_DEBUG_SV.logmsg(l_module_name,'In WHEN OTHERS',WSH_DEBUG_SV.C_PROC_LEVEL);
8120: WSH_DEBUG_SV.logmsg(l_module_name,'Getting organization from the corresponding delivery',WSH_DEBUG_SV.C_PROC_LEVEL);
8121: END IF;
8122: -- Bug 6633529: Adding Rownum = 1 for Trips having more than 1 delivery for the same organization
8123: SELECT dlvy.ORGANIZATION_ID
8116: EXCEPTION
8117: WHEN OTHERS THEN
8118: IF l_debug_on THEN
8119: WSH_DEBUG_SV.logmsg(l_module_name,'In WHEN OTHERS',WSH_DEBUG_SV.C_PROC_LEVEL);
8120: WSH_DEBUG_SV.logmsg(l_module_name,'Getting organization from the corresponding delivery',WSH_DEBUG_SV.C_PROC_LEVEL);
8121: END IF;
8122: -- Bug 6633529: Adding Rownum = 1 for Trips having more than 1 delivery for the same organization
8123: SELECT dlvy.ORGANIZATION_ID
8124: INTO l_organization_id
8153: END IF;
8154:
8155:
8156: IF l_debug_on THEN
8157: WSH_DEBUG_SV.pop(l_module_name);
8158: END IF;
8159:
8160: return l_organization_id;
8161:
8163: EXCEPTION
8164: --{
8165: WHEN FND_API.G_EXC_ERROR THEN
8166: IF l_debug_on THEN
8167: WSH_DEBUG_SV.pop(l_module_name);
8168: END IF;
8169: return null;
8170:
8171: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8169: return null;
8170:
8171: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8172: IF l_debug_on THEN
8173: WSH_DEBUG_SV.pop(l_module_name);
8174: END IF;
8175: return null;
8176:
8177: WHEN OTHERS THEN
8175: return null;
8176:
8177: WHEN OTHERS THEN
8178: IF l_debug_on THEN
8179: WSH_DEBUG_SV.pop(l_module_name);
8180: END IF;
8181: return null;
8182:
8183: END GET_TRIP_ORGANIZATION_ID;
8240: --{
8241:
8242: l_api_name CONSTANT VARCHAR2(30) := 'GET_FIRST_LAST_STOP_INFO';
8243: l_api_version CONSTANT NUMBER := 1.0;
8244: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
8245: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || l_api_name;
8246:
8247: --l_stop_loc_id_tbl FTE_ID_TAB_TYPE; -- removed since is not used
8248: --l_stop_id_tbl FTE_ID_TAB_TYPE; -- removed since is not used
8253:
8254: BEGIN
8255:
8256: IF l_debug_on THEN
8257: WSH_DEBUG_SV.push(l_module_name);
8258: END IF;
8259:
8260: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8261:
8260: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8261:
8262: IF l_debug_on
8263: THEN
8264: WSH_DEBUG_SV.logmsg(l_module_name,' Getting trip stop information ',
8265: WSH_DEBUG_SV.C_PROC_LEVEL);
8266: END IF;
8267:
8268: l_idx := 0;
8261:
8262: IF l_debug_on
8263: THEN
8264: WSH_DEBUG_SV.logmsg(l_module_name,' Getting trip stop information ',
8265: WSH_DEBUG_SV.C_PROC_LEVEL);
8266: END IF;
8267:
8268: l_idx := 0;
8269:
8305: END LOOP;
8306: --
8307: IF l_debug_on
8308: THEN
8309: WSH_DEBUG_SV.logmsg(l_module_name,' First stop STOP_ID ' || x_first_stop_id,
8310: WSH_DEBUG_SV.C_PROC_LEVEL);
8311: WSH_DEBUG_SV.logmsg(l_module_name,' First stop Stop Loc Id ' || x_first_stop_loc_id,
8312: WSH_DEBUG_SV.C_PROC_LEVEL);
8313: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8306: --
8307: IF l_debug_on
8308: THEN
8309: WSH_DEBUG_SV.logmsg(l_module_name,' First stop STOP_ID ' || x_first_stop_id,
8310: WSH_DEBUG_SV.C_PROC_LEVEL);
8311: WSH_DEBUG_SV.logmsg(l_module_name,' First stop Stop Loc Id ' || x_first_stop_loc_id,
8312: WSH_DEBUG_SV.C_PROC_LEVEL);
8313: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8314: WSH_DEBUG_SV.C_PROC_LEVEL);
8307: IF l_debug_on
8308: THEN
8309: WSH_DEBUG_SV.logmsg(l_module_name,' First stop STOP_ID ' || x_first_stop_id,
8310: WSH_DEBUG_SV.C_PROC_LEVEL);
8311: WSH_DEBUG_SV.logmsg(l_module_name,' First stop Stop Loc Id ' || x_first_stop_loc_id,
8312: WSH_DEBUG_SV.C_PROC_LEVEL);
8313: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8314: WSH_DEBUG_SV.C_PROC_LEVEL);
8315: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8308: THEN
8309: WSH_DEBUG_SV.logmsg(l_module_name,' First stop STOP_ID ' || x_first_stop_id,
8310: WSH_DEBUG_SV.C_PROC_LEVEL);
8311: WSH_DEBUG_SV.logmsg(l_module_name,' First stop Stop Loc Id ' || x_first_stop_loc_id,
8312: WSH_DEBUG_SV.C_PROC_LEVEL);
8313: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8314: WSH_DEBUG_SV.C_PROC_LEVEL);
8315: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8316: WSH_DEBUG_SV.C_PROC_LEVEL);
8309: WSH_DEBUG_SV.logmsg(l_module_name,' First stop STOP_ID ' || x_first_stop_id,
8310: WSH_DEBUG_SV.C_PROC_LEVEL);
8311: WSH_DEBUG_SV.logmsg(l_module_name,' First stop Stop Loc Id ' || x_first_stop_loc_id,
8312: WSH_DEBUG_SV.C_PROC_LEVEL);
8313: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8314: WSH_DEBUG_SV.C_PROC_LEVEL);
8315: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8316: WSH_DEBUG_SV.C_PROC_LEVEL);
8317: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop Stop loc id ' || x_last_stop_loc_id,
8310: WSH_DEBUG_SV.C_PROC_LEVEL);
8311: WSH_DEBUG_SV.logmsg(l_module_name,' First stop Stop Loc Id ' || x_first_stop_loc_id,
8312: WSH_DEBUG_SV.C_PROC_LEVEL);
8313: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8314: WSH_DEBUG_SV.C_PROC_LEVEL);
8315: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8316: WSH_DEBUG_SV.C_PROC_LEVEL);
8317: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop Stop loc id ' || x_last_stop_loc_id,
8318: WSH_DEBUG_SV.C_PROC_LEVEL);
8311: WSH_DEBUG_SV.logmsg(l_module_name,' First stop Stop Loc Id ' || x_first_stop_loc_id,
8312: WSH_DEBUG_SV.C_PROC_LEVEL);
8313: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8314: WSH_DEBUG_SV.C_PROC_LEVEL);
8315: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8316: WSH_DEBUG_SV.C_PROC_LEVEL);
8317: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop Stop loc id ' || x_last_stop_loc_id,
8318: WSH_DEBUG_SV.C_PROC_LEVEL);
8319: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop arrival date ' || x_arrival_date,
8312: WSH_DEBUG_SV.C_PROC_LEVEL);
8313: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8314: WSH_DEBUG_SV.C_PROC_LEVEL);
8315: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8316: WSH_DEBUG_SV.C_PROC_LEVEL);
8317: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop Stop loc id ' || x_last_stop_loc_id,
8318: WSH_DEBUG_SV.C_PROC_LEVEL);
8319: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop arrival date ' || x_arrival_date,
8320: WSH_DEBUG_SV.C_PROC_LEVEL);
8313: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8314: WSH_DEBUG_SV.C_PROC_LEVEL);
8315: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8316: WSH_DEBUG_SV.C_PROC_LEVEL);
8317: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop Stop loc id ' || x_last_stop_loc_id,
8318: WSH_DEBUG_SV.C_PROC_LEVEL);
8319: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop arrival date ' || x_arrival_date,
8320: WSH_DEBUG_SV.C_PROC_LEVEL);
8321: END IF;
8314: WSH_DEBUG_SV.C_PROC_LEVEL);
8315: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8316: WSH_DEBUG_SV.C_PROC_LEVEL);
8317: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop Stop loc id ' || x_last_stop_loc_id,
8318: WSH_DEBUG_SV.C_PROC_LEVEL);
8319: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop arrival date ' || x_arrival_date,
8320: WSH_DEBUG_SV.C_PROC_LEVEL);
8321: END IF;
8322:
8315: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8316: WSH_DEBUG_SV.C_PROC_LEVEL);
8317: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop Stop loc id ' || x_last_stop_loc_id,
8318: WSH_DEBUG_SV.C_PROC_LEVEL);
8319: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop arrival date ' || x_arrival_date,
8320: WSH_DEBUG_SV.C_PROC_LEVEL);
8321: END IF;
8322:
8323:
8316: WSH_DEBUG_SV.C_PROC_LEVEL);
8317: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop Stop loc id ' || x_last_stop_loc_id,
8318: WSH_DEBUG_SV.C_PROC_LEVEL);
8319: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop arrival date ' || x_arrival_date,
8320: WSH_DEBUG_SV.C_PROC_LEVEL);
8321: END IF;
8322:
8323:
8324:
8331: CLOSE GET_TRIP_STOPS_DROP;
8332: END IF;
8333:
8334: IF l_debug_on THEN
8335: WSH_DEBUG_SV.pop(l_module_name);
8336: END IF;
8337:
8338: --}
8339: EXCEPTION
8340: --{
8341: WHEN FND_API.G_EXC_ERROR THEN
8342: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8343: IF l_debug_on THEN
8344: WSH_DEBUG_SV.pop(l_module_name);
8345: END IF;
8346:
8347: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8348: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8346:
8347: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8348: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8349: IF l_debug_on THEN
8350: WSH_DEBUG_SV.pop(l_module_name);
8351: END IF;
8352: WHEN OTHERS THEN
8353: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8354:
8361: CLOSE GET_TRIP_STOPS_DROP;
8362: END IF;
8363:
8364: IF l_debug_on THEN
8365: WSH_DEBUG_SV.pop(l_module_name);
8366: END IF;
8367:
8368: END GET_FIRST_LAST_STOP_INFO;
8369: