DBA Data[Home] [Help]

APPS.AMS_UTILITY_PVT dependencies on FND_API

Line 217: RETURN FND_API.g_false;

213: l_count := 0;
214: END;
215:
216: IF l_count = 0 THEN
217: RETURN FND_API.g_false;
218: ELSE
219: RETURN FND_API.g_true;
220: END IF;
221:

Line 219: RETURN FND_API.g_true;

215:
216: IF l_count = 0 THEN
217: RETURN FND_API.g_false;
218: ELSE
219: RETURN FND_API.g_true;
220: END IF;
221:
222: END check_fk_exists;
223:

Line 272: RETURN FND_API.g_false;

268: WHEN NO_DATA_FOUND THEN
269: l_count := 0;
270: END;
271: IF l_count = 0 THEN
272: RETURN FND_API.g_false;
273: ELSE
274: RETURN FND_API.g_true;
275: END IF;
276: END IF;

Line 274: RETURN FND_API.g_true;

270: END;
271: IF l_count = 0 THEN
272: RETURN FND_API.g_false;
273: ELSE
274: RETURN FND_API.g_true;
275: END IF;
276: END IF;
277:
278: END check_lookup_exists;

Line 326: RETURN FND_API.g_false;

322: FETCH cur_check_lookup_exists INTO l_count;
323: CLOSE cur_check_lookup_exists;
324:
325: IF l_count = 0 THEN
326: RETURN FND_API.g_false;
327: ELSE
328: RETURN FND_API.g_true;
329: END IF;
330:

Line 328: RETURN FND_API.g_true;

324:
325: IF l_count = 0 THEN
326: RETURN FND_API.g_false;
327: ELSE
328: RETURN FND_API.g_true;
329: END IF;
330:
331: END check_lookup_exists;
332:

Line 409: RETURN FND_API.g_true;

405: l_count := 0;
406: END;
407:
408: IF l_count = 0 THEN
409: RETURN FND_API.g_true;
410: ELSE
411: RETURN FND_API.g_false;
412: END IF;
413:

Line 411: RETURN FND_API.g_false;

407:
408: IF l_count = 0 THEN
409: RETURN FND_API.g_true;
410: ELSE
411: RETURN FND_API.g_false;
412: END IF;
413:
414: END check_uniqueness;
415:

Line 431: RETURN FND_API.g_true;

427: RETURN VARCHAR2
428: IS
429: BEGIN
430: IF p_value = 'Y' or p_value = 'N' THEN
431: RETURN FND_API.g_true;
432: ELSE
433: RETURN FND_API.g_false;
434: END IF;
435: END is_Y_or_N;

Line 433: RETURN FND_API.g_false;

429: BEGIN
430: IF p_value = 'Y' or p_value = 'N' THEN
431: RETURN FND_API.g_true;
432: ELSE
433: RETURN FND_API.g_false;
434: END IF;
435: END is_Y_or_N;
436:
437:

Line 460: FND_MESSAGE.set_token('TEXT', REPLACE (p_message_text, FND_API.G_MISS_CHAR, 'G_MISS_CHAR'));

456: )
457: IS
458: BEGIN
459: FND_MESSAGE.set_name('AMS', 'AMS_API_DEBUG_MESSAGE');
460: FND_MESSAGE.set_token('TEXT', REPLACE (p_message_text, FND_API.G_MISS_CHAR, 'G_MISS_CHAR'));
461: FND_MSG_PUB.add;
462: END debug_message;
463:
464:

Line 503: l_msg := FND_MSG_PUB.get(i, FND_API.g_false);

499: l_msg VARCHAR2(2000);
500: BEGIN
501: l_count := FND_MSG_PUB.count_msg;
502: FOR i IN 1 .. l_count LOOP
503: l_msg := FND_MSG_PUB.get(i, FND_API.g_false);
504: -- holiu: remove since adchkdrv does not like it
505: -- DBMS_OUTPUT.put_line('(' || i || ') ' || l_msg);
506: END LOOP;
507: END display_messages;

Line 554: x_return_status := FND_API.G_RET_STS_SUCCESS;

550: -- Standard Start of API savepoint
551: SAVEPOINT Create_act_log;
552:
553: -- Initialize API return status to success
554: x_return_status := FND_API.G_RET_STS_SUCCESS;
555:
556: --
557: -- API body
558: --

Line 611: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

607:
608: OPEN c_log(l_act_log_id);
609: FETCH c_log INTO x_rowid;
610: IF (c_log%NOTFOUND) THEN
611: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
612: END IF;
613: CLOSE c_log;
614:
615: --

Line 624: x_return_status := FND_API.g_ret_sts_unexp_error;

620: EXCEPTION
621:
622: WHEN OTHERS THEN
623: ROLLBACK TO create_act_log;
624: x_return_status := FND_API.g_ret_sts_unexp_error;
625:
626: END create_log;
627:
628:

Line 660: x_return_status := FND_API.G_RET_STS_SUCCESS;

656: )
657: IS
658: BEGIN
659: -- initialize return status
660: x_return_status := FND_API.G_RET_STS_SUCCESS;
661:
662: IF (p_sys_qual ='CSCH') THEN
663: -- Start of code modified by ptendulk on 30-Jan-2001
664: --x_table_name := 'AMS_CAMPAIGN_SCHEDULES';

Line 741: x_return_status := FND_API.g_ret_sts_unexp_error;

737: x_table_name := 'AMS_ACT_LISTS';
738: x_pk_name := 'ACT_LIST_HEADER_ID';
739: ELSE
740: AMS_Utility_PVT.error_message ('AMS_INVALID_SYS_QUAL', 'SYS_QUALIFIER', p_sys_qual);
741: x_return_status := FND_API.g_ret_sts_unexp_error;
742: x_table_name := NULL;
743: x_pk_name := NULL;
744: END IF;
745:

Line 774: x_return_status := FND_API.G_FALSE;

770:
771:
772:
773: IF SQL%NOTFOUND THEN
774: x_return_status := FND_API.G_FALSE;
775: ELSE
776: x_return_status := FND_API.G_TRUE;
777: END IF;
778:

Line 776: x_return_status := FND_API.G_TRUE;

772:
773: IF SQL%NOTFOUND THEN
774: x_return_status := FND_API.G_FALSE;
775: ELSE
776: x_return_status := FND_API.G_TRUE;
777: END IF;
778:
779:
780: EXCEPTION

Line 785: x_return_status := FND_API.G_FALSE;

781:
782: WHEN OTHERS THEN
783: x_source_code := NULL;
784: x_source_id := NULL;
785: x_return_status := FND_API.G_FALSE;
786:
787: End;
788:
789:

Line 929: x_return_status := FND_API.G_RET_STS_SUCCESS;

925: l_rate NUMBER; -- Not used in Marketing.
926: l_conversion_type VARCHAR2(30); -- Currency conversion type; see API documention for details.
927: BEGIN
928: -- Initialize return status.
929: x_return_status := FND_API.G_RET_STS_SUCCESS;
930:
931: -- Get the currency conversion type from profile option
932: l_conversion_type := FND_PROFILE.Value (L_CONVERSION_TYPE_PROFILE);
933:

Line 956: x_return_status := FND_API.G_RET_STS_ERROR;

952: FND_MESSAGE.Set_Token ('CURRENCY_FROM', p_from_currency);
953: FND_MESSAGE.Set_Token ('CURRENCY_TO', p_to_currency);
954: FND_MSG_PUB.Add;
955: END IF;
956: x_return_status := FND_API.G_RET_STS_ERROR;
957: WHEN GL_Currency_API.INVALID_CURRENCY THEN
958: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
959: FND_MESSAGE.Set_Name ('AMS', 'AMS_INVALID_CURR');
960: FND_MESSAGE.Set_Token ('CURRENCY_FROM', p_from_currency);

Line 964: x_return_status := FND_API.G_RET_STS_ERROR;

960: FND_MESSAGE.Set_Token ('CURRENCY_FROM', p_from_currency);
961: FND_MESSAGE.Set_Token ('CURRENCY_TO', p_to_currency);
962: FND_MSG_PUB.Add;
963: END IF;
964: x_return_status := FND_API.G_RET_STS_ERROR;
965: END Convert_Currency;
966:
967: ---------------------------------------------------------------------
968: -- PROCEDURE

Line 997: x_return_status := FND_API.G_RET_STS_ERROR;

993: OPEN c_meaning;
994: FETCH c_meaning INTO x_meaning;
995: IF c_meaning%NOTFOUND THEN
996: CLOSE c_meaning;
997: x_return_status := FND_API.G_RET_STS_ERROR;
998: x_meaning:= NULL;
999: ELSE
1000: CLOSE c_meaning;
1001: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1001: x_return_status := FND_API.G_RET_STS_SUCCESS;

997: x_return_status := FND_API.G_RET_STS_ERROR;
998: x_meaning:= NULL;
999: ELSE
1000: CLOSE c_meaning;
1001: x_return_status := FND_API.G_RET_STS_SUCCESS;
1002: END IF;
1003: EXCEPTION
1004: WHEN OTHERS THEN
1005: IF c_meaning%ISOPEN THEN

Line 1008: x_return_status := FND_API.G_RET_STS_ERROR;

1004: WHEN OTHERS THEN
1005: IF c_meaning%ISOPEN THEN
1006: CLOSE c_meaning;
1007: END IF;
1008: x_return_status := FND_API.G_RET_STS_ERROR;
1009: x_meaning := NULL;
1010: END get_lookup_meaning;
1011:
1012:

Line 1040: x_return_status := FND_API.G_RET_STS_SUCCESS;

1036: where UPGRADE_TZ_ID = l_time_id;
1037:
1038: BEGIN
1039: -- Initialize API return status to success
1040: x_return_status := FND_API.G_RET_STS_SUCCESS;
1041: l_sys_time_id := FND_PROFILE.VALUE('SERVER_TIMEZONE_ID');
1042: OPEN c_get_name(l_sys_time_id);
1043: FETCH c_get_name into l_sys_name;
1044: IF (c_get_name%NOTFOUND) THEN

Line 1046: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1042: OPEN c_get_name(l_sys_time_id);
1043: FETCH c_get_name into l_sys_name;
1044: IF (c_get_name%NOTFOUND) THEN
1045: CLOSE c_get_name;
1046: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1047: return;
1048: END IF;
1049: CLOSE c_get_name;
1050:

Line 1058: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1054: WHEN NO_DATA_FOUND THEN
1055: IF (c_get_name%ISOPEN) THEN
1056: CLOSE c_get_name;
1057: END IF;
1058: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1059: END get_System_Timezone;
1060:
1061: ---------------------------------------------------------------------
1062: -- PROCEDURE

Line 1088: x_return_status := FND_API.G_RET_STS_SUCCESS;

1084: where UPGRADE_TZ_ID = l_time_id;
1085:
1086: BEGIN
1087: -- Initialize API return status to success
1088: x_return_status := FND_API.G_RET_STS_SUCCESS;
1089: l_user_time_id := FND_PROFILE.VALUE('CLIENT_TIMEZONE_ID');
1090: OPEN get_name(l_user_time_id);
1091: FETCH get_name into l_user_time_name;
1092: IF (get_name%NOTFOUND) THEN

Line 1094: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1090: OPEN get_name(l_user_time_id);
1091: FETCH get_name into l_user_time_name;
1092: IF (get_name%NOTFOUND) THEN
1093: CLOSE get_name;
1094: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1095: return;
1096: END IF;
1097: CLOSE get_name;
1098:

Line 1106: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1102: WHEN NO_DATA_FOUND THEN
1103: IF (get_name%ISOPEN) THEN
1104: CLOSE get_name;
1105: END IF;
1106: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1107: END get_User_Timezone;
1108:
1109: -------------------------------------------------------------------------------------------------
1110: -- PROCEDURE

Line 1125: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,

1121: -- converted into system timezone else it will be
1122: -- converted to user timezone .
1123: ---------------------------------------------------------------------------------------------------
1124: PROCEDURE Convert_Timezone(
1125: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1126: x_return_status OUT NOCOPY VARCHAR2,
1127: x_msg_count OUT NOCOPY NUMBER,
1128: x_msg_data OUT NOCOPY VARCHAR2,
1129:

Line 1148: x_return_status := FND_API.G_RET_STS_SUCCESS;

1144: l_to_timezone_id NUMBEr ;
1145: BEGIN
1146:
1147: -- Initialize API return status to success
1148: x_return_status := FND_API.G_RET_STS_SUCCESS;
1149:
1150: get_System_Timezone(
1151: l_return_status,
1152: l_sys_time_id,

Line 1155: IF (l_return_status = FND_API.G_RET_STS_ERROR OR

1151: l_return_status,
1152: l_sys_time_id,
1153: l_sys_time_name);
1154:
1155: IF (l_return_status = FND_API.G_RET_STS_ERROR OR
1156: l_return_status = FND_API.G_RET_STS_UNEXP_ERROR )
1157: THEN
1158: x_return_status := l_return_status;
1159: RETURN;

Line 1156: l_return_status = FND_API.G_RET_STS_UNEXP_ERROR )

1152: l_sys_time_id,
1153: l_sys_time_name);
1154:
1155: IF (l_return_status = FND_API.G_RET_STS_ERROR OR
1156: l_return_status = FND_API.G_RET_STS_UNEXP_ERROR )
1157: THEN
1158: x_return_status := l_return_status;
1159: RETURN;
1160: END IF;

Line 1172: IF (l_return_status = FND_API.G_RET_STS_ERROR OR

1168: x_user_time_name => l_user_time_name
1169: ) ;
1170: END IF;
1171:
1172: IF (l_return_status = FND_API.G_RET_STS_ERROR OR
1173: l_return_status = FND_API.G_RET_STS_UNEXP_ERROR )
1174: THEN
1175: x_return_status := l_return_status;
1176: RETURN;

Line 1173: l_return_status = FND_API.G_RET_STS_UNEXP_ERROR )

1169: ) ;
1170: END IF;
1171:
1172: IF (l_return_status = FND_API.G_RET_STS_ERROR OR
1173: l_return_status = FND_API.G_RET_STS_UNEXP_ERROR )
1174: THEN
1175: x_return_status := l_return_status;
1176: RETURN;
1177: END IF;

Line 1254: RAISE FND_API.g_exc_unexpected_error;

1250: -- operator.
1251: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1252: FND_MESSAGE.set_name('AMS', 'AMS_UTIL_NO_WHERE_OPERATOR');
1253: FND_MSG_PUB.add;
1254: RAISE FND_API.g_exc_unexpected_error;
1255: END IF;
1256: ELSIF l_eq_pos > 0 AND l_not_pos = 0 THEN
1257: l_curr_pos := l_eq_pos;
1258: x_col_val_tbl(i).col_op := '=';

Line 1608: l_msg := FND_MSG_PUB.get(l_cnt, FND_API.g_false);

1604: IF p_text IS NULL THEN
1605: l_count := FND_MSG_PUB.count_msg;
1606: FOR l_cnt IN 1 .. l_count
1607: LOOP
1608: l_msg := FND_MSG_PUB.get(l_cnt, FND_API.g_false);
1609: FND_FILE.PUT_LINE(FND_FILE.LOG, '(' || l_cnt || ') ' || l_msg);
1610: END LOOP;
1611: ELSE
1612: FND_FILE.PUT_LINE(FND_FILE.LOG, p_text );

Line 1755: x_return_status := FND_API.g_ret_sts_success;

1751: AND next_status_code = l_new_status_code;
1752:
1753: BEGIN
1754:
1755: x_return_status := FND_API.g_ret_sts_success;
1756: x_approval_type := NULL;
1757:
1758: l_status_type := get_system_status_type(p_object_type);
1759: l_old_status_code := get_system_status_code(p_old_status_id);

Line 1769: x_return_status := FND_API.g_ret_sts_error;

1765:
1766: OPEN c_approval_flag;
1767: FETCH c_approval_flag INTO l_theme_flag, l_budget_flag;
1768: IF c_approval_flag%NOTFOUND THEN
1769: x_return_status := FND_API.g_ret_sts_error;
1770: AMS_Utility_PVT.error_message('AMS_CAMP_BAD_STATUS_CHANGE');
1771: END IF;
1772: CLOSE c_approval_flag;
1773:

Line 1776: p_object_type, p_object_id, 'BAPL') = FND_API.g_true

1772: CLOSE c_approval_flag;
1773:
1774: IF l_budget_flag = 'Y' THEN
1775: IF AMS_ObjectAttribute_PVT.check_object_attribute(
1776: p_object_type, p_object_id, 'BAPL') = FND_API.g_true
1777: THEN
1778: x_approval_type := 'BUDGET';
1779: END IF;
1780: ELSIF l_theme_flag = 'Y' THEN

Line 1782: p_object_type, p_object_id, 'TAPL') = FND_API.g_true

1778: x_approval_type := 'BUDGET';
1779: END IF;
1780: ELSIF l_theme_flag = 'Y' THEN
1781: IF AMS_ObjectAttribute_PVT.check_object_attribute(
1782: p_object_type, p_object_id, 'TAPL') = FND_API.g_true
1783: THEN
1784: x_approval_type := 'THEME';
1785: END IF;
1786: END IF;

Line 1862: x_return_status := FND_API.g_ret_sts_success;

1858: AND next_status_code = l_new_status_code;
1859:
1860: BEGIN
1861:
1862: x_return_status := FND_API.g_ret_sts_success;
1863: x_approval_type := NULL;
1864:
1865: l_status_type := get_system_status_type(p_object_type);
1866: l_old_status_code := get_system_status_code(p_old_status_id);

Line 1876: x_return_status := FND_API.g_ret_sts_error;

1872:
1873: OPEN c_approval_flag;
1874: FETCH c_approval_flag INTO l_theme_flag, l_budget_flag;
1875: IF c_approval_flag%NOTFOUND THEN
1876: x_return_status := FND_API.g_ret_sts_error;
1877: AMS_Utility_PVT.error_message('AMS_CAMP_BAD_STATUS_CHANGE');
1878: END IF;
1879: CLOSE c_approval_flag;
1880:

Line 1972: RAISE fnd_api.g_exc_error;

1968: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
1969: fnd_message.set_name('AMS', 'AMS_ORG_ID_NOTFOUND');
1970: fnd_msg_pub.add;
1971: END IF;
1972: RAISE fnd_api.g_exc_error;
1973: END IF;
1974: CLOSE c_org_cur;
1975:
1976: OPEN c_get_gl_info(l_org_id);

Line 1985: RAISE fnd_api.g_exc_error;

1981: fnd_message.set_name('AMS', 'AMS_GL_SOB_NOTFOUND');
1982: fnd_msg_pub.add;
1983: END IF;
1984:
1985: RAISE fnd_api.g_exc_error;
1986: END IF;
1987: CLOSE c_get_gl_info;
1988:
1989: --

Line 2005: WHEN fnd_api.g_exc_error THEN

2001: ,x_rate => x_rate);
2002: --
2003:
2004: EXCEPTION
2005: WHEN fnd_api.g_exc_error THEN
2006: x_return_status := fnd_api.g_ret_sts_error;
2007: WHEN gl_currency_api.no_rate THEN
2008: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
2009: fnd_message.set_name('AMS', 'AMS_NO_RATE');

Line 2006: x_return_status := fnd_api.g_ret_sts_error;

2002: --
2003:
2004: EXCEPTION
2005: WHEN fnd_api.g_exc_error THEN
2006: x_return_status := fnd_api.g_ret_sts_error;
2007: WHEN gl_currency_api.no_rate THEN
2008: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
2009: fnd_message.set_name('AMS', 'AMS_NO_RATE');
2010: fnd_msg_pub.add;

Line 2013: x_return_status := fnd_api.g_ret_sts_error;

2009: fnd_message.set_name('AMS', 'AMS_NO_RATE');
2010: fnd_msg_pub.add;
2011: END IF;
2012:
2013: x_return_status := fnd_api.g_ret_sts_error;
2014: WHEN gl_currency_api.invalid_currency THEN
2015: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
2016: fnd_message.set_name('AMS', 'AMS_INVALID_CURR');
2017: fnd_msg_pub.add;

Line 2020: x_return_status := fnd_api.g_ret_sts_error;

2016: fnd_message.set_name('AMS', 'AMS_INVALID_CURR');
2017: fnd_msg_pub.add;
2018: END IF;
2019:
2020: x_return_status := fnd_api.g_ret_sts_error;
2021: WHEN OTHERS THEN
2022: RAISE;
2023: x_return_status := fnd_api.g_ret_sts_unexp_error;
2024: END convert_currency;

Line 2023: x_return_status := fnd_api.g_ret_sts_unexp_error;

2019:
2020: x_return_status := fnd_api.g_ret_sts_error;
2021: WHEN OTHERS THEN
2022: RAISE;
2023: x_return_status := fnd_api.g_ret_sts_unexp_error;
2024: END convert_currency;
2025:
2026: ---------------------------------------------------------------------
2027: -- PROCEDURE

Line 2149: x_return_status := fnd_api.g_ret_sts_success;

2145: SELECT (TO_NUMBER(SUBSTRB(USERENV('CLIENT_INFO'), 1, 10)))
2146: FROM dual;
2147: BEGIN
2148: -- Initialize return status.
2149: x_return_status := fnd_api.g_ret_sts_success;
2150:
2151: --++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++--
2152: -- Mumu Pande 09/20/2000 Updated the following
2153: -- Get the currency conversion type from profile option

Line 2166: x_return_status := fnd_api.g_ret_sts_error;

2162: fnd_message.set_name('AMS', 'AMS_NO_EXCHANGE_TYPE');
2163: fnd_msg_pub.add;
2164: END IF;
2165:
2166: x_return_status := fnd_api.g_ret_sts_error;
2167: RETURN;
2168: ELSE
2169: IF ams_utility_pvt.check_fk_exists('GL_DAILY_CONVERSION_TYPES',
2170: 'CONVERSION_TYPE'

Line 2171: ,l_conversion_type) = fnd_api.g_false

2167: RETURN;
2168: ELSE
2169: IF ams_utility_pvt.check_fk_exists('GL_DAILY_CONVERSION_TYPES',
2170: 'CONVERSION_TYPE'
2171: ,l_conversion_type) = fnd_api.g_false
2172: THEN
2173: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
2174: fnd_message.set_name('AMS', 'AMS_WRONG_CONVERSION_TYPE');
2175: fnd_msg_pub.add;

Line 2177: x_return_status := fnd_api.g_ret_sts_error;

2173: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
2174: fnd_message.set_name('AMS', 'AMS_WRONG_CONVERSION_TYPE');
2175: fnd_msg_pub.add;
2176: END IF;
2177: x_return_status := fnd_api.g_ret_sts_error;
2178: RETURN;
2179: END IF;
2180: END IF;
2181:

Line 2197: RAISE fnd_api.g_exc_error;

2193: fnd_message.set_name('AMS', 'AMS_ORG_ID_NOTFOUND');
2194: fnd_msg_pub.add;
2195: END IF;
2196:
2197: RAISE fnd_api.g_exc_error;
2198: END IF;
2199:
2200: CLOSE c_org_cur;
2201: END IF;

Line 2217: RAISE fnd_api.g_exc_error;

2213: fnd_message.set_name('AMS', 'AMS_GL_SOB_NOTFOUND');
2214: fnd_msg_pub.add;
2215: END IF;
2216:
2217: RAISE fnd_api.g_exc_error;
2218: END IF;
2219:
2220: CLOSE c_get_gl_info;
2221: -- Call the proper GL API to convert the amount.

Line 2239: WHEN fnd_api.g_exc_error THEN

2235: x_exchange_rate_type := l_conversion_type;
2236: --
2237:
2238: EXCEPTION
2239: WHEN fnd_api.g_exc_error THEN
2240: x_return_status := fnd_api.g_ret_sts_error;
2241: WHEN gl_currency_api.no_rate THEN
2242: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
2243: fnd_message.set_name('AMS', 'AMS_NO_RATE');

Line 2240: x_return_status := fnd_api.g_ret_sts_error;

2236: --
2237:
2238: EXCEPTION
2239: WHEN fnd_api.g_exc_error THEN
2240: x_return_status := fnd_api.g_ret_sts_error;
2241: WHEN gl_currency_api.no_rate THEN
2242: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
2243: fnd_message.set_name('AMS', 'AMS_NO_RATE');
2244: fnd_msg_pub.add;

Line 2247: x_return_status := fnd_api.g_ret_sts_error;

2243: fnd_message.set_name('AMS', 'AMS_NO_RATE');
2244: fnd_msg_pub.add;
2245: END IF;
2246:
2247: x_return_status := fnd_api.g_ret_sts_error;
2248: WHEN gl_currency_api.invalid_currency THEN
2249: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
2250: fnd_message.set_name('AMS', 'AMS_INVALID_CURR');
2251: fnd_msg_pub.add;

Line 2254: x_return_status := fnd_api.g_ret_sts_error;

2250: fnd_message.set_name('AMS', 'AMS_INVALID_CURR');
2251: fnd_msg_pub.add;
2252: END IF;
2253:
2254: x_return_status := fnd_api.g_ret_sts_error;
2255: WHEN OTHERS THEN
2256: x_return_status := fnd_api.g_ret_sts_unexp_error;
2257:
2258: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2256: x_return_status := fnd_api.g_ret_sts_unexp_error;

2252: END IF;
2253:
2254: x_return_status := fnd_api.g_ret_sts_error;
2255: WHEN OTHERS THEN
2256: x_return_status := fnd_api.g_ret_sts_unexp_error;
2257:
2258: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2259: fnd_msg_pub.add_exc_msg('AMS_UTLITY_PVT', 'Convert_functional_curency');
2260: END IF;

Line 2287: ,p_conv_type IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR

2283:
2284: PROCEDURE convert_currency(
2285: p_from_currency IN VARCHAR2
2286: ,p_to_currency IN VARCHAR2
2287: ,p_conv_type IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
2288: ,p_conv_rate IN NUMBER DEFAULT FND_API.G_MISS_NUM
2289: ,p_conv_date IN DATE DEFAULT SYSDATE
2290: ,p_from_amount IN NUMBER
2291: ,x_return_status OUT NOCOPY VARCHAR2

Line 2288: ,p_conv_rate IN NUMBER DEFAULT FND_API.G_MISS_NUM

2284: PROCEDURE convert_currency(
2285: p_from_currency IN VARCHAR2
2286: ,p_to_currency IN VARCHAR2
2287: ,p_conv_type IN VARCHAR2 DEFAULT FND_API.G_MISS_CHAR
2288: ,p_conv_rate IN NUMBER DEFAULT FND_API.G_MISS_NUM
2289: ,p_conv_date IN DATE DEFAULT SYSDATE
2290: ,p_from_amount IN NUMBER
2291: ,x_return_status OUT NOCOPY VARCHAR2
2292: ,x_to_amount OUT NOCOPY NUMBER

Line 2307: x_return_status := fnd_api.g_ret_sts_success;

2303: l_numerator NUMBER; -- Not used in Marketing.
2304: l_conversion_type VARCHAR2(30); -- Curr conversion type; see API doc for details.
2305: BEGIN
2306: -- Initialize return status.
2307: x_return_status := fnd_api.g_ret_sts_success;
2308:
2309: -- condition added to pass conversion types
2310: IF p_conv_type = FND_API.G_MISS_CHAR THEN
2311: -- Get the currency conversion type from profile option

Line 2310: IF p_conv_type = FND_API.G_MISS_CHAR THEN

2306: -- Initialize return status.
2307: x_return_status := fnd_api.g_ret_sts_success;
2308:
2309: -- condition added to pass conversion types
2310: IF p_conv_type = FND_API.G_MISS_CHAR THEN
2311: -- Get the currency conversion type from profile option
2312: l_conversion_type := fnd_profile.VALUE(l_conversion_type_profile);
2313: -- Conversion type cannot be null in profile
2314: IF l_conversion_type IS NULL THEN

Line 2319: x_return_status := fnd_api.g_ret_sts_error;

2315: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
2316: fnd_message.set_name('OZF', 'OZF_NO_EXCHANGE_TYPE');
2317: fnd_msg_pub.add;
2318: END IF;
2319: x_return_status := fnd_api.g_ret_sts_error;
2320: RETURN;
2321: END IF;
2322: ELSE
2323: l_conversion_type := p_conv_type;

Line 2348: x_return_status := fnd_api.g_ret_sts_error;

2344: fnd_message.set_name('OZF', 'OZF_NO_RATE');
2345: fnd_msg_pub.add;
2346: END IF;
2347:
2348: x_return_status := fnd_api.g_ret_sts_error;
2349: WHEN gl_currency_api.invalid_currency THEN
2350: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
2351: fnd_message.set_name('OZF', 'OZF_INVALID_CURR');
2352: fnd_msg_pub.add;

Line 2355: x_return_status := fnd_api.g_ret_sts_error;

2351: fnd_message.set_name('OZF', 'OZF_INVALID_CURR');
2352: fnd_msg_pub.add;
2353: END IF;
2354:
2355: x_return_status := fnd_api.g_ret_sts_error;
2356: WHEN OTHERS THEN
2357: x_return_status := fnd_api.g_ret_sts_unexp_error;
2358:
2359: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

Line 2357: x_return_status := fnd_api.g_ret_sts_unexp_error;

2353: END IF;
2354:
2355: x_return_status := fnd_api.g_ret_sts_error;
2356: WHEN OTHERS THEN
2357: x_return_status := fnd_api.g_ret_sts_unexp_error;
2358:
2359: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2360: fnd_msg_pub.add_exc_msg('OZF_UTLITY_PVT', 'Convert_curency');
2361: END IF;

Line 2398: x_return_status := FND_API.G_RET_STS_SUCCESS;

2394: l_person_id number;
2395: l_user_id number;
2396: l_category varchar2(30);
2397: BEGIN
2398: x_return_status := FND_API.G_RET_STS_SUCCESS;
2399: OPEN c_resource ;
2400: FETCH c_resource INTO l_person_id , l_user_id, l_category;
2401: IF c_resource%NOTFOUND THEN
2402: CLOSE c_resource ;

Line 2403: x_return_status := FND_API.G_RET_STS_ERROR;

2399: OPEN c_resource ;
2400: FETCH c_resource INTO l_person_id , l_user_id, l_category;
2401: IF c_resource%NOTFOUND THEN
2402: CLOSE c_resource ;
2403: x_return_status := FND_API.G_RET_STS_ERROR;
2404: AMS_Utility_PVT.error_message ('AMS_APPR_INVALID_RESOURCE_ID');
2405: return;
2406: END IF;
2407: CLOSE c_resource ;

Line 2417: x_return_status := FND_API.G_RET_STS_ERROR;

2413: p_name => x_role_name,
2414: p_display_name => x_role_display_name
2415: );
2416: IF x_role_name is null then
2417: x_return_status := FND_API.G_RET_STS_ERROR;
2418: AMS_Utility_PVT.error_message ('AMS_APPR_INVALID_ROLE');
2419: return;
2420: END IF;
2421: ELSE

Line 2429: x_return_status := FND_API.G_RET_STS_ERROR;

2425: p_name => x_role_name,
2426: p_display_name => x_role_display_name
2427: );
2428: IF x_role_name is null then
2429: x_return_status := FND_API.G_RET_STS_ERROR;
2430: AMS_Utility_PVT.error_message ('AMS_APPR_INVALID_ROLE');
2431: return;
2432: END IF;
2433: END IF;

Line 2436: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2432: END IF;
2433: END IF;
2434: EXCEPTION
2435: WHEN OTHERS THEN
2436: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2437: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2438: fnd_msg_pub.add_exc_msg('AMS_UTLITY_PVT', 'Get_Resource_Role');
2439: END IF;
2440: RAISE;

Line 2492: x_return_status := FND_API.G_RET_STS_SUCCESS;

2488: l_display_role_name VARCHAR2(240);
2489: l_notif_id NUMBER;
2490:
2491: BEGIN
2492: x_return_status := FND_API.G_RET_STS_SUCCESS;
2493: IF p_send_to_role_name IS NULL THEN
2494: AMS_UTILITY_PVT.get_resource_role
2495: ( p_resource_id => p_send_to_res_id,
2496: x_role_name => l_role_name,

Line 2500: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2496: x_role_name => l_role_name,
2497: x_role_display_name => l_display_role_name,
2498: x_return_status => x_return_status
2499: );
2500: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2501: return;
2502: END IF;
2503: END IF;
2504: l_notif_id := WF_NOTIFICATION.Send

Line 2531: -- Returns FND_API.G_TRUE if it is valid status change

2527: -- Check_Status_Change
2528: --
2529: -- PURPOSE
2530: -- Created to check if the status change is valid or not.
2531: -- Returns FND_API.G_TRUE if it is valid status change
2532: -- or will return FND_API.G_FALSE
2533: --
2534: -- HISTORY
2535: -- 09-Jul-2001 ptendulk Create.

Line 2532: -- or will return FND_API.G_FALSE

2528: --
2529: -- PURPOSE
2530: -- Created to check if the status change is valid or not.
2531: -- Returns FND_API.G_TRUE if it is valid status change
2532: -- or will return FND_API.G_FALSE
2533: --
2534: -- HISTORY
2535: -- 09-Jul-2001 ptendulk Create.
2536: --======================================================================

Line 2558: RETURN FND_API.G_FALSE ;

2554: FETCH c_stat_det INTO l_dummy ;
2555: CLOSE c_stat_det;
2556:
2557: IF l_dummy IS NULL THEN
2558: RETURN FND_API.G_FALSE ;
2559: ELSE
2560: RETURN FND_API.G_TRUE ;
2561: END IF ;
2562: END Check_Status_Change;

Line 2560: RETURN FND_API.G_TRUE ;

2556:
2557: IF l_dummy IS NULL THEN
2558: RETURN FND_API.G_FALSE ;
2559: ELSE
2560: RETURN FND_API.G_TRUE ;
2561: END IF ;
2562: END Check_Status_Change;
2563: --======================================================================
2564: -- FUNCTION

Line 2666: x_return_status := FND_API.G_RET_STS_SUCCESS;

2662:
2663: BEGIN
2664:
2665: If p_association_type_code = 'AMS_DELV' then
2666: x_return_status := FND_API.G_RET_STS_SUCCESS;
2667:
2668: OPEN Cur_Delv(p_associated_object_val1);
2669: FETCH Cur_Delv INTO x_object_name;
2670: CLOSE Cur_Delv;

Line 2675: x_return_status := FND_API.G_RET_STS_SUCCESS;

2671: ELSIF p_association_type_code = 'AMS_CSCH'
2672: OR p_association_type_code = 'AMS_COLLAT'
2673: OR p_association_type_code = 'AMS_PLCE'
2674: THEN
2675: x_return_status := FND_API.G_RET_STS_SUCCESS;
2676:
2677: OPEN Cur_Csch(p_associated_object_val1);
2678: FETCH Cur_Csch INTO x_object_name;
2679: CLOSE Cur_Csch;

Line 2682: x_return_status := FND_API.G_RET_STS_SUCCESS;

2678: FETCH Cur_Csch INTO x_object_name;
2679: CLOSE Cur_Csch;
2680: ELSIF p_association_type_code = 'AMS_COLB' then
2681: IF p_associated_object_val2 = 'CSCH' THEN
2682: x_return_status := FND_API.G_RET_STS_SUCCESS;
2683:
2684: OPEN Cur_Csch(p_associated_object_val1);
2685: FETCH Cur_Csch INTO x_object_name;
2686: CLOSE Cur_Csch;

Line 2688: x_return_status := FND_API.G_RET_STS_SUCCESS;

2684: OPEN Cur_Csch(p_associated_object_val1);
2685: FETCH Cur_Csch INTO x_object_name;
2686: CLOSE Cur_Csch;
2687: ELSIF p_associated_object_val2 = 'CAMP' THEN
2688: x_return_status := FND_API.G_RET_STS_SUCCESS;
2689:
2690: OPEN Cur_Camp(p_associated_object_val1);
2691: FETCH Cur_Camp INTO x_object_name;
2692: CLOSE Cur_Camp;

Line 2699: WHEN FND_API.G_EXC_ERROR THEN

2695: END IF;
2696: -- here you can add processing for other association type as the else part
2697:
2698: EXCEPTION
2699: WHEN FND_API.G_EXC_ERROR THEN
2700: x_return_status := FND_API.G_RET_STS_ERROR;
2701: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2702: p_data => x_msg_data);
2703: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2700: x_return_status := FND_API.G_RET_STS_ERROR;

2696: -- here you can add processing for other association type as the else part
2697:
2698: EXCEPTION
2699: WHEN FND_API.G_EXC_ERROR THEN
2700: x_return_status := FND_API.G_RET_STS_ERROR;
2701: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2702: p_data => x_msg_data);
2703: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2704: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2703: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2699: WHEN FND_API.G_EXC_ERROR THEN
2700: x_return_status := FND_API.G_RET_STS_ERROR;
2701: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2702: p_data => x_msg_data);
2703: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2704: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2705: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2706: p_data => x_msg_data);
2707: WHEN OTHERS THEN

Line 2704: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2700: x_return_status := FND_API.G_RET_STS_ERROR;
2701: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2702: p_data => x_msg_data);
2703: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2704: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2705: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2706: p_data => x_msg_data);
2707: WHEN OTHERS THEN
2708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2704: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2705: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
2706: p_data => x_msg_data);
2707: WHEN OTHERS THEN
2708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2709: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2710: THEN
2711: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2712: END IF;

Line 2818: x_return_status := FND_API.G_RET_STS_SUCCESS;

2814: l_comma_char := ',';
2815: l_found_error := false;
2816: l_context_resource_id := AMS_Utility_PVT.get_resource_id(FND_GLOBAL.user_id);
2817:
2818: x_return_status := FND_API.G_RET_STS_SUCCESS;
2819: IF p_obj_type IS NULL or p_obj_attribute IS NULL or p_obj_status IS NULL or p_fileld_ak_name_array IS NULL or p_change_indicator_array IS NULL THEN
2820: x_return_status := FND_API.G_RET_STS_ERROR;
2821: -- DBMS_OUTPUT.put_line('Sam incorrect Data or null data');
2822: return;

Line 2820: x_return_status := FND_API.G_RET_STS_ERROR;

2816: l_context_resource_id := AMS_Utility_PVT.get_resource_id(FND_GLOBAL.user_id);
2817:
2818: x_return_status := FND_API.G_RET_STS_SUCCESS;
2819: IF p_obj_type IS NULL or p_obj_attribute IS NULL or p_obj_status IS NULL or p_fileld_ak_name_array IS NULL or p_change_indicator_array IS NULL THEN
2820: x_return_status := FND_API.G_RET_STS_ERROR;
2821: -- DBMS_OUTPUT.put_line('Sam incorrect Data or null data');
2822: return;
2823: END IF;
2824:

Line 2826: x_return_status := FND_API.G_RET_STS_ERROR;

2822: return;
2823: END IF;
2824:
2825: IF (p_fileld_ak_name_array.count <> p_change_indicator_array.count ) THEN
2826: x_return_status := FND_API.G_RET_STS_ERROR;
2827: -- DBMS_OUTPUT.put_line('Sam incorrect Data or null data');
2828: return;
2829: END IF;
2830:

Line 2833: x_return_status := FND_API.g_ret_sts_success;

2829: END IF;
2830:
2831: /* LAM rules will not apply to Admin user. Bug 5306637*/
2832: IF AMS_Access_PVT.Check_Admin_Access(l_context_resource_id) THEN
2833: x_return_status := FND_API.g_ret_sts_success;
2834: return;
2835: END IF;
2836:
2837: OPEN c_get_app_id(p_app_short_name);

Line 2858: x_return_status := FND_API.G_RET_STS_ERROR;

2854: FOR i IN 1 .. p_fileld_ak_name_array.count
2855: LOOP
2856: if (l_ak_attribute = p_fileld_ak_name_array(i)) then
2857: if (p_change_indicator_array(i) = 'Y') then
2858: x_return_status := FND_API.G_RET_STS_ERROR;
2859:
2860: OPEN c_get_ak_attribute(p_app_short_name, l_ak_attribute);
2861: FETCH c_get_ak_attribute INTO l_ak_attribute_value;
2862: CLOSE c_get_ak_attribute;