如何将指定SQL查询转换为PL/SQL代码？现有代码输出重复求优化

你的PL/SQL代码出现重复输出的核心原因是两层独立的FOR循环产生了笛卡尔积：外层循环遍历每一个用户名，内层循环又遍历每一个账号状态，最终每个用户名都会和所有账号状态配对输出，自然出现大量重复内容。另外代码里还存在两个小问题：DECLARE块定义的变量根本没被用到（FOR循环的循环变量会覆盖它们），而且引用了未定义的user_record.account_status，属于笔误。

正确的PL/SQL实现 #

只需要用单循环一次性查询出username和account_status的对应关系，遍历结果集即可：

SET SERVEROUTPUT ON;
DECLARE
  CURSOR user_cursor IS
    SELECT username, account_status FROM dba_users;
  user_record user_cursor%ROWTYPE;
BEGIN
  OPEN user_cursor;
  LOOP
    FETCH user_cursor INTO user_record;
    EXIT WHEN user_cursor%NOTFOUND;
    DBMS_OUTPUT.PUT_LINE(user_record.username || ' - ' || user_record.account_status);
  END LOOP;
  CLOSE user_cursor;
END;
/

或者更简洁的隐式游标写法（推荐）：

SET SERVEROUTPUT ON;
BEGIN
  FOR user_record IN (SELECT username, account_status FROM dba_users) LOOP
    DBMS_OUTPUT.PUT_LINE(user_record.username || ' - ' || user_record.account_status);
  END LOOP;
END;
/

命令行直接输出方案（SQL*Plus） #

如果不需要PL/SQL，直接用SQL*Plus的命令就能得到格式化输出：

SET LINESIZE 100
SET PAGESIZE 50
COLUMN username FORMAT A20
COLUMN account_status FORMAT A25
SELECT username, account_status FROM dba_users;

如果需要导出到文件，加上SPOOL命令：

SPOOL user_status.txt
SET LINESIZE 100
SET PAGESIZE 50
COLUMN username FORMAT A20
COLUMN account_status FORMAT A25
SELECT username, account_status FROM dba_users;
SPOOL OFF

内容的提问来源于stack exchange，提问作者Risqua Sultan