t*fromypxx_xsintodbf&brpath\ypxx_xs
use
thisform.check5.value=0
endi
thisform.command1.enabled=0
--------------------------------------------------------------------------
工资设定gzsd
--------------------------------------------------------------------------
前一个:按钮click事件
ifnoteof()andnotbof()
thisform.command6.enabled=1
thisform.command5.enabled=1
endi
ifbof()
thisform.command5.enabled=0
endi
ifnotbof()
skip-1
thisform.refresh
endi
下一个:按钮click事件
ifeof()
thisform.command6.enabled=0
endi
ifnoteof()andnotbof()
thisform.command6.enabled=1
thisform.command5.enabled=1
endi
ifnoteof()
skip1
thisform.refresh
endi
计算:按钮click事件
replall应领工资 with基本工资+津贴+知识补贴+午餐补贴+交通补贴+工龄补贴+奖金
删除:按钮click事件
selekhxx
gotop
locaforkhbh=allt(thisform.text1.value)andkhdh=allt(thisform.text2.value)
iffound()
dele
else
messagebox('notfound')
endi
thisform.text1.value=''
thisform.text2.value=''
thisform.text3.value=''
thisform.text4.value=''
selekhxx
gotop
thisform.refresh
编辑:按钮click事件
tablerevert(.t.)
thisform.command1.enabled=1
thisform.command2.enabled=0
thisform.command3.enabled=0
thisform.combo1.enabled=0
thisform.txtypqy.enabled=0
thisform.combo3.enabled=0
thisform.combo4.enabled=0
thisform.txtypbh.enabled=0
thisform.txtyppm.enabled=0
thisform.txtypjhrq.enabled=0
thisform.txtypbz.enabled=0
thisform.txtypyxq.enabled=0
thisform.txtypjj.enabled=0
thisform.txtypjs.enabled=0
thisform.txtypls.enabled=0
thisform.txtypgg.enabled=0
thisform.txtypph.enabled=0
thisform.txtypsl.enabled=0
thisform.txtypwh.enabled=0
thisform.text1.enabled=0
thisform.text2.enabled=0
thisform.command1.setfocus
thisform.text1.value=''
thisform.text2.value=''
thisform.text3.value=''
thisform.text4.value=''
thisform.refresh
保存:按钮click事件
tableupdate(.t.)
thisform.refresh
退出:按钮click事件
setfilterto
thisform.release
添加:按钮click事件
selectypxx_jh
appeblan
gobott
thisform.refresh
thisform.command1.enabled=0
thisform.command2.enabled=1
thisform.command3.enabled=1
thisform.combo1.enabled=1
thisform.txtypqy.enabled=1
thisform.combo3.enabled=1
thisform.combo4.enabled=1
thisform.txtypjhrq.value=date()
thisform.txtypbh.enabled=1
thisform.txtyppm.enabled=1
thisform.txtypjhrq.enabled=1
thisform.txtypbz.enabled=1
thisform.txtypyxq.enabled=1
thisform.txtypjj.enabled=1
thisform.txtypjs.enabled=1
thisform.txtypls.enabled=1
thisform.txtypgg.enabled=1
thisform.txtypph.enabled=1
thisform.txtypwh.enabled=1
thisform.text1.enabled=1
thisform.text2.enabled=1
还原:按钮click事件
seleypxs_ls
tbh=ypbh
tyxq=ypyxq
tph=ypph
tzl=ypzl
tls=yplsh
tqy=ypqy
seleypxx_xs
locaforypbh=tbhandypyxq=tyxqandypph=tphandypzl=tzlandyplsh=tls
iffound()
dele
seleypxx_kc
locaforypbh=tbhandypyxq=tyxqandypph=tphandypqy=tqy
iffound()
replypzlwithypzl+tzl
replypjswithint(ypzl/ypbz)
replyplswithypzl-ypjs*ypbz
endi
endi
seleypxx_kc
tableupdate(.t.)
seleypxx_xs
tableupdate(.t.)
thisform.refresh
--------------------------------------------------------------------------
工资查询gzcx
--------------------------------------------------------------------------
前一个:按钮click事件
ifnoteof()andnotbof()
thisform.command6.
上一篇:
vf图书管理系统(VFP)(包括程序文档)(论文和程序)
下一篇:
对硕士毕业生迁移失业目的地的实证研讨