[Home] [Help]
726: END IF;
727:
728: -- Ams_Utility_Pvt.debug_message(l_full_name ||': validate');
729:
730: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
731: Validate_Metric_items(
732: p_metric_rec => l_metrics_rec,
733: p_validation_mode => JTF_PLSQL_API.g_update,
734: x_return_status => l_return_status
729:
730: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
731: Validate_Metric_items(
732: p_metric_rec => l_metrics_rec,
733: p_validation_mode => JTF_PLSQL_API.g_update,
734: x_return_status => l_return_status
735: );
736:
737: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
751:
752: RAISE FND_API.G_EXC_ERROR;
753: END IF;
754:
755: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_record THEN
756: Validate_Metric_Record(
757: p_metric_rec => p_metric_rec,
758: p_complete_rec => l_metrics_rec,
759: x_return_status => l_return_status
1396:
1397: Ams_Utility_Pvt.debug_message(l_full_name||': Validate items');
1398:
1399: -- Validate required items in the record.
1400: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
1401:
1402: Validate_Metric_items(
1403: p_metric_rec => p_metric_rec,
1404: p_validation_mode => JTF_PLSQL_API.g_create,
1400: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
1401:
1402: Validate_Metric_items(
1403: p_metric_rec => p_metric_rec,
1404: p_validation_mode => JTF_PLSQL_API.g_create,
1405: x_return_status => l_return_status
1406: );
1407:
1408:
1415: END IF;
1416:
1417: Ams_Utility_Pvt.debug_message(l_full_name||': check record');
1418:
1419: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_record THEN
1420: -- dmvincen 02/24/2004: set p_complete_rec to p_metric_rec from null.
1421: Validate_Metric_record(
1422: p_metric_rec => p_metric_rec,
1423: p_complete_rec => p_metric_rec,
1742:
1743:
1744: PROCEDURE Check_Metric_UK_Items(
1745: p_metric_rec IN metric_rec_type,
1746: p_validation_mode IN VARCHAR2 := JTF_PLSQL_API.g_create,
1747: x_return_status OUT NOCOPY VARCHAR2
1748: )
1749: IS
1750: l_where_clause VARCHAR2(2000); -- Used By Check_Uniqueness
1770: x_return_status := FND_API.g_ret_sts_success;
1771:
1772: -- For create_metric, when metric_id is passed in, we need to
1773: -- check if this metric_id is unique.
1774: IF p_validation_mode = JTF_PLSQL_API.g_create
1775: AND p_metric_rec.metric_id IS NOT NULL
1776: THEN
1777: l_where_clause := ' metric_id = '||p_metric_rec.metric_id ;
1778:
1803: p_metric_rec.arc_metric_used_for_object || '''';
1804:
1805: -- For Updates, must also check that uniqueness is not checked against the
1806: -- same record.
1807: IF p_validation_mode <> JTF_PLSQL_API.g_create THEN
1808: l_where_clause := l_where_clause || ' AND metric_id <> ' ||
1809: p_metric_rec.metric_id;
1810:
1811: END IF;
1824: RETURN;
1825: END IF;
1826: */
1827: -- For Updates, must also check that uniqueness is not checked against the same record.
1828: IF p_validation_mode <> JTF_PLSQL_API.g_create THEN
1829: OPEN c_upd_get_dup_names(p_metric_rec.metrics_name,
1830: p_metric_rec.arc_metric_used_for_object,p_metric_rec.metric_id);
1831: FETCH c_upd_get_dup_names INTO l_dummy;
1832: IF c_upd_get_dup_names%FOUND THEN
3097: -- End of comments.
3098:
3099: PROCEDURE Validate_Metric_items(
3100: p_metric_rec IN metric_rec_type,
3101: p_validation_mode IN VARCHAR2 := JTF_PLSQL_API.g_create,
3102: x_return_status OUT NOCOPY VARCHAR2
3103: )
3104: IS
3105: BEGIN