>LOCAL; > lcMacro AS CHARACTER,; > loAdapter AS CURSORADAPTER > > >CREATE CURSOR myTable (c1 C(1), c2 C(3)) >INSERT INTO myTable VALUES ("A","1") >INSERT INTO myTable VALUES ("B","2") >INSERT INTO myTable VALUES ("C","3") > >loAdapter = NEWOBJECT('captest') > >lcMacro = '' >loAdapter.CURSORFILL() >SELECT (loAdapter.ALIAS) >BROWSE >lcMacro = 'ORDER BY 1 DESC' >loAdapter.CURSORREFRESH() >BROWSE > >DEFINE CLASS capTest AS CURSORADAPTER > PROCEDURE INIT > THIS.ALIAS = 'capTest' > THIS.DATASOURCE = 'Native' > THIS.DATASOURCETYPE = 'Native' > THIS.SELECTCMD = "SELECT * FROM MyTable &lcMacro" > ENDPROC &&INIT >ENDDEFINE >>all what you have to care is, that SELCTCMD holds the &lcMacro, not the expanded string.