plsql拼写动态sql

admin

SET SERVEROUTPUT ON;
DECLARE
    sql_stmt VARCHAR2(1000); -- 定义动态 SQL 查询语句
BEGIN
    -- 构建动态 SQL 查询语句
    FOR user_rec IN (SELECT username FROM dba_users WHERE username='ZHYU') LOOP
        sql_stmt := 'ALTER USER ' || user_rec.username || ' ACCOUNT UNLOCK';
               
        -- 执行动态 SQL 查询
        EXECUTE IMMEDIATE sql_stmt;

        -- 输出解锁的用户
        DBMS_OUTPUT.PUT_LINE('User ' || user_rec.username || ' unlocked');
    END LOOP;
END;
/

admin

DECLARE
   v_username VARCHAR2(30) := 'YOUR_USERNAME';
BEGIN
   FOR session_rec IN (SELECT sid, serial# FROM v$session WHERE username = v_username AND logon_time < SYSDATE - 1/24) LOOP
      EXECUTE IMMEDIATE 'ALTER SYSTEM KILL SESSION ''' || session_rec.sid || ',' || session_rec.serial# || ''' IMMEDIATE';
   END LOOP;
END;
/