[Home] [Help]
131: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
132: --
133: IF l_debug_on IS NULL
134: THEN
135: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
136: END IF;
137: --
138: IF l_debug_on THEN
139: WSH_DEBUG_SV.push(l_module_name);
135: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
136: END IF;
137: --
138: IF l_debug_on THEN
139: WSH_DEBUG_SV.push(l_module_name);
140: --
141: WSH_DEBUG_SV.log(l_module_name,'P_LOCATION_ID',P_LOCATION_ID);
142: WSH_DEBUG_SV.log(l_module_name,'P_FORMAT',P_FORMAT);
143: END IF;
137: --
138: IF l_debug_on THEN
139: WSH_DEBUG_SV.push(l_module_name);
140: --
141: WSH_DEBUG_SV.log(l_module_name,'P_LOCATION_ID',P_LOCATION_ID);
142: WSH_DEBUG_SV.log(l_module_name,'P_FORMAT',P_FORMAT);
143: END IF;
144: --
145: IF p_location_id IS NULL THEN
138: IF l_debug_on THEN
139: WSH_DEBUG_SV.push(l_module_name);
140: --
141: WSH_DEBUG_SV.log(l_module_name,'P_LOCATION_ID',P_LOCATION_ID);
142: WSH_DEBUG_SV.log(l_module_name,'P_FORMAT',P_FORMAT);
143: END IF;
144: --
145: IF p_location_id IS NULL THEN
146: --
144: --
145: IF p_location_id IS NULL THEN
146: --
147: IF l_debug_on THEN
148: WSH_DEBUG_SV.pop(l_module_name);
149: END IF;
150: --
151: RETURN NULL;
152: END IF;
173: IF Loc_Info_Cur%ISOPEN THEN
174: CLOSE Loc_Info_Cur;
175: END IF;
176: IF l_debug_on THEN
177: WSH_DEBUG_SV.log(l_module_name,'Loc_Info_Cur%NOTFOUND');
178: WSH_DEBUG_SV.pop(l_module_name);
179: END IF;
180: --
181: RETURN NULL;
174: CLOSE Loc_Info_Cur;
175: END IF;
176: IF l_debug_on THEN
177: WSH_DEBUG_SV.log(l_module_name,'Loc_Info_Cur%NOTFOUND');
178: WSH_DEBUG_SV.pop(l_module_name);
179: END IF;
180: --
181: RETURN NULL;
182: END IF;
196: FETCH c_hr_locs INTO g_loc_desc_Tab(l_counter).hr_location_code;
197: IF c_hr_locs%NOTFOUND THEN
198: CLOSE c_hr_locs;
199: IF l_debug_on THEN
200: WSH_DEBUG_SV.log(l_module_name,'c_hr_locs%NOTFOUND');
201: END IF;
202: END IF;
203: CLOSE c_hr_locs;
204: END IF;
203: CLOSE c_hr_locs;
204: END IF;
205: l_loc_string := g_loc_desc_Tab(l_counter).hr_location_code;
206: IF l_debug_on THEN
207: WSH_DEBUG_SV.log(l_module_name,'hr_location_code',l_loc_string);
208: END IF;
209: END IF;
210:
211: ELSIF p_format = 'NEW UI CODE' THEN
238: FND_MESSAGE.Set_Token('PARAMETER',p_format);
239: wsh_util_core.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR,
240: l_module_name);
241: IF l_debug_on THEN
242: WSH_DEBUG_SV.pop(l_module_name);
243: END IF;
244: RAISE FND_API.G_EXC_ERROR;
245: /*
246: l_loc_string := 'WRONG'|| g_loc_desc_Tab(l_counter).location_code;
251: END IF;
252:
253: --
254: IF l_debug_on THEN
255: WSH_DEBUG_SV.pop(l_module_name);
256: END IF;
257: --
258: RETURN l_loc_string;
259:
259:
260: EXCEPTION
261: WHEN others THEN
262: IF l_debug_on THEN
263: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
264: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
265: raise;
266: END IF;
267:
260: EXCEPTION
261: WHEN others THEN
262: IF l_debug_on THEN
263: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
264: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
265: raise;
266: END IF;
267:
268: END Get_Location_Description;
297: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
298: --
299: IF l_debug_on IS NULL
300: THEN
301: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
302: END IF;
303: --
304: IF l_debug_on THEN
305: WSH_DEBUG_SV.push(l_module_name);
301: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
302: END IF;
303: --
304: IF l_debug_on THEN
305: WSH_DEBUG_SV.push(l_module_name);
306: --
307: WSH_DEBUG_SV.log(l_module_name,'P_SITE_CODE',P_SITE_CODE);
308: END IF;
309: --
303: --
304: IF l_debug_on THEN
305: WSH_DEBUG_SV.push(l_module_name);
306: --
307: WSH_DEBUG_SV.log(l_module_name,'P_SITE_CODE',P_SITE_CODE);
308: END IF;
309: --
310: p_site_id := NULL;
311: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
325: --
326: -- Debug Statements
327: --
328: IF l_debug_on THEN
329: WSH_DEBUG_SV.pop(l_module_name);
330: END IF;
331: --
332: Exception
333: when others then
340: --
341: -- Debug Statements
342: --
343: IF l_debug_on THEN
344: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
345: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
346: END IF;
347: --
348: END Site_Code_to_Site_id;
341: -- Debug Statements
342: --
343: IF l_debug_on THEN
344: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
345: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
346: END IF;
347: --
348: END Site_Code_to_Site_id;
349:
409: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
410: --
411: IF l_debug_on IS NULL
412: THEN
413: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
414: END IF;
415: --
416: IF l_debug_on THEN
417: WSH_DEBUG_SV.push(l_module_name);
413: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
414: END IF;
415: --
416: IF l_debug_on THEN
417: WSH_DEBUG_SV.push(l_module_name);
418: --
419: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
420: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_ID',P_SOURCE_ID);
421: WSH_DEBUG_SV.log(l_module_name,'p_transfer_location',p_transfer_location);
415: --
416: IF l_debug_on THEN
417: WSH_DEBUG_SV.push(l_module_name);
418: --
419: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
420: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_ID',P_SOURCE_ID);
421: WSH_DEBUG_SV.log(l_module_name,'p_transfer_location',p_transfer_location);
422: END IF;
423: --
416: IF l_debug_on THEN
417: WSH_DEBUG_SV.push(l_module_name);
418: --
419: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
420: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_ID',P_SOURCE_ID);
421: WSH_DEBUG_SV.log(l_module_name,'p_transfer_location',p_transfer_location);
422: END IF;
423: --
424: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
417: WSH_DEBUG_SV.push(l_module_name);
418: --
419: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
420: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_ID',P_SOURCE_ID);
421: WSH_DEBUG_SV.log(l_module_name,'p_transfer_location',p_transfer_location);
422: END IF;
423: --
424: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
425:
440: INTO l_location_id;
441: CLOSE org_to_loc;
442:
443: IF l_debug_on THEN
444: WSH_DEBUG_SV.log(l_module_name,'l_location_id',l_location_id);
445: END IF;
446:
447: IF (l_location_id IS NULL) THEN
448: --Bug 4891887 and 4891881 If call is made from Constraints then ignore the warning
456: x_location_id :=l_location_id;
457: END IF;
458: --
459: IF l_debug_on THEN
460: WSH_DEBUG_SV.pop(l_module_name);
461: END IF;
462: --
463: RETURN;
464: ELSE
463: RETURN;
464: ELSE
465:
466: IF l_debug_on THEN
467: WSH_DEBUG_SV.log(l_module_name,'Calling Transfer_Location');
468: END IF;
469:
470: WSH_MAP_LOCATION_REGION_PKG.Transfer_Location(
471: p_source_type => 'HR',
475: x_loc_rec => l_loc_rec,
476: x_return_status => l_return_status
477: );
478: IF l_debug_on THEN
479: WSH_DEBUG_SV.log(l_module_name,'Transfer_Location returns ',
480: l_return_status);
481: WSH_DEBUG_SV.log(l_module_name,'location_id returned ',
482: l_loc_rec.wsh_location_id);
483: END IF;
477: );
478: IF l_debug_on THEN
479: WSH_DEBUG_SV.log(l_module_name,'Transfer_Location returns ',
480: l_return_status);
481: WSH_DEBUG_SV.log(l_module_name,'location_id returned ',
482: l_loc_rec.wsh_location_id);
483: END IF;
484: wsh_util_core.api_post_call(
485: p_return_status => l_return_status,
486: x_num_warnings => l_num_warnings,
487: x_num_errors => l_num_errors);
488:
489: IF l_debug_on THEN
490: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
491: END IF;
492:
493: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS)
494: OR (l_loc_rec.WSH_LOCATION_ID IS NULL) THEN
520: CLOSE site_to_loc;
521: END IF;
522: --
523: IF l_debug_on THEN
524: WSH_DEBUG_SV.pop(l_module_name);
525: END IF;
526: --
527: RETURN;
528: ELSE
526: --
527: RETURN;
528: ELSE
529: IF l_debug_on THEN
530: WSH_DEBUG_SV.log(l_module_name,'Calling Transfer_Location');
531: END IF;
532:
533: WSH_MAP_LOCATION_REGION_PKG.Transfer_Location(
534: p_source_type => 'HZ',
543: x_num_warnings => l_num_warnings,
544: x_num_errors => l_num_errors);
545:
546: IF l_debug_on THEN
547: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
548: END IF;
549:
550: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS )
551: OR (l_loc_rec.WSH_LOCATION_ID IS NULL) THEN
561: ELSIF p_mode = 'VENDOR SITE' THEN
562: x_location_id := p_source_id;
563: --
564: IF l_debug_on THEN
565: WSH_DEBUG_SV.pop(l_module_name);
566: END IF;
567: --
568: RETURN;
569: ELSE
570: FND_MESSAGE.Set_Name('WSH','WSH_API_INVALID_PARAM_VALUE');
571: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
572: --
573: IF l_debug_on THEN
574: WSH_DEBUG_SV.pop(l_module_name);
575: END IF;
576: --
577: RETURN;
578: END IF;
577: RETURN;
578: END IF;
579:
580: IF l_debug_on THEN
581: WSH_DEBUG_SV.pop(l_module_name);
582: END IF;
583: --
584: EXCEPTION
585: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
587: fnd_message.set_name('WSH','WSH_XC_INVALID_LOCATION');
588: wsh_util_core.add_message(x_api_status,l_module_name);
589: --
590: IF l_debug_on THEN
591: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:G_RET_STS_WARNING');
592: END IF;
593: --
594: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
595: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
594: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
595: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
596: --
597: IF l_debug_on THEN
598: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:G_EXC_UNEXPECTED_ERROR');
599: END IF;
600: --
601: WHEN FND_API.G_EXC_ERROR THEN
602: IF (NOT p_transfer_location)
606: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
607: END IF;
608: --
609: IF l_debug_on THEN
610: WSH_DEBUG_SV.log(l_module_name,'x_api_status ',x_api_status);
611: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:G_EXC_ERROR');
612: END IF;
613: --
614: WHEN OTHERS THEN
607: END IF;
608: --
609: IF l_debug_on THEN
610: WSH_DEBUG_SV.log(l_module_name,'x_api_status ',x_api_status);
611: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:G_EXC_ERROR');
612: END IF;
613: --
614: WHEN OTHERS THEN
615: WSH_FTE_CONSTRAINT_FRAMEWORK.G_CALLING_API :=NULL;
623: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
624:
625: --
626: IF l_debug_on THEN
627: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
628: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
629: END IF;
630: --
631: END Get_Location_Id;
624:
625: --
626: IF l_debug_on THEN
627: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
628: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
629: END IF;
630: --
631: END Get_Location_Id;
632:
654: WHERE organization_id = c_org_id;
655:
656: org_not_found EXCEPTION;
657:
658: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
659: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'get_master_from_org';
660:
661: BEGIN
662:
663: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
664:
665: --
666: IF l_debug_on THEN
667: WSH_DEBUG_SV.push(l_module_name);
668: END IF;
669: --
670:
671: IF g_master_org_tab.EXISTS(p_org_id) THEN
687: END IF;
688:
689: --
690: IF l_debug_on THEN
691: WSH_DEBUG_SV.pop(l_module_name);
692: END IF;
693: --
694:
695: EXCEPTION
696: WHEN org_not_found THEN
697: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
698: --
699: IF l_debug_on THEN
700: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:org in mtl_parameters not found');
701: END IF;
702: --
703: WHEN others THEN
704: IF c_get_master_from_org%ISOPEN THEN
707: WSH_UTIL_CORE.default_handler('WSH_UTIL_CORE.get_master_from_org');
708: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
709: --
710: IF l_debug_on THEN
711: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
712: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
713: END IF;
714: --
715:
708: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
709: --
710: IF l_debug_on THEN
711: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
712: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
713: END IF;
714: --
715:
716: END get_master_from_org;
742: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
743: --
744: IF l_debug_on IS NULL
745: THEN
746: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
747: END IF;
748: --
749: IF l_debug_on THEN
750: WSH_DEBUG_SV.push(l_module_name);
746: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
747: END IF;
748: --
749: IF l_debug_on THEN
750: WSH_DEBUG_SV.push(l_module_name);
751: --
752: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
753: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
754: END IF;
748: --
749: IF l_debug_on THEN
750: WSH_DEBUG_SV.push(l_module_name);
751: --
752: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
753: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
754: END IF;
755: --
756: l_location_id := -1;
749: IF l_debug_on THEN
750: WSH_DEBUG_SV.push(l_module_name);
751: --
752: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
753: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
754: END IF;
755: --
756: l_location_id := -1;
757:
773: --
774: -- Debug Statements
775: --
776: IF l_debug_on THEN
777: WSH_DEBUG_SV.log(l_module_name,'LOCATION ID',l_location_id);
778: WSH_DEBUG_SV.pop(l_module_name);
779: END IF;
780: --
781: RETURN l_location_id;
774: -- Debug Statements
775: --
776: IF l_debug_on THEN
777: WSH_DEBUG_SV.log(l_module_name,'LOCATION ID',l_location_id);
778: WSH_DEBUG_SV.pop(l_module_name);
779: END IF;
780: --
781: RETURN l_location_id;
782:
811: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
812: --
813: IF l_debug_on IS NULL
814: THEN
815: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
816: END IF;
817: --
818: IF l_debug_on THEN
819: WSH_DEBUG_SV.push(l_module_name);
815: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
816: END IF;
817: --
818: IF l_debug_on THEN
819: WSH_DEBUG_SV.push(l_module_name);
820: --
821: WSH_DEBUG_SV.log(l_module_name,'P_SITE_ID',P_SITE_ID);
822: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
823: END IF;
817: --
818: IF l_debug_on THEN
819: WSH_DEBUG_SV.push(l_module_name);
820: --
821: WSH_DEBUG_SV.log(l_module_name,'P_SITE_ID',P_SITE_ID);
822: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
823: END IF;
824: --
825: l_location_id := -1;
818: IF l_debug_on THEN
819: WSH_DEBUG_SV.push(l_module_name);
820: --
821: WSH_DEBUG_SV.log(l_module_name,'P_SITE_ID',P_SITE_ID);
822: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
823: END IF;
824: --
825: l_location_id := -1;
826:
842: --
843: -- Debug Statements
844: --
845: IF l_debug_on THEN
846: WSH_DEBUG_SV.log(l_module_name,'LOCATION ID',l_location_id);
847: WSH_DEBUG_SV.pop(l_module_name);
848: END IF;
849: --
850: RETURN l_location_id;
843: -- Debug Statements
844: --
845: IF l_debug_on THEN
846: WSH_DEBUG_SV.log(l_module_name,'LOCATION ID',l_location_id);
847: WSH_DEBUG_SV.pop(l_module_name);
848: END IF;
849: --
850: RETURN l_location_id;
851:
879: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
880: --
881: IF l_debug_on IS NULL
882: THEN
883: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
884: END IF;
885: --
886: IF l_debug_on THEN
887: WSH_DEBUG_SV.push(l_module_name);
883: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
884: END IF;
885: --
886: IF l_debug_on THEN
887: WSH_DEBUG_SV.push(l_module_name);
888: --
889: WSH_DEBUG_SV.log(l_module_name,'P_SITE_ID',P_SITE_ID);
890: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
891: END IF;
885: --
886: IF l_debug_on THEN
887: WSH_DEBUG_SV.push(l_module_name);
888: --
889: WSH_DEBUG_SV.log(l_module_name,'P_SITE_ID',P_SITE_ID);
890: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
891: END IF;
892: --
893: l_location_id := -1;
886: IF l_debug_on THEN
887: WSH_DEBUG_SV.push(l_module_name);
888: --
889: WSH_DEBUG_SV.log(l_module_name,'P_SITE_ID',P_SITE_ID);
890: WSH_DEBUG_SV.logmsg(l_module_name,'Call Get_Location_id');
891: END IF;
892: --
893: l_location_id := -1;
894:
910: --
911: -- Debug Statements
912: --
913: IF l_debug_on THEN
914: WSH_DEBUG_SV.log(l_module_name,'LOCATION ID',l_location_id);
915: WSH_DEBUG_SV.pop(l_module_name);
916: END IF;
917: --
918: RETURN l_location_id;
911: -- Debug Statements
912: --
913: IF l_debug_on THEN
914: WSH_DEBUG_SV.log(l_module_name,'LOCATION ID',l_location_id);
915: WSH_DEBUG_SV.pop(l_module_name);
916: END IF;
917: --
918: RETURN l_location_id;
919:
966: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
967: --
968: IF l_debug_on IS NULL
969: THEN
970: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
971: END IF;
972: --
973: IF l_debug_on THEN
974: WSH_DEBUG_SV.push(l_module_name);
970: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
971: END IF;
972: --
973: IF l_debug_on THEN
974: WSH_DEBUG_SV.push(l_module_name);
975: --
976: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD_CODE',P_SHIP_METHOD_CODE);
977: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
978: END IF;
972: --
973: IF l_debug_on THEN
974: WSH_DEBUG_SV.push(l_module_name);
975: --
976: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD_CODE',P_SHIP_METHOD_CODE);
977: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
978: END IF;
979: --
980: IF (p_ship_method_code IS NULL) THEN
973: IF l_debug_on THEN
974: WSH_DEBUG_SV.push(l_module_name);
975: --
976: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_METHOD_CODE',P_SHIP_METHOD_CODE);
977: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
978: END IF;
979: --
980: IF (p_ship_method_code IS NULL) THEN
981: --
981: --
982: -- Debug Statements
983: --
984: IF l_debug_on THEN
985: WSH_DEBUG_SV.pop(l_module_name);
986: END IF;
987: --
988: RETURN NULL;
989: END IF;
1003: --
1004: -- Debug Statements
1005: --
1006: IF l_debug_on THEN
1007: WSH_DEBUG_SV.pop(l_module_name);
1008: END IF;
1009: --
1010: RETURN l_freight_code;
1011:
1036: --l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1037: --
1038: --IF l_debug_on IS NULL
1039: --THEN
1040: --l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1041: --END IF;
1042: --
1043: G_ALLOW_PRINT := 'Y';
1044:
1071: --l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1072: --
1073: --IF l_debug_on IS NULL
1074: --THEN
1075: --l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1076: --END IF;
1077: --
1078: --IF l_debug_on THEN
1079: --WSH_DEBUG_SV.push(l_module_name);
1075: --l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1076: --END IF;
1077: --
1078: --IF l_debug_on THEN
1079: --WSH_DEBUG_SV.push(l_module_name);
1080: --
1081: --WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
1082: --END IF;
1083: --
1077: --
1078: --IF l_debug_on THEN
1079: --WSH_DEBUG_SV.push(l_module_name);
1080: --
1081: --WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
1082: --END IF;
1083: --
1084: --
1085: -- Added to turn on/off the WSH debugger depending on log level
1088: IF p_log_level > 0
1089: THEN
1090: --fnd_profile.put('WSH_DEBUG_MODE','T');
1091: fnd_profile.put('WSH_DEBUG_MODULE','%');
1092: fnd_profile.put('WSH_DEBUG_LEVEL',WSH_DEBUG_SV.C_STMT_LEVEL);
1093: wsh_debug_sv.start_debugger(l_file_name,l_return_status,l_msg_count,l_msg_data);
1094: --wsh_debug_sv.start_debugger(l_file_name,l_return_status,l_msg_data,l_msg_count);
1095: -- Ignore errors;
1096: ELSE
1089: THEN
1090: --fnd_profile.put('WSH_DEBUG_MODE','T');
1091: fnd_profile.put('WSH_DEBUG_MODULE','%');
1092: fnd_profile.put('WSH_DEBUG_LEVEL',WSH_DEBUG_SV.C_STMT_LEVEL);
1093: wsh_debug_sv.start_debugger(l_file_name,l_return_status,l_msg_count,l_msg_data);
1094: --wsh_debug_sv.start_debugger(l_file_name,l_return_status,l_msg_data,l_msg_count);
1095: -- Ignore errors;
1096: ELSE
1097: --fnd_profile.put('WSH_DEBUG_MODE','F');
1090: --fnd_profile.put('WSH_DEBUG_MODE','T');
1091: fnd_profile.put('WSH_DEBUG_MODULE','%');
1092: fnd_profile.put('WSH_DEBUG_LEVEL',WSH_DEBUG_SV.C_STMT_LEVEL);
1093: wsh_debug_sv.start_debugger(l_file_name,l_return_status,l_msg_count,l_msg_data);
1094: --wsh_debug_sv.start_debugger(l_file_name,l_return_status,l_msg_data,l_msg_count);
1095: -- Ignore errors;
1096: ELSE
1097: --fnd_profile.put('WSH_DEBUG_MODE','F');
1098: wsh_debug_sv.stop_debugger;
1094: --wsh_debug_sv.start_debugger(l_file_name,l_return_status,l_msg_data,l_msg_count);
1095: -- Ignore errors;
1096: ELSE
1097: --fnd_profile.put('WSH_DEBUG_MODE','F');
1098: wsh_debug_sv.stop_debugger;
1099: END IF;
1100: EXCEPTION
1101: WHEN OTHERS THEN
1102: NULL;
1106: --
1107: -- Debug Statements
1108: --
1109: --IF l_debug_on THEN
1110: --WSH_DEBUG_SV.pop(l_module_name);
1111: --END IF;
1112: --
1113: END Set_Log_Level;
1114:
1137: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1138: --
1139: IF l_debug_on IS NULL
1140: THEN
1141: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1142: END IF;
1143: --
1144: IF G_ALLOW_PRINT = 'Y' AND G_LOG_LEVEL > 0 THEN
1145: IF LENGTH(p_msg) > G_MAX_LENGTH THEN
1189: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1190: --
1191: IF l_debug_on IS NULL
1192: THEN
1193: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1194: END IF;
1195: --
1196: IF G_ALLOW_PRINT = 'Y' AND G_LOG_LEVEL > 0 THEN
1197: IF LENGTH(p_msg) > G_MAX_LENGTH THEN
1232: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1233: --
1234: IF l_debug_on IS NULL
1235: THEN
1236: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1237: END IF;
1238: --
1239: IF G_ALLOW_PRINT = 'Y' AND G_LOG_LEVEL > 0 THEN
1240: fnd_file.new_line(FND_FILE.LOG);
1270: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1271: --
1272: IF l_debug_on IS NULL
1273: THEN
1274: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1275: END IF;
1276: --
1277: IF G_ALLOW_PRINT = 'Y'THEN
1278: IF LENGTH(p_msg) > G_MAX_LENGTH THEN
1313: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1314: --
1315: IF l_debug_on IS NULL
1316: THEN
1317: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1318: END IF;
1319: --
1320: IF G_ALLOW_PRINT = 'Y' THEN
1321: fnd_file.new_line(FND_FILE.LOG);
1344: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1345: --
1346: IF l_debug_on IS NULL
1347: THEN
1348: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1349: END IF;
1350: --
1351: SELECT SYSDATE INTO l_date_time FROM dual;
1352: Println('Current Time: ' || to_char(l_date_time, 'DD-MON-YYYY HH24:MI:SS'));
1433: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1434: --
1435: IF l_debug_on IS NULL
1436: THEN
1437: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1438: END IF;
1439: --
1440: IF l_debug_on THEN
1441: WSH_DEBUG_SV.push(l_module_name);
1437: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1438: END IF;
1439: --
1440: IF l_debug_on THEN
1441: WSH_DEBUG_SV.push(l_module_name);
1442: --
1443: WSH_DEBUG_SV.log(l_module_name,'PROD_NAME',P_PROD_NAME);
1444: WSH_DEBUG_SV.log(l_module_name,'MSG_NAME',P_MSG_NAME);
1445: END IF;
1439: --
1440: IF l_debug_on THEN
1441: WSH_DEBUG_SV.push(l_module_name);
1442: --
1443: WSH_DEBUG_SV.log(l_module_name,'PROD_NAME',P_PROD_NAME);
1444: WSH_DEBUG_SV.log(l_module_name,'MSG_NAME',P_MSG_NAME);
1445: END IF;
1446:
1447: query_string := 'SELECT '||p_pkey1||' FROM '||p_table_name||' WHERE ';
1440: IF l_debug_on THEN
1441: WSH_DEBUG_SV.push(l_module_name);
1442: --
1443: WSH_DEBUG_SV.log(l_module_name,'PROD_NAME',P_PROD_NAME);
1444: WSH_DEBUG_SV.log(l_module_name,'MSG_NAME',P_MSG_NAME);
1445: END IF;
1446:
1447: query_string := 'SELECT '||p_pkey1||' FROM '||p_table_name||' WHERE ';
1448: query_param := query_string;
1521: END IF;
1522:
1523: --
1524: IF l_debug_on THEN
1525: WSH_DEBUG_SV.log(l_module_name,'query_string',query_string);
1526: END IF;
1527:
1528: rec_cursor := dbms_sql.open_cursor;
1529: dbms_sql.parse(rec_cursor,query_string,dbms_sql.v7);
1597: --
1598: -- Debug Statements
1599: --
1600: IF l_debug_on THEN
1601: WSH_DEBUG_SV.pop(l_module_name);
1602: END IF;
1603: --
1604: END;
1605:
1628: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1629: --
1630: IF l_debug_on IS NULL
1631: THEN
1632: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1633: END IF;
1634: --
1635: query_text := 'SELECT '|| P_COLUMN_NAME || ' FROM ' ||
1636: P_TABLE_NAME || ' WHERE ROWID = :x_row_id';
1634: --
1635: query_text := 'SELECT '|| P_COLUMN_NAME || ' FROM ' ||
1636: P_TABLE_NAME || ' WHERE ROWID = :x_row_id';
1637: IF l_debug_on THEN
1638: WSH_DEBUG_SV.push(l_module_name);
1639: --
1640: WSH_DEBUG_SV.log(l_module_name,'QUERY_TEXT',QUERY_TEXT);
1641: END IF;
1642:
1636: P_TABLE_NAME || ' WHERE ROWID = :x_row_id';
1637: IF l_debug_on THEN
1638: WSH_DEBUG_SV.push(l_module_name);
1639: --
1640: WSH_DEBUG_SV.log(l_module_name,'QUERY_TEXT',QUERY_TEXT);
1641: END IF;
1642:
1643: --
1644: rec_cursor := dbms_sql.open_cursor;
1661: --
1662: -- Debug Statements
1663: --
1664: IF l_debug_on THEN
1665: WSH_DEBUG_SV.pop(l_module_name);
1666: END IF;
1667: --
1668: EXCEPTION
1669: WHEN OTHERS THEN
1676: --
1677: -- Debug Statements
1678: --
1679: IF l_debug_on THEN
1680: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1681: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1682: END IF;
1683: --
1684: END Get_Active_Date;
1677: -- Debug Statements
1678: --
1679: IF l_debug_on THEN
1680: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1681: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1682: END IF;
1683: --
1684: END Get_Active_Date;
1685:
1702: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1703: --
1704: IF l_debug_on IS NULL
1705: THEN
1706: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1707: END IF;
1708: --
1709: IF l_debug_on THEN
1710: WSH_DEBUG_SV.push(l_module_name);
1706: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1707: END IF;
1708: --
1709: IF l_debug_on THEN
1710: WSH_DEBUG_SV.push(l_module_name);
1711: --
1712: WSH_DEBUG_SV.log(l_module_name,'QUERY_TEXT',QUERY_TEXT);
1713: END IF;
1714: --
1708: --
1709: IF l_debug_on THEN
1710: WSH_DEBUG_SV.push(l_module_name);
1711: --
1712: WSH_DEBUG_SV.log(l_module_name,'QUERY_TEXT',QUERY_TEXT);
1713: END IF;
1714: --
1715: rec_cursor := dbms_sql.open_cursor;
1716: dbms_sql.parse(rec_cursor,query_text,dbms_sql.v7);
1730: --
1731: -- Debug Statements
1732: --
1733: IF l_debug_on THEN
1734: WSH_DEBUG_SV.pop(l_module_name);
1735: END IF;
1736: --
1737: EXCEPTION
1738: WHEN OTHERS THEN
1745: --
1746: -- Debug Statements
1747: --
1748: IF l_debug_on THEN
1749: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1750: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1751: END IF;
1752: --
1753: END Get_Active_Date;
1746: -- Debug Statements
1747: --
1748: IF l_debug_on THEN
1749: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1750: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1751: END IF;
1752: --
1753: END Get_Active_Date;
1754:
1781: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1782: --
1783: IF l_debug_on IS NULL
1784: THEN
1785: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1786: END IF;
1787: --
1788: IF l_debug_on THEN
1789: WSH_DEBUG_SV.push(l_module_name);
1785: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1786: END IF;
1787: --
1788: IF l_debug_on THEN
1789: WSH_DEBUG_SV.push(l_module_name);
1790: --
1791: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1792: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1793: END IF;
1787: --
1788: IF l_debug_on THEN
1789: WSH_DEBUG_SV.push(l_module_name);
1790: --
1791: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1792: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1793: END IF;
1794: --
1795: IF (p_message_type = 'E') THEN
1788: IF l_debug_on THEN
1789: WSH_DEBUG_SV.push(l_module_name);
1790: --
1791: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1792: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1793: END IF;
1794: --
1795: IF (p_message_type = 'E') THEN
1796: l_message_type := 'E';
1793: END IF;
1794: --
1795: IF (p_message_type = 'E') THEN
1796: l_message_type := 'E';
1797: l_exception_level := WSH_DEBUG_SV.C_ERR_LEVEL;
1798: ELSIF (p_message_type = 'U') THEN
1799: l_message_type := 'U';
1800: l_exception_level := WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL;
1801: ELSIF (p_message_type = 'W') THEN
1796: l_message_type := 'E';
1797: l_exception_level := WSH_DEBUG_SV.C_ERR_LEVEL;
1798: ELSIF (p_message_type = 'U') THEN
1799: l_message_type := 'U';
1800: l_exception_level := WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL;
1801: ELSIF (p_message_type = 'W') THEN
1802: l_message_type := 'W';
1803: l_exception_level := WSH_DEBUG_SV.C_ERR_LEVEL;
1804: END IF;
1799: l_message_type := 'U';
1800: l_exception_level := WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL;
1801: ELSIF (p_message_type = 'W') THEN
1802: l_message_type := 'W';
1803: l_exception_level := WSH_DEBUG_SV.C_ERR_LEVEL;
1804: END IF;
1805:
1806: --IF WSH_UTIL_CORE.G_STORE_MSG_IN_TABLE = FALSE THEN
1807: IF G_STORE_MSG_IN_TABLE = FALSE THEN
1808: IF (l_message_type IS NOT NULL) THEN
1809: msg_buffer := fnd_message.get;
1810: IF msg_buffer is not null THEN
1811: IF l_debug_on THEN
1812: WSH_DEBUG_SV.log(l_module_name,'msg_buffer',msg_buffer);
1813: END IF;
1814: fnd_message.set_name('WSH','WSH_UTIL_MESSAGE_'||l_message_type);
1815: fnd_message.set_token('MSG_TEXT',msg_buffer);
1816: END IF;
1819: --
1820: IF p_module_name IS NOT NULL
1821: AND l_debug_on
1822: THEN
1823: wsh_debug_sv.logmsg
1824: (
1825: p_module_name,
1826: l_message_type || ':' || msg_buffer,
1827: l_exception_level
1846: --
1847: IF p_module_name IS NOT NULL
1848: AND l_debug_on
1849: THEN
1850: wsh_debug_sv.logmsg
1851: (
1852: p_module_name,
1853: l_message_type || ':' || msg_buffer,
1854: l_exception_level
1859: --
1860: -- Debug Statements
1861: --
1862: IF l_debug_on THEN
1863: WSH_DEBUG_SV.pop(l_module_name);
1864: END IF;
1865: --
1866: END Add_Message;
1867:
1906: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1907: --
1908: IF l_debug_on IS NULL
1909: THEN
1910: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1911: END IF;
1912: --
1913: IF l_debug_on THEN
1914: WSH_DEBUG_SV.push(l_module_name);
1910: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1911: END IF;
1912: --
1913: IF l_debug_on THEN
1914: WSH_DEBUG_SV.push(l_module_name);
1915: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1916: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1917: WSH_DEBUG_SV.log(l_module_name,'p_error_name',p_error_name);
1918: WSH_DEBUG_SV.log(l_module_name,'p_token1',p_token1);
1911: END IF;
1912: --
1913: IF l_debug_on THEN
1914: WSH_DEBUG_SV.push(l_module_name);
1915: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1916: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1917: WSH_DEBUG_SV.log(l_module_name,'p_error_name',p_error_name);
1918: WSH_DEBUG_SV.log(l_module_name,'p_token1',p_token1);
1919: WSH_DEBUG_SV.log(l_module_name,'p_value1',p_value1);
1912: --
1913: IF l_debug_on THEN
1914: WSH_DEBUG_SV.push(l_module_name);
1915: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1916: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1917: WSH_DEBUG_SV.log(l_module_name,'p_error_name',p_error_name);
1918: WSH_DEBUG_SV.log(l_module_name,'p_token1',p_token1);
1919: WSH_DEBUG_SV.log(l_module_name,'p_value1',p_value1);
1920: END IF;
1913: IF l_debug_on THEN
1914: WSH_DEBUG_SV.push(l_module_name);
1915: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1916: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1917: WSH_DEBUG_SV.log(l_module_name,'p_error_name',p_error_name);
1918: WSH_DEBUG_SV.log(l_module_name,'p_token1',p_token1);
1919: WSH_DEBUG_SV.log(l_module_name,'p_value1',p_value1);
1920: END IF;
1921:
1914: WSH_DEBUG_SV.push(l_module_name);
1915: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1916: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1917: WSH_DEBUG_SV.log(l_module_name,'p_error_name',p_error_name);
1918: WSH_DEBUG_SV.log(l_module_name,'p_token1',p_token1);
1919: WSH_DEBUG_SV.log(l_module_name,'p_value1',p_value1);
1920: END IF;
1921:
1922: IF p_error_name IS NOT NULL THEN
1915: WSH_DEBUG_SV.log(l_module_name,'P_MESSAGE_TYPE',P_MESSAGE_TYPE);
1916: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
1917: WSH_DEBUG_SV.log(l_module_name,'p_error_name',p_error_name);
1918: WSH_DEBUG_SV.log(l_module_name,'p_token1',p_token1);
1919: WSH_DEBUG_SV.log(l_module_name,'p_value1',p_value1);
1920: END IF;
1921:
1922: IF p_error_name IS NOT NULL THEN
1923: FND_MESSAGE.SET_NAME('WSH',p_error_name);
1928:
1929: --Bugfix 6816437 Start
1930: IF p_token2 IS NOT NULL AND p_value2 IS NOT NULL THEN
1931: IF l_debug_on THEN
1932: WSH_DEBUG_SV.log(l_module_name,'p_token2',p_token2);
1933: WSH_DEBUG_SV.log(l_module_name,'p_value2',p_value2);
1934: END IF;
1935: FND_MESSAGE.SET_TOKEN(p_token2, p_value2);
1936: END IF;
1929: --Bugfix 6816437 Start
1930: IF p_token2 IS NOT NULL AND p_value2 IS NOT NULL THEN
1931: IF l_debug_on THEN
1932: WSH_DEBUG_SV.log(l_module_name,'p_token2',p_token2);
1933: WSH_DEBUG_SV.log(l_module_name,'p_value2',p_value2);
1934: END IF;
1935: FND_MESSAGE.SET_TOKEN(p_token2, p_value2);
1936: END IF;
1937:
1936: END IF;
1937:
1938: IF p_token3 IS NOT NULL AND p_value3 IS NOT NULL THEN
1939: IF l_debug_on THEN
1940: WSH_DEBUG_SV.log(l_module_name,'p_token3',p_token3);
1941: WSH_DEBUG_SV.log(l_module_name,'p_value3',p_value3);
1942: END IF;
1943: FND_MESSAGE.SET_TOKEN(p_token3, p_value3);
1944: END IF;
1937:
1938: IF p_token3 IS NOT NULL AND p_value3 IS NOT NULL THEN
1939: IF l_debug_on THEN
1940: WSH_DEBUG_SV.log(l_module_name,'p_token3',p_token3);
1941: WSH_DEBUG_SV.log(l_module_name,'p_value3',p_value3);
1942: END IF;
1943: FND_MESSAGE.SET_TOKEN(p_token3, p_value3);
1944: END IF;
1945:
1944: END IF;
1945:
1946: IF p_token4 IS NOT NULL AND p_value4 IS NOT NULL THEN
1947: IF l_debug_on THEN
1948: WSH_DEBUG_SV.log(l_module_name,'p_token4',p_token4);
1949: WSH_DEBUG_SV.log(l_module_name,'p_value4',p_value4);
1950: END IF;
1951: FND_MESSAGE.SET_TOKEN(p_token4, p_value4);
1952: END IF;
1945:
1946: IF p_token4 IS NOT NULL AND p_value4 IS NOT NULL THEN
1947: IF l_debug_on THEN
1948: WSH_DEBUG_SV.log(l_module_name,'p_token4',p_token4);
1949: WSH_DEBUG_SV.log(l_module_name,'p_value4',p_value4);
1950: END IF;
1951: FND_MESSAGE.SET_TOKEN(p_token4, p_value4);
1952: END IF;
1953:
1952: END IF;
1953:
1954: IF p_token5 IS NOT NULL AND p_value5 IS NOT NULL THEN
1955: IF l_debug_on THEN
1956: WSH_DEBUG_SV.log(l_module_name,'p_token5',p_token5);
1957: WSH_DEBUG_SV.log(l_module_name,'p_value5',p_value5);
1958: END IF;
1959: FND_MESSAGE.SET_TOKEN(p_token5, p_value5);
1960: END IF;
1953:
1954: IF p_token5 IS NOT NULL AND p_value5 IS NOT NULL THEN
1955: IF l_debug_on THEN
1956: WSH_DEBUG_SV.log(l_module_name,'p_token5',p_token5);
1957: WSH_DEBUG_SV.log(l_module_name,'p_value5',p_value5);
1958: END IF;
1959: FND_MESSAGE.SET_TOKEN(p_token5, p_value5);
1960: END IF;
1961:
1960: END IF;
1961:
1962: IF p_token6 IS NOT NULL AND p_value6 IS NOT NULL THEN
1963: IF l_debug_on THEN
1964: WSH_DEBUG_SV.log(l_module_name,'p_token6',p_token6);
1965: WSH_DEBUG_SV.log(l_module_name,'p_value6',p_value6);
1966: END IF;
1967: FND_MESSAGE.SET_TOKEN(p_token6, p_value6);
1968: END IF;
1961:
1962: IF p_token6 IS NOT NULL AND p_value6 IS NOT NULL THEN
1963: IF l_debug_on THEN
1964: WSH_DEBUG_SV.log(l_module_name,'p_token6',p_token6);
1965: WSH_DEBUG_SV.log(l_module_name,'p_value6',p_value6);
1966: END IF;
1967: FND_MESSAGE.SET_TOKEN(p_token6, p_value6);
1968: END IF;
1969:
1968: END IF;
1969:
1970: IF p_token7 IS NOT NULL AND p_value7 IS NOT NULL THEN
1971: IF l_debug_on THEN
1972: WSH_DEBUG_SV.log(l_module_name,'p_token7',p_token7);
1973: WSH_DEBUG_SV.log(l_module_name,'p_value7',p_value7);
1974: END IF;
1975: FND_MESSAGE.SET_TOKEN(p_token7, p_value7);
1976: END IF;
1969:
1970: IF p_token7 IS NOT NULL AND p_value7 IS NOT NULL THEN
1971: IF l_debug_on THEN
1972: WSH_DEBUG_SV.log(l_module_name,'p_token7',p_token7);
1973: WSH_DEBUG_SV.log(l_module_name,'p_value7',p_value7);
1974: END IF;
1975: FND_MESSAGE.SET_TOKEN(p_token7, p_value7);
1976: END IF;
1977:
1976: END IF;
1977:
1978: IF p_token8 IS NOT NULL AND p_value8 IS NOT NULL THEN
1979: IF l_debug_on THEN
1980: WSH_DEBUG_SV.log(l_module_name,'p_token8',p_token8);
1981: WSH_DEBUG_SV.log(l_module_name,'p_value8',p_value8);
1982: END IF;
1983: FND_MESSAGE.SET_TOKEN(p_token8, p_value8);
1984: END IF;
1977:
1978: IF p_token8 IS NOT NULL AND p_value8 IS NOT NULL THEN
1979: IF l_debug_on THEN
1980: WSH_DEBUG_SV.log(l_module_name,'p_token8',p_token8);
1981: WSH_DEBUG_SV.log(l_module_name,'p_value8',p_value8);
1982: END IF;
1983: FND_MESSAGE.SET_TOKEN(p_token8, p_value8);
1984: END IF;
1985: --Bugfix 6816437 End
1987:
1988: add_message(p_message_type, p_module_name);
1989:
1990: IF l_debug_on THEN
1991: WSH_DEBUG_SV.pop(l_module_name);
1992: END IF;
1993:
1994: EXCEPTION
1995: WHEN OTHERS THEN
1993:
1994: EXCEPTION
1995: WHEN OTHERS THEN
1996: IF l_debug_on THEN
1997: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1998: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1999: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2000: END IF;
2001:
1994: EXCEPTION
1995: WHEN OTHERS THEN
1996: IF l_debug_on THEN
1997: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1998: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1999: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2000: END IF;
2001:
2002: END Add_Message;
1995: WHEN OTHERS THEN
1996: IF l_debug_on THEN
1997: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1998: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1999: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2000: END IF;
2001:
2002: END Add_Message;
2003: -- Harmonization Project I **heali
2028: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2029: --
2030: IF l_debug_on IS NULL
2031: THEN
2032: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2033: END IF;
2034: --
2035: IF l_debug_on THEN
2036: WSH_DEBUG_SV.push(l_module_name);
2032: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2033: END IF;
2034: --
2035: IF l_debug_on THEN
2036: WSH_DEBUG_SV.push(l_module_name);
2037: --
2038: WSH_DEBUG_SV.log(l_module_name,'P_TOTAL',P_TOTAL);
2039: WSH_DEBUG_SV.log(l_module_name,'P_WARNINGS',P_WARNINGS);
2040: WSH_DEBUG_SV.log(l_module_name,'P_ERRORS',P_ERRORS);
2034: --
2035: IF l_debug_on THEN
2036: WSH_DEBUG_SV.push(l_module_name);
2037: --
2038: WSH_DEBUG_SV.log(l_module_name,'P_TOTAL',P_TOTAL);
2039: WSH_DEBUG_SV.log(l_module_name,'P_WARNINGS',P_WARNINGS);
2040: WSH_DEBUG_SV.log(l_module_name,'P_ERRORS',P_ERRORS);
2041: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
2042: END IF;
2035: IF l_debug_on THEN
2036: WSH_DEBUG_SV.push(l_module_name);
2037: --
2038: WSH_DEBUG_SV.log(l_module_name,'P_TOTAL',P_TOTAL);
2039: WSH_DEBUG_SV.log(l_module_name,'P_WARNINGS',P_WARNINGS);
2040: WSH_DEBUG_SV.log(l_module_name,'P_ERRORS',P_ERRORS);
2041: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
2042: END IF;
2043: --
2036: WSH_DEBUG_SV.push(l_module_name);
2037: --
2038: WSH_DEBUG_SV.log(l_module_name,'P_TOTAL',P_TOTAL);
2039: WSH_DEBUG_SV.log(l_module_name,'P_WARNINGS',P_WARNINGS);
2040: WSH_DEBUG_SV.log(l_module_name,'P_ERRORS',P_ERRORS);
2041: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
2042: END IF;
2043: --
2044: l_total := nvl(p_total, 0);
2037: --
2038: WSH_DEBUG_SV.log(l_module_name,'P_TOTAL',P_TOTAL);
2039: WSH_DEBUG_SV.log(l_module_name,'P_WARNINGS',P_WARNINGS);
2040: WSH_DEBUG_SV.log(l_module_name,'P_ERRORS',P_ERRORS);
2041: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
2042: END IF;
2043: --
2044: l_total := nvl(p_total, 0);
2045: l_warnings := nvl(p_warnings, 0);
2067: --
2068: -- Debug Statements
2069: --
2070: IF l_debug_on THEN
2071: WSH_DEBUG_SV.log(l_module_name,'P_RETURN_STATUS',p_return_status);
2072: WSH_DEBUG_SV.pop(l_module_name);
2073: END IF;
2074: --
2075: END Add_Summary_Message;
2068: -- Debug Statements
2069: --
2070: IF l_debug_on THEN
2071: WSH_DEBUG_SV.log(l_module_name,'P_RETURN_STATUS',p_return_status);
2072: WSH_DEBUG_SV.pop(l_module_name);
2073: END IF;
2074: --
2075: END Add_Summary_Message;
2076:
2119: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2120: --
2121: IF l_debug_on IS NULL
2122: THEN
2123: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2124: END IF;
2125: --
2126: IF l_debug_on THEN
2127: WSH_DEBUG_SV.push(l_module_name);
2123: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2124: END IF;
2125: --
2126: IF l_debug_on THEN
2127: WSH_DEBUG_SV.push(l_module_name);
2128: --
2129: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2130: END IF;
2131: --
2125: --
2126: IF l_debug_on THEN
2127: WSH_DEBUG_SV.push(l_module_name);
2128: --
2129: WSH_DEBUG_SV.log(l_module_name,'P_INIT_MSG_LIST',P_INIT_MSG_LIST);
2130: END IF;
2131: --
2132: x_count := FND_MSG_PUB.count_msg;
2133:
2176: --
2177: -- Debug Statements
2178: --
2179: IF l_debug_on THEN
2180: WSH_DEBUG_SV.pop(l_module_name);
2181: END IF;
2182: --
2183: END;
2184:
2203: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2204: --
2205: IF l_debug_on IS NULL
2206: THEN
2207: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2208: END IF;
2209: --
2210: IF l_debug_on THEN
2211: WSH_DEBUG_SV.push(l_module_name);
2207: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2208: END IF;
2209: --
2210: IF l_debug_on THEN
2211: WSH_DEBUG_SV.push(l_module_name);
2212: --
2213: WSH_DEBUG_SV.log(l_module_name,'P_ROUTINE_NAME',P_ROUTINE_NAME);
2214: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
2215: END IF;
2209: --
2210: IF l_debug_on THEN
2211: WSH_DEBUG_SV.push(l_module_name);
2212: --
2213: WSH_DEBUG_SV.log(l_module_name,'P_ROUTINE_NAME',P_ROUTINE_NAME);
2214: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
2215: END IF;
2216: --
2217: FND_MESSAGE.SET_NAME('WSH','WSH_UNEXP_ERROR');
2210: IF l_debug_on THEN
2211: WSH_DEBUG_SV.push(l_module_name);
2212: --
2213: WSH_DEBUG_SV.log(l_module_name,'P_ROUTINE_NAME',P_ROUTINE_NAME);
2214: WSH_DEBUG_SV.log(l_module_name,'P_MODULE_NAME',P_MODULE_NAME);
2215: END IF;
2216: --
2217: FND_MESSAGE.SET_NAME('WSH','WSH_UNEXP_ERROR');
2218: FND_MESSAGE.Set_Token('PACKAGE',p_routine_name);
2223: --
2224: -- Debug Statements
2225: --
2226: IF l_debug_on THEN
2227: WSH_DEBUG_SV.pop(l_module_name);
2228: END IF;
2229: --
2230: END default_handler;
2231:
2255: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2256: --
2257: IF l_debug_on IS NULL
2258: THEN
2259: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2260: END IF;
2261: --
2262: IF l_debug_on THEN
2263: WSH_DEBUG_SV.push(l_module_name);
2259: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2260: END IF;
2261: --
2262: IF l_debug_on THEN
2263: WSH_DEBUG_SV.push(l_module_name);
2264: END IF;
2265: --
2266: fnd_message.clear;
2267:
2268: --
2269: -- Debug Statements
2270: --
2271: IF l_debug_on THEN
2272: WSH_DEBUG_SV.pop(l_module_name);
2273: END IF;
2274: --
2275: END Clear_FND_Messages;
2276:
2301: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2302: --
2303: IF l_debug_on IS NULL
2304: THEN
2305: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2306: END IF;
2307: --
2308: IF l_debug_on THEN
2309: WSH_DEBUG_SV.push(l_module_name);
2305: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2306: END IF;
2307: --
2308: IF l_debug_on THEN
2309: WSH_DEBUG_SV.push(l_module_name);
2310: --
2311: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2312: END IF;
2313: --
2307: --
2308: IF l_debug_on THEN
2309: WSH_DEBUG_SV.push(l_module_name);
2310: --
2311: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2312: END IF;
2313: --
2314: IF (p_organization_id IS NULL) THEN
2315: raise others;
2322: --
2323: -- Debug Statements
2324: --
2325: IF l_debug_on THEN
2326: WSH_DEBUG_SV.log(l_module_name,'ORGANIZATION_NAME',org_name);
2327: WSH_DEBUG_SV.pop(l_module_name);
2328: END IF;
2329: --
2330: RETURN org_name;
2323: -- Debug Statements
2324: --
2325: IF l_debug_on THEN
2326: WSH_DEBUG_SV.log(l_module_name,'ORGANIZATION_NAME',org_name);
2327: WSH_DEBUG_SV.pop(l_module_name);
2328: END IF;
2329: --
2330: RETURN org_name;
2331:
2334: --
2335: -- Debug Statements
2336: --
2337: IF l_debug_on THEN
2338: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2339: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2340: END IF;
2341: --
2342: RETURN null;
2335: -- Debug Statements
2336: --
2337: IF l_debug_on THEN
2338: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2339: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2340: END IF;
2341: --
2342: RETURN null;
2343:
2379: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2380: --
2381: IF l_debug_on IS NULL
2382: THEN
2383: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2384: END IF;
2385: --
2386: IF l_debug_on THEN
2387: WSH_DEBUG_SV.push(l_module_name);
2383: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2384: END IF;
2385: --
2386: IF l_debug_on THEN
2387: WSH_DEBUG_SV.push(l_module_name);
2388: --
2389: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
2390: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2391: WSH_DEBUG_SV.log(l_module_name,'P_FLEX_CODE',P_FLEX_CODE);
2385: --
2386: IF l_debug_on THEN
2387: WSH_DEBUG_SV.push(l_module_name);
2388: --
2389: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
2390: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2391: WSH_DEBUG_SV.log(l_module_name,'P_FLEX_CODE',P_FLEX_CODE);
2392: WSH_DEBUG_SV.log(l_module_name,'P_STRUCT_NUM',P_STRUCT_NUM);
2393: WSH_DEBUG_SV.log(l_module_name,'P_REMOVE_CLIENT_CODE',P_REMOVE_CLIENT_CODE);
2386: IF l_debug_on THEN
2387: WSH_DEBUG_SV.push(l_module_name);
2388: --
2389: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
2390: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2391: WSH_DEBUG_SV.log(l_module_name,'P_FLEX_CODE',P_FLEX_CODE);
2392: WSH_DEBUG_SV.log(l_module_name,'P_STRUCT_NUM',P_STRUCT_NUM);
2393: WSH_DEBUG_SV.log(l_module_name,'P_REMOVE_CLIENT_CODE',P_REMOVE_CLIENT_CODE);
2394: END IF;
2387: WSH_DEBUG_SV.push(l_module_name);
2388: --
2389: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
2390: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2391: WSH_DEBUG_SV.log(l_module_name,'P_FLEX_CODE',P_FLEX_CODE);
2392: WSH_DEBUG_SV.log(l_module_name,'P_STRUCT_NUM',P_STRUCT_NUM);
2393: WSH_DEBUG_SV.log(l_module_name,'P_REMOVE_CLIENT_CODE',P_REMOVE_CLIENT_CODE);
2394: END IF;
2395: --
2388: --
2389: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
2390: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2391: WSH_DEBUG_SV.log(l_module_name,'P_FLEX_CODE',P_FLEX_CODE);
2392: WSH_DEBUG_SV.log(l_module_name,'P_STRUCT_NUM',P_STRUCT_NUM);
2393: WSH_DEBUG_SV.log(l_module_name,'P_REMOVE_CLIENT_CODE',P_REMOVE_CLIENT_CODE);
2394: END IF;
2395: --
2396: IF (p_item_id IS NULL) THEN
2389: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
2390: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2391: WSH_DEBUG_SV.log(l_module_name,'P_FLEX_CODE',P_FLEX_CODE);
2392: WSH_DEBUG_SV.log(l_module_name,'P_STRUCT_NUM',P_STRUCT_NUM);
2393: WSH_DEBUG_SV.log(l_module_name,'P_REMOVE_CLIENT_CODE',P_REMOVE_CLIENT_CODE);
2394: END IF;
2395: --
2396: IF (p_item_id IS NULL) THEN
2397: raise others;
2400: IF WMS_DEPLOY.wms_deployment_mode = 'L' AND p_remove_client_code = 'Y' THEN
2401: --{
2402: -- Call wms api to get the item name after stripping out client code semment value if exists.
2403: IF l_debug_on THEN
2404: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WMS_DEPLOY.GET_CLIENT_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
2405: END IF;
2406: item_name := wms_deploy.get_client_item(
2407: p_org_id => p_organization_id,
2408: p_item_id => p_item_id);
2406: item_name := wms_deploy.get_client_item(
2407: p_org_id => p_organization_id,
2408: p_item_id => p_item_id);
2409: IF l_debug_on THEN
2410: WSH_DEBUG_SV.log(l_module_name,'item_name',item_name);
2411: END IF;
2412: --}
2413: ELSE
2414: --{
2428: --
2429: -- Debug Statements
2430: --
2431: IF l_debug_on THEN
2432: WSH_DEBUG_SV.pop(l_module_name);
2433: END IF;
2434: --
2435: RETURN item_name;
2436:
2440: --
2441: -- Debug Statements
2442: --
2443: IF l_debug_on THEN
2444: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2445: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2446: END IF;
2447: --
2448: RETURN null;
2441: -- Debug Statements
2442: --
2443: IF l_debug_on THEN
2444: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2445: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2446: END IF;
2447: --
2448: RETURN null;
2449:
2484: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2485: --
2486: IF l_debug_on IS NULL
2487: THEN
2488: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2489: END IF;
2490: --
2491: IF l_debug_on THEN
2492: WSH_DEBUG_SV.push(l_module_name);
2488: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2489: END IF;
2490: --
2491: IF l_debug_on THEN
2492: WSH_DEBUG_SV.push(l_module_name);
2493: --
2494: WSH_DEBUG_SV.log(l_module_name,'ENTITY_ID',ENTITY_ID);
2495: WSH_DEBUG_SV.log(l_module_name,'WAREHOUSE_ID',WAREHOUSE_ID);
2496: WSH_DEBUG_SV.log(l_module_name,'APP_NAME',APP_NAME);
2490: --
2491: IF l_debug_on THEN
2492: WSH_DEBUG_SV.push(l_module_name);
2493: --
2494: WSH_DEBUG_SV.log(l_module_name,'ENTITY_ID',ENTITY_ID);
2495: WSH_DEBUG_SV.log(l_module_name,'WAREHOUSE_ID',WAREHOUSE_ID);
2496: WSH_DEBUG_SV.log(l_module_name,'APP_NAME',APP_NAME);
2497: WSH_DEBUG_SV.log(l_module_name,'K_FLEX_CODE',K_FLEX_CODE);
2498: WSH_DEBUG_SV.log(l_module_name,'STRUCT_NUM',STRUCT_NUM);
2491: IF l_debug_on THEN
2492: WSH_DEBUG_SV.push(l_module_name);
2493: --
2494: WSH_DEBUG_SV.log(l_module_name,'ENTITY_ID',ENTITY_ID);
2495: WSH_DEBUG_SV.log(l_module_name,'WAREHOUSE_ID',WAREHOUSE_ID);
2496: WSH_DEBUG_SV.log(l_module_name,'APP_NAME',APP_NAME);
2497: WSH_DEBUG_SV.log(l_module_name,'K_FLEX_CODE',K_FLEX_CODE);
2498: WSH_DEBUG_SV.log(l_module_name,'STRUCT_NUM',STRUCT_NUM);
2499: END IF;
2492: WSH_DEBUG_SV.push(l_module_name);
2493: --
2494: WSH_DEBUG_SV.log(l_module_name,'ENTITY_ID',ENTITY_ID);
2495: WSH_DEBUG_SV.log(l_module_name,'WAREHOUSE_ID',WAREHOUSE_ID);
2496: WSH_DEBUG_SV.log(l_module_name,'APP_NAME',APP_NAME);
2497: WSH_DEBUG_SV.log(l_module_name,'K_FLEX_CODE',K_FLEX_CODE);
2498: WSH_DEBUG_SV.log(l_module_name,'STRUCT_NUM',STRUCT_NUM);
2499: END IF;
2500: --
2493: --
2494: WSH_DEBUG_SV.log(l_module_name,'ENTITY_ID',ENTITY_ID);
2495: WSH_DEBUG_SV.log(l_module_name,'WAREHOUSE_ID',WAREHOUSE_ID);
2496: WSH_DEBUG_SV.log(l_module_name,'APP_NAME',APP_NAME);
2497: WSH_DEBUG_SV.log(l_module_name,'K_FLEX_CODE',K_FLEX_CODE);
2498: WSH_DEBUG_SV.log(l_module_name,'STRUCT_NUM',STRUCT_NUM);
2499: END IF;
2500: --
2501: result := fnd_flex_keyval.validate_ccid
2494: WSH_DEBUG_SV.log(l_module_name,'ENTITY_ID',ENTITY_ID);
2495: WSH_DEBUG_SV.log(l_module_name,'WAREHOUSE_ID',WAREHOUSE_ID);
2496: WSH_DEBUG_SV.log(l_module_name,'APP_NAME',APP_NAME);
2497: WSH_DEBUG_SV.log(l_module_name,'K_FLEX_CODE',K_FLEX_CODE);
2498: WSH_DEBUG_SV.log(l_module_name,'STRUCT_NUM',STRUCT_NUM);
2499: END IF;
2500: --
2501: result := fnd_flex_keyval.validate_ccid
2502: (appl_short_name => 'INV',
2510: --
2511: -- Debug Statements
2512: --
2513: IF l_debug_on THEN
2514: WSH_DEBUG_SV.pop(l_module_name);
2515: END IF;
2516: --
2517: RETURN name;
2518: END generic_flex_name;
2601: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2602: --
2603: IF l_debug_on IS NULL
2604: THEN
2605: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2606: END IF;
2607: --
2608: IF l_debug_on THEN
2609: WSH_DEBUG_SV.push(l_module_name);
2605: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2606: END IF;
2607: --
2608: IF l_debug_on THEN
2609: WSH_DEBUG_SV.push(l_module_name);
2610: END IF;
2611: --
2612: num_errors := 0;
2613: num_warnings := 0;
2692: --
2693: -- Debug Statements
2694: --
2695: IF l_debug_on THEN
2696: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_GRP.GET_TRIP_DETAILS_PVT',WSH_DEBUG_SV.C_PROC_LEVEL);
2697: END IF;
2698: --
2699: wsh_trips_grp.get_trip_details_pvt
2700: (p_trip_id => p_rows(i),
2708: --
2709: -- Debug Statements
2710: --
2711: --IF l_debug_on THEN
2712: --WSH_DEBUG_SV.pop(l_module_name);
2713: --END IF;
2714: --
2715: --RETURN;
2716: raise e_return_excp; -- LPN CONV. rv
2720: --
2721: -- Debug Statements
2722: --
2723: IF l_debug_on THEN
2724: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FTE_INTEGRATION.TRIP_STOP_VALIDATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
2725: END IF;
2726: --
2727: wsh_fte_integration.trip_stop_validations
2728: (p_stop_rec => l_stop_rec,
2738: --
2739: -- Debug Statements
2740: --
2741: --IF l_debug_on THEN
2742: --WSH_DEBUG_SV.pop(l_module_name);
2743: --END IF;
2744: --
2745: --RETURN;
2746: raise e_return_excp; -- LPN CONV. rv
2751: --
2752: -- Debug Statements
2753: --
2754: IF l_debug_on THEN
2755: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_GRP.GET_STOP_DETAILS_PVT',WSH_DEBUG_SV.C_PROC_LEVEL);
2756: END IF;
2757: --
2758: wsh_trip_stops_grp.get_stop_details_pvt
2759: (p_stop_id => p_rows(i),
2767: --
2768: -- Debug Statements
2769: --
2770: --IF l_debug_on THEN
2771: --WSH_DEBUG_SV.pop(l_module_name);
2772: --END IF;
2773: --
2774: --RETURN;
2775: raise e_return_excp; -- LPN CONV. rv
2779: --
2780: -- Debug Statements
2781: --
2782: IF l_debug_on THEN
2783: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_FTE_INTEGRATION.TRIP_STOP_VALIDATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
2784: END IF;
2785: --
2786: wsh_fte_integration.trip_stop_validations
2787: (p_stop_rec => l_stop_rec,
2796: --
2797: -- Debug Statements
2798: --
2799: --IF l_debug_on THEN
2800: --WSH_DEBUG_SV.pop(l_module_name);
2801: --END IF;
2802: --
2803: --RETURN;
2804: raise e_return_excp; -- LPN CONV. rv
2813: --
2814: -- Debug Statements
2815: --
2816: IF l_debug_on THEN
2817: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_PVT.DELETE_TRIP',WSH_DEBUG_SV.C_PROC_LEVEL);
2818: END IF;
2819: --
2820: wsh_trips_pvt.delete_trip(p_rowid => null,
2821: p_trip_id => p_rows(i),
2826: --
2827: -- Debug Statements
2828: --
2829: IF l_debug_on THEN
2830: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIP_STOPS_PVT.DELETE_TRIP_STOP',WSH_DEBUG_SV.C_PROC_LEVEL);
2831: END IF;
2832: --
2833: --tkt
2834: wsh_trip_stops_pvt.delete_trip_stop(p_rowid => null,
2840: --
2841: -- Debug Statements
2842: --
2843: IF l_debug_on THEN
2844: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_NEW_DELIVERIES_PVT.DELETE_DELIVERY',WSH_DEBUG_SV.C_PROC_LEVEL);
2845: END IF;
2846: --
2847: wsh_new_deliveries_pvt.delete_delivery(null, p_rows(i), cur_return_status);
2848: elsif (p_type = 'DLEG') then
2857: --
2858: -- Debug Statements
2859: --
2860: IF l_debug_on THEN
2861: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_CONTAINER_ACTIONS.DELETE_CONTAINERS',WSH_DEBUG_SV.C_PROC_LEVEL);
2862: END IF;
2863: --
2864: --lpn conv
2865: IF c_wms_code_present = 'Y' THEN --{bmso
2934: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
2935: THEN
2936: --{
2937: IF l_debug_on THEN
2938: 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);
2939: END IF;
2940:
2941: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
2942: (
2946: );
2947: --
2948: --
2949: IF l_debug_on THEN
2950: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',l_return_status);
2951: END IF;
2952: --
2953: --
2954: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2999: --
3000: -- Debug Statements
3001: --
3002: IF l_debug_on THEN
3003: WSH_DEBUG_SV.pop(l_module_name);
3004: END IF;
3005: --
3006: exception
3007: --
3012: THEN
3013: --{
3014: --
3015: IF l_debug_on THEN
3016: 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);
3017: END IF;
3018: --
3019: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
3020: (
3023: x_out_rec => l_lpn_out_sync_comm_rec
3024: );
3025: --
3026: IF l_debug_on THEN
3027: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', l_return_status);
3028: END IF;
3029: 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
3030: x_return_status := l_return_status;
3031: END IF;
3032: --}
3033: END IF;
3034: --
3035: IF l_debug_on THEN
3036: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:E_RETURN_EXCP');
3037: END IF;
3038: -- LPN CONV. rv
3039: --
3040: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3041: ROLLBACK TO s_delete_savepoint;
3042: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3043:
3044: IF l_debug_on THEN
3045: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle
3046: error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3047: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3048: END IF;
3049: WHEN OTHERS THEN
3042: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3043:
3044: IF l_debug_on THEN
3045: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle
3046: error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3047: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3048: END IF;
3049: WHEN OTHERS THEN
3050: ROLLBACK TO s_delete_savepoint;
3043:
3044: IF l_debug_on THEN
3045: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle
3046: error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3047: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3048: END IF;
3049: WHEN OTHERS THEN
3050: ROLLBACK TO s_delete_savepoint;
3051: wsh_util_core.default_handler('WSH_UTIL_CORE.DELETE');
3054: --
3055: -- Debug Statements
3056: --
3057: IF l_debug_on THEN
3058: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3059: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3060: END IF;
3061: --
3062: end delete;
3055: -- Debug Statements
3056: --
3057: IF l_debug_on THEN
3058: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3059: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3060: END IF;
3061: --
3062: end delete;
3063:
3092: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3093: --
3094: IF l_debug_on IS NULL
3095: THEN
3096: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3097: END IF;
3098: --
3099: IF l_debug_on THEN
3100: WSH_DEBUG_SV.push(l_module_name);
3096: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3097: END IF;
3098: --
3099: IF l_debug_on THEN
3100: WSH_DEBUG_SV.push(l_module_name);
3101: --
3102: WSH_DEBUG_SV.log(l_module_name,'P_CITY',P_CITY);
3103: WSH_DEBUG_SV.log(l_module_name,'P_REGION',P_REGION);
3104: WSH_DEBUG_SV.log(l_module_name,'P_POSTAL_CODE',P_POSTAL_CODE);
3098: --
3099: IF l_debug_on THEN
3100: WSH_DEBUG_SV.push(l_module_name);
3101: --
3102: WSH_DEBUG_SV.log(l_module_name,'P_CITY',P_CITY);
3103: WSH_DEBUG_SV.log(l_module_name,'P_REGION',P_REGION);
3104: WSH_DEBUG_SV.log(l_module_name,'P_POSTAL_CODE',P_POSTAL_CODE);
3105: END IF;
3106: --
3099: IF l_debug_on THEN
3100: WSH_DEBUG_SV.push(l_module_name);
3101: --
3102: WSH_DEBUG_SV.log(l_module_name,'P_CITY',P_CITY);
3103: WSH_DEBUG_SV.log(l_module_name,'P_REGION',P_REGION);
3104: WSH_DEBUG_SV.log(l_module_name,'P_POSTAL_CODE',P_POSTAL_CODE);
3105: END IF;
3106: --
3107: IF p_city IS NOT NULL AND p_region IS NOT NULL THEN
3100: WSH_DEBUG_SV.push(l_module_name);
3101: --
3102: WSH_DEBUG_SV.log(l_module_name,'P_CITY',P_CITY);
3103: WSH_DEBUG_SV.log(l_module_name,'P_REGION',P_REGION);
3104: WSH_DEBUG_SV.log(l_module_name,'P_POSTAL_CODE',P_POSTAL_CODE);
3105: END IF;
3106: --
3107: IF p_city IS NOT NULL AND p_region IS NOT NULL THEN
3108: c_r_p := p_city || ', ' || p_region || ' ' || p_postal_code;
3118: --
3119: -- Debug Statements
3120: --
3121: IF l_debug_on THEN
3122: WSH_DEBUG_SV.pop(l_module_name);
3123: END IF;
3124: --
3125: RETURN c_r_p;
3126:
3187: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3188: --
3189: IF l_debug_on IS NULL
3190: THEN
3191: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3192: END IF;
3193: --
3194: IF l_debug_on THEN
3195: WSH_DEBUG_SV.push(l_module_name);
3191: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3192: END IF;
3193: --
3194: IF l_debug_on THEN
3195: WSH_DEBUG_SV.push(l_module_name);
3196: --
3197: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3198: END IF;
3199: --
3193: --
3194: IF l_debug_on THEN
3195: WSH_DEBUG_SV.push(l_module_name);
3196: --
3197: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
3198: END IF;
3199: --
3200: OPEN get_ship_codes;
3201: FETCH get_ship_codes
3205: --
3206: -- Debug Statements
3207: --
3208: IF l_debug_on THEN
3209: WSH_DEBUG_SV.pop(l_module_name);
3210: END IF;
3211: --
3212: RETURN null;
3213: END IF;
3222: --
3223: -- Debug Statements
3224: --
3225: IF l_debug_on THEN
3226: WSH_DEBUG_SV.pop(l_module_name);
3227: END IF;
3228: --
3229: RETURN null;
3230: END IF;
3232: --
3233: -- Debug Statements
3234: --
3235: IF l_debug_on THEN
3236: WSH_DEBUG_SV.pop(l_module_name);
3237: END IF;
3238: --
3239: RETURN 'Mixed';
3240: ELSE
3246: --
3247: -- Debug Statements
3248: --
3249: IF l_debug_on THEN
3250: WSH_DEBUG_SV.pop(l_module_name);
3251: END IF;
3252: --
3253: RETURN v_first_code;
3254: END IF;
3256: --
3257: -- Debug Statements
3258: --
3259: IF l_debug_on THEN
3260: WSH_DEBUG_SV.pop(l_module_name);
3261: END IF;
3262: --
3263: RETURN 'Mixed';
3264: END IF;
3278: --
3279: -- Debug Statements
3280: --
3281: IF l_debug_on THEN
3282: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3283: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3284: END IF;
3285: --
3286: RETURN null;
3279: -- Debug Statements
3280: --
3281: IF l_debug_on THEN
3282: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3283: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3284: END IF;
3285: --
3286: RETURN null;
3287:
3337: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3338: --
3339: IF l_debug_on IS NULL
3340: THEN
3341: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3342: END IF;
3343: --
3344: IF l_debug_on THEN
3345: WSH_DEBUG_SV.push(l_module_name);
3341: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3342: END IF;
3343: --
3344: IF l_debug_on THEN
3345: WSH_DEBUG_SV.push(l_module_name);
3346: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
3347: WSH_DEBUG_SV.log(l_module_name,'G_OPERATING_UNIT_INFO.org_id',
3348: G_OPERATING_UNIT_INFO.org_id);
3349: END IF;
3342: END IF;
3343: --
3344: IF l_debug_on THEN
3345: WSH_DEBUG_SV.push(l_module_name);
3346: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
3347: WSH_DEBUG_SV.log(l_module_name,'G_OPERATING_UNIT_INFO.org_id',
3348: G_OPERATING_UNIT_INFO.org_id);
3349: END IF;
3350: --
3343: --
3344: IF l_debug_on THEN
3345: WSH_DEBUG_SV.push(l_module_name);
3346: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
3347: WSH_DEBUG_SV.log(l_module_name,'G_OPERATING_UNIT_INFO.org_id',
3348: G_OPERATING_UNIT_INFO.org_id);
3349: END IF;
3350: --
3351: x_ledger_id := NULL;
3355: IF p_org_id = G_OPERATING_UNIT_INFO.org_id THEN
3356: x_ledger_id := G_OPERATING_UNIT_INFO.ledger_id;
3357: x_func_currency := G_OPERATING_UNIT_INFO.currency_code;
3358: IF l_debug_on THEN
3359: WSH_DEBUG_SV.logmsg(l_module_name,'Return cached value for p_org = G_OPERATING_UNIT_INFO.org_id');
3360: END IF;
3361: ELSE
3362: IF l_debug_on THEN
3363: WSH_DEBUG_SV.logmsg(l_module_name,'Get Ledger id from p_org_id');
3359: WSH_DEBUG_SV.logmsg(l_module_name,'Return cached value for p_org = G_OPERATING_UNIT_INFO.org_id');
3360: END IF;
3361: ELSE
3362: IF l_debug_on THEN
3363: WSH_DEBUG_SV.logmsg(l_module_name,'Get Ledger id from p_org_id');
3364: END IF;
3365: OPEN c_ledger_and_func_curr( p_org_id);
3366: FETCH c_ledger_and_func_curr
3367: INTO l_org_id, x_ledger_id, x_func_currency;
3377: --
3378: -- Debug Statements
3379: --
3380: IF l_debug_on THEN
3381: WSH_DEBUG_SV.log(l_module_name,'LEDGER ID',x_ledger_id);
3382: WSH_DEBUG_SV.log(l_module_name,'FUNC CURRENCY',x_func_currency);
3383: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
3384: WSH_DEBUG_SV.pop(l_module_name);
3385: END IF;
3378: -- Debug Statements
3379: --
3380: IF l_debug_on THEN
3381: WSH_DEBUG_SV.log(l_module_name,'LEDGER ID',x_ledger_id);
3382: WSH_DEBUG_SV.log(l_module_name,'FUNC CURRENCY',x_func_currency);
3383: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
3384: WSH_DEBUG_SV.pop(l_module_name);
3385: END IF;
3386: --
3379: --
3380: IF l_debug_on THEN
3381: WSH_DEBUG_SV.log(l_module_name,'LEDGER ID',x_ledger_id);
3382: WSH_DEBUG_SV.log(l_module_name,'FUNC CURRENCY',x_func_currency);
3383: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
3384: WSH_DEBUG_SV.pop(l_module_name);
3385: END IF;
3386: --
3387: EXCEPTION
3380: IF l_debug_on THEN
3381: WSH_DEBUG_SV.log(l_module_name,'LEDGER ID',x_ledger_id);
3382: WSH_DEBUG_SV.log(l_module_name,'FUNC CURRENCY',x_func_currency);
3383: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
3384: WSH_DEBUG_SV.pop(l_module_name);
3385: END IF;
3386: --
3387: EXCEPTION
3388: WHEN WSH_GET_LEDGER_ERROR THEN
3395: fnd_message.set_name('WSH', 'WSH_LEDGER_ID_NOT_FOUND');
3396: WSH_UTIL_CORE.add_message(WSH_UTIL_CORE.G_RET_STS_ERROR);
3397:
3398: IF l_debug_on THEN
3399: WSH_DEBUG_SV.pop(l_module_name);
3400: END IF;
3401:
3402: WHEN others THEN
3403: x_ledger_id := NULL;
3409: wsh_util_core.default_handler('WSH_UTIL_CORE.Get_Ledger_id_Func_Currency');
3410: -- Debug Statements
3411: --
3412: IF l_debug_on THEN
3413: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3414: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3415: END IF;
3416: --
3417: --
3410: -- Debug Statements
3411: --
3412: IF l_debug_on THEN
3413: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3414: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3415: END IF;
3416: --
3417: --
3418: END Get_Ledger_id_Func_Currency;
3480: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3481: --
3482: IF l_debug_on IS NULL
3483: THEN
3484: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3485: END IF;
3486: --
3487: IF l_debug_on THEN
3488: WSH_DEBUG_SV.push(l_module_name);
3484: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3485: END IF;
3486: --
3487: IF l_debug_on THEN
3488: WSH_DEBUG_SV.push(l_module_name);
3489: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID.COUNT',p_delivery_ids.count);
3490: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID.COUNT',p_stop_ids.count);
3491: END IF;
3492: --
3485: END IF;
3486: --
3487: IF l_debug_on THEN
3488: WSH_DEBUG_SV.push(l_module_name);
3489: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID.COUNT',p_delivery_ids.count);
3490: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID.COUNT',p_stop_ids.count);
3491: END IF;
3492: --
3493: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
3486: --
3487: IF l_debug_on THEN
3488: WSH_DEBUG_SV.push(l_module_name);
3489: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID.COUNT',p_delivery_ids.count);
3490: WSH_DEBUG_SV.log(l_module_name,'P_STOP_ID.COUNT',p_stop_ids.count);
3491: END IF;
3492: --
3493: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
3494: l_del_tab.delete;
3520: --
3521: -- Debug Statements
3522: --
3523: IF l_debug_on THEN
3524: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_LABEL_PUB.PRINT_LABEL',WSH_DEBUG_SV.C_PROC_LEVEL);
3525: END IF;
3526: --
3527: INV_LABEL_PUB.print_label (
3528: x_return_status => l_label_return_status,
3545: --
3546: -- Debug Statements
3547: --
3548: IF l_debug_on THEN
3549: WSH_DEBUG_SV.pop(l_module_name);
3550: END IF;
3551: --
3552: EXCEPTION
3553: WHEN others THEN
3564: --
3565: -- Debug Statements
3566: --
3567: IF l_debug_on THEN
3568: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3569: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3570: END IF;
3571: --
3572: END Print_Label;
3565: -- Debug Statements
3566: --
3567: IF l_debug_on THEN
3568: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3569: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3570: END IF;
3571: --
3572: END Print_Label;
3573:
3604: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3605: --
3606: IF l_debug_on IS NULL
3607: THEN
3608: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3609: END IF;
3610: --
3611: IF l_debug_on THEN
3612: WSH_DEBUG_SV.push(l_module_name);
3608: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3609: END IF;
3610: --
3611: IF l_debug_on THEN
3612: WSH_DEBUG_SV.push(l_module_name);
3613: END IF;
3614: --
3615: IF (wsh_fte_enabled.check_status = 'Y' AND
3616: Get_Otm_Install_Profile_Value = 'N') THEN -- OTM R12
3640: --
3641: -- Debug Statements
3642: --
3643: IF l_debug_on THEN
3644: WSH_DEBUG_SV.log(l_module_name,'G_FTE_IS_INSTALLED',G_FTE_IS_INSTALLED);
3645: WSH_DEBUG_SV.pop(l_module_name);
3646: END IF;
3647: --
3648: return G_FTE_IS_INSTALLED;
3641: -- Debug Statements
3642: --
3643: IF l_debug_on THEN
3644: WSH_DEBUG_SV.log(l_module_name,'G_FTE_IS_INSTALLED',G_FTE_IS_INSTALLED);
3645: WSH_DEBUG_SV.pop(l_module_name);
3646: END IF;
3647: --
3648: return G_FTE_IS_INSTALLED;
3649: END FTE_Is_Installed;
3676: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3677: --
3678: IF l_debug_on IS NULL
3679: THEN
3680: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3681: END IF;
3682: --
3683: IF l_debug_on THEN
3684: WSH_DEBUG_SV.push(l_module_name);
3680: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3681: END IF;
3682: --
3683: IF l_debug_on THEN
3684: WSH_DEBUG_SV.push(l_module_name);
3685: END IF;
3686: --
3687:
3688: --
3713: --
3714: -- Debug Statements
3715: --
3716: IF l_debug_on THEN
3717: WSH_DEBUG_SV.log(l_module_name,'G_TP_IS_INSTALLED',G_TP_IS_INSTALLED);
3718: WSH_DEBUG_SV.pop(l_module_name);
3719: END IF;
3720: --
3721: return G_TP_IS_INSTALLED;
3714: -- Debug Statements
3715: --
3716: IF l_debug_on THEN
3717: WSH_DEBUG_SV.log(l_module_name,'G_TP_IS_INSTALLED',G_TP_IS_INSTALLED);
3718: WSH_DEBUG_SV.pop(l_module_name);
3719: END IF;
3720: --
3721: return G_TP_IS_INSTALLED;
3722: EXCEPTION
3725: --
3726: -- Debug Statements
3727: --
3728: IF l_debug_on THEN
3729: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3730: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3731: END IF;
3732: --
3733: RETURN 'N';
3726: -- Debug Statements
3727: --
3728: IF l_debug_on THEN
3729: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3730: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3731: END IF;
3732: --
3733: RETURN 'N';
3734: END TP_Is_Installed;
3771: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3772: --
3773: IF l_debug_on IS NULL
3774: THEN
3775: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3776: END IF;
3777: --
3778: IF l_debug_on THEN
3779: WSH_DEBUG_SV.push(l_module_name);
3775: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3776: END IF;
3777: --
3778: IF l_debug_on THEN
3779: WSH_DEBUG_SV.push(l_module_name);
3780: --
3781: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_LEG_ID',P_DELIVERY_LEG_ID);
3782: END IF;
3783: --
3777: --
3778: IF l_debug_on THEN
3779: WSH_DEBUG_SV.push(l_module_name);
3780: --
3781: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_LEG_ID',P_DELIVERY_LEG_ID);
3782: END IF;
3783: --
3784: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
3785: OPEN c_get_trip_name;
3796: --
3797: -- Debug Statements
3798: --
3799: IF l_debug_on THEN
3800: WSH_DEBUG_SV.log(l_module_name,'TRIP NAME',x_trip_name);
3801: WSH_DEBUG_SV.log(l_module_name,'Reprice Required',x_reprice_required);
3802: WSH_DEBUG_SV.pop(l_module_name);
3803: END IF;
3804: --
3797: -- Debug Statements
3798: --
3799: IF l_debug_on THEN
3800: WSH_DEBUG_SV.log(l_module_name,'TRIP NAME',x_trip_name);
3801: WSH_DEBUG_SV.log(l_module_name,'Reprice Required',x_reprice_required);
3802: WSH_DEBUG_SV.pop(l_module_name);
3803: END IF;
3804: --
3805: EXCEPTION
3798: --
3799: IF l_debug_on THEN
3800: WSH_DEBUG_SV.log(l_module_name,'TRIP NAME',x_trip_name);
3801: WSH_DEBUG_SV.log(l_module_name,'Reprice Required',x_reprice_required);
3802: WSH_DEBUG_SV.pop(l_module_name);
3803: END IF;
3804: --
3805: EXCEPTION
3806: WHEN others THEN
3810: --
3811: -- Debug Statements
3812: --
3813: IF l_debug_on THEN
3814: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3815: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3816: END IF;
3817: --
3818: END Get_Trip_Name_by_Leg;
3811: -- Debug Statements
3812: --
3813: IF l_debug_on THEN
3814: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3815: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3816: END IF;
3817: --
3818: END Get_Trip_Name_by_Leg;
3819:
3830: -- p_raise_error_flag is defaulted to TRUE
3831: IS
3832: --
3833: --
3834: --l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
3835: --
3836: --l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'API_POST_CALL';
3837: --
3838: --
3840: --
3841: --
3842: /*
3843: IF l_debug_on THEN
3844: WSH_DEBUG_SV.push(l_module_name);
3845: --
3846: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3847: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3848: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3842: /*
3843: IF l_debug_on THEN
3844: WSH_DEBUG_SV.push(l_module_name);
3845: --
3846: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3847: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3848: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3849: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3850: END IF;
3843: IF l_debug_on THEN
3844: WSH_DEBUG_SV.push(l_module_name);
3845: --
3846: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3847: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3848: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3849: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3850: END IF;
3851: */
3844: WSH_DEBUG_SV.push(l_module_name);
3845: --
3846: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3847: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3848: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3849: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3850: END IF;
3851: */
3852:
3845: --
3846: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3847: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3848: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3849: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3850: END IF;
3851: */
3852:
3853: --
3876: --
3877: --
3878: /*
3879: IF l_debug_on THEN
3880: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3881: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3882: WSH_DEBUG_SV.pop(l_module_name);
3883: END IF;
3884: */
3877: --
3878: /*
3879: IF l_debug_on THEN
3880: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3881: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3882: WSH_DEBUG_SV.pop(l_module_name);
3883: END IF;
3884: */
3885: --
3878: /*
3879: IF l_debug_on THEN
3880: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3881: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3882: WSH_DEBUG_SV.pop(l_module_name);
3883: END IF;
3884: */
3885: --
3886: --
3900: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3901: --
3902: /*
3903: IF l_debug_on THEN
3904: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3905: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3906: END IF;
3907: */
3908: --
3901: --
3902: /*
3903: IF l_debug_on THEN
3904: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3905: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3906: END IF;
3907: */
3908: --
3909: --
3933: p_token8 IN VARCHAR2 DEFAULT NULL,
3934: p_value8 IN VARCHAR2 DEFAULT NULL,
3935: p_raise_error_flag IN BOOLEAN DEFAULT TRUE )
3936: IS
3937: --l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
3938: --
3939: --l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'API_POST_CALL';
3940: --
3941: --
3941: --
3942: BEGIN
3943: /*
3944: IF l_debug_on THEN
3945: WSH_DEBUG_SV.push(l_module_name);
3946: --
3947: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3948: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3949: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3943: /*
3944: IF l_debug_on THEN
3945: WSH_DEBUG_SV.push(l_module_name);
3946: --
3947: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3948: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3949: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3950: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3951: END IF;
3944: IF l_debug_on THEN
3945: WSH_DEBUG_SV.push(l_module_name);
3946: --
3947: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3948: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3949: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3950: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3951: END IF;
3952: */
3945: WSH_DEBUG_SV.push(l_module_name);
3946: --
3947: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3948: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3949: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3950: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3951: END IF;
3952: */
3953:
3946: --
3947: WSH_DEBUG_SV.log(l_module_name,'p_msg_data',p_msg_data);
3948: WSH_DEBUG_SV.log(l_module_name,'p_return_status',p_return_status);
3949: WSH_DEBUG_SV.log(l_module_name,'x_num_warnings',x_num_warnings);
3950: WSH_DEBUG_SV.log(l_module_name,'x_num_errors',x_num_errors);
3951: END IF;
3952: */
3953:
3954: --
4018: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4019: --
4020: IF l_debug_on IS NULL
4021: THEN
4022: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4023: END IF;
4024: --
4025: IF l_debug_on THEN
4026: WSH_DEBUG_SV.push(l_module_name);
4022: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4023: END IF;
4024: --
4025: IF l_debug_on THEN
4026: WSH_DEBUG_SV.push(l_module_name);
4027: --
4028: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
4029: END IF;
4030:
4024: --
4025: IF l_debug_on THEN
4026: WSH_DEBUG_SV.push(l_module_name);
4027: --
4028: WSH_DEBUG_SV.log(l_module_name,'p_delivery_id',p_delivery_id);
4029: END IF;
4030:
4031: OPEN c_orgs(p_delivery_id) ;
4032: FETCH c_orgs INTO l_org_id, l_cnt;
4035: END IF;
4036: CLOSE c_orgs;
4037:
4038: IF l_debug_on THEN
4039: WSH_DEBUG_SV.log(l_module_name,'l_org_id',l_org_id);
4040: WSH_DEBUG_SV.log(l_module_name,'l_cnt',l_cnt);
4041: WSH_DEBUG_SV.pop(l_module_name);
4042: END IF;
4043:
4036: CLOSE c_orgs;
4037:
4038: IF l_debug_on THEN
4039: WSH_DEBUG_SV.log(l_module_name,'l_org_id',l_org_id);
4040: WSH_DEBUG_SV.log(l_module_name,'l_cnt',l_cnt);
4041: WSH_DEBUG_SV.pop(l_module_name);
4042: END IF;
4043:
4044: RETURN l_org_id;
4037:
4038: IF l_debug_on THEN
4039: WSH_DEBUG_SV.log(l_module_name,'l_org_id',l_org_id);
4040: WSH_DEBUG_SV.log(l_module_name,'l_cnt',l_cnt);
4041: WSH_DEBUG_SV.pop(l_module_name);
4042: END IF;
4043:
4044: RETURN l_org_id;
4045: EXCEPTION
4046: WHEN OTHERS THEN
4047: wsh_util_core.default_handler('WSH_UTIL_CORE.GET_OPERATINGUNIT_ID',
4048: l_module_name);
4049: IF l_debug_on THEN
4050: WSH_DEBUG_SV.pop(l_module_name);
4051: END IF;
4052: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4053: END get_operatingUnit_id;
4054:
4080: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4081: --
4082: IF l_debug_on IS NULL
4083: THEN
4084: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4085: END IF;
4086: --
4087: IF l_debug_on THEN
4088: WSH_DEBUG_SV.push(l_module_name);
4084: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4085: END IF;
4086: --
4087: IF l_debug_on THEN
4088: WSH_DEBUG_SV.push(l_module_name);
4089: --
4090: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_LEG_ID',P_STORE_FLAG);
4091: END IF;
4092: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
4086: --
4087: IF l_debug_on THEN
4088: WSH_DEBUG_SV.push(l_module_name);
4089: --
4090: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_LEG_ID',P_STORE_FLAG);
4091: END IF;
4092: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS ;
4093: IF (p_store_flag = FALSE) THEN
4094: x_msg_rec_count.e_count := 0;
4118: --
4119: -- Debug Statements
4120: --
4121: IF l_debug_on THEN
4122: WSH_DEBUG_SV.log(l_module_name,'Error Count', x_msg_rec_count.e_count);
4123: WSH_DEBUG_SV.log(l_module_name,'Warning Count', x_msg_rec_count.w_count);
4124: WSH_DEBUG_SV.log(l_module_name,'Unexpected Error Count', x_msg_rec_count.u_count);
4125: WSH_DEBUG_SV.log(l_module_name,'Success Count', x_msg_rec_count.s_count);
4126: WSH_DEBUG_SV.pop(l_module_name);
4119: -- Debug Statements
4120: --
4121: IF l_debug_on THEN
4122: WSH_DEBUG_SV.log(l_module_name,'Error Count', x_msg_rec_count.e_count);
4123: WSH_DEBUG_SV.log(l_module_name,'Warning Count', x_msg_rec_count.w_count);
4124: WSH_DEBUG_SV.log(l_module_name,'Unexpected Error Count', x_msg_rec_count.u_count);
4125: WSH_DEBUG_SV.log(l_module_name,'Success Count', x_msg_rec_count.s_count);
4126: WSH_DEBUG_SV.pop(l_module_name);
4127: END IF;
4120: --
4121: IF l_debug_on THEN
4122: WSH_DEBUG_SV.log(l_module_name,'Error Count', x_msg_rec_count.e_count);
4123: WSH_DEBUG_SV.log(l_module_name,'Warning Count', x_msg_rec_count.w_count);
4124: WSH_DEBUG_SV.log(l_module_name,'Unexpected Error Count', x_msg_rec_count.u_count);
4125: WSH_DEBUG_SV.log(l_module_name,'Success Count', x_msg_rec_count.s_count);
4126: WSH_DEBUG_SV.pop(l_module_name);
4127: END IF;
4128: --
4121: IF l_debug_on THEN
4122: WSH_DEBUG_SV.log(l_module_name,'Error Count', x_msg_rec_count.e_count);
4123: WSH_DEBUG_SV.log(l_module_name,'Warning Count', x_msg_rec_count.w_count);
4124: WSH_DEBUG_SV.log(l_module_name,'Unexpected Error Count', x_msg_rec_count.u_count);
4125: WSH_DEBUG_SV.log(l_module_name,'Success Count', x_msg_rec_count.s_count);
4126: WSH_DEBUG_SV.pop(l_module_name);
4127: END IF;
4128: --
4129: EXCEPTION
4122: WSH_DEBUG_SV.log(l_module_name,'Error Count', x_msg_rec_count.e_count);
4123: WSH_DEBUG_SV.log(l_module_name,'Warning Count', x_msg_rec_count.w_count);
4124: WSH_DEBUG_SV.log(l_module_name,'Unexpected Error Count', x_msg_rec_count.u_count);
4125: WSH_DEBUG_SV.log(l_module_name,'Success Count', x_msg_rec_count.s_count);
4126: WSH_DEBUG_SV.pop(l_module_name);
4127: END IF;
4128: --
4129: EXCEPTION
4130: WHEN others THEN
4133: --
4134: -- Debug Statements
4135: --
4136: IF l_debug_on THEN
4137: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4138: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4139: END IF;
4140: --
4141:
4134: -- Debug Statements
4135: --
4136: IF l_debug_on THEN
4137: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4138: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4139: END IF;
4140: --
4141:
4142: END Store_Msg_In_Table;
4194: --
4195: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4196: IF l_debug_on IS NULL
4197: THEN
4198: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4199: END IF;
4200: --
4201: IF l_debug_on THEN
4202: wsh_debug_sv.push (l_module_name);
4198: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4199: END IF;
4200: --
4201: IF l_debug_on THEN
4202: wsh_debug_sv.push (l_module_name);
4203: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4204: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4205: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4206: END IF;
4199: END IF;
4200: --
4201: IF l_debug_on THEN
4202: wsh_debug_sv.push (l_module_name);
4203: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4204: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4205: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4206: END IF;
4207: --
4200: --
4201: IF l_debug_on THEN
4202: wsh_debug_sv.push (l_module_name);
4203: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4204: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4205: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4206: END IF;
4207: --
4208: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4201: IF l_debug_on THEN
4202: wsh_debug_sv.push (l_module_name);
4203: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4204: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4205: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4206: END IF;
4207: --
4208: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4209:
4209:
4210: IF p_action = 'PUT' THEN --{
4211: IF p_key IS NULL THEN
4212: IF l_debug_on THEN
4213: WSH_DEBUG_SV.log(l_module_name, 'p_key cannot be null', p_key);
4214: END IF;
4215: RAISE FND_API.G_EXC_ERROR ;
4216: END IF;
4217: IF p_key < C_INDEX_LIMIT THEN
4254: END IF;
4255: END IF; --}
4256: END IF;--}
4257: IF l_debug_on THEN
4258: WSH_DEBUG_SV.pop(l_module_name);
4259: END IF;
4260: EXCEPTION
4261: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4262: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4261: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4262: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4263: --
4264: IF l_debug_on THEN
4265: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4266: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4267: WSH_DEBUG_SV.pop(l_module_name);
4268: END IF;
4269: --
4262: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4263: --
4264: IF l_debug_on THEN
4265: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4266: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4267: WSH_DEBUG_SV.pop(l_module_name);
4268: END IF;
4269: --
4270:
4263: --
4264: IF l_debug_on THEN
4265: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4266: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4267: WSH_DEBUG_SV.pop(l_module_name);
4268: END IF;
4269: --
4270:
4271: WHEN FND_API.G_EXC_ERROR THEN
4271: WHEN FND_API.G_EXC_ERROR THEN
4272: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4273: --
4274: IF l_debug_on THEN
4275: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4276: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4277: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4278: END IF;
4279: --
4272: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4273: --
4274: IF l_debug_on THEN
4275: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4276: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4277: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4278: END IF;
4279: --
4280: WHEN OTHERS THEN
4273: --
4274: IF l_debug_on THEN
4275: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4276: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4277: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4278: END IF;
4279: --
4280: WHEN OTHERS THEN
4281: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4281: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4282: wsh_util_core.default_handler('WSH_UTIL_CORE.GET_CACHED_VALUE');
4283: --
4284: IF l_debug_on THEN
4285: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4286: 'Oracle error message is '||
4287: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4288: WSH_DEBUG_SV.pop(l_module_name,
4289: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4283: --
4284: IF l_debug_on THEN
4285: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4286: 'Oracle error message is '||
4287: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4288: WSH_DEBUG_SV.pop(l_module_name,
4289: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4290: END IF;
4291:
4284: IF l_debug_on THEN
4285: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4286: 'Oracle error message is '||
4287: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4288: WSH_DEBUG_SV.pop(l_module_name,
4289: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4290: END IF;
4291:
4292: END get_cached_value;
4345: --
4346: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4347: IF l_debug_on IS NULL
4348: THEN
4349: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4350: END IF;
4351: --
4352: IF l_debug_on THEN
4353: wsh_debug_sv.push (l_module_name);
4349: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4350: END IF;
4351: --
4352: IF l_debug_on THEN
4353: wsh_debug_sv.push (l_module_name);
4354: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4355: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4356: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4357: END IF;
4350: END IF;
4351: --
4352: IF l_debug_on THEN
4353: wsh_debug_sv.push (l_module_name);
4354: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4355: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4356: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4357: END IF;
4358: --
4351: --
4352: IF l_debug_on THEN
4353: wsh_debug_sv.push (l_module_name);
4354: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4355: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4356: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4357: END IF;
4358: --
4359: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4352: IF l_debug_on THEN
4353: wsh_debug_sv.push (l_module_name);
4354: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4355: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4356: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4357: END IF;
4358: --
4359: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4360:
4360:
4361: IF p_action = 'PUT' THEN --{
4362: IF p_key IS NULL THEN
4363: IF l_debug_on THEN
4364: WSH_DEBUG_SV.log(l_module_name, 'p_key cannot be null', p_key);
4365: END IF;
4366: RAISE FND_API.G_EXC_ERROR ;
4367: END IF;
4368: IF p_key < C_INDEX_LIMIT THEN
4405: END IF;
4406: END IF; --}
4407: END IF;--}
4408: IF l_debug_on THEN
4409: WSH_DEBUG_SV.pop(l_module_name);
4410: END IF;
4411:
4412: EXCEPTION
4413: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4413: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4414: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4415: --
4416: IF l_debug_on THEN
4417: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4418: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4419: WSH_DEBUG_SV.pop(l_module_name);
4420: END IF;
4421: --
4414: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4415: --
4416: IF l_debug_on THEN
4417: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4418: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4419: WSH_DEBUG_SV.pop(l_module_name);
4420: END IF;
4421: --
4422:
4415: --
4416: IF l_debug_on THEN
4417: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4418: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4419: WSH_DEBUG_SV.pop(l_module_name);
4420: END IF;
4421: --
4422:
4423: WHEN FND_API.G_EXC_ERROR THEN
4423: WHEN FND_API.G_EXC_ERROR THEN
4424: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4425: --
4426: IF l_debug_on THEN
4427: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4428: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4429: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4430: END IF;
4431: --
4424: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4425: --
4426: IF l_debug_on THEN
4427: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4428: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4429: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4430: END IF;
4431: --
4432: WHEN OTHERS THEN
4425: --
4426: IF l_debug_on THEN
4427: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4428: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4429: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4430: END IF;
4431: --
4432: WHEN OTHERS THEN
4433: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4433: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4434: wsh_util_core.default_handler('WSH_UTIL_CORE.GET_CACHED_VALUE');
4435: --
4436: IF l_debug_on THEN
4437: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4438: 'Oracle error message is '||
4439: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4440: WSH_DEBUG_SV.pop(l_module_name,
4441: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4435: --
4436: IF l_debug_on THEN
4437: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4438: 'Oracle error message is '||
4439: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4440: WSH_DEBUG_SV.pop(l_module_name,
4441: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4442: END IF;
4443:
4436: IF l_debug_on THEN
4437: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4438: 'Oracle error message is '||
4439: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4440: WSH_DEBUG_SV.pop(l_module_name,
4441: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4442: END IF;
4443:
4444: END get_cached_value;
4495: --
4496: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4497: IF l_debug_on IS NULL
4498: THEN
4499: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4500: END IF;
4501: --
4502: IF l_debug_on THEN
4503: wsh_debug_sv.push (l_module_name);
4499: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4500: END IF;
4501: --
4502: IF l_debug_on THEN
4503: wsh_debug_sv.push (l_module_name);
4504: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4505: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4506: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4507: END IF;
4500: END IF;
4501: --
4502: IF l_debug_on THEN
4503: wsh_debug_sv.push (l_module_name);
4504: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4505: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4506: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4507: END IF;
4508: --
4501: --
4502: IF l_debug_on THEN
4503: wsh_debug_sv.push (l_module_name);
4504: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4505: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4506: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4507: END IF;
4508: --
4509: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4502: IF l_debug_on THEN
4503: wsh_debug_sv.push (l_module_name);
4504: WSH_DEBUG_SV.log(l_module_name, 'p_value', p_value);
4505: WSH_DEBUG_SV.log(l_module_name, 'p_key', p_key);
4506: WSH_DEBUG_SV.log(l_module_name, 'p_action', p_action);
4507: END IF;
4508: --
4509: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4510:
4510:
4511: IF p_action = 'PUT' THEN --{
4512: IF p_key IS NULL THEN
4513: IF l_debug_on THEN
4514: WSH_DEBUG_SV.log(l_module_name, 'p_key cannot be null', p_key);
4515: END IF;
4516: RAISE FND_API.G_EXC_ERROR ;
4517: END IF;
4518: IF p_key < C_INDEX_LIMIT THEN
4555: END IF;
4556: END IF; --}
4557: END IF;--}
4558: IF l_debug_on THEN
4559: WSH_DEBUG_SV.pop(l_module_name);
4560: END IF;
4561:
4562: EXCEPTION
4563: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4563: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
4564: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4565: --
4566: IF l_debug_on THEN
4567: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4568: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4569: WSH_DEBUG_SV.pop(l_module_name);
4570: END IF;
4571: --
4564: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
4565: --
4566: IF l_debug_on THEN
4567: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4568: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4569: WSH_DEBUG_SV.pop(l_module_name);
4570: END IF;
4571: --
4572:
4565: --
4566: IF l_debug_on THEN
4567: WSH_DEBUG_SV.logmsg(l_module_name,'Cache is missed',
4568: WSH_DEBUG_SV.C_EXCEP_LEVEL);
4569: WSH_DEBUG_SV.pop(l_module_name);
4570: END IF;
4571: --
4572:
4573: WHEN FND_API.G_EXC_ERROR THEN
4573: WHEN FND_API.G_EXC_ERROR THEN
4574: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4575: --
4576: IF l_debug_on THEN
4577: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4578: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4579: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4580: END IF;
4581: --
4574: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4575: --
4576: IF l_debug_on THEN
4577: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4578: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4579: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4580: END IF;
4581: --
4582: WHEN OTHERS THEN
4575: --
4576: IF l_debug_on THEN
4577: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has '
4578: || 'occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4579: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4580: END IF;
4581: --
4582: WHEN OTHERS THEN
4583: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4583: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4584: wsh_util_core.default_handler('WSH_UTIL_CORE.GET_CACHED_VALUE');
4585: --
4586: IF l_debug_on THEN
4587: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4588: 'Oracle error message is '||
4589: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4590: WSH_DEBUG_SV.pop(l_module_name,
4591: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4585: --
4586: IF l_debug_on THEN
4587: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4588: 'Oracle error message is '||
4589: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4590: WSH_DEBUG_SV.pop(l_module_name,
4591: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4592: END IF;
4593:
4586: IF l_debug_on THEN
4587: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. '||
4588: 'Oracle error message is '||
4589: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4590: WSH_DEBUG_SV.pop(l_module_name,
4591: 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4592: END IF;
4593:
4594: END get_cached_value;
4606: --
4607: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4608: --
4609: IF l_debug_on IS NULL THEN
4610: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4611: END IF;
4612: --
4613: IF l_debug_on THEN
4614: wsh_debug_sv.push(l_module_name);
4610: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4611: END IF;
4612: --
4613: IF l_debug_on THEN
4614: wsh_debug_sv.push(l_module_name);
4615: wsh_debug_sv.log(l_module_name, 'p_dynamic_tab.COUNT', p_dynamic_tab.COUNT);
4616: END IF;
4617: --
4618:
4611: END IF;
4612: --
4613: IF l_debug_on THEN
4614: wsh_debug_sv.push(l_module_name);
4615: wsh_debug_sv.log(l_module_name, 'p_dynamic_tab.COUNT', p_dynamic_tab.COUNT);
4616: END IF;
4617: --
4618:
4619: IF (p_dynamic_tab.COUNT > 50 ) THEN
4617: --
4618:
4619: IF (p_dynamic_tab.COUNT > 50 ) THEN
4620: IF l_debug_on THEN
4621: wsh_debug_sv.logmsg(l_module_name, 'p_dynamic_tab.COUNT should not be grater than 50');
4622: wsh_debug_sv.pop(l_module_name);
4623: RETURN;
4624: END IF;
4625: END IF;
4618:
4619: IF (p_dynamic_tab.COUNT > 50 ) THEN
4620: IF l_debug_on THEN
4621: wsh_debug_sv.logmsg(l_module_name, 'p_dynamic_tab.COUNT should not be grater than 50');
4622: wsh_debug_sv.pop(l_module_name);
4623: RETURN;
4624: END IF;
4625: END IF;
4626:
6104: p_dynamic_tab(50);
6105: END IF;
6106: --
6107: IF l_debug_on THEN
6108: WSH_DEBUG_SV.pop(l_module_name);
6109: END IF;
6110: --
6111: EXCEPTION
6112: --
6112: --
6113: WHEN OTHERS THEN
6114: --
6115: IF l_debug_on THEN
6116: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6117: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6118: END IF;
6119: --
6120: END OpenDynamicCursor;
6113: WHEN OTHERS THEN
6114: --
6115: IF l_debug_on THEN
6116: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6117: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6118: END IF;
6119: --
6120: END OpenDynamicCursor;
6121: --HVOP heali
6151: BEGIN
6152: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6153:
6154: IF l_debug_on IS NULL THEN
6155: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6156: END IF;
6157:
6158: IF l_debug_on THEN
6159: WSH_DEBUG_SV.push(l_module_name);
6155: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6156: END IF;
6157:
6158: IF l_debug_on THEN
6159: WSH_DEBUG_SV.push(l_module_name);
6160: WSH_DEBUG_SV.log(l_module_name,'p_lookup_type',p_lookup_type);
6161: WSH_DEBUG_SV.log(l_module_name,'P_lookup_code',P_lookup_code);
6162: END IF;
6163:
6156: END IF;
6157:
6158: IF l_debug_on THEN
6159: WSH_DEBUG_SV.push(l_module_name);
6160: WSH_DEBUG_SV.log(l_module_name,'p_lookup_type',p_lookup_type);
6161: WSH_DEBUG_SV.log(l_module_name,'P_lookup_code',P_lookup_code);
6162: END IF;
6163:
6164: OPEN get_meaning;
6157:
6158: IF l_debug_on THEN
6159: WSH_DEBUG_SV.push(l_module_name);
6160: WSH_DEBUG_SV.log(l_module_name,'p_lookup_type',p_lookup_type);
6161: WSH_DEBUG_SV.log(l_module_name,'P_lookup_code',P_lookup_code);
6162: END IF;
6163:
6164: OPEN get_meaning;
6165: FETCH get_meaning INTO l_meaning;
6166: CLOSE get_meaning;
6167:
6168:
6169: IF l_debug_on THEN
6170: WSH_DEBUG_SV.log(l_module_name,'l_meaning',l_meaning);
6171: WSH_DEBUG_SV.pop(l_module_name);
6172: END IF;
6173:
6174: IF (l_meaning IS NULL) THEN
6167:
6168:
6169: IF l_debug_on THEN
6170: WSH_DEBUG_SV.log(l_module_name,'l_meaning',l_meaning);
6171: WSH_DEBUG_SV.pop(l_module_name);
6172: END IF;
6173:
6174: IF (l_meaning IS NULL) THEN
6175: return P_lookup_code;
6179:
6180: EXCEPTION
6181: WHEN others THEN
6182: IF l_debug_on THEN
6183: WSH_DEBUG_SV.pop(l_module_name);
6184: END IF;
6185: return P_lookup_code;
6186: END Get_Lookup_Meaning;
6187:
6212: BEGIN
6213: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6214:
6215: IF l_debug_on IS NULL THEN
6216: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6217: END IF;
6218:
6219: IF l_debug_on THEN
6220: WSH_DEBUG_SV.push(l_module_name);
6216: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6217: END IF;
6218:
6219: IF l_debug_on THEN
6220: WSH_DEBUG_SV.push(l_module_name);
6221: WSH_DEBUG_SV.log(l_module_name,'p_entity',p_entity);
6222: WSH_DEBUG_SV.log(l_module_name,'p_action_code',p_action_code);
6223: END IF;
6224:
6217: END IF;
6218:
6219: IF l_debug_on THEN
6220: WSH_DEBUG_SV.push(l_module_name);
6221: WSH_DEBUG_SV.log(l_module_name,'p_entity',p_entity);
6222: WSH_DEBUG_SV.log(l_module_name,'p_action_code',p_action_code);
6223: END IF;
6224:
6225: IF (p_entity ='DLVB') THEN
6218:
6219: IF l_debug_on THEN
6220: WSH_DEBUG_SV.push(l_module_name);
6221: WSH_DEBUG_SV.log(l_module_name,'p_entity',p_entity);
6222: WSH_DEBUG_SV.log(l_module_name,'p_action_code',p_action_code);
6223: END IF;
6224:
6225: IF (p_entity ='DLVB') THEN
6226: l_lookup_type :='DLVB_PRIVILEGE';
6225: IF (p_entity ='DLVB') THEN
6226: l_lookup_type :='DLVB_PRIVILEGE';
6227:
6228: IF l_debug_on THEN
6229: WSH_DEBUG_SV.log(l_module_name,'Inside DLVB l_lookup_type',l_lookup_type);
6230: END IF;
6231:
6232: IF (p_action_code = 'PICK-RELEASE' ) THEN
6233: l_lookup_code:= 'DLVB_LAUNCH_PR';
6318:
6319: l_lookup_type :='DLVY_PRIVILEGE';
6320:
6321: IF l_debug_on THEN
6322: WSH_DEBUG_SV.log(l_module_name,'Inside DLVY l_lookup_type',l_lookup_type);
6323: END IF;
6324:
6325: IF (p_action_code = 'CONFIRM') THEN
6326: l_lookup_code:= 'DLVY_SHIP_CONFIRM';
6447:
6448: l_lookup_type :='STOP_PRIVILEGE';
6449:
6450: IF l_debug_on THEN
6451: WSH_DEBUG_SV.log(l_module_name,'Inside STOP l_lookup_type',l_lookup_type);
6452: END IF;
6453:
6454: IF (p_action_code = 'UPDATE-STATUS') THEN
6455: l_lookup_code:= 'STOP_UPDATE_STATUS';
6498:
6499: l_lookup_type :='TRIP_PRIVILEGE';
6500:
6501: IF l_debug_on THEN
6502: WSH_DEBUG_SV.log(l_module_name,'Inside TRIP l_lookup_type',l_lookup_type);
6503: END IF;
6504:
6505: IF (p_action_code = 'GENERATE-ROUTING-RESPONSE') THEN
6506: l_lookup_code:= 'TRIP_GENERATE_ROUTING_RESPONSE'; --??
6568:
6569: l_meaning:= Get_Lookup_Meaning(l_lookup_type,l_lookup_code);
6570:
6571: IF l_debug_on THEN
6572: WSH_DEBUG_SV.log(l_module_name,'l_meaning',l_meaning);
6573: WSH_DEBUG_SV.pop(l_module_name);
6574: END IF;
6575:
6576: IF (l_meaning IS NULL) THEN
6569: l_meaning:= Get_Lookup_Meaning(l_lookup_type,l_lookup_code);
6570:
6571: IF l_debug_on THEN
6572: WSH_DEBUG_SV.log(l_module_name,'l_meaning',l_meaning);
6573: WSH_DEBUG_SV.pop(l_module_name);
6574: END IF;
6575:
6576: IF (l_meaning IS NULL) THEN
6577: return p_action_code;
6581:
6582: EXCEPTION
6583: WHEN others THEN
6584: IF l_debug_on THEN
6585: WSH_DEBUG_SV.pop(l_module_name);
6586: END IF;
6587: return p_action_code;
6588: END Get_action_Meaning;
6589:
6602: l_old_pos NUMBER;
6603: l_id_len NUMBER;
6604: l_idx NUMBER:=0;
6605:
6606: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
6607: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'get_idtab_from_string';
6608: BEGIN
6609: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6610: --
6608: BEGIN
6609: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6610: --
6611: IF l_debug_on THEN
6612: wsh_debug_sv.push (l_module_name);
6613: END IF;
6614: --
6615:
6616: IF (p_string IS NOT NULL) THEN
6627: END IF;
6628:
6629: --
6630: IF l_debug_on THEN
6631: wsh_debug_sv.pop (l_module_name);
6632: END IF;
6633: --
6634:
6635: EXCEPTION
6637: WSH_UTIL_CORE.default_handler('WSH_UTIL_CORE.GET_IDTAB_FROM_STRING');
6638: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6639: --
6640: IF l_debug_on THEN
6641: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6642: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6643: END IF;
6644: --
6645: END get_idtab_from_string;
6638: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6639: --
6640: IF l_debug_on THEN
6641: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6642: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6643: END IF;
6644: --
6645: END get_idtab_from_string;
6646:
6656: x_return_status OUT NOCOPY VARCHAR2) IS
6657:
6658: l_string VARCHAR2(32767);
6659: l_itr NUMBER;
6660: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
6661: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'get_string_from_idtab';
6662: BEGIN
6663: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6664: --
6662: BEGIN
6663: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6664: --
6665: IF l_debug_on THEN
6666: wsh_debug_sv.push (l_module_name);
6667: END IF;
6668: --
6669:
6670: l_itr := p_id_tab.FIRST;
6685: x_string := l_string;
6686:
6687: --
6688: IF l_debug_on THEN
6689: wsh_debug_sv.pop (l_module_name);
6690: END IF;
6691: --
6692:
6693: EXCEPTION
6695: WSH_UTIL_CORE.default_handler('WSH_UTIL_CORE.GET_STRING_FROM_IDTAB');
6696: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6697: --
6698: IF l_debug_on THEN
6699: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6700: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6701: END IF;
6702: --
6703: END get_string_from_idtab;
6696: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6697: --
6698: IF l_debug_on THEN
6699: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6700: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6701: END IF;
6702: --
6703: END get_string_from_idtab;
6704:
6725:
6726: p_return_status := null;
6727:
6728: IF l_debug_on IS NULL THEN
6729: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6730: END IF;
6731:
6732: IF l_debug_on THEN
6733: WSH_DEBUG_SV.push(l_module_name);
6729: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6730: END IF;
6731:
6732: IF l_debug_on THEN
6733: WSH_DEBUG_SV.push(l_module_name);
6734: END IF;
6735:
6736: IF p_in_entity_name = 'TRIP'
6737: THEN
6753:
6754: p_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6755:
6756: IF l_debug_on THEN
6757: WSH_DEBUG_SV.push(l_module_name);
6758: END IF;
6759: EXCEPTION
6760: WHEN OTHERS
6761: THEN
6761: THEN
6762: p_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6763: --
6764: IF l_debug_on THEN
6765: WSH_DEBUG_SV.logmsg(l_module_name,'Error has occured. Oracle error message is '|| SQLERRM);
6766: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6767: END IF;
6768: --
6769: END Get_Entity_Name;
6762: p_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6763: --
6764: IF l_debug_on THEN
6765: WSH_DEBUG_SV.logmsg(l_module_name,'Error has occured. Oracle error message is '|| SQLERRM);
6766: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6767: END IF;
6768: --
6769: END Get_Entity_Name;
6770:
6814: --
6815: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6816: IF l_debug_on IS NULL
6817: THEN
6818: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6819: END IF;
6820: --
6821: IF l_debug_on THEN
6822: wsh_debug_sv.push (l_module_name);
6818: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6819: END IF;
6820: --
6821: IF l_debug_on THEN
6822: wsh_debug_sv.push (l_module_name);
6823: wsh_debug_sv.log(l_module_name,'p_reset_flags',p_reset_flags);
6824: wsh_debug_sv.log(l_module_name,'count of stops : ',G_STOP_IDS_STOP_IDS_CACHE.count);
6825: wsh_debug_sv.log(l_module_name,'count of stops2 : ',G_STOP_IDS_STOP_IDS_EXT_CACHE.count);
6826: END IF;
6819: END IF;
6820: --
6821: IF l_debug_on THEN
6822: wsh_debug_sv.push (l_module_name);
6823: wsh_debug_sv.log(l_module_name,'p_reset_flags',p_reset_flags);
6824: wsh_debug_sv.log(l_module_name,'count of stops : ',G_STOP_IDS_STOP_IDS_CACHE.count);
6825: wsh_debug_sv.log(l_module_name,'count of stops2 : ',G_STOP_IDS_STOP_IDS_EXT_CACHE.count);
6826: END IF;
6827: --
6820: --
6821: IF l_debug_on THEN
6822: wsh_debug_sv.push (l_module_name);
6823: wsh_debug_sv.log(l_module_name,'p_reset_flags',p_reset_flags);
6824: wsh_debug_sv.log(l_module_name,'count of stops : ',G_STOP_IDS_STOP_IDS_CACHE.count);
6825: wsh_debug_sv.log(l_module_name,'count of stops2 : ',G_STOP_IDS_STOP_IDS_EXT_CACHE.count);
6826: END IF;
6827: --
6828: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6821: IF l_debug_on THEN
6822: wsh_debug_sv.push (l_module_name);
6823: wsh_debug_sv.log(l_module_name,'p_reset_flags',p_reset_flags);
6824: wsh_debug_sv.log(l_module_name,'count of stops : ',G_STOP_IDS_STOP_IDS_CACHE.count);
6825: wsh_debug_sv.log(l_module_name,'count of stops2 : ',G_STOP_IDS_STOP_IDS_EXT_CACHE.count);
6826: END IF;
6827: --
6828: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6829: l_num_warnings := 0;
6838: l_db_stop_id:= NULL; -- bug 5923014: reset stop id
6839: l_stop_id := G_STOP_IDS_STOP_IDS_CACHE(l_ind).value;
6840: --
6841: IF l_debug_on THEN
6842: WSH_DEBUG_SV.log(l_module_name,'Stop ID for FTE_LOAD_TENDER:',l_stop_id);
6843: END IF;
6844: --
6845: --
6846:
6853: IF (l_db_stop_id is not NULL) THEN
6854: --{
6855:
6856: IF l_debug_on THEN
6857: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6858: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6859: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6860: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6861: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6854: --{
6855:
6856: IF l_debug_on THEN
6857: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6858: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6859: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6860: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6861: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6862: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6855:
6856: IF l_debug_on THEN
6857: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6858: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6859: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6860: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6861: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6862: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6863: END IF;
6856: IF l_debug_on THEN
6857: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6858: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6859: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6860: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6861: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6862: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6863: END IF;
6864:
6857: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6858: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6859: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6860: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6861: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6862: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6863: END IF;
6864:
6865: WSH_TRIPS_ACTIONS.Fte_Load_Tender(
6858: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6859: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6860: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6861: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6862: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6863: END IF;
6864:
6865: WSH_TRIPS_ACTIONS.Fte_Load_Tender(
6866: p_stop_id => l_stop_id ,
6870: p_fill_percent => l_fill_percent ,
6871: x_return_status => l_return_status);
6872:
6873: IF l_debug_on THEN
6874: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6875: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6876: END IF;
6877:
6878: wsh_util_core.api_post_call
6871: x_return_status => l_return_status);
6872:
6873: IF l_debug_on THEN
6874: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6875: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6876: END IF;
6877:
6878: wsh_util_core.api_post_call
6879: (
6895: l_db_stop_id:= NULL; -- bug 5923014: reset stop id
6896: l_stop_id := G_STOP_IDS_STOP_IDS_EXT_CACHE(l_ind).value;
6897: --
6898: IF l_debug_on THEN
6899: WSH_DEBUG_SV.log(l_module_name,'Stop ID for FTE_LOAD_TENDER:',l_stop_id);
6900: END IF;
6901: --
6902: --
6903: open c_get_stop_info(l_stop_id);
6909: IF (l_db_stop_id is not NULL) THEN
6910: --{
6911:
6912: IF l_debug_on THEN
6913: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6914: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6915: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6916: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6917: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6910: --{
6911:
6912: IF l_debug_on THEN
6913: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6914: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6915: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6916: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6917: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6918: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6911:
6912: IF l_debug_on THEN
6913: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6914: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6915: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6916: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6917: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6918: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6919: END IF;
6912: IF l_debug_on THEN
6913: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6914: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6915: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6916: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6917: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6918: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6919: END IF;
6920:
6913: WSH_DEBUG_SV.log(l_module_name,'Stop ID',l_stop_id);
6914: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6915: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6916: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6917: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6918: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6919: END IF;
6920:
6921: WSH_TRIPS_ACTIONS.Fte_Load_Tender(
6914: WSH_DEBUG_SV.log(l_module_name,'l_gross_weight',l_gross_weight);
6915: WSH_DEBUG_SV.log(l_module_name,'l_net_weight',l_net_weight);
6916: WSH_DEBUG_SV.log(l_module_name,'l_volume',l_volume);
6917: WSH_DEBUG_SV.log(l_module_name,'l_fill_percent',l_fill_percent);
6918: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_TRIPS_ACTIONS.Fte_Load_Tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6919: END IF;
6920:
6921: WSH_TRIPS_ACTIONS.Fte_Load_Tender(
6922: p_stop_id => l_stop_id ,
6926: p_fill_percent => l_fill_percent ,
6927: x_return_status => l_return_status);
6928:
6929: IF l_debug_on THEN
6930: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6931: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6932: END IF;
6933:
6934: wsh_util_core.api_post_call
6927: x_return_status => l_return_status);
6928:
6929: IF l_debug_on THEN
6930: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6931: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6932: END IF;
6933:
6934: wsh_util_core.api_post_call
6935: (
6944: l_ind := G_STOP_IDS_STOP_IDS_EXT_CACHE.NEXT(l_ind);
6945: END LOOP;
6946:
6947: IF l_debug_on THEN
6948: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6949: END IF;
6950:
6951:
6952: --call to reset the global cache tables
6952: --call to reset the global cache tables
6953: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags,x_return_status => l_return_status);
6954:
6955: IF l_debug_on THEN
6956: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6957: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6958: END IF;
6959:
6960: wsh_util_core.api_post_call
6953: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags,x_return_status => l_return_status);
6954:
6955: IF l_debug_on THEN
6956: WSH_DEBUG_SV.log(l_module_name,'l_return_status',l_return_status);
6957: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.API_POST_CALL',WSH_DEBUG_SV.C_PROC_LEVEL);
6958: END IF;
6959:
6960: wsh_util_core.api_post_call
6961: (
6972: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6973: END IF;
6974:
6975: IF l_debug_on THEN
6976: WSH_DEBUG_SV.pop(l_module_name);
6977: END IF;
6978:
6979:
6980: EXCEPTION
6983: --
6984: -- Debug Statements
6985: --
6986: IF l_debug_on THEN
6987: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6988: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6989: END IF;
6990: --
6991: --call to reset the global cache tables
6984: -- Debug Statements
6985: --
6986: IF l_debug_on THEN
6987: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6988: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
6989: END IF;
6990: --
6991: --call to reset the global cache tables
6992: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags,x_return_status => l_return_status);
6996: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6997: END IF;
6998: --
6999: IF l_debug_on THEN
7000: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7001: END IF;
7002:
7003:
7004: WHEN others THEN
7004: WHEN others THEN
7005: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7006:
7007: IF l_debug_on THEN
7008: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7009: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
7010: END IF;
7011: --
7012: --call to reset the global cache tables
7005: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7006:
7007: IF l_debug_on THEN
7008: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7009: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.Reset_stops_for_load_tender',WSH_DEBUG_SV.C_PROC_LEVEL);
7010: END IF;
7011: --
7012: --call to reset the global cache tables
7013: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags,x_return_status => l_return_status);
7012: --call to reset the global cache tables
7013: WSH_UTIL_CORE.Reset_stops_for_load_tender(p_reset_flags,x_return_status => l_return_status);
7014:
7015: IF l_debug_on THEN
7016: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7017: END IF;
7018: --
7019:
7020: END Process_stops_for_load_tender;
7041: --
7042: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7043: IF l_debug_on IS NULL
7044: THEN
7045: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7046: END IF;
7047: --
7048: IF l_debug_on THEN
7049: wsh_debug_sv.push (l_module_name);
7045: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7046: END IF;
7047: --
7048: IF l_debug_on THEN
7049: wsh_debug_sv.push (l_module_name);
7050: wsh_debug_sv.log(l_module_name,'p_reset_flags',p_reset_flags);
7051: END IF;
7052: --
7053: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7046: END IF;
7047: --
7048: IF l_debug_on THEN
7049: wsh_debug_sv.push (l_module_name);
7050: wsh_debug_sv.log(l_module_name,'p_reset_flags',p_reset_flags);
7051: END IF;
7052: --
7053: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7054: --
7060: G_START_OF_SESSION_API := null;
7061: END IF;
7062:
7063: IF l_debug_on THEN
7064: WSH_DEBUG_SV.pop(l_module_name);
7065: END IF;
7066:
7067:
7068: EXCEPTION
7074: --
7075: -- Debug Statements
7076: --
7077: IF l_debug_on THEN
7078: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7079: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7080: END IF;
7081: --
7082:
7075: -- Debug Statements
7076: --
7077: IF l_debug_on THEN
7078: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7079: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7080: END IF;
7081: --
7082:
7083: END Reset_stops_for_load_tender;
7117: --
7118: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7119: --
7120: IF l_debug_on IS NULL THEN
7121: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7122: END IF;
7123: --
7124: IF l_debug_on THEN
7125: WSH_DEBUG_SV.push(l_module_name);
7121: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7122: END IF;
7123: --
7124: IF l_debug_on THEN
7125: WSH_DEBUG_SV.push(l_module_name);
7126: WSH_DEBUG_SV.log(l_module_name,'Ship Confirm Rule', p_ship_confirm_rule_id);
7127: WSH_DEBUG_SV.log(l_module_name,'Actual Departure Date', to_char(p_actual_departure_date,'DD/MM/YYYY HH24:MI:SS'));
7128: END IF;
7129: --
7122: END IF;
7123: --
7124: IF l_debug_on THEN
7125: WSH_DEBUG_SV.push(l_module_name);
7126: WSH_DEBUG_SV.log(l_module_name,'Ship Confirm Rule', p_ship_confirm_rule_id);
7127: WSH_DEBUG_SV.log(l_module_name,'Actual Departure Date', to_char(p_actual_departure_date,'DD/MM/YYYY HH24:MI:SS'));
7128: END IF;
7129: --
7130:
7123: --
7124: IF l_debug_on THEN
7125: WSH_DEBUG_SV.push(l_module_name);
7126: WSH_DEBUG_SV.log(l_module_name,'Ship Confirm Rule', p_ship_confirm_rule_id);
7127: WSH_DEBUG_SV.log(l_module_name,'Actual Departure Date', to_char(p_actual_departure_date,'DD/MM/YYYY HH24:MI:SS'));
7128: END IF;
7129: --
7130:
7131: -- Bug 4712256
7132:
7133: IF p_ship_confirm_rule_id IS NULL THEN
7134:
7135: IF l_debug_on THEN
7136: WSH_DEBUG_SV.pop(l_module_name, 'Returning TRUE');
7137: END IF;
7138:
7139: return TRUE;
7140:
7145: FROM WSH_SHIP_CONFIRM_RULES
7146: WHERE ship_confirm_rule_id = p_ship_confirm_rule_id;
7147: --
7148: IF l_debug_on THEN
7149: WSH_DEBUG_SV.log(l_module_name, 'AC Intransit Flag', v_ACIntransitFlag);
7150: END IF;
7151: --
7152: IF v_ACIntransitFlag = 'Y' THEN
7153: --{
7157: IF l_global_params.allow_future_ship_date = 'N' AND p_actual_departure_date > SYSDATE
7158: THEN
7159: --
7160: IF l_debug_on THEN
7161: WSH_DEBUG_SV.pop(l_module_name, 'Returning FALSE');
7162: END IF;
7163: --
7164: RETURN FALSE;
7165: --
7165: --
7166: ELSE
7167: --
7168: IF l_debug_on THEN
7169: WSH_DEBUG_SV.pop(l_module_name, 'Returning TRUE');
7170: END IF;
7171: --
7172: RETURN TRUE;
7173: --
7175: --}
7176: ELSE
7177: --
7178: IF l_debug_on THEN
7179: WSH_DEBUG_SV.pop(l_module_name, 'Returning TRUE');
7180: END IF;
7181: --
7182: RETURN TRUE;
7183: --
7189: --
7190: WSH_UTIL_CORE.default_handler('ValidateActualDepartureDate');
7191: --
7192: IF l_debug_on THEN
7193: WSH_DEBUG_SV.pop(l_module_name, 'Exception: WHEN OTHERS');
7194: END IF;
7195: --
7196: RETURN FALSE;
7197: --
7223: --
7224: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7225: --
7226: IF l_debug_on IS NULL THEN
7227: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7228: END IF;
7229: --
7230: IF l_debug_on THEN
7231: WSH_DEBUG_SV.push(l_module_name);
7227: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7228: END IF;
7229: --
7230: IF l_debug_on THEN
7231: WSH_DEBUG_SV.push(l_module_name);
7232: WSH_DEBUG_SV.log(l_module_name,'p_picking_rule_id', p_picking_rule_id);
7233: END IF;
7234: --
7235: SELECT ship_confirm_rule_id
7228: END IF;
7229: --
7230: IF l_debug_on THEN
7231: WSH_DEBUG_SV.push(l_module_name);
7232: WSH_DEBUG_SV.log(l_module_name,'p_picking_rule_id', p_picking_rule_id);
7233: END IF;
7234: --
7235: SELECT ship_confirm_rule_id
7236: INTO v_SCRuleID
7237: FROM wsh_picking_rules
7238: WHERE picking_rule_id = p_picking_rule_id;
7239: --
7240: IF l_debug_on THEN
7241: WSH_DEBUG_SV.log(l_module_name, 'Ship Confirm Rule', v_SCRuleID);
7242: END IF;
7243: --
7244: IF v_SCRuleID is NOT NULL THEN
7245: --
7243: --
7244: IF v_SCRuleID is NOT NULL THEN
7245: --
7246: IF l_debug_on THEN
7247: WSH_DEBUG_SV.pop(l_module_name);
7248: END IF;
7249: --
7250: RETURN v_SCRuleID;
7251: --
7251: --
7252: ELSE
7253: --
7254: IF l_debug_on THEN
7255: WSH_DEBUG_SV.pop(l_module_name);
7256: END IF;
7257: --
7258: RETURN NULL;
7259: --
7259: --
7260: END IF;
7261: --
7262: IF l_debug_on THEN
7263: WSH_DEBUG_SV.pop(l_module_name);
7264: END IF;
7265: --
7266: EXCEPTION
7267: --
7269: --
7270: WSH_UTIL_CORE.default_handler('GetShipConfirmRule');
7271: --
7272: IF l_debug_on THEN
7273: WSH_DEBUG_SV.pop(l_module_name, 'Exception: WHEN OTHERS');
7274: END IF;
7275: --
7276: RETURN NULL;
7277: --
7293: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7294: --
7295: IF l_debug_on IS NULL
7296: THEN
7297: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7298: END IF;
7299: --
7300: IF l_debug_on THEN
7301: WSH_DEBUG_SV.push(l_module_name);
7297: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7298: END IF;
7299: --
7300: IF l_debug_on THEN
7301: WSH_DEBUG_SV.push(l_module_name);
7302: END IF;
7303: --
7304: IF G_WMS_IS_INSTALLED is NULL THEN
7305: IF (fnd_installation.get(l_wms_application_id, l_wms_application_id,l_wms_install_status,l_industry)) THEN
7317: --
7318: -- Debug Statements
7319: --
7320: IF l_debug_on THEN
7321: WSH_DEBUG_SV.log(l_module_name,'G_WMS_IS_INSTALLED',G_WMS_IS_INSTALLED);
7322: WSH_DEBUG_SV.pop(l_module_name);
7323: END IF;
7324: --
7325: return G_WMS_IS_INSTALLED;
7318: -- Debug Statements
7319: --
7320: IF l_debug_on THEN
7321: WSH_DEBUG_SV.log(l_module_name,'G_WMS_IS_INSTALLED',G_WMS_IS_INSTALLED);
7322: WSH_DEBUG_SV.pop(l_module_name);
7323: END IF;
7324: --
7325: return G_WMS_IS_INSTALLED;
7326:
7326:
7327: EXCEPTION
7328: WHEN OTHERS THEN
7329: IF l_debug_on THEN
7330: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7331: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7332: END IF;
7333: --
7334: RETURN 'N';
7327: EXCEPTION
7328: WHEN OTHERS THEN
7329: IF l_debug_on THEN
7330: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7331: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7332: END IF;
7333: --
7334: RETURN 'N';
7335:
7369: i NUMBER := 0;
7370: l_return_status VARCHAR2(1);
7371: l_cust_string VARCHAR2(2000);
7372:
7373: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
7374: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'get_customer_from_loc';
7375:
7376: BEGIN
7377:
7377:
7378: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7379:
7380: IF l_debug_on THEN
7381: wsh_debug_sv.push(l_module_name);
7382: END IF;
7383:
7384: IF ( p_location_id < g_cache_max_size and g_customer_from_location.EXISTS(p_location_id)) THEN
7385:
7400:
7401: END IF;
7402:
7403: /*IF l_debug_on THEN
7404: wsh_debug_sv.push(l_module_name);
7405: END IF;*/
7406:
7407: /*
7408: x_customer_id := g_customer_from_location(p_location_id);
7438: x_string => l_cust_string,
7439: x_return_status => l_return_status);
7440:
7441: IF l_debug_on THEN
7442: WSH_DEBUG_SV.logmsg(l_module_name,'Org String '||l_cust_string);
7443: END IF;
7444:
7445: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
7446: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7464: IF l_debug_on THEN
7465: i := x_customer_id_tab.FIRST;
7466: IF (i IS NOT NULL) THEN
7467:
7468: WSH_DEBUG_SV.logmsg(l_module_name,'Number of Customers for the location '||p_location_id||'is :'|| x_customer_id_tab.COUNT);
7469: LOOP
7470: WSH_DEBUG_SV.logmsg(l_module_name,'Customer_id :'||x_customer_id_tab(i));
7471: EXIT WHEN i = x_customer_id_tab.LAST;
7472: i := x_customer_id_tab.NEXT(i);
7466: IF (i IS NOT NULL) THEN
7467:
7468: WSH_DEBUG_SV.logmsg(l_module_name,'Number of Customers for the location '||p_location_id||'is :'|| x_customer_id_tab.COUNT);
7469: LOOP
7470: WSH_DEBUG_SV.logmsg(l_module_name,'Customer_id :'||x_customer_id_tab(i));
7471: EXIT WHEN i = x_customer_id_tab.LAST;
7472: i := x_customer_id_tab.NEXT(i);
7473: END LOOP;
7474:
7472: i := x_customer_id_tab.NEXT(i);
7473: END LOOP;
7474:
7475: ELSE
7476: WSH_DEBUG_SV.logmsg(l_module_name,'No Organization assocaited with location '||p_location_id);
7477:
7478: END IF;
7479:
7480: WSH_DEBUG_SV.pop(l_module_name);
7476: WSH_DEBUG_SV.logmsg(l_module_name,'No Organization assocaited with location '||p_location_id);
7477:
7478: END IF;
7479:
7480: WSH_DEBUG_SV.pop(l_module_name);
7481: END IF;
7482: --
7483:
7484: EXCEPTION
7485: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7486: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7487: --
7488: IF l_debug_on THEN
7489: WSH_DEBUG_SV.pop(l_module_name,'FND_API.EXCEPTION:G_EXC_UNEXPECTED_ERROR');
7490: END IF;
7491: WHEN others THEN
7492: IF c_get_customer%ISOPEN THEN
7493: CLOSE c_get_customer;
7495: WSH_UTIL_CORE.default_handler('WSH_UTIL_CORE.get_customer_from_loc');
7496: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7497: --
7498: IF l_debug_on THEN
7499: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7500: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7501: END IF;
7502: --
7503: END get_customer_from_loc;
7496: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7497: --
7498: IF l_debug_on THEN
7499: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7500: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7501: END IF;
7502: --
7503: END get_customer_from_loc;
7504:
7536: i NUMBER;
7537: l_return_status VARCHAR2(1);
7538: l_org_string VARCHAR2(32767);
7539:
7540: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
7541: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'get_org_from_location';
7542:
7543: BEGIN
7544: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7543: BEGIN
7544: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7545:
7546: IF l_debug_on THEN
7547: wsh_debug_sv.push(l_module_name);
7548: END IF;
7549:
7550: IF (p_location_id < g_cache_max_size and g_organization_from_location.EXISTS(p_location_id)) THEN
7551:
7566:
7567: END IF;
7568:
7569: /*IF l_debug_on THEN
7570: wsh_debug_sv.push(l_module_name);
7571: END IF;*/
7572:
7573: ELSE
7574:
7592: x_string => l_org_string,
7593: x_return_status => l_return_status);
7594:
7595: IF l_debug_on THEN
7596: WSH_DEBUG_SV.logmsg(l_module_name,'Org String '||l_org_string);
7597: END IF;
7598:
7599: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
7600: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7613:
7614: i := x_organization_tab.FIRST;
7615: IF (i IS NOT NULL) THEN
7616:
7617: WSH_DEBUG_SV.logmsg(l_module_name,'Number of Organizations for the location '||p_location_id||'is :'|| x_organization_tab.COUNT);
7618: LOOP
7619: WSH_DEBUG_SV.logmsg(l_module_name,'Organization_id :'||x_organization_tab(i));
7620: EXIT WHEN i = x_organization_tab.LAST;
7621: i := x_organization_tab.NEXT(i);
7615: IF (i IS NOT NULL) THEN
7616:
7617: WSH_DEBUG_SV.logmsg(l_module_name,'Number of Organizations for the location '||p_location_id||'is :'|| x_organization_tab.COUNT);
7618: LOOP
7619: WSH_DEBUG_SV.logmsg(l_module_name,'Organization_id :'||x_organization_tab(i));
7620: EXIT WHEN i = x_organization_tab.LAST;
7621: i := x_organization_tab.NEXT(i);
7622: END LOOP;
7623:
7621: i := x_organization_tab.NEXT(i);
7622: END LOOP;
7623:
7624: ELSE
7625: WSH_DEBUG_SV.logmsg(l_module_name,'No Organization assocaited with location '||p_location_id);
7626:
7627: END IF;
7628:
7629: WSH_DEBUG_SV.pop(l_module_name);
7625: WSH_DEBUG_SV.logmsg(l_module_name,'No Organization assocaited with location '||p_location_id);
7626:
7627: END IF;
7628:
7629: WSH_DEBUG_SV.pop(l_module_name);
7630:
7631: END IF;
7632: --
7633:
7642: WSH_UTIL_CORE.default_handler('WSH_UTIL_CORE.get_org_from_loc');
7643:
7644: --
7645: IF l_debug_on THEN
7646: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7647: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7648: END IF;
7649: --
7650: END get_org_from_location;
7643:
7644: --
7645: IF l_debug_on THEN
7646: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7647: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7648: END IF;
7649: --
7650: END get_org_from_location;
7651:
7712: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7713: --
7714: IF l_debug_on IS NULL
7715: THEN
7716: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7717: END IF;
7718: --
7719: IF l_debug_on THEN
7720: --
7717: END IF;
7718: --
7719: IF l_debug_on THEN
7720: --
7721: WSH_DEBUG_SV.push(l_module_name);
7722: WSH_DEBUG_SV.log(l_module_name, 'p_entity_type', p_entity_type);
7723: WSH_DEBUG_SV.log(l_module_name, 'p_entity_id', p_entity_id);
7724: --
7725: END IF;
7718: --
7719: IF l_debug_on THEN
7720: --
7721: WSH_DEBUG_SV.push(l_module_name);
7722: WSH_DEBUG_SV.log(l_module_name, 'p_entity_type', p_entity_type);
7723: WSH_DEBUG_SV.log(l_module_name, 'p_entity_id', p_entity_id);
7724: --
7725: END IF;
7726: --
7719: IF l_debug_on THEN
7720: --
7721: WSH_DEBUG_SV.push(l_module_name);
7722: WSH_DEBUG_SV.log(l_module_name, 'p_entity_type', p_entity_type);
7723: WSH_DEBUG_SV.log(l_module_name, 'p_entity_id', p_entity_id);
7724: --
7725: END IF;
7726: --
7727: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7761: --
7762: l_error_flag := TRUE;
7763: --
7764: IF l_debug_on THEN
7765: WSH_DEBUG_SV.log(l_module_name, 'Error: Delivery line not found for LPN_ID', p_entity_id);
7766: END IF;
7767: --
7768: END IF;
7769:
7773: --
7774: l_error_flag := TRUE;
7775: --
7776: IF l_debug_on THEN
7777: WSH_DEBUG_SV.log(l_module_name, 'Error: There exists more than one delivery for LPN_ID', p_entity_id);
7778: END IF;
7779: --
7780: END IF;
7781: END IF;
7786: --
7787: -- Debug Statements
7788: --
7789: IF l_debug_on THEN
7790: WSH_DEBUG_SV.logmsg(l_module_name,'Invalid Entity Type Passed');
7791: END IF;
7792: --
7793: FND_MESSAGE.SET_NAME ( 'WSH', 'WSH_INVALID_ENTITY_TYPE' );
7794: FND_MESSAGE.SET_TOKEN ('ENT_TYPE', p_entity_type );
7811:
7812: --
7813: IF l_debug_on THEN
7814: --
7815: WSH_DEBUG_SV.pop(l_module_name);
7816: --
7817: END IF;
7818: --
7819:
7822: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
7823: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.Get_Delivery_Status');
7824: --
7825: IF l_debug_on THEN
7826: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM, WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7827: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:OTHERS');
7828: END IF;
7829: --
7830: IF ( c_get_delivery_status%ISOPEN ) THEN
7823: wsh_util_core.default_handler('WSH_DELIVERY_VALIDATIONS.Get_Delivery_Status');
7824: --
7825: IF l_debug_on THEN
7826: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM, WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7827: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:OTHERS');
7828: END IF;
7829: --
7830: IF ( c_get_delivery_status%ISOPEN ) THEN
7831: close c_get_delivery_status;
7872: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7873: --
7874: IF l_debug_on IS NULL
7875: THEN
7876: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7877: END IF;
7878: --
7879: IF l_debug_on THEN
7880: WSH_DEBUG_SV.push(l_module_name);
7876: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7877: END IF;
7878: --
7879: IF l_debug_on THEN
7880: WSH_DEBUG_SV.push(l_module_name);
7881: END IF;
7882: --
7883:
7884: IF G_OTM_PROFILE_VALUE IS NULL THEN
7886: G_OTM_PROFILE_VALUE := NVL(fnd_profile.value('WSH_OTM_INSTALLED'), 'N');
7887: END IF;
7888:
7889: IF l_debug_on THEN
7890: WSH_DEBUG_SV.log(l_module_name,'G_OTM_PROFILE_VALUE',G_OTM_PROFILE_VALUE);
7891: WSH_DEBUG_SV.pop(l_module_name);
7892: END IF;
7893:
7894: return G_OTM_PROFILE_VALUE;
7887: END IF;
7888:
7889: IF l_debug_on THEN
7890: WSH_DEBUG_SV.log(l_module_name,'G_OTM_PROFILE_VALUE',G_OTM_PROFILE_VALUE);
7891: WSH_DEBUG_SV.pop(l_module_name);
7892: END IF;
7893:
7894: return G_OTM_PROFILE_VALUE;
7895: END Get_Otm_Install_Profile_Value;
7920: --
7921: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7922: --
7923: IF l_debug_on IS NULL THEN
7924: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7925: END IF;
7926: --
7927: IF l_debug_on THEN
7928: WSH_DEBUG_SV.push(l_module_name);
7924: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7925: END IF;
7926: --
7927: IF l_debug_on THEN
7928: WSH_DEBUG_SV.push(l_module_name);
7929: END IF;
7930: --
7931:
7932: IF G_GC3_IS_INSTALLED IS NULL THEN
7944: --
7945: -- Debug Statements
7946: --
7947: IF l_debug_on THEN
7948: WSH_DEBUG_SV.log(l_module_name,'G_GC3_IS_INSTALLED',G_GC3_IS_INSTALLED);
7949: WSH_DEBUG_SV.pop(l_module_name);
7950: END IF;
7951: --
7952: return G_GC3_IS_INSTALLED;
7945: -- Debug Statements
7946: --
7947: IF l_debug_on THEN
7948: WSH_DEBUG_SV.log(l_module_name,'G_GC3_IS_INSTALLED',G_GC3_IS_INSTALLED);
7949: WSH_DEBUG_SV.pop(l_module_name);
7950: END IF;
7951: --
7952: return G_GC3_IS_INSTALLED;
7953: END GC3_Is_Installed;
7983:
7984: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7985:
7986: IF l_debug_on IS NULL THEN
7987: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7988: END IF;
7989:
7990: IF l_debug_on THEN
7991: WSH_DEBUG_SV.push(l_module_name);
7987: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7988: END IF;
7989:
7990: IF l_debug_on THEN
7991: WSH_DEBUG_SV.push(l_module_name);
7992: END IF;
7993:
7994: x_curr_conv_type := NULL;
7995: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7996:
7997: -- no cached value, call fnd_profile.value
7998: IF G_CURRENCY_CONVERSION_TYPE IS NULL then
7999: IF l_debug_on THEN
8000: WSH_DEBUG_SV.logmsg(l_module_name, 'calling fnd_profile.value');
8001: END IF;
8002: G_CURRENCY_CONVERSION_TYPE := fnd_profile.value
8003: (name => 'WSH_OTM_CURR_CONV_TYPE');
8004: -- no value is defined for the profile option
8008: END IF;
8009: x_curr_conv_type := G_CURRENCY_CONVERSION_TYPE;
8010:
8011: IF l_debug_on THEN
8012: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8013: WSH_DEBUG_SV.log(l_module_name, 'currency_conversion_type', x_curr_conv_type);
8014: WSH_DEBUG_SV.pop(l_module_name);
8015: END IF;
8016:
8009: x_curr_conv_type := G_CURRENCY_CONVERSION_TYPE;
8010:
8011: IF l_debug_on THEN
8012: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8013: WSH_DEBUG_SV.log(l_module_name, 'currency_conversion_type', x_curr_conv_type);
8014: WSH_DEBUG_SV.pop(l_module_name);
8015: END IF;
8016:
8017: EXCEPTION
8010:
8011: IF l_debug_on THEN
8012: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8013: WSH_DEBUG_SV.log(l_module_name, 'currency_conversion_type', x_curr_conv_type);
8014: WSH_DEBUG_SV.pop(l_module_name);
8015: END IF;
8016:
8017: EXCEPTION
8018: when CURR_CONV_TYPE_UNDEFINED_EXP then
8019: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8020: fnd_message.set_name('WSH', 'WSH_CURR_CONV_TYPE_UNDEFINED');
8021: wsh_util_core.add_message(x_return_status);
8022: IF l_debug_on THEN
8023: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8024: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH: Currency Conversion Type for OTM profile value is not defined.');
8025: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION');
8026: END IF;
8027:
8020: fnd_message.set_name('WSH', 'WSH_CURR_CONV_TYPE_UNDEFINED');
8021: wsh_util_core.add_message(x_return_status);
8022: IF l_debug_on THEN
8023: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8024: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH: Currency Conversion Type for OTM profile value is not defined.');
8025: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION');
8026: END IF;
8027:
8028: when OTHERS then
8021: wsh_util_core.add_message(x_return_status);
8022: IF l_debug_on THEN
8023: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8024: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH: Currency Conversion Type for OTM profile value is not defined.');
8025: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION');
8026: END IF;
8027:
8028: when OTHERS then
8029: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8029: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8030: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_UTIL_CORE.get_currency_conversion_type', l_module_name);
8031:
8032: IF l_debug_on THEN
8033: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8034: WSH_DEBUG_SV.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8035: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:OTHERS');
8036: END IF;
8037: END Get_Currency_Conversion_Type;
8030: WSH_UTIL_CORE.DEFAULT_HANDLER('WSH_UTIL_CORE.get_currency_conversion_type', l_module_name);
8031:
8032: IF l_debug_on THEN
8033: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8034: WSH_DEBUG_SV.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8035: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:OTHERS');
8036: END IF;
8037: END Get_Currency_Conversion_Type;
8038:
8031:
8032: IF l_debug_on THEN
8033: WSH_DEBUG_SV.log(l_module_name, 'x_return_status', x_return_status);
8034: WSH_DEBUG_SV.logmsg(l_module_name, 'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8035: WSH_DEBUG_SV.pop(l_module_name, 'EXCEPTION:OTHERS');
8036: END IF;
8037: END Get_Currency_Conversion_Type;
8038:
8039: /* OTM - R12 - o/b BPEL */
8058: --{
8059:
8060: l_api_name CONSTANT VARCHAR2(30) := 'GET_TRIP_ORGANIZATION_ID';
8061: l_api_version CONSTANT NUMBER := 1.0;
8062: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
8063: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || l_api_name;
8064:
8065:
8066: l_first_stop_loc_id NUMBER;
8083: BEGIN
8084:
8085:
8086: IF l_debug_on THEN
8087: WSH_DEBUG_SV.push(l_module_name);
8088: END IF;
8089:
8090: l_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8091: l_number_of_warnings := 0;
8099: -- location, Org Id and the there by carrier site.
8100:
8101: IF l_debug_on
8102: THEN
8103: WSH_DEBUG_SV.logmsg(l_module_name,' Getting trip stop information ',
8104: WSH_DEBUG_SV.C_PROC_LEVEL);
8105: END IF;
8106:
8107: GET_FIRST_LAST_STOP_INFO(x_return_status => l_return_status,
8100:
8101: IF l_debug_on
8102: THEN
8103: WSH_DEBUG_SV.logmsg(l_module_name,' Getting trip stop information ',
8104: WSH_DEBUG_SV.C_PROC_LEVEL);
8105: END IF;
8106:
8107: GET_FIRST_LAST_STOP_INFO(x_return_status => l_return_status,
8108: x_arrival_date => l_arrival_date,
8151: END IF;
8152: EXCEPTION
8153: WHEN OTHERS THEN
8154: IF l_debug_on THEN
8155: WSH_DEBUG_SV.logmsg(l_module_name,'In WHEN OTHERS',WSH_DEBUG_SV.C_PROC_LEVEL);
8156: WSH_DEBUG_SV.logmsg(l_module_name,'Getting organization from the corresponding delivery',WSH_DEBUG_SV.C_PROC_LEVEL);
8157: END IF;
8158: -- Bug 6633529: Adding Rownum = 1 for Trips having more than 1 delivery for the same organization
8159: SELECT dlvy.ORGANIZATION_ID
8152: EXCEPTION
8153: WHEN OTHERS THEN
8154: IF l_debug_on THEN
8155: WSH_DEBUG_SV.logmsg(l_module_name,'In WHEN OTHERS',WSH_DEBUG_SV.C_PROC_LEVEL);
8156: WSH_DEBUG_SV.logmsg(l_module_name,'Getting organization from the corresponding delivery',WSH_DEBUG_SV.C_PROC_LEVEL);
8157: END IF;
8158: -- Bug 6633529: Adding Rownum = 1 for Trips having more than 1 delivery for the same organization
8159: SELECT dlvy.ORGANIZATION_ID
8160: INTO l_organization_id
8189: END IF;
8190:
8191:
8192: IF l_debug_on THEN
8193: WSH_DEBUG_SV.pop(l_module_name);
8194: END IF;
8195:
8196: return l_organization_id;
8197:
8199: EXCEPTION
8200: --{
8201: WHEN FND_API.G_EXC_ERROR THEN
8202: IF l_debug_on THEN
8203: WSH_DEBUG_SV.pop(l_module_name);
8204: END IF;
8205: return null;
8206:
8207: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8205: return null;
8206:
8207: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8208: IF l_debug_on THEN
8209: WSH_DEBUG_SV.pop(l_module_name);
8210: END IF;
8211: return null;
8212:
8213: WHEN OTHERS THEN
8211: return null;
8212:
8213: WHEN OTHERS THEN
8214: IF l_debug_on THEN
8215: WSH_DEBUG_SV.pop(l_module_name);
8216: END IF;
8217: return null;
8218:
8219: END GET_TRIP_ORGANIZATION_ID;
8276: --{
8277:
8278: l_api_name CONSTANT VARCHAR2(30) := 'GET_FIRST_LAST_STOP_INFO';
8279: l_api_version CONSTANT NUMBER := 1.0;
8280: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
8281: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || l_api_name;
8282:
8283: --l_stop_loc_id_tbl FTE_ID_TAB_TYPE; -- removed since is not used
8284: --l_stop_id_tbl FTE_ID_TAB_TYPE; -- removed since is not used
8289:
8290: BEGIN
8291:
8292: IF l_debug_on THEN
8293: WSH_DEBUG_SV.push(l_module_name);
8294: END IF;
8295:
8296: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8297:
8296: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8297:
8298: IF l_debug_on
8299: THEN
8300: WSH_DEBUG_SV.logmsg(l_module_name,' Getting trip stop information ',
8301: WSH_DEBUG_SV.C_PROC_LEVEL);
8302: END IF;
8303:
8304: l_idx := 0;
8297:
8298: IF l_debug_on
8299: THEN
8300: WSH_DEBUG_SV.logmsg(l_module_name,' Getting trip stop information ',
8301: WSH_DEBUG_SV.C_PROC_LEVEL);
8302: END IF;
8303:
8304: l_idx := 0;
8305:
8341: END LOOP;
8342: --
8343: IF l_debug_on
8344: THEN
8345: WSH_DEBUG_SV.logmsg(l_module_name,' First stop STOP_ID ' || x_first_stop_id,
8346: WSH_DEBUG_SV.C_PROC_LEVEL);
8347: WSH_DEBUG_SV.logmsg(l_module_name,' First stop Stop Loc Id ' || x_first_stop_loc_id,
8348: WSH_DEBUG_SV.C_PROC_LEVEL);
8349: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8342: --
8343: IF l_debug_on
8344: THEN
8345: WSH_DEBUG_SV.logmsg(l_module_name,' First stop STOP_ID ' || x_first_stop_id,
8346: WSH_DEBUG_SV.C_PROC_LEVEL);
8347: WSH_DEBUG_SV.logmsg(l_module_name,' First stop Stop Loc Id ' || x_first_stop_loc_id,
8348: WSH_DEBUG_SV.C_PROC_LEVEL);
8349: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8350: WSH_DEBUG_SV.C_PROC_LEVEL);
8343: IF l_debug_on
8344: THEN
8345: WSH_DEBUG_SV.logmsg(l_module_name,' First stop STOP_ID ' || x_first_stop_id,
8346: WSH_DEBUG_SV.C_PROC_LEVEL);
8347: WSH_DEBUG_SV.logmsg(l_module_name,' First stop Stop Loc Id ' || x_first_stop_loc_id,
8348: WSH_DEBUG_SV.C_PROC_LEVEL);
8349: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8350: WSH_DEBUG_SV.C_PROC_LEVEL);
8351: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8344: THEN
8345: WSH_DEBUG_SV.logmsg(l_module_name,' First stop STOP_ID ' || x_first_stop_id,
8346: WSH_DEBUG_SV.C_PROC_LEVEL);
8347: WSH_DEBUG_SV.logmsg(l_module_name,' First stop Stop Loc Id ' || x_first_stop_loc_id,
8348: WSH_DEBUG_SV.C_PROC_LEVEL);
8349: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8350: WSH_DEBUG_SV.C_PROC_LEVEL);
8351: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8352: WSH_DEBUG_SV.C_PROC_LEVEL);
8345: WSH_DEBUG_SV.logmsg(l_module_name,' First stop STOP_ID ' || x_first_stop_id,
8346: WSH_DEBUG_SV.C_PROC_LEVEL);
8347: WSH_DEBUG_SV.logmsg(l_module_name,' First stop Stop Loc Id ' || x_first_stop_loc_id,
8348: WSH_DEBUG_SV.C_PROC_LEVEL);
8349: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8350: WSH_DEBUG_SV.C_PROC_LEVEL);
8351: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8352: WSH_DEBUG_SV.C_PROC_LEVEL);
8353: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop Stop loc id ' || x_last_stop_loc_id,
8346: WSH_DEBUG_SV.C_PROC_LEVEL);
8347: WSH_DEBUG_SV.logmsg(l_module_name,' First stop Stop Loc Id ' || x_first_stop_loc_id,
8348: WSH_DEBUG_SV.C_PROC_LEVEL);
8349: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8350: WSH_DEBUG_SV.C_PROC_LEVEL);
8351: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8352: WSH_DEBUG_SV.C_PROC_LEVEL);
8353: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop Stop loc id ' || x_last_stop_loc_id,
8354: WSH_DEBUG_SV.C_PROC_LEVEL);
8347: WSH_DEBUG_SV.logmsg(l_module_name,' First stop Stop Loc Id ' || x_first_stop_loc_id,
8348: WSH_DEBUG_SV.C_PROC_LEVEL);
8349: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8350: WSH_DEBUG_SV.C_PROC_LEVEL);
8351: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8352: WSH_DEBUG_SV.C_PROC_LEVEL);
8353: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop Stop loc id ' || x_last_stop_loc_id,
8354: WSH_DEBUG_SV.C_PROC_LEVEL);
8355: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop arrival date ' || x_arrival_date,
8348: WSH_DEBUG_SV.C_PROC_LEVEL);
8349: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8350: WSH_DEBUG_SV.C_PROC_LEVEL);
8351: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8352: WSH_DEBUG_SV.C_PROC_LEVEL);
8353: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop Stop loc id ' || x_last_stop_loc_id,
8354: WSH_DEBUG_SV.C_PROC_LEVEL);
8355: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop arrival date ' || x_arrival_date,
8356: WSH_DEBUG_SV.C_PROC_LEVEL);
8349: WSH_DEBUG_SV.logmsg(l_module_name,' First stop departure date ' || x_departure_date,
8350: WSH_DEBUG_SV.C_PROC_LEVEL);
8351: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8352: WSH_DEBUG_SV.C_PROC_LEVEL);
8353: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop Stop loc id ' || x_last_stop_loc_id,
8354: WSH_DEBUG_SV.C_PROC_LEVEL);
8355: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop arrival date ' || x_arrival_date,
8356: WSH_DEBUG_SV.C_PROC_LEVEL);
8357: END IF;
8350: WSH_DEBUG_SV.C_PROC_LEVEL);
8351: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8352: WSH_DEBUG_SV.C_PROC_LEVEL);
8353: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop Stop loc id ' || x_last_stop_loc_id,
8354: WSH_DEBUG_SV.C_PROC_LEVEL);
8355: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop arrival date ' || x_arrival_date,
8356: WSH_DEBUG_SV.C_PROC_LEVEL);
8357: END IF;
8358:
8351: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop STOP_ID ' || x_last_stop_id,
8352: WSH_DEBUG_SV.C_PROC_LEVEL);
8353: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop Stop loc id ' || x_last_stop_loc_id,
8354: WSH_DEBUG_SV.C_PROC_LEVEL);
8355: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop arrival date ' || x_arrival_date,
8356: WSH_DEBUG_SV.C_PROC_LEVEL);
8357: END IF;
8358:
8359:
8352: WSH_DEBUG_SV.C_PROC_LEVEL);
8353: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop Stop loc id ' || x_last_stop_loc_id,
8354: WSH_DEBUG_SV.C_PROC_LEVEL);
8355: WSH_DEBUG_SV.logmsg(l_module_name,' Last stop arrival date ' || x_arrival_date,
8356: WSH_DEBUG_SV.C_PROC_LEVEL);
8357: END IF;
8358:
8359:
8360:
8367: CLOSE GET_TRIP_STOPS_DROP;
8368: END IF;
8369:
8370: IF l_debug_on THEN
8371: WSH_DEBUG_SV.pop(l_module_name);
8372: END IF;
8373:
8374: --}
8375: EXCEPTION
8376: --{
8377: WHEN FND_API.G_EXC_ERROR THEN
8378: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8379: IF l_debug_on THEN
8380: WSH_DEBUG_SV.pop(l_module_name);
8381: END IF;
8382:
8383: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8384: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8382:
8383: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8384: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
8385: IF l_debug_on THEN
8386: WSH_DEBUG_SV.pop(l_module_name);
8387: END IF;
8388: WHEN OTHERS THEN
8389: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8390:
8397: CLOSE GET_TRIP_STOPS_DROP;
8398: END IF;
8399:
8400: IF l_debug_on THEN
8401: WSH_DEBUG_SV.pop(l_module_name);
8402: END IF;
8403:
8404: END GET_FIRST_LAST_STOP_INFO;
8405:
8433: --
8434: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8435: --
8436: IF l_debug_on IS NULL THEN
8437: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8438: END IF;
8439: --
8440: IF l_debug_on THEN
8441: WSH_DEBUG_SV.push(l_module_name);
8437: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8438: END IF;
8439: --
8440: IF l_debug_on THEN
8441: WSH_DEBUG_SV.push(l_module_name);
8442: WSH_DEBUG_SV.log(l_module_name, 'p_organization_id', p_organization_id );
8443: END IF;
8444: --
8445:
8438: END IF;
8439: --
8440: IF l_debug_on THEN
8441: WSH_DEBUG_SV.push(l_module_name);
8442: WSH_DEBUG_SV.log(l_module_name, 'p_organization_id', p_organization_id );
8443: END IF;
8444: --
8445:
8446: BEGIN
8453: EXCEPTION
8454: WHEN NO_DATA_FOUND THEN
8455: --
8456: IF l_debug_on THEN
8457: WSH_DEBUG_SV.logmsg(l_module_name, 'Inside No_Data_Found');
8458: END IF;
8459: --
8460: l_org_id := -1;
8461: WHEN OTHERS THEN
8460: l_org_id := -1;
8461: WHEN OTHERS THEN
8462: --
8463: IF l_debug_on THEN
8464: WSH_DEBUG_SV.log(l_module_name, 'Inside Others Exception', sqlerrm);
8465: END IF;
8466: --
8467: l_org_id := -1;
8468: END;
8468: END;
8469:
8470: --
8471: IF l_debug_on THEN
8472: WSH_DEBUG_SV.log(l_module_name, 'Operating Unit(org_id)', l_org_id);
8473: WSH_DEBUG_SV.pop(l_module_name);
8474: END IF;
8475: --
8476: RETURN l_org_id;
8469:
8470: --
8471: IF l_debug_on THEN
8472: WSH_DEBUG_SV.log(l_module_name, 'Operating Unit(org_id)', l_org_id);
8473: WSH_DEBUG_SV.pop(l_module_name);
8474: END IF;
8475: --
8476: RETURN l_org_id;
8477: EXCEPTION
8478: WHEN OTHERS THEN
8479: WSH_UTIL_CORE.Default_Handler('WSH_SHIPMENT_REQUEST_PKG.Get_Operating_Unit');
8480: --
8481: IF l_debug_on THEN
8482: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8483: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8484: END IF;
8485: --
8486: RETURN -1;
8479: WSH_UTIL_CORE.Default_Handler('WSH_SHIPMENT_REQUEST_PKG.Get_Operating_Unit');
8480: --
8481: IF l_debug_on THEN
8482: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8483: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8484: END IF;
8485: --
8486: RETURN -1;
8487: END Get_Operating_Unit;
8513: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8514: --
8515: IF l_debug_on IS NULL
8516: THEN
8517: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8518: END IF;
8519: --
8520: IF l_debug_on THEN
8521: WSH_DEBUG_SV.push(l_module_name);
8517: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8518: END IF;
8519: --
8520: IF l_debug_on THEN
8521: WSH_DEBUG_SV.push(l_module_name);
8522: WSH_DEBUG_SV.log(l_module_name,'P_NAME',p_name);
8523: WSH_DEBUG_SV.log(l_module_name,'P_VALUE',p_value);
8524: END IF;
8525: --
8518: END IF;
8519: --
8520: IF l_debug_on THEN
8521: WSH_DEBUG_SV.push(l_module_name);
8522: WSH_DEBUG_SV.log(l_module_name,'P_NAME',p_name);
8523: WSH_DEBUG_SV.log(l_module_name,'P_VALUE',p_value);
8524: END IF;
8525: --
8526: FND_PROFILE.PUT(NAME=>p_name,
8519: --
8520: IF l_debug_on THEN
8521: WSH_DEBUG_SV.push(l_module_name);
8522: WSH_DEBUG_SV.log(l_module_name,'P_NAME',p_name);
8523: WSH_DEBUG_SV.log(l_module_name,'P_VALUE',p_value);
8524: END IF;
8525: --
8526: FND_PROFILE.PUT(NAME=>p_name,
8527: VAL =>p_value);
8526: FND_PROFILE.PUT(NAME=>p_name,
8527: VAL =>p_value);
8528: --
8529: IF l_debug_on THEN
8530: WSH_DEBUG_SV.pop(l_module_name);
8531: END IF;
8532: --
8533: EXCEPTION
8534: WHEN others THEN
8534: WHEN others THEN
8535: --
8536: IF l_debug_on THEN
8537: --
8538: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
8539: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8540: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8541: --
8542: END IF;
8535: --
8536: IF l_debug_on THEN
8537: --
8538: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
8539: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8540: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8541: --
8542: END IF;
8543: --
8536: IF l_debug_on THEN
8537: --
8538: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
8539: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8540: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8541: --
8542: END IF;
8543: --
8544: RAISE;
8571: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
8572: --
8573: IF l_debug_on IS NULL
8574: THEN
8575: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8576: END IF;
8577: --
8578: IF l_debug_on THEN
8579: WSH_DEBUG_SV.push(l_module_name);
8575: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
8576: END IF;
8577: --
8578: IF l_debug_on THEN
8579: WSH_DEBUG_SV.push(l_module_name);
8580: WSH_DEBUG_SV.log(l_module_name,'p_source_code',p_source_code);
8581: WSH_DEBUG_SV.log(l_module_name,'p_source_line_id',p_source_line_id);
8582: END IF;
8583: --
8576: END IF;
8577: --
8578: IF l_debug_on THEN
8579: WSH_DEBUG_SV.push(l_module_name);
8580: WSH_DEBUG_SV.log(l_module_name,'p_source_code',p_source_code);
8581: WSH_DEBUG_SV.log(l_module_name,'p_source_line_id',p_source_line_id);
8582: END IF;
8583: --
8584: IF p_source_code <> 'OE' THEN
8577: --
8578: IF l_debug_on THEN
8579: WSH_DEBUG_SV.push(l_module_name);
8580: WSH_DEBUG_SV.log(l_module_name,'p_source_code',p_source_code);
8581: WSH_DEBUG_SV.log(l_module_name,'p_source_line_id',p_source_line_id);
8582: END IF;
8583: --
8584: IF p_source_code <> 'OE' THEN
8585: l_fulfillment_base := 'P';
8588: l_fulfillment_base := G_FULFILL_BASE;
8589: ELSE
8590: l_fulfillment_base := OE_DUAL_UOM_UTIL.get_fulfillment_base(p_source_line_id);
8591: IF l_debug_on THEN
8592: WSH_DEBUG_SV.logmsg(l_module_name,'OE_DUAL_UOM_UTIL.get_fulfillment_base api call returned '||l_fulfillment_base);
8593: END IF;
8594: l_fulfillment_base := NVL(l_fulfillment_base,'P');
8595: G_FULFILL_LINE_ID := p_source_line_id;
8596: G_FULFILL_BASE := l_fulfillment_base;
8597: END IF;
8598: END IF;
8599:
8600: IF l_debug_on THEN
8601: WSH_DEBUG_SV.log(l_module_name,'l_fulfillment_base',l_fulfillment_base);
8602: WSH_DEBUG_SV.pop(l_module_name);
8603: END IF;
8604:
8605: return l_fulfillment_base;
8598: END IF;
8599:
8600: IF l_debug_on THEN
8601: WSH_DEBUG_SV.log(l_module_name,'l_fulfillment_base',l_fulfillment_base);
8602: WSH_DEBUG_SV.pop(l_module_name);
8603: END IF;
8604:
8605: return l_fulfillment_base;
8606: END Get_Line_Fulfillment_Base;