• 全部
  • API 调用
  • 基础类
  • 控件与界面
  • 数据库相关
  • DataWindow
  • 项目管理
  • Web 应用
  • 脚本语言

对我来说很郁闷的一个问题,指教!!

liangyuan198412 2008-02-26 03:03:28
tab_1.tabpage_3.dw_5.AcceptText()
is_hth= trim(dw_master.object.hth[dw_master.getrow()])
is_dh=trim(dw_master.object.dh[dw_master.getrow()])
gdt_sysdate=uf_getserverdatetime()
ldc_sxf=dec(sle_1.text)
select syje,qs into :ldc_sybj,:ls_qs from xdydb where isnull(hkbs,0)<>'1' and convert(char(7),jzhdsj,120)= convert(char(7),dateadd(month,1,convert(char(8),getdate(),120)+'10'),120) ;
if sqlca.sqlcode <0 then
rollback;
messagebox("提示信息","数据操作失败!")
return -1
end if
ldc_yhlx=ldc_sybj*ldc_sxf
ldc_ygje=ldc_yhlx + ldc_sybj
insert into xdhdb (dh,hth,qs,hdje,bjje,lxje,jzhdsj,xh,hdsj,hdlx) select dh,hth,qs,:ldc_ygje,:ldc_sybj,:ldc_yhlx,jzhdsj,'1',:gdt_sysdate,'提前还款' from xdydb
where yxbz='1' and dh=:is_dh and qs=:ls_qs ;
if sqlca.sqlcode<0 then
messagebox("提示信息","数据保存失败!")
return -1
end if
update xdydb set yxbz='0' where isnull(hkbs,0)<>'1' and yxbz='1';
if sqlca.sqlcode<0 then
messagebox("提示信息","数据保存失败!")
return -1
end if
//取消还贷

return 1



大家帮忙看看
我运行程序以后,在SQL中查询表中的数据半天没反应。只有退出程序以后才可以查询。。这个是什么原因啊。怎么劈面啊
...全文
47 点赞 收藏 2
写回复
2 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
yyzhuiming 2008-02-26
rollback;
回复
jlwei888 2008-02-26
你没commit;
回复
相关推荐
发帖
PowerBuilder
创建于2007-09-28

863

社区成员

PowerBuilder 相关问题讨论
申请成为版主
帖子事件
创建了帖子
2008-02-26 03:03
社区公告
暂无公告