The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT AMS_LIST_RULE_FIELDS_S.NEXTVAL
FROM DUAL;
SELECT COUNT(*)
FROM AMS_LIST_RULE_FIELDS
WHERE list_rule_field_id = rule_fld_id;
SELECT COUNT(*)
FROM AMS_LIST_RULE_USAGES
WHERE list_rule_id = lst_rule_id;
AMS_Utility_PVT.debug_message(l_full_name || ': insert');
INSERT INTO AMS_LIST_RULE_FIELDS
(
list_rule_field_id,
last_update_date,
last_updated_by,
creation_date,
created_by,
last_update_login,
object_version_number,
field_table_name,
field_column_name,
list_rule_id,
substring_length,
weightage,
sequence_number,
word_replacement_code
)
VALUES
(
l_rule_fld_rec.list_rule_field_id,
SYSDATE,
FND_GLOBAL.user_id,
SYSDATE,
FND_GLOBAL.user_id,
FND_GLOBAL.conc_login_id,
1,
l_rule_fld_rec.field_table_name,
l_rule_fld_rec.field_column_name,
l_rule_fld_rec.list_rule_id,
l_rule_fld_rec.substring_length,
l_rule_fld_rec.weightage,
l_rule_fld_rec.sequence_number,
l_rule_fld_rec.word_replacement_code
);
PROCEDURE update_list_rule_field
(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.g_false,
p_commit IN VARCHAR2 := FND_API.g_false,
p_validation_level IN NUMBER := FND_API.g_valid_level_full,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_rule_fld_rec IN rule_fld_rec_type
)
IS
l_api_version CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'update_list_rule_field';
SAVEPOINT update_list_rule_field;
p_validation_mode => JTF_PLSQL_API.g_update,
x_return_status => l_return_status,
p_rule_fld_rec => l_rule_fld_rec
);
AMS_Utility_PVT.debug_message(l_full_name||': update');
UPDATE AMS_LIST_RULE_FIELDS SET
last_update_date = SYSDATE,
last_updated_by = FND_GLOBAL.user_id,
last_update_login = FND_GLOBAL.conc_login_id,
object_version_number = l_rule_fld_rec.object_version_number + 1,
field_table_name = l_rule_fld_rec.field_table_name,
field_column_name = l_rule_fld_rec.field_column_name,
list_rule_id = l_rule_fld_rec.list_rule_id,
substring_length = l_rule_fld_rec.substring_length,
weightage = l_rule_fld_rec.weightage,
sequence_number = l_rule_fld_rec.sequence_number,
word_replacement_code = l_rule_fld_rec.word_replacement_code
WHERE list_rule_field_id = l_rule_fld_rec.list_rule_field_id
AND object_version_number = l_rule_fld_rec.object_version_number;
ROLLBACK TO update_list_rule_field;
ROLLBACK TO update_list_rule_field;
ROLLBACK TO update_list_rule_field;
END update_list_rule_field;
PROCEDURE delete_list_rule_field
(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.g_false,
p_commit IN VARCHAR2 := FND_API.g_false,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_rule_fld_id IN NUMBER,
p_object_version IN NUMBER
)
IS
l_api_version CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'delete_list_rule_field';
SELECT list_rule_id FROM ams_list_rule_fields
WHERE list_rule_field_id=l_lst_rule_field_id;
SELECT COUNT(*)
FROM AMS_LIST_RULE_USAGES
WHERE list_rule_id = lst_rule_id;
SAVEPOINT delete_list_rule_field;
AMS_Utility_PVT.debug_message(l_full_name || ': delete');
DELETE FROM AMS_LIST_RULE_FIELDS
WHERE list_rule_field_id = p_rule_fld_id
AND object_version_number = p_object_version;
ROLLBACK TO delete_list_rule_field;
ROLLBACK TO delete_list_rule_field;
ROLLBACK TO delete_list_rule_field;
END delete_list_rule_field;
SELECT list_rule_field_id
FROM AMS_LIST_RULE_FIELDS
WHERE list_rule_field_id = p_rule_fld_id
AND object_version_number = p_object_version
FOR UPDATE OF list_rule_field_id NOWAIT;
AND p_validation_mode = JTF_PLSQL_API.g_update THEN
IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
FND_MESSAGE.set_name('AMS', 'AMS_LIST_RULE_FLD_NO_ID');
AND p_validation_mode = JTF_PLSQL_API.g_update
THEN
IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
FND_MESSAGE.set_name('AMS', 'AMS_NO_OBJ_VER_NUM');
SELECT * FROM AMS_LIST_RULE_FIELDS
WHERE list_rule_field_id = p_rule_fld_rec.list_rule_field_id;
x_rule_fld_rec.last_update_date := FND_API.g_miss_date;
x_rule_fld_rec.last_updated_by := FND_API.g_miss_num;
x_rule_fld_rec.last_update_login := FND_API.g_miss_num;