DBA Data[Home] [Help]

APPS.AMS_LIST_RULES_ALL_PVT dependencies on AMS_LIST_RULES_ALL

Line 1: PACKAGE BODY AMS_List_Rules_All_PVT AS

1: PACKAGE BODY AMS_List_Rules_All_PVT AS
2: /* $Header: amsvruab.pls 120.0 2005/05/31 14:29:20 appldev noship $ */
3:
4: g_pkg_name CONSTANT VARCHAR2(30) := 'AMS_List_Rules_All_PVT';
5:

Line 4: g_pkg_name CONSTANT VARCHAR2(30) := 'AMS_List_Rules_All_PVT';

1: PACKAGE BODY AMS_List_Rules_All_PVT AS
2: /* $Header: amsvruab.pls 120.0 2005/05/31 14:29:20 appldev noship $ */
3:
4: g_pkg_name CONSTANT VARCHAR2(30) := 'AMS_List_Rules_All_PVT';
5:
6: /*****************************************************************************/
7: -- Procedure: create_list_rule
8: --

Line 40: SELECT AMS_LIST_RULES_ALL_S.NEXTVAL

36: l_list_rule_rec list_rule_rec_type := p_list_rule_rec;
37: l_list_rule_count NUMBER;
38:
39: CURSOR c_list_rule_seq IS
40: SELECT AMS_LIST_RULES_ALL_S.NEXTVAL
41: FROM DUAL;
42:
43: CURSOR c_list_rule_count(lst_rule_id IN NUMBER) IS
44: SELECT COUNT(*)

Line 45: FROM AMS_LIST_RULES_ALL

41: FROM DUAL;
42:
43: CURSOR c_list_rule_count(lst_rule_id IN NUMBER) IS
44: SELECT COUNT(*)
45: FROM AMS_LIST_RULES_ALL
46: WHERE list_rule_id = lst_rule_id;
47:
48: BEGIN
49: -- initialize

Line 126: INSERT INTO AMS_LIST_RULES_ALL

122:
123: -- get org_id
124: l_list_rule_rec.org_id := TO_NUMBER (SUBSTRB (USERENV ('CLIENT_INFO'), 1, 10));
125:
126: INSERT INTO AMS_LIST_RULES_ALL
127: (
128: list_rule_id,
129: last_update_date,
130: last_updated_by,

Line 335: UPDATE AMS_LIST_RULES_ALL SET

331:
332: -- get org_id
333: l_list_rule_rec.org_id := TO_NUMBER (SUBSTRB (USERENV ('CLIENT_INFO'), 1, 10));
334:
335: UPDATE AMS_LIST_RULES_ALL SET
336: last_update_date = SYSDATE,
337: last_updated_by = FND_GLOBAL.user_id,
338: last_update_login = FND_GLOBAL.conc_login_id,
339: object_version_number = l_list_rule_rec.object_version_number + 1,

Line 493: DELETE FROM AMS_LIST_RULES_ALL

489: END IF;
490: RAISE FND_API.g_exc_error;
491: END IF;
492:
493: DELETE FROM AMS_LIST_RULES_ALL
494: WHERE list_rule_id = p_list_rule_id
495: AND object_version_number = p_object_version;
496:
497: IF (SQL%NOTFOUND) THEN

Line 595: FROM AMS_LIST_RULES_ALL

591: l_list_rule_id NUMBER;
592:
593: CURSOR c_list_rule IS
594: SELECT list_rule_id
595: FROM AMS_LIST_RULES_ALL
596: WHERE list_rule_id = p_list_rule_id
597: AND object_version_number = p_object_version
598: FOR UPDATE OF list_rule_id NOWAIT;
599:

Line 943: FND_MESSAGE.set_name('AMS', 'AMS_LIST_RULES_ALL_NO_ID');

939: -- check list_rule_id
940: IF p_list_rule_rec.list_rule_id IS NULL
941: AND p_validation_mode = JTF_PLSQL_API.g_update THEN
942: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
943: FND_MESSAGE.set_name('AMS', 'AMS_LIST_RULES_ALL_NO_ID');
944: FND_MSG_PUB.add;
945: END IF;
946:
947: x_return_status := FND_API.g_ret_sts_error;

Line 967: FND_MESSAGE.set_name('AMS', 'AMS_LIST_RULES_ALL_NO_NAME');

963:
964: -- check list_rule_name
965: IF p_list_rule_rec.list_rule_name IS NULL THEN
966: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
967: FND_MESSAGE.set_name('AMS', 'AMS_LIST_RULES_ALL_NO_NAME');
968: FND_MSG_PUB.add;
969: END IF;
970:
971: x_return_status := FND_API.g_ret_sts_error;

Line 979: FND_MESSAGE.set_name('AMS', 'AMS_LIST_RULES_ALL_NO_DEDUPE');

975: -- check weightage_for_dedupe
976: --commented by vb 08/30/2001 after we made this column nullable
977: /* IF p_list_rule_rec.weightage_for_dedupe IS NULL THEN
978: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
979: FND_MESSAGE.set_name('AMS', 'AMS_LIST_RULES_ALL_NO_DEDUPE');
980: FND_MSG_PUB.add;
981: END IF;
982:
983: x_return_status := FND_API.g_ret_sts_error;

Line 990: FND_MESSAGE.set_name('AMS', 'AMS_LIST_RULES_ALL_NO_STRT_DT');

986:
987: -- check active_from_date
988: IF p_list_rule_rec.active_from_date IS NULL THEN
989: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
990: FND_MESSAGE.set_name('AMS', 'AMS_LIST_RULES_ALL_NO_STRT_DT');
991: FND_MSG_PUB.add;
992: END IF;
993:
994: x_return_status := FND_API.g_ret_sts_error;

Line 1027: 'AMS_LIST_RULES_ALL',

1023: AND p_list_rule_rec.list_rule_id IS NOT NULL
1024: THEN
1025: l_uk_flag := AMS_Utility_PVT.check_uniqueness
1026: (
1027: 'AMS_LIST_RULES_ALL',
1028: 'list_rule_id = ' || p_list_rule_rec.list_rule_id
1029: );
1030: END IF;
1031:

Line 1034: FND_MESSAGE.set_name('AMS', 'AMS_LIST_RULES_ALL_NO_ID');

1030: END IF;
1031:
1032: IF l_uk_flag = FND_API.g_false THEN
1033: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1034: FND_MESSAGE.set_name('AMS', 'AMS_LIST_RULES_ALL_NO_ID');
1035: FND_MSG_PUB.add;
1036: END IF;
1037:
1038: x_return_status := FND_API.g_ret_sts_error;

Line 1046: 'AMS_LIST_RULES_ALL',

1042: -- check list_rule_name
1043: IF p_list_rule_rec.list_rule_id IS NOT NULL THEN
1044: l_uk_flag := AMS_Utility_PVT.check_uniqueness
1045: (
1046: 'AMS_LIST_RULES_ALL',
1047: 'list_rule_id <> ' || p_list_rule_rec.list_rule_id
1048: || ' AND list_rule_name = ''' || p_list_rule_rec.list_rule_name || ''''
1049: );
1050: ELSE

Line 1053: 'AMS_LIST_RULES_ALL',

1049: );
1050: ELSE
1051: l_uk_flag := AMS_Utility_PVT.check_uniqueness
1052: (
1053: 'AMS_LIST_RULES_ALL',
1054: 'list_rule_name = ''' || p_list_rule_rec.list_rule_name || ''''
1055: );
1056: END IF;
1057:

Line 1060: FND_MESSAGE.set_name('AMS', 'AMS_LIST_RULES_ALL_DUP_NAME');

1056: END IF;
1057:
1058: IF l_uk_flag = FND_API.g_false THEN
1059: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1060: FND_MESSAGE.set_name('AMS', 'AMS_LIST_RULES_ALL_DUP_NAME');
1061: FND_MSG_PUB.add;
1062: END IF;
1063:
1064: x_return_status := FND_API.g_ret_sts_error;

Line 1169: SELECT * FROM AMS_LIST_RULES_ALL

1165: )
1166: IS
1167:
1168: CURSOR c_list_rule IS
1169: SELECT * FROM AMS_LIST_RULES_ALL
1170: WHERE list_rule_id = p_list_rule_rec.list_rule_id;
1171:
1172: l_list_rule_rec c_list_rule%ROWTYPE;
1173:

Line 1253: END AMS_List_Rules_All_PVT;

1249: x_list_rule_rec.list_rule_type := FND_API.g_miss_char;
1250:
1251: END init_rec;
1252:
1253: END AMS_List_Rules_All_PVT;