出厂编号    有    无    杂    自    液
H8708    0    2    0    0    0
H8708    1    0    0    0    0
H8718    0    2    0    0    0
H8718    0    2    0    0    0
K7138    0    2    0    0    0
K7138    0    2    0    0    0
K8698    0    2    0    0    0
K8698    0    2    0    0    0
我是一个初学者，有数据库如上图，想以出厂编号为主字段，把出厂编号相同但其它参数不同的数据给过滤出来，但不知道应该如何设置程序。请各位老师指点下，非常感谢！！
USE AAA
GO TOP
DO WHILE  NOT EOF()
STOR  出厂编号 TO AAA
sTor  有 TO BBB
sTor  无 TO CCC
sTor  杂 TO DDD
sTor  自 TO EEE
sTor  液 TO FFF
DO CASE
case BBB<>"0" .AND. 出厂编号==AAA
DISP
case CCC<>"0" .AND. 出厂编号==AAA
DISP
case DDD<>"0" .AND. 出厂编号==AAA
DISP
case EEE<>"0"  .AND. 出厂编号==AAA
DISP
case FFF<>"0"  .AND. 出厂编号==AAA
DISP
ENDC
SEEK AAA
ENDD
Copy to 数据A.xls type xl5