各位高手好：
   请教如何将该同一号码下的三条不同记录合并到一起？有个简单的程序总是不对，请指点，非常感谢！

CLOSE all
create table newdbf(bmh c(9),cwxx c(254))
select newdbf
append blank
use ls in 0
select ls
go top
do while .not.eof()
    a=bmh
    ctext=""
   DO WHILE  .t.
      if a<>bmh
        EXIT                 &&如果bmh不等于a,执行enddo之后的替换语句
            
      else 
        ctext=ctext+alltrim(cwnr)+"；"            
      ENDIF
        skip
        LOOP                  &&返回到do while，重新循环
   Enddo
        select newdbf
        replace cwxx with ctext
        replace bmh WITH ls.bmh
        append blank 
        skip
 enddo