drop table tTestUser;
create table tTestUser ( user_name varchar2(100), context_user_name varchar2(100), dt DATE default sysdate ); 
create or replace procedure pTestUser
is
  pragma autonomous_transaction;
  u1 varchar2(100); u2 varchar2(100);
begin
  u1 := sys_context('userenv','session_user');
  select user into u2 from dual;
  insert into tTestUser ( user_name, context_user_name ) values ( u2, u1 );
  commit;
end;
GRANT execute on pTestUser to public;
grant all on tTestUser to public;


DECLARE
  l_user     VARCHAR2(30) := upper('LoadTest0');
BEGIN
  DBMS_SCHEDULER.create_job(
    job_name   => l_user || '.' || DBMS_SCHEDULER.generate_job_name,
    job_type   => 'STORED_PROCEDURE',
    job_action => 'VV.pTestUser',
    enabled    => TRUE,
    auto_drop  => TRUE
  );
END;
/