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;
SELECT comp_plan_id
FROM cn_comp_plans
WHERE name = p_plan_name
and org_id = p_org_id;
SELECT quota_id
FROM cn_quotas_v
WHERE name = p_element_name and org_id = p_org_id;
PROCEDURE Update_Quota_Assign
(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 ,
p_quota_assign_rec IN quota_assign_rec_type ,
x_return_status OUT NOCOPY VARCHAR2 ,
x_msg_count OUT NOCOPY NUMBER ,
x_msg_data OUT NOCOPY VARCHAR2 ) IS
l_api_name CONSTANT VARCHAR2(30)
:= 'Update_Quota_Assign';
SELECT quota_assign_id, object_version_number, org_id
FROM cn_quota_assigns
WHERE comp_plan_id = p_cp_id
AND quota_id = p_pe_id;
SAVEPOINT Update_Quota_Assign_Pub;
'cn.plsql.CN_QUOTA_ASSIGN_PUB.Update_Quota_Assign.org_validate',
'Validated org_id = ' || l_org_id || ' status = '|| l_status);
FND_MESSAGE.SET_NAME ('FND' , 'FND_MO_OU_CANNOT_UPDATE');
'cn.plsql.CN_QUOTA_ASSIGN_PUB.Update_Quota_Assign.error',
true);
FND_MESSAGE.SET_NAME ('FND' , 'FND_MO_OU_CANNOT_UPDATE');
cn_quota_assign_pvt.update_quota_assign
( p_api_version =>1.0,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
p_validation_level => FND_API.G_VALID_LEVEL_FULL,
p_quota_assign => l_pvt_quota_assign_rec,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data);
ROLLBACK TO Update_Quota_Assign_Pub;
ROLLBACK TO Update_Quota_Assign_Pub;
ROLLBACK TO Update_Quota_Assign_Pub;
END Update_Quota_Assign;
PROCEDURE Delete_Quota_Assign
(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 ,
p_quota_assign_rec IN quota_assign_rec_type ,
x_return_status OUT NOCOPY VARCHAR2 ,
x_msg_count OUT NOCOPY NUMBER ,
x_msg_data OUT NOCOPY VARCHAR2 ) IS
l_api_name CONSTANT VARCHAR2(30)
:= 'Delete_Quota_Assign';
SELECT quota_assign_id, object_version_number, org_id
FROM cn_quota_assigns
WHERE comp_plan_id = p_cp_id
AND quota_id = p_pe_id;
SAVEPOINT Delete_Quota_Assign_Pub;
'cn.plsql.CN_QUOTA_ASSIGN_PUB.Delete_Quota_Assign.org_validate',
'Validated org_id = ' || l_org_id || ' status = '|| l_status);
FND_MESSAGE.SET_NAME ('FND' , 'FND_MO_OU_CANNOT_UPDATE');
'cn.plsql.CN_QUOTA_ASSIGN_PUB.Delete_Quota_Assign.error',
true);
FND_MESSAGE.SET_NAME ('FND' , 'FND_MO_OU_CANNOT_UPDATE');
cn_quota_assign_pvt.delete_quota_assign
( p_api_version =>1.0,
p_init_msg_list => FND_API.G_FALSE,
p_commit => FND_API.G_FALSE,
p_validation_level => FND_API.G_VALID_LEVEL_FULL,
p_quota_assign => l_pvt_quota_assign_rec,
x_return_status => l_return_status,
x_msg_count => l_msg_count,
x_msg_data => l_msg_data);
ROLLBACK TO Delete_Quota_Assign_Pub;
ROLLBACK TO Delete_Quota_Assign_Pub;
ROLLBACK TO Delete_Quota_Assign_Pub;
END Delete_Quota_Assign;