[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,
11689: g_itmloc_mustuse_cache.DELETE;
11690: g_itm_exclusive_cache.DELETE;
11691: g_fac_exclusive_cache.DELETE;
11692:
11693: IF FND_API.to_Boolean( p_init_msg_list ) THEN
11694: FND_MSG_PUB.initialize;
11695: END IF;
11696:
11697: IF l_debug_on THEN
11713: refresh_cache(l_return_status);
11714:
11715: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11716: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11717: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11718: END IF;
11719: END IF;
11720:
11721: -- Assumes p_comp_class_tab and p_exception_list are indexed by
11788: x_return_status => l_return_status);
11789:
11790: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11791: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11792: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11793: END IF;
11794: END IF;
11795:
11796: --physical location id is not null implies- A dummy location.
11888: x_return_status => l_return_status);
11889:
11890: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11891: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11892: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11893: END IF;
11894: END IF;
11895:
11896: IF (l_physical_location_id IS NOT NULL) THEN
12007: x_return_status => l_return_status);
12008:
12009: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12010: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12011: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12012: END IF;
12013: END IF;
12014:
12015: IF (l_physical_location_id IS NOT NULL) THEN
12068: x_return_status => l_return_status);
12069:
12070: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12071: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12072: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12073: END IF;
12074: END IF;
12075:
12076: IF (l_physical_location_id IS NOT NULL) THEN
12108: x_return_status => l_return_status);
12109:
12110: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12111: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12112: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12113: END IF;
12114: END IF;
12115:
12116: IF (l_physical_location_id IS NOT NULL) THEN
12142: x_return_status => l_return_status);
12143:
12144: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12145: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12146: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12147: END IF;
12148: END IF;
12149:
12150: IF (l_physical_location_id IS NOT NULL) THEN
12178: x_return_status => l_return_status);
12179:
12180: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12181: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12182: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12183: END IF;
12184: END IF;
12185:
12186: IF (l_physical_location_id IS NOT NULL) THEN
12212: x_return_status => l_return_status);
12213:
12214: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12215: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12216: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12217: END IF;
12218: END IF;
12219:
12220: IF (l_physical_location_id IS NOT NULL) THEN
12246: x_return_status => l_return_status);
12247:
12248: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12249: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12250: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12251: END IF;
12252: END IF;
12253:
12254: IF (l_physical_location_id IS NOT NULL) THEN
12296:
12297:
12298: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12299: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12300: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12301: END IF;
12302: END IF;
12303:
12304: -- l := p_target_trip_incl_stops.FIRST;
12353: x_return_status => l_return_status);
12354:
12355: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12356: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12357: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12358: END IF;
12359: END IF;
12360:
12361: IF (l_physical_location_id IS NOT NULL) THEN
12375: x_return_status => l_return_status);
12376:
12377: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12378: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12379: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12380: END IF;
12381: END IF;
12382:
12383: IF (l_physical_location_id IS NOT NULL) THEN
12473:
12474: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12475: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12476: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
12477: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12478: END IF;
12479: raise g_get_carrmode_failed;
12480: END IF;
12481: END IF;
12507:
12508: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12509: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12510: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
12511: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12512: END IF;
12513: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => l_target_trip.VEHICLE_ITEM_ID,
12514: p_organization_id => l_target_trip.VEHICLE_ORGANIZATION_ID);
12515: l_vehicle_org_name := WSH_UTIL_CORE.get_org_name (p_organization_id => l_target_trip.VEHICLE_ORGANIZATION_ID);
12575: x_return_status => l_return_status);
12576:
12577: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12578: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12579: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12580: END IF;
12581: END IF;
12582:
12583: IF l_validate_vehicle_result <> 'S' THEN
12606: x_return_status => l_return_status);
12607:
12608: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12609: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12610: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12611: END IF;
12612: END IF;
12613:
12614: IF l_validate_carrier_result <> 'S' THEN
12637: x_return_status => l_return_status);
12638:
12639: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12640: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12641: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12642: END IF;
12643: END IF;
12644:
12645: IF l_validate_mode_result <> 'S' THEN
12731: --
12732:
12733: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12734: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12735: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12736: END IF;
12737: END IF;
12738:
12739: END IF;
12753: --
12754:
12755: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12756: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12757: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12758: END IF;
12759: END IF;
12760:
12761: END IF;
12791: --
12792:
12793: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12794: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12795: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12796: END IF;
12797: END IF;
12798:
12799: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,WSH_UTIL_CORE.G_RET_STS_WARNING)
12847:
12848: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12849: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12850:
12851: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12852: END IF;
12853: END IF;
12854:
12855: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
12939: --
12940:
12941: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12942: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12943: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12944: END IF;
12945: END IF;
12946:
12947: END IF; -- ACT ADT
13051: --
13052:
13053: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13054: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13055: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13056: END IF;
13057: END IF;
13058:
13059: -- Now can get x_validate_result = 'F' with x_group_info.COUNT = 1 and
13075: END IF;
13076: --
13077:
13078: EXCEPTION
13079: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
13080: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
13081: --
13082: IF l_debug_on THEN
13083: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13080: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
13081: --
13082: IF l_debug_on THEN
13083: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13084: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
13085: END IF;
13086: --
13087: WHEN others THEN
13088: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_dlvy');
13089: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
13090: --
13091: IF l_debug_on THEN
13092: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13093: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
13094: END IF;
13095: --
13096:
13097: END validate_constraint_dlvy;
13101: --========================================================================
13102: -- PROCEDURE : validate_constraint_dleg Called by constraint Wrapper API
13103: -- and the Lane search API.
13104: --
13105: -- PARAMETERS: p_init_msg_list FND_API.G_TRUE to reset list
13106: -- p_action_code Predefined action code
13107: -- p_exception_list Compatibility classes to skip if any
13108: -- indexed by class code numbers
13109: -- p_delivery_leg_rec Input delivery leg record
13119: -- A. Lane search for delivery leg (DLS)
13120: --========================================================================
13121:
13122: PROCEDURE validate_constraint_dleg(
13123: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
13124: p_action_code IN VARCHAR2 DEFAULT NULL,
13125: p_exception_list IN WSH_UTIL_CORE.Column_Tab_Type,
13126: p_delivery_leg_rec IN dleg_ccinfo_rec_type,
13127: p_target_trip IN trip_ccinfo_tab_type,
13204: g_itmloc_mustuse_cache.DELETE;
13205: g_itm_exclusive_cache.DELETE;
13206: g_fac_exclusive_cache.DELETE;
13207:
13208: IF FND_API.to_Boolean( p_init_msg_list ) THEN
13209: FND_MSG_PUB.initialize;
13210: END IF;
13211:
13212: IF l_debug_on THEN
13217: refresh_cache(l_return_status);
13218:
13219: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13220: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13221: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13222: END IF;
13223: END IF;
13224:
13225: /*
13308: x_return_status => l_return_status);
13309:
13310: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13311: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13312: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13313: END IF;
13314: END IF;
13315:
13316: IF (l_physical_location_id IS NOT NULL) THEN
13346: x_return_status => l_return_status);
13347:
13348: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13349: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13350: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13351: END IF;
13352: END IF;
13353:
13354: IF (l_physical_location_id IS NOT NULL) THEN
13383: x_return_status => l_return_status);
13384:
13385: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13386: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13387: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13388: END IF;
13389: END IF;
13390:
13391: IF (l_physical_location_id IS NOT NULL) THEN
13412: x_return_status => l_return_status);
13413:
13414: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13415: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13416: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13417: END IF;
13418: END IF;
13419:
13420: IF (l_physical_location_id IS NOT NULL) THEN
13467: x_return_status => l_return_status);
13468:
13469: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13470: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13471: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13472: END IF;
13473: END IF;
13474:
13475: IF l_validate_carrier_result = 'F' THEN
13493: x_return_status => l_return_status);
13494:
13495: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13496: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13497: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13498: END IF;
13499: END IF;
13500:
13501: IF l_validate_carrier_result = 'F' THEN
13523: x_return_status => l_return_status);
13524:
13525: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13526: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13527: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13528: END IF;
13529: END IF;
13530:
13531: IF l_validate_mode_result = 'F' THEN
13549: x_return_status => l_return_status);
13550:
13551: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13552: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13553: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13554: END IF;
13555: END IF;
13556:
13557: IF l_validate_mode_result = 'F' THEN
13582: x_return_status => l_return_status);
13583:
13584: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13585: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13586: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13587: END IF;
13588: END IF;
13589:
13590: IF l_validate_faccar_result <> 'S' THEN
13611: x_return_status => l_return_status);
13612:
13613: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13614: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13615: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13616: END IF;
13617: END IF;
13618:
13619: IF l_validate_faccar_result <> 'S' THEN
13644: x_return_status => l_return_status);
13645:
13646: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13647: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13648: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13649: END IF;
13650: END IF;
13651:
13652: IF l_validate_facmod_result <> 'S' THEN
13673: x_return_status => l_return_status);
13674:
13675: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13676: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13677: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13678: END IF;
13679: END IF;
13680:
13681: IF l_validate_facmod_result <> 'S' THEN
13719: x_return_status => l_return_status);
13720:
13721: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13722: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13723: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13724: END IF;
13725: END IF;
13726:
13727: IF l_validate_carrier_result = 'F' THEN
13750: x_return_status => l_return_status);
13751:
13752: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13753: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13754: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13755: END IF;
13756: END IF;
13757:
13758: IF l_validate_mode_result = 'F' THEN
13777: x_return_status => l_return_status);
13778:
13779: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13780: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13781: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13782: END IF;
13783: END IF;
13784:
13785: -- For exclusive constraints error with one detail in the group is error
13814: x_return_status => l_return_status);
13815:
13816: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13817: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13818: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13819: END IF;
13820: END IF;
13821:
13822: -- For exclusive constraints error with one detail in the group is error
13910: x_return_status => l_return_status);
13911:
13912: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13913: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13914: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13915: END IF;
13916: END IF;
13917:
13918: IF (l_physical_location_id IS NOT NULL) THEN
13948: x_return_status => l_return_status);
13949:
13950: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13951: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13952: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13953: END IF;
13954: END IF;
13955:
13956: IF (l_physical_location_id IS NOT NULL) THEN
14024: --
14025:
14026: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14027: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14028: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14029: END IF;
14030: END IF;
14031:
14032: validate_positive_constraint(
14050: --
14051:
14052: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14053: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14054: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14055: END IF;
14056: ELSIF l_failed_lines.COUNT > 0 THEN
14057: x_validate_result := 'F';
14058: l_validate_result := 'F';
14076: x_return_status => l_return_status);
14077:
14078: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14079: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14080: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14081: END IF;
14082: END IF;
14083:
14084: IF l_validate_excl_result = 'F' THEN
14125: x_return_status => l_return_status);
14126:
14127: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14128: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14129: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14130: END IF;
14131: END IF;
14132:
14133: IF l_validate_faccar_result <> 'S' THEN
14154: x_return_status => l_return_status);
14155:
14156: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14157: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14158: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14159: END IF;
14160: END IF;
14161:
14162: IF l_validate_faccar_result <> 'S' THEN
14187: x_return_status => l_return_status);
14188:
14189: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14190: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14191: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14192: END IF;
14193: END IF;
14194:
14195: IF l_validate_facmod_result <> 'S' THEN
14216: x_return_status => l_return_status);
14217:
14218: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14219: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14220: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14221: END IF;
14222: END IF;
14223:
14224: IF l_validate_facmod_result <> 'S' THEN
14250: x_return_status => l_return_status);
14251:
14252: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14253: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14254: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14255: END IF;
14256: END IF;
14257:
14258: IF l_validate_result = 'F' THEN
14271: x_return_status => l_return_status);
14272:
14273: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14274: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14275: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14276: END IF;
14277: END IF;
14278:
14279: IF x_validate_result = 'F' THEN
14302: IF l_debug_on THEN
14303: WSH_DEBUG_SV.pop(l_module_name,' get vehicletype failed ');
14304: END IF;
14305: --
14306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
14307: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
14308: --
14309: IF l_debug_on THEN
14310: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
14307: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
14308: --
14309: IF l_debug_on THEN
14310: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
14311: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
14312: END IF;
14313: --
14314: WHEN others THEN
14315: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_dleg');
14316: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
14317: --
14318: IF l_debug_on THEN
14319: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
14320: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
14321: END IF;
14322: --
14323: END validate_constraint_dleg;
14324:
14327: --========================================================================
14328: -- PROCEDURE : validate_constraint_dlvb Called by constraint Wrapper API
14329: -- and the Group API.
14330: --
14331: -- PARAMETERS: p_init_msg_list FND_API.G_TRUE to reset list
14332: -- p_action_code Predefined action code
14333: -- p_exception_list Compatibility classes to skip if any
14334: -- indexed by class code numbers
14335: -- p_in_ids Table of delivery ids to process
14363: -- to the target delivery
14364: --========================================================================
14365:
14366: PROCEDURE validate_constraint_dlvb(
14367: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
14368: p_action_code IN VARCHAR2 DEFAULT NULL,
14369: p_exception_list IN WSH_UTIL_CORE.Column_Tab_Type,
14370: p_in_ids IN WSH_UTIL_CORE.id_tab_type,
14371: p_del_detail_info IN detail_ccinfo_tab_type,
14489: g_itmloc_mustuse_cache.DELETE;
14490: g_itm_exclusive_cache.DELETE;
14491: g_fac_exclusive_cache.DELETE;
14492:
14493: IF FND_API.to_Boolean( p_init_msg_list ) THEN
14494: FND_MSG_PUB.initialize;
14495: END IF;
14496:
14497: IF l_debug_on THEN
14511: refresh_cache(l_return_status);
14512:
14513: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14514: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14515: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14516: END IF;
14517: END IF;
14518:
14519: IF NOT p_exception_list.EXISTS(G_CUSTOMER_CUSTOMER_NUM) THEN
14585: x_return_status => l_return_status);
14586:
14587: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14588: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14589: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14590: END IF;
14591: END IF;
14592:
14593: IF (l_physical_location_id IS NOT NULL) THEN
14649: x_return_status => l_return_status);
14650:
14651: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14652: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14653: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14654: END IF;
14655: END IF;
14656:
14657: IF (l_physical_location_id IS NOT NULL) THEN
14687: x_return_status => l_return_status);
14688:
14689: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14690: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14691: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14692: END IF;
14693: END IF;
14694:
14695: IF (l_physical_location_id IS NOT NULL) THEN
14721: x_return_status => l_return_status);
14722:
14723: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14724: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14725: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14726: END IF;
14727: END IF;
14728:
14729: IF (l_physical_location_id IS NOT NULL) THEN
14758: x_return_status => l_return_status);
14759:
14760: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14761: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14762: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14763: END IF;
14764: END IF;
14765:
14766: IF (l_physical_location_id IS NOT NULL) THEN
14791: x_return_status => l_return_status);
14792:
14793: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14794: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14795: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14796: END IF;
14797: END IF;
14798:
14799: IF (l_physical_location_id IS NOT NULL) THEN
14828: x_return_status => l_return_status);
14829:
14830: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14831: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14832: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14833: END IF;
14834: END IF;
14835:
14836: IF (l_physical_location_id IS NOT NULL) THEN
14892: x_return_status => l_return_status);
14893:
14894: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14895: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14896: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14897: END IF;
14898: END IF;
14899:
14900: IF (l_physical_location_id IS NOT NULL) THEN
14994: x_return_status => l_return_status);
14995:
14996: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14997: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14998: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14999: END IF;
15000: END IF;
15001:
15002: IF l_validate_itmfacin_result = 'F' THEN
15043: --
15044:
15045: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15046: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15047: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15048: END IF;
15049: END IF;
15050:
15051: END IF; -- FIRST
15069: --
15070:
15071: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15072: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15073: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15074: END IF;
15075: END IF;
15076: END IF;
15077:
15118: x_return_status => l_return_status);
15119:
15120: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15121: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15122: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15123: END IF;
15124: END IF;
15125:
15126: IF l_validate_customer_result <> 'S' THEN
15176:
15177: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15178: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15179:
15180: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15181: END IF;
15182: END IF;
15183:
15184: IF l_validate_customer_result <> 'S' THEN
15229: x_return_status => l_return_status);
15230:
15231: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15232: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15233: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15234: END IF;
15235: END IF;
15236:
15237: IF l_validate_itmin_result = 'F' THEN
15285:
15286: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15287: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15288: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
15289: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15290: END IF;
15291: raise g_get_carrmode_failed;
15292: END IF;
15293: END IF;
15309:
15310: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15311: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15312: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
15313: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15314: END IF;
15315: raise g_get_carrmode_failed;
15316: END IF;
15317: END IF;
15335: x_return_status => l_return_status);
15336:
15337: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15338: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15339: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15340: END IF;
15341: END IF;
15342:
15343: IF l_validate_carrier_result <> 'S' THEN
15376: x_return_status => l_return_status);
15377:
15378: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15379: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15380: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15381: END IF;
15382: END IF;
15383:
15384: IF l_validate_mode_result <> 'S' THEN
15421: x_return_status => l_return_status);
15422:
15423: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15424: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15425: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15426: END IF;
15427: END IF;
15428:
15429: IF l_validate_carrier_result <> 'S' THEN
15448: x_return_status => l_return_status);
15449:
15450: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15451: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15452: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15453: END IF;
15454: END IF;
15455:
15456: IF l_validate_carrier_result <> 'S' THEN
15481: x_return_status => l_return_status);
15482:
15483: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15484: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15485: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15486: END IF;
15487: END IF;
15488:
15489: IF l_validate_mode_result <> 'S' THEN
15507: x_return_status => l_return_status);
15508:
15509: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15510: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15511: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15512: END IF;
15513: END IF;
15514:
15515: IF l_validate_mode_result <> 'S' THEN
15610: x_return_status => l_return_status);
15611:
15612: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15613: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15614: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15615: END IF;
15616: END IF;
15617:
15618: IF x_validate_result = 'F' THEN
15649: WSH_DEBUG_SV.pop(l_module_name,' invalid_input ');
15650: END IF;
15651: --
15652:
15653: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
15654: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
15655: --
15656: IF l_debug_on THEN
15657: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
15654: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
15655: --
15656: IF l_debug_on THEN
15657: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
15658: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
15659: END IF;
15660: --
15661: WHEN others THEN
15662: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_dlvb');
15663: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
15664: --
15665: IF l_debug_on THEN
15666: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
15667: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
15668: END IF;
15669: --
15670: END validate_constraint_dlvb;
15671:
15675: --========================================================================
15676: -- PROCEDURE : validate_constraint_trip Called by constraint Wrapper API
15677: -- and the Group API.
15678: --
15679: -- PARAMETERS: p_init_msg_list FND_API.G_TRUE to reset list
15680: -- p_action_code Predefined action code
15681: -- p_exception_list Compatibility classes to skip if any
15682: -- indexed by class code numbers
15683: -- p_trip_info Table of Trip records to process
15696: -- A. Update an existing trip (UPT)
15697: --========================================================================
15698:
15699: PROCEDURE validate_constraint_trip(
15700: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
15701: p_action_code IN VARCHAR2 DEFAULT NULL,
15702: p_exception_list IN WSH_UTIL_CORE.Column_Tab_Type,
15703: p_trip_info IN trip_ccinfo_tab_type,
15704: p_trip_assigned_dels IN delivery_ccinfo_tab_type,
15769: g_itmloc_mustuse_cache.DELETE;
15770: g_itm_exclusive_cache.DELETE;
15771: g_fac_exclusive_cache.DELETE;
15772:
15773: IF FND_API.to_Boolean( p_init_msg_list ) THEN
15774: FND_MSG_PUB.initialize;
15775: END IF;
15776:
15777: IF l_debug_on THEN
15782: refresh_cache(l_return_status);
15783:
15784: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15785: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15786: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15787: END IF;
15788: END IF;
15789:
15790: IF NOT p_exception_list.EXISTS(G_FACILITY_MODE_NUM) THEN
15823: x_return_status => l_return_status);
15824:
15825: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15826: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15827: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15828: END IF;
15829: END IF;
15830:
15831: IF (l_physical_location_id IS NOT NULL) THEN
15859: x_return_status => l_return_status);
15860:
15861: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15862: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15863: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15864: END IF;
15865: END IF;
15866:
15867: IF (l_physical_location_id IS NOT NULL) THEN
15915: x_return_status => l_return_status);
15916:
15917: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15918: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15919: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15920: END IF;
15921: END IF;
15922:
15923: IF (l_physical_location_id IS NOT NULL) THEN
15950: x_return_status => l_return_status);
15951:
15952: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15953: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15954: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15955: END IF;
15956: END IF;
15957:
15958: IF (l_physical_location_id IS NOT NULL) THEN
15986: x_return_status => l_return_status);
15987:
15988: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15989: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15990: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15991: END IF;
15992: END IF;
15993:
15994: -- l := p_trip_incl_stops.FIRST;
16053:
16054: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16055: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16056: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
16057: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16058: END IF;
16059: raise g_get_carrmode_failed;
16060: END IF;
16061: END IF;
16084:
16085: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16086: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16087: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
16088: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16089: END IF;
16090: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => p_trip_info(j).VEHICLE_ITEM_ID,
16091: p_organization_id => p_trip_info(j).VEHICLE_ORGANIZATION_ID);
16092: l_vehicle_org_name := WSH_UTIL_CORE.get_org_name (p_organization_id => p_trip_info(j).VEHICLE_ORGANIZATION_ID);
16135: x_return_status => l_return_status);
16136:
16137: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16138: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16139: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16140: END IF;
16141: END IF;
16142:
16143: IF l_validate_mode_result = 'F' THEN
16163: x_return_status => l_return_status);
16164:
16165: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16166: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16167: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16168: END IF;
16169: END IF;
16170:
16171: IF l_validate_carrier_result = 'F' THEN
16191: x_return_status => l_return_status);
16192:
16193: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16194: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16195: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16196: END IF;
16197: END IF;
16198:
16199: IF l_validate_vehicle_result = 'F' THEN
16222: x_return_status => l_return_status);
16223:
16224: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16225: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16226: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16227: END IF;
16228: END IF;
16229:
16230: IF l_validate_faccar_result <> 'S' THEN
16252: x_return_status => l_return_status);
16253:
16254: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16255: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16256: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16257: END IF;
16258: END IF;
16259:
16260: IF l_validate_facmod_result <> 'S' THEN
16282: x_return_status => l_return_status);
16283:
16284: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16285: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16286: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16287: END IF;
16288: END IF;
16289:
16290: IF l_validate_facveh_result <> 'S' THEN
16383: x_return_status => l_return_status);
16384:
16385: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16386: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16387: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16388: END IF;
16389: END IF;
16390:
16391: IF l_validate_mode_result = 'F' THEN
16412: x_return_status => l_return_status);
16413:
16414: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16415: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16416: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16417: END IF;
16418: END IF;
16419:
16420: IF l_validate_carrier_result = 'F' THEN
16441: x_return_status => l_return_status);
16442:
16443: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16444: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16445: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16446: END IF;
16447: END IF;
16448:
16449: IF l_validate_vehicle_result = 'F' THEN
16473: x_return_status => l_return_status);
16474:
16475: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16476: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16477: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16478: END IF;
16479: END IF;
16480:
16481: IF l_validate_itmmod_result <> 'S' THEN
16504: x_return_status => l_return_status);
16505:
16506: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16507: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16508: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16509: END IF;
16510: END IF;
16511:
16512: IF l_validate_itmcar_result <> 'S' THEN
16535: x_return_status => l_return_status);
16536:
16537: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16538: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16539: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16540: END IF;
16541: END IF;
16542:
16543: IF l_validate_itmveh_result <> 'S' THEN
16587: x_return_status => l_return_status);
16588:
16589: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16590: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16591: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16592: END IF;
16593: END IF;
16594:
16595: IF x_validate_result = 'F' THEN
16619: IF l_debug_on THEN
16620: WSH_DEBUG_SV.pop(l_module_name,' get vehicletype failed ');
16621: END IF;
16622: --
16623: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
16624: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
16625: --
16626: IF l_debug_on THEN
16627: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
16624: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
16625: --
16626: IF l_debug_on THEN
16627: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
16628: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
16629: END IF;
16630: --
16631: WHEN others THEN
16632: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_trip');
16633: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
16634: --
16635: IF l_debug_on THEN
16636: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
16637: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
16638: END IF;
16639: --
16640: END validate_constraint_trip;
16641:
16645: --========================================================================
16646: -- PROCEDURE : validate_constraint_stop Called by constraint Wrapper API
16647: -- and the Group API.
16648: --
16649: -- PARAMETERS: p_init_msg_list FND_API.G_TRUE to reset list
16650: -- p_action_code Predefined action code
16651: -- p_exception_list Compatibility classes to skip if any
16652: -- indexed by class code numbers
16653: -- p_stop_info Table of Stop records to process
16668: --Modified table p_stop_info in the beginning to get physical locations for dummy locations.
16669:
16670:
16671: PROCEDURE validate_constraint_stop(
16672: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
16673: p_action_code IN VARCHAR2 DEFAULT NULL,
16674: p_exception_list IN WSH_UTIL_CORE.Column_Tab_Type,
16675: p_stop_info IN stop_ccinfo_tab_type,
16676: p_parent_trip_info IN trip_ccinfo_tab_type,
16793: g_itmloc_mustuse_cache.DELETE;
16794: g_itm_exclusive_cache.DELETE;
16795: g_fac_exclusive_cache.DELETE;
16796:
16797: IF FND_API.to_Boolean( p_init_msg_list ) THEN
16798: FND_MSG_PUB.initialize;
16799: END IF;
16800:
16801: IF l_debug_on THEN
16806: refresh_cache(l_return_status);
16807:
16808: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16809: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16810: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16811: END IF;
16812: END IF;
16813:
16814: IF NOT p_exception_list.EXISTS(G_FACILITY_MODE_NUM) THEN
16863: x_return_status => l_return_status);
16864:
16865: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16866: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16867: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16868: END IF;
16869: END IF;
16870:
16871: IF p_parent_trip_info.COUNT = 0 THEN
17017:
17018: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17019: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17020: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
17021: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17022: END IF;
17023: raise g_get_carrmode_failed;
17024: END IF;
17025: END IF;
17050:
17051: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17052: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17053: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
17054: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17055: END IF;
17056: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => l_parent_trip_info(k).VEHICLE_ITEM_ID,
17057: p_organization_id => l_parent_trip_info(k).VEHICLE_ORGANIZATION_ID);
17058: l_vehicle_org_name := WSH_UTIL_CORE.get_org_name (p_organization_id => l_parent_trip_info(k).VEHICLE_ORGANIZATION_ID);
17085: x_return_status => l_return_status);
17086:
17087: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17088: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17089: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17090: END IF;
17091: END IF;
17092:
17093: IF l_validate_mode_result = 'F' THEN
17114: x_return_status => l_return_status);
17115:
17116: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17117: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17118: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17119: END IF;
17120: END IF;
17121:
17122: IF l_validate_carrier_result = 'F' THEN
17143: x_return_status => l_return_status);
17144:
17145: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17146: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17147: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17148: END IF;
17149: END IF;
17150:
17151: IF l_validate_vehicle_result = 'F' THEN
17177: x_return_status => l_return_status);
17178:
17179: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17180: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17181: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17182: END IF;
17183: END IF;
17184:
17185: IF l_validate_faccar_result <> 'S' THEN
17205: x_return_status => l_return_status);
17206:
17207: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17208: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17209: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17210: END IF;
17211: END IF;
17212:
17213: IF l_validate_facmod_result <> 'S' THEN
17234: x_return_status => l_return_status);
17235:
17236: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17237: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17238: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17239: END IF;
17240: END IF;
17241:
17242: IF l_validate_facveh_result <> 'S' THEN
17336: x_return_status => l_return_status);
17337:
17338: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17339: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17340: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17341: END IF;
17342: END IF;
17343:
17344: IF x_validate_result = 'F' THEN
17363: IF l_debug_on THEN
17364: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
17365: END IF;
17366: --
17367: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
17368: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
17369: --
17370: IF l_debug_on THEN
17371: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17368: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
17369: --
17370: IF l_debug_on THEN
17371: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17372: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
17373: END IF;
17374: --
17375: WHEN others THEN
17376: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_stop');
17377: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
17378: --
17379: IF l_debug_on THEN
17380: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17381: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
17382: END IF;
17383: --
17384: END validate_constraint_stop;
17385:
17472: x_failed_constraint => l_failed_constraint,
17473: x_return_status => l_return_status);
17474:
17475: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17476: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17477: END IF;
17478:
17479:
17480: IF l_debug_on THEN
17519: x_failed_constraint => l_failed_constraint,
17520: x_return_status => l_return_status);
17521:
17522: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17523: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17524: END IF;
17525:
17526: IF l_debug_on THEN
17527: wsh_debug_sv.logmsg (l_module_name, 'CUS-FAC l_validate_result: '||l_validate_result);
17557: x_failed_constraint => l_failed_constraint,
17558: x_return_status => l_return_status);
17559:
17560: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17561: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17562: END IF;
17563:
17564: IF l_debug_on THEN
17565: wsh_debug_sv.logmsg (l_module_name, 'Region/Zone - Facility constraint for ship to location l_validate_result: '||l_validate_result);
17592: x_failed_constraint => l_failed_constraint,
17593: x_return_status => l_return_status);
17594:
17595: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17596: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17597: END IF;
17598:
17599: IF l_debug_on THEN
17600: wsh_debug_sv.logmsg (l_module_name, 'ORG - FAC l_validate_result: '||l_validate_result);
17628: x_return_status => x_return_status);
17629:
17630: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17631: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17632: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17633: END IF;
17634: END IF;
17635:
17636: /* validate_region_constraint(
17640: x_failed_constraint => l_failed_constraint,
17641: x_return_status => l_return_status);
17642:
17643: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17644: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17645: END IF;
17646:
17647: IF l_debug_on THEN
17648: wsh_debug_sv.logmsg (l_module_name, 'Region/Zone - Facility constraint for ship to location l_validate_result: '||l_validate_result);
17688: x_failed_constraint => l_failed_constraint,
17689: x_return_status => l_return_status);
17690:
17691: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17692: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17693: END IF;
17694:
17695: IF l_debug_on THEN
17696: wsh_debug_sv.logmsg (l_module_name, 'ITM - FAC l_validate_result: '||l_validate_result);
17724: END IF;
17725:
17726: EXCEPTION
17727:
17728: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
17729: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
17730: --
17731: IF l_debug_on THEN
17732: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17729: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
17730: --
17731: IF l_debug_on THEN
17732: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17733: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
17734: END IF;
17735:
17736: WHEN OTHERS THEN
17737: IF c_get_details%ISOPEN THEN
17741: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
17742: --
17743: IF l_debug_on THEN
17744: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17745: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
17746: END IF;
17747:
17748: END validate_exclusive_constraints;
17749:
17887: x_return_status => l_return_status);
17888:
17889: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17890: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17891: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17892: END IF;
17893: END IF;
17894:
17895: r_itr:= l_region_tab.FIRST;
17918: x_return_status => l_return_status);
17919:
17920: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17921: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17922: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17923: END IF;
17924: END IF;
17925:
17926: IF l_debug_on THEN
18010: x_return_status => x_return_status);
18011:
18012: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18013: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18014: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18015: END IF;
18016: END IF;*/
18017:
18018: IF ( l_constr_org_id < g_cache_max_size AND g_org_mustuse_location.EXISTS(l_constr_org_id)) THEN
18056: x_return_status => x_return_status);
18057:
18058: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18059: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18060: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18061: END IF;
18062: END IF;
18063:
18064: IF g_region_mustuse_constraints.COUNT = 0 THEN
18083: x_return_status => l_return_status);
18084:
18085: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18086: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18087: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18088: END IF;
18089: END IF;
18090:
18091: r_itr:= l_region_tab.FIRST;
18114: x_return_status => l_return_status);
18115:
18116: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18117: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18118: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18119: END IF;
18120: END IF;
18121:
18122: IF l_debug_on THEN
18158: END IF;
18159:
18160: EXCEPTION
18161:
18162: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
18163: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18164: --
18165: IF l_debug_on THEN
18166: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18163: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18164: --
18165: IF l_debug_on THEN
18166: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18167: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
18168: END IF;
18169:
18170: WHEN OTHERS THEN
18171: IF c_get_must_use_location%ISOPEN THEN
18182: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18183: --
18184: IF l_debug_on THEN
18185: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18186: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
18187: END IF;
18188:
18189: END get_must_use_facility;
18190:
18191: --***************************************************************************--
18192: --========================================================================
18193: -- PROCEDURE : VALIDATE_CONSTRAINT_DECONSOL
18194: --
18195: -- PARAMETERS: p_init_msg_list FND_API.G_TRUE to reset list
18196: -- p_delivery_info Table of delivery records to process
18197: -- Only one of p_in_ids and p_delivery_info should be passed
18198: -- p_in_ids Table of delivery ids to process
18199: -- p_rule_deconsol_location Default deconsolidation location passed
18236: -- else
18237: -- use supplied location
18238: --========================================================================
18239:
18240: PROCEDURE validate_constraint_deconsol( p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
18241: p_delivery_info IN OUT NOCOPY delivery_ccinfo_tab_type,
18242: p_in_ids IN wsh_util_core.id_tab_type,
18243: p_rule_deconsol_location IN NUMBER default NULL,
18244: p_rule_override_deconsol IN BOOLEAN DEFAULT FALSE,
18339: x_return_status => l_return_status);
18340:
18341: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18342: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18343: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18344: END IF;
18345: END IF;
18346:
18347: --physical location id is not null implies- A dummy location.
18430: WSH_DEBUG_SV.logmsg(l_module_name,'VALIDATE_EXCLUSIVE_CONSTRAINTS l_return_status : '||l_return_status);
18431: END IF;
18432:
18433: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
18434: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18435: ELSE
18436: IF l_validate_result = l_success THEN
18437: x_output_id_tab(rec_cnt).deconsol_location := p_rule_deconsol_location;
18438: x_output_id_tab(rec_cnt).entity_id := p_delivery_info(rec_cnt).delivery_id;
18497: WSH_DEBUG_SV.logmsg(l_module_name,'VALIDATE_EXCLUSIVE_CONSTRAINTS_return_status : '||l_return_status);
18498: END IF;
18499:
18500: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
18501: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18502: ELSE
18503: IF l_validate_result = l_success THEN
18504: x_output_id_tab(rec_cnt).deconsol_location := l_intermed_ship_to_loc_id;
18505: x_output_id_tab(rec_cnt).entity_id := p_delivery_info(rec_cnt).delivery_id;
18536: x_return_status => l_return_status);
18537:
18538: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18539: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18540: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18541: END IF;
18542: END IF;
18543:
18544: IF l_rule_deconsol_location IS NOT NULL THEN
18548: x_validate_result => l_validate_result,
18549: x_return_status => l_return_status);
18550:
18551: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
18552: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18553: ELSE
18554: IF l_validate_result = l_success THEN
18555: x_output_id_tab(rec_cnt).deconsol_location := l_rule_deconsol_location;
18556: x_output_id_tab(rec_cnt).entity_id := p_delivery_info(rec_cnt).delivery_id;
18592: x_return_status => l_return_status);
18593:
18594: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18595: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18596: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18597: END IF;
18598: END IF;
18599:
18600: --
18617: x_validate_result => l_validate_result,
18618: x_return_status => l_return_status);
18619:
18620: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
18621: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18622: ELSE
18623: IF l_validate_result = l_success THEN
18624: x_output_id_tab(rec_cnt).deconsol_location := l_rule_deconsol_location;
18625: x_output_id_tab(rec_cnt).entity_id := p_delivery_info(rec_cnt).delivery_id;
18682: x_return_status => l_return_status);
18683:
18684: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18685: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18686: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18687: END IF;
18688: END IF;
18689:
18690: IF l_region_tab.COUNT > 0 THEN
18732:
18733: FND_MSG_PUB.Count_And_Get (
18734: p_count => l_msg_count,
18735: p_data => l_msg_data ,
18736: p_encoded => FND_API.G_FALSE );
18737:
18738: IF l_debug_on THEN
18739: wsh_debug_sv.log (l_module_name,'No. of messages already in stack : ',to_char(l_msg_count));
18740: WSH_DEBUG_SV.pop(l_module_name);
18741: END IF;
18742:
18743: EXCEPTION
18744:
18745: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
18746: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18747: --
18748: IF l_debug_on THEN
18749: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18746: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18747: --
18748: IF l_debug_on THEN
18749: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18750: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
18751: END IF;
18752:
18753: WHEN OTHERS THEN
18754: IF c_gettrip%ISOPEN THEN
18761: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18762: --
18763: IF l_debug_on THEN
18764: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18765: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
18766: END IF;
18767:
18768: END validate_constraint_deconsol;
18769: