PLSQL中的批量插入而不是循环？

Question

我正在尝试使用批量插入或其他更有效的方法来解决这段代码，但我没有想法。你会如何处理这个问题。而不是循环这么多次，我想在几个电话中更有效地做到这一点。请让我知道你会怎么做？如果可能的话，用代码！谢谢

LOOP
-- Fetch a row
IF DBMS_SQL.FETCH_ROWS(cursor_handle) > 0 THEN
    DBMS_SQL.column_value(cursor_handle, 9, cont_id); 
    DBMS_SQL.COLUMN_VALUE(cursor_handle, 3, proj_nr);  
    HTP.BOLD('ContractID: ' || cont_id || ' ProjectNR: ' ||  proj_nr);
    HTP.BR;
ELSE
    EXIT;
END IF;

-- delete the old list before saving a new one
IF sek_nr = 1 THEN
  EXECUTE IMMEDIATE 'DELETE FROM W_Contracts WHERE user_id = :n' USING CURRENTUSER;
END IF;

EXECUTE IMMEDIATE 'Insert into W_Contracts values(''' || currentUser || ''', '
                   || sek_nr || ', sysdate, ' || cont_id || ', '''
                   || proj_nr || ''')';

sek_nr := sek_nr + 1;
END LOOP;

Answer 1

首先，我不清楚您为什么使用动态 SQL 而不是静态 SQL。

IF sek_nr = 1 
THEN
  DELETE FROM w_contracts
   WHERE user_id = currentUser;
END IF;

INSERT INTO w_contracts( <<list of columns>> )
  VALUES( currentUser, sek_nr, sysdate, cont_id, proj_nr );

接下来，如果 SEK_NR 为 1，我不清楚为什么您可能会先执行 DELETE，然后再执行 INSERT。在这种情况下执行 UPDATE 可能会更有效。而且，一旦您执行了 UPDATE 和 INSERT，您就可以将其简化为单个 MERGE 语句。

接下来，如果您在DBMS_SQL 中使用DEFINE_ARRAY method，您可以从光标中批量提取数据。当然，如果没有看到您的游标定义，我会怀疑它也不必要地使用了动态 SQL，您可以使用更简单的方法。