[Home] [Help]
492: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
493: --
494: IF l_debug_on THEN
495: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
496: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
497: END IF;
498: --
499: END refresh_cache;
500:
576: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_compclass_code');
577: --
578: IF l_debug_on THEN
579: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
580: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
581: END IF;
582: --
583: RETURN g_unexp_char;
584: END get_compclass_code;
644: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_compclass_id');
645: --
646: IF l_debug_on THEN
647: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
648: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
649: END IF;
650: --
651: RETURN g_unexp_num;
652:
735: IF x_comp_class_code = g_unexp_char THEN
736: IF l_debug_on THEN
737: wsh_debug_sv.log(l_module_name,'Unexpected error from get_compclass_code ');
738: END IF;
739: raise FND_API.G_EXC_UNEXPECTED_ERROR;
740: END IF;
741:
742: l_comp_type1 := SUBSTR(x_comp_class_code,1,3);
743: l_comp_type2 := SUBSTR(x_comp_class_code,5,3);
770: IF x_obj1_display = g_unexp_char THEN
771: IF l_debug_on THEN
772: wsh_debug_sv.log(l_module_name,'Unexpected error from get_cc_object_name ');
773: END IF;
774: raise FND_API.G_EXC_UNEXPECTED_ERROR;
775: END IF;
776:
777: x_fac1_company_type := l_fac_company_type;
778: x_fac1_company_name := l_fac_company_name;
805: IF x_obj2_display = g_unexp_char THEN
806: IF l_debug_on THEN
807: wsh_debug_sv.log(l_module_name,'Unexpected error from get_cc_object_name ');
808: END IF;
809: raise FND_API.G_EXC_UNEXPECTED_ERROR;
810: END IF;
811:
812: x_fac2_company_type := l_fac_company_type;
813: x_fac2_company_name := l_fac_company_name; -- Can return vehicle class code in case a constraint has been defined with vehicle type
822: x_fac_company_type => l_fac_company_type ,
823: p_object_value_num => l_constraint_rec.OBJECT1_SOURCE_ID);
824:
825: IF x_obj1_parent_display = g_unexp_char THEN
826: raise FND_API.G_EXC_UNEXPECTED_ERROR;
827: END IF;
828:
829: END IF;
830:
836: x_fac_company_type => l_fac_company_type ,
837: p_object_value_num => l_constraint_rec.OBJECT2_SOURCE_ID);
838:
839: IF x_obj2_parent_display = g_unexp_char THEN
840: raise FND_API.G_EXC_UNEXPECTED_ERROR;
841: END IF;
842:
843: END IF;
844:
847: p_lookup_type => 'WSH_FTE_CONSTRAINT_TYPE'
848: );
849:
850: IF x_condition_display IS NULL THEN
851: raise FND_API.G_EXC_UNEXPECTED_ERROR;
852: END IF;
853:
854: IF l_comp_type1 = 'FAC' AND l_constraint_rec.CONSTRAINT_OBJECT1_TYPE <> 'FAC' THEN
855: x_obj1_display := FND_MESSAGE.GET_STRING('FTE','FTE_COMP_ALL_FACILITIES')||' '||x_obj1_display;
863: END IF;
864: --
865:
866: EXCEPTION
867: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
868: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
869: --
870: IF l_debug_on THEN
871: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
868: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
869: --
870: IF l_debug_on THEN
871: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
872: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
873: END IF;
874: --
875: WHEN OTHERS THEN
876: IF c_get_constraint_info%ISOPEN THEN
880: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
881: --
882: IF l_debug_on THEN
883: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
884: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
885: END IF;
886: --
887: END get_constraint_display;
888:
971: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
972: --
973: IF l_debug_on THEN
974: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
975: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
976: END IF;
977: --
978: END remove_duplicate_const;
979:
1058: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1059: --
1060: IF l_debug_on THEN
1061: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1062: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1063: END IF;
1064: --
1065: END get_carrier_from_loc;
1066:
1117: x_id_tab => l_customer_id_tab,
1118: x_return_status => l_return_status);
1119:
1120: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1121: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1122: END IF;
1123:
1124: itr := l_customer_id_tab.FIRST;
1125:
1171: WSH_DEBUG_SV.logmsg(l_module_name,'Org String '||l_cust_string);
1172: END IF;
1173:
1174: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1175: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1176: END IF;
1177:
1178: END IF;
1179:
1241: --
1242: */
1243:
1244: EXCEPTION
1245: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1246: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1247: IF l_debug_on THEN
1248: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1249: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1245: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1246: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1247: IF l_debug_on THEN
1248: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1249: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1250: END IF;
1251: WHEN others THEN
1252: IF c_get_customer%ISOPEN THEN
1253: CLOSE c_get_customer;
1256: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1257: --
1258: IF l_debug_on THEN
1259: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1260: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1261: END IF;
1262: --
1263: END get_customer_from_loc;
1264:
1349: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1350: --
1351: IF l_debug_on THEN
1352: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1353: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1354: END IF;
1355: --
1356: END get_supplier_from_loc;
1357:
1404: x_id_tab => l_organization_tab,
1405: x_return_status => l_return_status);
1406:
1407: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1408: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1409: END IF;
1410:
1411: itr := l_organization_tab.FIRST;
1412:
1446: WSH_DEBUG_SV.logmsg(l_module_name,'Org String '||l_org_string);
1447: END IF;
1448:
1449: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1450: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1451: END IF;
1452:
1453: END IF;
1454:
1481: END IF;
1482: --
1483:
1484: EXCEPTION
1485: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1486: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1487: IF l_debug_on THEN
1488: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1489: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1485: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1486: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1487: IF l_debug_on THEN
1488: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1489: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1490: END IF;
1491: WHEN others THEN
1492: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1493:
1499:
1500: --
1501: IF l_debug_on THEN
1502: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1503: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1504: END IF;
1505: --
1506: END get_org_from_location;
1507:
1601:
1602: --
1603: IF l_debug_on THEN
1604: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1605: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1606: END IF;
1607: --
1608: END get_loc_for_org;
1609:
1664:
1665: FND_MSG_PUB.Count_And_Get (
1666: p_count => l_msg_count,
1667: p_data => l_msg_data ,
1668: p_encoded => FND_API.G_FALSE );
1669:
1670: IF l_debug_on THEN
1671: wsh_debug_sv.log (l_module_name,'No. of messages already in stack : ',to_char(l_msg_count));
1672: --WSH_DEBUG_SV.pop(l_module_name);
1681:
1682:
1683: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
1684: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
1685: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1686: END IF;
1687: END IF;
1688:
1689: i := p_failed_constraints.FIRST;
1712: x_severity => l_severity,
1713: x_return_status => l_return_status );
1714:
1715: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
1716: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1717: END IF;
1718:
1719: l_class_meaning := WSH_XC_UTIL.Get_Lookup_Meaning(
1720: p_lookup_code => l_class_type,
1721: p_lookup_type => 'WSH_FTE_COMP_CLASSES'
1722: );
1723:
1724: IF l_class_meaning IS NULL THEN
1725: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1726: END IF;
1727:
1728: l_severity_meaning := WSH_XC_UTIL.Get_Lookup_Meaning(
1729: p_lookup_code => l_severity,
1730: p_lookup_type => 'WSH_FTE_VIOLATION_SEVERITY'
1731: );
1732:
1733: IF l_severity_meaning IS NULL THEN
1734: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1735: END IF;
1736:
1737: IF p_failed_constraints(i).entity_type = G_DELIVERY THEN
1738: l_entity := FND_MESSAGE.GET_STRING('FTE','FTE_ENTITY_DELIVERY');
1787:
1788: FND_MSG_PUB.Count_And_Get (
1789: p_count => x_msg_count,
1790: p_data => x_msg_data ,
1791: p_encoded => FND_API.G_FALSE );
1792:
1793: IF l_debug_on THEN
1794: wsh_debug_sv.log (l_module_name,'No. of messages stacked : ',to_char(x_msg_count));
1795: WSH_DEBUG_SV.pop(l_module_name);
1802: IF l_debug_on THEN
1803: WSH_DEBUG_SV.pop(l_module_name,'get_constraint_display failed ');
1804: END IF;
1805: --
1806: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1807: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1808: --
1809: IF l_debug_on THEN
1810: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1807: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1808: --
1809: IF l_debug_on THEN
1810: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1811: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1812: END IF;
1813: --
1814: WHEN others THEN
1815: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.stack_messages');
1816: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1817: --
1818: IF l_debug_on THEN
1819: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1820: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1821: END IF;
1822: --
1823: END stack_messages;
1824:
1873: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1874: --
1875: IF l_debug_on THEN
1876: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1877: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1878: END IF;
1879: --
1880: END create_valid_entity_group;
1881:
1920: IF p_comp_class_code IS NOT NULL THEN
1921: l_comp_class_id := get_compclass_id(p_comp_class_code);
1922:
1923: IF l_comp_class_id = g_unexp_num THEN
1924: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1925: END IF;
1926: --
1927: IF l_debug_on THEN
1928: WSH_DEBUG_SV.logmsg(l_module_name,'Called get_compclass_id comp_class_id : '||l_comp_class_id);
1968: END IF;
1969: --
1970:
1971: EXCEPTION
1972: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1973: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1974: --
1975: IF l_debug_on THEN
1976: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1973: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
1974: --
1975: IF l_debug_on THEN
1976: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1977: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1978: END IF;
1979: --
1980: WHEN others THEN
1981: IF c_get_constraint_info%ISOPEN THEN
1985: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1986: --
1987: IF l_debug_on THEN
1988: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1989: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1990: END IF;
1991: --
1992: END populate_constraint_cache;
1993:
2066: x_return_status => l_return_status) ;
2067:
2068: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2069: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2070: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2071: END IF;
2072: END IF;
2073:
2074: --
2124:
2125: RETURN l_hashval_exists;
2126:
2127: EXCEPTION
2128: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2129: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.check_cache');
2130: --
2131: IF l_debug_on THEN
2132: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2129: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.check_cache');
2130: --
2131: IF l_debug_on THEN
2132: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2133: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2134: END IF;
2135: --
2136: RETURN FALSE;
2137: WHEN others THEN
2138: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.check_cache');
2139: --
2140: IF l_debug_on THEN
2141: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2142: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2143: END IF;
2144: --
2145: RETURN FALSE;
2146: END check_cache;
2314: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2315: --
2316: IF l_debug_on THEN
2317: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2318: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2319: END IF;
2320: --
2321: END populate_reg_mustuse_cache;
2322:
2436: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2437: --
2438: IF l_debug_on THEN
2439: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2440: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2441: END IF;
2442: --
2443: END add_region_constraint;
2444:
2566: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2567: --
2568: IF l_debug_on THEN
2569: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2570: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
2571: END IF;
2572: --
2573: END get_region_constraint;
2574:
2671: x_return_status => l_return_status) ;
2672:
2673: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2674: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2675: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2676: END IF;
2677: END IF;
2678:
2679: --
2696:
2697:
2698: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2699: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2700: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2701: END IF;
2702: END IF;
2703:
2704: --
2747: x_return_status => l_return_status);
2748:
2749: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2750: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2751: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2752: END IF;
2753: END IF;
2754:
2755: --
2797: ,x_return_status => l_return_status);
2798:
2799: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2800: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2801: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2802: END IF;
2803: END IF;
2804:
2805: IF l_debug_on THEN
2817: x_return_status => l_return_status);
2818:
2819: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2820: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2821: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2822: END IF;
2823: END IF;
2824:
2825: z_itr:= l_zone_tab.FIRST;
2917:
2918:
2919: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
2920: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
2921: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2922: END IF;
2923: END IF;
2924:
2925: IF l_debug_on THEN
2959: wsh_debug_sv.pop(l_module_name);
2960: END IF;
2961:
2962: EXCEPTION
2963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2964: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
2965:
2966: IF l_debug_on THEN
2967: WSH_DEBUG_SV.pop(l_module_name,'unexpected_error');
3103:
3104:
3105: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3106: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3107: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3108: END IF;
3109: END IF;
3110:
3111:
3144: --
3145:
3146: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3147: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3148: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3149: END IF;
3150: END IF;
3151:
3152: END IF;
3161: x_return_status => l_return_status);
3162:
3163: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3164: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3165: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3166: END IF;
3167: END IF;
3168:
3169: -- ITERATE THROUGH THE REGION TAB.
3246: --
3247:
3248: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3249: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3250: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3251: END IF;
3252: END IF;
3253: END IF;
3254:
3300: x_return_status => l_return_status);
3301:
3302: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3303: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3304: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3305: END IF;
3306: END IF;
3307:
3308: z_itr:= l_zone_tab.FIRST;
3502:
3503:
3504: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3505: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3506: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3507: END IF;
3508: END IF;
3509:
3510: ELSE
3520: END IF;
3521:
3522: EXCEPTION
3523:
3524: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3525: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3526: --
3527: IF l_debug_on THEN
3528: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3525: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
3526: --
3527: IF l_debug_on THEN
3528: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3529: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3530: END IF;
3531: --
3532: WHEN others THEN
3533: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.check_reg_incl_facilities');
3534: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3535: --
3536: IF l_debug_on THEN
3537: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3538: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
3539: END IF;
3540: END check_reg_incl_facilities;
3541:
3542:
3716: END IF;
3717:
3718: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3719: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3720: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3721: END IF;
3722: END IF;
3723:
3724: l_org_itr := l_organization_tab.FIRST;
3743: x_return_status => x_return_status);
3744:
3745: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3746: IF x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3747: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3748: END IF;
3749: END IF;
3750:
3751: -- When we are getting a constraint at org level we return.
3865: x_return_status => l_return_status) ;
3866:
3867: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3868: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3869: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3870: END IF;
3871: END IF;
3872:
3873: --
3969:
3970: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3971: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
3972: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
3973: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3974: END IF;
3975: raise g_get_mast_org_failed;
3976: END IF;
3977: END IF;
4094:
4095: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4096: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4097: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
4098: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4099: END IF;
4100: raise g_get_carrier_failed;
4101: END IF;
4102: END IF;
4155:
4156: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4157: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4158: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
4159: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4160: END IF;
4161: raise g_get_customer_failed;
4162: END IF;
4163: END IF;
4224:
4225: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4226: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4227: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
4228: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4229: END IF;
4230: raise g_get_supplier_failed;
4231: END IF;
4232: END IF;
4311:
4312:
4313: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4314: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4315: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4316: END IF;
4317: END IF;
4318: ELSE
4319: l_location_id := p_object1_val_num;
4334: x_return_status => x_return_status);
4335:
4336: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4337: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4338: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4339: END IF;
4340: END IF;
4341:
4342: END IF;
4359: x_return_status => x_return_status);
4360:
4361: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4362: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4363: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4364: END IF;
4365: END IF;
4366:
4367: --
4379: x_return_status => x_return_status);
4380:
4381: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4382: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4383: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4384: END IF;
4385: END IF;
4386:
4387: END IF;
4427: WSH_DEBUG_SV.pop(l_module_name,' get_supplier failed ');
4428: END IF;
4429: --
4430:
4431: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4432: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4433: --
4434: IF l_debug_on THEN
4435: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4432: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
4433: --
4434: IF l_debug_on THEN
4435: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4436: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4437: END IF;
4438: --
4439: WHEN others THEN
4440: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint');
4441: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4442: --
4443: IF l_debug_on THEN
4444: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4445: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4446: END IF;
4447: --
4448: END validate_constraint;
4449:
4606:
4607:
4608: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4609: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
4610: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4611: END IF;
4612: END IF;
4613:
4614: l_org_itr := l_organization_tab.FIRST;
4634: END IF;
4635:
4636: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4637: IF x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
4638: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4639: END IF;
4640: END IF;
4641:
4642: -- When we are getting a constraint at org level we return.
4683: --
4684:
4685: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4686: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4687: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4688: END IF;
4689: END IF;
4690:
4691: END IF;
4713:
4714: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4715: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4716: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
4717: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4718: END IF;
4719: raise g_get_mast_org_failed;
4720: END IF;
4721: END IF;
4877: x_return_status => x_return_status);
4878:
4879: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4880: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4881: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4882: END IF;
4883: END IF;
4884:
4885: ELSE
4910: x_return_status => x_return_status);
4911:
4912: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4913: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4914: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4915: END IF;
4916: END IF;
4917:
4918: END IF;
4931: x_return_status => x_return_status);
4932:
4933: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4934: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4935: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4936: END IF;
4937: END IF;
4938:
4939: --
4956: x_return_status => x_return_status);
4957:
4958: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
4959: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
4960: raise FND_API.G_EXC_UNEXPECTED_ERROR;
4961: END IF;
4962: END IF;
4963:
4964: END IF;
5008: WSH_DEBUG_SV.pop(l_module_name,' get_customer failed ');
5009: END IF;
5010: --
5011:
5012: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5013: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5014: --
5015: IF l_debug_on THEN
5016: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5013: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5014: --
5015: IF l_debug_on THEN
5016: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5017: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5018: END IF;
5019: --
5020: WHEN others THEN
5021: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.check_inclusive_facilities');
5022: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5023: --
5024: IF l_debug_on THEN
5025: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5026: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5027: END IF;
5028: --
5029: END check_inclusive_facilities;
5030:
5165: --
5166:
5167: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5168: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5169: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5170: END IF;
5171: END IF;
5172:
5173: END IF;
5249:
5250: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5251: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5252: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
5253: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5254: END IF;
5255: raise g_get_carrier_failed;
5256: END IF;
5257: END IF;
5304:
5305: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5306: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5307: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
5308: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5309: END IF;
5310: raise g_get_customer_failed;
5311: END IF;
5312: END IF;
5367:
5368: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5369: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5370: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
5371: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5372: END IF;
5373: raise g_get_supplier_failed;
5374: END IF;
5375: END IF;
5530: IF l_debug_on THEN
5531: WSH_DEBUG_SV.pop(l_module_name,' get_supplier failed ');
5532: END IF;
5533: --
5534: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5535: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5536: --
5537: IF l_debug_on THEN
5538: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5535: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5536: --
5537: IF l_debug_on THEN
5538: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5539: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5540: END IF;
5541: --
5542: WHEN others THEN
5543: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.check_inclusive_object2');
5544: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5545: --
5546: IF l_debug_on THEN
5547: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5548: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5549: END IF;
5550: --
5551: END check_inclusive_object2;
5552:
5659: x_return_status => l_return_status);
5660:
5661: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5662: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5663: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5664: END IF;
5665: END IF;
5666:
5667: IF l_debug_on THEN
5688: x_return_status => l_return_status);
5689:
5690: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5691: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5692: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5693: END IF;
5694: END IF;
5695:
5696: IF l_debug_on THEN
5715: x_return_status => l_return_status);
5716:
5717: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5718: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5719: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5720: END IF;
5721: END IF;
5722:
5723: IF l_debug_on THEN
5816: x_return_status => l_return_status);
5817:
5818: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5819: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5820: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5821: END IF;
5822: END IF;
5823:
5824: IF l_validate_itmcar_result = 'F' AND
5847: x_return_status => l_return_status);
5848:
5849: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5850: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5851: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5852: END IF;
5853: END IF;
5854:
5855: IF l_validate_itmmode_result = 'F' AND
5878: x_return_status => l_return_status);
5879:
5880: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
5881: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
5882: raise FND_API.G_EXC_UNEXPECTED_ERROR;
5883: END IF;
5884: END IF;
5885:
5886: IF l_validate_itmveh_result = 'F' AND
5934: END IF;
5935: --
5936:
5937: EXCEPTION
5938: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5939: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5940: --
5941: IF l_debug_on THEN
5942: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5939: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
5940: --
5941: IF l_debug_on THEN
5942: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5943: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5944: END IF;
5945: --
5946: WHEN others THEN
5947: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.search_itm_fac_incl');
5948: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5949: --
5950: IF l_debug_on THEN
5951: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5952: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
5953: END IF;
5954: --
5955:
5956: END search_itm_fac_incl;
6132: x_return_status => l_return_status);
6133:
6134: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6135: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6136: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6137: END IF;
6138: END IF;
6139:
6140: IF l_validate_carrier_result = 'F' THEN
6167: x_return_status => l_return_status);
6168:
6169: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6170: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6171: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6172: END IF;
6173: END IF;
6174:
6175: IF l_validate_mode_result = 'F' THEN
6202: x_return_status => l_return_status);
6203:
6204: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6205: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6206: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6207: END IF;
6208: END IF;
6209:
6210: IF l_validate_vehicle_result = 'F' THEN
6238: END IF;
6239: --
6240:
6241: EXCEPTION
6242: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6243: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
6244: --
6245: IF l_debug_on THEN
6246: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6243: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
6244: --
6245: IF l_debug_on THEN
6246: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6247: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6248: END IF;
6249: --
6250: WHEN others THEN
6251: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.search_group_itm');
6252: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6253: --
6254: IF l_debug_on THEN
6255: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6256: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6257: END IF;
6258: --
6259:
6260: END search_group_itm;
6536: x_return_status => l_return_status);
6537:
6538: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6539: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6540: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6541: END IF;
6542: END IF;
6543:
6544:
6569: x_return_status => l_return_status);
6570:
6571: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6572: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6573: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6574: END IF;
6575: END IF;
6576:
6577: IF ( l_const_count < x_failed_constraints.COUNT) THEN
6648: x_return_status => l_return_status);
6649:
6650: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6651: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6652: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6653: END IF;
6654: END IF;
6655:
6656: IF l_validate_cuscus_result <> 'S' THEN
6706: x_return_status => l_return_status);
6707:
6708: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6709: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6710: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6711: END IF;
6712: END IF;
6713:
6714: IF l_validate_cuscus_result <> 'S' THEN
6736: x_return_status => l_return_status);
6737:
6738: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6739: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6740: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6741: END IF;
6742: END IF;
6743:
6744: IF l_validate_cuscus_result <> 'S' THEN
6793: x_return_status => l_return_status);
6794:
6795: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6796: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6797: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6798: END IF;
6799: END IF;
6800:
6801: IF ( l_const_count < x_failed_constraints.COUNT) THEN
6895: x_return_status => l_return_status);
6896:
6897: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6898: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6899: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6900: END IF;
6901: END IF;
6902:
6903: IF ( l_const_count < x_failed_constraints.COUNT) THEN
6925: x_return_status => l_return_status);
6926:
6927: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
6928: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
6929: raise FND_API.G_EXC_UNEXPECTED_ERROR;
6930: END IF;
6931: END IF;
6932:
6933: IF ( l_const_count < x_failed_constraints.COUNT) THEN
6972: END IF;
6973: --
6974:
6975: EXCEPTION
6976: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6977: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
6978: --
6979: IF l_debug_on THEN
6980: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6977: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
6978: --
6979: IF l_debug_on THEN
6980: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6981: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6982: END IF;
6983: --
6984: WHEN others THEN
6985: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.search_matching_group');
6986: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6987: --
6988: IF l_debug_on THEN
6989: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6990: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6991: END IF;
6992: --
6993: END search_matching_group;
6994:
7067: x_return_status => l_return_status);
7068:
7069: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7070: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7071: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7072: END IF;
7073: END IF;
7074:
7075: IF l_validate_orgfac_result <> 'S' THEN
7100: x_return_status => l_return_status);
7101:
7102: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7103: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7104: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7105: END IF;
7106: END IF;
7107:
7108: IF l_validate_orgfac_result <> 'S' THEN
7150: x_return_status => l_return_status);
7151:
7152: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7153: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7154: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7155: END IF;
7156: END IF;
7157:
7158: IF l_validate_cusfac_result <> 'S' THEN
7181: x_return_status => l_return_status);
7182:
7183: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7184: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7185: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7186: END IF;
7187: END IF;
7188:
7189:
7233: x_return_status => l_return_status);
7234:
7235: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7236: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7237: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7238: END IF;
7239: END IF;
7240:
7241:
7264: x_return_status => l_return_status);
7265:
7266: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7267: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7268: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7269: END IF;
7270: END IF;
7271:
7272: IF l_validate_supfac_result <> 'S' THEN
7326: x_return_status => l_return_status);
7327:
7328: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7329: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7330: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7331: END IF;
7332: END IF;
7333:
7334: IF l_validate_itmfac_result <> 'S' THEN
7367: x_return_status => l_return_status);
7368:
7369: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7370: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7371: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7372: END IF;
7373: END IF;
7374:
7375: IF l_validate_itmfac_result <> 'S' THEN
7403: x_return_status => l_return_status);
7404:
7405: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7406: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7407: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7408: END IF;
7409: END IF;
7410:
7411: IF l_validate_itmmod_result <> 'S' THEN
7436: x_return_status => l_return_status);
7437:
7438: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7439: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7440: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7441: END IF;
7442: END IF;
7443:
7444: IF l_validate_itmcar_result <> 'S' THEN
7469: x_return_status => l_return_status);
7470:
7471: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7472: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7473: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7474: END IF;
7475: END IF;
7476:
7477: IF l_validate_itmveh_result <> 'S' THEN
7502: END IF;
7503: --
7504:
7505: EXCEPTION
7506: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7507: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
7508: --
7509: IF l_debug_on THEN
7510: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7507: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
7508: --
7509: IF l_debug_on THEN
7510: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7511: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7512: END IF;
7513: --
7514: WHEN others THEN
7515: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.check_dleg_discretionary');
7516: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7517: --
7518: IF l_debug_on THEN
7519: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7520: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7521: END IF;
7522: --
7523: END check_dleg_discretionary;
7524:
7697:
7698: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7699: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7700: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
7701: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7702: END IF;
7703: raise g_get_carrmode_failed;
7704: END IF;
7705: END IF;
7729:
7730: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7731: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7732: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
7733: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7734: END IF;
7735: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => p_target_trip.VEHICLE_ITEM_ID,
7736: p_organization_id => p_target_trip.VEHICLE_ORGANIZATION_ID);
7737: l_vehicle_org_name := WSH_UTIL_CORE.get_org_name (p_organization_id => p_target_trip.VEHICLE_ORGANIZATION_ID);
7867: x_return_status => l_return_status);
7868:
7869: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7870: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7871: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7872: END IF;
7873: END IF;
7874:
7875: IF l_debug_on THEN
7920: x_return_status => l_return_status);
7921:
7922: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7923: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7924: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7925: END IF;
7926: END IF;
7927:
7928: IF l_validate_vehicle_result <> 'S' THEN
7951: x_return_status => l_return_status);
7952:
7953: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7954: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7955: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7956: END IF;
7957: END IF;
7958:
7959: IF l_validate_carrier_result <> 'S' THEN
7982: x_return_status => l_return_status);
7983:
7984: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
7985: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
7986: raise FND_API.G_EXC_UNEXPECTED_ERROR;
7987: END IF;
7988: END IF;
7989:
7990: IF l_validate_mode_result <> 'S' THEN
8099: x_return_status => l_return_status);
8100:
8101: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8102: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8103: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8104: END IF;
8105: END IF;
8106:
8107: IF l_validate_cuscus_result <> 'S' THEN
8267: x_return_status => l_return_status);
8268:
8269: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8270: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8271: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8272: END IF;
8273: END IF;
8274:
8275: IF l_validate_cuscus_result <> 'S' THEN
8314: x_return_status => l_return_status);
8315:
8316: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8317: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8318: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8319: END IF;
8320: END IF;
8321:
8322: IF l_validate_itmin_result = 'F' THEN
8385: x_return_status => l_return_status);
8386:
8387: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8388: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8389: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8390: END IF;
8391: END IF;
8392:
8393: END IF;
8430: IF l_debug_on THEN
8431: WSH_DEBUG_SV.pop(l_module_name,' get vehicletype failed ');
8432: END IF;
8433: --
8434: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8435: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
8436: --
8437: IF l_debug_on THEN
8438: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8435: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
8436: --
8437: IF l_debug_on THEN
8438: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8439: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
8440: END IF;
8441: --
8442: WHEN others THEN
8443: IF c_get_stop%ISOPEN THEN
8453: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8454: --
8455: IF l_debug_on THEN
8456: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8457: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
8458: END IF;
8459: --
8460: END check_dlvy_against_trip;
8461:
8530:
8531: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8532: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8533: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
8534: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8535: END IF;
8536: raise g_get_carrmode_failed;
8537: END IF;
8538: END IF;
8583: x_return_status => l_return_status);
8584:
8585: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8586: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8587: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8588: END IF;
8589: END IF;
8590:
8591: IF l_validate_mode_result = 'F' THEN
8612: x_return_status => l_return_status);
8613:
8614: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8615: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8616: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8617: END IF;
8618: END IF;
8619:
8620: IF l_validate_carrier_result = 'F' THEN
8652: x_return_status => l_return_status);
8653:
8654: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8655: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8656: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8657: END IF;
8658: END IF;
8659:
8660: IF l_validate_mode_result = 'F' THEN
8681: x_return_status => l_return_status);
8682:
8683: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8684: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8685: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8686: END IF;
8687: END IF;
8688:
8689: IF l_validate_carrier_result = 'F' THEN
8718: IF l_debug_on THEN
8719: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
8720: END IF;
8721: --
8722: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8723: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
8724: --
8725: IF l_debug_on THEN
8726: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8723: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
8724: --
8725: IF l_debug_on THEN
8726: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8727: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
8728: END IF;
8729: --
8730: WHEN others THEN
8731: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.check_act_positive');
8732: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
8733: --
8734: IF l_debug_on THEN
8735: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8736: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
8737: END IF;
8738: --
8739:
8740: END check_act_positive;
8823: x_return_status => l_return_status);
8824:
8825: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8826: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8827: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8828: END IF;
8829: END IF;
8830:
8831: IF l_validate_carrier_result = 'F' THEN
8855: x_return_status => l_return_status);
8856:
8857: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8858: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8859: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8860: END IF;
8861: END IF;
8862:
8863: IF l_validate_mode_result = 'F' THEN
8887: x_return_status => l_return_status);
8888:
8889: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8890: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8891: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8892: END IF;
8893: END IF;
8894:
8895: IF l_validate_vehicle_result = 'F' THEN
8942: x_return_status => l_return_status);
8943:
8944: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8945: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8946: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8947: END IF;
8948: END IF;
8949:
8950: IF l_validate_carrier_result = 'F' THEN
8974: x_return_status => l_return_status);
8975:
8976: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
8977: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
8978: raise FND_API.G_EXC_UNEXPECTED_ERROR;
8979: END IF;
8980: END IF;
8981:
8982: IF l_validate_mode_result = 'F' THEN
9006: x_return_status => l_return_status);
9007:
9008: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9009: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9010: raise FND_API.G_EXC_UNEXPECTED_ERROR;
9011: END IF;
9012: END IF;
9013:
9014: IF l_validate_vehicle_result = 'F' THEN
9057: --
9058:
9059:
9060: EXCEPTION
9061: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9062: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
9063: --
9064: IF l_debug_on THEN
9065: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9062: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
9063: --
9064: IF l_debug_on THEN
9065: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9066: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9067: END IF;
9068: --
9069: WHEN others THEN
9070: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.check_act_carmode');
9071: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
9072: --
9073: IF l_debug_on THEN
9074: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9075: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9076: END IF;
9077: --
9078:
9079: END check_act_carmode;
9180: x_return_status => l_return_status);
9181:
9182: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9183: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9184: raise FND_API.G_EXC_UNEXPECTED_ERROR;
9185: END IF;
9186: END IF;
9187:
9188: IF (l_physical_location_id IS NOT NULL) THEN
9435: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.is_last_trip');
9436: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
9437: IF l_debug_on THEN
9438: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9439: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9440: END IF;
9441: RETURN FALSE;
9442:
9443: END is_last_trip;
9571: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_intmed_stops');
9572: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
9573: IF l_debug_on THEN
9574: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9575: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9576: END IF;
9577:
9578: END get_intmed_stops;
9579:
9853: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.append_current_trip_stops');
9854: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
9855: IF l_debug_on THEN
9856: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9857: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
9858: END IF;
9859:
9860: END append_current_trip_stops;
9861:
9990:
9991: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
9992: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
9993: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
9994: raise FND_API.G_EXC_UNEXPECTED_ERROR;
9995: END IF;
9996: raise g_get_carrmode_failed;
9997: END IF;
9998: END IF;
10021:
10022: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10023: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10024: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
10025: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10026: END IF;
10027: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => p_target_trip.VEHICLE_ITEM_ID,
10028: p_organization_id => p_target_trip.VEHICLE_ORGANIZATION_ID);
10029: l_vehicle_org_name := WSH_UTIL_CORE.get_org_name (p_organization_id => p_target_trip.VEHICLE_ORGANIZATION_ID);
10061: x_return_status => l_return_status);
10062:
10063: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10064: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10065: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10066: END IF;
10067: END IF;
10068:
10069: IF l_validate_carrier_result = 'F' THEN
10092: x_return_status => l_return_status);
10093:
10094: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10095: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10096: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10097: END IF;
10098: END IF;
10099:
10100: IF l_validate_mode_result = 'F' THEN
10123: x_return_status => l_return_status);
10124:
10125: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10126: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10127: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10128: END IF;
10129: END IF;
10130:
10131: IF l_validate_vehicle_result = 'F' THEN
10160: x_return_status => l_return_status);
10161:
10162: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10163: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10164: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10165: END IF;
10166: END IF;
10167:
10168: IF l_validate_carrier_result = 'F' THEN
10191: x_return_status => l_return_status);
10192:
10193: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10194: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10195: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10196: END IF;
10197: END IF;
10198:
10199: IF l_validate_mode_result = 'F' THEN
10222: x_return_status => l_return_status);
10223:
10224: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10225: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10226: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10227: END IF;
10228: END IF;
10229:
10230: IF l_validate_vehicle_result = 'F' THEN
10359: x_return_status => l_return_status);
10360:
10361: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10362: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10363: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10364: END IF;
10365: END IF;
10366:
10367: IF l_validate_carrier_result = 'F' THEN
10399: x_return_status => l_return_status);
10400:
10401: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10402: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10403: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10404: END IF;
10405: END IF;
10406:
10407: IF l_validate_carrier_result = 'F' THEN
10444: x_return_status => l_return_status);
10445:
10446: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10447: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10448: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10449: END IF;
10450: END IF;
10451:
10452: IF l_validate_mode_result = 'F' THEN
10484: x_return_status => l_return_status);
10485:
10486: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10487: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10488: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10489: END IF;
10490: END IF;
10491:
10492: IF l_validate_mode_result = 'F' THEN
10528: x_return_status => l_return_status);
10529:
10530: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10531: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10532: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10533: END IF;
10534: END IF;
10535:
10536: IF l_validate_vehicle_result = 'F' THEN
10568: x_return_status => l_return_status);
10569:
10570: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10571: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10572: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10573: END IF;
10574: END IF;
10575:
10576: IF l_validate_vehicle_result = 'F' THEN
10605: x_return_status => l_return_status);
10606:
10607: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10608: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10609: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10610: END IF;
10611: END IF;
10612:
10613:
10633: x_return_status => l_return_status);
10634:
10635: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10636: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10637: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10638: END IF;
10639: END IF;
10640:
10641: -- Even if number of dlegs is 1, it means the current assignment
10675: x_return_status => l_return_status);
10676:
10677: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10678: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10679: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10680: END IF;
10681: END IF;
10682:
10683: IF l_act_result = 'F' THEN
10709: --
10710:
10711: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10712: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10713: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10714: END IF;
10715: END IF;
10716:
10717: -- Also remove group record if it does not have children inside
10770: x_return_status => l_return_status);
10771:
10772: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10773: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10774: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10775: END IF;
10776: END IF;
10777:
10778: IF l_validate_orgfac_result = 'F' THEN
10805: x_return_status => l_return_status);
10806:
10807: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10808: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10809: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10810: END IF;
10811: END IF;
10812:
10813: IF l_validate_cusfac_result = 'F' THEN
10832: x_return_status => l_return_status);
10833:
10834: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10835: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10836: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10837: END IF;
10838: END IF;
10839:
10840: IF l_validate_cusfac_result = 'F' THEN
10866: x_return_status => l_return_status);
10867:
10868: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10869: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10870: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10871: END IF;
10872: END IF;
10873:
10874: IF l_validate_supfac_result = 'F' THEN
10893: x_return_status => l_return_status);
10894:
10895: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10896: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10897: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10898: END IF;
10899: END IF;
10900:
10901: IF l_validate_supfac_result = 'F' THEN
10932: x_return_status => l_return_status);
10933:
10934: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10935: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10936: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10937: END IF;
10938: END IF;
10939:
10940: IF l_acd_result = 'F' THEN
10973: x_return_status => l_return_status);
10974:
10975: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
10976: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
10977: raise FND_API.G_EXC_UNEXPECTED_ERROR;
10978: END IF;
10979: END IF;
10980:
10981: IF l_validate_itmfac_result = 'F' THEN
11008: x_return_status => l_return_status);
11009:
11010: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11011: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11012: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11013: END IF;
11014: END IF;
11015:
11016: IF l_validate_carrier_result = 'F' THEN
11038: x_return_status => l_return_status);
11039:
11040: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11041: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11042: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11043: END IF;
11044: END IF;
11045:
11046: IF l_validate_vehicle_result = 'F' THEN
11068: x_return_status => l_return_status);
11069:
11070: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11071: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11072: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11073: END IF;
11074: END IF;
11075:
11076: IF l_validate_mode_result = 'F' THEN
11096: x_return_status => l_return_status);
11097:
11098: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11099: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11100: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11101: END IF;
11102: END IF;
11103:
11104: IF l_acd_result = 'F' THEN
11166: IF l_debug_on THEN
11167: WSH_DEBUG_SV.pop(l_module_name,' get vehicletype failed ');
11168: END IF;
11169: --
11170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11171: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
11172: --
11173: IF l_debug_on THEN
11174: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11171: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
11172: --
11173: IF l_debug_on THEN
11174: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11175: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
11176: END IF;
11177: --
11178: WHEN others THEN
11179: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_positive_constraint');
11180: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11181: --
11182: IF l_debug_on THEN
11183: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11184: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
11185: END IF;
11186: --
11187:
11188: END validate_positive_constraint;
11248:
11249: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11250: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11251: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
11252: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11253: END IF;
11254: raise g_get_carrmode_failed;
11255: END IF;
11256: END IF;
11285: x_return_status => l_return_status);
11286:
11287: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11288: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11289: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11290: END IF;
11291: END IF;
11292:
11293: IF l_validate_faccar_result <> 'S' THEN
11314: x_return_status => l_return_status);
11315:
11316: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11317: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11318: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11319: END IF;
11320: END IF;
11321:
11322: IF l_validate_faccar_result <> 'S' THEN
11347: x_return_status => l_return_status);
11348:
11349: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11350: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11351: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11352: END IF;
11353: END IF;
11354:
11355: IF l_validate_facmod_result <> 'S' THEN
11376: x_return_status => l_return_status);
11377:
11378: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11379: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11380: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11381: END IF;
11382: END IF;
11383:
11384: IF l_validate_facmod_result <> 'S' THEN
11422: x_return_status => l_return_status);
11423:
11424: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11425: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11426: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11427: END IF;
11428: END IF;
11429:
11430: IF l_validate_itmmod_result <> 'S' THEN
11457: x_return_status => l_return_status);
11458:
11459: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11460: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11461: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11462: END IF;
11463: END IF;
11464:
11465: IF l_validate_itmcar_result <> 'S' THEN
11498: IF l_debug_on THEN
11499: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
11500: END IF;
11501: --
11502: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11503: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
11504: --
11505: IF l_debug_on THEN
11506: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11503: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
11504: --
11505: IF l_debug_on THEN
11506: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11507: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
11508: END IF;
11509: --
11510: WHEN others THEN
11511: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.check_upd_dlvy');
11512: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
11513: --
11514: IF l_debug_on THEN
11515: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
11516: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
11517: END IF;
11518: --
11519:
11520: END check_upd_dlvy;
11522: --========================================================================
11523: -- PROCEDURE : validate_constraint_dlvy Called by constraint Wrapper API
11524: -- and the Group API.
11525: --
11526: -- PARAMETERS: p_init_msg_list FND_API.G_TRUE to reset list
11527: -- p_action_code Predefined action code
11528: -- p_exception_list Compatibility classes to skip if any
11529: -- indexed by class code numbers
11530: -- p_in_ids Table of delivery ids to process
11565: -- to the target trip
11566: --========================================================================
11567:
11568: PROCEDURE validate_constraint_dlvy(
11569: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
11570: p_action_code IN VARCHAR2 DEFAULT NULL,
11571: p_exception_list IN WSH_UTIL_CORE.Column_Tab_Type,
11572: p_in_ids IN WSH_UTIL_CORE.id_tab_type,
11573: p_delivery_info IN delivery_ccinfo_tab_type,
11688: g_itmloc_mustuse_cache.DELETE;
11689: g_itm_exclusive_cache.DELETE;
11690: g_fac_exclusive_cache.DELETE;
11691:
11692: IF FND_API.to_Boolean( p_init_msg_list ) THEN
11693: FND_MSG_PUB.initialize;
11694: END IF;
11695:
11696: IF l_debug_on THEN
11712: refresh_cache(l_return_status);
11713:
11714: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11715: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11716: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11717: END IF;
11718: END IF;
11719:
11720: -- Assumes p_comp_class_tab and p_exception_list are indexed by
11787: x_return_status => l_return_status);
11788:
11789: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11790: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11791: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11792: END IF;
11793: END IF;
11794:
11795: --physical location id is not null implies- A dummy location.
11887: x_return_status => l_return_status);
11888:
11889: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11890: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11891: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11892: END IF;
11893: END IF;
11894:
11895: IF (l_physical_location_id IS NOT NULL) THEN
12006: x_return_status => l_return_status);
12007:
12008: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12009: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12010: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12011: END IF;
12012: END IF;
12013:
12014: IF (l_physical_location_id IS NOT NULL) THEN
12067: x_return_status => l_return_status);
12068:
12069: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12070: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12071: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12072: END IF;
12073: END IF;
12074:
12075: IF (l_physical_location_id IS NOT NULL) THEN
12107: x_return_status => l_return_status);
12108:
12109: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12110: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12111: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12112: END IF;
12113: END IF;
12114:
12115: IF (l_physical_location_id IS NOT NULL) THEN
12141: x_return_status => l_return_status);
12142:
12143: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12144: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12145: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12146: END IF;
12147: END IF;
12148:
12149: IF (l_physical_location_id IS NOT NULL) THEN
12177: x_return_status => l_return_status);
12178:
12179: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12180: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12181: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12182: END IF;
12183: END IF;
12184:
12185: IF (l_physical_location_id IS NOT NULL) THEN
12211: x_return_status => l_return_status);
12212:
12213: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12214: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12215: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12216: END IF;
12217: END IF;
12218:
12219: IF (l_physical_location_id IS NOT NULL) THEN
12245: x_return_status => l_return_status);
12246:
12247: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12248: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12249: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12250: END IF;
12251: END IF;
12252:
12253: IF (l_physical_location_id IS NOT NULL) THEN
12295:
12296:
12297: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12298: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12299: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12300: END IF;
12301: END IF;
12302:
12303: -- l := p_target_trip_incl_stops.FIRST;
12352: x_return_status => l_return_status);
12353:
12354: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12355: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12356: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12357: END IF;
12358: END IF;
12359:
12360: IF (l_physical_location_id IS NOT NULL) THEN
12374: x_return_status => l_return_status);
12375:
12376: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12377: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12378: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12379: END IF;
12380: END IF;
12381:
12382: IF (l_physical_location_id IS NOT NULL) THEN
12472:
12473: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12474: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12475: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
12476: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12477: END IF;
12478: raise g_get_carrmode_failed;
12479: END IF;
12480: END IF;
12506:
12507: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12508: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12509: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
12510: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12511: END IF;
12512: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => l_target_trip.VEHICLE_ITEM_ID,
12513: p_organization_id => l_target_trip.VEHICLE_ORGANIZATION_ID);
12514: l_vehicle_org_name := WSH_UTIL_CORE.get_org_name (p_organization_id => l_target_trip.VEHICLE_ORGANIZATION_ID);
12574: x_return_status => l_return_status);
12575:
12576: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12577: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12578: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12579: END IF;
12580: END IF;
12581:
12582: IF l_validate_vehicle_result <> 'S' THEN
12605: x_return_status => l_return_status);
12606:
12607: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12608: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12609: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12610: END IF;
12611: END IF;
12612:
12613: IF l_validate_carrier_result <> 'S' THEN
12636: x_return_status => l_return_status);
12637:
12638: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12639: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12640: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12641: END IF;
12642: END IF;
12643:
12644: IF l_validate_mode_result <> 'S' THEN
12726: --
12727:
12728: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12729: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12730: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12731: END IF;
12732: END IF;
12733:
12734: END IF;
12748: --
12749:
12750: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12751: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12752: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12753: END IF;
12754: END IF;
12755:
12756: END IF;
12786: --
12787:
12788: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12789: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12790: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12791: END IF;
12792: END IF;
12793:
12794: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,WSH_UTIL_CORE.G_RET_STS_WARNING)
12842:
12843: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12844: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12845:
12846: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12847: END IF;
12848: END IF;
12849:
12850: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
12934: --
12935:
12936: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12937: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12938: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12939: END IF;
12940: END IF;
12941:
12942: END IF; -- ACT ADT
13046: --
13047:
13048: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13049: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13050: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13051: END IF;
13052: END IF;
13053:
13054: -- Now can get x_validate_result = 'F' with x_group_info.COUNT = 1 and
13070: END IF;
13071: --
13072:
13073: EXCEPTION
13074: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
13075: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
13076: --
13077: IF l_debug_on THEN
13078: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13075: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
13076: --
13077: IF l_debug_on THEN
13078: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13079: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
13080: END IF;
13081: --
13082: WHEN others THEN
13083: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_dlvy');
13084: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
13085: --
13086: IF l_debug_on THEN
13087: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13088: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
13089: END IF;
13090: --
13091:
13092: END validate_constraint_dlvy;
13096: --========================================================================
13097: -- PROCEDURE : validate_constraint_dleg Called by constraint Wrapper API
13098: -- and the Lane search API.
13099: --
13100: -- PARAMETERS: p_init_msg_list FND_API.G_TRUE to reset list
13101: -- p_action_code Predefined action code
13102: -- p_exception_list Compatibility classes to skip if any
13103: -- indexed by class code numbers
13104: -- p_delivery_leg_rec Input delivery leg record
13114: -- A. Lane search for delivery leg (DLS)
13115: --========================================================================
13116:
13117: PROCEDURE validate_constraint_dleg(
13118: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
13119: p_action_code IN VARCHAR2 DEFAULT NULL,
13120: p_exception_list IN WSH_UTIL_CORE.Column_Tab_Type,
13121: p_delivery_leg_rec IN dleg_ccinfo_rec_type,
13122: p_target_trip IN trip_ccinfo_tab_type,
13199: g_itmloc_mustuse_cache.DELETE;
13200: g_itm_exclusive_cache.DELETE;
13201: g_fac_exclusive_cache.DELETE;
13202:
13203: IF FND_API.to_Boolean( p_init_msg_list ) THEN
13204: FND_MSG_PUB.initialize;
13205: END IF;
13206:
13207: IF l_debug_on THEN
13212: refresh_cache(l_return_status);
13213:
13214: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13215: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13216: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13217: END IF;
13218: END IF;
13219:
13220: /*
13303: x_return_status => l_return_status);
13304:
13305: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13306: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13307: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13308: END IF;
13309: END IF;
13310:
13311: IF (l_physical_location_id IS NOT NULL) THEN
13341: x_return_status => l_return_status);
13342:
13343: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13344: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13345: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13346: END IF;
13347: END IF;
13348:
13349: IF (l_physical_location_id IS NOT NULL) THEN
13378: x_return_status => l_return_status);
13379:
13380: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13381: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13382: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13383: END IF;
13384: END IF;
13385:
13386: IF (l_physical_location_id IS NOT NULL) THEN
13407: x_return_status => l_return_status);
13408:
13409: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13410: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13411: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13412: END IF;
13413: END IF;
13414:
13415: IF (l_physical_location_id IS NOT NULL) THEN
13462: x_return_status => l_return_status);
13463:
13464: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13465: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13466: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13467: END IF;
13468: END IF;
13469:
13470: IF l_validate_carrier_result = 'F' THEN
13488: x_return_status => l_return_status);
13489:
13490: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13491: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13492: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13493: END IF;
13494: END IF;
13495:
13496: IF l_validate_carrier_result = 'F' THEN
13518: x_return_status => l_return_status);
13519:
13520: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13521: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13522: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13523: END IF;
13524: END IF;
13525:
13526: IF l_validate_mode_result = 'F' THEN
13544: x_return_status => l_return_status);
13545:
13546: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13547: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13548: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13549: END IF;
13550: END IF;
13551:
13552: IF l_validate_mode_result = 'F' THEN
13577: x_return_status => l_return_status);
13578:
13579: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13580: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13581: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13582: END IF;
13583: END IF;
13584:
13585: IF l_validate_faccar_result <> 'S' THEN
13606: x_return_status => l_return_status);
13607:
13608: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13609: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13610: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13611: END IF;
13612: END IF;
13613:
13614: IF l_validate_faccar_result <> 'S' THEN
13639: x_return_status => l_return_status);
13640:
13641: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13642: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13643: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13644: END IF;
13645: END IF;
13646:
13647: IF l_validate_facmod_result <> 'S' THEN
13668: x_return_status => l_return_status);
13669:
13670: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13671: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13672: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13673: END IF;
13674: END IF;
13675:
13676: IF l_validate_facmod_result <> 'S' THEN
13714: x_return_status => l_return_status);
13715:
13716: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13717: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13718: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13719: END IF;
13720: END IF;
13721:
13722: IF l_validate_carrier_result = 'F' THEN
13745: x_return_status => l_return_status);
13746:
13747: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13748: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13749: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13750: END IF;
13751: END IF;
13752:
13753: IF l_validate_mode_result = 'F' THEN
13772: x_return_status => l_return_status);
13773:
13774: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13775: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13776: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13777: END IF;
13778: END IF;
13779:
13780: -- For exclusive constraints error with one detail in the group is error
13809: x_return_status => l_return_status);
13810:
13811: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13812: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13813: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13814: END IF;
13815: END IF;
13816:
13817: -- For exclusive constraints error with one detail in the group is error
13905: x_return_status => l_return_status);
13906:
13907: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13908: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13909: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13910: END IF;
13911: END IF;
13912:
13913: IF (l_physical_location_id IS NOT NULL) THEN
13943: x_return_status => l_return_status);
13944:
13945: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13946: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13947: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13948: END IF;
13949: END IF;
13950:
13951: IF (l_physical_location_id IS NOT NULL) THEN
14019: --
14020:
14021: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14022: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14023: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14024: END IF;
14025: END IF;
14026:
14027: validate_positive_constraint(
14045: --
14046:
14047: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14048: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14049: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14050: END IF;
14051: ELSIF l_failed_lines.COUNT > 0 THEN
14052: x_validate_result := 'F';
14053: l_validate_result := 'F';
14071: x_return_status => l_return_status);
14072:
14073: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14074: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14075: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14076: END IF;
14077: END IF;
14078:
14079: IF l_validate_excl_result = 'F' THEN
14120: x_return_status => l_return_status);
14121:
14122: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14123: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14124: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14125: END IF;
14126: END IF;
14127:
14128: IF l_validate_faccar_result <> 'S' THEN
14149: x_return_status => l_return_status);
14150:
14151: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14152: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14153: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14154: END IF;
14155: END IF;
14156:
14157: IF l_validate_faccar_result <> 'S' THEN
14182: x_return_status => l_return_status);
14183:
14184: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14185: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14186: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14187: END IF;
14188: END IF;
14189:
14190: IF l_validate_facmod_result <> 'S' THEN
14211: x_return_status => l_return_status);
14212:
14213: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14214: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14215: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14216: END IF;
14217: END IF;
14218:
14219: IF l_validate_facmod_result <> 'S' THEN
14245: x_return_status => l_return_status);
14246:
14247: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14248: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14249: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14250: END IF;
14251: END IF;
14252:
14253: IF l_validate_result = 'F' THEN
14266: x_return_status => l_return_status);
14267:
14268: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14269: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14270: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14271: END IF;
14272: END IF;
14273:
14274: IF x_validate_result = 'F' THEN
14297: IF l_debug_on THEN
14298: WSH_DEBUG_SV.pop(l_module_name,' get vehicletype failed ');
14299: END IF;
14300: --
14301: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
14302: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
14303: --
14304: IF l_debug_on THEN
14305: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
14302: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
14303: --
14304: IF l_debug_on THEN
14305: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
14306: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
14307: END IF;
14308: --
14309: WHEN others THEN
14310: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_dleg');
14311: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
14312: --
14313: IF l_debug_on THEN
14314: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
14315: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
14316: END IF;
14317: --
14318: END validate_constraint_dleg;
14319:
14322: --========================================================================
14323: -- PROCEDURE : validate_constraint_dlvb Called by constraint Wrapper API
14324: -- and the Group API.
14325: --
14326: -- PARAMETERS: p_init_msg_list FND_API.G_TRUE to reset list
14327: -- p_action_code Predefined action code
14328: -- p_exception_list Compatibility classes to skip if any
14329: -- indexed by class code numbers
14330: -- p_in_ids Table of delivery ids to process
14358: -- to the target delivery
14359: --========================================================================
14360:
14361: PROCEDURE validate_constraint_dlvb(
14362: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
14363: p_action_code IN VARCHAR2 DEFAULT NULL,
14364: p_exception_list IN WSH_UTIL_CORE.Column_Tab_Type,
14365: p_in_ids IN WSH_UTIL_CORE.id_tab_type,
14366: p_del_detail_info IN detail_ccinfo_tab_type,
14484: g_itmloc_mustuse_cache.DELETE;
14485: g_itm_exclusive_cache.DELETE;
14486: g_fac_exclusive_cache.DELETE;
14487:
14488: IF FND_API.to_Boolean( p_init_msg_list ) THEN
14489: FND_MSG_PUB.initialize;
14490: END IF;
14491:
14492: IF l_debug_on THEN
14506: refresh_cache(l_return_status);
14507:
14508: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14509: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14510: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14511: END IF;
14512: END IF;
14513:
14514: IF NOT p_exception_list.EXISTS(G_CUSTOMER_CUSTOMER_NUM) THEN
14580: x_return_status => l_return_status);
14581:
14582: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14583: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14584: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14585: END IF;
14586: END IF;
14587:
14588: IF (l_physical_location_id IS NOT NULL) THEN
14644: x_return_status => l_return_status);
14645:
14646: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14647: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14648: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14649: END IF;
14650: END IF;
14651:
14652: IF (l_physical_location_id IS NOT NULL) THEN
14682: x_return_status => l_return_status);
14683:
14684: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14685: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14686: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14687: END IF;
14688: END IF;
14689:
14690: IF (l_physical_location_id IS NOT NULL) THEN
14716: x_return_status => l_return_status);
14717:
14718: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14719: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14720: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14721: END IF;
14722: END IF;
14723:
14724: IF (l_physical_location_id IS NOT NULL) THEN
14753: x_return_status => l_return_status);
14754:
14755: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14756: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14757: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14758: END IF;
14759: END IF;
14760:
14761: IF (l_physical_location_id IS NOT NULL) THEN
14786: x_return_status => l_return_status);
14787:
14788: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14789: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14790: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14791: END IF;
14792: END IF;
14793:
14794: IF (l_physical_location_id IS NOT NULL) THEN
14823: x_return_status => l_return_status);
14824:
14825: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14826: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14827: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14828: END IF;
14829: END IF;
14830:
14831: IF (l_physical_location_id IS NOT NULL) THEN
14887: x_return_status => l_return_status);
14888:
14889: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14890: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14891: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14892: END IF;
14893: END IF;
14894:
14895: IF (l_physical_location_id IS NOT NULL) THEN
14989: x_return_status => l_return_status);
14990:
14991: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14992: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14993: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14994: END IF;
14995: END IF;
14996:
14997: IF l_validate_itmfacin_result = 'F' THEN
15038: --
15039:
15040: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15041: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15042: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15043: END IF;
15044: END IF;
15045:
15046: END IF; -- FIRST
15064: --
15065:
15066: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15067: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15068: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15069: END IF;
15070: END IF;
15071: END IF;
15072:
15113: x_return_status => l_return_status);
15114:
15115: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15116: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15117: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15118: END IF;
15119: END IF;
15120:
15121: IF l_validate_customer_result <> 'S' THEN
15171:
15172: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15173: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15174:
15175: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15176: END IF;
15177: END IF;
15178:
15179: IF l_validate_customer_result <> 'S' THEN
15224: x_return_status => l_return_status);
15225:
15226: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15227: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15228: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15229: END IF;
15230: END IF;
15231:
15232: IF l_validate_itmin_result = 'F' THEN
15280:
15281: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15282: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15283: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
15284: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15285: END IF;
15286: raise g_get_carrmode_failed;
15287: END IF;
15288: END IF;
15304:
15305: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15306: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15307: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
15308: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15309: END IF;
15310: raise g_get_carrmode_failed;
15311: END IF;
15312: END IF;
15330: x_return_status => l_return_status);
15331:
15332: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15333: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15334: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15335: END IF;
15336: END IF;
15337:
15338: IF l_validate_carrier_result <> 'S' THEN
15371: x_return_status => l_return_status);
15372:
15373: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15374: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15375: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15376: END IF;
15377: END IF;
15378:
15379: IF l_validate_mode_result <> 'S' THEN
15416: x_return_status => l_return_status);
15417:
15418: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15419: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15420: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15421: END IF;
15422: END IF;
15423:
15424: IF l_validate_carrier_result <> 'S' THEN
15443: x_return_status => l_return_status);
15444:
15445: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15446: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15447: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15448: END IF;
15449: END IF;
15450:
15451: IF l_validate_carrier_result <> 'S' THEN
15476: x_return_status => l_return_status);
15477:
15478: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15479: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15480: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15481: END IF;
15482: END IF;
15483:
15484: IF l_validate_mode_result <> 'S' THEN
15502: x_return_status => l_return_status);
15503:
15504: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15505: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15506: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15507: END IF;
15508: END IF;
15509:
15510: IF l_validate_mode_result <> 'S' THEN
15605: x_return_status => l_return_status);
15606:
15607: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15608: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15609: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15610: END IF;
15611: END IF;
15612:
15613: IF x_validate_result = 'F' THEN
15644: WSH_DEBUG_SV.pop(l_module_name,' invalid_input ');
15645: END IF;
15646: --
15647:
15648: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
15649: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
15650: --
15651: IF l_debug_on THEN
15652: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
15649: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
15650: --
15651: IF l_debug_on THEN
15652: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
15653: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
15654: END IF;
15655: --
15656: WHEN others THEN
15657: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_dlvb');
15658: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
15659: --
15660: IF l_debug_on THEN
15661: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
15662: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
15663: END IF;
15664: --
15665: END validate_constraint_dlvb;
15666:
15670: --========================================================================
15671: -- PROCEDURE : validate_constraint_trip Called by constraint Wrapper API
15672: -- and the Group API.
15673: --
15674: -- PARAMETERS: p_init_msg_list FND_API.G_TRUE to reset list
15675: -- p_action_code Predefined action code
15676: -- p_exception_list Compatibility classes to skip if any
15677: -- indexed by class code numbers
15678: -- p_trip_info Table of Trip records to process
15691: -- A. Update an existing trip (UPT)
15692: --========================================================================
15693:
15694: PROCEDURE validate_constraint_trip(
15695: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
15696: p_action_code IN VARCHAR2 DEFAULT NULL,
15697: p_exception_list IN WSH_UTIL_CORE.Column_Tab_Type,
15698: p_trip_info IN trip_ccinfo_tab_type,
15699: p_trip_assigned_dels IN delivery_ccinfo_tab_type,
15764: g_itmloc_mustuse_cache.DELETE;
15765: g_itm_exclusive_cache.DELETE;
15766: g_fac_exclusive_cache.DELETE;
15767:
15768: IF FND_API.to_Boolean( p_init_msg_list ) THEN
15769: FND_MSG_PUB.initialize;
15770: END IF;
15771:
15772: IF l_debug_on THEN
15777: refresh_cache(l_return_status);
15778:
15779: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15780: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15781: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15782: END IF;
15783: END IF;
15784:
15785: IF NOT p_exception_list.EXISTS(G_FACILITY_MODE_NUM) THEN
15818: x_return_status => l_return_status);
15819:
15820: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15821: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15822: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15823: END IF;
15824: END IF;
15825:
15826: IF (l_physical_location_id IS NOT NULL) THEN
15854: x_return_status => l_return_status);
15855:
15856: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15857: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15858: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15859: END IF;
15860: END IF;
15861:
15862: IF (l_physical_location_id IS NOT NULL) THEN
15910: x_return_status => l_return_status);
15911:
15912: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15913: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15914: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15915: END IF;
15916: END IF;
15917:
15918: IF (l_physical_location_id IS NOT NULL) THEN
15945: x_return_status => l_return_status);
15946:
15947: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15948: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15949: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15950: END IF;
15951: END IF;
15952:
15953: IF (l_physical_location_id IS NOT NULL) THEN
15981: x_return_status => l_return_status);
15982:
15983: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15984: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15985: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15986: END IF;
15987: END IF;
15988:
15989: -- l := p_trip_incl_stops.FIRST;
16048:
16049: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16050: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16051: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
16052: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16053: END IF;
16054: raise g_get_carrmode_failed;
16055: END IF;
16056: END IF;
16079:
16080: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16081: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16082: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
16083: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16084: END IF;
16085: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => p_trip_info(j).VEHICLE_ITEM_ID,
16086: p_organization_id => p_trip_info(j).VEHICLE_ORGANIZATION_ID);
16087: l_vehicle_org_name := WSH_UTIL_CORE.get_org_name (p_organization_id => p_trip_info(j).VEHICLE_ORGANIZATION_ID);
16130: x_return_status => l_return_status);
16131:
16132: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16133: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16134: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16135: END IF;
16136: END IF;
16137:
16138: IF l_validate_mode_result = 'F' THEN
16158: x_return_status => l_return_status);
16159:
16160: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16161: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16162: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16163: END IF;
16164: END IF;
16165:
16166: IF l_validate_carrier_result = 'F' THEN
16186: x_return_status => l_return_status);
16187:
16188: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16189: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16190: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16191: END IF;
16192: END IF;
16193:
16194: IF l_validate_vehicle_result = 'F' THEN
16217: x_return_status => l_return_status);
16218:
16219: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16220: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16221: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16222: END IF;
16223: END IF;
16224:
16225: IF l_validate_faccar_result <> 'S' THEN
16247: x_return_status => l_return_status);
16248:
16249: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16250: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16251: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16252: END IF;
16253: END IF;
16254:
16255: IF l_validate_facmod_result <> 'S' THEN
16277: x_return_status => l_return_status);
16278:
16279: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16280: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16281: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16282: END IF;
16283: END IF;
16284:
16285: IF l_validate_facveh_result <> 'S' THEN
16378: x_return_status => l_return_status);
16379:
16380: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16381: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16382: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16383: END IF;
16384: END IF;
16385:
16386: IF l_validate_mode_result = 'F' THEN
16407: x_return_status => l_return_status);
16408:
16409: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16410: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16411: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16412: END IF;
16413: END IF;
16414:
16415: IF l_validate_carrier_result = 'F' THEN
16436: x_return_status => l_return_status);
16437:
16438: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16439: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16440: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16441: END IF;
16442: END IF;
16443:
16444: IF l_validate_vehicle_result = 'F' THEN
16468: x_return_status => l_return_status);
16469:
16470: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16471: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16472: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16473: END IF;
16474: END IF;
16475:
16476: IF l_validate_itmmod_result <> 'S' THEN
16499: x_return_status => l_return_status);
16500:
16501: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16502: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16503: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16504: END IF;
16505: END IF;
16506:
16507: IF l_validate_itmcar_result <> 'S' THEN
16530: x_return_status => l_return_status);
16531:
16532: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16533: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16534: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16535: END IF;
16536: END IF;
16537:
16538: IF l_validate_itmveh_result <> 'S' THEN
16582: x_return_status => l_return_status);
16583:
16584: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16585: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16586: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16587: END IF;
16588: END IF;
16589:
16590: IF x_validate_result = 'F' THEN
16614: IF l_debug_on THEN
16615: WSH_DEBUG_SV.pop(l_module_name,' get vehicletype failed ');
16616: END IF;
16617: --
16618: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
16619: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
16620: --
16621: IF l_debug_on THEN
16622: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
16619: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
16620: --
16621: IF l_debug_on THEN
16622: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
16623: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
16624: END IF;
16625: --
16626: WHEN others THEN
16627: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_trip');
16628: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
16629: --
16630: IF l_debug_on THEN
16631: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
16632: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
16633: END IF;
16634: --
16635: END validate_constraint_trip;
16636:
16640: --========================================================================
16641: -- PROCEDURE : validate_constraint_stop Called by constraint Wrapper API
16642: -- and the Group API.
16643: --
16644: -- PARAMETERS: p_init_msg_list FND_API.G_TRUE to reset list
16645: -- p_action_code Predefined action code
16646: -- p_exception_list Compatibility classes to skip if any
16647: -- indexed by class code numbers
16648: -- p_stop_info Table of Stop records to process
16663: --Modified table p_stop_info in the beginning to get physical locations for dummy locations.
16664:
16665:
16666: PROCEDURE validate_constraint_stop(
16667: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
16668: p_action_code IN VARCHAR2 DEFAULT NULL,
16669: p_exception_list IN WSH_UTIL_CORE.Column_Tab_Type,
16670: p_stop_info IN stop_ccinfo_tab_type,
16671: p_parent_trip_info IN trip_ccinfo_tab_type,
16788: g_itmloc_mustuse_cache.DELETE;
16789: g_itm_exclusive_cache.DELETE;
16790: g_fac_exclusive_cache.DELETE;
16791:
16792: IF FND_API.to_Boolean( p_init_msg_list ) THEN
16793: FND_MSG_PUB.initialize;
16794: END IF;
16795:
16796: IF l_debug_on THEN
16801: refresh_cache(l_return_status);
16802:
16803: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16804: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16805: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16806: END IF;
16807: END IF;
16808:
16809: IF NOT p_exception_list.EXISTS(G_FACILITY_MODE_NUM) THEN
16858: x_return_status => l_return_status);
16859:
16860: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16861: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16862: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16863: END IF;
16864: END IF;
16865:
16866: IF p_parent_trip_info.COUNT = 0 THEN
17012:
17013: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17014: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17015: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
17016: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17017: END IF;
17018: raise g_get_carrmode_failed;
17019: END IF;
17020: END IF;
17045:
17046: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17047: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17048: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
17049: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17050: END IF;
17051: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => l_parent_trip_info(k).VEHICLE_ITEM_ID,
17052: p_organization_id => l_parent_trip_info(k).VEHICLE_ORGANIZATION_ID);
17053: l_vehicle_org_name := WSH_UTIL_CORE.get_org_name (p_organization_id => l_parent_trip_info(k).VEHICLE_ORGANIZATION_ID);
17080: x_return_status => l_return_status);
17081:
17082: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17083: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17084: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17085: END IF;
17086: END IF;
17087:
17088: IF l_validate_mode_result = 'F' THEN
17109: x_return_status => l_return_status);
17110:
17111: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17112: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17113: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17114: END IF;
17115: END IF;
17116:
17117: IF l_validate_carrier_result = 'F' THEN
17138: x_return_status => l_return_status);
17139:
17140: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17141: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17142: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17143: END IF;
17144: END IF;
17145:
17146: IF l_validate_vehicle_result = 'F' THEN
17172: x_return_status => l_return_status);
17173:
17174: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17175: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17176: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17177: END IF;
17178: END IF;
17179:
17180: IF l_validate_faccar_result <> 'S' THEN
17200: x_return_status => l_return_status);
17201:
17202: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17203: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17204: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17205: END IF;
17206: END IF;
17207:
17208: IF l_validate_facmod_result <> 'S' THEN
17229: x_return_status => l_return_status);
17230:
17231: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17232: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17233: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17234: END IF;
17235: END IF;
17236:
17237: IF l_validate_facveh_result <> 'S' THEN
17331: x_return_status => l_return_status);
17332:
17333: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17334: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17335: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17336: END IF;
17337: END IF;
17338:
17339: IF x_validate_result = 'F' THEN
17358: IF l_debug_on THEN
17359: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
17360: END IF;
17361: --
17362: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
17363: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
17364: --
17365: IF l_debug_on THEN
17366: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17363: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
17364: --
17365: IF l_debug_on THEN
17366: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17367: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
17368: END IF;
17369: --
17370: WHEN others THEN
17371: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_stop');
17372: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
17373: --
17374: IF l_debug_on THEN
17375: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17376: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
17377: END IF;
17378: --
17379: END validate_constraint_stop;
17380:
17467: x_failed_constraint => l_failed_constraint,
17468: x_return_status => l_return_status);
17469:
17470: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17471: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17472: END IF;
17473:
17474:
17475: IF l_debug_on THEN
17514: x_failed_constraint => l_failed_constraint,
17515: x_return_status => l_return_status);
17516:
17517: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17518: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17519: END IF;
17520:
17521: IF l_debug_on THEN
17522: wsh_debug_sv.logmsg (l_module_name, 'CUS-FAC l_validate_result: '||l_validate_result);
17552: x_failed_constraint => l_failed_constraint,
17553: x_return_status => l_return_status);
17554:
17555: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17556: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17557: END IF;
17558:
17559: IF l_debug_on THEN
17560: wsh_debug_sv.logmsg (l_module_name, 'Region/Zone - Facility constraint for ship to location l_validate_result: '||l_validate_result);
17587: x_failed_constraint => l_failed_constraint,
17588: x_return_status => l_return_status);
17589:
17590: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17591: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17592: END IF;
17593:
17594: IF l_debug_on THEN
17595: wsh_debug_sv.logmsg (l_module_name, 'ORG - FAC l_validate_result: '||l_validate_result);
17623: x_return_status => x_return_status);
17624:
17625: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17626: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17627: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17628: END IF;
17629: END IF;
17630:
17631: /* validate_region_constraint(
17635: x_failed_constraint => l_failed_constraint,
17636: x_return_status => l_return_status);
17637:
17638: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17639: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17640: END IF;
17641:
17642: IF l_debug_on THEN
17643: wsh_debug_sv.logmsg (l_module_name, 'Region/Zone - Facility constraint for ship to location l_validate_result: '||l_validate_result);
17683: x_failed_constraint => l_failed_constraint,
17684: x_return_status => l_return_status);
17685:
17686: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17687: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17688: END IF;
17689:
17690: IF l_debug_on THEN
17691: wsh_debug_sv.logmsg (l_module_name, 'ITM - FAC l_validate_result: '||l_validate_result);
17719: END IF;
17720:
17721: EXCEPTION
17722:
17723: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
17724: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
17725: --
17726: IF l_debug_on THEN
17727: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17724: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
17725: --
17726: IF l_debug_on THEN
17727: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17728: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
17729: END IF;
17730:
17731: WHEN OTHERS THEN
17732: IF c_get_details%ISOPEN THEN
17736: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
17737: --
17738: IF l_debug_on THEN
17739: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17740: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
17741: END IF;
17742:
17743: END validate_exclusive_constraints;
17744:
17882: x_return_status => l_return_status);
17883:
17884: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17885: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17886: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17887: END IF;
17888: END IF;
17889:
17890: r_itr:= l_region_tab.FIRST;
17913: x_return_status => l_return_status);
17914:
17915: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17916: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17917: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17918: END IF;
17919: END IF;
17920:
17921: IF l_debug_on THEN
18005: x_return_status => x_return_status);
18006:
18007: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18008: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18009: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18010: END IF;
18011: END IF;*/
18012:
18013: IF ( l_constr_org_id < g_cache_max_size AND g_org_mustuse_location.EXISTS(l_constr_org_id)) THEN
18051: x_return_status => x_return_status);
18052:
18053: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18054: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18055: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18056: END IF;
18057: END IF;
18058:
18059: IF g_region_mustuse_constraints.COUNT = 0 THEN
18078: x_return_status => l_return_status);
18079:
18080: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18081: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18082: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18083: END IF;
18084: END IF;
18085:
18086: r_itr:= l_region_tab.FIRST;
18109: x_return_status => l_return_status);
18110:
18111: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18112: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18113: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18114: END IF;
18115: END IF;
18116:
18117: IF l_debug_on THEN
18153: END IF;
18154:
18155: EXCEPTION
18156:
18157: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
18158: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18159: --
18160: IF l_debug_on THEN
18161: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18158: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18159: --
18160: IF l_debug_on THEN
18161: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18162: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
18163: END IF;
18164:
18165: WHEN OTHERS THEN
18166: IF c_get_must_use_location%ISOPEN THEN
18177: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18178: --
18179: IF l_debug_on THEN
18180: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18181: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
18182: END IF;
18183:
18184: END get_must_use_facility;
18185:
18186: --***************************************************************************--
18187: --========================================================================
18188: -- PROCEDURE : VALIDATE_CONSTRAINT_DECONSOL
18189: --
18190: -- PARAMETERS: p_init_msg_list FND_API.G_TRUE to reset list
18191: -- p_delivery_info Table of delivery records to process
18192: -- Only one of p_in_ids and p_delivery_info should be passed
18193: -- p_in_ids Table of delivery ids to process
18194: -- p_rule_deconsol_location Default deconsolidation location passed
18231: -- else
18232: -- use supplied location
18233: --========================================================================
18234:
18235: PROCEDURE validate_constraint_deconsol( p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
18236: p_delivery_info IN OUT NOCOPY delivery_ccinfo_tab_type,
18237: p_in_ids IN wsh_util_core.id_tab_type,
18238: p_rule_deconsol_location IN NUMBER default NULL,
18239: p_rule_override_deconsol IN BOOLEAN DEFAULT FALSE,
18334: x_return_status => l_return_status);
18335:
18336: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18337: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18338: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18339: END IF;
18340: END IF;
18341:
18342: --physical location id is not null implies- A dummy location.
18425: WSH_DEBUG_SV.logmsg(l_module_name,'VALIDATE_EXCLUSIVE_CONSTRAINTS l_return_status : '||l_return_status);
18426: END IF;
18427:
18428: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
18429: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18430: ELSE
18431: IF l_validate_result = l_success THEN
18432: x_output_id_tab(rec_cnt).deconsol_location := p_rule_deconsol_location;
18433: x_output_id_tab(rec_cnt).entity_id := p_delivery_info(rec_cnt).delivery_id;
18492: WSH_DEBUG_SV.logmsg(l_module_name,'VALIDATE_EXCLUSIVE_CONSTRAINTS_return_status : '||l_return_status);
18493: END IF;
18494:
18495: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
18496: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18497: ELSE
18498: IF l_validate_result = l_success THEN
18499: x_output_id_tab(rec_cnt).deconsol_location := l_intermed_ship_to_loc_id;
18500: x_output_id_tab(rec_cnt).entity_id := p_delivery_info(rec_cnt).delivery_id;
18531: x_return_status => l_return_status);
18532:
18533: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18534: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18535: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18536: END IF;
18537: END IF;
18538:
18539: IF l_rule_deconsol_location IS NOT NULL THEN
18543: x_validate_result => l_validate_result,
18544: x_return_status => l_return_status);
18545:
18546: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
18547: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18548: ELSE
18549: IF l_validate_result = l_success THEN
18550: x_output_id_tab(rec_cnt).deconsol_location := l_rule_deconsol_location;
18551: x_output_id_tab(rec_cnt).entity_id := p_delivery_info(rec_cnt).delivery_id;
18587: x_return_status => l_return_status);
18588:
18589: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18590: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18591: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18592: END IF;
18593: END IF;
18594:
18595: --
18612: x_validate_result => l_validate_result,
18613: x_return_status => l_return_status);
18614:
18615: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
18616: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18617: ELSE
18618: IF l_validate_result = l_success THEN
18619: x_output_id_tab(rec_cnt).deconsol_location := l_rule_deconsol_location;
18620: x_output_id_tab(rec_cnt).entity_id := p_delivery_info(rec_cnt).delivery_id;
18677: x_return_status => l_return_status);
18678:
18679: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18680: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18681: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18682: END IF;
18683: END IF;
18684:
18685: IF l_region_tab.COUNT > 0 THEN
18727:
18728: FND_MSG_PUB.Count_And_Get (
18729: p_count => l_msg_count,
18730: p_data => l_msg_data ,
18731: p_encoded => FND_API.G_FALSE );
18732:
18733: IF l_debug_on THEN
18734: wsh_debug_sv.log (l_module_name,'No. of messages already in stack : ',to_char(l_msg_count));
18735: WSH_DEBUG_SV.pop(l_module_name);
18736: END IF;
18737:
18738: EXCEPTION
18739:
18740: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
18741: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18742: --
18743: IF l_debug_on THEN
18744: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18741: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18742: --
18743: IF l_debug_on THEN
18744: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18745: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
18746: END IF;
18747:
18748: WHEN OTHERS THEN
18749: IF c_gettrip%ISOPEN THEN
18756: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18757: --
18758: IF l_debug_on THEN
18759: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18760: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
18761: END IF;
18762:
18763: END validate_constraint_deconsol;
18764: