The following lines contain the word 'select', 'insert', 'update' or 'delete':
p_last_updated_by IN NUMBER,
p_last_update_date IN DATE,
p_last_update_login IN NUMBER
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Create_Resp_Excl_Attr';
select count(*)
into l_duplicate
from ak_excluded_items
where resp_application_id = p_application_id
and attribute_code = p_attribute_code
and responsibility_id = p_responsibility_id
and attribute_application_id = p_attribute_appl_id;
INSERT into AK_EXCLUDED_ITEMS
(
RESPONSIBILITY_ID ,
ATTRIBUTE_APPLICATION_ID,
ATTRIBUTE_CODE ,
CREATED_BY ,
CREATION_DATE ,
LAST_UPDATED_BY ,
LAST_UPDATE_DATE ,
LAST_UPDATE_LOGIN ,
RESP_APPLICATION_ID
)
values
(
p_responsibility_id ,
p_attribute_appl_id ,
p_attribute_code ,
p_created_by ,
p_creation_date ,
p_last_updated_by ,
p_last_update_date ,
p_last_update_login ,
p_application_id
);
fnd_message.set_name('FND','SQL-NO INSERT');
PROCEDURE Delete_Resp_Excl_Attr
( p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
p_simulate 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_return_status OUT VARCHAR2,
p_msg_count OUT NUMBER,
p_msg_data OUT VARCHAR2,
-- p_msg_entity OUT VARCHAR2,
-- p_msg_entity_index OUT NUMBER,
p_responsibility_id IN NUMBER,
p_application_id IN NUMBER,
p_attribute_code IN VARCHAR2,
p_attribute_appl_id IN NUMBER
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Resp_Excl_Attr';
SAVEPOINT Delete_Resp_Excl_Attr_PVT;
Delete from AK_EXCLUDED_ITEMS
where resp_application_id = p_application_id
and attribute_code = p_attribute_code
and responsibility_id = p_responsibility_id
and attribute_application_id = p_attribute_appl_id;
fnd_message.set_name('FND','SQL-NO DELETE');
Rollback to Delete_Resp_Excl_Attr_PVT;
Rollback to Delete_Resp_Excl_Attr_PVT;
Rollback to Delete_Resp_Excl_Attr_PVT;
end Delete_Resp_Excl_Attr;