DECLARE v_sqlstatement varchar2(200); v_newstudents oraStudents%rowtype; v_numAccounts number(2); CURSOR newstudents_cursor IS SELECT * from oraStudents; BEGIN DBMS_OUTPUT.PUT_LINE ('****************** begin account creation'); OPEN newstudents_cursor; FETCH newstudents_cursor into v_newstudents; WHILE newstudents_cursor%found LOOP DBMS_OUTPUT.PUT_LINE (v_newstudents.userid); Select count(*) into v_numAccounts from dba_users where UPPER(username)=UPPER(v_newstudents.userid); if v_numAccounts=0 then v_sqlstatement := 'create user ' || UPPER(v_newstudents.userid) || ' identified by values ''IMPOSSIBLE'' '; v_sqlstatement := v_sqlstatement || 'DEFAULT TABLESPACE USERS '; v_sqlstatement := v_sqlstatement || 'TEMPORARY TABLESPACE TEMP '; v_sqlstatement := v_sqlstatement || 'QUOTA 100M on users '; v_sqlstatement := v_sqlstatement || 'QUOTA 100M on temp '; execute immediate v_sqlstatement; v_sqlstatement := 'GRANT ITECSTUDENT TO ' || v_newstudents.userid; execute immediate v_sqlstatement; -- insert Oracle/RU association into pwagent table checked by pw change web site Insert into pwagent.accounts (OraAccount, RUaccount, initdate) values(upper(v_newstudents.userid),lower(v_newstudents.userid),sysdate); End If; FETCH newstudents_cursor into v_newstudents; END LOOP; DBMS_OUTPUT.PUT_LINE ('****************** end account creation'); CLOSE newstudents_cursor; END; /