[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)
11681:
11682: BEGIN
11683:
11684: x_validate_result := 'S';
11685: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
11686:
11687: g_itm_mustuse_cache.DELETE;
11688: g_itmloc_mustuse_cache.DELETE;
11689: g_itm_exclusive_cache.DELETE;
11710: END IF;
11711:
11712: refresh_cache(l_return_status);
11713:
11714: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11715: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11716: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11717: END IF;
11718: END IF;
11711:
11712: refresh_cache(l_return_status);
11713:
11714: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11715: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11716: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11717: END IF;
11718: END IF;
11719:
11785: p_internal_cust_location_id => l_delivery_info(i).ultimate_dropoff_location_id,
11786: x_internal_org_location_id => l_physical_location_id,
11787: x_return_status => l_return_status);
11788:
11789: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11790: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11791: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11792: END IF;
11793: END IF;
11786: x_internal_org_location_id => l_physical_location_id,
11787: x_return_status => l_return_status);
11788:
11789: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11790: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11791: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11792: END IF;
11793: END IF;
11794:
11885: p_internal_cust_location_id => l_delivery_info(i).ultimate_dropoff_location_id,
11886: x_internal_org_location_id => l_physical_location_id,
11887: x_return_status => l_return_status);
11888:
11889: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11890: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11891: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11892: END IF;
11893: END IF;
11886: x_internal_org_location_id => l_physical_location_id,
11887: x_return_status => l_return_status);
11888:
11889: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
11890: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
11891: raise FND_API.G_EXC_UNEXPECTED_ERROR;
11892: END IF;
11893: END IF;
11894:
12004: p_internal_cust_location_id => l_dlvy_assigned_lines(j).ship_to_location_id,
12005: x_internal_org_location_id => l_physical_location_id,
12006: x_return_status => l_return_status);
12007:
12008: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12009: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12010: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12011: END IF;
12012: END IF;
12005: x_internal_org_location_id => l_physical_location_id,
12006: x_return_status => l_return_status);
12007:
12008: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12009: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12010: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12011: END IF;
12012: END IF;
12013:
12065: p_internal_cust_location_id => l_dlvy_assigned_lines(i).ship_to_location_id,
12066: x_internal_org_location_id => l_physical_location_id,
12067: x_return_status => l_return_status);
12068:
12069: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12070: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12071: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12072: END IF;
12073: END IF;
12066: x_internal_org_location_id => l_physical_location_id,
12067: x_return_status => l_return_status);
12068:
12069: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12070: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12071: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12072: END IF;
12073: END IF;
12074:
12105: p_internal_cust_location_id => l_delivery_rec.ultimate_dropoff_location_id,
12106: x_internal_org_location_id => l_physical_location_id,
12107: x_return_status => l_return_status);
12108:
12109: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12110: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12111: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12112: END IF;
12113: END IF;
12106: x_internal_org_location_id => l_physical_location_id,
12107: x_return_status => l_return_status);
12108:
12109: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12110: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12111: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12112: END IF;
12113: END IF;
12114:
12139: p_internal_cust_location_id => l_target_trip_assign_dels(l).ultimate_dropoff_location_id,
12140: x_internal_org_location_id => l_physical_location_id,
12141: x_return_status => l_return_status);
12142:
12143: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12144: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12145: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12146: END IF;
12147: END IF;
12140: x_internal_org_location_id => l_physical_location_id,
12141: x_return_status => l_return_status);
12142:
12143: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12144: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12145: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12146: END IF;
12147: END IF;
12148:
12175: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
12176: x_internal_org_location_id => l_physical_location_id,
12177: x_return_status => l_return_status);
12178:
12179: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12180: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12181: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12182: END IF;
12183: END IF;
12176: x_internal_org_location_id => l_physical_location_id,
12177: x_return_status => l_return_status);
12178:
12179: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12180: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12181: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12182: END IF;
12183: END IF;
12184:
12209: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
12210: x_internal_org_location_id => l_physical_location_id,
12211: x_return_status => l_return_status);
12212:
12213: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12214: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12215: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12216: END IF;
12217: END IF;
12210: x_internal_org_location_id => l_physical_location_id,
12211: x_return_status => l_return_status);
12212:
12213: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12214: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12215: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12216: END IF;
12217: END IF;
12218:
12243: p_internal_cust_location_id => l_target_trip_dlvy_lines(l).ship_to_location_id,
12244: x_internal_org_location_id => l_physical_location_id,
12245: x_return_status => l_return_status);
12246:
12247: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12248: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12249: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12250: END IF;
12251: END IF;
12244: x_internal_org_location_id => l_physical_location_id,
12245: x_return_status => l_return_status);
12246:
12247: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12248: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12249: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12250: END IF;
12251: END IF;
12252:
12293: x_sort_stop_table => l_target_trip_incl_sort_stops,
12294: x_return_status => l_return_status);
12295:
12296:
12297: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12298: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12299: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12300: END IF;
12301: END IF;
12294: x_return_status => l_return_status);
12295:
12296:
12297: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12298: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12299: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12300: END IF;
12301: END IF;
12302:
12350: p_internal_cust_location_id => p_target_tripstops.pickup_location_id,
12351: x_internal_org_location_id => l_physical_location_id,
12352: x_return_status => l_return_status);
12353:
12354: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12355: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12356: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12357: END IF;
12358: END IF;
12351: x_internal_org_location_id => l_physical_location_id,
12352: x_return_status => l_return_status);
12353:
12354: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12355: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12356: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12357: END IF;
12358: END IF;
12359:
12372: p_internal_cust_location_id => p_target_tripstops.dropoff_location_id,
12373: x_internal_org_location_id => l_physical_location_id,
12374: x_return_status => l_return_status);
12375:
12376: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12377: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12378: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12379: END IF;
12380: END IF;
12373: x_internal_org_location_id => l_physical_location_id,
12374: x_return_status => l_return_status);
12375:
12376: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12377: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12378: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12379: END IF;
12380: END IF;
12381:
12469: WSH_CARRIERS_GRP.get_carrier_service_mode(
12470: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
12471: x_return_status => l_return_status);
12472:
12473: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12474: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12475: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
12476: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12477: END IF;
12470: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
12471: x_return_status => l_return_status);
12472:
12473: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12474: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12475: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
12476: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12477: END IF;
12478: raise g_get_carrmode_failed;
12471: x_return_status => l_return_status);
12472:
12473: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12474: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12475: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
12476: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12477: END IF;
12478: raise g_get_carrmode_failed;
12479: END IF;
12503: p_vehicle_org_id => l_target_trip.VEHICLE_ORGANIZATION_ID,
12504: x_vehicle_type_id => l_vehicle_type,
12505: x_return_status => l_return_status);
12506:
12507: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12508: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12509: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
12510: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12511: END IF;
12504: x_vehicle_type_id => l_vehicle_type,
12505: x_return_status => l_return_status);
12506:
12507: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12508: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12509: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
12510: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12511: END IF;
12512: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => l_target_trip.VEHICLE_ITEM_ID,
12505: x_return_status => l_return_status);
12506:
12507: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12508: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12509: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
12510: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12511: END IF;
12512: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => l_target_trip.VEHICLE_ITEM_ID,
12513: p_organization_id => l_target_trip.VEHICLE_ORGANIZATION_ID);
12508: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12509: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
12510: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12511: END IF;
12512: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => l_target_trip.VEHICLE_ITEM_ID,
12513: p_organization_id => l_target_trip.VEHICLE_ORGANIZATION_ID);
12514: l_vehicle_org_name := WSH_UTIL_CORE.get_org_name (p_organization_id => l_target_trip.VEHICLE_ORGANIZATION_ID);
12515: FND_MESSAGE.SET_NAME('WSH','WSH_VEHICLE_TYPE_UNDEFINED');
12516: FND_MESSAGE.SET_TOKEN('ITEM',l_vehicle_name);
12510: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12511: END IF;
12512: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => l_target_trip.VEHICLE_ITEM_ID,
12513: p_organization_id => l_target_trip.VEHICLE_ORGANIZATION_ID);
12514: l_vehicle_org_name := WSH_UTIL_CORE.get_org_name (p_organization_id => l_target_trip.VEHICLE_ORGANIZATION_ID);
12515: FND_MESSAGE.SET_NAME('WSH','WSH_VEHICLE_TYPE_UNDEFINED');
12516: FND_MESSAGE.SET_TOKEN('ITEM',l_vehicle_name);
12517: FND_MESSAGE.SET_TOKEN('ORGANIZATION',l_vehicle_org_name);
12518: FND_MSG_PUB.ADD;
12572: x_validate_result => l_validate_vehicle_result,
12573: x_failed_constraint => l_failed_constraint,
12574: x_return_status => l_return_status);
12575:
12576: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12577: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12578: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12579: END IF;
12580: END IF;
12573: x_failed_constraint => l_failed_constraint,
12574: x_return_status => l_return_status);
12575:
12576: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12577: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12578: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12579: END IF;
12580: END IF;
12581:
12603: x_validate_result => l_validate_carrier_result,
12604: x_failed_constraint => l_failed_constraint,
12605: x_return_status => l_return_status);
12606:
12607: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12608: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12609: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12610: END IF;
12611: END IF;
12604: x_failed_constraint => l_failed_constraint,
12605: x_return_status => l_return_status);
12606:
12607: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12608: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12609: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12610: END IF;
12611: END IF;
12612:
12634: x_validate_result => l_validate_mode_result,
12635: x_failed_constraint => l_failed_constraint,
12636: x_return_status => l_return_status);
12637:
12638: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12639: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12640: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12641: END IF;
12642: END IF;
12635: x_failed_constraint => l_failed_constraint,
12636: x_return_status => l_return_status);
12637:
12638: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12639: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12640: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12641: END IF;
12642: END IF;
12643:
12724: WSH_DEBUG_SV.logmsg(l_module_name,'Called search_matching_group return status : '||l_return_status||' Group found ? '||l_group_id);
12725: END IF;
12726: --
12727:
12728: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12729: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12730: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12731: END IF;
12732: END IF;
12725: END IF;
12726: --
12727:
12728: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12729: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12730: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12731: END IF;
12732: END IF;
12733:
12746: WSH_DEBUG_SV.logmsg(l_module_name,'Called create_valid_entity_group return status : '||l_return_status);
12747: END IF;
12748: --
12749:
12750: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12751: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12752: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12753: END IF;
12754: END IF;
12747: END IF;
12748: --
12749:
12750: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12751: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12752: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12753: END IF;
12754: END IF;
12755:
12784: WSH_DEBUG_SV.logmsg(l_module_name,'Called check_dlvy_against_trip return status : '||l_return_status||' validate result : '||l_validate_result);
12785: END IF;
12786: --
12787:
12788: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12789: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12790: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12791: END IF;
12792: END IF;
12785: END IF;
12786: --
12787:
12788: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12789: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12790: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12791: END IF;
12792: END IF;
12793:
12790: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12791: END IF;
12792: END IF;
12793:
12794: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,WSH_UTIL_CORE.G_RET_STS_WARNING)
12795: THEN
12796: IF l_validate_result = 'F' THEN
12797: -- Remove delivery from the line group
12798: -- add to the failed lines
12839: WSH_DEBUG_SV.logmsg(l_module_name,'Called check_upd_dlvy return status : '||l_return_status||' validate result : '||l_validate_result);
12840: END IF;
12841: --
12842:
12843: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12844: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12845:
12846: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12847: END IF;
12840: END IF;
12841: --
12842:
12843: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12844: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12845:
12846: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12847: END IF;
12848: END IF;
12846: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12847: END IF;
12848: END IF;
12849:
12850: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_SUCCESS,WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
12851:
12852: IF l_validate_result = 'F' THEN
12853: -- Remove delivery from the line group
12854: -- add to the failed lines
12932: WSH_DEBUG_SV.logmsg(l_module_name,'Called validate_positive_constraint return status : '||l_return_status);
12933: END IF;
12934: --
12935:
12936: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12937: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12938: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12939: END IF;
12940: END IF;
12933: END IF;
12934: --
12935:
12936: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
12937: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
12938: raise FND_API.G_EXC_UNEXPECTED_ERROR;
12939: END IF;
12940: END IF;
12941:
13044: WSH_DEBUG_SV.logmsg(l_module_name,'Called stack_messages return status : '||l_return_status);
13045: END IF;
13046: --
13047:
13048: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13049: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13050: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13051: END IF;
13052: END IF;
13045: END IF;
13046: --
13047:
13048: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13049: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13050: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13051: END IF;
13052: END IF;
13053:
13055: -- x_failed_lines.COUNT = 0 in case of assign delivery to trip
13056: -- Means there is violation for input pickup/dropoff stop/location
13057:
13058: IF x_validate_result = 'F' THEN
13059: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13060:
13061: ELSIF l_failed_constraints.COUNT > 0 THEN
13062:
13063: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
13059: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
13060:
13061: ELSIF l_failed_constraints.COUNT > 0 THEN
13062:
13063: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
13064: END IF;
13065:
13066:
13067: --
13071: --
13072:
13073: EXCEPTION
13074: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
13075: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
13076: --
13077: IF l_debug_on THEN
13078: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13079: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
13079: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
13080: END IF;
13081: --
13082: WHEN others THEN
13083: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_dlvy');
13084: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
13085: --
13086: IF l_debug_on THEN
13087: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13080: END IF;
13081: --
13082: WHEN others THEN
13083: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_dlvy');
13084: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
13085: --
13086: IF l_debug_on THEN
13087: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
13088: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
13116:
13117: PROCEDURE validate_constraint_dleg(
13118: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
13119: p_action_code IN VARCHAR2 DEFAULT NULL,
13120: p_exception_list IN WSH_UTIL_CORE.Column_Tab_Type,
13121: p_delivery_leg_rec IN dleg_ccinfo_rec_type,
13122: p_target_trip IN trip_ccinfo_tab_type,
13123: p_target_lane IN lane_ccinfo_tab_type,
13124: x_succ_trips OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
13120: p_exception_list IN WSH_UTIL_CORE.Column_Tab_Type,
13121: p_delivery_leg_rec IN dleg_ccinfo_rec_type,
13122: p_target_trip IN trip_ccinfo_tab_type,
13123: p_target_lane IN lane_ccinfo_tab_type,
13124: x_succ_trips OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
13125: x_succ_lanes OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
13126: x_validate_result OUT NOCOPY VARCHAR2,
13127: x_msg_count OUT NOCOPY NUMBER,
13128: x_msg_data OUT NOCOPY VARCHAR2,
13121: p_delivery_leg_rec IN dleg_ccinfo_rec_type,
13122: p_target_trip IN trip_ccinfo_tab_type,
13123: p_target_lane IN lane_ccinfo_tab_type,
13124: x_succ_trips OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
13125: x_succ_lanes OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
13126: x_validate_result OUT NOCOPY VARCHAR2,
13127: x_msg_count OUT NOCOPY NUMBER,
13128: x_msg_data OUT NOCOPY VARCHAR2,
13129: x_return_status OUT NOCOPY VARCHAR2)
13169: l_validate_itmveh_result VARCHAR2(1) := 'S';
13170: l_validate_itmmod_result VARCHAR2(1) := 'S';
13171: l_validate_result VARCHAR2(1) := 'S';
13172:
13173: l_comp_class_tab WSH_UTIL_CORE.Column_Tab_Type;
13174: l_detail_rec detail_ccinfo_rec_type;
13175: l_dlvy_rec delivery_ccinfo_rec_type;
13176: l_dleg_dlvy_rec delivery_ccinfo_rec_type;
13177: l_stop_rec stop_ccinfo_rec_type;
13192: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'validate_constraint_dleg';
13193:
13194: BEGIN
13195: x_validate_result := 'S';
13196: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
13197:
13198: g_itm_mustuse_cache.DELETE;
13199: g_itmloc_mustuse_cache.DELETE;
13200: g_itm_exclusive_cache.DELETE;
13210: END IF;
13211:
13212: refresh_cache(l_return_status);
13213:
13214: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13215: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13216: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13217: END IF;
13218: END IF;
13211:
13212: refresh_cache(l_return_status);
13213:
13214: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13215: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13216: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13217: END IF;
13218: END IF;
13219:
13301: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
13302: x_internal_org_location_id => l_physical_location_id,
13303: x_return_status => l_return_status);
13304:
13305: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13306: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13307: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13308: END IF;
13309: END IF;
13302: x_internal_org_location_id => l_physical_location_id,
13303: x_return_status => l_return_status);
13304:
13305: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13306: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13307: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13308: END IF;
13309: END IF;
13310:
13339: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
13340: x_internal_org_location_id => l_physical_location_id,
13341: x_return_status => l_return_status);
13342:
13343: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13344: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13345: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13346: END IF;
13347: END IF;
13340: x_internal_org_location_id => l_physical_location_id,
13341: x_return_status => l_return_status);
13342:
13343: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13344: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13345: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13346: END IF;
13347: END IF;
13348:
13376: p_internal_cust_location_id => l_dleg_dlvy_rec.ultimate_dropoff_location_id,
13377: x_internal_org_location_id => l_physical_location_id,
13378: x_return_status => l_return_status);
13379:
13380: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13381: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13382: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13383: END IF;
13384: END IF;
13377: x_internal_org_location_id => l_physical_location_id,
13378: x_return_status => l_return_status);
13379:
13380: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13381: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13382: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13383: END IF;
13384: END IF;
13385:
13405: p_internal_cust_location_id => p_delivery_leg_rec.dropoffstop_location_id,
13406: x_internal_org_location_id => l_physical_location_id,
13407: x_return_status => l_return_status);
13408:
13409: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13410: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13411: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13412: END IF;
13413: END IF;
13406: x_internal_org_location_id => l_physical_location_id,
13407: x_return_status => l_return_status);
13408:
13409: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13410: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13411: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13412: END IF;
13413: END IF;
13414:
13460: x_validate_result => l_validate_carrier_result,
13461: x_failed_constraint => l_failed_constraints,
13462: x_return_status => l_return_status);
13463:
13464: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13465: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13466: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13467: END IF;
13468: END IF;
13461: x_failed_constraint => l_failed_constraints,
13462: x_return_status => l_return_status);
13463:
13464: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13465: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13466: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13467: END IF;
13468: END IF;
13469:
13486: x_validate_result => l_validate_carrier_result,
13487: x_failed_constraint => l_failed_constraints,
13488: x_return_status => l_return_status);
13489:
13490: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13491: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13492: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13493: END IF;
13494: END IF;
13487: x_failed_constraint => l_failed_constraints,
13488: x_return_status => l_return_status);
13489:
13490: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13491: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13492: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13493: END IF;
13494: END IF;
13495:
13516: x_validate_result => l_validate_mode_result,
13517: x_failed_constraint => l_failed_constraints,
13518: x_return_status => l_return_status);
13519:
13520: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13521: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13522: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13523: END IF;
13524: END IF;
13517: x_failed_constraint => l_failed_constraints,
13518: x_return_status => l_return_status);
13519:
13520: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13521: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13522: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13523: END IF;
13524: END IF;
13525:
13542: x_validate_result => l_validate_mode_result,
13543: x_failed_constraint => l_failed_constraints,
13544: x_return_status => l_return_status);
13545:
13546: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13547: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13548: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13549: END IF;
13550: END IF;
13543: x_failed_constraint => l_failed_constraints,
13544: x_return_status => l_return_status);
13545:
13546: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13547: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13548: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13549: END IF;
13550: END IF;
13551:
13575: x_validate_result => l_validate_faccar_result,
13576: x_failed_constraint => l_failed_constraint,
13577: x_return_status => l_return_status);
13578:
13579: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13580: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13581: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13582: END IF;
13583: END IF;
13576: x_failed_constraint => l_failed_constraint,
13577: x_return_status => l_return_status);
13578:
13579: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13580: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13581: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13582: END IF;
13583: END IF;
13584:
13604: x_validate_result => l_validate_faccar_result,
13605: x_failed_constraint => l_failed_constraint,
13606: x_return_status => l_return_status);
13607:
13608: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13609: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13610: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13611: END IF;
13612: END IF;
13605: x_failed_constraint => l_failed_constraint,
13606: x_return_status => l_return_status);
13607:
13608: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13609: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13610: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13611: END IF;
13612: END IF;
13613:
13637: x_validate_result => l_validate_facmod_result,
13638: x_failed_constraint => l_failed_constraint,
13639: x_return_status => l_return_status);
13640:
13641: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13642: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13643: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13644: END IF;
13645: END IF;
13638: x_failed_constraint => l_failed_constraint,
13639: x_return_status => l_return_status);
13640:
13641: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13642: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13643: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13644: END IF;
13645: END IF;
13646:
13666: x_validate_result => l_validate_facmod_result,
13667: x_failed_constraint => l_failed_constraint,
13668: x_return_status => l_return_status);
13669:
13670: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13671: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13672: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13673: END IF;
13674: END IF;
13667: x_failed_constraint => l_failed_constraint,
13668: x_return_status => l_return_status);
13669:
13670: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13671: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13672: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13673: END IF;
13674: END IF;
13675:
13712: x_validate_result => l_validate_carrier_result,
13713: x_failed_constraint => l_failed_constraints,
13714: x_return_status => l_return_status);
13715:
13716: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13717: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13718: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13719: END IF;
13720: END IF;
13713: x_failed_constraint => l_failed_constraints,
13714: x_return_status => l_return_status);
13715:
13716: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13717: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13718: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13719: END IF;
13720: END IF;
13721:
13743: x_validate_result => l_validate_mode_result,
13744: x_failed_constraint => l_failed_constraints,
13745: x_return_status => l_return_status);
13746:
13747: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13748: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13749: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13750: END IF;
13751: END IF;
13744: x_failed_constraint => l_failed_constraints,
13745: x_return_status => l_return_status);
13746:
13747: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13748: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13749: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13750: END IF;
13751: END IF;
13752:
13770: x_validate_result => l_validate_itmmod_result,
13771: x_failed_constraint => l_failed_constraint,
13772: x_return_status => l_return_status);
13773:
13774: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13775: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13776: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13777: END IF;
13778: END IF;
13771: x_failed_constraint => l_failed_constraint,
13772: x_return_status => l_return_status);
13773:
13774: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13775: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13776: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13777: END IF;
13778: END IF;
13779:
13807: x_validate_result => l_validate_itmcar_result,
13808: x_failed_constraint => l_failed_constraint,
13809: x_return_status => l_return_status);
13810:
13811: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13812: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13813: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13814: END IF;
13815: END IF;
13808: x_failed_constraint => l_failed_constraint,
13809: x_return_status => l_return_status);
13810:
13811: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13812: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13813: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13814: END IF;
13815: END IF;
13816:
13903: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
13904: x_internal_org_location_id => l_physical_location_id,
13905: x_return_status => l_return_status);
13906:
13907: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13908: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13909: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13910: END IF;
13911: END IF;
13904: x_internal_org_location_id => l_physical_location_id,
13905: x_return_status => l_return_status);
13906:
13907: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13908: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13909: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13910: END IF;
13911: END IF;
13912:
13941: p_internal_cust_location_id => l_dlvy_rec.ultimate_dropoff_location_id,
13942: x_internal_org_location_id => l_physical_location_id,
13943: x_return_status => l_return_status);
13944:
13945: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13946: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13947: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13948: END IF;
13949: END IF;
13942: x_internal_org_location_id => l_physical_location_id,
13943: x_return_status => l_return_status);
13944:
13945: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
13946: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
13947: raise FND_API.G_EXC_UNEXPECTED_ERROR;
13948: END IF;
13949: END IF;
13950:
14017: WSH_DEBUG_SV.logmsg(l_module_name,'Called create_valid_entity_group return status : '||l_return_status);
14018: END IF;
14019: --
14020:
14021: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14022: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14023: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14024: END IF;
14025: END IF;
14018: END IF;
14019: --
14020:
14021: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14022: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14023: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14024: END IF;
14025: END IF;
14026:
14043: WSH_DEBUG_SV.logmsg(l_module_name,'l_failed_lines count : '||l_failed_lines.COUNT);
14044: END IF;
14045: --
14046:
14047: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14048: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14049: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14050: END IF;
14051: ELSIF l_failed_lines.COUNT > 0 THEN
14044: END IF;
14045: --
14046:
14047: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14048: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14049: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14050: END IF;
14051: ELSIF l_failed_lines.COUNT > 0 THEN
14052: x_validate_result := 'F';
14069: x_failed_constraints => l_failed_constraints,
14070: x_validate_result => l_validate_excl_result,
14071: x_return_status => l_return_status);
14072:
14073: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14074: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14075: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14076: END IF;
14077: END IF;
14070: x_validate_result => l_validate_excl_result,
14071: x_return_status => l_return_status);
14072:
14073: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14074: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14075: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14076: END IF;
14077: END IF;
14078:
14118: x_validate_result => l_validate_faccar_result,
14119: x_failed_constraint => l_failed_constraint,
14120: x_return_status => l_return_status);
14121:
14122: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14123: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14124: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14125: END IF;
14126: END IF;
14119: x_failed_constraint => l_failed_constraint,
14120: x_return_status => l_return_status);
14121:
14122: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14123: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14124: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14125: END IF;
14126: END IF;
14127:
14147: x_validate_result => l_validate_faccar_result,
14148: x_failed_constraint => l_failed_constraint,
14149: x_return_status => l_return_status);
14150:
14151: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14152: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14153: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14154: END IF;
14155: END IF;
14148: x_failed_constraint => l_failed_constraint,
14149: x_return_status => l_return_status);
14150:
14151: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14152: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14153: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14154: END IF;
14155: END IF;
14156:
14180: x_validate_result => l_validate_facmod_result,
14181: x_failed_constraint => l_failed_constraint,
14182: x_return_status => l_return_status);
14183:
14184: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14185: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14186: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14187: END IF;
14188: END IF;
14181: x_failed_constraint => l_failed_constraint,
14182: x_return_status => l_return_status);
14183:
14184: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14185: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14186: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14187: END IF;
14188: END IF;
14189:
14209: x_validate_result => l_validate_facmod_result,
14210: x_failed_constraint => l_failed_constraint,
14211: x_return_status => l_return_status);
14212:
14213: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14214: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14215: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14216: END IF;
14217: END IF;
14210: x_failed_constraint => l_failed_constraint,
14211: x_return_status => l_return_status);
14212:
14213: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14214: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14215: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14216: END IF;
14217: END IF;
14218:
14243: x_failed_constraints => l_failed_constraints,
14244: x_validate_result => l_validate_result,
14245: x_return_status => l_return_status);
14246:
14247: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14248: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14249: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14250: END IF;
14251: END IF;
14244: x_validate_result => l_validate_result,
14245: x_return_status => l_return_status);
14246:
14247: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14248: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14249: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14250: END IF;
14251: END IF;
14252:
14264: x_msg_count => x_msg_count,
14265: x_msg_data => x_msg_data,
14266: x_return_status => l_return_status);
14267:
14268: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14269: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14270: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14271: END IF;
14272: END IF;
14265: x_msg_data => x_msg_data,
14266: x_return_status => l_return_status);
14267:
14268: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14269: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14270: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14271: END IF;
14272: END IF;
14273:
14271: END IF;
14272: END IF;
14273:
14274: IF x_validate_result = 'F' THEN
14275: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14276: ELSIF l_failed_constraints.COUNT > 0 THEN
14277: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
14278: END IF;
14279:
14273:
14274: IF x_validate_result = 'F' THEN
14275: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14276: ELSIF l_failed_constraints.COUNT > 0 THEN
14277: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
14278: END IF;
14279:
14280: --
14281: IF l_debug_on THEN
14284: --
14285:
14286: EXCEPTION
14287: WHEN g_get_carrmode_failed THEN
14288: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14289: --
14290: IF l_debug_on THEN
14291: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
14292: END IF;
14291: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
14292: END IF;
14293: --
14294: WHEN g_get_vehicletype_failed THEN
14295: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
14296: --
14297: IF l_debug_on THEN
14298: WSH_DEBUG_SV.pop(l_module_name,' get vehicletype failed ');
14299: END IF;
14298: WSH_DEBUG_SV.pop(l_module_name,' get vehicletype failed ');
14299: END IF;
14300: --
14301: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
14302: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
14303: --
14304: IF l_debug_on THEN
14305: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
14306: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
14306: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
14307: END IF;
14308: --
14309: WHEN others THEN
14310: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_dleg');
14311: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
14312: --
14313: IF l_debug_on THEN
14314: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
14307: END IF;
14308: --
14309: WHEN others THEN
14310: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_dleg');
14311: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
14312: --
14313: IF l_debug_on THEN
14314: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
14315: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
14360:
14361: PROCEDURE validate_constraint_dlvb(
14362: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
14363: p_action_code IN VARCHAR2 DEFAULT NULL,
14364: p_exception_list IN WSH_UTIL_CORE.Column_Tab_Type,
14365: p_in_ids IN WSH_UTIL_CORE.id_tab_type,
14366: p_del_detail_info IN detail_ccinfo_tab_type,
14367: p_target_delivery IN delivery_ccinfo_rec_type,
14368: p_target_container IN detail_ccinfo_rec_type,
14361: PROCEDURE validate_constraint_dlvb(
14362: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
14363: p_action_code IN VARCHAR2 DEFAULT NULL,
14364: p_exception_list IN WSH_UTIL_CORE.Column_Tab_Type,
14365: p_in_ids IN WSH_UTIL_CORE.id_tab_type,
14366: p_del_detail_info IN detail_ccinfo_tab_type,
14367: p_target_delivery IN delivery_ccinfo_rec_type,
14368: p_target_container IN detail_ccinfo_rec_type,
14369: p_dlvy_assigned_lines IN detail_ccinfo_tab_type,
14444: l_validate_intmed_result VARCHAR2(1);
14445: l_input_comp_class BOOLEAN := FALSE;
14446: l_input_assign_lines BOOLEAN := FALSE;
14447: l_item_check_cus BOOLEAN := FALSE;
14448: l_comp_class_tab WSH_UTIL_CORE.Column_Tab_Type;
14449: l_detail_rec detail_ccinfo_rec_type;
14450: l_line_group_rec WSH_FTE_COMP_CONSTRAINT_PKG.line_group_rec_type;
14451: l_linegroup_rec WSH_FTE_COMP_CONSTRAINT_PKG.cc_group_rec_type;
14452: l_failed_constraint line_constraint_rec_type;
14456: l_validate_itmin_result VARCHAR2(1);
14457: l_inp_items_cnt NUMBER := 0;
14458: l_validate_itmfacin_result VARCHAR2(1) := 'S';
14459: l_items_tab item_tab_type;
14460: l_locations_list WSH_UTIL_CORE.id_tab_type;
14461: l_supp_control_tab WSH_UTIL_CORE.id_tab_type;
14462: l_target_delivery delivery_ccinfo_rec_type;
14463: l_target_container detail_ccinfo_rec_type;
14464: l_del_detail_info detail_ccinfo_tab_type;
14457: l_inp_items_cnt NUMBER := 0;
14458: l_validate_itmfacin_result VARCHAR2(1) := 'S';
14459: l_items_tab item_tab_type;
14460: l_locations_list WSH_UTIL_CORE.id_tab_type;
14461: l_supp_control_tab WSH_UTIL_CORE.id_tab_type;
14462: l_target_delivery delivery_ccinfo_rec_type;
14463: l_target_container detail_ccinfo_rec_type;
14464: l_del_detail_info detail_ccinfo_tab_type;
14465: l_dlvy_assigned_lines detail_ccinfo_tab_type;
14477:
14478: BEGIN
14479:
14480: x_validate_result := 'S'; -- Constraint Validation result : S / F
14481: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
14482:
14483: g_itm_mustuse_cache.DELETE;
14484: g_itmloc_mustuse_cache.DELETE;
14485: g_itm_exclusive_cache.DELETE;
14504: END IF;
14505:
14506: refresh_cache(l_return_status);
14507:
14508: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14509: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14510: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14511: END IF;
14512: END IF;
14505:
14506: refresh_cache(l_return_status);
14507:
14508: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14509: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14510: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14511: END IF;
14512: END IF;
14513:
14578: p_internal_cust_location_id => l_del_detail_info(i).ship_to_location_id,
14579: x_internal_org_location_id => l_physical_location_id,
14580: x_return_status => l_return_status);
14581:
14582: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14583: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14584: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14585: END IF;
14586: END IF;
14579: x_internal_org_location_id => l_physical_location_id,
14580: x_return_status => l_return_status);
14581:
14582: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14583: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14584: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14585: END IF;
14586: END IF;
14587:
14642: p_internal_cust_location_id => l_del_detail_info(i).ship_to_location_id,
14643: x_internal_org_location_id => l_physical_location_id,
14644: x_return_status => l_return_status);
14645:
14646: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14647: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14648: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14649: END IF;
14650: END IF;
14643: x_internal_org_location_id => l_physical_location_id,
14644: x_return_status => l_return_status);
14645:
14646: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14647: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14648: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14649: END IF;
14650: END IF;
14651:
14680: p_internal_cust_location_id => l_target_delivery.ultimate_dropoff_location_id,
14681: x_internal_org_location_id => l_physical_location_id,
14682: x_return_status => l_return_status);
14683:
14684: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14685: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14686: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14687: END IF;
14688: END IF;
14681: x_internal_org_location_id => l_physical_location_id,
14682: x_return_status => l_return_status);
14683:
14684: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14685: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14686: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14687: END IF;
14688: END IF;
14689:
14714: p_internal_cust_location_id => l_target_container.ship_to_location_id,
14715: x_internal_org_location_id => l_physical_location_id,
14716: x_return_status => l_return_status);
14717:
14718: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14719: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14720: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14721: END IF;
14722: END IF;
14715: x_internal_org_location_id => l_physical_location_id,
14716: x_return_status => l_return_status);
14717:
14718: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14719: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14720: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14721: END IF;
14722: END IF;
14723:
14751: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
14752: x_internal_org_location_id => l_physical_location_id,
14753: x_return_status => l_return_status);
14754:
14755: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14756: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14757: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14758: END IF;
14759: END IF;
14752: x_internal_org_location_id => l_physical_location_id,
14753: x_return_status => l_return_status);
14754:
14755: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14756: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14757: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14758: END IF;
14759: END IF;
14760:
14784: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
14785: x_internal_org_location_id => l_physical_location_id,
14786: x_return_status => l_return_status);
14787:
14788: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14789: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14790: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14791: END IF;
14792: END IF;
14785: x_internal_org_location_id => l_physical_location_id,
14786: x_return_status => l_return_status);
14787:
14788: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14789: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14790: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14791: END IF;
14792: END IF;
14793:
14821: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
14822: x_internal_org_location_id => l_physical_location_id,
14823: x_return_status => l_return_status);
14824:
14825: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14826: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14827: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14828: END IF;
14829: END IF;
14822: x_internal_org_location_id => l_physical_location_id,
14823: x_return_status => l_return_status);
14824:
14825: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14826: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14827: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14828: END IF;
14829: END IF;
14830:
14885: p_internal_cust_location_id => l_dlvy_assigned_lines(i).ship_to_location_id,
14886: x_internal_org_location_id => l_physical_location_id,
14887: x_return_status => l_return_status);
14888:
14889: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14890: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14891: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14892: END IF;
14893: END IF;
14886: x_internal_org_location_id => l_physical_location_id,
14887: x_return_status => l_return_status);
14888:
14889: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14890: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14891: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14892: END IF;
14893: END IF;
14894:
14987: x_validate_result => l_validate_itmfacin_result,
14988: x_failed_constraints => l_failed_constraints,
14989: x_return_status => l_return_status);
14990:
14991: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14992: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14993: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14994: END IF;
14995: END IF;
14988: x_failed_constraints => l_failed_constraints,
14989: x_return_status => l_return_status);
14990:
14991: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
14992: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
14993: raise FND_API.G_EXC_UNEXPECTED_ERROR;
14994: END IF;
14995: END IF;
14996:
15036: WSH_DEBUG_SV.logmsg(l_module_name,'Called search_matching_group return status : '||l_return_status||' Group found ? '||l_group_id);
15037: END IF;
15038: --
15039:
15040: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15041: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15042: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15043: END IF;
15044: END IF;
15037: END IF;
15038: --
15039:
15040: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15041: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15042: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15043: END IF;
15044: END IF;
15045:
15062: WSH_DEBUG_SV.logmsg(l_module_name,'Called create_valid_entity_group return status : '||l_return_status);
15063: END IF;
15064: --
15065:
15066: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15067: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15068: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15069: END IF;
15070: END IF;
15063: END IF;
15064: --
15065:
15066: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15067: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15068: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15069: END IF;
15070: END IF;
15071: END IF;
15111: x_validate_result => l_validate_customer_result,
15112: x_failed_constraint => l_failed_constraint,
15113: x_return_status => l_return_status);
15114:
15115: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15116: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15117: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15118: END IF;
15119: END IF;
15112: x_failed_constraint => l_failed_constraint,
15113: x_return_status => l_return_status);
15114:
15115: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15116: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15117: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15118: END IF;
15119: END IF;
15120:
15168: x_validate_result => l_validate_customer_result,
15169: x_failed_constraint => l_failed_constraint,
15170: x_return_status => l_return_status);
15171:
15172: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15173: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15174:
15175: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15176: END IF;
15169: x_failed_constraint => l_failed_constraint,
15170: x_return_status => l_return_status);
15171:
15172: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15173: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15174:
15175: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15176: END IF;
15177: END IF;
15222: x_validate_result => l_validate_itmin_result,
15223: x_failed_constraints => l_failed_constraints,
15224: x_return_status => l_return_status);
15225:
15226: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15227: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15228: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15229: END IF;
15230: END IF;
15223: x_failed_constraints => l_failed_constraints,
15224: x_return_status => l_return_status);
15225:
15226: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15227: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15228: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15229: END IF;
15230: END IF;
15231:
15277: WSH_CARRIERS_GRP.get_carrier_service_mode(
15278: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
15279: x_return_status => l_return_status);
15280:
15281: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15282: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15283: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
15284: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15285: END IF;
15278: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
15279: x_return_status => l_return_status);
15280:
15281: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15282: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15283: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
15284: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15285: END IF;
15286: raise g_get_carrmode_failed;
15279: x_return_status => l_return_status);
15280:
15281: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15282: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15283: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
15284: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15285: END IF;
15286: raise g_get_carrmode_failed;
15287: END IF;
15301: WSH_CARRIERS_GRP.get_carrier_service_mode(
15302: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
15303: x_return_status => l_return_status);
15304:
15305: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15306: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15307: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
15308: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15309: END IF;
15302: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
15303: x_return_status => l_return_status);
15304:
15305: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15306: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15307: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
15308: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15309: END IF;
15310: raise g_get_carrmode_failed;
15303: x_return_status => l_return_status);
15304:
15305: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15306: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15307: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
15308: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15309: END IF;
15310: raise g_get_carrmode_failed;
15311: END IF;
15328: x_validate_result => l_validate_carrier_result,
15329: x_failed_constraint => l_failed_constraint,
15330: x_return_status => l_return_status);
15331:
15332: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15333: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15334: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15335: END IF;
15336: END IF;
15329: x_failed_constraint => l_failed_constraint,
15330: x_return_status => l_return_status);
15331:
15332: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15333: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15334: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15335: END IF;
15336: END IF;
15337:
15369: x_validate_result => l_validate_mode_result,
15370: x_failed_constraint => l_failed_constraint,
15371: x_return_status => l_return_status);
15372:
15373: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15374: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15375: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15376: END IF;
15377: END IF;
15370: x_failed_constraint => l_failed_constraint,
15371: x_return_status => l_return_status);
15372:
15373: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15374: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15375: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15376: END IF;
15377: END IF;
15378:
15414: x_validate_result => l_validate_carrier_result,
15415: x_failed_constraint => l_failed_constraint,
15416: x_return_status => l_return_status);
15417:
15418: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15419: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15420: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15421: END IF;
15422: END IF;
15415: x_failed_constraint => l_failed_constraint,
15416: x_return_status => l_return_status);
15417:
15418: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15419: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15420: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15421: END IF;
15422: END IF;
15423:
15441: x_validate_result => l_validate_carrier_result,
15442: x_failed_constraint => l_failed_constraint,
15443: x_return_status => l_return_status);
15444:
15445: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15446: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15447: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15448: END IF;
15449: END IF;
15442: x_failed_constraint => l_failed_constraint,
15443: x_return_status => l_return_status);
15444:
15445: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15446: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15447: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15448: END IF;
15449: END IF;
15450:
15474: x_validate_result => l_validate_mode_result,
15475: x_failed_constraint => l_failed_constraint,
15476: x_return_status => l_return_status);
15477:
15478: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15479: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15480: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15481: END IF;
15482: END IF;
15475: x_failed_constraint => l_failed_constraint,
15476: x_return_status => l_return_status);
15477:
15478: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15479: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15480: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15481: END IF;
15482: END IF;
15483:
15500: x_validate_result => l_validate_mode_result,
15501: x_failed_constraint => l_failed_constraint,
15502: x_return_status => l_return_status);
15503:
15504: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15505: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15506: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15507: END IF;
15508: END IF;
15501: x_failed_constraint => l_failed_constraint,
15502: x_return_status => l_return_status);
15503:
15504: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15505: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15506: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15507: END IF;
15508: END IF;
15509:
15603: x_msg_count => x_msg_count,
15604: x_msg_data => x_msg_data,
15605: x_return_status => l_return_status);
15606:
15607: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15608: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15609: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15610: END IF;
15611: END IF;
15604: x_msg_data => x_msg_data,
15605: x_return_status => l_return_status);
15606:
15607: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15608: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15609: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15610: END IF;
15611: END IF;
15612:
15610: END IF;
15611: END IF;
15612:
15613: IF x_validate_result = 'F' THEN
15614: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
15615: ELSIF l_failed_constraints.COUNT > 0 THEN
15616: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
15617: END IF;
15618:
15612:
15613: IF x_validate_result = 'F' THEN
15614: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
15615: ELSIF l_failed_constraints.COUNT > 0 THEN
15616: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
15617: END IF;
15618:
15619: --
15620: IF l_debug_on THEN
15623: --
15624:
15625: EXCEPTION
15626: WHEN g_get_carrmode_failed THEN
15627: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
15628: --
15629: IF l_debug_on THEN
15630: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
15631: END IF;
15630: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
15631: END IF;
15632: --
15633: WHEN g_invalid_action_code THEN
15634: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
15635: --
15636: IF l_debug_on THEN
15637: WSH_DEBUG_SV.pop(l_module_name,' invalid_action_code ');
15638: END IF;
15637: WSH_DEBUG_SV.pop(l_module_name,' invalid_action_code ');
15638: END IF;
15639: --
15640: WHEN g_invalid_input THEN
15641: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
15642: --
15643: IF l_debug_on THEN
15644: WSH_DEBUG_SV.pop(l_module_name,' invalid_input ');
15645: END IF;
15645: END IF;
15646: --
15647:
15648: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
15649: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
15650: --
15651: IF l_debug_on THEN
15652: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
15653: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
15653: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
15654: END IF;
15655: --
15656: WHEN others THEN
15657: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_dlvb');
15658: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
15659: --
15660: IF l_debug_on THEN
15661: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
15654: END IF;
15655: --
15656: WHEN others THEN
15657: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_dlvb');
15658: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
15659: --
15660: IF l_debug_on THEN
15661: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
15662: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
15693:
15694: PROCEDURE validate_constraint_trip(
15695: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
15696: p_action_code IN VARCHAR2 DEFAULT NULL,
15697: p_exception_list IN WSH_UTIL_CORE.Column_Tab_Type,
15698: p_trip_info IN trip_ccinfo_tab_type,
15699: p_trip_assigned_dels IN delivery_ccinfo_tab_type,
15700: p_trip_dlvy_lines IN detail_ccinfo_tab_type,
15701: p_trip_incl_stops IN stop_ccinfo_tab_type,
15698: p_trip_info IN trip_ccinfo_tab_type,
15699: p_trip_assigned_dels IN delivery_ccinfo_tab_type,
15700: p_trip_dlvy_lines IN detail_ccinfo_tab_type,
15701: p_trip_incl_stops IN stop_ccinfo_tab_type,
15702: x_fail_trips OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
15703: x_validate_result OUT NOCOPY VARCHAR2,
15704: x_msg_count OUT NOCOPY NUMBER,
15705: x_msg_data OUT NOCOPY VARCHAR2,
15706: x_return_status OUT NOCOPY VARCHAR2)
15718: l_trip_detail_cnt NUMBER := 0;
15719: l_trip_stops_cnt NUMBER := 0;
15720: l_out_object2_num NUMBER:=0;
15721: l_out_object2_char VARCHAR2(30):=NULL;
15722: l_comp_class_tab WSH_UTIL_CORE.Column_Tab_Type;
15723: l_return_status VARCHAR2(1);
15724: l_failed_constraint line_constraint_rec_type;
15725: l_failed_constraints line_constraint_tab_type;
15726: l_curr_trip_added BOOLEAN := FALSE;
15756: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'validate_constraint_trip';
15757:
15758: BEGIN
15759:
15760: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
15761: x_validate_result := 'S';
15762:
15763: g_itm_mustuse_cache.DELETE;
15764: g_itmloc_mustuse_cache.DELETE;
15775: END IF;
15776:
15777: refresh_cache(l_return_status);
15778:
15779: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15780: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15781: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15782: END IF;
15783: END IF;
15776:
15777: refresh_cache(l_return_status);
15778:
15779: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15780: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15781: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15782: END IF;
15783: END IF;
15784:
15816: p_internal_cust_location_id => l_delivery_rec.ultimate_dropoff_location_id,
15817: x_internal_org_location_id => l_physical_location_id,
15818: x_return_status => l_return_status);
15819:
15820: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15821: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15822: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15823: END IF;
15824: END IF;
15817: x_internal_org_location_id => l_physical_location_id,
15818: x_return_status => l_return_status);
15819:
15820: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15821: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15822: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15823: END IF;
15824: END IF;
15825:
15852: p_internal_cust_location_id => l_detail_rec.ship_to_location_id,
15853: x_internal_org_location_id => l_physical_location_id,
15854: x_return_status => l_return_status);
15855:
15856: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15857: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15858: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15859: END IF;
15860: END IF;
15853: x_internal_org_location_id => l_physical_location_id,
15854: x_return_status => l_return_status);
15855:
15856: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15857: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15858: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15859: END IF;
15860: END IF;
15861:
15908: p_internal_cust_location_id => l_trip_assigned_dels(l).ultimate_dropoff_location_id,
15909: x_internal_org_location_id => l_physical_location_id,
15910: x_return_status => l_return_status);
15911:
15912: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15913: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15914: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15915: END IF;
15916: END IF;
15909: x_internal_org_location_id => l_physical_location_id,
15910: x_return_status => l_return_status);
15911:
15912: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15913: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15914: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15915: END IF;
15916: END IF;
15917:
15943: p_internal_cust_location_id => l_trip_dlvy_lines(l).ship_to_location_id,
15944: x_internal_org_location_id => l_physical_location_id,
15945: x_return_status => l_return_status);
15946:
15947: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15948: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15949: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15950: END IF;
15951: END IF;
15944: x_internal_org_location_id => l_physical_location_id,
15945: x_return_status => l_return_status);
15946:
15947: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15948: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15949: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15950: END IF;
15951: END IF;
15952:
15979: p_stop_table => p_trip_incl_stops,
15980: x_sort_stop_table => l_trip_incl_stops_sort,
15981: x_return_status => l_return_status);
15982:
15983: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15984: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15985: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15986: END IF;
15987: END IF;
15980: x_sort_stop_table => l_trip_incl_stops_sort,
15981: x_return_status => l_return_status);
15982:
15983: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
15984: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
15985: raise FND_API.G_EXC_UNEXPECTED_ERROR;
15986: END IF;
15987: END IF;
15988:
16045: WSH_CARRIERS_GRP.get_carrier_service_mode(
16046: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
16047: x_return_status => l_return_status);
16048:
16049: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16050: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16051: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
16052: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16053: END IF;
16046: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
16047: x_return_status => l_return_status);
16048:
16049: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16050: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16051: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
16052: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16053: END IF;
16054: raise g_get_carrmode_failed;
16047: x_return_status => l_return_status);
16048:
16049: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16050: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16051: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
16052: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16053: END IF;
16054: raise g_get_carrmode_failed;
16055: END IF;
16076: p_vehicle_org_id => p_trip_info(j).VEHICLE_ORGANIZATION_ID,
16077: x_vehicle_type_id => l_vehicle_type,
16078: x_return_status => l_return_status);
16079:
16080: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16081: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16082: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
16083: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16084: END IF;
16077: x_vehicle_type_id => l_vehicle_type,
16078: x_return_status => l_return_status);
16079:
16080: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16081: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16082: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
16083: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16084: END IF;
16085: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => p_trip_info(j).VEHICLE_ITEM_ID,
16078: x_return_status => l_return_status);
16079:
16080: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16081: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16082: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
16083: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16084: END IF;
16085: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => p_trip_info(j).VEHICLE_ITEM_ID,
16086: p_organization_id => p_trip_info(j).VEHICLE_ORGANIZATION_ID);
16081: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16082: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
16083: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16084: END IF;
16085: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => p_trip_info(j).VEHICLE_ITEM_ID,
16086: p_organization_id => p_trip_info(j).VEHICLE_ORGANIZATION_ID);
16087: l_vehicle_org_name := WSH_UTIL_CORE.get_org_name (p_organization_id => p_trip_info(j).VEHICLE_ORGANIZATION_ID);
16088: FND_MESSAGE.SET_NAME('WSH','WSH_VEHICLE_TYPE_UNDEFINED');
16089: FND_MESSAGE.SET_TOKEN('ITEM',l_vehicle_name);
16083: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16084: END IF;
16085: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => p_trip_info(j).VEHICLE_ITEM_ID,
16086: p_organization_id => p_trip_info(j).VEHICLE_ORGANIZATION_ID);
16087: l_vehicle_org_name := WSH_UTIL_CORE.get_org_name (p_organization_id => p_trip_info(j).VEHICLE_ORGANIZATION_ID);
16088: FND_MESSAGE.SET_NAME('WSH','WSH_VEHICLE_TYPE_UNDEFINED');
16089: FND_MESSAGE.SET_TOKEN('ITEM',l_vehicle_name);
16090: FND_MESSAGE.SET_TOKEN('ORGANIZATION',l_vehicle_org_name);
16091: FND_MSG_PUB.ADD;
16128: x_validate_result => l_validate_mode_result,
16129: x_failed_constraint => l_failed_constraints,
16130: x_return_status => l_return_status);
16131:
16132: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16133: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16134: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16135: END IF;
16136: END IF;
16129: x_failed_constraint => l_failed_constraints,
16130: x_return_status => l_return_status);
16131:
16132: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16133: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16134: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16135: END IF;
16136: END IF;
16137:
16156: x_validate_result => l_validate_carrier_result,
16157: x_failed_constraint => l_failed_constraints,
16158: x_return_status => l_return_status);
16159:
16160: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16161: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16162: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16163: END IF;
16164: END IF;
16157: x_failed_constraint => l_failed_constraints,
16158: x_return_status => l_return_status);
16159:
16160: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16161: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16162: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16163: END IF;
16164: END IF;
16165:
16184: x_validate_result => l_validate_vehicle_result,
16185: x_failed_constraint => l_failed_constraints,
16186: x_return_status => l_return_status);
16187:
16188: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16189: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16190: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16191: END IF;
16192: END IF;
16185: x_failed_constraint => l_failed_constraints,
16186: x_return_status => l_return_status);
16187:
16188: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16189: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16190: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16191: END IF;
16192: END IF;
16193:
16215: x_validate_result => l_validate_faccar_result,
16216: x_failed_constraint => l_failed_constraint,
16217: x_return_status => l_return_status);
16218:
16219: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16220: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16221: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16222: END IF;
16223: END IF;
16216: x_failed_constraint => l_failed_constraint,
16217: x_return_status => l_return_status);
16218:
16219: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16220: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16221: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16222: END IF;
16223: END IF;
16224:
16245: x_validate_result => l_validate_facmod_result,
16246: x_failed_constraint => l_failed_constraint,
16247: x_return_status => l_return_status);
16248:
16249: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16250: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16251: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16252: END IF;
16253: END IF;
16246: x_failed_constraint => l_failed_constraint,
16247: x_return_status => l_return_status);
16248:
16249: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16250: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16251: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16252: END IF;
16253: END IF;
16254:
16275: x_validate_result => l_validate_facveh_result,
16276: x_failed_constraint => l_failed_constraint,
16277: x_return_status => l_return_status);
16278:
16279: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16280: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16281: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16282: END IF;
16283: END IF;
16276: x_failed_constraint => l_failed_constraint,
16277: x_return_status => l_return_status);
16278:
16279: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16280: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16281: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16282: END IF;
16283: END IF;
16284:
16376: x_validate_result => l_validate_mode_result,
16377: x_failed_constraint => l_failed_constraints,
16378: x_return_status => l_return_status);
16379:
16380: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16381: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16382: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16383: END IF;
16384: END IF;
16377: x_failed_constraint => l_failed_constraints,
16378: x_return_status => l_return_status);
16379:
16380: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16381: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16382: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16383: END IF;
16384: END IF;
16385:
16405: x_validate_result => l_validate_carrier_result,
16406: x_failed_constraint => l_failed_constraints,
16407: x_return_status => l_return_status);
16408:
16409: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16410: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16411: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16412: END IF;
16413: END IF;
16406: x_failed_constraint => l_failed_constraints,
16407: x_return_status => l_return_status);
16408:
16409: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16410: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16411: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16412: END IF;
16413: END IF;
16414:
16434: x_validate_result => l_validate_vehicle_result,
16435: x_failed_constraint => l_failed_constraints,
16436: x_return_status => l_return_status);
16437:
16438: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16439: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16440: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16441: END IF;
16442: END IF;
16435: x_failed_constraint => l_failed_constraints,
16436: x_return_status => l_return_status);
16437:
16438: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16439: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16440: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16441: END IF;
16442: END IF;
16443:
16466: x_validate_result => l_validate_itmmod_result,
16467: x_failed_constraint => l_failed_constraint, -- id
16468: x_return_status => l_return_status);
16469:
16470: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16471: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16472: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16473: END IF;
16474: END IF;
16467: x_failed_constraint => l_failed_constraint, -- id
16468: x_return_status => l_return_status);
16469:
16470: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16471: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16472: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16473: END IF;
16474: END IF;
16475:
16497: x_validate_result => l_validate_itmcar_result,
16498: x_failed_constraint => l_failed_constraint, -- id
16499: x_return_status => l_return_status);
16500:
16501: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16502: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16503: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16504: END IF;
16505: END IF;
16498: x_failed_constraint => l_failed_constraint, -- id
16499: x_return_status => l_return_status);
16500:
16501: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16502: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16503: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16504: END IF;
16505: END IF;
16506:
16528: x_validate_result => l_validate_itmveh_result,
16529: x_failed_constraint => l_failed_constraint, -- id
16530: x_return_status => l_return_status);
16531:
16532: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16533: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16534: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16535: END IF;
16536: END IF;
16529: x_failed_constraint => l_failed_constraint, -- id
16530: x_return_status => l_return_status);
16531:
16532: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16533: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16534: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16535: END IF;
16536: END IF;
16537:
16580: x_msg_count => x_msg_count,
16581: x_msg_data => x_msg_data,
16582: x_return_status => l_return_status);
16583:
16584: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16585: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16586: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16587: END IF;
16588: END IF;
16581: x_msg_data => x_msg_data,
16582: x_return_status => l_return_status);
16583:
16584: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16585: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16586: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16587: END IF;
16588: END IF;
16589:
16587: END IF;
16588: END IF;
16589:
16590: IF x_validate_result = 'F' THEN
16591: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
16592: ELSIF l_failed_constraints.COUNT > 0 THEN
16593: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
16594: END IF;
16595:
16589:
16590: IF x_validate_result = 'F' THEN
16591: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
16592: ELSIF l_failed_constraints.COUNT > 0 THEN
16593: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
16594: END IF;
16595:
16596: --
16597: IF l_debug_on THEN
16601: --
16602:
16603: EXCEPTION
16604: WHEN g_get_carrmode_failed THEN
16605: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
16606: --
16607: IF l_debug_on THEN
16608: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
16609: END IF;
16608: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
16609: END IF;
16610: --
16611: WHEN g_get_vehicletype_failed THEN
16612: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
16613: --
16614: IF l_debug_on THEN
16615: WSH_DEBUG_SV.pop(l_module_name,' get vehicletype failed ');
16616: END IF;
16615: WSH_DEBUG_SV.pop(l_module_name,' get vehicletype failed ');
16616: END IF;
16617: --
16618: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
16619: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
16620: --
16621: IF l_debug_on THEN
16622: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
16623: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
16623: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
16624: END IF;
16625: --
16626: WHEN others THEN
16627: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_trip');
16628: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
16629: --
16630: IF l_debug_on THEN
16631: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
16624: END IF;
16625: --
16626: WHEN others THEN
16627: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_trip');
16628: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
16629: --
16630: IF l_debug_on THEN
16631: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
16632: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
16665:
16666: PROCEDURE validate_constraint_stop(
16667: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
16668: p_action_code IN VARCHAR2 DEFAULT NULL,
16669: p_exception_list IN WSH_UTIL_CORE.Column_Tab_Type,
16670: p_stop_info IN stop_ccinfo_tab_type,
16671: p_parent_trip_info IN trip_ccinfo_tab_type,
16672: x_fail_stops OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
16673: x_validate_result OUT NOCOPY VARCHAR2,
16668: p_action_code IN VARCHAR2 DEFAULT NULL,
16669: p_exception_list IN WSH_UTIL_CORE.Column_Tab_Type,
16670: p_stop_info IN stop_ccinfo_tab_type,
16671: p_parent_trip_info IN trip_ccinfo_tab_type,
16672: x_fail_stops OUT NOCOPY WSH_UTIL_CORE.id_tab_type,
16673: x_validate_result OUT NOCOPY VARCHAR2,
16674: x_msg_count OUT NOCOPY NUMBER,
16675: x_msg_data OUT NOCOPY VARCHAR2,
16676: x_return_status OUT NOCOPY VARCHAR2)
16724: l_out_object2_num NUMBER:=0;
16725: l_out_object2_char VARCHAR2(30):=NULL;
16726: l_added_stop BOOLEAN := FALSE;
16727: l_return_status VARCHAR2(1);
16728: l_comp_class_tab WSH_UTIL_CORE.Column_Tab_Type;
16729: l_failed_constraint line_constraint_rec_type;
16730: l_failed_constraints line_constraint_tab_type;
16731: l_failed_constraints_dummy line_constraint_tab_type;
16732: l_validate_faccar_result VARCHAR2(1) := 'S';
16755: l_pickup_stop_seq NUMBER := 0;
16756: l_dropoff_stop_seq NUMBER := 0;
16757: l_pu_pa_date DATE;
16758: l_do_pa_date DATE;
16759: l_sibling_locations WSH_UTIL_CORE.id_tab_type;
16760: l_old_stop_location_id NUMBER := NULL;
16761: l_old_stop_seq_num NUMBER := -999;
16762: l_old_stop_pa_date DATE;
16763: l_mustuse_loc_id NUMBER := NULL;
16780: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'validate_constraint_stop';
16781:
16782: BEGIN
16783:
16784: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
16785: x_validate_result := 'S';
16786:
16787: g_itm_mustuse_cache.DELETE;
16788: g_itmloc_mustuse_cache.DELETE;
16799: END IF;
16800:
16801: refresh_cache(l_return_status);
16802:
16803: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16804: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16805: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16806: END IF;
16807: END IF;
16800:
16801: refresh_cache(l_return_status);
16802:
16803: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16804: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16805: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16806: END IF;
16807: END IF;
16808:
16856: p_stop_table => p_stop_info,
16857: x_sort_stop_table => l_stop_info,
16858: x_return_status => l_return_status);
16859:
16860: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16861: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16862: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16863: END IF;
16864: END IF;
16857: x_sort_stop_table => l_stop_info,
16858: x_return_status => l_return_status);
16859:
16860: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
16861: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
16862: raise FND_API.G_EXC_UNEXPECTED_ERROR;
16863: END IF;
16864: END IF;
16865:
17009: WSH_CARRIERS_GRP.get_carrier_service_mode(
17010: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
17011: x_return_status => l_return_status);
17012:
17013: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17014: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17015: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
17016: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17017: END IF;
17010: p_carrier_service_inout_rec => l_carrier_service_inout_rec,
17011: x_return_status => l_return_status);
17012:
17013: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17014: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17015: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
17016: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17017: END IF;
17018: raise g_get_carrmode_failed;
17011: x_return_status => l_return_status);
17012:
17013: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17014: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17015: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
17016: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17017: END IF;
17018: raise g_get_carrmode_failed;
17019: END IF;
17042: p_vehicle_org_id => l_parent_trip_info(k).vehicle_organization_id,
17043: x_vehicle_type_id => l_vehicle_type,
17044: x_return_status => l_return_status);
17045:
17046: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17047: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17048: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
17049: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17050: END IF;
17043: x_vehicle_type_id => l_vehicle_type,
17044: x_return_status => l_return_status);
17045:
17046: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17047: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17048: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
17049: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17050: END IF;
17051: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => l_parent_trip_info(k).VEHICLE_ITEM_ID,
17044: x_return_status => l_return_status);
17045:
17046: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17047: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17048: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
17049: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17050: END IF;
17051: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => l_parent_trip_info(k).VEHICLE_ITEM_ID,
17052: p_organization_id => l_parent_trip_info(k).VEHICLE_ORGANIZATION_ID);
17047: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17048: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
17049: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17050: END IF;
17051: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => l_parent_trip_info(k).VEHICLE_ITEM_ID,
17052: p_organization_id => l_parent_trip_info(k).VEHICLE_ORGANIZATION_ID);
17053: l_vehicle_org_name := WSH_UTIL_CORE.get_org_name (p_organization_id => l_parent_trip_info(k).VEHICLE_ORGANIZATION_ID);
17054: FND_MESSAGE.SET_NAME('WSH','WSH_VEHICLE_TYPE_UNDEFINED');
17055: FND_MESSAGE.SET_TOKEN('ITEM',l_vehicle_name);
17049: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17050: END IF;
17051: l_vehicle_name := WSH_UTIL_CORE.get_item_name (p_item_id => l_parent_trip_info(k).VEHICLE_ITEM_ID,
17052: p_organization_id => l_parent_trip_info(k).VEHICLE_ORGANIZATION_ID);
17053: l_vehicle_org_name := WSH_UTIL_CORE.get_org_name (p_organization_id => l_parent_trip_info(k).VEHICLE_ORGANIZATION_ID);
17054: FND_MESSAGE.SET_NAME('WSH','WSH_VEHICLE_TYPE_UNDEFINED');
17055: FND_MESSAGE.SET_TOKEN('ITEM',l_vehicle_name);
17056: FND_MESSAGE.SET_TOKEN('ORGANIZATION',l_vehicle_org_name);
17057: FND_MSG_PUB.ADD;
17078: x_validate_result => l_validate_mode_result,
17079: x_failed_constraint => l_failed_constraints,
17080: x_return_status => l_return_status);
17081:
17082: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17083: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17084: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17085: END IF;
17086: END IF;
17079: x_failed_constraint => l_failed_constraints,
17080: x_return_status => l_return_status);
17081:
17082: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17083: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17084: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17085: END IF;
17086: END IF;
17087:
17107: x_validate_result => l_validate_carrier_result,
17108: x_failed_constraint => l_failed_constraints,
17109: x_return_status => l_return_status);
17110:
17111: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17112: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17113: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17114: END IF;
17115: END IF;
17108: x_failed_constraint => l_failed_constraints,
17109: x_return_status => l_return_status);
17110:
17111: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17112: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17113: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17114: END IF;
17115: END IF;
17116:
17136: x_validate_result => l_validate_vehicle_result,
17137: x_failed_constraint => l_failed_constraints,
17138: x_return_status => l_return_status);
17139:
17140: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17141: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17142: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17143: END IF;
17144: END IF;
17137: x_failed_constraint => l_failed_constraints,
17138: x_return_status => l_return_status);
17139:
17140: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17141: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17142: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17143: END IF;
17144: END IF;
17145:
17170: x_validate_result => l_validate_faccar_result,
17171: x_failed_constraint => l_failed_constraint,
17172: x_return_status => l_return_status);
17173:
17174: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17175: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17176: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17177: END IF;
17178: END IF;
17171: x_failed_constraint => l_failed_constraint,
17172: x_return_status => l_return_status);
17173:
17174: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17175: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17176: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17177: END IF;
17178: END IF;
17179:
17198: x_validate_result => l_validate_facmod_result,
17199: x_failed_constraint => l_failed_constraint,
17200: x_return_status => l_return_status);
17201:
17202: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17203: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17204: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17205: END IF;
17206: END IF;
17199: x_failed_constraint => l_failed_constraint,
17200: x_return_status => l_return_status);
17201:
17202: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17203: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17204: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17205: END IF;
17206: END IF;
17207:
17227: x_validate_result => l_validate_facveh_result,
17228: x_failed_constraint => l_failed_constraint,
17229: x_return_status => l_return_status);
17230:
17231: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17232: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17233: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17234: END IF;
17235: END IF;
17228: x_failed_constraint => l_failed_constraint,
17229: x_return_status => l_return_status);
17230:
17231: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17232: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17233: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17234: END IF;
17235: END IF;
17236:
17329: x_msg_count => x_msg_count,
17330: x_msg_data => x_msg_data,
17331: x_return_status => l_return_status);
17332:
17333: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17334: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17335: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17336: END IF;
17337: END IF;
17330: x_msg_data => x_msg_data,
17331: x_return_status => l_return_status);
17332:
17333: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17334: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17335: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17336: END IF;
17337: END IF;
17338:
17336: END IF;
17337: END IF;
17338:
17339: IF x_validate_result = 'F' THEN
17340: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
17341: ELSIF
17342: l_failed_constraints.COUNT > 0 THEN
17343:
17344: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
17340: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
17341: ELSIF
17342: l_failed_constraints.COUNT > 0 THEN
17343:
17344: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
17345: END IF;
17346:
17347: --
17348: IF l_debug_on THEN
17352: --
17353:
17354: EXCEPTION
17355: WHEN g_get_carrmode_failed THEN
17356: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
17357: --
17358: IF l_debug_on THEN
17359: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
17360: END IF;
17359: WSH_DEBUG_SV.pop(l_module_name,' get carrier-mode failed ');
17360: END IF;
17361: --
17362: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
17363: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
17364: --
17365: IF l_debug_on THEN
17366: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17367: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
17367: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
17368: END IF;
17369: --
17370: WHEN others THEN
17371: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_stop');
17372: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
17373: --
17374: IF l_debug_on THEN
17375: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17368: END IF;
17369: --
17370: WHEN others THEN
17371: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_stop');
17372: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
17373: --
17374: IF l_debug_on THEN
17375: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17376: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
17403: x_return_status OUT NOCOPY VARCHAR2
17404: )
17405:
17406: IS
17407: l_validate_result VARCHAR2(1) := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17408: l_return_status VARCHAR2(1) := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17409: l_failed_constraint WSH_FTE_CONSTRAINT_FRAMEWORK.line_constraint_rec_type;
17410: l_details_info WSH_FTE_CONSTRAINT_FRAMEWORK.detail_ccinfo_tab_type;
17411: i_det NUMBER;
17404: )
17405:
17406: IS
17407: l_validate_result VARCHAR2(1) := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17408: l_return_status VARCHAR2(1) := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17409: l_failed_constraint WSH_FTE_CONSTRAINT_FRAMEWORK.line_constraint_rec_type;
17410: l_details_info WSH_FTE_CONSTRAINT_FRAMEWORK.detail_ccinfo_tab_type;
17411: i_det NUMBER;
17412: l_module_name CONSTANT VARCHAR2(100) := 'wsh.plsql.' || G_PKG_NAME || '.' || 'validate_exclusive_constraints';
17440: AND wda.delivery_id = c_delivery_id;
17441:
17442: BEGIN
17443:
17444: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17445: x_validate_result := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17446:
17447: IF l_debug_on THEN
17448: wsh_debug_sv.push (l_module_name);
17441:
17442: BEGIN
17443:
17444: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17445: x_validate_result := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17446:
17447: IF l_debug_on THEN
17448: wsh_debug_sv.push (l_module_name);
17449: END IF;
17466: x_validate_result => l_validate_result,
17467: x_failed_constraint => l_failed_constraint,
17468: x_return_status => l_return_status);
17469:
17470: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17471: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17472: END IF;
17473:
17474:
17475: IF l_debug_on THEN
17476: wsh_debug_sv.logmsg (l_module_name, 'Customer FAC-FAC l_validate_result: '||l_validate_result);
17477: END IF;
17478:
17479: IF l_validate_result = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
17480: x_return_status := l_return_status;
17481: x_validate_result := l_validate_result;
17482:
17483: IF l_debug_on THEN
17513: x_validate_result => l_validate_result,
17514: x_failed_constraint => l_failed_constraint,
17515: x_return_status => l_return_status);
17516:
17517: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17518: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17519: END IF;
17520:
17521: IF l_debug_on THEN
17521: IF l_debug_on THEN
17522: wsh_debug_sv.logmsg (l_module_name, 'CUS-FAC l_validate_result: '||l_validate_result);
17523: END IF;
17524:
17525: IF l_validate_result = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
17526: x_return_status := l_return_status;
17527: x_validate_result := l_validate_result;
17528: IF l_debug_on THEN
17529: wsh_debug_sv.push(l_module_name);
17551: x_validate_result => l_validate_result,
17552: x_failed_constraint => l_failed_constraint,
17553: x_return_status => l_return_status);
17554:
17555: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17556: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17557: END IF;
17558:
17559: IF l_debug_on THEN
17559: IF l_debug_on THEN
17560: wsh_debug_sv.logmsg (l_module_name, 'Region/Zone - Facility constraint for ship to location l_validate_result: '||l_validate_result);
17561: END IF;
17562:
17563: IF l_validate_result = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
17564: x_return_status := l_return_status;
17565: x_validate_result := l_validate_result;
17566: IF l_debug_on THEN
17567: 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');
17586: x_validate_result => l_validate_result,
17587: x_failed_constraint => l_failed_constraint,
17588: x_return_status => l_return_status);
17589:
17590: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17591: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17592: END IF;
17593:
17594: IF l_debug_on THEN
17594: IF l_debug_on THEN
17595: wsh_debug_sv.logmsg (l_module_name, 'ORG - FAC l_validate_result: '||l_validate_result);
17596: END IF;
17597:
17598: IF l_validate_result = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
17599: x_return_status := l_return_status;
17600: x_validate_result := l_validate_result;
17601: IF l_debug_on THEN
17602: wsh_debug_sv.push(l_module_name);
17621: p_org_id => p_delivery_rec.organization_id,
17622: x_location_id => l_location_id,
17623: x_return_status => x_return_status);
17624:
17625: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17626: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17627: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17628: END IF;
17629: END IF;
17622: x_location_id => l_location_id,
17623: x_return_status => x_return_status);
17624:
17625: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17626: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17627: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17628: END IF;
17629: END IF;
17630:
17634: x_validate_result => l_validate_result,
17635: x_failed_constraint => l_failed_constraint,
17636: x_return_status => l_return_status);
17637:
17638: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17639: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17640: END IF;
17641:
17642: IF l_debug_on THEN
17642: IF l_debug_on THEN
17643: wsh_debug_sv.logmsg (l_module_name, 'Region/Zone - Facility constraint for ship to location l_validate_result: '||l_validate_result);
17644: END IF;
17645:
17646: IF l_validate_result = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
17647: x_return_status := l_return_status;
17648: x_validate_result := l_validate_result;
17649: IF l_debug_on THEN
17650: 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');
17682: x_validate_result => l_validate_result,
17683: x_failed_constraint => l_failed_constraint,
17684: x_return_status => l_return_status);
17685:
17686: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS AND l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17687: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17688: END IF;
17689:
17690: IF l_debug_on THEN
17690: IF l_debug_on THEN
17691: wsh_debug_sv.logmsg (l_module_name, 'ITM - FAC l_validate_result: '||l_validate_result);
17692: END IF;
17693:
17694: IF l_validate_result = WSH_UTIL_CORE.G_RET_STS_ERROR THEN
17695: x_return_status := l_return_status;
17696: x_validate_result := l_validate_result;
17697: IF l_debug_on THEN
17698: wsh_debug_sv.push(l_module_name);
17720:
17721: EXCEPTION
17722:
17723: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
17724: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
17725: --
17726: IF l_debug_on THEN
17727: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17728: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
17731: WHEN OTHERS THEN
17732: IF c_get_details%ISOPEN THEN
17733: CLOSE c_get_details;
17734: END IF;
17735: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_exclusive_constraints');
17736: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
17737: --
17738: IF l_debug_on THEN
17739: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17732: IF c_get_details%ISOPEN THEN
17733: CLOSE c_get_details;
17734: END IF;
17735: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_exclusive_constraints');
17736: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
17737: --
17738: IF l_debug_on THEN
17739: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
17740: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
17766: IS
17767: l_ship_from_location_id NUMBER;
17768: l_ship_to_location_id NUMBER;
17769: l_customer_id NUMBER;
17770: l_region_tab WSH_UTIL_CORE.ID_TAB_TYPE;
17771: l_zone_tab WSH_UTIL_CORE.ID_TAB_TYPE;
17772: l_deconsol_location NUMBER;
17773: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
17774: r_itr NUMBER;
17767: l_ship_from_location_id NUMBER;
17768: l_ship_to_location_id NUMBER;
17769: l_customer_id NUMBER;
17770: l_region_tab WSH_UTIL_CORE.ID_TAB_TYPE;
17771: l_zone_tab WSH_UTIL_CORE.ID_TAB_TYPE;
17772: l_deconsol_location NUMBER;
17773: l_debug_on CONSTANT BOOLEAN := WSH_DEBUG_SV.is_debug_enabled;
17774: r_itr NUMBER;
17775: z_itr NUMBER;
17812: ORDER BY creation_date;
17813:
17814: BEGIN
17815:
17816: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
17817:
17818: IF l_debug_on THEN
17819: wsh_debug_sv.push(l_module_name);
17820: END IF;
17880: p_lang_code => USERENV('LANG'),
17881: x_region_tab => l_region_tab,
17882: x_return_status => l_return_status);
17883:
17884: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17885: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17886: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17887: END IF;
17888: END IF;
17881: x_region_tab => l_region_tab,
17882: x_return_status => l_return_status);
17883:
17884: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17885: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17886: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17887: END IF;
17888: END IF;
17889:
17911: p_region_id => l_region_id,
17912: x_zone_tab => l_zone_tab,
17913: x_return_status => l_return_status);
17914:
17915: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17916: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17917: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17918: END IF;
17919: END IF;
17912: x_zone_tab => l_zone_tab,
17913: x_return_status => l_return_status);
17914:
17915: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
17916: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
17917: raise FND_API.G_EXC_UNEXPECTED_ERROR;
17918: END IF;
17919: END IF;
17920:
18003: p_org_id => p_delivery_rec.organization_id,
18004: x_location_id => l_ship_from_location_id,
18005: x_return_status => x_return_status);
18006:
18007: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18008: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18009: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18010: END IF;
18011: END IF;*/
18004: x_location_id => l_ship_from_location_id,
18005: x_return_status => x_return_status);
18006:
18007: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18008: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18009: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18010: END IF;
18011: END IF;*/
18012:
18049: p_org_id => p_delivery_rec.organization_id,
18050: x_location_id => l_ship_from_location_id,
18051: x_return_status => x_return_status);
18052:
18053: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18054: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18055: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18056: END IF;
18057: END IF;
18050: x_location_id => l_ship_from_location_id,
18051: x_return_status => x_return_status);
18052:
18053: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18054: IF x_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18055: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18056: END IF;
18057: END IF;
18058:
18076: p_lang_code => USERENV('LANG'),
18077: x_region_tab => l_region_tab,
18078: x_return_status => l_return_status);
18079:
18080: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18081: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18082: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18083: END IF;
18084: END IF;
18077: x_region_tab => l_region_tab,
18078: x_return_status => l_return_status);
18079:
18080: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18081: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18082: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18083: END IF;
18084: END IF;
18085:
18107: p_region_id => l_region_id,
18108: x_zone_tab => l_zone_tab,
18109: x_return_status => l_return_status);
18110:
18111: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18112: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18113: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18114: END IF;
18115: END IF;
18108: x_zone_tab => l_zone_tab,
18109: x_return_status => l_return_status);
18110:
18111: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18112: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18113: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18114: END IF;
18115: END IF;
18116:
18154:
18155: EXCEPTION
18156:
18157: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
18158: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18159: --
18160: IF l_debug_on THEN
18161: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18162: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
18172: IF c_get_region_incl_constraints%ISOPEN THEN
18173: CLOSE c_get_region_incl_constraints;
18174: END IF;
18175:
18176: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_must_use_facility');
18177: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18178: --
18179: IF l_debug_on THEN
18180: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18173: CLOSE c_get_region_incl_constraints;
18174: END IF;
18175:
18176: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.get_must_use_facility');
18177: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18178: --
18179: IF l_debug_on THEN
18180: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18181: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
18233: --========================================================================
18234:
18235: PROCEDURE validate_constraint_deconsol( p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.g_false,
18236: p_delivery_info IN OUT NOCOPY delivery_ccinfo_tab_type,
18237: p_in_ids IN wsh_util_core.id_tab_type,
18238: p_rule_deconsol_location IN NUMBER default NULL,
18239: p_rule_override_deconsol IN BOOLEAN DEFAULT FALSE,
18240: p_rule_to_zone_id IN NUMBER DEFAULT NULL,
18241: p_caller IN VARCHAR2 DEFAULT NULL,
18300: WHERE wnd.delivery_id = c_delivery_id;
18301:
18302: BEGIN
18303:
18304: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
18305:
18306: refresh_cache(l_return_status);
18307:
18308: IF l_debug_on THEN
18332: p_internal_cust_location_id => p_delivery_info(i).ultimate_dropoff_location_id,
18333: x_internal_org_location_id => l_physical_location_id,
18334: x_return_status => l_return_status);
18335:
18336: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18337: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18338: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18339: END IF;
18340: END IF;
18333: x_internal_org_location_id => l_physical_location_id,
18334: x_return_status => l_return_status);
18335:
18336: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18337: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18338: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18339: END IF;
18340: END IF;
18341:
18396: --{
18397: IF l_debug_on THEN
18398: WSH_DEBUG_SV.logmsg(l_module_name,'p_rule_override_deconsol = TRUE AND p_rule_deconsol_location IS NULL');
18399: END IF;
18400: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
18401: IF l_debug_on THEN
18402: wsh_debug_sv.pop (l_module_name);
18403: END IF;
18404: return;
18424: WSH_DEBUG_SV.logmsg(l_module_name,'VALIDATE_EXCLUSIVE_CONSTRAINTS l_validate_result : '||l_validate_result);
18425: WSH_DEBUG_SV.logmsg(l_module_name,'VALIDATE_EXCLUSIVE_CONSTRAINTS l_return_status : '||l_return_status);
18426: END IF;
18427:
18428: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
18429: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18430: ELSE
18431: IF l_validate_result = l_success THEN
18432: x_output_id_tab(rec_cnt).deconsol_location := p_rule_deconsol_location;
18491: WSH_DEBUG_SV.logmsg(l_module_name,'VALIDATE_EXCLUSIVE_CONSTRAINTS_validate_result : '||l_validate_result);
18492: WSH_DEBUG_SV.logmsg(l_module_name,'VALIDATE_EXCLUSIVE_CONSTRAINTS_return_status : '||l_return_status);
18493: END IF;
18494:
18495: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
18496: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18497: ELSE
18498: IF l_validate_result = l_success THEN
18499: x_output_id_tab(rec_cnt).deconsol_location := l_intermed_ship_to_loc_id;
18529: get_must_use_facility(p_delivery_rec => p_delivery_info(rec_cnt),
18530: x_deconsol_location => l_rule_deconsol_location,
18531: x_return_status => l_return_status);
18532:
18533: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18534: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18535: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18536: END IF;
18537: END IF;
18530: x_deconsol_location => l_rule_deconsol_location,
18531: x_return_status => l_return_status);
18532:
18533: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18534: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18535: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18536: END IF;
18537: END IF;
18538:
18542: p_rule_deconsol_location => l_rule_deconsol_location,
18543: x_validate_result => l_validate_result,
18544: x_return_status => l_return_status);
18545:
18546: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
18547: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18548: ELSE
18549: IF l_validate_result = l_success THEN
18550: x_output_id_tab(rec_cnt).deconsol_location := l_rule_deconsol_location;
18585: p_caller => p_caller,
18586: x_region_consol_tab => l_region_tab,
18587: x_return_status => l_return_status);
18588:
18589: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18590: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18591: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18592: END IF;
18593: END IF;
18586: x_region_consol_tab => l_region_tab,
18587: x_return_status => l_return_status);
18588:
18589: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18590: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18591: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18592: END IF;
18593: END IF;
18594:
18611: p_rule_deconsol_location => l_rule_deconsol_location,
18612: x_validate_result => l_validate_result,
18613: x_return_status => l_return_status);
18614:
18615: IF l_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR OR l_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
18616: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18617: ELSE
18618: IF l_validate_result = l_success THEN
18619: x_output_id_tab(rec_cnt).deconsol_location := l_rule_deconsol_location;
18675: p_caller => p_caller,
18676: x_region_consol_tab => l_region_tab,
18677: x_return_status => l_return_status);
18678:
18679: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18680: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18681: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18682: END IF;
18683: END IF;
18676: x_region_consol_tab => l_region_tab,
18677: x_return_status => l_return_status);
18678:
18679: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
18680: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_WARNING THEN
18681: raise FND_API.G_EXC_UNEXPECTED_ERROR;
18682: END IF;
18683: END IF;
18684:
18737:
18738: EXCEPTION
18739:
18740: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
18741: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18742: --
18743: IF l_debug_on THEN
18744: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18745: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
18751: END IF;
18752: IF c_get_dlvy%ISOPEN THEN
18753: CLOSE c_get_dlvy;
18754: END IF;
18755: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_deconsol');
18756: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18757: --
18758: IF l_debug_on THEN
18759: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18752: IF c_get_dlvy%ISOPEN THEN
18753: CLOSE c_get_dlvy;
18754: END IF;
18755: WSH_UTIL_CORE.default_handler('WSH_FTE_CONSTRAINT_FRAMEWORK.validate_constraint_deconsol');
18756: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
18757: --
18758: IF l_debug_on THEN
18759: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
18760: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');