The following lines contain the word 'select', 'insert', 'update' or 'delete':
G_LAST_UPDATE_DATE DATE := Sysdate;
G_LAST_UPDATED_BY NUMBER := fnd_global.user_id;
G_LAST_UPDATE_LOGIN NUMBER := fnd_global.login_id;
x_loading_status := 'CN_INSERTED';
SELECT count(1)
INTO l_count
FROM cn_rulesets
WHERE name = l_ruleset_rec.ruleset_name
AND module_type = (SELECT lookup_code
FROM cn_lookups
WHERE lookup_type = 'MODULE_TYPE'
AND meaning = l_ruleset_rec.module_type)
AND start_date = l_ruleset_rec.start_date
AND end_date = l_ruleset_rec.end_date;
SELECT lookup_code
INTO l_ruleset_rec_pvt.module_type
FROM cn_lookups
WHERE lookup_type = 'MODULE_TYPE'
AND meaning = l_ruleset_rec.module_type;
PROCEDURE Update_Ruleset
( 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,
x_loading_status OUT NOCOPY VARCHAR2,
p_old_ruleset_rec IN OUT NOCOPY CN_Ruleset_PUB.ruleset_rec_type,
p_ruleset_rec IN OUT NOCOPY CN_Ruleset_PUB.ruleset_rec_type
) IS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Ruleset';
SAVEPOINT Update_Ruleset;
x_loading_status := 'CN_UPDATED';
'UPDATE_RULESET',
'B',
'C')
THEN
cn_ruleset_pub_cuhk.update_ruleset_pre
(p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
p_validation_level => p_validation_level,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
x_loading_status => x_loading_status,
p_ruleset_rec => l_ruleset_rec,
p_old_ruleset_rec => l_old_ruleset_rec);
'UPDATE_RULESET',
'B',
'V')
THEN
cn_ruleset_pub_vuhk.update_ruleset_pre
(p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
p_validation_level => p_validation_level,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
x_loading_status => x_loading_status,
p_ruleset_rec => l_ruleset_rec,
p_old_ruleset_rec => l_old_ruleset_rec);
SELECT count(1)
INTO l_count
FROM cn_rulesets
WHERE name = l_old_ruleset_rec.ruleset_name
AND start_date = l_old_ruleset_rec.start_date
AND end_date = l_old_ruleset_rec.end_date;
SELECT ruleset_id
INTO l_old_ruleset_rec_pvt.ruleset_id
FROM cn_rulesets
WHERE name = l_old_ruleset_rec.ruleset_name
AND start_date = l_old_ruleset_rec.start_date
AND end_date = l_old_ruleset_rec.end_date;
SELECT lookup_code
INTO l_ruleset_rec_pvt.module_type
FROM cn_lookups
WHERE lookup_type = 'MODULE_TYPE'
AND meaning = p_ruleset_rec.module_type;
SELECT lookup_code
INTO l_old_ruleset_rec_pvt.module_type
FROM cn_lookups
WHERE lookup_type = 'MODULE_TYPE'
AND meaning = p_old_ruleset_rec.module_type;
cn_ruleset_pvt.update_ruleset
(p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
p_validation_level => p_validation_level,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
x_loading_status => x_loading_status,
p_ruleset_rec => l_ruleset_rec_pvt,
p_old_ruleset_rec => l_old_ruleset_rec_pvt);
'UPDATE_RULESET',
'A',
'V')
THEN
cn_ruleset_pub_vuhk.update_ruleset_post
(p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
p_validation_level => p_validation_level,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
x_loading_status => x_loading_status,
p_ruleset_rec => l_ruleset_rec,
p_old_ruleset_rec => l_old_ruleset_rec);
'UPDATE_RULESET',
'A',
'C')
THEN
cn_ruleset_pub_cuhk.update_ruleset_post
(p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
p_validation_level => p_validation_level,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
x_loading_status => x_loading_status,
p_ruleset_rec => l_ruleset_rec,
p_old_ruleset_rec => l_old_ruleset_rec);
'UPDATE_RULESET',
'M',
'M')
THEN
IF cn_ruleset_pub_cuhk.ok_to_generate_msg
(p_ruleset_rec => l_ruleset_rec)
THEN
-- Clear bind variables
-- XMLGEN.clearBindValues;
ROLLBACK TO Update_Ruleset;
ROLLBACK TO Update_Ruleset;
ROLLBACK TO Update_Ruleset;