>LOCAL loCursor AS CursorAdapter >LOCAL laErrors[1] > >OPEN DATABASE (_samples + "data\testdata") > >loCursor = CREATEOBJECT("CursorAdapter") > >WITH loCursor > > .Alias = "CustomerCursor" > .DataSourceType = "Native" > .SelectCmd = "select cust_id, company, contact from customer where country = 'Brazil'" > .KeyFieldList = "cust_id" > .Tables = "CUSTOMER" > .UpdatableFieldList = "cust_id, company, contact" > .UpdateNameList = "cust_id customer.cust_id, company customer.company, contact customer.contact" > .CursorSchema = "Col1 C(25), Col2 C(25), Col3 C(25)" > > IF .CursorFill(.T.) > > BROWSE > TABLEUPDATE(1) > > ELSE > > AERROR(laErrors) > MESSAGEBOX(laErrors[2]) > > ENDIF > > CLOSE DATABASES ALL > >ENDWITH >