if not tableupdate(1,.t.,"setup") dimension laerr[1] ?aerror(laerr) ?laerr[2] endifI have not used views since vfp7 but I will play with this a little tonight and see what I can come up with.
>SELECT Setup.bid, Setup.agent, Setup.company, Setup.password, Setup.cell; > FROM ; > DBA.Setup Setup > >DBSetProp(ThisView,"View","SendUpdates",.T.) >DBSetProp(ThisView,"View","BatchUpdateCount",1) >DBSetProp(ThisView,"View","CompareMemo",.T.) >DBSetProp(ThisView,"View","FetchAsNeeded",.F.) >DBSetProp(ThisView,"View","FetchMemo",.T.) >DBSetProp(ThisView,"View","FetchSize",100) >DBSetProp(ThisView,"View","MaxRecords",-1) >DBSetProp(ThisView,"View","Prepared",.F.) >DBSetProp(ThisView,"View","ShareConnection",.F.) >DBSetProp(ThisView,"View","AllowSimultaneousFetch",.F.) >DBSetProp(ThisView,"View","UpdateType",1) >DBSetProp(ThisView,"View","UseMemoSize",255) >DBSetProp(ThisView,"View","Tables","DBA.Setup") >DBSetProp(ThisView,"View","WhereType",3) > >DBSetProp(ThisView+".bid","Field","DataType","C(5)") >DBSetProp(ThisView+".bid","Field","UpdateName","DBA.Setup.bid") >DBSetProp(ThisView+".bid","Field","KeyField",.T.) >DBSetProp(ThisView+".bid","Field","Updatable",.F.) > >DBSetProp(ThisView+".agent","Field","DataType","C(10)") >DBSetProp(ThisView+".agent","Field","UpdateName","DBA.Setup.agent") >DBSetProp(ThisView+".agent","Field","KeyField",.T.) >DBSetProp(ThisView+".agent","Field","Updatable",.F.) > >DBSetProp(ThisView+".company","Field","DataType","C(30)") >DBSetProp(ThisView+".company","Field","UpdateName","DBA.Setup.company") >DBSetProp(ThisView+".company","Field","KeyField",.F.) >DBSetProp(ThisView+".company","Field","Updatable",.T.) > >DBSetProp(ThisView+".password","Field","DataType","C(10)") >DBSetProp(ThisView+".password","Field","UpdateName","DBA.Setup.password") >DBSetProp(ThisView+".password","Field","KeyField",.F.) >DBSetProp(ThisView+".password","Field","Updatable",.T.) > >DBSetProp(ThisView+".cell","Field","DataType","C(10)") >DBSetProp(ThisView+".cell","Field","UpdateName","DBA.Setup.cell") >DBSetProp(ThisView+".cell","Field","KeyField",.F.) >DBSetProp(ThisView+".cell","Field","Updatable",.T.) >