我来帮你一步步排查这个存储过程的问题，咱们先梳理清楚核心报错原因，再给出针对性的修复方案：

问题拆解 #

你的存储过程主要存在3个问题，其中第一个是引发报错的核心原因：

• 未处理SELECT结果集：Oracle存储过程不允许直接执行select *却不处理查询结果——它不像普通SQL语句那样会直接返回结果给调用者，必须明确指定输出方式（比如用游标参数返回），或者把结果存入变量做后续处理。直接写无处理的select *会触发ORA系列错误（比如ORA-01422：查询返回多行但未批量处理，或ORA-01403：无数据返回）。
• 多余的COMMIT：SELECT是只读操作，完全不需要提交，这里的COMMIT;属于冗余代码，甚至可能在后续扩展DML操作时引发意外问题。
• 时间转换冗余：你重复对SYSDATE做了多次TO_TIMESTAMP(to_char(...))转换，其实直接比较相同格式的时间字符串就可以，既简化代码又提升效率。

修复方案 #

根据你的实际需求，我提供两种常见场景的修复代码：

场景1：需要将查询结果返回给调用者（带输出参数） #

如果你希望调用存储过程后能拿到查询到的锁信息，就需要添加一个SYS_REFCURSOR类型的输出参数：

CREATE OR REPLACE PROCEDURE SYSLOCKDAILY (p_result OUT SYS_REFCURSOR)
IS
BEGIN
    -- 打开游标返回结果集
    OPEN p_result FOR
        SELECT * 
        FROM PDB2B_SYSTEMLOCKINFO 
        WHERE ISDAILY = 1 
          AND active = 1 
          -- 简化时间比较：直接转成相同格式的字符串对比
          AND TO_CHAR(SYSDATE, 'HH12:MI AM') BETWEEN TO_CHAR(STIME, 'HH12:MI AM') 
                                                  AND TO_CHAR(ETIME, 'HH12:MI AM');
    -- 移除不必要的COMMIT
END SYSLOCKDAILY;

调用示例（在Oracle SQL Developer中执行）

DECLARE
    v_result SYS_REFCURSOR;
    v_row PDB2B_SYSTEMLOCKINFO%ROWTYPE; -- 匹配表的行类型
BEGIN
    -- 调用存储过程获取结果
    SYSLOCKDAILY(v_result);
    
    -- 遍历结果集处理数据
    FETCH v_result INTO v_row;
    WHILE v_result%FOUND LOOP
        -- 这里可以替换成你需要的处理逻辑，比如打印信息
        DBMS_OUTPUT.PUT_LINE('锁ID: ' || v_row.LOCKID); -- 替换成表中实际的列名
        FETCH v_result INTO v_row;
    END LOOP;
    
    -- 关闭游标
    CLOSE v_result;
END;
/

场景2：仅在存储过程内部处理数据（无需返回结果） #

如果你只是想在存储过程内部处理这些锁信息（比如记录日志、更新状态等），可以用显式游标循环处理：

CREATE OR REPLACE PROCEDURE SYSLOCKDAILY
IS
    -- 定义游标存储查询结果
    CURSOR c_lockinfo IS
        SELECT * 
        FROM PDB2B_SYSTEMLOCKINFO 
        WHERE ISDAILY = 1 
          AND active = 1 
          AND TO_CHAR(SYSDATE, 'HH12:MI AM') BETWEEN TO_CHAR(STIME, 'HH12:MI AM') 
                                                  AND TO_CHAR(ETIME, 'HH12:MI AM');
    v_row c_lockinfo%ROWTYPE; -- 游标行类型变量
BEGIN
    OPEN c_lockinfo;
    LOOP
        FETCH c_lockinfo INTO v_row;
        EXIT WHEN c_lockinfo%NOTFOUND; -- 没有数据时退出循环
        
        -- 在这里添加你的业务处理逻辑
        DBMS_OUTPUT.PUT_LINE('正在处理锁: ' || v_row.LOCKID);
        -- 比如：UPDATE PDB2B_SYSTEMLOCKINFO SET ... WHERE LOCKID = v_row.LOCKID;
    END LOOP;
    CLOSE c_lockinfo;
END SYSLOCKDAILY;

额外说明 #

关于时间比较的优化：原来的写法把字符串转成TIMESTAMP再比较，其实只要STIME和ETIME是时间类型（比如DATE或TIMESTAMP），直接转成相同格式的字符串对比结果是一致的，而且避免了多次类型转换的开销。如果STIME和ETIME本身就是字符串类型，那这个写法完全没问题。

内容的提问来源于stack exchange，提问作者Janaka Neranjan