if !empty(thisform.gzyy.value)
repl all gzyy with alltrim(thisform.gzyy.value)
endi
if !empty(thisform.rjsj.value)
repl all rjsj with alltrim(thisform.rjsj.value)
endi
if !empty(thisform.gzsj.value)
repl all gzsj with alltrim(thisform.gzsj.value)
endi
ELSE
MESSAGEBOX("修改条件不能为空","确认")
ENDI
thisform.refresh
*allocate.scx(综合查询)搜索按钮click事件
**********************************************
sele gzbx
tr=''
if !empty(thisformset.locate.sfz.value)
if !empty(tr)
tr=tr+ ' and alltrim(sfz) = alltrim(thisformset.locate.sfz.value) '
else
tr= ' alltrim(sfz) = alltrim(thisformset.locate.sfz.value) '
endi
endi
if !empty(thisformset.locate.xm.value)
if !empty(tr)
tr=tr+ ' and alltrim(xm) = alltrim(thisformset.locate.xm.value) '
else
tr= ' alltrim(xm) = alltrim(thisformset.locate.xm.value) '
endi
endi
if !empty(thisformset.locate.xl.value)
if !empty(tr)
tr=tr+ ' and alltrim(xl) = alltrim(thisformset.locate.xl.value )'
else
tr= ' alltrim(xl) = alltrim(thisformset.locate.xl.value )'
endi
endi
if thisformset.locate.xb.value=1
if !empty(tr)
tr=tr+ ' and xb = "男" '
else
tr= ' xb = "男" '
endi
endi
if thisformset.locate.xb.value=2
if !empty(tr)
tr=tr+ ' and xb = "女" '
else
tr= ' xb = "女" '
endi
endi
if !empty(thisformset.locate.mz.value)
if !empty(tr)
tr=tr+ ' and alltrim(mz) = alltrim(thisformset.locate.mz.value) '
else
tr= ' alltrim(mz) = alltrim(thisformset.locate.mz.value) '
endi
endi
if !empty(thisformset.locate.dp.value)
if !empty(tr)
tr=tr+ ' and alltrim(dp) = alltrim(thisformset.locate.dp.value) '
else
tr= ' alltrim(dp) = alltrim(thisformset.locate.dp.value) '
endi
endi
if !empty(thisformset.locate.zc.value)
if !empty(tr)
tr=tr+ ' and alltrim(zc) = alltrim(thisformset.locate.zc.value) '
else
tr = ' alltrim(zc) = alltrim(thisformset.locate.zc.value) '
endi
endi
if !empty(thisformset.locate.grdm.value)
if !empty(tr)
tr=tr+ ' and dm = val(thisformset.locate.grdm.value) '
else
tr= ' dm = val(thisformset.locate.grdm.value) '
endi
endi
if !empty(thisformset.locate.qtgz.value)
if !empty(tr)
tr=tr+ ' and qtgz = vaL(thisformset.locate.qtgz.value) '
else
tr= ' qtgz = val(thisformset.locate.qtgz.value) '
endi
endi
if !empty(thisformset.locate.zw.value)
if !empty(tr)
tr=tr+ ' and alltrim(zw) = alltrim(thisformset.locate.zw.value) '
else
tr= ' alltrim(zw) = alltrim(thisformset.locate.zw.value) '
endi
endi
if !empty(thisformset.locate.djgz.value)
if !empty(tr)
tr=tr+ ' and djgz = val(thisformset.locate.djgz.value) '
else
tr= ' djgz = val(thisformset.locate.djgz.value) '
endi
endi
if !empty(thisformset.locate.jngz.value)
if !empty(tr)
tr=tr+ ' and jngz = val(thisformset.locate.jngz.value) '
else
tr= ' jngz = val(thisformset.locate.jngz.value) '
endi
endi
if !empty(thisformset.locate.gkdw.value)
if !empty(tr)
tr=tr+ ' and alltrim(gk) = alltrim(thisformset.locate.gkdw.value) '
else
tr= ' alltrim(gk) = alltrim(thisformset.locate.gkdw.value) '
endi
endi
if !empty(thisformset.locate.jndj.value)
if !empty(tr)
tr=tr+ ' and jndj = thisformset.locate.jndj.value '
else
tr= ' jndj = thisformset.locate.jndj.value '
endi
endi
if !empty(thisformset.locate.mlbt.value)
if !empty(tr)
tr=tr+ ' and mlbt = val(thisformset.locate.mlbt.value) '
else
tr= ' mlbt = val(thisformset.locate.mlbt.value) '
endi
endi
if !empty(thisformset.locate.gwgz.value)
if !empty(tr)
tr=tr+ ' and gwgz = val(thisformset.locate.gwgz.value) '
else
tr= ' gwgz = val(thisformset.locate.gwgz.value) '
endi
endi
if !empty(thisformset.locate.dwdm.value)
if !empty(tr)
tr=tr+ ' and bm = thisformset.locate.dwdm.value '
else
tr= ' bm = thisformset.locate.dwdm.value '
endi
endi
if !empty(thisformset.locate.djgw.value)
if !empty(tr)
tr=tr+ ' and djgw = thisformset.locate.djgw.value '
else
tr= ' djgw = thisformset.locate.djgw.value '
endi
endi
if !empty(thisformset.locate.ylbx.value)
if !empty(tr)
tr=tr+ ' and jbbx = val(thisformset.locate.ylbx.value) '
else
tr= ' jbbx = val(thisformset.locate.ylbx.value) '
endi
endi
if !empty(thisformset.locate.ryly.value)
if !empty(tr)
tr=tr+ ' and alltrim(ryly) = alltrim(thisformset.locate.ryly.value) '
else
tr= ' alltrim(ryly) = alltrim(thisformset.locate.ryly.value) '
endi
endi
if !empty(thisformset.locate.zhbt.value)
if !empty(tr)
tr=tr+ ' and zhbt = thisformset.locate.zhbt.value '
else
tr= ' zhbt = thisformset.locate.zhbt.value '
endi
endi
if !empty(thisformset.locate.jsbt.value)
if !empty(tr)
tr=tr+ ' and jsbt = val(thisformset.locate.jsbt.value) '
else
tr= ' jsbt = val(thisformset.locate.jsbt.value) '
endi
endi
if !empty(thisformset.locate.jljt.value)
if !empty(tr)
tr=tr+ ' and jljt = val(thisformset.locate.jljt.value) '
else
tr= ' jljt = val(thisformset.locate.jljt.value) '
endi
endi
if !empty(thisformset.locate.jnlb.value)
if !empty(tr)
tr=tr+ ' and alltrim(jnlb) = alltrim(thisformset.locate.jnlb.value) '
else
tr= ' alltrim(jnlb) = alltrim(thisformset.locate.jnlb.value) '
endi
endi
if !empty(thisformset.locate.gwlb.value)
if !empty(tr)
tr=tr+ ' and alltrim(gwlb) = alltrim(thisformset.locate.gwlb.value) '
else
tr= ' alltrim(gwlb) = alltrim(thisformset.locate.gwlb.value) '
endi
endi
if !empty(thisformset.locate.cxbx.value)
if !empty(tr)
tr=tr+ ' and gbbx = vaL(thisformset.locate.cxbx.value) '
else
tr= ' gbbx = val(thisformset.locate.cxbx.value) '
endi
endi
if !empty(thisformset.locate.gzyy.value)
if !empty(tr)
tr=tr+ ' and alltrim(gzyy) = alltrim(thisformset.locate.gzyy.value) '
else
tr= ' alltrim(gzyy) = alltrim(thisformset.locate.gzyy.value) '
endi
endi
if !empty(thisformset.locate.COMBO1.value)
if !empty(thisformset.locate.TEXT1.value)
if !empty(tr)
IF thisformset.locate.COMBO1.value = '>='
tr=tr+ ' and cssj >= thisformset.locate.TEXT1.value '
ENDI
IF thisformset.locate.COMBO1.value = '>'
tr=tr+ ' and cssj > thisformset.locate.TEXT1.value '
ENDI
IF thisformset.locate.COMBO1.value = '='
tr=tr+ ' and cssj = thisformset.locate.TEXT1.value '
ENDI
IF thisformset.locate.COMBO1.value = '<='
tr=tr+ ' and cssj <= thisformset.locate.TEXT1.value '
ENDI
IF thisformset.locate.COMBO1.value = '<'
tr=tr+ ' and cssj < thisformset.locate.TEXT1.value '
ENDI
else
IF thisformset.locate.COMBO1.value = '>='
tr= ' cssj >= thisformset.locate.TEXT1.value '
ENDI
IF thisformset.locate.COMBO1.value = '>'
tr= 'cssj > thisformset.locate.TEXT1.value '
ENDI
IF thisformset.locate.COMBO1.value = '='
tr= ' cssj = thisformset.locate.TEXT1.value '
ENDI
IF thisformset.locate.COMBO1.value = '<='
tr= ' cssj <= thisformset.locate.TEXT1.value '
ENDI
IF thisformset.locate.COMBO1.value = '<'
tr=' cssj < thisformset.locate.TEXT1.value '
ENDI
endi
endi
ENDI
if !empty(thisformset.locate.COMBO2.value)
if !empty(thisformset.locate.TEXT2.value)
if !empty(tr)
IF thisformset.locate.combo2.value = '>='
tr=tr+ ' and rjsj >= thisformset.locate.text2.value '
ENDI
IF thisformset.locate.combo2.value = '>'
tr=tr+ ' and rjsj > thisformset.locate.text2.value '
ENDI
IF thisformset.locate.combo2.value = '='
tr=tr+ ' and rjsj = thisformset.locate.text2.value '
<< 上一页 [11] [12] [13] [14] [15] [16] [17] [18] 下一页