Update高难问题又来了。!!(跟上次差不多!)

jk3278jk 2004-10-29 04:48:06

为了更新方便及速度,现在将表poibaseinfo(无索引)复制一个为t_temp表(有索引) ,然后从t_temp读取,后再更新poibaseinfo中的内容。


poibaseinfo表

nid strcitycode strinfotype strname strTransferTation dlatitude dlongitude
------------------------------------------------------------------------------------------
679411 010 G12 草桥欣园 39.83933900 116.38038800
679411 010 G12 菊园 39.8393000 116.38030000



要求将更新数据库中每条记录的 strTransferTation 字段,条件是dlatitude(经度) dlongitude(纬度)此记录为100米范围内strname的记录名称的记录找出然后写入 strTransferTation .

查找100米范围的语句给出:
以查找 草桥欣园 的100米内记录为例:

select * from t_temp where (ABS(39.83933900 - dlongitude)+ABS(116.38038800- dlatitude))<=0.001




要求最后结果橡这样:


nid strcitycode strinfotype strname strTransferTation dlatitude dlongitude
------------------------------------------------------------------------------------------
679411 010 G12 草桥欣园 草桥欣园 菊园 39.83933900 116.38038800
679411 010 G12 菊园 草桥欣园 菊园 39.8393000 116.38030000



...全文
149 6 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
bzszp 2004-10-29
  • 打赏
  • 举报
回复
create or replace function f_con_str_2(v_pk in number)
return varchar2 is
str_return varchar2(200);
v_11 number;
v_22 number;
cursor c_str(v_l number,v_2 number) is from t_temp where (ABS(v_1- dlongitude)+ABS(v_2- dlatitude))<=0.001;
begin
select dlatitude,dlongitude into v_11,v_22 from t_temp where pk=v_pk;--这里要通过传入的主键来进行检索,
for str_temp in c_str(v_11,v_22) loop
str_return:=str_return||' '||str_temp.strname;
end loop;
return str_return;
exception when others
null;
end f_con_str_2;
/

ORARichard 2004-10-29
  • 打赏
  • 举报
回复
看不懂
jk3278jk 2004-10-29
  • 打赏
  • 举报
回复
老大帮帮忙。行吗?别人都快下斑了。我还得弄出来这个才能走啊。。
jk3278jk 2004-10-29
  • 打赏
  • 举报
回复
这个问题本来我已经用java程序搞定了。程序已经写出来了。但跑了一个java程序,因为数据量很大,速度很慢。估计要20个小时才能跑完。

所以还是想在oralce中弄。

我原来以为java是万能的。现在。。。 叹!!!慢。。
jk3278jk 2004-10-29
  • 打赏
  • 举报
回复
怎么改。老大,麻烦改一下好吗?我oracle不行啊。
bzszp 2004-10-29
  • 打赏
  • 举报
回复
把那个函数改一下就行了。
酷窗版演示:http://www.edd8.com/bbs/index.asp?style=0 简装版演示:http://www.edd8.com/bbs/index2.asp 一点点论坛(http://www.edd8.com/bbs)使用说明 欢迎大家下载使用一点点论坛,在使用论坛前,请认真阅读以下内容: ===================================== 论坛:一点点论坛(http://www.edd8.com/bbs) 主页:一点点星空驿站(http://www.edd8.com/) 站长:叮咚虫(e_Mail:b_li@163.com) 版本:EDD8 Ver.2003 for DV =====================================   一点点论坛是建立在动网论坛基础上的ASP互动论坛,从动网Var5.b109开始论坛结构便开始脱离动网,与动网升级一起,本论坛本身也同时实现了动网新的功能,到519的发布,本人常得论坛本身已功能基本完善,所以决定与动网完全脱离,到动网Final的出现,本论坛也决定不再跟随动网升级了,本人全面对原来的论坛进行了代码优化和版面重排,并升级了部分功能代码,完成了现在这样的论坛。使论坛已经完全脱离了动网,以后也不可以随动网一起升级了!   所以选择本论坛的朋友请先明白,如果采用了本论坛的数据结构,以后就不可以和动网一起升级了,而现有的动网Final版的数据库和本论坛的数据库也是不兼容的!对于动网V5.b519的用户,本人同时在压缩包里提供了升级文件,可以把你519的数据库升级成和本论坛一致的数据结构!   由于一些朋友催得较急,部分功能还是没有完善的(但不会出错),我以后也会给出升级包的。所以决定使用本论坛的朋友,请一定要到本站论坛的“站务办公室”进行指定的留言签名,以好我第一时间通知大家升级!   论坛中使用到的部分插件并没有一同奉上,原因是我还没完成代码优化,请过几天到我的论坛上下载。可以下载的插件主要有:社区银行、网络拳皇、可乐吧台球、五子棋等等…… ===================================== 主要特色功能说明: ◎ 双版面设计,用户可以根据不同爱好选择不同的版式(酷窗版和精简版),系统会记录用户的选择,不用重复选择,也不会出现版面混淆等现象; ◎ 发贴回贴互动功能,给用户随机的互动事件,增加用户的参与兴趣; ◎ 增强的UBB代码和JS代码,新增的买卖贴、定时贴等十几种特色功能UBB代码; ◎ 贴子功能加强,增加互动鲜花、鸡蛋、金钱、炸弹等功能,并保存数据作为用户在论坛的人缘依据; ◎ 不好说了,等你去发掘吧,不然又说我叫卖了…… ====================================== 安装说明: 解压就可以了,数据库名称和路径有变动时不要忘了在CONN。ASP中进行相应修改。 (注意:当论坛中一个贴子也没有时,论坛明星会出错,但当你加入贴子后就正常了,大家不要惊慌) 升级:(对519),解压后把你的原519数据库覆盖现数据库,再执行根目录下的UPDATE。ASP文件就行了,如果没有升级成功的提示,说明你的数据不能进行升级! (注意:数据库的升级应做了备份,并在本机上进行!) ====================================== 最后一点说明: 由于论坛本来是打算自己用的,所以在设计的过程中部分变量已经去掉,不能从后台设置了(如表格边框),请大家最好保持现有的风格。 如果还不问题,可以到我的论坛上来交流。??注意,由于本人时间不限,技术支持是有限的,请不要过于强求!

17,382

社区成员

发帖
与我相关
我的任务
社区描述
Oracle 基础和管理
社区管理员
  • 基础和管理社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧