Try that, Noman, as a panacea and report back!


>* Stores current database
>cDbcpathname=dbc()
>
>* Closes all tables in dataenvironment
>Thisform.DataEnvironment.CloseTables
>
>* creates an array with names of the member properties
>=AMEMBERS(laProplist, ThisForm.DataEnvironment, 2)
>
>* Stores length of the array
>nArraylen = ALEN(laProplist, 1)
>
>* returns to calling program if DE is empty
>IF EMPTY(laProplist[1])
> RETURN
>ENDIF
>
>* loops to look through the contents of an array
>IF nArrayLen > 0
> FOR IDcount = 1 TO nArraylen
> cObjname = EVAL('THISFORM.Dataenvironment.' + laProplist[IDcount])
> * changes cursor's reference database path to current database path
> IF LOWER(cObjname.Baseclass) = 'cursor'
> IF !EMPTY(cObjname.Database)
> cObjname.Database = cDbcpathname
> ENDIF
> ENDIF
> NEXT
>ENDIF
>
>* Opens all tables in dataenvironment
>Thisform.DataEnvironment.OpenTables
>
>* Refreshes information on each page
>THISFORM.DataInput.Refresh()
>
>
>This method is called DataEnvTables. I am calling it during form initializion. Should I put this code in DE mehod 'beforeopentables' to get rid of any errors.
>Thanks.