The following lines contain the word 'select', 'insert', 'update' or 'delete':
select table_name
from zpb_tables
where (table_name like 'ZPBDATA%' or table_name like 'ZPB'||p_Business_Area_id||'_D%') and
bus_area_id = p_business_area_id;
select data_aw, annotation_aw into l_shar_aw, l_annot_aw
from zpb_business_areas
where business_area_id=p_business_area_id;
execute immediate 'grant select on ' || l_zpb_pref || '.aw$zpbcode to ' || p_schema_name;
execute immediate 'grant select on ' || l_zpb_pref || '.aw$' || l_shar_aw || ' to ' || p_schema_name;
execute immediate 'grant select on ' || l_zpb_pref || '.aw$' || l_annot_aw || ' to ' || p_schema_name;
execute immediate 'grant select on ZPB_BUSINESS_AREAS to ' || p_schema_name;
execute immediate 'grant select on fnd_oracle_userid to ' || p_schema_name;
execute immediate 'grant select on fnd_application to ' || p_schema_name;
execute immediate 'grant select on fnd_product_installations to ' || p_schema_name;
execute immediate 'create or replace synonym ' || p_schema_name || '.zpb_solve_output_selections for zpb_solve_output_selections';
execute immediate 'grant select on zpb_ac_param_values to ' || p_schema_name;
execute immediate 'grant select on zpb_cycle_datasets to ' || p_schema_name;
execute immediate 'grant select on zpb_cycle_currencies to ' || p_schema_name;
execute immediate 'grant select on zpb_cycle_model_dimensions to ' || p_schema_name;
execute immediate 'grant select on zpb_analysis_cycle_tasks to ' || p_schema_name;
execute immediate 'grant select on zpb_analysis_cycle_instances to ' || p_schema_name;
execute immediate 'grant select on zpb_analysis_cycles to ' || p_schema_name;
execute immediate 'grant select on zpb_solve_output_selections to ' || p_schema_name;
execute immediate 'grant select on zpb_business_areas_vl to ' || p_schema_name;
execute immediate 'grant select on fnd_lookup_values_vl to ' || p_schema_name;
execute immediate 'grant select on ZPB_OS_ATTRIBUTES_V to ' || p_schema_name;
execute immediate 'grant select on ZPB_OS_BUSAREAS_V to ' || p_schema_name;
execute immediate 'grant select on ZPB_OS_DIMENSIONS_V to ' || p_schema_name;
execute immediate 'grant select on ZPB_OS_HIERARCHIES_V to ' || p_schema_name;
execute immediate 'grant select on ZPB_OS_LEVELS_V to ' || p_schema_name;
execute immediate 'grant select on ZPB_OS_MEASURES_V to ' || p_schema_name;
execute immediate 'grant select on ZPB_OS_MEAS_DIMS_V to ' || p_schema_name;
execute immediate 'grant select on ZPB_OS_TABLES_V to ' || p_schema_name;
execute immediate 'grant select on ' || v_sharedView.table_name || ' to ' || p_schema_name;