FIX: OpenTables of Cursor Object May Fail with Locate Dialog

MORE INFORMATION

Steps to Reproduce Behavior

1. Run the following code from a program (.prg) file:

         CREATE TABLE mytable FREE (myFld c (10))
   
         CLOSE DATABASE ALL
         PUBLIC oDataEnv
         oDataEnv = CREATEOBJECT("DataEnv")
         oDataEnv.OPENTABLES()
   
         DEFINE CLASS DataEnv AS DATAENVIRONMENT
            PROCEDURE INIT()
               THIS.ADDOBJECT("oFreeCursor","FreeCursor")
            ENDPROC
         ENDDEFINE
   
         DEFINE CLASS FreeCursor AS CURSOR
            * Setting the Database property to empty string, as it should be,
            * generates an error.
            DATABASE = ""
            CURSORSOURCE = SET('DEFAULT')+CURDIR()+"myTable.dbf"
         ENDDEFINE