LOCAL lnI, lcString
select MyTab
lcString= "" && тогда работает :-))
FOR lnI=1  TO FCOUNT("MyTab ")
	lcFieldName = Field(m.lnI," MyTab ")
	IF <поле надо включить в запрос>
		lcString = m.lcString+" ,"+m.lcFieldName
	ENDIF
ENDFOR
* Отсекаю первую запятую
lcString=SubStr(m.lcString, 2 )

* Собственно запрос
SELECT &lcString FROM MyTab

close tabl all
sele  0 
use marka
LOCAL lnI, lcString
select Marka
lcString= ""
FOR lnI=1  TO FCOUNT()
	**FCOUNT("Marka ") - Returns the number of fields in a table MARKA
	lcFieldName = Field(m.lnI)
	**FIELD() - Returns the name of a field, referenced by number, in a table.
	IF lcFieldName #" ZEX ".OR.lcFieldName #" PRINS "
		lcString = m.lcString+" ,"+m.lcFieldName
	ENDIF
ENDFOR
* Отсекаю первую запятую
lcString=SubStr(m.lcString, 2 )

* Собственно запрос
SELECT &lcString FROM Marka