我有一个工作正常的主光标。
declare
v_firm_id number;
amount number;
v_total_sum TABLE_TEMP.TOTAL_SUM%TYPE;
CURSOR MT_CURSOR IS
SELECT firm_id FROM t_firm;
BEGIN
OPEN MT_CURSOR;
LOOP
FETCH MT_CURSOR INTO v_firm_id;
EXIT WHEN MT_CURSOR%NOTFOUND;
DBMS_OUTPUT.PUT_LINE(to_char(sysdate, 'mi:ss') ||'--- '|| v_firm_id)
INSERT INTO TABLE_TEMP(TOTAL_SUM) VALUES(v_firm_id)
COMMIT;
END LOOP;
DBMS_LOCK.SLEEP(20);
BEGIN
FOR loop_emp IN
(SELECT TOTAL_SUM INTO v_total_sum FROM TABLE_TEMP)
LOOP
dbms_output.put_line(to_char(sysdate, 'mi:ss') ||'--- '|| v_total_sum || '-TEST--');
END LOOP loop_emp;
END;
end;
一切正常,除了dbms_output.put_line(v_total_sum || '---');
我在那里没有得到任何数据。我得到了正确的行数。它插入的。
问题是游标 FOR 循环有一个冗余的into
子句,编译器似乎默默忽略了该子句,因此从不使用v_total_sum
子句。
试试这个:
begin
for r in (
select firm_id from t_firm
)
loop
insert into table_temp (total_sum) values (r.firm_id);
end loop;
dbms_lock.sleep(20);
for r in (
select total_sum from table_temp
)
loop
dbms_output.put_line(r.total_sum || '---');
end loop;
commit;
end;
如果这是一个存储过程而不是匿名块,并且您使用alter session set plsql_warnings = 'ENABLE:ALL';
(或 IDE 中的等效首选项设置)启用了 PL/SQL 编译器警告,那么您会看到:
PLW-05016: INTO clause should not be specified here
我还把commit
移到了最后,所以你只提交一次。
总结下面的注释,Cursor FOR 循环构造为您声明、打开、获取和关闭光标,并且可能更快,因为它以 100 个为批次读取(或类似 - 我没有在最新版本中测试过)。更简单的代码出现错误的可能性较小,并且将来更易于维护,例如,如果需要向游标添加列。
请注意,原始版本具有:
for loop_emp in (...)
loop
...
end loop loop_emp;
这是误导性的,因为loop_emp
是记录的名称,而不是光标或循环。编译器在end loop
后忽略文本,尽管实际上它至少应该警告您。如果要命名循环,可以使用类似于<<LOOP_EMP>>
的标签。(我总是将我的循环记录命名为r
,类似于您经常在数字循环中看到的i
。