Database Software

Hi,
I am trying to create folder in XML DB using procedure call DBMS_XDB.CREATEFOLDER.
It works fine when I run the command using PL SQL block.
---------------------------------------------------------------------------------------
declare
l_Bln boolean;
begin
l_Bln := DBMS_XDB.CREATEFOLDER('/images/themes/sfatest');
if l_Bln then
dbms_output.put_line('Folder Created');
else
dbms_output.put_line('Folder NOT Created');
end if;
COMMIT;
end;
/
-----------------------------------------------------------
But it gives me access denied error if I try to run the same inside a procedure.

CREATE OR REPLACE PROCEDURE TT AS
l_Bln boolean;
begin
l_Bln := DBMS_XDB.CREATEFOLDER('/images/themes/sfatest');
if l_Bln then
dbms_output.put_line('Folder Created');
else
dbms_output.put_line('Folder NOT Created');
end if;

COMMIT;

end;
/
----------------------------------------
exec tt;
ORA-31050: Access denied
ORA-06512: at "XDB.DBMS_XDB", line 316
ORA-06512: at "SFA.TT", line 4
ORA-06512: at line 1


USER from which I am running this procedure has the XDBADMIN role.
I am using Oracle 11g/ PL SQL Gateway. I don't know how to configure ACL for this situation.
Can anyone help me please?
Thanks
Balaji Chellappa