The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Update_Access_Helper
(
p_access_obj IN AMV_ACCESS_OBJ_TYPE,
x_return_status OUT NOCOPY VARCHAR2
);
Select
role_id
From jtf_rs_roles_vl
Where role_code = p_role_code
And role_type_code = G_MES_ROLE_TYPE_NAME
;
Select
rol.role_id
From jtf_rs_roles_vl rol, jtf_rs_role_relations_vl rel
Where rol.role_id = rel.role_id
And rel.role_resource_id = p_resource_id
And rel.role_resource_type = p_resource_type
And rol.role_type_code = G_MES_ROLE_TYPE_NAME
And rol.role_code = p_role_code;
Select amv_u_access_s.nextval, sysdate
From Dual;
Insert into amv_u_access
(
ACCESS_ID,
OBJECT_VERSION_NUMBER,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
ACCESS_TO_TABLE_CODE,
ACCESS_TO_TABLE_RECORD_ID,
USER_OR_GROUP_ID,
USER_OR_GROUP_TYPE,
EFFECTIVE_START_DATE,
EXPIRATION_DATE,
CAN_VIEW_FLAG,
CAN_CREATE_FLAG,
CAN_DELETE_FLAG,
CAN_UPDATE_FLAG,
CAN_CREATE_DIST_RULE_FLAG,
CHL_APPROVER_FLAG,
CHL_REQUIRED_FLAG,
CHL_REQUIRED_NEED_NOTIF_FLAG
)
values
(
l_access_id,
1, --OBJECT_VERSION_NUMBER
l_date,
l_current_user_id,
l_date,
l_current_user_id,
l_current_login_id,
l_access_obj.ACCESS_TO_TABLE_CODE,
l_access_obj.ACCESS_TO_TABLE_RECORD_ID,
l_access_obj.USER_OR_GROUP_ID,
l_access_obj.USER_OR_GROUP_TYPE,
l_access_obj.EFFECTIVE_START_DATE,
l_access_obj.EXPIRATION_DATE,
l_access_obj.CAN_VIEW_FLAG,
l_access_obj.CAN_CREATE_FLAG,
l_access_obj.CAN_DELETE_FLAG,
l_access_obj.CAN_UPDATE_FLAG,
l_access_obj.CAN_CREATE_DIST_RULE_FLAG,
l_access_obj.CHL_APPROVER_FLAG,
l_access_obj.CHL_REQUIRED_FLAG,
l_access_obj.CHL_REQUIRED_NEED_NOTIF_FLAG
);
PROCEDURE Update_Access_helper
(
p_access_obj IN AMV_ACCESS_OBJ_TYPE,
x_return_status OUT NOCOPY VARCHAR2
) AS
--
l_api_name CONSTANT VARCHAR2(30) := 'Update_Access_helper';
SAVEPOINT Update_Access_helper_PVT;
Update amv_u_access
Set LAST_UPDATE_DATE = sysdate,
LAST_UPDATED_BY = l_current_user_id,
LAST_UPDATE_LOGIN = l_current_login_id,
OBJECT_VERSION_NUMBER = object_version_number + 1,
EFFECTIVE_START_DATE = decode(l_access_obj.effective_start_date,
FND_API.G_MISS_DATE, EFFECTIVE_START_DATE,
l_access_obj.effective_start_date),
EXPIRATION_DATE = decode(l_access_obj.expiration_date,
FND_API.G_MISS_DATE, EXPIRATION_DATE,
l_access_obj.expiration_date),
CAN_VIEW_FLAG = decode(l_access_obj.can_view_flag,
FND_API.G_MISS_CHAR, CAN_VIEW_FLAG,
l_access_obj.can_view_flag),
CAN_CREATE_FLAG = decode(l_access_obj.can_create_flag,
FND_API.G_MISS_CHAR, CAN_CREATE_FLAG,
l_access_obj.can_create_flag),
CAN_DELETE_FLAG = decode(l_access_obj.can_delete_flag,
FND_API.G_MISS_CHAR, CAN_DELETE_FLAG,
l_access_obj.can_delete_flag),
CAN_UPDATE_FLAG = decode(l_access_obj.can_update_flag,
FND_API.G_MISS_CHAR, CAN_UPDATE_FLAG,
l_access_obj.can_update_flag),
CAN_CREATE_DIST_RULE_FLAG =
decode(l_access_obj.can_create_dist_rule_flag,
FND_API.G_MISS_CHAR, CAN_CREATE_DIST_RULE_FLAG,
l_access_obj.can_create_dist_rule_flag),
CHL_APPROVER_FLAG = decode(l_access_obj.chl_approver_flag,
FND_API.G_MISS_CHAR, CHL_APPROVER_FLAG,
l_access_obj.chl_approver_flag),
CHL_REQUIRED_FLAG = decode(l_access_obj.chl_required_flag,
FND_API.G_MISS_CHAR, CHL_REQUIRED_FLAG,
l_access_obj.chl_required_flag),
CHL_REQUIRED_NEED_NOTIF_FLAG =
decode(l_access_obj.chl_required_need_notif_flag,
FND_API.G_MISS_CHAR, CHL_REQUIRED_NEED_NOTIF_FLAG,
l_access_obj.chl_required_need_notif_flag)
where access_id = l_access_obj.access_id
;--and object_version_number = l_access_obj.access_id.object_version_number;
ROLLBACK TO Update_Access_helper_PVT;
END Update_Access_helper;
'Select ' ||
'r.source_id, ' ||
'r.resource_id, ' ||
's.user_name, ' ||
'r.resource_name, ' ||
'r.first_name, ' ||
'r.last_name ' ||
'From amv_rs_all_res_extns_vl r, jtf_rs_resource_extns s ';
'Select count(*) ' ||
'From amv_rs_all_res_extns_vl r, jtf_rs_resource_extns s ';
'Select ' ||
'r.source_id, ' ||
'r.resource_id, ' ||
's.user_name, ' ||
'r.resource_name, ' ||
'r.first_name, ' ||
'r.last_name ' ||
'From amv_rs_all_res_extns_vl r, jtf_rs_group_members m, jtf_rs_resource_extns s ';
'Select count(*) ' ||
'From amv_rs_all_res_extns_vl r, jtf_rs_group_members m, jtf_rs_resource_extns s ';
'And m.delete_flag <> ''Y'' ' ||
'And m.group_id = ' || p_group_id || ' ';
'Select ' ||
'r.source_id, ' ||
'r.resource_id, ' ||
'r.email user_name, ' ||
'r.resource_name, ' ||
'r.first_name, ' ||
'r.last_name ' ||
'From amv_rs_all_res_extns_vl r ';
'Select count(*) ' ||fnd_global.local_chr(10)||
'From amv_rs_all_res_extns_vl r ';
Select role_relate_id
From jtf_rs_role_relations_vl
Where role_id = l_role_id
And role_resource_id = p_resource_id
And role_resource_type = p_resource_type
;
Select
role_relate_id,
object_version_number
From jtf_rs_role_relations
Where role_id = p_role_id
And role_resource_id = p_resource_id
And role_resource_type = p_resource_type
And delete_flag <> 'Y'
--And role_type_code = G_MES_ROLE_TYPE_NAME
;
jtf_rs_role_relate_pub.delete_resource_role_relate
(
p_api_version => p_api_version,
p_commit => p_commit,
p_role_relate_id => l_role_relate_id,
p_object_version_num => l_version,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
Select
rol.role_code,
rol.role_id
From jtf_rs_role_relations_vl rel, jtf_rs_roles_vl rol
Where rel.role_resource_id = p_resource_id
And rel.role_resource_type = G_RESOURCE_ROLE_CODE
And rel.role_id = rol.role_id
And rol.role_type_code = G_MES_ROLE_TYPE_NAME
Order by rol.role_code;
Select
role_relate_id
From jtf_rs_role_relations_vl
Where role_id = p_role_id
And role_resource_id = p_res_id
And role_resource_type = G_RESOURCE_ROLE_CODE
;
Select rel.role_relate_id
From jtf_rs_role_relations_vl rel
, jtf_rs_resource_extns res
Where rel.role_id = p_role_id
And rel.role_resource_id = p_res_id
And rel.role_resource_type = G_RESOURCE_ROLE_CODE
And res.resource_id = rel.role_resource_id
And rel.start_date_active < sysdate
And nvl(rel.end_date_active, sysdate+1) > sysdate
And res.start_date_active < sysdate
And nvl(res.end_date_active, sysdate+1) > sysdate
;
Select
1
From dual
Where exists
(
select r.role_id
from jtf_rs_group_members m, jtf_rs_role_relations_vl r,
jtf_rs_group_usages usg
where m.resource_id = p_res_id
and m.delete_flag <> 'Y'
and m.group_id = r.role_resource_id
and r.role_resource_type = G_GROUP_ROLE_CODE
and r.role_id = p_role_id
and m.group_id = usg.group_id
and usg.usage = p_group_usage
);
Select
1
From dual
Where exists
(
select r.role_id
from jtf_rs_group_members m, jtf_rs_role_relations_vl r,
jtf_rs_groups_vl g, jtf_rs_group_usages usg
where m.resource_id = p_res_id
and m.delete_flag <> 'Y'
and m.group_id = r.role_resource_id
and r.role_id = p_role_id
and r.role_resource_type = G_GROUP_ROLE_CODE
--and r.role_type_code = G_MES_ROLE_TYPE_NAME
and r.start_date_active < sysdate
and nvl(r.end_date_active, sysdate+1) > sysdate
and g.group_id = m.group_id
and g.start_date_active < sysdate
and nvl(g.end_date_active, sysdate+1) > sysdate
and usg.group_id = g.group_id
and usg.usage = p_group_usage
)
;
Select
rol.role_code,
rol.role_id
From jtf_rs_role_relations_vl rel, jtf_rs_roles_vl rol
Where rol.role_id = rel.role_id
And rel.role_resource_id = p_group_id
And rel.role_resource_type = G_GROUP_ROLE_CODE
And rol.role_type_code = G_MES_ROLE_TYPE_NAME
Order by rol.role_code;
Select
role_relate_id
From jtf_rs_role_relations_vl
Where role_id = p_role_id
And role_resource_id = p_group_id
And role_resource_type = G_GROUP_ROLE_CODE
;
Select
r.role_relate_id
From jtf_rs_role_relations_vl r, jtf_rs_groups_vl g
Where r.role_id = p_role_id
And r.role_resource_id = p_group_id
And r.role_resource_type = G_GROUP_ROLE_CODE
And r.start_date_active < sysdate
And nvl(r.end_date_active, sysdate-1) < sysdate
And g.group_id = p_group_id
And g.start_date_active < sysdate
And nvl(g.end_date_active, sysdate-1) < sysdate;
Select g.group_id
From jtf_rs_groups_vl g, jtf_rs_group_usages usg
Where g.group_name = p_group_name
And g.start_date_active < sysdate
And nvl(g.end_date_active, sysdate+1) > sysdate
And usg.group_id = g.group_id
And usg.usage = p_group_usage
;
PROCEDURE Update_Group
(
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_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_group_id IN NUMBER,
p_new_group_name IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_new_group_desc IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_group_usage IN VARCHAR2 := G_MES_GROUP_USAGE,
p_email_address IN VARCHAR2 := FND_API.G_MISS_CHAR,
p_new_start_date IN DATE := FND_API.G_MISS_DATE,
p_new_end_date IN DATE := FND_API.G_MISS_DATE
) AS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Group';
Select object_version_number
From jtf_rs_groups_vl
Where group_id = p_group_id
;
Select g.group_id
From jtf_rs_groups_vl g, jtf_rs_group_usages usg
Where g.group_name = p_name
And usg.group_id = g.group_id
And usg.usage = p_group_usage
;
Select subscribing_to_id channel_id
From amv_u_my_channels
Where user_or_group_id = p_g_id
And user_or_group_type = G_GROUP_ARC_TYPE
And subscribing_to_type = G_CHAN_ARC_TYPE
And subscription_reason_type = 'ENFORCED'
;
SAVEPOINT Update_Group_Pvt;
jtf_rs_groups_pub.update_resource_group
(
p_api_version => p_api_version,
p_group_id => p_group_id,
p_group_number => null,
p_group_name => p_new_group_name,
p_group_desc => p_new_group_desc,
p_email_address => p_email_address,
p_start_date_active => p_new_start_date,
p_end_date_active => p_new_end_date,
p_object_version_num => l_object_version_num,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
update amv_c_channels_b set
EFFECTIVE_START_DATE = DECODE(p_new_start_date,
FND_API.G_MISS_DATE,
EFFECTIVE_START_DATE,
p_new_start_date),
EXPIRATION_DATE = DECODE(p_new_start_date,
FND_API.G_MISS_DATE,
EXPIRATION_DATE,
p_new_start_date),
LAST_UPDATE_DATE = sysdate,
LAST_UPDATED_BY = l_current_user_id,
LAST_UPDATE_LOGIN = l_current_login_id,
OBJECT_VERSION_NUMBER = OBJECT_VERSION_NUMBER + 1
where CHANNEL_ID = l_channel_id;
update amv_c_channels_tl set
CHANNEL_NAME = p_new_group_name,
LAST_UPDATE_DATE = sysdate,
LAST_UPDATED_BY = l_current_user_id,
LAST_UPDATE_LOGIN = l_current_login_id,
SOURCE_LANG = userenv('LANG')
where CHANNEL_ID = l_channel_id
and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
ROLLBACK TO Update_Group_Pvt;
ROLLBACK TO Update_Group_Pvt;
ROLLBACK TO Update_Group_Pvt;
END Update_Group;
PROCEDURE Delete_Group
(
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_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_group_id IN NUMBER := FND_API.G_MISS_NUM,
p_group_name IN VARCHAR2 := FND_API.G_MISS_CHAR
) AS
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Group';
Select group_id
From jtf_rs_groups_vl
Where group_name = p_name
;
SELECT CHANNEL_ID
FROM AMV_C_CHANNELS_TL
WHERE LANGUAGE = userenv('LANG') and
CHANNEL_NAME = (select group_name from
jtf_rs_groups_tl where group_id = p_grp_id and language = userenv('LANG'));
SAVEPOINT Delete_Group_Pvt;
Delete from amv_u_access
Where user_or_group_id = l_group_id
And User_OR_group_type = G_GROUP_ARC_TYPE;
Delete from amv_u_my_channels
Where user_or_group_id = l_group_id
And User_OR_group_type = G_GROUP_ARC_TYPE;
AMV_C_CHANNELS_PKG.DELETE_ROW(l_channel_id);
Update_Group
(
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,
p_check_login_user => p_check_login_user,
p_group_id => l_group_id,
p_new_group_name => FND_API.G_MISS_CHAR,
p_new_group_desc => FND_API.G_MISS_CHAR,
p_email_address => FND_API.G_MISS_CHAR,
p_new_start_date => sysdate -2,
p_new_end_date => sysdate -1
);
ROLLBACK TO Delete_Group_Pvt;
ROLLBACK TO Delete_Group_Pvt;
ROLLBACK TO Delete_Group_Pvt;
END Delete_Group;
Select
group_id,
group_name,
object_version_number,
email_address,
group_desc,
start_date_active,
end_date_active
From jtf_rs_groups_vl
Where group_id = p_group_id
;
'Select ' ||
'g.group_id, ' ||
'g.group_name, ' ||
'g.object_version_number, ' ||
'g.email_address, ' ||
'g.group_desc, ' ||
'g.start_date_active, ' ||
'g.end_date_active ' ||
'From jtf_rs_groups_vl g, jtf_rs_group_usages usg ';
'Select count(*) ' ||
'From jtf_rs_groups_vl g, jtf_rs_group_usages usg ';
'Select ' ||
'g.group_id, ' ||
'g.group_name, ' ||
'g.object_version_number, ' ||
'g.email_address, ' ||
'g.group_desc, ' ||
'g.start_date_active, ' ||
'g.end_date_active ' ||
'From jtf_rs_groups_vl g, jtf_rs_group_members m, ' ||
' jtf_rs_group_usages usg ';
'Select count(*) ' ||
'From jtf_rs_groups_vl g, jtf_rs_group_members m, ' ||
' jtf_rs_group_usages usg ';
'And m.delete_flag <> ''Y'' ' ||
'And m.resource_id = ' || p_resource_id || ' ' ||
'And g.start_date_active < sysdate ' ||
'And nvl(g.end_date_active, sysdate+1) > sysdate ' ||
'And usg.group_id = g.group_id ' ||
'And usg.usage = ''' || p_group_usage || ''' ';
'Select ' ||
'g.group_id, ' ||
'g.group_name, ' ||
'g.object_version_number, ' ||
'g.email_address, ' ||
'g.group_desc, ' ||
'g.start_date_active, ' ||
'g.end_date_active ' ||
'From jtf_rs_groups_vl g, jtf_rs_group_usages usg ';
'Select count(*) ' ||
'From jtf_rs_groups_vl g, jtf_rs_group_usages usg ';
Select group_member_id
From jtf_rs_group_members
Where resource_id = p_resource_id
And group_id = p_group_id
And delete_flag <> 'Y';
Select object_version_number
From jtf_rs_group_members
Where resource_id = p_resource_id
And group_id = p_group_id
And delete_flag <> 'Y';
jtf_rs_group_members_pub.delete_resource_group_members
(
p_api_version => 1.0,
p_commit => p_commit,
p_group_id => p_group_id,
p_group_number => null,
p_resource_id => p_resource_id,
p_resource_number => null,
p_object_version_num => l_version,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data
);
Select m.group_member_id
From jtf_rs_group_members m, jtf_rs_groups_vl g
Where m.resource_id = p_resource_id
And m.group_id = p_group_id
And m.delete_flag <> 'Y'
And g.group_id = p_group_id
And g.start_date_active < sysdate
And nvl(g.end_date_active, sysdate+1) > sysdate
;
PROCEDURE Update_Access
(
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_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_access_obj IN AMV_ACCESS_OBJ_TYPE
) AS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Access';
Select access_id
From amv_u_access
Where user_or_group_id = l_access_obj.user_or_group_id
And user_or_group_type = l_access_obj.user_or_group_type
And access_to_table_record_id = l_access_obj.access_to_table_record_id
And access_to_table_code = l_access_obj.access_to_table_code;
SAVEPOINT Update_Access_Pvt;
IF (l_access_obj.can_delete_flag IS NULL OR
l_access_obj.can_delete_flag <> FND_API.G_TRUE) THEN
l_access_obj.can_delete_flag := FND_API.G_FALSE;
IF (l_access_obj.can_update_flag IS NULL OR
l_access_obj.can_update_flag <> FND_API.G_TRUE) THEN
l_access_obj.can_update_flag := FND_API.G_FALSE;
IF (l_access_obj.can_delete_flag IS NULL) THEN
l_access_obj.can_delete_flag := FND_API.G_MISS_CHAR;
IF (l_access_obj.can_update_flag IS NULL) THEN
l_access_obj.can_update_flag := FND_API.G_MISS_CHAR;
Update_Access_helper
(
p_access_obj => l_access_obj,
x_return_status => x_return_status
);
ROLLBACK TO Update_Access_Pvt;
ROLLBACK TO Update_Access_Pvt;
ROLLBACK TO Update_Access_Pvt;
END Update_Access;
PROCEDURE Update_Access
(
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_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_access_obj_array IN AMV_ACCESS_OBJ_VARRAY
) AS
l_api_name CONSTANT VARCHAR2(30) := 'Update_Access';
SAVEPOINT Update_Access_Pvt;
Update_Access
(
p_api_version => p_api_version,
p_commit => p_commit,
p_validation_level => p_validation_level,
x_return_status => l_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_check_login_user => FND_API.G_FALSE,
p_access_obj => p_access_obj_array(i)
);
ROLLBACK TO Update_Access_Pvt;
ROLLBACK TO Update_Access_Pvt;
ROLLBACK TO Update_Access_Pvt;
END Update_Access;
PROCEDURE Update_ResourceApplAccess
(
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_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_resource_id IN NUMBER,
p_application_id IN NUMBER,
p_access_flag_obj IN AMV_ACCESS_FLAG_OBJ_TYPE
) AS
l_access_obj AMV_ACCESS_OBJ_TYPE;
l_access_obj.CAN_DELETE_FLAG := p_access_flag_obj.can_delete_flag;
l_access_obj.CAN_UPDATE_FLAG := p_access_flag_obj.can_update_flag;
p_access_flag_obj.can_delete_flag,
p_access_flag_obj.can_update_flag,
p_access_flag_obj.can_create_dist_rule_flag,
p_access_flag_obj.chl_approver_flag,
p_access_flag_obj.chl_required_flag,
p_access_flag_obj.chl_required_need_notif_flag
);
Update_Access
(
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,
p_check_login_user => p_check_login_user,
p_access_obj => l_access_obj
);
END Update_ResourceApplAccess;
PROCEDURE Update_ResourceChanAccess
(
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_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_resource_id IN NUMBER,
p_channel_id IN NUMBER,
p_access_flag_obj IN AMV_ACCESS_FLAG_OBJ_TYPE
) AS
l_access_obj AMV_ACCESS_OBJ_TYPE;
l_access_obj.CAN_DELETE_FLAG := p_access_flag_obj.can_delete_flag;
l_access_obj.CAN_UPDATE_FLAG := p_access_flag_obj.can_update_flag;
p_access_flag_obj.can_delete_flag,
p_access_flag_obj.can_update_flag,
p_access_flag_obj.can_create_dist_rule_flag,
p_access_flag_obj.chl_approver_flag,
p_access_flag_obj.chl_required_flag,
p_access_flag_obj.chl_required_need_notif_flag
);
Update_Access
(
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,
p_check_login_user => p_check_login_user,
p_access_obj => l_access_obj
);
END Update_ResourceChanAccess;
PROCEDURE Update_ResourceCateAccess
(
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_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_resource_id IN NUMBER,
p_category_id IN NUMBER,
p_access_flag_obj IN AMV_ACCESS_FLAG_OBJ_TYPE
) AS
l_access_obj AMV_ACCESS_OBJ_TYPE;
l_access_obj.CAN_DELETE_FLAG := p_access_flag_obj.can_delete_flag;
l_access_obj.CAN_UPDATE_FLAG := p_access_flag_obj.can_update_flag;
p_access_flag_obj.can_delete_flag,
p_access_flag_obj.can_update_flag,
p_access_flag_obj.can_create_dist_rule_flag,
p_access_flag_obj.chl_approver_flag,
p_access_flag_obj.chl_required_flag,
p_access_flag_obj.chl_required_need_notif_flag
);
Update_Access
(
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,
p_check_login_user => p_check_login_user,
p_access_obj => l_access_obj
);
END Update_ResourceCateAccess;
PROCEDURE Update_ResourceItemAccess
(
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_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_resource_id IN NUMBER,
p_item_id IN NUMBER,
p_access_flag_obj IN AMV_ACCESS_FLAG_OBJ_TYPE
) AS
l_access_obj AMV_ACCESS_OBJ_TYPE;
l_access_obj.CAN_DELETE_FLAG := p_access_flag_obj.can_delete_flag;
l_access_obj.CAN_UPDATE_FLAG := p_access_flag_obj.can_update_flag;
p_access_flag_obj.can_delete_flag,
p_access_flag_obj.can_update_flag,
p_access_flag_obj.can_create_dist_rule_flag,
p_access_flag_obj.chl_approver_flag,
p_access_flag_obj.chl_required_flag,
p_access_flag_obj.chl_required_need_notif_flag
);
Update_Access
(
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,
p_check_login_user => p_check_login_user,
p_access_obj => l_access_obj
);
END Update_ResourceItemAccess;
PROCEDURE Update_GroupApplAccess
(
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_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_resource_id IN NUMBER,
p_group_id IN NUMBER,
p_application_id IN NUMBER,
p_access_flag_obj IN AMV_ACCESS_FLAG_OBJ_TYPE
) AS
l_access_obj AMV_ACCESS_OBJ_TYPE;
l_access_obj.CAN_DELETE_FLAG := p_access_flag_obj.can_delete_flag;
l_access_obj.CAN_UPDATE_FLAG := p_access_flag_obj.can_update_flag;
p_access_flag_obj.can_delete_flag,
p_access_flag_obj.can_update_flag,
p_access_flag_obj.can_create_dist_rule_flag,
p_access_flag_obj.chl_approver_flag,
p_access_flag_obj.chl_required_flag,
p_access_flag_obj.chl_required_need_notif_flag
);
Update_Access
(
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,
p_check_login_user => p_check_login_user,
p_access_obj => l_access_obj
);
END Update_GroupApplAccess;
PROCEDURE Update_GroupChanAccess
(
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_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_group_id IN NUMBER,
p_channel_id IN NUMBER,
p_access_flag_obj IN AMV_ACCESS_FLAG_OBJ_TYPE
) AS
l_access_obj AMV_ACCESS_OBJ_TYPE;
l_access_obj.CAN_DELETE_FLAG := p_access_flag_obj.can_delete_flag;
l_access_obj.CAN_UPDATE_FLAG := p_access_flag_obj.can_update_flag;
p_access_flag_obj.can_delete_flag,
p_access_flag_obj.can_update_flag,
p_access_flag_obj.can_create_dist_rule_flag,
p_access_flag_obj.chl_approver_flag,
p_access_flag_obj.chl_required_flag,
p_access_flag_obj.chl_required_need_notif_flag
);
Update_Access
(
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,
p_check_login_user => p_check_login_user,
p_access_obj => l_access_obj
);
END Update_GroupChanAccess;
PROCEDURE Update_GroupCateAccess
(
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_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_group_id IN NUMBER,
p_category_id IN NUMBER,
p_access_flag_obj IN AMV_ACCESS_FLAG_OBJ_TYPE
) AS
l_access_obj AMV_ACCESS_OBJ_TYPE;
l_access_obj.CAN_DELETE_FLAG := p_access_flag_obj.can_delete_flag;
l_access_obj.CAN_UPDATE_FLAG := p_access_flag_obj.can_update_flag;
p_access_flag_obj.can_delete_flag,
p_access_flag_obj.can_update_flag,
p_access_flag_obj.can_create_dist_rule_flag,
p_access_flag_obj.chl_approver_flag,
p_access_flag_obj.chl_required_flag,
p_access_flag_obj.chl_required_need_notif_flag
);
Update_Access
(
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,
p_check_login_user => p_check_login_user,
p_access_obj => l_access_obj
);
END Update_GroupCateAccess;
PROCEDURE Update_GroupItemAccess
(
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_check_login_user IN VARCHAR2 := FND_API.G_TRUE,
p_group_id IN NUMBER,
p_item_id IN NUMBER,
p_access_flag_obj IN AMV_ACCESS_FLAG_OBJ_TYPE
) AS
l_access_obj AMV_ACCESS_OBJ_TYPE;
l_access_obj.CAN_DELETE_FLAG := p_access_flag_obj.can_delete_flag;
l_access_obj.CAN_UPDATE_FLAG := p_access_flag_obj.can_update_flag;
p_access_flag_obj.can_delete_flag,
p_access_flag_obj.can_update_flag,
p_access_flag_obj.can_create_dist_rule_flag,
p_access_flag_obj.chl_approver_flag,
p_access_flag_obj.chl_required_flag,
p_access_flag_obj.chl_required_need_notif_flag
);
Update_Access
(
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,
p_check_login_user => p_check_login_user,
p_access_obj => l_access_obj
);
END Update_GroupItemAccess;
Select
C.CHANNEL_NAME,
U.ACCESS_TO_TABLE_RECORD_ID,
U.ACCESS_ID,
U.OBJECT_VERSION_NUMBER,
U.EFFECTIVE_START_DATE,
U.EXPIRATION_DATE,
U.CAN_VIEW_FLAG,
U.CAN_CREATE_FLAG,
U.CAN_DELETE_FLAG,
U.CAN_UPDATE_FLAG,
U.CAN_CREATE_DIST_RULE_FLAG,
U.CHL_APPROVER_FLAG,
U.CHL_REQUIRED_FLAG,
U.CHL_REQUIRED_NEED_NOTIF_FLAG
From amv_u_access u, amv_c_channels_vl c
Where u.user_or_group_id = p_user_or_group_id
And u.user_or_group_type = p_user_or_group_type
And access_to_table_code = G_CHAN_ARC_TYPE
And u.access_to_table_record_id = c.channel_id;
x_access_obj_varray(l_count).CAN_DELETE_FLAG := cur.CAN_DELETE_FLAG;
x_access_obj_varray(l_count).CAN_UPDATE_FLAG := cur.CAN_UPDATE_FLAG;
cur.CAN_DELETE_FLAG,
cur.CAN_UPDATE_FLAG,
cur.CAN_CREATE_DIST_RULE_FLAG,
cur.CHL_APPROVER_FLAG,
cur.CHL_REQUIRED_FLAG,
cur.CHL_REQUIRED_NEED_NOTIF_FLAG
);
Select
G.GROUP_NAME NAME,
U.USER_OR_GROUP_ID,
U.USER_OR_GROUP_TYPE,
U.ACCESS_TO_TABLE_RECORD_ID,
U.ACCESS_TO_TABLE_CODE,
U.ACCESS_ID,
U.OBJECT_VERSION_NUMBER,
U.EFFECTIVE_START_DATE,
U.EXPIRATION_DATE,
U.CAN_VIEW_FLAG,
U.CAN_CREATE_FLAG,
U.CAN_DELETE_FLAG,
U.CAN_UPDATE_FLAG,
U.CAN_CREATE_DIST_RULE_FLAG,
U.CHL_APPROVER_FLAG,
U.CHL_REQUIRED_FLAG,
U.CHL_REQUIRED_NEED_NOTIF_FLAG
From amv_u_access u, jtf_rs_groups_vl g
Where u.user_or_group_id = g.group_id
And u.user_or_group_type = G_GROUP_ARC_TYPE
And access_to_table_code = G_CHAN_ARC_TYPE
And u.access_to_table_record_id = p_channel_id;
Select
R.LAST_NAME || ', ' || R.FIRST_NAME NAME,
U.USER_OR_GROUP_ID,
U.USER_OR_GROUP_TYPE,
U.ACCESS_TO_TABLE_RECORD_ID,
U.ACCESS_TO_TABLE_CODE,
U.ACCESS_ID,
U.OBJECT_VERSION_NUMBER,
U.EFFECTIVE_START_DATE,
U.EXPIRATION_DATE,
U.CAN_VIEW_FLAG,
U.CAN_CREATE_FLAG,
U.CAN_DELETE_FLAG,
U.CAN_UPDATE_FLAG,
U.CAN_CREATE_DIST_RULE_FLAG,
U.CHL_APPROVER_FLAG,
U.CHL_REQUIRED_FLAG,
U.CHL_REQUIRED_NEED_NOTIF_FLAG
From amv_u_access u, amv_rs_all_res_extns_vl r
Where u.user_or_group_id = r.resource_id
And u.user_or_group_type = G_USER_ARC_TYPE
And access_to_table_code = G_CHAN_ARC_TYPE
And u.access_to_table_record_id = p_channel_id;
x_access_obj_varray(l_count).CAN_DELETE_FLAG := cur.CAN_DELETE_FLAG;
x_access_obj_varray(l_count).CAN_UPDATE_FLAG := cur.CAN_UPDATE_FLAG;
cur.CAN_DELETE_FLAG,
cur.CAN_UPDATE_FLAG,
cur.CAN_CREATE_DIST_RULE_FLAG,
cur.CHL_APPROVER_FLAG,
cur.CHL_REQUIRED_FLAG,
cur.CHL_REQUIRED_NEED_NOTIF_FLAG
);
x_access_obj_varray(l_count).CAN_DELETE_FLAG := cur.CAN_DELETE_FLAG;
x_access_obj_varray(l_count).CAN_UPDATE_FLAG := cur.CAN_UPDATE_FLAG;
cur.CAN_DELETE_FLAG,
cur.CAN_UPDATE_FLAG,
cur.CAN_CREATE_DIST_RULE_FLAG,
cur.CHL_APPROVER_FLAG,
cur.CHL_REQUIRED_FLAG,
cur.CHL_REQUIRED_NEED_NOTIF_FLAG
);
Select
ACCESS_ID,
OBJECT_VERSION_NUMBER,
EFFECTIVE_START_DATE,
EXPIRATION_DATE,
CAN_VIEW_FLAG,
CAN_CREATE_FLAG,
CAN_DELETE_FLAG,
CAN_UPDATE_FLAG,
CAN_CREATE_DIST_RULE_FLAG,
CHL_APPROVER_FLAG,
CHL_REQUIRED_FLAG,
CHL_REQUIRED_NEED_NOTIF_FLAG
From amv_u_access
Where user_or_group_id = p_user_or_group_id
And user_or_group_type = p_user_or_group_type
And access_to_table_record_id = p_business_object_id
And access_to_table_code = p_business_object_type;
x_access_obj.CAN_DELETE_FLAG := FND_API.G_FALSE;
x_access_obj.CAN_UPDATE_FLAG := FND_API.G_FALSE;
x_access_obj.CAN_DELETE_FLAG,
x_access_obj.CAN_UPDATE_FLAG,
x_access_obj.CAN_CREATE_DIST_RULE_FLAG,
x_access_obj.CHL_APPROVER_FLAG,
x_access_obj.CHL_REQUIRED_FLAG,
x_access_obj.CHL_REQUIRED_NEED_NOTIF_FLAG;
Select
effective_start_date,
expiration_date
From amv_c_channels_b
Where channel_id = p_id;
Select
actual_avail_from_date effective_start_date,
actual_avail_to_date expiration_date
From ams_deliverables_all_b
Where deliverable_id = p_id;
Select
CAN_VIEW_FLAG,
CAN_CREATE_FLAG,
CAN_DELETE_FLAG,
CAN_UPDATE_FLAG,
CAN_CREATE_DIST_RULE_FLAG,
CHL_APPROVER_FLAG,
CHL_REQUIRED_FLAG,
CHL_REQUIRED_NEED_NOTIF_FLAG
From amv_u_access
Where user_or_group_id = p_user_or_group_id
And user_or_group_type = p_user_or_group_type
And access_to_table_record_id = p_business_object_id
And access_to_table_code = p_business_object_type;
Select A.CAN_VIEW_FLAG,
A.CAN_CREATE_FLAG,
A.CAN_DELETE_FLAG,
A.CAN_UPDATE_FLAG,
A.CAN_CREATE_DIST_RULE_FLAG,
A.CHL_APPROVER_FLAG,
A.CHL_REQUIRED_FLAG,
A.CHL_REQUIRED_NEED_NOTIF_FLAG
From amv_u_access a
, jtf_rs_resource_extns r
Where a.user_or_group_id = p_user_or_group_id
And a.user_or_group_type = G_USER_ARC_TYPE
And a.access_to_table_record_id = p_business_object_id
And a.access_to_table_code = p_business_object_type
And nvl(a.effective_start_date, sysdate-1) < sysdate
And nvl(a.expiration_date, sysdate+1) > sysdate
And r.resource_id = a.user_or_group_id
--And r.active_flag = 'Y'
;
Select
A.CAN_VIEW_FLAG,
A.CAN_CREATE_FLAG,
A.CAN_DELETE_FLAG,
A.CAN_UPDATE_FLAG,
A.CAN_CREATE_DIST_RULE_FLAG,
A.CHL_APPROVER_FLAG,
A.CHL_REQUIRED_FLAG,
A.CHL_REQUIRED_NEED_NOTIF_FLAG
From amv_u_access a, jtf_rs_groups_vl g
Where a.user_or_group_id = p_user_or_group_id
And a.user_or_group_type = G_GROUP_ARC_TYPE
And a.access_to_table_record_id = p_business_object_id
And a.access_to_table_code = p_business_object_type
And nvl(a.effective_start_date, sysdate-1) < sysdate
And nvl(a.expiration_date, sysdate+1) > sysdate
And g.group_id = a.user_or_group_id
And nvl(g.start_date_active, sysdate-1) < sysdate
And nvl(g.end_date_active, sysdate+1) > sysdate;
Select
A.CAN_VIEW_FLAG,
A.CAN_CREATE_FLAG,
A.CAN_DELETE_FLAG,
A.CAN_UPDATE_FLAG,
A.CAN_CREATE_DIST_RULE_FLAG,
A.CHL_APPROVER_FLAG,
A.CHL_REQUIRED_FLAG,
A.CHL_REQUIRED_NEED_NOTIF_FLAG
From amv_u_access a, jtf_rs_group_members m
Where a.access_to_table_record_id = p_business_object_id
And a.access_to_table_code = p_business_object_type
And a.user_or_group_type = G_GROUP_ARC_TYPE
And a.user_or_group_id = m.group_id
And m.resource_id = p_user_or_group_id;
Select
A.CAN_VIEW_FLAG,
A.CAN_CREATE_FLAG,
A.CAN_DELETE_FLAG,
A.CAN_UPDATE_FLAG,
A.CAN_CREATE_DIST_RULE_FLAG,
A.CHL_APPROVER_FLAG,
A.CHL_REQUIRED_FLAG,
A.CHL_REQUIRED_NEED_NOTIF_FLAG
From amv_u_access a, jtf_rs_group_members m, jtf_rs_groups_vl g
Where a.access_to_table_record_id = p_business_object_id
And a.access_to_table_code =p_business_object_type
And nvl(a.effective_start_date, sysdate-1) < sysdate
And nvl(a.expiration_date, sysdate+1) > sysdate
And a.user_or_group_type = G_GROUP_ARC_TYPE
And a.user_or_group_id = m.group_id
And m.resource_id = p_user_or_group_id
--And nvl(m.start_date_active, sysdate-1) < sysdate
--And nvl(m.end_date_active, sysdate+1) > sysdate
And g.group_id = m.group_id
And nvl(g.start_date_active, sysdate-1) < sysdate
And nvl(g.end_date_active, sysdate+1) > sysdate;
x_access_flag_obj.CAN_DELETE_FLAG := FND_API.G_FALSE;
x_access_flag_obj.CAN_UPDATE_FLAG := FND_API.G_FALSE;
x_access_flag_obj.CAN_DELETE_FLAG,
x_access_flag_obj.CAN_UPDATE_FLAG,
x_access_flag_obj.CAN_CREATE_DIST_RULE_FLAG,
x_access_flag_obj.CHL_APPROVER_FLAG,
x_access_flag_obj.CHL_REQUIRED_FLAG,
x_access_flag_obj.CHL_REQUIRED_NEED_NOTIF_FLAG;
x_access_flag_obj.CAN_DELETE_FLAG,
x_access_flag_obj.CAN_UPDATE_FLAG,
x_access_flag_obj.CAN_CREATE_DIST_RULE_FLAG,
x_access_flag_obj.CHL_APPROVER_FLAG,
x_access_flag_obj.CHL_REQUIRED_FLAG,
x_access_flag_obj.CHL_REQUIRED_NEED_NOTIF_FLAG;
IF (csr1.CAN_DELETE_FLAG = FND_API.G_TRUE) THEN
x_access_flag_obj.CAN_DELETE_FLAG := FND_API.G_TRUE;
IF (csr1.CAN_UPDATE_FLAG = FND_API.G_TRUE) THEN
x_access_flag_obj.CAN_UPDATE_FLAG := FND_API.G_TRUE;
x_access_flag_obj.CAN_DELETE_FLAG,
x_access_flag_obj.CAN_UPDATE_FLAG,
x_access_flag_obj.CAN_CREATE_DIST_RULE_FLAG,
x_access_flag_obj.CHL_APPROVER_FLAG,
x_access_flag_obj.CHL_REQUIRED_FLAG,
x_access_flag_obj.CHL_REQUIRED_NEED_NOTIF_FLAG;
IF (csr1.CAN_DELETE_FLAG = FND_API.G_TRUE) THEN
x_access_flag_obj.CAN_DELETE_FLAG := FND_API.G_TRUE;
IF (csr1.CAN_UPDATE_FLAG = FND_API.G_TRUE) THEN
x_access_flag_obj.CAN_UPDATE_FLAG := FND_API.G_TRUE;