执行存储过程报超时错误**

beidou

在功能里面执行一个存储过程,报了如下错误

atiger

用错误信息“operation*timed”在bbs上搜索一下，修改一下 配置文件，然后运行看看

beidou

在服务端的BIN目录里面改过了,但是问题还在

zfang

你这存储过程大概是什么样的？是否涉及到了大数据量？

beidou

不算大数据量,运行不到一分钟就报错了

zfang

这个存储过程在数据库中可以执行成功吗？执行时间大概是多长？

beidou

成功啊,在本机平台上面运行不到1分钟就出来了,但是到正式环境,就报超时了

zfang

楼主，这个好像只能代码处理一下这个错误提示了
大概的过程类似于这样子：
1、
function CheckSuccess: Boolean;
begin
  select xxx 某个状态 // 要求在存储过程最后去执行一下，用来检查是否成功
end;

2、
procedure TMainForm.Button1Click(Sender: TObject);
var
  lTime: TDataSetTime;
  Success: Boolean;
begin
  Sucuss := False;
  lTime := SysUtils.Now;
  try
    DataSetCCGCSJJ1.Active:=true;
    Success := True;
  except
    on E: Exception do
    begin
      while not Success do
      begin
        if E.Message = 'Time xxx' then
        begin
           Sleep(10000);
           Success := CheckSuccess;
        end
        else
          raise;
      end;
    end
    else
      raise;
  end;
end;