[Home] [Help]
9: g_itmloc_mustuse_cache item_location_mustuse_tab_type;
10: g_itm_exclusive_cache item_exclusive_tab_type;
11: g_fac_exclusive_cache fac_exclusive_tab_type;
12:
13: g_customer_mustuse_location WSH_UTIL_CORE.id_tab_type;
14: g_location_mustuse_location WSH_UTIL_CORE.id_tab_type;
15: g_org_mustuse_location WSH_UTIL_CORE.id_tab_type;
16: g_region_mustuse_constraints WSH_UTIL_CORE.id_tab_type;
17: g_region_mustuse_location WSH_UTIL_CORE.id_tab_type;
10: g_itm_exclusive_cache item_exclusive_tab_type;
11: g_fac_exclusive_cache fac_exclusive_tab_type;
12:
13: g_customer_mustuse_location WSH_UTIL_CORE.id_tab_type;
14: g_location_mustuse_location WSH_UTIL_CORE.id_tab_type;
15: g_org_mustuse_location WSH_UTIL_CORE.id_tab_type;
16: g_region_mustuse_constraints WSH_UTIL_CORE.id_tab_type;
17: g_region_mustuse_location WSH_UTIL_CORE.id_tab_type;
18:
11: g_fac_exclusive_cache fac_exclusive_tab_type;
12:
13: g_customer_mustuse_location WSH_UTIL_CORE.id_tab_type;
14: g_location_mustuse_location WSH_UTIL_CORE.id_tab_type;
15: g_org_mustuse_location WSH_UTIL_CORE.id_tab_type;
16: g_region_mustuse_constraints WSH_UTIL_CORE.id_tab_type;
17: g_region_mustuse_location WSH_UTIL_CORE.id_tab_type;
18:
19: --#REG-ZON
12:
13: g_customer_mustuse_location WSH_UTIL_CORE.id_tab_type;
14: g_location_mustuse_location WSH_UTIL_CORE.id_tab_type;
15: g_org_mustuse_location WSH_UTIL_CORE.id_tab_type;
16: g_region_mustuse_constraints WSH_UTIL_CORE.id_tab_type;
17: g_region_mustuse_location WSH_UTIL_CORE.id_tab_type;
18:
19: --#REG-ZON
20: -- Region Constraint Cache used for iterating purpose.
13: g_customer_mustuse_location WSH_UTIL_CORE.id_tab_type;
14: g_location_mustuse_location WSH_UTIL_CORE.id_tab_type;
15: g_org_mustuse_location WSH_UTIL_CORE.id_tab_type;
16: g_region_mustuse_constraints WSH_UTIL_CORE.id_tab_type;
17: g_region_mustuse_location WSH_UTIL_CORE.id_tab_type;
18:
19: --#REG-ZON
20: -- Region Constraint Cache used for iterating purpose.
21: g_reg_const_cache comp_constraint_tab_type;
21: g_reg_const_cache comp_constraint_tab_type;
22: g_regloc_loc_cache loc_reg_constraint_tab_type;
23: --#REG-ZON
24:
25: g_unexp_char VARCHAR2(30) := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
26: g_unexp_num NUMBER := -999999;
27:
28: --#REG-ZON
29: g_const_not_present NUMBER := -9999;
37: g_cache_max_size NUMBER := power(2,31);
38: --
39:
40: --Cache for retriving Customer/Supplier/Carrier/Organization from locations.
41: --g_customer_from_location WSH_UTIL_CORE.id_tab_type;
42: g_customer_from_location WSH_UTIL_CORE.tbl_varchar;
43: g_supplier_from_location WSH_UTIL_CORE.id_tab_type;
44: g_carrier_from_location WSH_UTIL_CORE.id_tab_type;
45: g_loc_from_org WSH_UTIL_CORE.id_tab_type;
38: --
39:
40: --Cache for retriving Customer/Supplier/Carrier/Organization from locations.
41: --g_customer_from_location WSH_UTIL_CORE.id_tab_type;
42: g_customer_from_location WSH_UTIL_CORE.tbl_varchar;
43: g_supplier_from_location WSH_UTIL_CORE.id_tab_type;
44: g_carrier_from_location WSH_UTIL_CORE.id_tab_type;
45: g_loc_from_org WSH_UTIL_CORE.id_tab_type;
46: g_organization_from_location WSH_UTIL_CORE.tbl_varchar;
39:
40: --Cache for retriving Customer/Supplier/Carrier/Organization from locations.
41: --g_customer_from_location WSH_UTIL_CORE.id_tab_type;
42: g_customer_from_location WSH_UTIL_CORE.tbl_varchar;
43: g_supplier_from_location WSH_UTIL_CORE.id_tab_type;
44: g_carrier_from_location WSH_UTIL_CORE.id_tab_type;
45: g_loc_from_org WSH_UTIL_CORE.id_tab_type;
46: g_organization_from_location WSH_UTIL_CORE.tbl_varchar;
47:
40: --Cache for retriving Customer/Supplier/Carrier/Organization from locations.
41: --g_customer_from_location WSH_UTIL_CORE.id_tab_type;
42: g_customer_from_location WSH_UTIL_CORE.tbl_varchar;
43: g_supplier_from_location WSH_UTIL_CORE.id_tab_type;
44: g_carrier_from_location WSH_UTIL_CORE.id_tab_type;
45: g_loc_from_org WSH_UTIL_CORE.id_tab_type;
46: g_organization_from_location WSH_UTIL_CORE.tbl_varchar;
47:
48: --
41: --g_customer_from_location WSH_UTIL_CORE.id_tab_type;
42: g_customer_from_location WSH_UTIL_CORE.tbl_varchar;
43: g_supplier_from_location WSH_UTIL_CORE.id_tab_type;
44: g_carrier_from_location WSH_UTIL_CORE.id_tab_type;
45: g_loc_from_org WSH_UTIL_CORE.id_tab_type;
46: g_organization_from_location WSH_UTIL_CORE.tbl_varchar;
47:
48: --
49:
42: g_customer_from_location WSH_UTIL_CORE.tbl_varchar;
43: g_supplier_from_location WSH_UTIL_CORE.id_tab_type;
44: g_carrier_from_location WSH_UTIL_CORE.id_tab_type;
45: g_loc_from_org WSH_UTIL_CORE.id_tab_type;
46: g_organization_from_location WSH_UTIL_CORE.tbl_varchar;
47:
48: --
49:
50: g_get_carrier_failed EXCEPTION;
376: --***************************************************************************--
377:
378: FUNCTION entity_exists(
379: p_entity_id IN NUMBER,
380: p_entity_table IN WSH_UTIL_CORE.id_tab_type,
381: x_found_index OUT NOCOPY NUMBER) RETURN BOOLEAN
382: IS
383:
384: z NUMBER := 0;
448: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
449: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'refresh_cache';
450:
451: BEGIN
452: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
453: --
454: IF l_debug_on THEN
455: wsh_debug_sv.push (l_module_name);
456: END IF;
487: --
488:
489: EXCEPTION
490: WHEN others THEN
491: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.refresh_cache');
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);
488:
489: EXCEPTION
490: WHEN others THEN
491: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.refresh_cache');
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');
572: WHEN others THEN
573: IF c_get_comp_class_info%ISOPEN THEN
574: CLOSE c_get_comp_class_info;
575: END IF;
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');
640: WHEN others THEN
641: IF c_get_comp_class_info%ISOPEN THEN
642: CLOSE c_get_comp_class_info;
643: END IF;
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');
715: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'get_constraint_display';
716:
717: BEGIN
718:
719: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
720:
721: IF l_debug_on THEN
722: wsh_debug_sv.push(l_module_name);
723: 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);
872: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
875: WHEN OTHERS THEN
876: IF c_get_constraint_info%ISOPEN THEN
877: CLOSE c_get_constraint_info;
878: END IF;
879: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_constraint_display');
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);
876: IF c_get_constraint_info%ISOPEN THEN
877: CLOSE c_get_constraint_info;
878: END IF;
879: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_constraint_display');
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');
909: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
910:
911: BEGIN
912:
913: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
914:
915: IF l_debug_on THEN
916: wsh_debug_sv.push(l_module_name);
917: wsh_debug_sv.logmsg(l_module_name,'No. of constraints:'||p_failed_constraints.COUNT);
966: END IF;
967:
968: EXCEPTION
969: WHEN others THEN
970: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.remove_duplicate_const');
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);
967:
968: EXCEPTION
969: WHEN others THEN
970: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.remove_duplicate_const');
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');
1011: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'get_carrier_from_loc';
1012:
1013: BEGIN
1014:
1015: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1016:
1017: IF l_debug_on THEN
1018: wsh_debug_sv.push(l_module_name);
1019: END IF;
1053: WHEN others THEN
1054: IF c_get_carrier%ISOPEN THEN
1055: CLOSE c_get_carrier;
1056: END IF;
1057: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_carrier_from_loc');
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);
1054: IF c_get_carrier%ISOPEN THEN
1055: CLOSE c_get_carrier;
1056: END IF;
1057: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_carrier_from_loc');
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');
1078:
1079: PROCEDURE get_customer_from_loc(
1080: p_location_id IN NUMBER,
1081: --x_customer_id OUT NOCOPY NUMBER,
1082: x_customer_id_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
1083: x_return_status OUT NOCOPY VARCHAR2)
1084: IS
1085:
1086: CURSOR c_get_customer(c_location_id IN NUMBER) IS
1092: AND wl.location_source_code = 'HZ'
1093: AND wl.source_location_id = hps.location_id
1094: AND hps.party_site_id = hcas.party_site_id;
1095:
1096: l_customer_id_tab WSH_UTIL_CORE.id_tab_type;
1097: itr NUMBER := 0;
1098: i NUMBER := 0;
1099: l_return_status VARCHAR2(1);
1100: l_cust_string VARCHAR2(2000);
1103: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'get_customer_from_loc';
1104:
1105: BEGIN
1106:
1107: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1108:
1109: IF l_debug_on THEN
1110: wsh_debug_sv.push(l_module_name);
1111: END IF;
1111: END IF;
1112:
1113: IF ( p_location_id < g_cache_max_size and g_customer_from_location.EXISTS(p_location_id)) THEN
1114:
1115: wsh_util_core.get_idtab_from_string(
1116: p_string => g_customer_from_location(p_location_id),
1117: x_id_tab => l_customer_id_tab,
1118: x_return_status => l_return_status);
1119:
1116: p_string => g_customer_from_location(p_location_id),
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;
1161: IF (itr) IS NULL THEN
1162: l_cust_string := '-1';
1163: ELSE
1164:
1165: wsh_util_core.get_string_from_idtab(
1166: p_id_tab => l_customer_id_tab,
1167: x_string => l_cust_string,
1168: x_return_status => l_return_status);
1169:
1170: IF l_debug_on THEN
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;
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');
1250: END IF;
1251: WHEN others THEN
1252: IF c_get_customer%ISOPEN THEN
1253: CLOSE c_get_customer;
1254: END IF;
1255: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_customer_from_loc');
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);
1252: IF c_get_customer%ISOPEN THEN
1253: CLOSE c_get_customer;
1254: END IF;
1255: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_customer_from_loc');
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');
1303: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'get_supplier_from_loc';
1304:
1305: BEGIN
1306:
1307: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1308:
1309: IF l_debug_on THEN
1310: wsh_debug_sv.push(l_module_name);
1311: END IF;
1344: WHEN others THEN
1345: IF c_get_supplier%ISOPEN THEN
1346: CLOSE c_get_supplier;
1347: END IF;
1348: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_supplier_from_loc');
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);
1345: IF c_get_supplier%ISOPEN THEN
1346: CLOSE c_get_supplier;
1347: END IF;
1348: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_supplier_from_loc');
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');
1368: -- Returns table of organizations for location.
1369: --========================================================================
1370: PROCEDURE get_org_from_location(
1371: p_location_id IN NUMBER,
1372: x_organization_tab OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
1373: x_return_status OUT NOCOPY VARCHAR2)
1374: IS
1375: CURSOR c_get_org_from_loc(c_location_id IN NUMBER) IS
1376: SELECT owner_party_id
1379: AND wsh_location_id = c_location_id
1380: AND owner_party_id <> -1 ;
1381:
1382:
1383: l_organization_tab WSH_UTIL_CORE.id_tab_type;
1384:
1385: itr NUMBER;
1386: i NUMBER;
1387: l_return_status VARCHAR2(1);
1390: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
1391: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'get_org_from_location';
1392:
1393: BEGIN
1394: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1395:
1396: IF l_debug_on THEN
1397: wsh_debug_sv.push(l_module_name);
1398: END IF;
1398: END IF;
1399:
1400: IF (p_location_id < g_cache_max_size and g_organization_from_location.EXISTS(p_location_id)) THEN
1401:
1402: wsh_util_core.get_idtab_from_string(
1403: p_string => g_organization_from_location(p_location_id),
1404: x_id_tab => l_organization_tab,
1405: x_return_status => l_return_status);
1406:
1403: p_string => g_organization_from_location(p_location_id),
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;
1436: IF (itr) IS NULL THEN
1437: l_org_string := '-1';
1438: ELSE
1439:
1440: wsh_util_core.get_string_from_idtab(
1441: p_id_tab => l_organization_tab,
1442: x_string => l_org_string,
1443: x_return_status => l_return_status);
1444:
1445: IF l_debug_on THEN
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;
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');
1490: END IF;
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:
1494: IF c_get_org_from_loc%ISOPEN THEN
1495: CLOSE c_get_org_from_loc;
1496: END IF;
1494: IF c_get_org_from_loc%ISOPEN THEN
1495: CLOSE c_get_org_from_loc;
1496: END IF;
1497:
1498: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_org_from_loc');
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);
1537: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'get_loc_for_org';
1538:
1539: BEGIN
1540:
1541: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1542:
1543: IF l_debug_on THEN
1544: wsh_debug_sv.push(l_module_name);
1545: END IF;
1565:
1566: CLOSE c_org_to_loc;*/
1567: --Bug 4891887 and 4891881 Calling Utilcore package
1568: G_CALLING_API :='CONSTRAINT';
1569: WSH_UTIL_CORE.Get_Location_Id(
1570: p_mode=>'ORG',
1571: p_source_id=>p_org_id,
1572: x_location_id=>x_location_id,
1573: x_api_status=>x_return_status,
1594: /*IF c_org_to_loc%ISOPEN THEN
1595: CLOSE c_org_to_loc;
1596: END IF;*/
1597:
1598: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_loc_for_org');
1599:
1600: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1601:
1602: --
1596: END IF;*/
1597:
1598: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_loc_for_org');
1599:
1600: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
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);
1653: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
1654:
1655: BEGIN
1656:
1657: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1658:
1659: IF l_debug_on THEN
1660: wsh_debug_sv.push(l_module_name);
1661: wsh_debug_sv.log (l_module_name,'No. of constraints violated : ',to_char(p_failed_constraints.COUNT));
1679: p_failed_constraints => p_failed_constraints,
1680: x_return_status => l_return_status);
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;
1680: x_return_status => l_return_status);
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:
1711: x_comp_class_code => l_class_type,
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(
1796: END IF;
1797:
1798: EXCEPTION
1799: WHEN g_object_name_failed THEN
1800: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1801: --
1802: IF l_debug_on THEN
1803: WSH_DEBUG_SV.pop(l_module_name,'get_constraint_display failed ');
1804: END IF;
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);
1811: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
1849: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
1850:
1851: BEGIN
1852:
1853: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1854:
1855: IF l_debug_on THEN
1856: wsh_debug_sv.push(l_module_name);
1857: END IF;
1868: --
1869:
1870: EXCEPTION
1871: WHEN others THEN
1872: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.create_valid_entity_group');
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);
1869:
1870: EXCEPTION
1871: WHEN others THEN
1872: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.create_valid_entity_group');
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');
1909: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'populate_constraint_cache';
1910: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
1911:
1912: BEGIN
1913: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1914:
1915: IF l_debug_on THEN
1916: WSH_DEBUG_SV.push(l_module_name);
1917: WSH_DEBUG_SV.logmsg(l_module_name,'p_comp_class_code : '||p_comp_class_code);
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);
1977: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1980: WHEN others THEN
1981: IF c_get_constraint_info%ISOPEN THEN
1982: CLOSE c_get_constraint_info;
1983: END IF;
1984: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.populate_constraint_cache');
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);
1981: IF c_get_constraint_info%ISOPEN THEN
1982: CLOSE c_get_constraint_info;
1983: END IF;
1984: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.populate_constraint_cache');
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');
2064: populate_constraint_cache(
2065: --p_hash_size => g_hash_size,
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;
2065: --p_hash_size => g_hash_size,
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:
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);
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');
2177: IF l_debug_on THEN
2178: WSH_DEBUG_SV.push(l_module_name);
2179: END IF;
2180:
2181: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2182:
2183: l_stop_table := p_stop_table;
2184:
2185: FOR i IN l_stop_table.FIRST..l_stop_table.LAST
2225: END IF;
2226:
2227: EXCEPTION
2228: WHEN OTHERS THEN
2229: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.sort_stop_table_asc');
2230: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2231: END sort_stop_table_asc;
2232: --DUM_LOC(E)
2233:
2226:
2227: EXCEPTION
2228: WHEN OTHERS THEN
2229: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.sort_stop_table_asc');
2230: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2231: END sort_stop_table_asc;
2232: --DUM_LOC(E)
2233:
2234:
2263: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
2264:
2265: BEGIN
2266:
2267: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2268:
2269: --
2270: IF l_debug_on THEN
2271: WSH_DEBUG_SV.push(l_module_name);
2309: IF c_get_constraint_info%ISOPEN THEN
2310: CLOSE c_get_constraint_info;
2311: END IF;
2312:
2313: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.populate_reg_mustuse_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);
2310: CLOSE c_get_constraint_info;
2311: END IF;
2312:
2313: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.populate_reg_mustuse_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');
2360: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
2361:
2362: BEGIN
2363: --
2364: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2365: --
2366: IF l_debug_on THEN
2367: wsh_debug_sv.push (l_module_name);
2368: wsh_debug_sv.logmsg(l_module_name,'p_location_id : '||p_location_id);
2431:
2432: EXCEPTION
2433: WHEN others THEN
2434:
2435: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.add_region_constraint');
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);
2432: EXCEPTION
2433: WHEN others THEN
2434:
2435: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.add_region_constraint');
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');
2474: l_constraint_id NUMBER;
2475:
2476: BEGIN
2477:
2478: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2479: --
2480: IF l_debug_on THEN
2481: wsh_debug_sv.push (l_module_name);
2482: wsh_debug_sv.logmsg(l_module_name,'p_location_id : '||p_location_id);
2561:
2562: EXCEPTION
2563: WHEN OTHERS THEN
2564:
2565: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_region_constraint');
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);
2562: EXCEPTION
2563: WHEN OTHERS THEN
2564:
2565: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_region_constraint');
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');
2616: x_validate_result OUT NOCOPY VARCHAR2,
2617: x_failed_constraint OUT NOCOPY line_constraint_rec_type,
2618: x_return_status OUT NOCOPY VARCHAR2)
2619: IS
2620: l_region_tab WSH_UTIL_CORE.ID_TAB_TYPE;
2621: l_zone_tab WSH_UTIL_CORE.ID_TAB_TYPE;
2622: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'validate_region_constraint';
2623: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
2624: l_comp_class_code CONSTANT VARCHAR2(30) := G_REGION_FACILITY;
2617: x_failed_constraint OUT NOCOPY line_constraint_rec_type,
2618: x_return_status OUT NOCOPY VARCHAR2)
2619: IS
2620: l_region_tab WSH_UTIL_CORE.ID_TAB_TYPE;
2621: l_zone_tab WSH_UTIL_CORE.ID_TAB_TYPE;
2622: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'validate_region_constraint';
2623: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
2624: l_comp_class_code CONSTANT VARCHAR2(30) := G_REGION_FACILITY;
2625: l_complement_constraint_type VARCHAR2(1);
2654: WSH_DEBUG_SV.logmsg(l_module_name,'Location Id '||p_location_id);
2655: WSH_DEBUG_SV.logmsg(l_module_name,'Object2 val num : '||p_object2_val_num);
2656: END IF;
2657:
2658: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2659: x_validate_result := 'S';
2660:
2661: l_hash_value := dbms_utility.get_hash_value(
2662: name => l_comp_class_code,
2669: populate_constraint_cache(
2670: p_comp_class_code => l_comp_class_code,
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;
2670: p_comp_class_code => l_comp_class_code,
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:
2694: , p_constraint_type => p_constraint_type
2695: , x_return_status => l_return_status);
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;
2695: , x_return_status => l_return_status);
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:
2745: p_lang_code => USERENV('LANG'),
2746: x_region_tab => l_region_tab,
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;
2746: x_region_tab => l_region_tab,
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:
2795: ,p_constraint_id => g_comp_constraint_tab(l_reg_hash_value).compatibility_id
2796: ,p_constraint_type => p_constraint_type
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;
2796: ,p_constraint_type => p_constraint_type
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:
2815: p_region_id => l_region_id,
2816: x_zone_tab => l_zone_tab,
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;
2816: x_zone_tab => l_zone_tab,
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:
2915: ,p_constraint_type => p_constraint_type
2916: ,x_return_status => l_return_status);
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;
2916: ,x_return_status => l_return_status);
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:
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');
2968: END IF;
2968: END IF;
2969: --
2970: WHEN OTHERS THEN
2971: --
2972: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_region_constraint');
2973: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2974:
2975: IF l_debug_on THEN
2976: WSH_DEBUG_SV.pop(l_module_name,'unexpected_error');
2969: --
2970: WHEN OTHERS THEN
2971: --
2972: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_region_constraint');
2973: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2974:
2975: IF l_debug_on THEN
2976: WSH_DEBUG_SV.pop(l_module_name,'unexpected_error');
2977: END IF;
3032: PROCEDURE check_reg_incl_facilities(
3033: p_entity_type IN VARCHAR2,
3034: p_entity_id IN NUMBER,
3035: p_location_id IN NUMBER,
3036: p_location_list IN WSH_UTIL_CORE.id_tab_type,
3037: x_validate_result OUT NOCOPY VARCHAR2,
3038: x_failed_constraint IN OUT NOCOPY line_constraint_tab_type,
3039: x_return_status OUT NOCOPY VARCHAR2)
3040: IS
3040: IS
3041:
3042: l_hash_value NUMBER;
3043: l_validate_result VARCHAR2(1);
3044: l_region_tab WSH_UTIL_CORE.ID_TAB_TYPE;
3045: l_zone_tab WSH_UTIL_CORE.ID_TAB_TYPE;
3046: l_comp_class_code VARCHAR2(30) := G_REGION_FACILITY;
3047: l_reg_comp_class_id NUMBER :=0;
3048:
3041:
3042: l_hash_value NUMBER;
3043: l_validate_result VARCHAR2(1);
3044: l_region_tab WSH_UTIL_CORE.ID_TAB_TYPE;
3045: l_zone_tab WSH_UTIL_CORE.ID_TAB_TYPE;
3046: l_comp_class_code VARCHAR2(30) := G_REGION_FACILITY;
3047: l_reg_comp_class_id NUMBER :=0;
3048:
3049: r_itr NUMBER :=0;
3081: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
3082:
3083: BEGIN
3084:
3085: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3086: x_validate_result := 'F';
3087: l_validate_result := 'F';
3088:
3089: IF l_debug_on THEN
3101: , p_constraint_type => 'I'
3102: , x_return_status => l_return_status);
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;
3102: , x_return_status => l_return_status);
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:
3142: WSH_DEBUG_SV.logmsg(l_module_name,'Called populate_constraint_cache return status : '||l_return_status);
3143: END IF;
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;
3143: END IF;
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:
3159: p_lang_code => USERENV('LANG'),
3160: x_region_tab => l_region_tab,
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;
3160: x_region_tab => l_region_tab,
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:
3244: WSH_DEBUG_SV.logmsg(l_module_name,'Called populate_reg_mustuse_cache return status:'||l_return_status);
3245: END IF;
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;
3245: END IF;
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;
3298: p_region_id => l_region_id,
3299: x_zone_tab => l_zone_tab,
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;
3299: x_zone_tab => l_zone_tab,
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:
3500: ,p_constraint_type => 'I'
3501: ,x_return_status => l_return_status);
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;
3501: ,x_return_status => l_return_status);
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:
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);
3529: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
3595: l_location_id NUMBER:=0;
3596: l_master_org_id NUMBER:=0;
3597: l_carrier_id NUMBER:=0;
3598: --l_customer_id NUMBER:=0;
3599: l_customer_id_tab WSH_UTIL_CORE.id_tab_type;
3600: l_supplier_id NUMBER:=0;
3601: l_object1_type VARCHAR2(30):=NULL;
3602: l_object1_id NUMBER:=0;
3603: l_object1_parent_id NUMBER:=p_object1_parent_id;
3627: l_fac_hash_value NUMBER;
3628: l_fac_hash_string VARCHAR2(200);
3629:
3630: --DUM_LOC(S)
3631: l_organization_tab WSH_UTIL_CORE.id_tab_type;
3632: l_org_itr NUMBER;
3633: itr NUMBER :=0;
3634: --DUM_LOC(E)
3635:
3637: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
3638:
3639: BEGIN
3640:
3641: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3642: x_validate_result := 'S';
3643:
3644: IF l_debug_on THEN
3645: wsh_debug_sv.push(l_module_name);
3670: RETURN;
3671: END IF;
3672:
3673: IF g_is_tp_installed IS NULL THEN
3674: g_is_tp_installed := WSH_UTIL_CORE.TP_Is_Installed;
3675: END IF;
3676: -- Must pass in object types when CLASS code contains FAC
3677:
3678: l_object1_typesub := nvl(p_object1_type,l_comp_type1);
3704: WSH_DEBUG_SV.logmsg(l_module_name,'Validating CUS-FAC constraint for dummy location, Finding corresponding Organizations');
3705: END IF;
3706:
3707: --get_org_from_location(
3708: WSH_UTIL_CORE.get_org_from_location(
3709: p_location_id => p_object1_physical_id,
3710: x_organization_tab => l_organization_tab,
3711: x_return_status => l_return_status);
3712:
3714: WSH_DEBUG_SV.logmsg(l_module_name,'l_return_status:'||l_return_status);
3715: WSH_DEBUG_SV.logmsg(l_module_name,'Organizations Returned:'||l_organization_tab.Count);
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;
3715: WSH_DEBUG_SV.logmsg(l_module_name,'Organizations Returned:'||l_organization_tab.Count);
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:
3741: x_validate_result => x_validate_result,
3742: x_failed_constraint => x_failed_constraint,
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;
3742: x_failed_constraint => x_failed_constraint,
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:
3863: populate_constraint_cache(
3864: p_comp_class_code => p_comp_class_code,
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;
3864: p_comp_class_code => p_comp_class_code,
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:
3961: --
3962:
3963: ELSIF p_comp_class_code = G_SHIPORG_FACILITY THEN
3964:
3965: WSH_UTIL_CORE.get_master_from_org(
3966: p_org_id => p_object1_val_num,
3967: x_master_org_id => l_master_org_id,
3968: x_return_status => l_return_status);
3969:
3966: p_org_id => p_object1_val_num,
3967: x_master_org_id => l_master_org_id,
3968: x_return_status => l_return_status);
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;
3967: x_master_org_id => l_master_org_id,
3968: x_return_status => l_return_status);
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;
3968: x_return_status => l_return_status);
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;
4091: p_location_id => l_location_id,
4092: x_carrier_id => l_carrier_id,
4093: x_return_status => l_return_status);
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;
4092: x_carrier_id => l_carrier_id,
4093: x_return_status => l_return_status);
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;
4093: x_return_status => l_return_status);
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;
4146: END IF;
4147: END IF;
4148:
4149: --get_customer_from_loc(
4150: WSH_UTIL_CORE.get_customer_from_loc(
4151: p_location_id => l_location_id,
4152: --x_customer_id => l_customer_id,
4153: x_customer_id_tab => l_customer_id_tab,
4154: x_return_status => l_return_status);
4152: --x_customer_id => l_customer_id,
4153: x_customer_id_tab => l_customer_id_tab,
4154: x_return_status => l_return_status);
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;
4153: x_customer_id_tab => l_customer_id_tab,
4154: x_return_status => l_return_status);
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;
4154: x_return_status => l_return_status);
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;
4221: p_location_id => l_location_id,
4222: x_supplier_id => l_supplier_id,
4223: x_return_status => l_return_status);
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;
4222: x_supplier_id => l_supplier_id,
4223: x_return_status => l_return_status);
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;
4223: x_return_status => l_return_status);
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;
4300:
4301: IF (p_comp_class_code = G_SHIPORG_FACILITY AND l_object1_typesub = G_COMP_ORG) THEN
4302:
4303: --
4304: -- Bug 4142393:Replaced call to WSH_UTIL_CORE.ORG_TO_LOCATION by get_loc_for_org
4305: --
4306:
4307: get_loc_for_org(
4308: p_org_id => p_object1_val_num,
4309: x_location_id => l_location_id,
4310: x_return_status => x_return_status);
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;
4310: x_return_status => x_return_status);
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
4332: x_validate_result => x_validate_result,
4333: x_failed_constraint => x_failed_constraint,
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;
4333: x_failed_constraint => x_failed_constraint,
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:
4349: AND (p_comp_class_code=G_SHIPORG_FACILITY) AND (l_object1_typesub = G_COMP_ORG) THEN
4350:
4351:
4352: --
4353: -- Bug 4142393:Replaced call to WSH_UTIL_CORE.ORG_TO_LOCATION by get_loc_for_org
4354: --
4355:
4356: get_loc_for_org(
4357: p_org_id => l_master_org_id,
4357: p_org_id => l_master_org_id,
4358: x_location_id => l_location_id,
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;
4358: x_location_id => l_location_id,
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:
4377: x_validate_result => x_validate_result,
4378: x_failed_constraint => x_failed_constraint,
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;
4378: x_failed_constraint => x_failed_constraint,
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:
4399:
4400: EXCEPTION
4401:
4402: WHEN g_get_mast_org_failed THEN
4403: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4404: --
4405: IF l_debug_on THEN
4406: WSH_DEBUG_SV.pop(l_module_name,' get_mast_org failed ');
4407: END IF;
4406: WSH_DEBUG_SV.pop(l_module_name,' get_mast_org failed ');
4407: END IF;
4408: --
4409: WHEN g_get_carrier_failed THEN
4410: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4411: --
4412: IF l_debug_on THEN
4413: WSH_DEBUG_SV.pop(l_module_name,' get_carrier failed ');
4414: END IF;
4413: WSH_DEBUG_SV.pop(l_module_name,' get_carrier failed ');
4414: END IF;
4415: --
4416: WHEN g_get_customer_failed THEN
4417: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4418: --
4419: IF l_debug_on THEN
4420: WSH_DEBUG_SV.pop(l_module_name,' get_customer failed ');
4421: END IF;
4420: WSH_DEBUG_SV.pop(l_module_name,' get_customer failed ');
4421: END IF;
4422: --
4423: WHEN g_get_supplier_failed THEN
4424: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4425: --
4426: IF l_debug_on THEN
4427: WSH_DEBUG_SV.pop(l_module_name,' get_supplier failed ');
4428: END IF;
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);
4436: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
4485: p_object1_type IN VARCHAR2 DEFAULT NULL,
4486: p_object1_physical_id IN NUMBER DEFAULT NULL,
4487: p_attribute_id IN NUMBER,
4488: p_parent_id IN NUMBER DEFAULT NULL,
4489: p_location_list IN WSH_UTIL_CORE.id_tab_type,
4490: p_direct_shipment IN BOOLEAN DEFAULT FALSE,
4491: x_validate_result OUT NOCOPY VARCHAR2,
4492: x_failed_constraint IN OUT NOCOPY line_constraint_tab_type,
4493: x_return_status OUT NOCOPY VARCHAR2)
4524:
4525: l_location_id NUMBER :=0;
4526:
4527: --DUM_LOC(S)
4528: l_organization_tab WSH_UTIL_CORE.id_tab_type;
4529: l_org_itr NUMBER;
4530: l_failed_constraint line_constraint_tab_type;
4531: l_itr NUMBER;
4532: --DUM_LOC(E)
4535: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
4536:
4537: BEGIN
4538:
4539: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4540:
4541: x_validate_result := 'F';
4542: l_validate_result := 'F';
4543:
4592: IF (p_comp_class_code = G_CUSTOMER_FACILITY) AND (l_object1_type = G_FACILITY)
4593: AND (p_object1_physical_id IS NOT NULL) THEN
4594:
4595: --get_org_from_location(
4596: WSH_UTIL_CORE.get_org_from_location(
4597: p_location_id => p_object1_physical_id,
4598: x_organization_tab => l_organization_tab,
4599: x_return_status => l_return_status);
4600:
4604: WSH_DEBUG_SV.logmsg(l_module_name,'Organizations Returned:'||l_organization_tab.Count);
4605: END IF;
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;
4605: END IF;
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:
4632: WSH_DEBUG_SV.logmsg(l_module_name,'Returning x_validate_result : '||x_validate_result);
4633: WSH_DEBUG_SV.logmsg(l_module_name,'Returning x_return_status : '||x_return_status);
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;
4633: WSH_DEBUG_SV.logmsg(l_module_name,'Returning x_return_status : '||x_return_status);
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:
4681: WSH_DEBUG_SV.logmsg(l_module_name,'Called populate_constraint_cache return status : '||l_return_status);
4682: END IF;
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;
4682: END IF;
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:
4705: -- Return success
4706:
4707: IF p_comp_class_code = G_SHIPORG_FACILITY THEN
4708:
4709: WSH_UTIL_CORE.get_master_from_org(
4710: p_org_id => p_attribute_id,
4711: x_master_org_id => l_master_org_id,
4712: x_return_status => l_return_status);
4713:
4710: p_org_id => p_attribute_id,
4711: x_master_org_id => l_master_org_id,
4712: x_return_status => l_return_status);
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;
4711: x_master_org_id => l_master_org_id,
4712: x_return_status => l_return_status);
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;
4712: x_return_status => l_return_status);
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;
4728:
4729: END IF;
4730:
4731: IF g_is_tp_installed IS NULL THEN
4732: g_is_tp_installed := WSH_UTIL_CORE.TP_Is_Installed;
4733: END IF;
4734:
4735: IF (l_object1_type = 'ITM' AND g_is_tp_installed = 'Y') THEN
4736: l_parent_id := NULL;
4867: -- We need to validate Region Level Constraints;
4868: IF (p_comp_class_code = G_SHIPORG_FACILITY) THEN
4869:
4870: --
4871: -- Bug 4142393:Replaced call to WSH_UTIL_CORE.ORG_TO_LOCATION by get_loc_for_org
4872: --
4873:
4874: get_loc_for_org(
4875: p_org_id => p_attribute_id,
4875: p_org_id => p_attribute_id,
4876: x_location_id => l_location_id,
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;
4876: x_location_id => l_location_id,
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:
4908: x_validate_result => x_validate_result,
4909: x_failed_constraint => x_failed_constraint,
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;
4909: x_failed_constraint => x_failed_constraint,
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:
4921:
4922: IF (l_master_org) AND (x_validate_result = 'S') THEN
4923:
4924: --
4925: -- Bug 4142393:Replaced call to WSH_UTIL_CORE.ORG_TO_LOCATION by get_loc_for_org
4926: --
4927:
4928: get_loc_for_org(
4929: p_org_id => l_master_org_id,
4929: p_org_id => l_master_org_id,
4930: x_location_id => l_location_id,
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;
4930: x_location_id => l_location_id,
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:
4954: x_validate_result => x_validate_result,
4955: x_failed_constraint => x_failed_constraint,
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;
4955: x_failed_constraint => x_failed_constraint,
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:
4987: --
4988:
4989: EXCEPTION
4990: WHEN g_get_mast_org_failed THEN
4991: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4992: --
4993: IF l_debug_on THEN
4994: WSH_DEBUG_SV.pop(l_module_name,' get_mast_org failed ');
4995: END IF;
4994: WSH_DEBUG_SV.pop(l_module_name,' get_mast_org failed ');
4995: END IF;
4996: --
4997: WHEN g_get_carrier_failed THEN
4998: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4999: --
5000: IF l_debug_on THEN
5001: WSH_DEBUG_SV.pop(l_module_name,' get_carrier failed ');
5002: END IF;
5001: WSH_DEBUG_SV.pop(l_module_name,' get_carrier failed ');
5002: END IF;
5003: --
5004: WHEN g_get_customer_failed THEN
5005: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5006: --
5007: IF l_debug_on THEN
5008: WSH_DEBUG_SV.pop(l_module_name,' get_customer failed ');
5009: END IF;
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);
5017: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
5082: --l_object1_type VARCHAR2(30):=NULL;
5083: l_return_status VARCHAR2(1);
5084: l_carrier_id NUMBER :=0;
5085: l_customer_id NUMBER :=0;
5086: l_customer_id_tab WSH_UTIL_CORE.id_tab_type;
5087: l_supplier_id NUMBER:=0;
5088: l_object1_parent_id NUMBER := p_object1_parent_id;
5089: l_hash_value NUMBER :=0;
5090: l1_hash_value NUMBER;
5111: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
5112:
5113: BEGIN
5114:
5115: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5116:
5117: x_validate_result := 'F';
5118: x_out_object2_num := NULL;
5119: x_out_object2_char := NULL;
5163: WSH_DEBUG_SV.logmsg(l_module_name,'Called populate_constraint_cache with return status : '||l_return_status);
5164: END IF;
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;
5164: END IF;
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:
5182: END IF;
5183: --
5184:
5185: IF g_is_tp_installed IS NULL THEN
5186: g_is_tp_installed := WSH_UTIL_CORE.TP_Is_Installed;
5187: END IF;
5188:
5189: --IF (l_object1_typesub = 'ITM' AND WSH_UTIL_CORE.TP_Is_Installed = 'Y') THEN
5190: IF (l_object1_typesub = 'ITM' AND g_is_tp_installed = 'Y') THEN
5185: IF g_is_tp_installed IS NULL THEN
5186: g_is_tp_installed := WSH_UTIL_CORE.TP_Is_Installed;
5187: END IF;
5188:
5189: --IF (l_object1_typesub = 'ITM' AND WSH_UTIL_CORE.TP_Is_Installed = 'Y') THEN
5190: IF (l_object1_typesub = 'ITM' AND g_is_tp_installed = 'Y') THEN
5191: l_object1_parent_id := NULL;
5192: END IF;
5193:
5246: p_location_id => p_object1_val_num,
5247: x_carrier_id => l_carrier_id,
5248: x_return_status => l_return_status);
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;
5247: x_carrier_id => l_carrier_id,
5248: x_return_status => l_return_status);
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;
5248: x_return_status => l_return_status);
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;
5295: END IF; -- l_carrier_id
5296: END IF; -- object2 NOT NULL
5297:
5298: --get_customer_from_loc(
5299: WSH_UTIL_CORE.get_customer_from_loc(
5300: p_location_id => p_object1_val_num,
5301: --x_customer_id => l_customer_id,
5302: x_customer_id_tab => l_customer_id_tab,
5303: x_return_status => l_return_status);
5301: --x_customer_id => l_customer_id,
5302: x_customer_id_tab => l_customer_id_tab,
5303: x_return_status => l_return_status);
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;
5302: x_customer_id_tab => l_customer_id_tab,
5303: x_return_status => l_return_status);
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;
5303: x_return_status => l_return_status);
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;
5364: p_location_id => p_object1_val_num,
5365: x_supplier_id => l_supplier_id,
5366: x_return_status => l_return_status);
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;
5365: x_supplier_id => l_supplier_id,
5366: x_return_status => l_return_status);
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;
5366: x_return_status => l_return_status);
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;
5510: --
5511:
5512: EXCEPTION
5513: WHEN g_get_carrier_failed THEN
5514: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5515: --
5516: IF l_debug_on THEN
5517: WSH_DEBUG_SV.pop(l_module_name,' get_carrier failed ');
5518: END IF;
5517: WSH_DEBUG_SV.pop(l_module_name,' get_carrier failed ');
5518: END IF;
5519: --
5520: WHEN g_get_customer_failed THEN
5521: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5522: --
5523: IF l_debug_on THEN
5524: WSH_DEBUG_SV.pop(l_module_name,' get_customer failed ');
5525: END IF;
5524: WSH_DEBUG_SV.pop(l_module_name,' get_customer failed ');
5525: END IF;
5526: --
5527: WHEN g_get_supplier_failed THEN
5528: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5529: --
5530: IF l_debug_on THEN
5531: WSH_DEBUG_SV.pop(l_module_name,' get_supplier failed ');
5532: END IF;
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);
5539: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
5570: -- If different, violation
5571: --========================================================================
5572:
5573: PROCEDURE search_itm_fac_incl (
5574: p_comp_class_tab IN WSH_UTIL_CORE.Column_Tab_Type,
5575: p_items_tab IN item_tab_type,
5576: p_entity_type IN VARCHAR2,
5577: p_entity_id IN NUMBER,
5578: p_locations_list IN WSH_UTIL_CORE.id_tab_type,
5574: p_comp_class_tab IN WSH_UTIL_CORE.Column_Tab_Type,
5575: p_items_tab IN item_tab_type,
5576: p_entity_type IN VARCHAR2,
5577: p_entity_id IN NUMBER,
5578: p_locations_list IN WSH_UTIL_CORE.id_tab_type,
5579: x_validate_result OUT NOCOPY VARCHAR2,
5580: x_failed_constraints IN OUT NOCOPY line_constraint_tab_type,
5581: x_return_status OUT NOCOPY VARCHAR2 )
5582: IS
5608: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
5609:
5610: BEGIN
5611:
5612: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5613: x_validate_result := 'S';
5614:
5615: IF l_debug_on THEN
5616: wsh_debug_sv.push(l_module_name);
5616: wsh_debug_sv.push(l_module_name);
5617: END IF;
5618:
5619: IF g_is_tp_installed IS NULL THEN
5620: g_is_tp_installed := WSH_UTIL_CORE.TP_Is_Installed;
5621: END IF;
5622:
5623: i := p_locations_list.FIRST;
5624: IF i IS NOT NULL THEN
5657: x_validate_result => l_validate_carrier_result,
5658: x_failed_constraint => x_failed_constraints,
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;
5658: x_failed_constraint => x_failed_constraints,
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:
5686: x_validate_result => l_validate_mode_result,
5687: x_failed_constraint => x_failed_constraints,
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;
5687: x_failed_constraint => x_failed_constraints,
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:
5713: x_validate_result => l_validate_vehicle_result,
5714: x_failed_constraint => x_failed_constraints,
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;
5714: x_failed_constraint => x_failed_constraints,
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:
5750: IF l_debug_on THEN
5751: WSH_DEBUG_SV.logmsg(l_module_name,'p_items_tab(j).item_id : '||p_items_tab(j).item_id||'p_items_tab(j).org_id : '||p_items_tab(j).org_id);
5752: END IF;
5753:
5754: --IF WSH_UTIL_CORE.TP_Is_Installed = 'N' THEN
5755: IF g_is_tp_installed = 'N' THEN
5756: l_item_org_id := p_items_tab(j).org_id;
5757: END IF;
5758:
5814: x_validate_result => l_validate_itmcar_result,
5815: x_failed_constraint => x_failed_constraints,
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;
5815: x_failed_constraint => x_failed_constraints,
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:
5845: x_validate_result => l_validate_itmmode_result,
5846: x_failed_constraint => x_failed_constraints,
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;
5846: x_failed_constraint => x_failed_constraints,
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:
5876: x_validate_result => l_validate_itmveh_result,
5877: x_failed_constraint => x_failed_constraints,
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;
5877: x_failed_constraint => x_failed_constraints,
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:
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);
5943: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
5973: -- If different, violation
5974: --========================================================================
5975:
5976: PROCEDURE search_group_itm (
5977: p_comp_class_tab IN WSH_UTIL_CORE.Column_Tab_Type,
5978: p_entity_rec IN entity_rec_type,
5979: p_target_rec IN entity_rec_type,
5980: x_validate_result OUT NOCOPY VARCHAR2,
5981: x_failed_constraints IN OUT NOCOPY line_constraint_tab_type,
6007: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
6008:
6009: BEGIN
6010:
6011: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6012: x_validate_result := 'S';
6013:
6014: IF l_debug_on THEN
6015: wsh_debug_sv.push(l_module_name);
6015: wsh_debug_sv.push(l_module_name);
6016: END IF;
6017:
6018: IF g_is_tp_installed IS NULL THEN
6019: g_is_tp_installed := WSH_UTIL_CORE.TP_Is_Installed;
6020: END IF;
6021:
6022: IF p_entity_rec.inventory_item_id = p_target_rec.inventory_item_id THEN
6023: IF g_is_tp_installed = 'Y' OR
6130: x_validate_result => l_validate_carrier_result,
6131: x_failed_constraint => x_failed_constraints,
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;
6131: x_failed_constraint => x_failed_constraints,
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:
6165: x_validate_result => l_validate_mode_result,
6166: x_failed_constraint => x_failed_constraints,
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;
6166: x_failed_constraint => x_failed_constraints,
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:
6200: x_validate_result => l_validate_vehicle_result,
6201: x_failed_constraint => x_failed_constraints,
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;
6201: x_failed_constraint => x_failed_constraints,
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:
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);
6247: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
6292: PROCEDURE search_matching_group(
6293: p_entity_type IN VARCHAR2,
6294: p_action_code IN VARCHAR2,
6295: p_children_info IN detail_ccinfo_tab_type,
6296: p_comp_class_tab IN WSH_UTIL_CORE.Column_Tab_Type,
6297: p_target_stops_info IN target_tripstop_cc_rec_type,
6298: p_entity_rec IN entity_rec_type,
6299: p_target_trip_id IN NUMBER DEFAULT NULL,
6300: p_entity_tab IN entity_tab_type,
6331: --l_validate_loop_result VARCHAR2(1) := 'S';
6332: l_facility_id NUMBER := 0;
6333: l_items_tab item_tab_type;
6334: l_target_items_tab item_tab_type;
6335: l_locations_list WSH_UTIL_CORE.id_tab_type;
6336: l_inp_locations_list WSH_UTIL_CORE.id_tab_type;
6337: l_failed_constraint line_constraint_rec_type;
6338: l_entity_rec entity_rec_type;
6339: l_target_rec entity_rec_type;
6332: l_facility_id NUMBER := 0;
6333: l_items_tab item_tab_type;
6334: l_target_items_tab item_tab_type;
6335: l_locations_list WSH_UTIL_CORE.id_tab_type;
6336: l_inp_locations_list WSH_UTIL_CORE.id_tab_type;
6337: l_failed_constraint line_constraint_rec_type;
6338: l_entity_rec entity_rec_type;
6339: l_target_rec entity_rec_type;
6340: l_check_pickup BOOLEAN := FALSE;
6369: -- for assign delivery to trip
6370: -- might not need to check against locations of all other deliveries in a group
6371: -- for autocreate trip, still need to
6372:
6373: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6374:
6375: IF l_debug_on THEN
6376: wsh_debug_sv.push(l_module_name);
6377: END IF;
6534: x_validate_result => l_validate_cuscus_result,
6535: x_failed_constraint => l_failed_constraint,
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;
6535: x_failed_constraint => l_failed_constraint,
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:
6567: x_validate_result => l_validate_itmin_result,
6568: x_failed_constraints => x_failed_constraints,
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;
6568: x_failed_constraints => x_failed_constraints,
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:
6646: x_validate_result => l_validate_cuscus_result,
6647: x_failed_constraint => l_failed_constraint,
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;
6647: x_failed_constraint => l_failed_constraint,
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:
6704: x_validate_result => l_validate_cuscus_result,
6705: x_failed_constraint => l_failed_constraint,
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;
6705: x_failed_constraint => l_failed_constraint,
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:
6734: x_validate_result => l_validate_cuscus_result,
6735: x_failed_constraint => l_failed_constraint,
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;
6735: x_failed_constraint => l_failed_constraint,
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:
6791: x_validate_result => l_validate_itmin_result,
6792: x_failed_constraints => x_failed_constraints,
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;
6792: x_failed_constraints => x_failed_constraints,
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:
6893: x_validate_result => l_validate_itmfacin_result,
6894: x_failed_constraints => x_failed_constraints,
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;
6894: x_failed_constraints => x_failed_constraints,
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:
6923: x_validate_result => l_validate_itmfacin_result2,
6924: x_failed_constraints => x_failed_constraints,
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;
6924: x_failed_constraints => x_failed_constraints,
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:
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);
6981: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
6996: PROCEDURE check_dleg_discretionary(
6997: p_entity_type IN VARCHAR2,
6998: p_entity_id IN NUMBER,
6999: p_delivery_rec IN delivery_ccinfo_rec_type,
7000: p_comp_class_tab IN WSH_UTIL_CORE.column_tab_type,
7001: p_dleg_pick_up_loc_id IN NUMBER,
7002: p_dleg_drop_off_loc_id IN NUMBER,
7003: p_dleg_pick_up_stop_id IN NUMBER DEFAULT NULL,
7004: p_dleg_drop_off_stop_id IN NUMBER DEFAULT NULL,
7031: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'check_dleg_discretionary';
7032:
7033: BEGIN
7034:
7035: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7036: x_validate_result := 'S';
7037:
7038: IF l_debug_on THEN
7039: wsh_debug_sv.push(l_module_name);
7065: x_validate_result => l_validate_orgfac_result,
7066: x_failed_constraint => l_failed_constraint,
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;
7066: x_failed_constraint => l_failed_constraint,
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:
7098: x_validate_result => l_validate_orgfac_result,
7099: x_failed_constraint => l_failed_constraint,
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;
7099: x_failed_constraint => l_failed_constraint,
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:
7148: x_validate_result => l_validate_cusfac_result,
7149: x_failed_constraint => l_failed_constraint,
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;
7149: x_failed_constraint => l_failed_constraint,
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:
7179: x_validate_result => l_validate_cusfac_result,
7180: x_failed_constraint => l_failed_constraint,
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;
7180: x_failed_constraint => l_failed_constraint,
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:
7231: x_validate_result => l_validate_supfac_result,
7232: x_failed_constraint => l_failed_constraint,
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;
7232: x_failed_constraint => l_failed_constraint,
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:
7262: x_validate_result => l_validate_supfac_result,
7263: x_failed_constraint => l_failed_constraint,
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;
7263: x_failed_constraint => l_failed_constraint,
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:
7324: x_validate_result => l_validate_itmfac_result,
7325: x_failed_constraint => l_failed_constraint,
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;
7325: x_failed_constraint => l_failed_constraint,
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:
7365: x_validate_result => l_validate_itmfac_result,
7366: x_failed_constraint => l_failed_constraint,
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;
7366: x_failed_constraint => l_failed_constraint,
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:
7401: x_validate_result => l_validate_itmmod_result,
7402: x_failed_constraint => l_failed_constraint, -- id
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;
7402: x_failed_constraint => l_failed_constraint, -- id
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:
7434: x_validate_result => l_validate_itmcar_result,
7435: x_failed_constraint => l_failed_constraint, -- id
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;
7435: x_failed_constraint => l_failed_constraint, -- id
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:
7467: x_validate_result => l_validate_itmveh_result,
7468: x_failed_constraint => l_failed_constraint, -- id
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;
7468: x_failed_constraint => l_failed_constraint, -- id
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:
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);
7511: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
7551: p_entity_type IN VARCHAR2,
7552: p_entity_id IN NUMBER,
7553: p_delivery_rec IN delivery_ccinfo_rec_type,
7554: p_detail_tab IN detail_ccinfo_tab_type,
7555: p_comp_class_tab IN WSH_UTIL_CORE.column_tab_type,
7556: p_target_stops_info IN target_tripstop_cc_rec_type,
7557: p_target_trip IN trip_ccinfo_rec_type,
7558: p_target_tripstops IN stop_ccinfo_tab_type,
7559: p_target_dlvy IN delivery_ccinfo_tab_type,
7618: l_validate_itmmod_result VARCHAR2(1) := 'S';
7619: l_validate_itmin_result VARCHAR2(1) := 'S';
7620: l_validate_itmfacin_result VARCHAR2(1) := 'S';
7621: l_items_tab item_tab_type;
7622: l_locations_list WSH_UTIL_CORE.id_tab_type;
7623: l_entity_rec entity_rec_type;
7624: l_target_rec entity_rec_type;
7625: l_pu_location_id NUMBER := NULL;
7626: l_pu_sequencenum NUMBER := NULL;
7627: l_pu_pa_date DATE;
7628: l_do_location_id NUMBER := NULL;
7629: l_do_sequencenum NUMBER := NULL;
7630: l_do_pa_date DATE;
7631: l_checked_inpdlvb WSH_UTIL_CORE.id_tab_type;
7632: l_checked_target_dlvy WSH_UTIL_CORE.id_tab_type;
7633:
7634: l_vehicle_name VARCHAR2(2000);
7635: l_vehicle_org_name VARCHAR2(240);
7628: l_do_location_id NUMBER := NULL;
7629: l_do_sequencenum NUMBER := NULL;
7630: l_do_pa_date DATE;
7631: l_checked_inpdlvb WSH_UTIL_CORE.id_tab_type;
7632: l_checked_target_dlvy WSH_UTIL_CORE.id_tab_type;
7633:
7634: l_vehicle_name VARCHAR2(2000);
7635: l_vehicle_org_name VARCHAR2(240);
7636:
7653:
7654: -- for assign delivery to trip
7655: -- might not need to check against all stops of the target trip
7656:
7657: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7658: x_validate_result := 'S';
7659:
7660: IF l_debug_on THEN
7661: wsh_debug_sv.push(l_module_name);
7694: WSH_CARRIERS_GRP.get_carrier_service_mode(
7695: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
7696: x_return_status => l_return_status);
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;
7695: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
7696: x_return_status => l_return_status);
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;
7696: x_return_status => l_return_status);
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;
7726: p_vehicle_org_id => p_target_trip.VEHICLE_ORGANIZATION_ID,
7727: x_vehicle_type_id => l_vehicle_type,
7728: x_return_status => l_return_status);
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;
7727: x_vehicle_type_id => l_vehicle_type,
7728: x_return_status => l_return_status);
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,
7728: x_return_status => l_return_status);
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);
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);
7738: FND_MESSAGE.SET_NAME('WSH','WSH_VEHICLE_TYPE_UNDEFINED');
7739: FND_MESSAGE.SET_TOKEN('ITEM',l_vehicle_name);
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);
7738: FND_MESSAGE.SET_NAME('WSH','WSH_VEHICLE_TYPE_UNDEFINED');
7739: FND_MESSAGE.SET_TOKEN('ITEM',l_vehicle_name);
7740: FND_MESSAGE.SET_TOKEN('ORGANIZATION',l_vehicle_org_name);
7741: FND_MSG_PUB.ADD;
7865: x_failed_constraints => x_failed_constraints,
7866: x_validate_result => l_validate_result,
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;
7866: x_validate_result => l_validate_result,
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:
7918: x_validate_result => l_validate_vehicle_result,
7919: x_failed_constraint => l_failed_constraint,
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;
7919: x_failed_constraint => l_failed_constraint,
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:
7949: x_validate_result => l_validate_carrier_result,
7950: x_failed_constraint => l_failed_constraint,
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;
7950: x_failed_constraint => l_failed_constraint,
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:
7980: x_validate_result => l_validate_mode_result,
7981: x_failed_constraint => l_failed_constraint,
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;
7981: x_failed_constraint => l_failed_constraint,
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:
8097: x_validate_result => l_validate_cuscus_result,
8098: x_failed_constraint => l_failed_constraint, -- id
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;
8098: x_failed_constraint => l_failed_constraint, -- id
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:
8265: x_validate_result => l_validate_cuscus_result,
8266: x_failed_constraint => l_failed_constraint, -- id
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;
8266: x_failed_constraint => l_failed_constraint, -- id
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:
8312: x_validate_result => l_validate_itmin_result,
8313: x_failed_constraints => x_failed_constraints,
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;
8313: x_failed_constraints => x_failed_constraints,
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:
8383: x_validate_result => l_validate_itmfacin_result,
8384: x_failed_constraints => x_failed_constraints,
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;
8384: x_failed_constraints => x_failed_constraints,
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:
8417: --
8418:
8419: EXCEPTION
8420: WHEN g_get_carrmode_failed THEN
8421: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8422: --
8423: IF l_debug_on THEN
8424: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
8425: END IF;
8424: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
8425: END IF;
8426: --
8427: WHEN g_get_vehicletype_failed THEN
8428: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8429: --
8430: IF l_debug_on THEN
8431: WSH_DEBUG_SV.pop(l_module_name,' get vehicletype failed ');
8432: END IF;
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);
8439: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
8448: END IF;
8449: IF c_get_pickup_dropoff_dates%ISOPEN THEN
8450: CLOSE c_get_pickup_dropoff_dates;
8451: END IF;
8452: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.check_dlvy_against_trip');
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);
8449: IF c_get_pickup_dropoff_dates%ISOPEN THEN
8450: CLOSE c_get_pickup_dropoff_dates;
8451: END IF;
8452: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.check_dlvy_against_trip');
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');
8484: -- delivery level shipmethod should not be updated to the trip
8485: --========================================================================
8486:
8487: PROCEDURE check_act_positive (
8488: p_comp_class_tab IN WSH_UTIL_CORE.column_tab_type,
8489: p_item_id IN NUMBER DEFAULT NULL,
8490: p_item_org_id IN NUMBER DEFAULT NULL,
8491: p_delivery_rec IN entity_rec_type,
8492: x_failed_constraint IN OUT NOCOPY line_constraint_tab_type,
8512: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
8513:
8514: BEGIN
8515:
8516: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8517: x_validate_result := 'S';
8518:
8519: IF l_debug_on THEN
8520: wsh_debug_sv.push(l_module_name);
8527: WSH_CARRIERS_GRP.get_carrier_service_mode(
8528: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
8529: x_return_status => l_return_status);
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;
8528: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
8529: x_return_status => l_return_status);
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;
8529: x_return_status => l_return_status);
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;
8581: x_validate_result => l_validate_mode_result,
8582: x_failed_constraint => x_failed_constraint,
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;
8582: x_failed_constraint => x_failed_constraint,
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:
8610: x_validate_result => l_validate_carrier_result,
8611: x_failed_constraint => x_failed_constraint,
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;
8611: x_failed_constraint => x_failed_constraint,
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:
8650: x_validate_result => l_validate_mode_result,
8651: x_failed_constraint => x_failed_constraint,
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;
8651: x_failed_constraint => x_failed_constraint,
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:
8679: x_validate_result => l_validate_carrier_result,
8680: x_failed_constraint => x_failed_constraint,
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;
8680: x_failed_constraint => x_failed_constraint,
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:
8712: --
8713:
8714: EXCEPTION
8715: WHEN g_get_carrmode_failed THEN
8716: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
8717: --
8718: IF l_debug_on THEN
8719: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
8720: END IF;
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);
8727: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
8761: -- If different, violation
8762: --========================================================================
8763:
8764: PROCEDURE check_act_carmode (
8765: p_comp_class_tab IN WSH_UTIL_CORE.column_tab_type,
8766: p_delivery_rec IN OUT NOCOPY entity_rec_type,
8767: p_group_locations IN WSH_UTIL_CORE.id_tab_type,
8768: x_failed_constraint IN OUT NOCOPY line_constraint_tab_type,
8769: x_validate_result OUT NOCOPY VARCHAR2 ,
8763:
8764: PROCEDURE check_act_carmode (
8765: p_comp_class_tab IN WSH_UTIL_CORE.column_tab_type,
8766: p_delivery_rec IN OUT NOCOPY entity_rec_type,
8767: p_group_locations IN WSH_UTIL_CORE.id_tab_type,
8768: x_failed_constraint IN OUT NOCOPY line_constraint_tab_type,
8769: x_validate_result OUT NOCOPY VARCHAR2 ,
8770: x_return_status OUT NOCOPY VARCHAR2)
8771: IS
8788: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
8789:
8790: BEGIN
8791:
8792: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
8793: x_validate_result := 'S';
8794:
8795: IF l_debug_on THEN
8796: wsh_debug_sv.push(l_module_name);
8821: x_validate_result => l_validate_carrier_result,
8822: x_failed_constraint => x_failed_constraint,
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;
8822: x_failed_constraint => x_failed_constraint,
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:
8853: x_validate_result => l_validate_mode_result,
8854: x_failed_constraint => x_failed_constraint,
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;
8854: x_failed_constraint => x_failed_constraint,
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:
8885: x_validate_result => l_validate_vehicle_result,
8886: x_failed_constraint => x_failed_constraint,
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;
8886: x_failed_constraint => x_failed_constraint,
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:
8940: x_validate_result => l_validate_carrier_result,
8941: x_failed_constraint => x_failed_constraint,
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;
8941: x_failed_constraint => x_failed_constraint,
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:
8972: x_validate_result => l_validate_mode_result,
8973: x_failed_constraint => x_failed_constraint,
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;
8973: x_failed_constraint => x_failed_constraint,
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:
9004: x_validate_result => l_validate_vehicle_result,
9005: x_failed_constraint => x_failed_constraint,
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;
9005: x_failed_constraint => x_failed_constraint,
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:
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);
9066: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
9157: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
9158:
9159: BEGIN
9160:
9161: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9162:
9163: IF l_debug_on THEN
9164: WSH_DEBUG_SV.push(l_module_name);
9165: WSH_DEBUG_SV.logmsg(l_module_name,'Input delivery : '||p_delivery_id);
9178: p_internal_cust_location_id => l_ultimate_do_loc_id,
9179: x_internal_org_location_id => l_physical_location_id,
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;
9179: x_internal_org_location_id => l_physical_location_id,
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:
9431: END IF;
9432: IF c_get_dlegs%ISOPEN THEN
9433: CLOSE c_get_dlegs;
9434: END IF;
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');
9432: IF c_get_dlegs%ISOPEN THEN
9433: CLOSE c_get_dlegs;
9434: END IF;
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;
9467: p_delivery_id IN NUMBER,
9468: p_pickup_loc_id IN NUMBER,
9469: p_dropoff_loc_id IN NUMBER,
9470: x_num_dlegs OUT NOCOPY NUMBER,
9471: x_stop_locations OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
9472: x_return_status OUT NOCOPY VARCHAR2)
9473: IS
9474:
9475: -- AGDUMMY
9512: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
9513:
9514: BEGIN
9515:
9516: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9517:
9518: IF l_debug_on THEN
9519: wsh_debug_sv.push(l_module_name);
9520: END IF;
9567: WHEN others THEN
9568: IF c_get_stops%ISOPEN THEN
9569: CLOSE c_get_stops;
9570: END IF;
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');
9568: IF c_get_stops%ISOPEN THEN
9569: CLOSE c_get_stops;
9570: END IF;
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;
9605: p_target_stop_info IN target_tripstop_cc_rec_type,
9606: p_target_tripstops IN stop_ccinfo_tab_type,
9607: p_entity IN entity_rec_type,
9608: p_entity_all IN entity_tab_type,
9609: x_stop_locations IN OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
9610: x_return_status OUT NOCOPY VARCHAR2)
9611: IS
9612:
9613: l NUMBER := NULL;
9629: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
9630:
9631: BEGIN
9632:
9633: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9634:
9635: IF l_debug_on THEN
9636: wsh_debug_sv.push(l_module_name);
9637: END IF;
9849: WHEN others THEN
9850: IF c_get_stop_location%ISOPEN THEN
9851: CLOSE c_get_stop_location;
9852: END IF;
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');
9850: IF c_get_stop_location%ISOPEN THEN
9851: CLOSE c_get_stop_location;
9852: END IF;
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;
9891: --========================================================================
9892:
9893: PROCEDURE validate_positive_constraint(
9894: p_action_code IN VARCHAR2,
9895: p_comp_class_tab IN WSH_UTIL_CORE.column_tab_type,
9896: p_entity_tab IN OUT NOCOPY entity_tab_type,
9897: p_group_tab IN OUT NOCOPY WSH_FTE_COMP_CONSTRAINT_PKG.cc_group_tab_type,
9898: p_detail_tab IN detail_ccinfo_tab_type,
9899: p_target_trip IN trip_ccinfo_rec_type,
9946: l_validate_itmcar_result VARCHAR2(1) := 'S';
9947: l_validate_itmveh_result VARCHAR2(1) := 'S';
9948: l_validate_itmmod_result VARCHAR2(1) := 'S';
9949: l_item_result VARCHAR2(1) := 'S';
9950: l_stop_locations WSH_UTIL_CORE.id_tab_type;
9951: l_failed_group WSH_UTIL_CORE.id_tab_type;
9952: l_pu_checked BOOLEAN := FALSE;
9953: l_do_checked BOOLEAN := FALSE;
9954: l_pu_car_failed BOOLEAN := FALSE;
9947: l_validate_itmveh_result VARCHAR2(1) := 'S';
9948: l_validate_itmmod_result VARCHAR2(1) := 'S';
9949: l_item_result VARCHAR2(1) := 'S';
9950: l_stop_locations WSH_UTIL_CORE.id_tab_type;
9951: l_failed_group WSH_UTIL_CORE.id_tab_type;
9952: l_pu_checked BOOLEAN := FALSE;
9953: l_do_checked BOOLEAN := FALSE;
9954: l_pu_car_failed BOOLEAN := FALSE;
9955: l_pu_mod_failed BOOLEAN := FALSE;
9963:
9964: l_direct_shipment BOOLEAN := TRUE;
9965: l_num_dlegs NUMBER := 0;
9966:
9967: l_delivery_ids WSH_UTIL_CORE.id_tab_type;
9968: l_tmp_count NUMBER := 0;
9969:
9970: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'validate_positive_constraint';
9971: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
9971: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
9972:
9973: BEGIN
9974:
9975: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
9976:
9977: IF l_debug_on THEN
9978: wsh_debug_sv.push(l_module_name);
9979: WSH_DEBUG_SV.logmsg(l_module_name,'p_target_stops_info.pickup_location_id : '||p_target_stops_info.pickup_location_id);
9987: WSH_CARRIERS_GRP.get_carrier_service_mode(
9988: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
9989: x_return_status => l_return_status);
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;
9988: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
9989: x_return_status => l_return_status);
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;
9989: x_return_status => l_return_status);
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;
10018: p_vehicle_org_id => p_target_trip.VEHICLE_ORGANIZATION_ID,
10019: x_vehicle_type_id => l_vehicle_type,
10020: x_return_status => l_return_status);
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;
10019: x_vehicle_type_id => l_vehicle_type,
10020: x_return_status => l_return_status);
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,
10020: x_return_status => l_return_status);
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);
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);
10030: FND_MESSAGE.SET_NAME('WSH','WSH_VEHICLE_TYPE_UNDEFINED');
10031: FND_MESSAGE.SET_TOKEN('ITEM',l_vehicle_name);
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);
10030: FND_MESSAGE.SET_NAME('WSH','WSH_VEHICLE_TYPE_UNDEFINED');
10031: FND_MESSAGE.SET_TOKEN('ITEM',l_vehicle_name);
10032: FND_MESSAGE.SET_TOKEN('ORGANIZATION',l_vehicle_org_name);
10033: FND_MSG_PUB.ADD;
10059: x_validate_result => l_validate_carrier_result,
10060: x_failed_constraint => x_failed_constraints,
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;
10060: x_failed_constraint => x_failed_constraints,
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:
10090: x_validate_result => l_validate_mode_result,
10091: x_failed_constraint => x_failed_constraints,
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;
10091: x_failed_constraint => x_failed_constraints,
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:
10121: x_validate_result => l_validate_vehicle_result,
10122: x_failed_constraint => x_failed_constraints,
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;
10122: x_failed_constraint => x_failed_constraints,
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:
10158: x_validate_result => l_validate_carrier_result,
10159: x_failed_constraint => x_failed_constraints,
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;
10159: x_failed_constraint => x_failed_constraints,
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:
10189: x_validate_result => l_validate_mode_result,
10190: x_failed_constraint => x_failed_constraints,
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;
10190: x_failed_constraint => x_failed_constraints,
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:
10220: x_validate_result => l_validate_vehicle_result,
10221: x_failed_constraint => x_failed_constraints,
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;
10221: x_failed_constraint => x_failed_constraints,
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:
10357: x_validate_result => l_validate_carrier_result,
10358: x_failed_constraint => x_failed_constraints,
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;
10358: x_failed_constraint => x_failed_constraints,
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:
10397: x_validate_result => l_validate_carrier_result,
10398: x_failed_constraint => x_failed_constraints,
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;
10398: x_failed_constraint => x_failed_constraints,
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:
10442: x_validate_result => l_validate_mode_result,
10443: x_failed_constraint => x_failed_constraints,
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;
10443: x_failed_constraint => x_failed_constraints,
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:
10482: x_validate_result => l_validate_mode_result,
10483: x_failed_constraint => x_failed_constraints,
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;
10483: x_failed_constraint => x_failed_constraints,
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:
10526: x_validate_result => l_validate_vehicle_result,
10527: x_failed_constraint => x_failed_constraints,
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;
10527: x_failed_constraint => x_failed_constraints,
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:
10566: x_validate_result => l_validate_vehicle_result,
10567: x_failed_constraint => x_failed_constraints,
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;
10567: x_failed_constraint => x_failed_constraints,
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:
10603: p_target_trip_id => p_target_trip.trip_id,
10604: p_target_stops_in_trip => p_target_stops_info,
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;
10604: p_target_stops_in_trip => p_target_stops_info,
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:
10631: x_num_dlegs => l_num_dlegs,
10632: x_stop_locations => l_stop_locations,
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;
10632: x_stop_locations => l_stop_locations,
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:
10673: x_failed_constraint => x_failed_constraints,
10674: x_validate_result => l_act_result,
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;
10674: x_validate_result => l_act_result,
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:
10707: WSH_DEBUG_SV.logmsg(l_module_name,'Called create_valid_entity_group return status : '||l_return_status);
10708: END IF;
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;
10708: END IF;
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:
10768: x_validate_result => l_validate_orgfac_result,
10769: x_failed_constraint => x_failed_constraints,
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;
10769: x_failed_constraint => x_failed_constraints,
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:
10803: x_validate_result => l_validate_cusfac_result,
10804: x_failed_constraint => x_failed_constraints,
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;
10804: x_failed_constraint => x_failed_constraints,
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:
10830: x_validate_result => l_validate_cusfac_result,
10831: x_failed_constraint => x_failed_constraints,
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;
10831: x_failed_constraint => x_failed_constraints,
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:
10864: x_validate_result => l_validate_supfac_result,
10865: x_failed_constraint => x_failed_constraints,
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;
10865: x_failed_constraint => x_failed_constraints,
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:
10891: x_validate_result => l_validate_supfac_result,
10892: x_failed_constraint => x_failed_constraints,
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;
10892: x_failed_constraint => x_failed_constraints,
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:
10930: x_failed_constraint => x_failed_constraints,
10931: x_validate_result => l_acd_result,
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;
10931: x_validate_result => l_acd_result,
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:
10971: x_validate_result => l_validate_itmfac_result,
10972: x_failed_constraint => x_failed_constraints,
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;
10972: x_failed_constraint => x_failed_constraints,
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:
11006: x_validate_result => l_validate_carrier_result,
11007: x_failed_constraint => x_failed_constraints,
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;
11007: x_failed_constraint => x_failed_constraints,
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:
11036: x_validate_result => l_validate_vehicle_result,
11037: x_failed_constraint => x_failed_constraints,
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;
11037: x_failed_constraint => x_failed_constraints,
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:
11066: x_validate_result => l_validate_mode_result,
11067: x_failed_constraint => x_failed_constraints,
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;
11067: x_failed_constraint => x_failed_constraints,
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:
11094: x_failed_constraint => x_failed_constraints,
11095: x_validate_result => l_acd_result,
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;
11095: x_validate_result => l_acd_result,
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:
11153: --
11154:
11155: EXCEPTION
11156: WHEN g_get_carrmode_failed THEN
11157: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11158: --
11159: IF l_debug_on THEN
11160: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
11161: END IF;
11160: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
11161: END IF;
11162: --
11163: WHEN g_get_vehicletype_failed THEN
11164: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11165: --
11166: IF l_debug_on THEN
11167: WSH_DEBUG_SV.pop(l_module_name,' get vehicletype failed ');
11168: END IF;
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);
11175: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
11207:
11208: PROCEDURE check_upd_dlvy(
11209: p_delivery_rec IN delivery_ccinfo_rec_type,
11210: p_detail_tab IN detail_ccinfo_tab_type,
11211: p_comp_class_tab IN WSH_UTIL_CORE.Column_Tab_Type,
11212: x_failed_constraints IN OUT NOCOPY line_constraint_tab_type,
11213: x_validate_result OUT NOCOPY VARCHAR2,
11214: x_return_status OUT NOCOPY VARCHAR2)
11215: IS
11231: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
11232: BEGIN
11233:
11234: x_validate_result := 'S';
11235: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
11236:
11237: IF l_debug_on THEN
11238: wsh_debug_sv.push(l_module_name);
11239: END IF;
11245: WSH_CARRIERS_GRP.get_carrier_service_mode(
11246: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
11247: x_return_status => l_return_status);
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;
11246: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
11247: x_return_status => l_return_status);
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;
11247: x_return_status => l_return_status);
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;
11283: x_validate_result => l_validate_faccar_result,
11284: x_failed_constraint => l_failed_constraint,
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;
11284: x_failed_constraint => l_failed_constraint,
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:
11312: x_validate_result => l_validate_faccar_result,
11313: x_failed_constraint => l_failed_constraint,
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;
11313: x_failed_constraint => l_failed_constraint,
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:
11345: x_validate_result => l_validate_facmod_result,
11346: x_failed_constraint => l_failed_constraint,
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;
11346: x_failed_constraint => l_failed_constraint,
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:
11374: x_validate_result => l_validate_facmod_result,
11375: x_failed_constraint => l_failed_constraint,
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;
11375: x_failed_constraint => l_failed_constraint,
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:
11420: x_validate_result => l_validate_itmmod_result,
11421: x_failed_constraint => l_failed_constraint, -- id
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;
11421: x_failed_constraint => l_failed_constraint, -- id
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:
11455: x_validate_result => l_validate_itmcar_result,
11456: x_failed_constraint => l_failed_constraint, -- id
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;
11456: x_failed_constraint => l_failed_constraint, -- id
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:
11492: --
11493:
11494: EXCEPTION
11495: WHEN g_get_carrmode_failed THEN
11496: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
11497: --
11498: IF l_debug_on THEN
11499: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
11500: END IF;
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);
11507: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
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,
11574: p_dlvy_assigned_lines IN detail_ccinfo_tab_type,
11575: p_target_trip IN trip_ccinfo_rec_type,
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,
11574: p_dlvy_assigned_lines IN detail_ccinfo_tab_type,
11575: p_target_trip IN trip_ccinfo_rec_type,
11576: p_target_tripstops IN OUT NOCOPY target_tripstop_cc_rec_type,
11611: l_failed_lc NUMBER:=0;
11612: l_linegroup_indx NUMBER:=0;
11613: l_return_status VARCHAR2(1);
11614: l_validate_result VARCHAR2(1);
11615: l_comp_class_tab WSH_UTIL_CORE.column_tab_type;
11616: l_entity_tab entity_tab_type;
11617: l_group_tab entity_group_tab_type;
11618: l_group_tab1 WSH_FTE_COMP_CONSTRAINT_PKG.cc_group_tab_type;
11619: l_found BOOLEAN := FALSE;
11627: l_target_trip trip_ccinfo_rec_type;
11628: l_target_trip_assign_dels delivery_ccinfo_tab_type;
11629: l_target_trip_dlvy_lines detail_ccinfo_tab_type;
11630: l_target_trip_incl_stops stop_ccinfo_tab_type;
11631: l_detail_tab WSH_UTIL_CORE.id_tab_type;
11632: l_delivery_tab WSH_UTIL_CORE.id_tab_type;
11633: l_exists_tab WSH_UTIL_CORE.column_tab_type;
11634: l_customer_tab WSH_UTIL_CORE.id_tab_type;
11635: l_item_tab WSH_UTIL_CORE.id_tab_type;
11628: l_target_trip_assign_dels delivery_ccinfo_tab_type;
11629: l_target_trip_dlvy_lines detail_ccinfo_tab_type;
11630: l_target_trip_incl_stops stop_ccinfo_tab_type;
11631: l_detail_tab WSH_UTIL_CORE.id_tab_type;
11632: l_delivery_tab WSH_UTIL_CORE.id_tab_type;
11633: l_exists_tab WSH_UTIL_CORE.column_tab_type;
11634: l_customer_tab WSH_UTIL_CORE.id_tab_type;
11635: l_item_tab WSH_UTIL_CORE.id_tab_type;
11636: l_shipfrom_loc_tab WSH_UTIL_CORE.id_tab_type;
11629: l_target_trip_dlvy_lines detail_ccinfo_tab_type;
11630: l_target_trip_incl_stops stop_ccinfo_tab_type;
11631: l_detail_tab WSH_UTIL_CORE.id_tab_type;
11632: l_delivery_tab WSH_UTIL_CORE.id_tab_type;
11633: l_exists_tab WSH_UTIL_CORE.column_tab_type;
11634: l_customer_tab WSH_UTIL_CORE.id_tab_type;
11635: l_item_tab WSH_UTIL_CORE.id_tab_type;
11636: l_shipfrom_loc_tab WSH_UTIL_CORE.id_tab_type;
11637: l_org_tab WSH_UTIL_CORE.id_tab_type;
11630: l_target_trip_incl_stops stop_ccinfo_tab_type;
11631: l_detail_tab WSH_UTIL_CORE.id_tab_type;
11632: l_delivery_tab WSH_UTIL_CORE.id_tab_type;
11633: l_exists_tab WSH_UTIL_CORE.column_tab_type;
11634: l_customer_tab WSH_UTIL_CORE.id_tab_type;
11635: l_item_tab WSH_UTIL_CORE.id_tab_type;
11636: l_shipfrom_loc_tab WSH_UTIL_CORE.id_tab_type;
11637: l_org_tab WSH_UTIL_CORE.id_tab_type;
11638: l_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11631: l_detail_tab WSH_UTIL_CORE.id_tab_type;
11632: l_delivery_tab WSH_UTIL_CORE.id_tab_type;
11633: l_exists_tab WSH_UTIL_CORE.column_tab_type;
11634: l_customer_tab WSH_UTIL_CORE.id_tab_type;
11635: l_item_tab WSH_UTIL_CORE.id_tab_type;
11636: l_shipfrom_loc_tab WSH_UTIL_CORE.id_tab_type;
11637: l_org_tab WSH_UTIL_CORE.id_tab_type;
11638: l_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11639: l_intmed_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11632: l_delivery_tab WSH_UTIL_CORE.id_tab_type;
11633: l_exists_tab WSH_UTIL_CORE.column_tab_type;
11634: l_customer_tab WSH_UTIL_CORE.id_tab_type;
11635: l_item_tab WSH_UTIL_CORE.id_tab_type;
11636: l_shipfrom_loc_tab WSH_UTIL_CORE.id_tab_type;
11637: l_org_tab WSH_UTIL_CORE.id_tab_type;
11638: l_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11639: l_intmed_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11640: l_rel_stat_tab WSH_UTIL_CORE.column_tab_type;
11633: l_exists_tab WSH_UTIL_CORE.column_tab_type;
11634: l_customer_tab WSH_UTIL_CORE.id_tab_type;
11635: l_item_tab WSH_UTIL_CORE.id_tab_type;
11636: l_shipfrom_loc_tab WSH_UTIL_CORE.id_tab_type;
11637: l_org_tab WSH_UTIL_CORE.id_tab_type;
11638: l_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11639: l_intmed_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11640: l_rel_stat_tab WSH_UTIL_CORE.column_tab_type;
11641: l_cont_flag_tab WSH_UTIL_CORE.column_tab_type;
11634: l_customer_tab WSH_UTIL_CORE.id_tab_type;
11635: l_item_tab WSH_UTIL_CORE.id_tab_type;
11636: l_shipfrom_loc_tab WSH_UTIL_CORE.id_tab_type;
11637: l_org_tab WSH_UTIL_CORE.id_tab_type;
11638: l_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11639: l_intmed_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11640: l_rel_stat_tab WSH_UTIL_CORE.column_tab_type;
11641: l_cont_flag_tab WSH_UTIL_CORE.column_tab_type;
11642: l_date_req_tab WSH_UTIL_CORE.Date_Tab_Type;
11635: l_item_tab WSH_UTIL_CORE.id_tab_type;
11636: l_shipfrom_loc_tab WSH_UTIL_CORE.id_tab_type;
11637: l_org_tab WSH_UTIL_CORE.id_tab_type;
11638: l_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11639: l_intmed_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11640: l_rel_stat_tab WSH_UTIL_CORE.column_tab_type;
11641: l_cont_flag_tab WSH_UTIL_CORE.column_tab_type;
11642: l_date_req_tab WSH_UTIL_CORE.Date_Tab_Type;
11643: l_date_sch_tab WSH_UTIL_CORE.Date_Tab_Type;
11636: l_shipfrom_loc_tab WSH_UTIL_CORE.id_tab_type;
11637: l_org_tab WSH_UTIL_CORE.id_tab_type;
11638: l_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11639: l_intmed_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11640: l_rel_stat_tab WSH_UTIL_CORE.column_tab_type;
11641: l_cont_flag_tab WSH_UTIL_CORE.column_tab_type;
11642: l_date_req_tab WSH_UTIL_CORE.Date_Tab_Type;
11643: l_date_sch_tab WSH_UTIL_CORE.Date_Tab_Type;
11644: l_carrier_tab WSH_UTIL_CORE.id_tab_type;
11637: l_org_tab WSH_UTIL_CORE.id_tab_type;
11638: l_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11639: l_intmed_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11640: l_rel_stat_tab WSH_UTIL_CORE.column_tab_type;
11641: l_cont_flag_tab WSH_UTIL_CORE.column_tab_type;
11642: l_date_req_tab WSH_UTIL_CORE.Date_Tab_Type;
11643: l_date_sch_tab WSH_UTIL_CORE.Date_Tab_Type;
11644: l_carrier_tab WSH_UTIL_CORE.id_tab_type;
11645: l_shipmethod_tab WSH_UTIL_CORE.column_tab_type;
11638: l_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11639: l_intmed_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11640: l_rel_stat_tab WSH_UTIL_CORE.column_tab_type;
11641: l_cont_flag_tab WSH_UTIL_CORE.column_tab_type;
11642: l_date_req_tab WSH_UTIL_CORE.Date_Tab_Type;
11643: l_date_sch_tab WSH_UTIL_CORE.Date_Tab_Type;
11644: l_carrier_tab WSH_UTIL_CORE.id_tab_type;
11645: l_shipmethod_tab WSH_UTIL_CORE.column_tab_type;
11646: l_party_tab WSH_UTIL_CORE.id_tab_type;
11639: l_intmed_shipto_loc_tab WSH_UTIL_CORE.id_tab_type;
11640: l_rel_stat_tab WSH_UTIL_CORE.column_tab_type;
11641: l_cont_flag_tab WSH_UTIL_CORE.column_tab_type;
11642: l_date_req_tab WSH_UTIL_CORE.Date_Tab_Type;
11643: l_date_sch_tab WSH_UTIL_CORE.Date_Tab_Type;
11644: l_carrier_tab WSH_UTIL_CORE.id_tab_type;
11645: l_shipmethod_tab WSH_UTIL_CORE.column_tab_type;
11646: l_party_tab WSH_UTIL_CORE.id_tab_type;
11647: l_line_direction_tab WSH_UTIL_CORE.column_tab_type;
11640: l_rel_stat_tab WSH_UTIL_CORE.column_tab_type;
11641: l_cont_flag_tab WSH_UTIL_CORE.column_tab_type;
11642: l_date_req_tab WSH_UTIL_CORE.Date_Tab_Type;
11643: l_date_sch_tab WSH_UTIL_CORE.Date_Tab_Type;
11644: l_carrier_tab WSH_UTIL_CORE.id_tab_type;
11645: l_shipmethod_tab WSH_UTIL_CORE.column_tab_type;
11646: l_party_tab WSH_UTIL_CORE.id_tab_type;
11647: l_line_direction_tab WSH_UTIL_CORE.column_tab_type;
11648: l_shipping_control_tab WSH_UTIL_CORE.column_tab_type;
11641: l_cont_flag_tab WSH_UTIL_CORE.column_tab_type;
11642: l_date_req_tab WSH_UTIL_CORE.Date_Tab_Type;
11643: l_date_sch_tab WSH_UTIL_CORE.Date_Tab_Type;
11644: l_carrier_tab WSH_UTIL_CORE.id_tab_type;
11645: l_shipmethod_tab WSH_UTIL_CORE.column_tab_type;
11646: l_party_tab WSH_UTIL_CORE.id_tab_type;
11647: l_line_direction_tab WSH_UTIL_CORE.column_tab_type;
11648: l_shipping_control_tab WSH_UTIL_CORE.column_tab_type;
11649: l_supp_control_tab WSH_UTIL_CORE.id_tab_type;
11642: l_date_req_tab WSH_UTIL_CORE.Date_Tab_Type;
11643: l_date_sch_tab WSH_UTIL_CORE.Date_Tab_Type;
11644: l_carrier_tab WSH_UTIL_CORE.id_tab_type;
11645: l_shipmethod_tab WSH_UTIL_CORE.column_tab_type;
11646: l_party_tab WSH_UTIL_CORE.id_tab_type;
11647: l_line_direction_tab WSH_UTIL_CORE.column_tab_type;
11648: l_shipping_control_tab WSH_UTIL_CORE.column_tab_type;
11649: l_supp_control_tab WSH_UTIL_CORE.id_tab_type;
11650: --DUM_COMP
11643: l_date_sch_tab WSH_UTIL_CORE.Date_Tab_Type;
11644: l_carrier_tab WSH_UTIL_CORE.id_tab_type;
11645: l_shipmethod_tab WSH_UTIL_CORE.column_tab_type;
11646: l_party_tab WSH_UTIL_CORE.id_tab_type;
11647: l_line_direction_tab WSH_UTIL_CORE.column_tab_type;
11648: l_shipping_control_tab WSH_UTIL_CORE.column_tab_type;
11649: l_supp_control_tab WSH_UTIL_CORE.id_tab_type;
11650: --DUM_COMP
11651: l_dum_tab WSH_UTIL_CORE.id_tab_type;
11644: l_carrier_tab WSH_UTIL_CORE.id_tab_type;
11645: l_shipmethod_tab WSH_UTIL_CORE.column_tab_type;
11646: l_party_tab WSH_UTIL_CORE.id_tab_type;
11647: l_line_direction_tab WSH_UTIL_CORE.column_tab_type;
11648: l_shipping_control_tab WSH_UTIL_CORE.column_tab_type;
11649: l_supp_control_tab WSH_UTIL_CORE.id_tab_type;
11650: --DUM_COMP
11651: l_dum_tab WSH_UTIL_CORE.id_tab_type;
11652: --DUM_COMP
11645: l_shipmethod_tab WSH_UTIL_CORE.column_tab_type;
11646: l_party_tab WSH_UTIL_CORE.id_tab_type;
11647: l_line_direction_tab WSH_UTIL_CORE.column_tab_type;
11648: l_shipping_control_tab WSH_UTIL_CORE.column_tab_type;
11649: l_supp_control_tab WSH_UTIL_CORE.id_tab_type;
11650: --DUM_COMP
11651: l_dum_tab WSH_UTIL_CORE.id_tab_type;
11652: --DUM_COMP
11653: --SBAKSHI (8/24)
11647: l_line_direction_tab WSH_UTIL_CORE.column_tab_type;
11648: l_shipping_control_tab WSH_UTIL_CORE.column_tab_type;
11649: l_supp_control_tab WSH_UTIL_CORE.id_tab_type;
11650: --DUM_COMP
11651: l_dum_tab WSH_UTIL_CORE.id_tab_type;
11652: --DUM_COMP
11653: --SBAKSHI (8/24)
11654: l_target_trip_incl_sort_stops stop_ccinfo_tab_type;
11655: --SBAKSHI (8/24)
11682:
11683: BEGIN
11684:
11685: x_validate_result := 'S';
11686: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
11687:
11688: g_itm_mustuse_cache.DELETE;
11689: g_itmloc_mustuse_cache.DELETE;
11690: g_itm_exclusive_cache.DELETE;
11711: END IF;
11712:
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;
11712:
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:
11786: p_internal_cust_location_id => l_delivery_info(i).ultimate_dropoff_location_id,
11787: x_internal_org_location_id => l_physical_location_id,
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;
11787: x_internal_org_location_id => l_physical_location_id,
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:
11886: p_internal_cust_location_id => l_delivery_info(i).ultimate_dropoff_location_id,
11887: x_internal_org_location_id => l_physical_location_id,
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;
11887: x_internal_org_location_id => l_physical_location_id,
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:
12005: p_internal_cust_location_id => l_dlvy_assigned_lines(j).ship_to_location_id,
12006: x_internal_org_location_id => l_physical_location_id,
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;
12006: x_internal_org_location_id => l_physical_location_id,
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:
12066: p_internal_cust_location_id => l_dlvy_assigned_lines(i).ship_to_location_id,
12067: x_internal_org_location_id => l_physical_location_id,
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;
12067: x_internal_org_location_id => l_physical_location_id,
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:
12106: p_internal_cust_location_id => l_delivery_rec.ultimate_dropoff_location_id,
12107: x_internal_org_location_id => l_physical_location_id,
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;
12107: x_internal_org_location_id => l_physical_location_id,
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:
12140: p_internal_cust_location_id => l_target_trip_assign_dels(l).ultimate_dropoff_location_id,
12141: x_internal_org_location_id => l_physical_location_id,
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;
12141: x_internal_org_location_id => l_physical_location_id,
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:
12176: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
12177: x_internal_org_location_id => l_physical_location_id,
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;
12177: x_internal_org_location_id => l_physical_location_id,
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:
12210: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
12211: x_internal_org_location_id => l_physical_location_id,
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;
12211: x_internal_org_location_id => l_physical_location_id,
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:
12244: p_internal_cust_location_id => l_target_trip_dlvy_lines(l).ship_to_location_id,
12245: x_internal_org_location_id => l_physical_location_id,
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;
12245: x_internal_org_location_id => l_physical_location_id,
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:
12294: x_sort_stop_table => l_target_trip_incl_sort_stops,
12295: x_return_status => l_return_status);
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;
12295: x_return_status => l_return_status);
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:
12351: p_internal_cust_location_id => p_target_tripstops.pickup_location_id,
12352: x_internal_org_location_id => l_physical_location_id,
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;
12352: x_internal_org_location_id => l_physical_location_id,
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:
12373: p_internal_cust_location_id => p_target_tripstops.dropoff_location_id,
12374: x_internal_org_location_id => l_physical_location_id,
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;
12374: x_internal_org_location_id => l_physical_location_id,
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:
12470: WSH_CARRIERS_GRP.get_carrier_service_mode(
12471: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
12472: x_return_status => l_return_status);
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;
12471: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
12472: x_return_status => l_return_status);
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;
12472: x_return_status => l_return_status);
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;
12504: p_vehicle_org_id => l_target_trip.VEHICLE_ORGANIZATION_ID,
12505: x_vehicle_type_id => l_vehicle_type,
12506: x_return_status => l_return_status);
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;
12505: x_vehicle_type_id => l_vehicle_type,
12506: x_return_status => l_return_status);
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,
12506: x_return_status => l_return_status);
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);
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);
12516: FND_MESSAGE.SET_NAME('WSH','WSH_VEHICLE_TYPE_UNDEFINED');
12517: FND_MESSAGE.SET_TOKEN('ITEM',l_vehicle_name);
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);
12516: FND_MESSAGE.SET_NAME('WSH','WSH_VEHICLE_TYPE_UNDEFINED');
12517: FND_MESSAGE.SET_TOKEN('ITEM',l_vehicle_name);
12518: FND_MESSAGE.SET_TOKEN('ORGANIZATION',l_vehicle_org_name);
12519: FND_MSG_PUB.ADD;
12573: x_validate_result => l_validate_vehicle_result,
12574: x_failed_constraint => l_failed_constraint,
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;
12574: x_failed_constraint => l_failed_constraint,
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:
12604: x_validate_result => l_validate_carrier_result,
12605: x_failed_constraint => l_failed_constraint,
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;
12605: x_failed_constraint => l_failed_constraint,
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:
12635: x_validate_result => l_validate_mode_result,
12636: x_failed_constraint => l_failed_constraint,
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;
12636: x_failed_constraint => l_failed_constraint,
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:
12665: IF k IS NOT NULL THEN
12666: LOOP
12667:
12668: -- Skip if shipping control is SUPPLIER
12669: --Bug 9222910 replaced l_delivery_info(k).delivery_id with l_delivery_info_mod , WSH_UTIL_CORE.C_INDEX_LIMIT value is 2147483648; -- power(2,31)
12670: l_delivery_info_mod := MOD(l_delivery_info(k).delivery_id , WSH_UTIL_CORE.C_INDEX_LIMIT) ;
12671:
12672: IF l_delivery_info(k).shipping_control = 'SUPPLIER' THEN
12673:
12666: LOOP
12667:
12668: -- Skip if shipping control is SUPPLIER
12669: --Bug 9222910 replaced l_delivery_info(k).delivery_id with l_delivery_info_mod , WSH_UTIL_CORE.C_INDEX_LIMIT value is 2147483648; -- power(2,31)
12670: l_delivery_info_mod := MOD(l_delivery_info(k).delivery_id , WSH_UTIL_CORE.C_INDEX_LIMIT) ;
12671:
12672: IF l_delivery_info(k).shipping_control = 'SUPPLIER' THEN
12673:
12674: l_supp_control_tab(l_delivery_info_mod) := l_delivery_info(k).delivery_id;
12729: WSH_DEBUG_SV.logmsg(l_module_name,'Called search_matching_group return status : '||l_return_status||' Group found ? '||l_group_id);
12730: END IF;
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;
12730: END IF;
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:
12751: WSH_DEBUG_SV.logmsg(l_module_name,'Called create_valid_entity_group return status : '||l_return_status);
12752: 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;
12752: 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:
12789: WSH_DEBUG_SV.logmsg(l_module_name,'Called check_dlvy_against_trip return status : '||l_return_status||' validate result : '||l_validate_result);
12790: 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;
12790: 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:
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)
12800: THEN
12801: IF l_validate_result = 'F' THEN
12802: -- Remove delivery from the line group
12803: -- add to the failed lines
12844: WSH_DEBUG_SV.logmsg(l_module_name,'Called check_upd_dlvy return status : '||l_return_status||' validate result : '||l_validate_result);
12845: END IF;
12846: --
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;
12845: END IF;
12846: --
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;
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
12856:
12857: IF l_validate_result = 'F' THEN
12858: -- Remove delivery from the line group
12859: -- add to the failed lines
12937: WSH_DEBUG_SV.logmsg(l_module_name,'Called validate_positive_constraint return status : '||l_return_status);
12938: END IF;
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;
12938: END IF;
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:
13049: WSH_DEBUG_SV.logmsg(l_module_name,'Called stack_messages return status : '||l_return_status);
13050: END IF;
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;
13050: END IF;
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:
13060: -- x_failed_lines.COUNT = 0 in case of assign delivery to trip
13061: -- Means there is violation for input pickup/dropoff stop/location
13062:
13063: IF x_validate_result = 'F' THEN
13064: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13065:
13066: ELSIF l_failed_constraints.COUNT > 0 THEN
13067:
13068: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
13064: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13065:
13066: ELSIF l_failed_constraints.COUNT > 0 THEN
13067:
13068: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
13069: END IF;
13070:
13071:
13072: --
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);
13084: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
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,
13128: p_target_lane IN lane_ccinfo_tab_type,
13129: x_succ_trips OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
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,
13128: p_target_lane IN lane_ccinfo_tab_type,
13129: x_succ_trips OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
13130: x_succ_lanes OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
13131: x_validate_result OUT NOCOPY VARCHAR2,
13132: x_msg_count OUT NOCOPY NUMBER,
13133: x_msg_data OUT NOCOPY VARCHAR2,
13126: p_delivery_leg_rec IN dleg_ccinfo_rec_type,
13127: p_target_trip IN trip_ccinfo_tab_type,
13128: p_target_lane IN lane_ccinfo_tab_type,
13129: x_succ_trips OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
13130: x_succ_lanes OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
13131: x_validate_result OUT NOCOPY VARCHAR2,
13132: x_msg_count OUT NOCOPY NUMBER,
13133: x_msg_data OUT NOCOPY VARCHAR2,
13134: x_return_status OUT NOCOPY VARCHAR2)
13174: l_validate_itmveh_result VARCHAR2(1) := 'S';
13175: l_validate_itmmod_result VARCHAR2(1) := 'S';
13176: l_validate_result VARCHAR2(1) := 'S';
13177:
13178: l_comp_class_tab WSH_UTIL_CORE.Column_Tab_Type;
13179: l_detail_rec detail_ccinfo_rec_type;
13180: l_dlvy_rec delivery_ccinfo_rec_type;
13181: l_dleg_dlvy_rec delivery_ccinfo_rec_type;
13182: l_stop_rec stop_ccinfo_rec_type;
13197: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'validate_constraint_dleg';
13198:
13199: BEGIN
13200: x_validate_result := 'S';
13201: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
13202:
13203: g_itm_mustuse_cache.DELETE;
13204: g_itmloc_mustuse_cache.DELETE;
13205: g_itm_exclusive_cache.DELETE;
13215: END IF;
13216:
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;
13216:
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:
13306: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
13307: x_internal_org_location_id => l_physical_location_id,
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;
13307: x_internal_org_location_id => l_physical_location_id,
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:
13344: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
13345: x_internal_org_location_id => l_physical_location_id,
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;
13345: x_internal_org_location_id => l_physical_location_id,
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:
13381: p_internal_cust_location_id => l_dleg_dlvy_rec.ultimate_dropoff_location_id,
13382: x_internal_org_location_id => l_physical_location_id,
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;
13382: x_internal_org_location_id => l_physical_location_id,
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:
13410: p_internal_cust_location_id => p_delivery_leg_rec.dropoffstop_location_id,
13411: x_internal_org_location_id => l_physical_location_id,
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;
13411: x_internal_org_location_id => l_physical_location_id,
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:
13465: x_validate_result => l_validate_carrier_result,
13466: x_failed_constraint => l_failed_constraints,
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;
13466: x_failed_constraint => l_failed_constraints,
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:
13491: x_validate_result => l_validate_carrier_result,
13492: x_failed_constraint => l_failed_constraints,
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;
13492: x_failed_constraint => l_failed_constraints,
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:
13521: x_validate_result => l_validate_mode_result,
13522: x_failed_constraint => l_failed_constraints,
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;
13522: x_failed_constraint => l_failed_constraints,
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:
13547: x_validate_result => l_validate_mode_result,
13548: x_failed_constraint => l_failed_constraints,
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;
13548: x_failed_constraint => l_failed_constraints,
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:
13580: x_validate_result => l_validate_faccar_result,
13581: x_failed_constraint => l_failed_constraint,
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;
13581: x_failed_constraint => l_failed_constraint,
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:
13609: x_validate_result => l_validate_faccar_result,
13610: x_failed_constraint => l_failed_constraint,
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;
13610: x_failed_constraint => l_failed_constraint,
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:
13642: x_validate_result => l_validate_facmod_result,
13643: x_failed_constraint => l_failed_constraint,
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;
13643: x_failed_constraint => l_failed_constraint,
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:
13671: x_validate_result => l_validate_facmod_result,
13672: x_failed_constraint => l_failed_constraint,
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;
13672: x_failed_constraint => l_failed_constraint,
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:
13717: x_validate_result => l_validate_carrier_result,
13718: x_failed_constraint => l_failed_constraints,
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;
13718: x_failed_constraint => l_failed_constraints,
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:
13748: x_validate_result => l_validate_mode_result,
13749: x_failed_constraint => l_failed_constraints,
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;
13749: x_failed_constraint => l_failed_constraints,
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:
13775: x_validate_result => l_validate_itmmod_result,
13776: x_failed_constraint => l_failed_constraint,
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;
13776: x_failed_constraint => l_failed_constraint,
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:
13812: x_validate_result => l_validate_itmcar_result,
13813: x_failed_constraint => l_failed_constraint,
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;
13813: x_failed_constraint => l_failed_constraint,
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:
13908: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
13909: x_internal_org_location_id => l_physical_location_id,
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;
13909: x_internal_org_location_id => l_physical_location_id,
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:
13946: p_internal_cust_location_id => l_dlvy_rec.ultimate_dropoff_location_id,
13947: x_internal_org_location_id => l_physical_location_id,
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;
13947: x_internal_org_location_id => l_physical_location_id,
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:
14022: WSH_DEBUG_SV.logmsg(l_module_name,'Called create_valid_entity_group return status : '||l_return_status);
14023: END IF;
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;
14023: END IF;
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:
14048: WSH_DEBUG_SV.logmsg(l_module_name,'l_failed_lines count : '||l_failed_lines.COUNT);
14049: END IF;
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
14049: END IF;
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';
14074: x_failed_constraints => l_failed_constraints,
14075: x_validate_result => l_validate_excl_result,
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;
14075: x_validate_result => l_validate_excl_result,
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:
14123: x_validate_result => l_validate_faccar_result,
14124: x_failed_constraint => l_failed_constraint,
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;
14124: x_failed_constraint => l_failed_constraint,
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:
14152: x_validate_result => l_validate_faccar_result,
14153: x_failed_constraint => l_failed_constraint,
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;
14153: x_failed_constraint => l_failed_constraint,
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:
14185: x_validate_result => l_validate_facmod_result,
14186: x_failed_constraint => l_failed_constraint,
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;
14186: x_failed_constraint => l_failed_constraint,
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:
14214: x_validate_result => l_validate_facmod_result,
14215: x_failed_constraint => l_failed_constraint,
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;
14215: x_failed_constraint => l_failed_constraint,
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:
14248: x_failed_constraints => l_failed_constraints,
14249: x_validate_result => l_validate_result,
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;
14249: x_validate_result => l_validate_result,
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:
14269: x_msg_count => x_msg_count,
14270: x_msg_data => x_msg_data,
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;
14270: x_msg_data => x_msg_data,
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:
14276: END IF;
14277: END IF;
14278:
14279: IF x_validate_result = 'F' THEN
14280: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14281: ELSIF l_failed_constraints.COUNT > 0 THEN
14282: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
14283: END IF;
14284:
14278:
14279: IF x_validate_result = 'F' THEN
14280: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14281: ELSIF l_failed_constraints.COUNT > 0 THEN
14282: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
14283: END IF;
14284:
14285: --
14286: IF l_debug_on THEN
14289: --
14290:
14291: EXCEPTION
14292: WHEN g_get_carrmode_failed THEN
14293: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14294: --
14295: IF l_debug_on THEN
14296: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
14297: END IF;
14296: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
14297: END IF;
14298: --
14299: WHEN g_get_vehicletype_failed THEN
14300: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14301: --
14302: IF l_debug_on THEN
14303: WSH_DEBUG_SV.pop(l_module_name,' get vehicletype failed ');
14304: END IF;
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);
14311: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
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,
14372: p_target_delivery IN delivery_ccinfo_rec_type,
14373: p_target_container IN detail_ccinfo_rec_type,
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,
14372: p_target_delivery IN delivery_ccinfo_rec_type,
14373: p_target_container IN detail_ccinfo_rec_type,
14374: p_dlvy_assigned_lines IN detail_ccinfo_tab_type,
14449: l_validate_intmed_result VARCHAR2(1);
14450: l_input_comp_class BOOLEAN := FALSE;
14451: l_input_assign_lines BOOLEAN := FALSE;
14452: l_item_check_cus BOOLEAN := FALSE;
14453: l_comp_class_tab WSH_UTIL_CORE.Column_Tab_Type;
14454: l_detail_rec detail_ccinfo_rec_type;
14455: l_line_group_rec WSH_FTE_COMP_CONSTRAINT_PKG.line_group_rec_type;
14456: l_linegroup_rec WSH_FTE_COMP_CONSTRAINT_PKG.cc_group_rec_type;
14457: l_failed_constraint line_constraint_rec_type;
14461: l_validate_itmin_result VARCHAR2(1);
14462: l_inp_items_cnt NUMBER := 0;
14463: l_validate_itmfacin_result VARCHAR2(1) := 'S';
14464: l_items_tab item_tab_type;
14465: l_locations_list WSH_UTIL_CORE.id_tab_type;
14466: l_supp_control_tab WSH_UTIL_CORE.id_tab_type;
14467: l_target_delivery delivery_ccinfo_rec_type;
14468: l_target_container detail_ccinfo_rec_type;
14469: l_del_detail_info detail_ccinfo_tab_type;
14462: l_inp_items_cnt NUMBER := 0;
14463: l_validate_itmfacin_result VARCHAR2(1) := 'S';
14464: l_items_tab item_tab_type;
14465: l_locations_list WSH_UTIL_CORE.id_tab_type;
14466: l_supp_control_tab WSH_UTIL_CORE.id_tab_type;
14467: l_target_delivery delivery_ccinfo_rec_type;
14468: l_target_container detail_ccinfo_rec_type;
14469: l_del_detail_info detail_ccinfo_tab_type;
14470: l_dlvy_assigned_lines detail_ccinfo_tab_type;
14482:
14483: BEGIN
14484:
14485: x_validate_result := 'S'; -- Constraint Validation result : S / F
14486: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
14487:
14488: g_itm_mustuse_cache.DELETE;
14489: g_itmloc_mustuse_cache.DELETE;
14490: g_itm_exclusive_cache.DELETE;
14509: END IF;
14510:
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;
14510:
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:
14583: p_internal_cust_location_id => l_del_detail_info(i).ship_to_location_id,
14584: x_internal_org_location_id => l_physical_location_id,
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;
14584: x_internal_org_location_id => l_physical_location_id,
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:
14647: p_internal_cust_location_id => l_del_detail_info(i).ship_to_location_id,
14648: x_internal_org_location_id => l_physical_location_id,
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;
14648: x_internal_org_location_id => l_physical_location_id,
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:
14685: p_internal_cust_location_id => l_target_delivery.ultimate_dropoff_location_id,
14686: x_internal_org_location_id => l_physical_location_id,
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;
14686: x_internal_org_location_id => l_physical_location_id,
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:
14719: p_internal_cust_location_id => l_target_container.ship_to_location_id,
14720: x_internal_org_location_id => l_physical_location_id,
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;
14720: x_internal_org_location_id => l_physical_location_id,
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:
14756: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
14757: x_internal_org_location_id => l_physical_location_id,
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;
14757: x_internal_org_location_id => l_physical_location_id,
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:
14789: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
14790: x_internal_org_location_id => l_physical_location_id,
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;
14790: x_internal_org_location_id => l_physical_location_id,
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:
14826: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
14827: x_internal_org_location_id => l_physical_location_id,
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;
14827: x_internal_org_location_id => l_physical_location_id,
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:
14890: p_internal_cust_location_id => l_dlvy_assigned_lines(i).ship_to_location_id,
14891: x_internal_org_location_id => l_physical_location_id,
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;
14891: x_internal_org_location_id => l_physical_location_id,
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:
14992: x_validate_result => l_validate_itmfacin_result,
14993: x_failed_constraints => l_failed_constraints,
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;
14993: x_failed_constraints => l_failed_constraints,
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:
15041: WSH_DEBUG_SV.logmsg(l_module_name,'Called search_matching_group return status : '||l_return_status||' Group found ? '||l_group_id);
15042: END IF;
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;
15042: END IF;
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:
15067: WSH_DEBUG_SV.logmsg(l_module_name,'Called create_valid_entity_group return status : '||l_return_status);
15068: END IF;
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;
15068: END IF;
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;
15116: x_validate_result => l_validate_customer_result,
15117: x_failed_constraint => l_failed_constraint,
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;
15117: x_failed_constraint => l_failed_constraint,
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:
15173: x_validate_result => l_validate_customer_result,
15174: x_failed_constraint => l_failed_constraint,
15175: x_return_status => l_return_status);
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;
15174: x_failed_constraint => l_failed_constraint,
15175: x_return_status => l_return_status);
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;
15227: x_validate_result => l_validate_itmin_result,
15228: x_failed_constraints => l_failed_constraints,
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;
15228: x_failed_constraints => l_failed_constraints,
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:
15282: WSH_CARRIERS_GRP.get_carrier_service_mode(
15283: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
15284: x_return_status => l_return_status);
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;
15283: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
15284: x_return_status => l_return_status);
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;
15284: x_return_status => l_return_status);
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;
15306: WSH_CARRIERS_GRP.get_carrier_service_mode(
15307: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
15308: x_return_status => l_return_status);
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;
15307: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
15308: x_return_status => l_return_status);
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;
15308: x_return_status => l_return_status);
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;
15333: x_validate_result => l_validate_carrier_result,
15334: x_failed_constraint => l_failed_constraint,
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;
15334: x_failed_constraint => l_failed_constraint,
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:
15374: x_validate_result => l_validate_mode_result,
15375: x_failed_constraint => l_failed_constraint,
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;
15375: x_failed_constraint => l_failed_constraint,
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:
15419: x_validate_result => l_validate_carrier_result,
15420: x_failed_constraint => l_failed_constraint,
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;
15420: x_failed_constraint => l_failed_constraint,
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:
15446: x_validate_result => l_validate_carrier_result,
15447: x_failed_constraint => l_failed_constraint,
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;
15447: x_failed_constraint => l_failed_constraint,
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:
15479: x_validate_result => l_validate_mode_result,
15480: x_failed_constraint => l_failed_constraint,
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;
15480: x_failed_constraint => l_failed_constraint,
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:
15505: x_validate_result => l_validate_mode_result,
15506: x_failed_constraint => l_failed_constraint,
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;
15506: x_failed_constraint => l_failed_constraint,
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:
15608: x_msg_count => x_msg_count,
15609: x_msg_data => x_msg_data,
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;
15609: x_msg_data => x_msg_data,
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:
15615: END IF;
15616: END IF;
15617:
15618: IF x_validate_result = 'F' THEN
15619: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
15620: ELSIF l_failed_constraints.COUNT > 0 THEN
15621: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
15622: END IF;
15623:
15617:
15618: IF x_validate_result = 'F' THEN
15619: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
15620: ELSIF l_failed_constraints.COUNT > 0 THEN
15621: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
15622: END IF;
15623:
15624: --
15625: IF l_debug_on THEN
15628: --
15629:
15630: EXCEPTION
15631: WHEN g_get_carrmode_failed THEN
15632: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
15633: --
15634: IF l_debug_on THEN
15635: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
15636: END IF;
15635: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
15636: END IF;
15637: --
15638: WHEN g_invalid_action_code THEN
15639: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
15640: --
15641: IF l_debug_on THEN
15642: WSH_DEBUG_SV.pop(l_module_name,' invalid_action_code ');
15643: END IF;
15642: WSH_DEBUG_SV.pop(l_module_name,' invalid_action_code ');
15643: END IF;
15644: --
15645: WHEN g_invalid_input THEN
15646: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
15647: --
15648: IF l_debug_on THEN
15649: WSH_DEBUG_SV.pop(l_module_name,' invalid_input ');
15650: END IF;
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);
15658: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
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,
15705: p_trip_dlvy_lines IN detail_ccinfo_tab_type,
15706: p_trip_incl_stops IN stop_ccinfo_tab_type,
15703: p_trip_info IN trip_ccinfo_tab_type,
15704: p_trip_assigned_dels IN delivery_ccinfo_tab_type,
15705: p_trip_dlvy_lines IN detail_ccinfo_tab_type,
15706: p_trip_incl_stops IN stop_ccinfo_tab_type,
15707: x_fail_trips OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
15708: x_validate_result OUT NOCOPY VARCHAR2,
15709: x_msg_count OUT NOCOPY NUMBER,
15710: x_msg_data OUT NOCOPY VARCHAR2,
15711: x_return_status OUT NOCOPY VARCHAR2)
15723: l_trip_detail_cnt NUMBER := 0;
15724: l_trip_stops_cnt NUMBER := 0;
15725: l_out_object2_num NUMBER:=0;
15726: l_out_object2_char VARCHAR2(30):=NULL;
15727: l_comp_class_tab WSH_UTIL_CORE.Column_Tab_Type;
15728: l_return_status VARCHAR2(1);
15729: l_failed_constraint line_constraint_rec_type;
15730: l_failed_constraints line_constraint_tab_type;
15731: l_curr_trip_added BOOLEAN := FALSE;
15761: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'validate_constraint_trip';
15762:
15763: BEGIN
15764:
15765: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
15766: x_validate_result := 'S';
15767:
15768: g_itm_mustuse_cache.DELETE;
15769: g_itmloc_mustuse_cache.DELETE;
15780: END IF;
15781:
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;
15781:
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:
15821: p_internal_cust_location_id => l_delivery_rec.ultimate_dropoff_location_id,
15822: x_internal_org_location_id => l_physical_location_id,
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;
15822: x_internal_org_location_id => l_physical_location_id,
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:
15857: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
15858: x_internal_org_location_id => l_physical_location_id,
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;
15858: x_internal_org_location_id => l_physical_location_id,
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:
15913: p_internal_cust_location_id => l_trip_assigned_dels(l).ultimate_dropoff_location_id,
15914: x_internal_org_location_id => l_physical_location_id,
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;
15914: x_internal_org_location_id => l_physical_location_id,
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:
15948: p_internal_cust_location_id => l_trip_dlvy_lines(l).ship_to_location_id,
15949: x_internal_org_location_id => l_physical_location_id,
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;
15949: x_internal_org_location_id => l_physical_location_id,
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:
15984: p_stop_table => p_trip_incl_stops,
15985: x_sort_stop_table => l_trip_incl_stops_sort,
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;
15985: x_sort_stop_table => l_trip_incl_stops_sort,
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:
16050: WSH_CARRIERS_GRP.get_carrier_service_mode(
16051: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
16052: x_return_status => l_return_status);
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;
16051: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
16052: x_return_status => l_return_status);
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;
16052: x_return_status => l_return_status);
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;
16081: p_vehicle_org_id => p_trip_info(j).VEHICLE_ORGANIZATION_ID,
16082: x_vehicle_type_id => l_vehicle_type,
16083: x_return_status => l_return_status);
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;
16082: x_vehicle_type_id => l_vehicle_type,
16083: x_return_status => l_return_status);
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,
16083: x_return_status => l_return_status);
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);
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);
16093: FND_MESSAGE.SET_NAME('WSH','WSH_VEHICLE_TYPE_UNDEFINED');
16094: FND_MESSAGE.SET_TOKEN('ITEM',l_vehicle_name);
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);
16093: FND_MESSAGE.SET_NAME('WSH','WSH_VEHICLE_TYPE_UNDEFINED');
16094: FND_MESSAGE.SET_TOKEN('ITEM',l_vehicle_name);
16095: FND_MESSAGE.SET_TOKEN('ORGANIZATION',l_vehicle_org_name);
16096: FND_MSG_PUB.ADD;
16133: x_validate_result => l_validate_mode_result,
16134: x_failed_constraint => l_failed_constraints,
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;
16134: x_failed_constraint => l_failed_constraints,
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:
16161: x_validate_result => l_validate_carrier_result,
16162: x_failed_constraint => l_failed_constraints,
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;
16162: x_failed_constraint => l_failed_constraints,
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:
16189: x_validate_result => l_validate_vehicle_result,
16190: x_failed_constraint => l_failed_constraints,
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;
16190: x_failed_constraint => l_failed_constraints,
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:
16220: x_validate_result => l_validate_faccar_result,
16221: x_failed_constraint => l_failed_constraint,
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;
16221: x_failed_constraint => l_failed_constraint,
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:
16250: x_validate_result => l_validate_facmod_result,
16251: x_failed_constraint => l_failed_constraint,
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;
16251: x_failed_constraint => l_failed_constraint,
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:
16280: x_validate_result => l_validate_facveh_result,
16281: x_failed_constraint => l_failed_constraint,
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;
16281: x_failed_constraint => l_failed_constraint,
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:
16381: x_validate_result => l_validate_mode_result,
16382: x_failed_constraint => l_failed_constraints,
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;
16382: x_failed_constraint => l_failed_constraints,
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:
16410: x_validate_result => l_validate_carrier_result,
16411: x_failed_constraint => l_failed_constraints,
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;
16411: x_failed_constraint => l_failed_constraints,
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:
16439: x_validate_result => l_validate_vehicle_result,
16440: x_failed_constraint => l_failed_constraints,
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;
16440: x_failed_constraint => l_failed_constraints,
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:
16471: x_validate_result => l_validate_itmmod_result,
16472: x_failed_constraint => l_failed_constraint, -- id
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;
16472: x_failed_constraint => l_failed_constraint, -- id
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:
16502: x_validate_result => l_validate_itmcar_result,
16503: x_failed_constraint => l_failed_constraint, -- id
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;
16503: x_failed_constraint => l_failed_constraint, -- id
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:
16533: x_validate_result => l_validate_itmveh_result,
16534: x_failed_constraint => l_failed_constraint, -- id
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;
16534: x_failed_constraint => l_failed_constraint, -- id
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:
16585: x_msg_count => x_msg_count,
16586: x_msg_data => x_msg_data,
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;
16586: x_msg_data => x_msg_data,
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:
16592: END IF;
16593: END IF;
16594:
16595: IF x_validate_result = 'F' THEN
16596: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
16597: ELSIF l_failed_constraints.COUNT > 0 THEN
16598: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
16599: END IF;
16600:
16594:
16595: IF x_validate_result = 'F' THEN
16596: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
16597: ELSIF l_failed_constraints.COUNT > 0 THEN
16598: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
16599: END IF;
16600:
16601: --
16602: IF l_debug_on THEN
16606: --
16607:
16608: EXCEPTION
16609: WHEN g_get_carrmode_failed THEN
16610: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
16611: --
16612: IF l_debug_on THEN
16613: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
16614: END IF;
16613: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
16614: END IF;
16615: --
16616: WHEN g_get_vehicletype_failed THEN
16617: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
16618: --
16619: IF l_debug_on THEN
16620: WSH_DEBUG_SV.pop(l_module_name,' get vehicletype failed ');
16621: END IF;
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);
16628: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
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,
16677: x_fail_stops OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
16678: x_validate_result OUT NOCOPY VARCHAR2,
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,
16677: x_fail_stops OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
16678: x_validate_result OUT NOCOPY VARCHAR2,
16679: x_msg_count OUT NOCOPY NUMBER,
16680: x_msg_data OUT NOCOPY VARCHAR2,
16681: x_return_status OUT NOCOPY VARCHAR2)
16729: l_out_object2_num NUMBER:=0;
16730: l_out_object2_char VARCHAR2(30):=NULL;
16731: l_added_stop BOOLEAN := FALSE;
16732: l_return_status VARCHAR2(1);
16733: l_comp_class_tab WSH_UTIL_CORE.Column_Tab_Type;
16734: l_failed_constraint line_constraint_rec_type;
16735: l_failed_constraints line_constraint_tab_type;
16736: l_failed_constraints_dummy line_constraint_tab_type;
16737: l_validate_faccar_result VARCHAR2(1) := 'S';
16760: l_pickup_stop_seq NUMBER := 0;
16761: l_dropoff_stop_seq NUMBER := 0;
16762: l_pu_pa_date DATE;
16763: l_do_pa_date DATE;
16764: l_sibling_locations WSH_UTIL_CORE.id_tab_type;
16765: l_old_stop_location_id NUMBER := NULL;
16766: l_old_stop_seq_num NUMBER := -999;
16767: l_old_stop_pa_date DATE;
16768: l_mustuse_loc_id NUMBER := NULL;
16785: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'validate_constraint_stop';
16786:
16787: BEGIN
16788:
16789: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
16790: x_validate_result := 'S';
16791:
16792: g_itm_mustuse_cache.DELETE;
16793: g_itmloc_mustuse_cache.DELETE;
16804: END IF;
16805:
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;
16805:
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:
16861: p_stop_table => p_stop_info,
16862: x_sort_stop_table => l_stop_info,
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;
16862: x_sort_stop_table => l_stop_info,
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:
17014: WSH_CARRIERS_GRP.get_carrier_service_mode(
17015: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
17016: x_return_status => l_return_status);
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;
17015: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
17016: x_return_status => l_return_status);
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;
17016: x_return_status => l_return_status);
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;
17047: p_vehicle_org_id => l_parent_trip_info(k).vehicle_organization_id,
17048: x_vehicle_type_id => l_vehicle_type,
17049: x_return_status => l_return_status);
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;
17048: x_vehicle_type_id => l_vehicle_type,
17049: x_return_status => l_return_status);
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,
17049: x_return_status => l_return_status);
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);
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);
17059: FND_MESSAGE.SET_NAME('WSH','WSH_VEHICLE_TYPE_UNDEFINED');
17060: FND_MESSAGE.SET_TOKEN('ITEM',l_vehicle_name);
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);
17059: FND_MESSAGE.SET_NAME('WSH','WSH_VEHICLE_TYPE_UNDEFINED');
17060: FND_MESSAGE.SET_TOKEN('ITEM',l_vehicle_name);
17061: FND_MESSAGE.SET_TOKEN('ORGANIZATION',l_vehicle_org_name);
17062: FND_MSG_PUB.ADD;
17083: x_validate_result => l_validate_mode_result,
17084: x_failed_constraint => l_failed_constraints,
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;
17084: x_failed_constraint => l_failed_constraints,
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:
17112: x_validate_result => l_validate_carrier_result,
17113: x_failed_constraint => l_failed_constraints,
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;
17113: x_failed_constraint => l_failed_constraints,
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:
17141: x_validate_result => l_validate_vehicle_result,
17142: x_failed_constraint => l_failed_constraints,
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;
17142: x_failed_constraint => l_failed_constraints,
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:
17175: x_validate_result => l_validate_faccar_result,
17176: x_failed_constraint => l_failed_constraint,
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;
17176: x_failed_constraint => l_failed_constraint,
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:
17203: x_validate_result => l_validate_facmod_result,
17204: x_failed_constraint => l_failed_constraint,
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;
17204: x_failed_constraint => l_failed_constraint,
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:
17232: x_validate_result => l_validate_facveh_result,
17233: x_failed_constraint => l_failed_constraint,
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;
17233: x_failed_constraint => l_failed_constraint,
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:
17334: x_msg_count => x_msg_count,
17335: x_msg_data => x_msg_data,
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;
17335: x_msg_data => x_msg_data,
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:
17341: END IF;
17342: END IF;
17343:
17344: IF x_validate_result = 'F' THEN
17345: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
17346: ELSIF
17347: l_failed_constraints.COUNT > 0 THEN
17348:
17349: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
17345: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
17346: ELSIF
17347: l_failed_constraints.COUNT > 0 THEN
17348:
17349: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
17350: END IF;
17351:
17352: --
17353: IF l_debug_on THEN
17357: --
17358:
17359: EXCEPTION
17360: WHEN g_get_carrmode_failed THEN
17361: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
17362: --
17363: IF l_debug_on THEN
17364: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
17365: END IF;
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);
17372: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
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);
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');
17408: x_return_status OUT NOCOPY VARCHAR2
17409: )
17410:
17411: IS
17412: l_validate_result VARCHAR2(1) := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17413: l_return_status VARCHAR2(1) := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17414: l_failed_constraint WSH_FTE_CONSTRAINT_FRAMEWORK.line_constraint_rec_type;
17415: l_details_info WSH_FTE_CONSTRAINT_FRAMEWORK.detail_ccinfo_tab_type;
17416: i_det NUMBER;
17409: )
17410:
17411: IS
17412: l_validate_result VARCHAR2(1) := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17413: l_return_status VARCHAR2(1) := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17414: l_failed_constraint WSH_FTE_CONSTRAINT_FRAMEWORK.line_constraint_rec_type;
17415: l_details_info WSH_FTE_CONSTRAINT_FRAMEWORK.detail_ccinfo_tab_type;
17416: i_det NUMBER;
17417: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'validate_exclusive_constraints';
17445: AND wda.delivery_id = c_delivery_id;
17446:
17447: BEGIN
17448:
17449: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17450: x_validate_result := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17451:
17452: IF l_debug_on THEN
17453: wsh_debug_sv.push (l_module_name);
17446:
17447: BEGIN
17448:
17449: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17450: x_validate_result := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17451:
17452: IF l_debug_on THEN
17453: wsh_debug_sv.push (l_module_name);
17454: END IF;
17471: x_validate_result => l_validate_result,
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
17481: wsh_debug_sv.logmsg (l_module_name, 'Customer FAC-FAC l_validate_result: '||l_validate_result);
17482: END IF;
17483:
17484: IF l_validate_result = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
17485: x_return_status := l_return_status;
17486: x_validate_result := l_validate_result;
17487:
17488: IF l_debug_on THEN
17518: x_validate_result => l_validate_result,
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
17526: IF l_debug_on THEN
17527: wsh_debug_sv.logmsg (l_module_name, 'CUS-FAC l_validate_result: '||l_validate_result);
17528: END IF;
17529:
17530: IF l_validate_result = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
17531: x_return_status := l_return_status;
17532: x_validate_result := l_validate_result;
17533: IF l_debug_on THEN
17534: wsh_debug_sv.push(l_module_name);
17556: x_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
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);
17566: END IF;
17567:
17568: IF l_validate_result = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
17569: x_return_status := l_return_status;
17570: x_validate_result := l_validate_result;
17571: IF l_debug_on THEN
17572: wsh_debug_sv.logmsg(l_module_name, 'Region/Zone - Facility Constraint Violation Error. Ship to Location'||p_delivery_rec.ultimate_dropoff_location_id||' can not use '||p_rule_deconsol_location|| ' as deconsolidation location');
17591: x_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
17599: IF l_debug_on THEN
17600: wsh_debug_sv.logmsg (l_module_name, 'ORG - FAC l_validate_result: '||l_validate_result);
17601: END IF;
17602:
17603: IF l_validate_result = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
17604: x_return_status := l_return_status;
17605: x_validate_result := l_validate_result;
17606: IF l_debug_on THEN
17607: wsh_debug_sv.push(l_module_name);
17626: p_org_id => p_delivery_rec.organization_id,
17627: x_location_id => l_location_id,
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;
17627: x_location_id => l_location_id,
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:
17639: x_validate_result => l_validate_result,
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
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);
17649: END IF;
17650:
17651: IF l_validate_result = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
17652: x_return_status := l_return_status;
17653: x_validate_result := l_validate_result;
17654: IF l_debug_on THEN
17655: wsh_debug_sv.logmsg(l_module_name, 'Region/Zone - Facility Constraint Violation Error. Ship to Location'||p_delivery_rec.ultimate_dropoff_location_id||' can not use '||p_rule_deconsol_location|| ' as deconsolidation location');
17687: x_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
17695: IF l_debug_on THEN
17696: wsh_debug_sv.logmsg (l_module_name, 'ITM - FAC l_validate_result: '||l_validate_result);
17697: END IF;
17698:
17699: IF l_validate_result = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
17700: x_return_status := l_return_status;
17701: x_validate_result := l_validate_result;
17702: IF l_debug_on THEN
17703: wsh_debug_sv.push(l_module_name);
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);
17733: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
17736: WHEN OTHERS THEN
17737: IF c_get_details%ISOPEN THEN
17738: CLOSE c_get_details;
17739: END IF;
17740: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_exclusive_constraints');
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);
17737: IF c_get_details%ISOPEN THEN
17738: CLOSE c_get_details;
17739: END IF;
17740: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_exclusive_constraints');
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');
17771: IS
17772: l_ship_from_location_id NUMBER;
17773: l_ship_to_location_id NUMBER;
17774: l_customer_id NUMBER;
17775: l_region_tab WSH_UTIL_CORE.ID_TAB_TYPE;
17776: l_zone_tab WSH_UTIL_CORE.ID_TAB_TYPE;
17777: l_deconsol_location NUMBER;
17778: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
17779: r_itr NUMBER;
17772: l_ship_from_location_id NUMBER;
17773: l_ship_to_location_id NUMBER;
17774: l_customer_id NUMBER;
17775: l_region_tab WSH_UTIL_CORE.ID_TAB_TYPE;
17776: l_zone_tab WSH_UTIL_CORE.ID_TAB_TYPE;
17777: l_deconsol_location NUMBER;
17778: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
17779: r_itr NUMBER;
17780: z_itr NUMBER;
17817: ORDER BY creation_date;
17818:
17819: BEGIN
17820:
17821: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17822:
17823: IF l_debug_on THEN
17824: wsh_debug_sv.push(l_module_name);
17825: END IF;
17885: p_lang_code => USERENV('LANG'),
17886: x_region_tab => l_region_tab,
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;
17886: x_region_tab => l_region_tab,
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:
17916: p_region_id => l_region_id,
17917: x_zone_tab => l_zone_tab,
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;
17917: x_zone_tab => l_zone_tab,
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:
18008: p_org_id => p_delivery_rec.organization_id,
18009: x_location_id => l_ship_from_location_id,
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;*/
18009: x_location_id => l_ship_from_location_id,
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:
18054: p_org_id => p_delivery_rec.organization_id,
18055: x_location_id => l_ship_from_location_id,
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;
18055: x_location_id => l_ship_from_location_id,
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:
18081: p_lang_code => USERENV('LANG'),
18082: x_region_tab => l_region_tab,
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;
18082: x_region_tab => l_region_tab,
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:
18112: p_region_id => l_region_id,
18113: x_zone_tab => l_zone_tab,
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;
18113: x_zone_tab => l_zone_tab,
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:
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);
18167: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
18177: IF c_get_region_incl_constraints%ISOPEN THEN
18178: CLOSE c_get_region_incl_constraints;
18179: END IF;
18180:
18181: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_must_use_facility');
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);
18178: CLOSE c_get_region_incl_constraints;
18179: END IF;
18180:
18181: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_must_use_facility');
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');
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,
18245: p_rule_to_zone_id IN NUMBER DEFAULT NULL,
18246: p_caller IN VARCHAR2 DEFAULT NULL,
18305: WHERE wnd.delivery_id = c_delivery_id;
18306:
18307: BEGIN
18308:
18309: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
18310:
18311: refresh_cache(l_return_status);
18312:
18313: IF l_debug_on THEN
18337: p_internal_cust_location_id => p_delivery_info(i).ultimate_dropoff_location_id,
18338: x_internal_org_location_id => l_physical_location_id,
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;
18338: x_internal_org_location_id => l_physical_location_id,
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:
18401: --{
18402: IF l_debug_on THEN
18403: WSH_DEBUG_SV.logmsg(l_module_name,'p_rule_override_deconsol = TRUE AND p_rule_deconsol_location IS NULL');
18404: END IF;
18405: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
18406: IF l_debug_on THEN
18407: wsh_debug_sv.pop (l_module_name);
18408: END IF;
18409: return;
18429: WSH_DEBUG_SV.logmsg(l_module_name,'VALIDATE_EXCLUSIVE_CONSTRAINTS l_validate_result : '||l_validate_result);
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;
18496: WSH_DEBUG_SV.logmsg(l_module_name,'VALIDATE_EXCLUSIVE_CONSTRAINTS_validate_result : '||l_validate_result);
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;
18534: get_must_use_facility(p_delivery_rec => p_delivery_info(rec_cnt),
18535: x_deconsol_location => l_rule_deconsol_location,
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;
18535: x_deconsol_location => l_rule_deconsol_location,
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:
18547: p_rule_deconsol_location => l_rule_deconsol_location,
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;
18590: p_caller => p_caller,
18591: x_region_consol_tab => l_region_tab,
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;
18591: x_region_consol_tab => l_region_tab,
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:
18616: p_rule_deconsol_location => l_rule_deconsol_location,
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;
18680: p_caller => p_caller,
18681: x_region_consol_tab => l_region_tab,
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;
18681: x_region_consol_tab => l_region_tab,
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:
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);
18750: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
18756: END IF;
18757: IF c_get_dlvy%ISOPEN THEN
18758: CLOSE c_get_dlvy;
18759: END IF;
18760: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_deconsol');
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);
18757: IF c_get_dlvy%ISOPEN THEN
18758: CLOSE c_get_dlvy;
18759: END IF;
18760: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_deconsol');
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');