whenever sqlerror exit failure

set verify off feedback off

accept user char prompt 'Enter new database username: '

create user &user;

create session,

create table,

create procedure,

create type,

create sequence,

select any dictionary,

unlimited tablespace

to &user;

for r in

( select role

from dba_roles

where role in ('SODA_APP', 'AQ_ADMINISTRATOR_ROLE')

) loop

execute immediate 'grant ' || r.role || ' to &user';

end loop;

end;

accept pw char prompt 'Enter password for &user: ' hide

alter user &user identified by "&pw";

prompt

prompt Database user &user has been created.

prompt Now you should run setup_tables.sql

prompt

quit