>if type("nalias")='C' > ocursor=this.rstodbf(nalias,lors) > return ocursor >endif > >procedure rstodbf(calias,lorst) > if used(calias) > select (calias) > use > endif > talias="CA"+sys(2015) > try > ocursoradapter = createobject("CursorAdapter") > ocursoradapter.alias=talias > ocursoradapter.allowdelete = .t. > ocursoradapter.allowinsert = .t. > ocursoradapter.allowupdate = .t. > ocursoradapter.datasourcetype="ADO" > ocursoradapter.cursorfill(,,,lorst) > ocursoradapter.cursordetach() > catch to loerror > messagebox(loerror.message) > endtry > select * from (talias) into cursor (calias) readwrite > select (talias) > use > return (calias) > endproYour current code is returning an alias (return (cAlias)) - it doesn't return an object.