lcString="ABC,DEF,GHI,JKL" >>>>lcString2="" >>>>x=0 >>>>do while x<len(m.lcString) >>>> x=m.x+1 >>>> IF SUBSTR(m.lcString,m.x,1)<>"," >>>> lcString2=m.lcString2+substr(m.lcString,m.x,1) >>>> ENDIF >>>>enddo X >>>>?m.lcString2>>>
>>>lcString="ABC,DEF,GHI,JKL" >>>lcString2 = STRTRAN(m.lcString, ',', '') >>>?lcString2 >>>>>
>lcString="ABC,DEF,GHI,JKL" >lcString2 = lcString >Do While Occurs(',',lcString2)>0 > lcString2 = Substr(lcString2,1,At(',',lcString2)-1)+Substr(lcString2,At(',',lcString2)+1) >Enddo &&OCCURS(',',lcString2)>0 >?lcString2 >>or
>lcString="ABC,DEF,GHI,JKL" >lcString2 = lcString >Do While Occurs(',',lcString2)>0 > lcString2 = STUFF(lcString2,At(',',lcString2),1,'') >Enddo &&OCCURS(',',lcString2)>0 >?lcString2 >>edit:
>lcString="ABC,DEF,GHI,JKL" >lcString2 = lcString >FOR i = Occurs(',',lcString2) TO 1 STEP -1 > lcString2 = STUFF(lcString2,At(',',lcString2,i),1,'') >endfor >?lcString2 >If I were going to use a loop, I'd parse first with ALINES() and then process the elements. In this case, that's more work than needed.