大侠帮忙看看出错信息

SQL为：
sql := 'Select A.o_id As Bh,sysdate As Xtsj,A.input_date as sj ,
B.o_name As Xm From hs_db_handset A,db_operator B Where A.o_id=B.o_id And A.h_id=''12'' and rownum = 1'执行 ：OpenQuery(TmpQry,SqlStr);时，有时弹出
错误 
  ORA-010000,超出打开游标最大数，这种错误是为什么才出现的呢？应该怎么处理啊？
这种错误是偶尔出现，而且，该SQL语句在PL/SQL中执行没有任何问题。请帮帮忙啊   Function OpenQuery(OQuery: TADOQuery; SQLStr: String): Boolean; overload;
Begin
  Result := True;
  Try
    IF Not FADO.Connected Then FADO.Connected :=True;
    If OQuery.Active Then OQuery.close;
    OQuery.Connection :=FADO;
    OQuery.SQL.Clear;
    oquery.sql.Text := sqlstr;
    OQuery.Open;
  Except
  end;
end;