609
社区成员
发帖
与我相关
我的任务
分享PB修改数据窗口的select语句时遇到问题
dw_1.reset()
ls_oldselect=dw_1.describe("datawindow.table.sqlselect")
is_selectwhere =''
uf_createtable()
if is_selectwhere = '' then
dw_1.settransobject(sqllis)
dw_1.retrieve(ld_ksrq,ld_jsrq,ls_patientid,ls_patientname)
else
ls_newsetselect = ls_oldselect + is_selectwhere
dw_1.object.datawindow.table.select = ls_newsetselect
dw_1.settransobject(sqllis)
ll_i = dw_1.retrieve(ld_ksrq,ld_jsrq,ls_patientid,ls_patientname)
end if
dw_1.object.datawindow.table.select = ls_oldselect
这段代码运行第一次时可以正确获取到数据，但是第二次运行时，无法获取数据，依然是第一次的数据，后来通过getsqlselect（）发现数据窗口的select语句还是第一次赋值上去的，而通过dw_1.describe（）获取的select语句却与第二次的赋值一样
ls_oldselect=dw_1.describe("datawindow.table.sqlselect")
is_selectwhere =''
uf_createtable()
if is_selectwhere = '' then
dw_1.settransobject(sqllis)
dw_1.retrieve(ld_ksrq,ld_jsrq,ls_patientid,ls_patientname)
else
ls_newsetselect = ls_oldselect + is_selectwhere
dw_1.object.datawindow.table.select = ls_newsetselect
dw_1.settransobject(sqllis)
ll_i = dw_1.retrieve(ld_ksrq,ld_jsrq,ls_patientid,ls_patientname)
end if
dw_1.object.datawindow.table.select = ls_oldselect
这段代码运行第一次时可以正确获取到数据，但是第二次运行时，无法获取数据，依然是第一次的数据，后来通过getsqlselect（）发现数据窗口的select语句还是第一次赋值上去的，而通过dw_1.describe（）获取的select语句却与第二次的赋值一样
...全文
请发表友善的回复…
发表回复
怕我不由得 2018-02-13
- 打赏
- 举报
上面的再修改一下 将if 中的 or 改成 and
怕我不由得 2018-02-13
- 打赏
- 举报
ls_oldselect=dw_1.describe("datawindow.table.sqlselect")
这句改为
if ls_oldselect<>'' or not isnull(ls_oldselect) then ls_oldselect=dw_1.describe("datawindow.table.sqlselect")
注意 ls_oldselect 声明从局部变量改为实例变量即可
whb00120012 2017-11-30
- 打赏
- 举报
这个题主要在于
if pos( ls_oldselect ,'where')>0 then
ls_selectwhere='and'+ 字段匹配和
ELSE
ls_selectwhere='where'+ 字段匹配和
end if
ls_newsetselect = ls_oldselect + is_selectwhere
划]破 2017-11-29
- 打赏
- 举报
都过去一年啦，老帖子都被翻出来了…………
r00_a2lBUR 2017-11-11
- 打赏
- 举报
这么老的帖子也被翻出来，貌似楼主发完帖子以后就没有回来过
qq_41018401 2017-11-10
- 打赏
- 举报
个人建议，要养成良好的编码习惯，以便于快速定位和处理问题。
acen_chen 2017-07-17
- 打赏
- 举报
uf_createtable()不知道做了些啥
tmx 2017-07-17
- 打赏
- 举报
首先代码顺序应该如下：
w_1.reset() //只是把数据清空
ls_oldselect=dw_1.describe("datawindow.table.sqlselect") //应该取出的是没有where条件裸sql语法
is_selectwhere ='' //没有where子句
uf_createtable() //不清楚用途，这个函数后is_selectwhere的值是不会改变的，那后面的if语句永远只执行else前面的半段。
//这就是问题所在，局部变量的值不会因为调用uf_createtable() 而改变
if is_selectwhere = '' then
dw_1.settransobject(sqllis)
dw_1.retrieve(ld_ksrq,ld_jsrq,ls_patientid,ls_patientname)
else
ls_newsetselect = ls_oldselect + is_selectwhere
dw_1.object.datawindow.table.select = ls_newsetselect
dw_1.settransobject(sqllis)
ll_i = dw_1.retrieve(ld_ksrq,ld_jsrq,ls_patientid,ls_patientname)
end if
dw_1.object.datawindow.table.select = ls_oldselect
tmx 2017-07-17
- 打赏
- 举报
这段代码非常混乱，对数据窗口的操作需要加以输入研究。
Powertion 2016-11-24
- 打赏
- 举报
如果是Oracle,可能是SQL语句末尾缺少一个分号
WorldMobile 2016-11-22
- 打赏
- 举报
dw_1.object.datawindow.table.select = ls_newsetselect
改为
dw_1.setsqlselect(ls_newsetselect)
再试试，如果不行，看一下setsqlselect的返回值，是不是你的sql有错误
数据窗口源码介绍
(举例见d_dbit_example.srd,测试数据库为PB自带的EAS Demo DB V120)
1.第一行:release 12;
数据窗口所属PB的版本号,如果想把高版本的datawindow导入低版本的PB中要修改此数字;
2.datawindow()行
通常用修改processing属性,可以把你的数据窗口由grid变成freeform或其它类型
例:freeform:0 grid:1
3.header()行
可以整行复制粘贴,并命名为header[1],header[2],这样可以让数据窗口有多个header
4.table()行
这里全是定义的数据属性,是setitem,update,object.data等方法访问的根源
如果存在table()里的column,数据窗口里可以不存在任何对象,仍然可以访问数据窗口的数据
如果想创建一个空的数据窗口,可以只定义: release 12; table()
5.table(column行)
是第几个column,它的ID就是多少,其中也定义了是否可以update时和更新到数据表的字段名
6.table(retrieve行)
检索数据时使用的SQL语句,可以通过setsqlselect或modify("table.sqlselect")方法去动态修改
修改后要重新定义数据窗口的更新属性
7.column()行
id即是对应table(column行)里的行次,名称(name)可以随便命名,也可以没有,则默认为table(column行)里的name
8.compute()行
计算列,可以通过表达式计算显示特定值(具体函数可以见共享里的画笔函数).
9.text()行
有时可以代替计算列;
通过定义text的表达式,可以实现一列中显示两个字段值,注意结果必须要转换成string类型(而column和compute则不行);
10.htmltable()行
按照格式导出(saveas)html文件,为了保证格式的完整,数据窗口的单位最好设置成pixels
GenerateCSS='1' //保持格式及颜色
Border='0' //不要table边框
CellSpacing='0' //单元格无间距(此项在界面上经常设置不上)
注:
(1)Grid生成标签,Freeform生成
