[Home] [Help]
80: -- modified to remove GSCC warning File.Sql.35
81: l_index_mgmt_enabled varchar2(1);
82: begin
83: l_index_mgmt_enabled := 'N';
84: l_stmt := 'select Drop_create_index_flag from bis_obj_properties where OBJECT_TYPE=''MV'' and OBJECT_NAME=:1'; --bug 4186097. removed p_mv_schema check, because p_mv_schema gives the Schema in which
85: --the MV is created, whereas OBJECT_OWNER is a product short name to whom the MV belongs.
86: open c_index_mgmt_flag for l_stmt using p_mv_name;
87: fetch c_index_mgmt_flag into l_index_mgmt_enabled;
88: close c_index_mgmt_flag;
295:
296: procedure enable_index_mgmt(p_mv_name in varchar2,P_mv_schema in varchar2)
297: is
298: begin
299: update bis_obj_properties set DROP_CREATE_INDEX_FLAG='Y', LAST_UPDATED_BY= FND_GLOBAL.User_id, LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID, LAST_UPDATE_DATE = sysdate where OBJECT_NAME=p_mv_name and OBJECT_OWNER=p_mv_schema and OBJECT_TYPE='MV';
300: COMMIT;
301:
302: EXCEPTION WHEN OTHERS THEN
303: WRITELOG('In procedure enable_index_mgmt, failed enabling index mgmt flag' || form_triplet(p_mv_name, p_mv_schema, null) || ', ' ||sqlerrm);
308:
309: procedure disable_index_mgmt(p_mv_name in varchar2,P_mv_schema in varchar2)
310: is
311: begin
312: update bis_obj_properties set DROP_CREATE_INDEX_FLAG='N', LAST_UPDATED_BY= FND_GLOBAL.User_id, LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID, LAST_UPDATE_DATE = sysdate where OBJECT_NAME=p_mv_name and OBJECT_OWNER=p_mv_schema and OBJECT_TYPE='MV';
313: COMMIT;
314:
315: EXCEPTION WHEN OTHERS THEN
316: WRITELOG('In procedure disable_index_mgmt, failed enabling index mgmt flag' || form_triplet(p_mv_name, p_mv_schema, null) || ', ' ||sqlerrm);