pb中子数据窗口设置模糊查询

最新推荐文章于 2020-12-04 12:32:10 发布

原创最新推荐文章于 2020-12-04 12:32:10 发布 · 1.9k 阅读

1 ·

CC 4.0 BY-SA版权

文章标签：

#pb #子数据窗口 #模糊查询

pb学习专栏收录该内容

0 篇文章

订阅专栏

本文介绍了一种使用子数据窗口根据设备名称和拼音码进行高效查询的方法。通过设置过滤条件和排序方式，确保了数据检索的准确性和快速响应。

//在数据窗口中editchanged()

string strdatacol, strfilter, strdisplaycol,strpym

datawindowchild obj_dwc

//子数据窗口根据设备名称和拼音码来查询
choose case dwo.name
case 'khbm'
strdatacol = this.Describe(dwo.name + ".DDDW.DataColumn")
strdisplaycol = this.Describe(dwo.name + ".DDDW.DisplayColumn")
strpym = 'pym'
if strdisplaycol = '?' or strdisplaycol = '!' then
else
this.getchild(dwo.name, obj_dwc)
if len(trim(data)) = 0 or isnull(data) then
strfilter = strdisplaycol + ' like ("' + data + '%")'
else
strFilter = strFilter + "(" + strdisplaycol + " like ('%" + data + "%')" + ")"
strFilter = strFilter + " or "
strFilter = strFilter + "("+ strpym + " like ('"+ data +"%') "+")"

end if
obj_dwc.setredraw(false)
obj_dwc.setfilter(strfilter)
obj_dwc.filter()
obj_dwc.setsort(strdisplaycol + ' A, ' + strdatacol + ' A')
obj_dwc.sort()
obj_dwc.setredraw(true)
if ilngrow <> row then ilngrow = row
if istrdwoname <> dwo.name then istrdwoname = dwo.name
end if

end choose