o=CREATEOBJECT('cursoradapter') o.SelectCmd =; 'SELECT Dactauth.actauth_id, '+; 'Dactauth.actsect_id, '+; 'Dactauth.fund_id, '+; 'Dactauth.counsel_id, '+; 'Dactauth.date AS AuthorizationDate, '+; 'Dactauth.amount AS AuthorizationAmount, '+; 'Dactauth.allocamt AS AllocationAmount, '+; 'Dactauth.allocdate AS AllocationDate, '+; 'Dactauth.closed, '+; 'Dactauth.comments, '+; 'Dactauth.insdttm, '+; 'Dactauth.insuser_id, '+; 'Dactauth.upddttm, '+; 'Dactauth.upduser_id, '+; 'Dfund.fundno, '+; 'Dfund.fintype_id, '+; 'Dcounsel.bndconcd, '+; 'Dact.act, '+; 'Dactsect.sectname AS sectionname, '+; 'Dactsect.amount AS sectionamount, '+; 'Dact.act_id '+; ' FROM '+; ' kba_data!dact '+; ' INNER JOIN kba_data!dactsect '+; ' ON Dact.act_id = Dactsect.act_id '+; ' INNER JOIN kba_data!dactauth '+; ' ON Dactsect.actsect_id = Dactauth.actsect_id '+; ' INNER JOIN kba_data!dfund '+; ' ON Dfund.fund_id = Dactauth.fund_id '+; ' INNER JOIN kba_data!dcounsel '+; ' ON Dcounsel.counsel_id = Dactauth.counsel_id ' o.UpdatableFieldList =; 'actauth_id,'+; 'actsect_id,'+; 'fund_id,'+; 'counsel_id,'+; 'date, '+; 'amount, '+; 'allocamt, '+; 'allocdate,'+; 'closed,'+; 'comments,'+; 'insdttm,'+; 'insuser_id,'+; 'upddttm,'+; 'upduser_id' o.UpdateNameList=; 'actauth_id Dactauth.actauth_id,'+; 'actsect_id Dactauth.actsect_id,'+; 'fund_id Dactauth.fund_id,'+; 'counsel_id Dactauth.counsel_id,'+; 'date Dactauth.date ,'+; 'amount Dactauth.amount ,'+; 'allocamt Dactauth.allocamt ,'+; 'allocdate Dactauth.allocdate ,'+; 'closed Dactauth.closed,'+; 'comments Dactauth.comments,'+; 'insdttm Dactauth.insdttm,'+; 'insuser_id Dactauth.insuser_id,'+; 'upddttm Dactauth.upddttm,'+; 'upduser_id Dactauth.upduser_id,'+; 'fundno Dfund.fundno,'+; 'fintype_id Dfund.fintype_id,'+; 'bndconcd Dcounsel.bndconcd,'+; 'act Dact.act,'+; 'sectname Dactsect.sectname ,'+; 'amount Dactsect.amount ,'+; 'act_id Dact.act_id' o.DataSourceType='NATIVE' o.Alias="cc1" o.Tables="dact,dactsect,dactauth,dfund,dcounsel" o.KeyFieldList='ACTAUTH_ID' o.BufferModeOverride=5 o.AllowInsert=.t. o.AllowDelete=.t. o.AllowUpdate=.t. IF o.CursorFill() BROWSE ENDIFThanks