📄 单位数统计.bak
字号:
****经测试成功了****张冰****
set path to c:\zbydhxt
use 统计表1.dbf in 0 alias ttt3
USE 单位数统计用表.dbf in 0 alias ttt1
sele ttt1
***set safety off &&&不出现删除的提示框!!!
zap
APPEND FROM c:\zbydhxt\队员总表1.dbf
***index on 单位代码 tag 单位代码 uniq
sele ttt3
do while .not.eof()
dws=0
xmdm=项目代码
zb=组别
xm=性别
sele ttt1
***set filter to 项目代码=xmdm.and.组别=zb.and.性别=xm
index on 单位代码 to dwdm uniq for 项目代码=xmdm.and.组别=zb.and.性别=xm
count to dws
close index
*** set filter to
dele file dwdm.idx
sele ttt3
repl 单位数 with dws
skip
enddo
****************************************
sele ttt1
use
sele ttt3
use
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -