>vNewVal = "Race.RaceCode, RaceDesc"
>

>"SELECT RaceCode AS F1, RaceDesc AS F2 FROM Race"
>

lcTable = JUSTSTEM(m.vNewVal)
vNewVal = SUBSTR(m.vNewVal, LEN(m.lcTable)+2)
lcFields = ''
for ix =1 to alines(arrF, m.vNewVal, 1, ',')
  lcFields = m.lcFields + iif(m.ix > 1, ',','') + ;
  	textmerge( '<<arrF[m.ix]>> as F<<m.ix>>' )
ENDFOR

SELECT &lcFields FROM (m.lcTable)