Redimencionar un datafile
 

Buenas tengo el siguiente problema tengo que redimencionar un datafile 100 megas pero lo tengo que hacer de uno en uno por lo que quiero ponerlo en un for para ejecutarlo una sola vez asi que queda de esta forma

Begin
FOR i IN 1..100 loop
alter table TMPUSER.s allocate extent(DATAFILE 'D:\datafile.DBF' SIZE 1M);
END LOOP;
END;
/

esto lanza el sigueinte error:

ERROR at line 3:
ORA-06550: lÝnea 3, columna 2:
PLS-00103: Encountered the symbol "ALTER" when expecting one of the following:
( begin case declare exit for goto if loop mod null pragma
raise return select update while with <an identifier>
<a double-quoted delimited-identifier> <a bind variable> <<
continue close current delete fetch lock insert open rollback
savepoint set sql execute commit forall merge pipe purge
The symbol "lock was inserted before "ALTER" to continue.
ORA-06550: lÝnea 3, columna 33:
PLS-00103: Encountered the symbol "EXTENT" when expecting one of the following:
, in