The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT AMS_LIST_WORD_REPLACES_S.NEXTVAL
FROM DUAL;
SELECT COUNT(*)
FROM AMS_LIST_WORD_REPLACES
WHERE list_word_replaces_id = wrd_rpl_id;
AMS_Utility_PVT.debug_message(l_full_name || ': insert');
INSERT INTO AMS_LIST_WORD_REPLACES
(
list_word_replaces_id,
last_update_date,
last_updated_by,
creation_date,
created_by,
last_update_login,
object_version_number,
original_word,
replacement_word,
enabled_flag,
description
)
VALUES
(
l_wrd_rpl_rec.list_word_replaces_id,
SYSDATE,
FND_GLOBAL.user_id,
SYSDATE,
FND_GLOBAL.user_id,
FND_GLOBAL.conc_login_id,
1,
l_wrd_rpl_rec.original_word,
l_wrd_rpl_rec.replacement_word,
l_wrd_rpl_rec.enabled_flag,
l_wrd_rpl_rec.description
);
PROCEDURE update_list_word_replace
(
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_wrd_rpl_rec IN wrd_rpl_rec_type
)
IS
l_api_version CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'update_list_word_replace';
SAVEPOINT update_list_word_replace;
p_validation_mode => JTF_PLSQL_API.g_update,
x_return_status => l_return_status,
p_wrd_rpl_rec => l_wrd_rpl_rec
);
AMS_Utility_PVT.debug_message(l_full_name||': update');
UPDATE AMS_LIST_WORD_REPLACES SET
last_update_date = SYSDATE,
last_updated_by = FND_GLOBAL.user_id,
last_update_login = FND_GLOBAL.conc_login_id,
object_version_number = l_wrd_rpl_rec.object_version_number + 1,
original_word = l_wrd_rpl_rec.original_word,
replacement_word = l_wrd_rpl_rec.replacement_word,
enabled_flag = l_wrd_rpl_rec.enabled_flag,
description = l_wrd_rpl_rec.description
WHERE list_word_replaces_id = l_wrd_rpl_rec.list_word_replaces_id
AND object_version_number = l_wrd_rpl_rec.object_version_number;
ROLLBACK TO update_list_word_replace;
ROLLBACK TO update_list_word_replace;
ROLLBACK TO update_list_word_replace;
END update_list_word_replace;
PROCEDURE delete_list_word_replace
(
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_wrd_rpl_id IN NUMBER,
p_object_version IN NUMBER
)
IS
l_api_version CONSTANT NUMBER := 1.0;
l_api_name CONSTANT VARCHAR2(30) := 'delete_list_word_replace';
SELECT * FROM AMS_LIST_WORD_FIELDS
WHERE LIST_WORD_REPLACES_ID = p_wrd_rpl_id;
SAVEPOINT delete_list_word_replace;
AMS_Utility_PVT.debug_message(l_full_name || ': delete');
DELETE FROM AMS_LIST_WORD_REPLACES
WHERE list_word_replaces_id = p_wrd_rpl_id
AND object_version_number = p_object_version;
AMS_Utility_PVT.debug_message(l_full_name || ': list word fields delete');
AMS_LIST_word_FIELDS_PVT.delete_list_word_field(
p_api_version => l_api_version,
p_init_msg_list => FND_API.g_true,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data,
p_wrd_fld_id => l_word_fields_rec.list_word_field_id,
p_object_version => l_word_fields_rec.object_version_number
);
ROLLBACK TO delete_list_word_replace;
ROLLBACK TO delete_list_word_replace;
ROLLBACK TO delete_list_word_replace;
END delete_list_word_replace;
SELECT list_word_replaces_id
FROM AMS_LIST_WORD_REPLACES
WHERE list_word_replaces_id = p_wrd_rpl_id
AND object_version_number = p_object_version
FOR UPDATE OF list_word_replaces_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_WORD_REPLACES_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_WORD_REPLACES
WHERE list_word_replaces_id = p_wrd_rpl_rec.list_word_replaces_id;
x_wrd_rpl_rec.last_update_date := FND_API.g_miss_date;
x_wrd_rpl_rec.last_updated_by := FND_API.g_miss_num;
x_wrd_rpl_rec.last_update_login := FND_API.g_miss_num;