handle_suspend_procedure.sql

create or replace procedure handle_suspend (error_no number,session_no number)  
as  
b number;  
a number;  
begin  
select bytes/1024/1024 as bytes1 into b from dba_data_Files where tablespace_name='ONEMB';  
a:=b+1;  
if error_no = 1652  
then  
execute immediate 'alter database datafile ''C:\oracle\product\10.2.0\oradata\orcl\onemb01.dbf'' resize '||a||'m';  
else  
dbms_resumable.abort(session_no);  
end if;  
end;  
/