USE active m.ncli=ncli INDEX ON ncli TO hh DO WHILE .t. SET FILTER TO ncli=m.ncli GO bottom REPLACE active.Count2 WITH Count1 IF ncli<>m.ncli SKIP IF EOF() EXIT ENDIF endif enddo