Lock users selected from query.

Question

I need to have the user IDs that are selected using the query I've pasted below locked. My thought was to put the query into an array and then use a loop to run through the array with the "alter user user_id account lock" command but I have no idea how to get that far is that even possible with plsql? Or perhaps there is a better way to do this. I would then be running this script once a week to make sure all of these users are locked.
select username from dba_users where username like '_Z%'
minus
select distinct schema from monadmin.log_info where timestamp>=sysdate-92
minus
select account_status from dba_users where account_status = 'locked';

Answer 1

select account_status from dba_users where account_status = 'locked';This will not return anything as the status is LOCKED not locked.
secondly you will get account_status not the username
BEGIN
    FOR rec IN (
                 select username from dba_users where username like '_Z%'
                minus
                 select distinct schema from monadmin.log_info where timestamp>=sysdate-92
                minus
                 select username  from dba_users where account_status like ( '%LOCKED')
               ) LOOP
      EXECUTE IMMEDIATE 'ALTER "' || rec.username || '" ACCOUNT LOCK';
    END LOOP;
END;
/ Alvinder
Edited by: alvinder on Mar 18, 2009 10:54 AM