if !empty(thisform.tzc.value)
if !empty(tr)
tr=tr+ ' and alltrim(zc) = alltrim(thisform.tzc.value) '
else
tr = ' alltrim(zc) = alltrim(thisform.tzc.value) '
endi
endi
if !empty(thisform.tqtgz.value)
if !empty(tr)
tr=tr+ ' and qtgz = vaL(thisform.tqtgz.value) '
else
tr= ' qtgz = val(thisform.tqtgz.value) '
endi
endi
if !empty(thisform.tzw.value)
if !empty(tr)
tr=tr+ ' and alltrim(zw) = alltrim(thisform.tzw.value) '
else
tr= ' alltrim(zw) = alltrim(thisform.tzw.value) '
endi
endi
if !empty(thisform.tdjgz.value)
if !empty(tr)
tr=tr+ ' and djgz = val(thisform.tdjgz.value) '
else
tr= ' djgz = val(thisform.tdjgz.value) '
endi
endi
if !empty(thisform.tjngz.value)
if !empty(tr)
tr=tr+ ' and jngz = val(thisform.tjngz.value) '
else
tr= ' jngz = val(thisform.tjngz.value) '
endi
endi
if !empty(thisform.gkdw.value)
if !empty(tr)
tr=tr+ ' and alltrim(gk) = alltrim(thisform.tgkdw.value) '
else
tr= ' alltrim(gk) = alltrim(thisform.tgkdw.value) '
endi
endi
if !empty(thisform.tjndj.value)
if !empty(tr)
tr=tr+ ' and jndj = thisform.tjndj.value '
else
tr= ' jndj = thisform.tjndj.value '
endi
endi
if !empty(thisform.tmlbt.value)
if !empty(tr)
tr=tr+ ' and mlbt = val(thisform.tmlbt.value) '
else
tr= ' mlbt = val(thisform.tmlbt.value) '
endi
endi
if !empty(thisform.tgwgz.value)
if !empty(tr)
tr=tr+ ' and gwgz = val(thisform.tgwgz.value) '
else
tr= ' gwgz = val(thisform.tgwgz.value) '
endi
endi
if !empty(thisform.tdwdm.value)
if !empty(tr)
tr=tr+ ' and bm = thisform.tdwdm.value '
else
tr= ' bm = thisform.tdwdm.value '
endi
endi
if !empty(thisform.tdjgw.value)
if !empty(tr)
tr=tr+ ' and djgw = thisform.tdjgw.value '
else
tr= ' djgw = thisform.tdjgw.value '
endi
endi
if !empty(thisform.tylbx.value)
if !empty(tr)
tr=tr+ ' and jbbx = val(thisform.tylbx.value) '
else
tr= ' jbbx = val(thisform.tylbx.value) '
endi
endi
if !empty(thisform.tjsbt.value)
if !empty(tr)
tr=tr+ ' and jsbt = val(thisform.tjsbt.value) '
else
tr= ' jsbt = val(thisform.tjsbt.value) '
endi
endi
if !empty(thisform.tjljt.value)
if !empty(tr)
tr=tr+ ' and jljt = val(thisform.tjljt.value) '
else
tr= ' jljt = val(thisform.tjljt.value) '
endi
endi
if !empty(thisform.tjnlb.value)
if !empty(tr)
tr=tr+ ' and alltrim(jnlb) = alltrim(thisform.tjnlb.value) '
else
tr= ' alltrim(jnlb) = alltrim(thisform.tjnlb.value) '
endi
endi
if !empty(thisform.tgwlb.value)
if !empty(tr)
tr=tr+ ' and alltrim(gwlb) = alltrim(thisform.tgwlb.value) '
else
tr= ' alltrim(gwlb) = alltrim(thisform.tgwlb.value) '
endi
endi
if !empty(thisform.tcxbx.value)
if !empty(tr)
tr=tr+ ' and gbbx = vaL(thisform.tcxbx.value) '
else
tr= ' gbbx = val(thisform.tcxbx.value) '
endi
endi
if !empty(thisform.COMBO1.value)
if !empty(thisform.TEXT1.value)
if !empty(tr)
IF thisform.COMBO1.value = '>='
tr=tr+ ' and cssj >= thisform.TEXT1.value '
ENDI
IF thisform.COMBO1.value = '>'
tr=tr+ ' and cssj > thisform.TEXT1.value '
ENDI
IF thisform.COMBO1.value = '='
tr=tr+ ' and cssj = thisform.TEXT1.value '
ENDI
IF thisform.COMBO1.value = '<='
tr=tr+ ' and cssj <= thisform.TEXT1.value '
ENDI
IF thisform.COMBO1.value = '<'
tr=tr+ ' and cssj < thisform.TEXT1.value '
ENDI
else
IF thisform.COMBO1.value = '>='
tr= ' cssj >= thisform.TEXT1.value '
ENDI
IF thisform.COMBO1.value = '>'
tr= 'cssj > thisform.TEXT1.value '
ENDI
IF thisform.COMBO1.value = '='
tr= ' cssj = thisform.TEXT1.value '
ENDI
IF thisform.COMBO1.value = '<='
tr= ' cssj <= thisform.TEXT1.value '
ENDI
IF thisform.COMBO1.value = '<'
tr=' cssj < thisform.TEXT1.value '
ENDI
endi
endi
ENDI
if !empty(thisform.COMBO2.value)
if !empty(thisform.TEXT2.value)
if !empty(tr)
IF thisform.combo2.value = '>='
tr=tr+ ' and rjsj >= thisform.text2.value '
ENDI
IF thisform.combo2.value = '>'
tr=tr+ ' and rjsj > thisform.text2.value '
ENDI
IF thisform.combo2.value = '='
tr=tr+ ' and rjsj = thisform.text2.value '
ENDI
IF thisform.combo2.value = '<='
tr=tr+ ' and rjsj <= thisform.text2.value '
ENDI
IF thisform.combo2.value = '<'
tr=tr+ ' and rjsj < thisform.text2.value '
ENDI
else
IF thisform.combo2.value = '>='
tr= ' rjsj >= thisform.text2.value '
ENDI
IF thisform.combo2.value = '>'
tr= 'rjsj > thisform.text2.value '
ENDI
IF thisform.combo2.value = '='
tr= ' rjsj = thisform.text2.value '
ENDI
IF thisform.combo2.value = '<='
tr= ' rjsj <= thisform.text2.value '
ENDI
IF thisform.combo2.value = '<'
tr=' rjsj < thisform.text2.value '
ENDI
endi
endi
ENDI
if !empty(thisform.combo3.value)
if !empty(thisform.text3.value)
if !empty(tr)
IF thisform.combo3.value = '>='
tr=tr+ ' and gzsj >= thisform.text3.value '
ENDI
IF thisform.combo3.value = '>'
tr=tr+ ' and gzsj > thisform.text3.value '
ENDI
IF thisform.combo3.value = '='
tr=tr+ ' and gzsj = thisform.text3.value '
ENDI
IF thisform.combo3.value = '<='
tr=tr+ ' and gzsj <= thisform.text3.value '
ENDI
IF thisform.combo3.value = '<'
tr=tr+ ' and gzsj < thisform.text3.value '
ENDI
else
IF thisform.combo3.value = '>='
tr= ' gzsj >= thisform.text3.value '
ENDI
IF thisform.combo3.value = '>'
tr= 'gzsj > thisform.text3.value '
ENDI
IF thisform.combo3.value = '='
tr= ' gzsj = thisform.text3.value '
ENDI
IF thisform.combo3.value = '<='
tr= ' gzsj <= thisform.text3.value '
ENDI
IF thisform.combo3.value = '<'
tr=' gzsj < thisform.text3.value '
ENDI
endi
endi
ENDI
sele gzbx
SET FILT TO &tr
if !empty(tr)
sele gzbx
if !empty(thisform.zc.value)
repl ALL zc with alltrim(thisform.zc.value)
endi
if !empty(thisform.qtgz.value)
if type('thisform.qtgz.value')="C"
thisform.qtgz.value=val(thisform.qtgz.value)
endi
repl all qtgz with (thisform.qtgz.value)
endi
if !empty(thisform.zw.value)
REPL ALL zw WITH alltrim(thisform.zw.value)
endi
if !empty(thisform.djgz.value)
if type('thisform.djgz.value')="C"
thisform.djgz.value=val(thisform.djgz.value)
endi
REPL ALL djgz WITH (thisform.djgz.value)
endi
if !empty(thisform.jngz.value)
REPL ALL jngz WITH val(thisform.jngz.value)
endi
if !empty(thisform.gkdw.value)
repl all gk with alltrim(thisform.gkdw.value)
endi
if !empty(thisform.jndj.value)
repl all jndj with thisform.jndj.value
endi
if !empty(thisform.mlbt.value)
repl all mlbt with val(thisform.mlbt.value)
endi
if !empty(thisform.gwgz.value)
if type('thisform.gwgz.value')="C"
thisform.gwgz.value=val(thisform.gwgz.value)
endi
repl all gwgz with (thisform.gwgz.value)
endi
if !empty(thisform.dwdm.value)
repl all bm with thisform.dwdm.value
endi
if !empty(thisform.djgw.value)
<< 上一页 [11] [12] [13] [14] [15] [16] [17] [18] 下一页