>>create cursor stylelist (style c(10),synonyms m) >>select styles >>scan >> select synonyms >> lcSynonym = "" >> scan while fk = styles.pk >> lcSynonyms = m.lcSynonyms + iif(empty(m.lcSynonyms),"",",") + synonyms.synonym >> endscan >> if _Tally > 0 >> lcSynonyms = "("+m.lcSynonyms+")" >> endif >> select styles >> insert into stylelist values (styles.style,m.lcSynonyms) >>endscan >>select stylelist >>browse >>>