Sergey,
And you could do it w/o locate. And I could do it in N more different ways.
Cetin

>Cetin,
>
>You can use DO WHILE instead of SCAN for outer loop because actual record scan done in inner SCAN loop.

>***scan
>LOCATE
>DO WHILE NOT EOF()
> oRecord.id = crsTemp.ID
> scan while ID = oRecord.id
>  store FieldValue to ('oRecord.'+fieldname)
> endscan
> ***skip -1
> select NewTable && VFP8 : insert into NewTable from name oRecord
>* Could also use scatter memvar, insert into .. from memvar
> append blank
> gather name oRecord
> scatter name oRecord blank
> select crsTemp
>ENDDO
>***endscan
>

>>>unfortunately, you is right, my table have a dozen extra fields, then...:(
>>
>>Fbilo,
>>As I said wouldn't try to do with SQL directly.
>>Supposing your fieldname field doesn't contain any value that's illegal for a fieldname and number of distinct fieldnames isn't over 254 (+1 for id - table column limit) :
>>
>< snip >