ORA-06550: line 34, column 62:
PLS-00382:expression is of wrong type

Declare 

cursor c1 is 
select max(rowid)
from wkly_service_agg
where trunc(edw_report_date) = trunc(to_date('22/08/2014','dd/mm/yyyy'))
group by report_date,week_num,service_group_key,p_pro_key, b_pro_key,
         b_sd_key, v_prom_key, t_prot_key,
         ni_flg, v_promo_key, service_type_id, subscode_key,
         source_system_id,s_prot_key, ENABLED_PLATFORM,
         PROMO_KEY,LONG_TERM_DISCOUNT,SPECIAL_OFFER_DISCOUNT,
         SPORTS_RELIEF_PROD_KEY,HD_SD,FVA_FLG,BASIS_PRODUCT_KEY,
         VOLUME_OF_SERVICE,FL_F_ELIGIBILITY,FL_SOURCE,B_CONTRACT_IND,
         B_CONTRACT_REMAINING_KEY,D_MODEL_ID,V_CONTRACT_IND,V_CONTRACT_REMAINING_KEY,
         V_CONTRACT_IND,V_CONTRACT_REMAINING_KEY,MID_TIER_DISCOUNT,DISCOUNT_METHOD,
         M_PROMO_KEY,REL_DISC_S_KEY;

type t_cur1 is table of c1%rowtype;
ttcur1 t_cur1;


--var_rowid varchar2(1000);
v_num number;


Begin

open c1;

fetch c1 bulk collect into ttcur1 limit 20000 ;

forall i in ttcur1.FIRST .. ttcur1.LAST

   delete from wkly_service_agg where rowid = ttcur1(i); 

v_num := SQL%ROWCOUNT;

dbms_output.put_line('The count of committed records :'||v_num);

End;

--ttcur1 T_CUR1;
ttcur1 T_CUR1:=T_CUR1();--> add this

--ttcur1 T_CUR1;
ttcur1 T_CUR1:=T_CUR1();--> add this

type t_cur1 is table of c1%rowtype;

type t_cur1 IS TABLE OF UROWID
      INDEX BY PLS_INTEGER;

type t_cur1 IS TABLE OF UROWID
      INDEX BY PLS_INTEGER;

create table new_x as select distinct * from old_x;
drop table old_x purge;
alter table new_x rename to old_x;
create any required indexes and constraints and recompile any stored procedures

delete from wkly_service_agg
where rowid not in 
(select min(rowid)
from wkly_service_agg
where trunc(report_date) = trunc(to_date('22/08/2014','dd/mm/yyyy'))
group by report_date,week_num,service_group_key,p_pro_key, b_pro_key,
         b_sd_key, v_prom_key, t_prot_key,
         ni_flg, v_promo_key, service_type_id, subscode_key,
         source_system_id,s_prot_key, ENABLED_PLATFORM,
         PROMO_KEY,LONG_TERM_DISCOUNT,SPECIAL_OFFER_DISCOUNT,
         SPORTS_RELIEF_PROD_KEY,HD_SD,FVA_FLG,BASIS_PRODUCT_KEY,
         VOLUME_OF_SERVICE,FL_F_ELIGIBILITY,FL_SOURCE,B_CONTRACT_IND,
         B_CONTRACT_REMAINING_KEY,D_MODEL_ID,V_CONTRACT_IND,V_CONTRACT_REMAINING_KEY,
         V_CONTRACT_IND,V_CONTRACT_REMAINING_KEY,MID_TIER_DISCOUNT,DISCOUNT_METHOD,
         M_PROMO_KEY,REL_DISC_S_KEY)