>I got an error there: "Alias 'SMTRNSTM' is not found"

That's what I get for being hasty. Going back to Cetin's code...

lcFile = locfile('c:\transact.dbf')
        select 0
        use (m.lcFile)
	append from dbf('SMTRNSTM')

Alter the line use (m.lcFile) to this...

USE (m.lcFile) ALIAS c_Source

then after the append from line...

USE IN c_Source