我有一个Oracle存储过程，在本地开发实例和运行Oracle 8，然后是9，然后是10，最近11的多个客户端测试和生产实例上运行了7年以上。它一直工作直到升级到Oracle 11g。基本上，该过程打开一个参考游标，更新一个表然后完成。在10g中，光标将包含预期的结果，但在11g光标将为空。升级到11g后，DML或DDL没有改变。我试过的每个10g或11g实例(10.2.0.3，10.2.0.4，11.1.0.7，11.2.0.1 – 所有在Windows上运行)的行为是一致的。

具体的代码要复杂得多，但是在一些现实的概述中解释这个问题：我有一些头表中的数据和一堆将被输出到PDF的子表。标题表有一个布尔值(NUMBER(1)，其中0是假，1是真)，表示该数据是否已被处理。

该视图仅限于显示尚未处理的行(该视图还加入其他表，进行一些内联​​查询和函数调用等)。所以当光标打开时，视图显示一行或多行，然后在游标打开后，运行更新语句来翻转头表中的标志，发出提交，然后过程完成。

在10g上，游标打开，它包含行，然后update语句翻转标志，并且第二次运行该过程将不会产生任何数据。

在11g上，游标从不包含该行，就像游标在更新语句运行之后不会打开。

我担心可能会影响其他程序和其他应用程序的11g内容(希望是可以配置的设置)有所改变。我想知道的是有没有人知道为什么两个数据库版本之间的行为是不同的，以及是否可以在没有代码更改的情况下解决问题。

更新1：我设法跟踪问题到一个独特的约束。看起来当11g中唯一的约束出现在100％的时间内，这个问题是可以重现的，不管我是针对实际的对象运行真实世界的代码还是下面的简单的例子。

更新2：我能够从方程式中彻底消除这一观点。我已经更新了简单的例子来显示即使直接查询表时问题也存在。

简单的例子

CREATE TABLE tbl1
(
  col1  VARCHAR2(10),col2  NUMBER(1)
);

INSERT INTO tbl1 (col1,col2) VALUES ('TEST1',0);

/* View is no longer required to demonstrate the problem
CREATE OR REPLACE VIEW vw1 (col1,col2) 
AS 
SELECT col1,col2 
  FROM tbl1 
 WHERE col2 = 0;
*/

CREATE OR REPLACE PACKAGE pkg1
AS
   TYPE refWEB_CURSOR IS REF CURSOR;

   PROCEDURE proc1 (crs  OUT  refWEB_CURSOR);

END pkg1;

CREATE OR REPLACE PACKAGE BODY pkg1 
IS
   PROCEDURE proc1 (crs  OUT  refWEB_CURSOR)
   IS
   BEGIN

      OPEN crs FOR
        SELECT col1
          FROM tbl1
         WHERE col1 = 'TEST1'
           AND col2 = 0;

      UPDATE tbl1
         SET col2 = 1
       WHERE col1 = 'TEST1';

      COMMIT;

   END proc1;

END pkg1;

匿名块演示

DECLARE 
   crs1  pkg1.refWEB_CURSOR;

   TYPE rectype1 IS RECORD (
      col1  vw1.col1%TYPE
   );

   rec1  rectype1;
BEGIN 
   pkg1.proc1 ( crs1 );

   DBMS_OUTPUT.PUT_LINE('begin first test');

   LOOP
      FETCH crs1
       INTO rec1;

      EXIT WHEN crs1%NOTFOUND;

      DBMS_OUTPUT.PUT_LINE(rec1.col1);

   END LOOP;  

   DBMS_OUTPUT.PUT_LINE('end first test');

END; 

/* After creating this index,the problem is seen */
CREATE UNIQUE INDEX unique_col1 ON tbl1 (col1);

/* Reset data to initial values */
TRUNCATE TABLE tbl1;

INSERT INTO tbl1 (col1,0);

DECLARE 
   crs1  pkg1.refWEB_CURSOR;

   TYPE rectype1 IS RECORD (
      col1  vw1.col1%TYPE
   );

   rec1  rectype1;
BEGIN 
   pkg1.proc1 ( crs1 );

   DBMS_OUTPUT.PUT_LINE('begin second test');

   LOOP
      FETCH crs1
       INTO rec1;

      EXIT WHEN crs1%NOTFOUND;

      DBMS_OUTPUT.PUT_LINE(rec1.col1);

   END LOOP;  

   DBMS_OUTPUT.PUT_LINE('end second test');

END;

10g的输出示例是：
开始第一次测试
TEST1
结束第一测试
开始第二次测试
TEST1
第二次测试

11g的输出是什么样的例子：
开始第一次测试
TEST1
结束第一测试
开始第二次测试
第二次测试

澄清

我不能删除COMMIT，因为在现实世界的场景中，程序是从Web应用程序调用的。当前端的数据提供者调用该过程时，它将在断开与数据库的连接时发出隐式COMMIT。所以如果我删除程序中的COMMIT然后是的，匿名块演示将工作，但现实世界的场景不会因为COMMIT仍然会发生。

题

为什么11g行为不同？有什么我可以做的，而不是重写代码？