Create tables in procedure not working

Question

Hey all, can't seem to figure this one out. I'm trying to create and load tables programmatically with no luck. I can create these tables one at a time with no problem. Any ideas?
SQL> create or replace procedure load_staging_tables as
  2  cursor c_tables is select table_name from all_tables where owner = 'JOHN_DOE' order by 1;
  3  begin
  4  for t in c_tables loop
  5   execute immediate 'CREATE TABLE pmonica1.ORI_' || t.table_name || ' as select * from JOHN_DOE.' || t.table_name;
  6  end loop;
  7  end;
  8  /
Procedure created.
SQL> exec load_staging_tables
BEGIN load_staging_tables; END;
ERROR at line 1:
ORA-01031: insufficient privileges
ORA-06512: at "PMONICA1.LOAD_STAGING_TABLES", line 5
ORA-06512: at line 1
SQL> disconnect
Disconnected from Oracle9i Enterprise Edition Release 9.2.0.1.0 - Production
With the Partitioning, OLAP and Oracle Data Mining options
JServer Release 9.2.0.1.0 - ProductionAs always, thanks!

Answer 1

The owner of this procedure (pmonica1?) needs the 'CREATE TABLE' privilege granted directly - not through a role. Roles are disabled by default in PL/SQL - that is why the table create works at a SQL> prompt but not in PL/SQL.