统计不了第二个人的数据？

SELECT linshi
GO BOTTOM
renshu = RECN()                    &&获得记录总数
GO TOP                             &&返回最顶开始
DIMENSION marray(renshu)           &&根据记录总数定义一个数组存放姓名
FOR i=1 TO renshu
   STORE 姓名 TO marray(i)
   SKIP
ENDFOR
SELECT huojianjilu
FOR j=1 TO renshu
   SUM  huojianjilu.保管金额  TO grje FOR ALLTRIM(huojianjilu.收款人员) = marray(j)
   SUM  huojianjilu.货件数量  TO grch FOR ALLTRIM(huojianjilu.存仓人员) = marray(j)
   SUM  huojianjilu.货件数量  TO grth FOR ALLTRIM(huojianjilu.提货人员) = marray(j)
   SELECT linshi
   GO j
   REPLACE 存放金额 WITH grje
   REPLACE 存放数量 WITH grch
   REPLACE 提货数量 WITH grth
ENDFOR

我的实验环境是
设计两个账号，都有一定的记录
计算结果确实第一个有记录
第二个结果都是0
这是为什么？？？

搜索更多相关主题的帖子: 数据 统计

试试：
SELECT linshi
*GO BOTTOM
renshu = RECC()                    &&获得记录总数
GO TOP                             &&返回最顶开始
DIMENSION marray(renshu)           &&根据记录总数定义一个数组存放姓名
FOR i=1 TO renshu
   STORE 姓名 TO marray(i)
   SKIP
ENDFOR
SELECT huojianjilu
FOR j=1 TO renshu
   SUM  huojianjilu.保管金额  TO grje FOR ALLTRIM(huojianjilu.收款人员) = ALLTRIM(marray(j))
   SUM  huojianjilu.货件数量  TO grch FOR ALLTRIM(huojianjilu.存仓人员) = ALLTRIM(marray(j))
   SUM  huojianjilu.货件数量  TO grth FOR ALLTRIM(huojianjilu.提货人员) = ALLTRIM(marray(j))
   SELECT linshi
   GO j
   REPLACE 存放金额 WITH grje
   REPLACE 存放数量 WITH grch
   REPLACE 提货数量 WITH grth
ENDFOR

这个程序有问题。楼主好像要统计收款人员、存仓人员、提货人员的相关数据？

是存在不少问题，别的不说，好像一个循环就够了……

哪里呀！他的huojianjilu表里每个人肯定有1条以上的记录。其实用select解决。

这个是一个统计表。。
统计huojianjilu表里，整个月下来每个员工货件的录入情况
主要是每人的存货数、提货数和收款额

另外
2楼的似乎也不行、、、

[ 本帖最后由 heychen 于 2008-10-5 18:39 编辑 ]

sele 收款人员,sum(*) from huojianjilu group by 收款人员 into curs temp1
sele 存仓人员,sum(*) from huojianjilu group by 存仓人员 into curs temp2
sele 提货人员,sum(*) from huojianjilu group by 提货人员 into curs temp3
然后，按需要组织记录

或者，用scan 临时表，将huojianjilu表中每人工作量相加后，放到另外一个表

???为什么上面的语句放进去会有下划线。。哪里出问题了？

额~~~~~- -
其实
这个已经是在临时表里的了，统计完成后打印出来。。
整个代码

IF LSB = .T.
   select 姓名 from yonghu into CURSOR linshi ReadWrite
   alter table linshi add 存放数量 n(4)
   alter table linshi add 提货数量 n(4)
   alter table linshi add 存放金额 n(4,2)
   LSB=.F.
ENDIF
SELECT linshi
GO BOTTOM
renshu = RECN()                    &&获得记录总数
GO TOP                             &&返回最顶开始
DIMENSION marray(renshu)           &&根据记录总数定义一个数组存放姓名
FOR i=1 TO renshu
   STORE 姓名 TO marray(i)
   SKIP
ENDFOR
SELECT huojianjilu
FOR j=1 TO renshu
   SUM  huojianjilu.保管金额  TO grje FOR ALLTRIM(huojianjilu.收款人员) = marray(j)
   SUM  huojianjilu.货件数量  TO grch FOR ALLTRIM(huojianjilu.存仓人员) = marray(j)
   SUM  huojianjilu.货件数量  TO grth FOR ALLTRIM(huojianjilu.提货人员) = marray(j)
   SELECT linshi
   GO j
   REPLACE 存放金额 WITH grje
   REPLACE 存放数量 WITH grch
   REPLACE 提货数量 WITH grth
ENDFOR
SELECT linshi
REPORT FORM tongji.frx NOCONSOLE PREVIEW NODIALOG TO PRINTER PROMPT