The following lines contain the word 'select', 'insert', 'update' or 'delete':
REM | ansingh 08/01/03 Delete Hanging Related Links |
REM | nkishore 03/02/03 Get page_id based on function_id |
REM +=======================================================================+
*/
-- **************** GLOBAL VARIABLES *********************
g_user_id NUMBER := -1 ;
SELECT bs.schedule_id, bs.plug_id
FROM
icx_portlet_customizations ipc,
bis_schedule_preferences bs
WHERE
bs.plug_id = ipc.plug_id and
ipc.reference_path = p_ref_path ;
SELECT bs.schedule_id, bs.user_id, bs.plug_id
FROM
icx_portlet_customizations ipc,
bis_schedule_preferences bs
WHERE
bs.plug_id = ipc.plug_id AND
ipc.reference_path = p_ref_path AND
bs.user_id = g_user_id ;
SELECT function_id FROM fnd_form_functions
WHERE type ='JSP'
AND web_html_call = 'OA.jsp?akRegionCode=BIS_COMPONENT_PAGE&akRegionApplicationId=191'
AND upper(parameters) like upper(c_pageName);
SELECT user_id INTO g_user_id FROM fnd_user
WHERE user_name = p_user_name;
bulk_delete_schedules (p_schedule_ids => l_schedule_id_arr) ;
bulk_delete_attributes (p_schedule_ids => l_schedule_id_arr, p_page_id => l_page_id);
DELETE_HANGING_RELATED_LINKS(pUserId=>g_user_id, pPlugIdArray=>l_plugId_Array);
-- Update the caching_key in icx_portlet_customizations
FOR k in l_ref_path_tbl.FIRST..l_ref_path_tbl.LAST LOOP
BIS_PMV_UTIL.stale_portlet_by_refPath(l_ref_path_tbl(k).ref_path) ;
select menu_id
into l_menu_id
from fnd_menus
where menu_name = p_page_name ;
select function_id into l_function_id
from fnd_form_functions
where function_name = p_function_name;
PROCEDURE bulk_delete_schedules
(
p_schedule_ids IN BISVIEWER.t_num
)
IS
BEGIN
IF p_schedule_ids.COUNT > 0 THEN
IF (g_user_id = -1) OR (g_user_id IS NULL) THEN
FORALL i in p_schedule_ids.FIRST..p_schedule_ids.LAST
delete from bis_schedule_preferences
where schedule_id = p_schedule_ids(i) ;
delete from bis_scheduler
where schedule_id = p_schedule_ids(i) ;
delete from bis_schedule_preferences
where schedule_id = p_schedule_ids(i)
and user_id = g_user_id;
delete from bis_scheduler
where schedule_id = p_schedule_ids(i)
and user_id = g_user_id;
END bulk_delete_schedules ;
PROCEDURE bulk_delete_attributes (p_schedule_ids IN BISVIEWER.t_num,
p_page_id IN NUMBER)
IS
BEGIN
IF p_schedule_ids.COUNT > 0 THEN
IF (g_user_id = -1) OR (g_user_id IS NULL) THEN
FORALL i in p_schedule_ids.FIRST..p_schedule_ids.LAST
-- split this for bug 5130341
delete from bis_user_attributes
where schedule_id = p_schedule_ids(i) ;
delete from bis_user_attributes
where page_id = p_page_id
and user_id > -2; --to use the index
delete from bis_user_attributes
where
(schedule_id = p_schedule_ids(i)
and user_id = g_user_id);
delete from bis_user_attributes
where
(page_id = p_page_id
and user_id = g_user_id) ;
END bulk_delete_attributes ;
l_all_ref_paths_stmt := 'select name from wwpob_portlet_instance$ where page_id = :1';
select reference_path
from icx_portlet_customizations
where reference_path like '%' || p_page_id || '%' ;
PROCEDURE DELETE_HANGING_RELATED_LINKS (pUserId IN NUMBER, pPlugIdArray IN BISVIEWER.t_num)
IS
BEGIN
IF (pUserId = -1) OR (pUserId IS NULL) THEN
FORALL i IN pPlugIdArray.FIRST..pPlugIdArray.LAST
DELETE FROM BIS_RELATED_LINKS
WHERE FUNCTION_ID = pPlugIdArray(i);
DELETE FROM BIS_RELATED_LINKS
WHERE FUNCTION_ID = pPlugIdArray(i)
AND USER_ID = pUserId;
END DELETE_HANGING_RELATED_LINKS;