[Home] [Help]
719: END IF;
720:
721: -- Ams_Utility_Pvt.debug_message(l_full_name ||': validate');
722:
723: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
724: Validate_Metric_items(
725: p_metric_rec => l_metrics_rec,
726: p_validation_mode => JTF_PLSQL_API.g_update,
727: x_return_status => l_return_status
722:
723: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
724: Validate_Metric_items(
725: p_metric_rec => l_metrics_rec,
726: p_validation_mode => JTF_PLSQL_API.g_update,
727: x_return_status => l_return_status
728: );
729:
730: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
744:
745: RAISE FND_API.G_EXC_ERROR;
746: END IF;
747:
748: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_record THEN
749: Validate_Metric_Record(
750: p_metric_rec => p_metric_rec,
751: p_complete_rec => l_metrics_rec,
752: x_return_status => l_return_status
1389:
1390: Ams_Utility_Pvt.debug_message(l_full_name||': Validate items');
1391:
1392: -- Validate required items in the record.
1393: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
1394:
1395: Validate_Metric_items(
1396: p_metric_rec => p_metric_rec,
1397: p_validation_mode => JTF_PLSQL_API.g_create,
1393: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
1394:
1395: Validate_Metric_items(
1396: p_metric_rec => p_metric_rec,
1397: p_validation_mode => JTF_PLSQL_API.g_create,
1398: x_return_status => l_return_status
1399: );
1400:
1401:
1408: END IF;
1409:
1410: Ams_Utility_Pvt.debug_message(l_full_name||': check record');
1411:
1412: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_record THEN
1413: -- dmvincen 02/24/2004: set p_complete_rec to p_metric_rec from null.
1414: Validate_Metric_record(
1415: p_metric_rec => p_metric_rec,
1416: p_complete_rec => p_metric_rec,
1735:
1736:
1737: PROCEDURE Check_Metric_UK_Items(
1738: p_metric_rec IN metric_rec_type,
1739: p_validation_mode IN VARCHAR2 := JTF_PLSQL_API.g_create,
1740: x_return_status OUT NOCOPY VARCHAR2
1741: )
1742: IS
1743: l_where_clause VARCHAR2(2000); -- Used By Check_Uniqueness
1763: x_return_status := FND_API.g_ret_sts_success;
1764:
1765: -- For create_metric, when metric_id is passed in, we need to
1766: -- check if this metric_id is unique.
1767: IF p_validation_mode = JTF_PLSQL_API.g_create
1768: AND p_metric_rec.metric_id IS NOT NULL
1769: THEN
1770: l_where_clause := ' metric_id = '||p_metric_rec.metric_id ;
1771:
1796: p_metric_rec.arc_metric_used_for_object || '''';
1797:
1798: -- For Updates, must also check that uniqueness is not checked against the
1799: -- same record.
1800: IF p_validation_mode <> JTF_PLSQL_API.g_create THEN
1801: l_where_clause := l_where_clause || ' AND metric_id <> ' ||
1802: p_metric_rec.metric_id;
1803:
1804: END IF;
1817: RETURN;
1818: END IF;
1819: */
1820: -- For Updates, must also check that uniqueness is not checked against the same record.
1821: IF p_validation_mode <> JTF_PLSQL_API.g_create THEN
1822: OPEN c_upd_get_dup_names(p_metric_rec.metrics_name,
1823: p_metric_rec.arc_metric_used_for_object,p_metric_rec.metric_id);
1824: FETCH c_upd_get_dup_names INTO l_dummy;
1825: IF c_upd_get_dup_names%FOUND THEN
3090: -- End of comments.
3091:
3092: PROCEDURE Validate_Metric_items(
3093: p_metric_rec IN metric_rec_type,
3094: p_validation_mode IN VARCHAR2 := JTF_PLSQL_API.g_create,
3095: x_return_status OUT NOCOPY VARCHAR2
3096: )
3097: IS
3098: BEGIN