5

我的程序如下所示：

Declare 
       cur_1        Sys_Refcursor;
       cur_2        Sys_Refcursor;
       v_1          VARCHAR2(30);
       v_2          VARCHAR2(30);
       v_3          VARCHAR2(30);
       v_4          VARCHAR2(30);
Begin
       OPEN cur_1 for Select * from tab1@dblink1;
       Loop
           Fetch cur_1 into v_1, v_2;
           EXIT WHEN cur_1%NOTFOUND;   
           OPEN cur_2 for Select * from tab2@dblink1 where col1 = v_1 and col2 = v2;
           Loop
               Fetch cur2 into v_3, v_4;
               Exit when cur_2%notfound;    
               INSERT INTO local.tab3 values (v_1,v_2, v_3, v_4);
           END Loop;
           close cur_2;
       End Loop;
       close cur_1; 
END;

abobe 程序可以编译，但是当我运行它时，出现以下错误：

不再从套接字
读取数据 不再从套接字
读取数据 不再从套接字读取数据 不再从套接字读取数据
不再从套接字读取数据 不再从套接字读取数据 不再
从
套接字读取
数据
否从套接字读取更多数据
......（更多'没有更多数据要从套接字读取'）

IO 错误：对等方重置连接：套接字写入错误
进程已退出。

有趣的是，当我注释掉整个内部循环时，程序运行时没有错误。所以我知道内部循环有问题（我尝试只注释内部循环内的插入语句并得到相同的错误）。

我的localdb和dblink1数据库都具有相同的版本：

Oracle Database 11g 企业版 11.2.0.1.0 - 64 位生产

PL/SQL 版本 11.2.0.1.0 - 生产

核心 11.2.0.1.0 生产

适用于 64 位 Windows 的 TNS：版本 11.2.0.1.0 - 生产

NLSRTL 版本 11.2.0.1.0 - 生产

4

2 回答 2

5

解决“没有更多数据可从套接字读取”错误的一般建议。

这些错误通常是由另一个严重错误引起的，例如 ORA-600 错误。一个如此严重的问题，以至于服务器进程崩溃，甚至无法向客户端发送正确的错误消息。（这些错误的另一个常见原因是由 SQLNET.EXPIRE_TIME 或其他杀死旧会话的进程引起的网络断开连接。）

查看警报日志以找出原始错误消息。

在此目录中查找文件 alert_[name].log：select value from v$parameter where name = 'background_dump_dest';

找到具体的错误消息和详细信息后，请访问 support.oracle.com。使用“ora-600 工具”，然后查找 ORA-600 消息后的第一个数字。

对于特定类型的 ORA-600 错误，通常会有一篇或多篇文章。使用确切的版本和平台来缩小可能的错误列表。（但如果文章中的“受影响的版本”是错误的，请不要感到惊讶。Oracle 声称“在 xy 版本中修复”并不总是正确的。）

这些文章通常会更详细地解释问题是如何发生的、可能的解决方法以及通常涉及补丁或升级的解决方案。

在实践中，您很少想解决这些问题。“典型”建议是联系 Oracle 支持以验证您是否确实遇到了同样的问题，获得补丁，获得许可并关闭环境，然后应用补丁。然后可能意识到补丁不起作用。恭喜你，你只是浪费了很多时间。

相反，您通常可以通过对查询或过程进行细微更改来避免该问题。Oracle 中有很多特性，几乎总是有另一种方法可以做到这一点。如果代码最终看起来有点奇怪，请添加注释以警告未来的程序员：“这段代码看起来很奇怪，以避免出现错误 X，应该在版本 Y 中修复。”

此代码的具体建议

如果这确实是您的整个过程，则应将其替换为以下内容：

insert into local.tab3(col1, col2, col3, col4)
select tab1.col1, tab1.col2, tab2.col1, tab2.col2
from tab1@dblink1 tab1
join tab2@dblink1 tab2
    on tab1.col1 = tab2.col1
    and tab1.col2 = tab2.col2;

一般来说，如果可能的话，你应该总是用 SQL 来做事。特别是如果您可以避免打开许多游标。尤其是如果您可以避免向远程数据库打开许多游标。

于 2012-09-27T04:26:02.400 回答
1

正如 jonearles 提到的，您应该在一个 SQL 语句中编写它。

如果你坚持使用 PL/SQL：你自己做的工作太多，声明变量、打开游标、循环、分配变量。考虑这个 PL/SQL：

begin
  for c1 in (select * from tab1@dblink1)
  loop
    for c2 in (Select * from tab2@dblink1 where col1 = c1.col1 and col2 = c1.col2)
    loop
      insert into local.tab3 values (c1.col1,c1.col2,c2.col1,c2.col2);
    end loop;
  end loop;
end;
/
于 2012-10-25T09:07:32.210 回答