FIX: Program Code Cannot Set Database Property to Null String

ID: Q161198

The information in this article applies to:

• Microsoft Visual FoxPro for Windows, version 5.0

SYMPTOMS

The Database property of a cursor cannot be programmatically set to a null string. The Database property always shows the full path of Visual FoxPro. This is the same value as contained in the FULLPATH() function. The Database property of a cursor contained in the DataEnvironment of a form can be modified.

This problem only appears in Visual FoxPro 5.0; Visual FoxPro 3.0b functions properly.

STATUS

Microsoft has confirmed this to be a problem in the Microsoft products listed at the beginning of this article. This problem has been fixed in Visual FoxPro 5.0a.

MORE INFORMATION

This program creates a free table named myTable. Next, the Database property is set to null. Finally, WAIT WINDOW commands compare the value of the FULLPATH() function with the actual value of the Database property.

Steps to Reproduce Problem

Create a program, place the following code in it, and run the program:

   CREATE TABLE myTable FREE (myFld C (10))
   * create the custom data environment object
   xx = createobject("myDataEnv")

   DEFINE CLASS myDataEnv AS DataEnvironment
   PROCEDURE init()
      This.AddObject("oMyCursor","myCursor")

      * The database property is incorrect.
      * It is showing the current value of FULLPATH("").
      * The same code under Visual FoxPro 3.0 shows the null string.

      WAIT WINDOW "This is the Value of FULLPATH():" ;
      + CHR(13) + FULLPATH("") + ;
      CHR(13) + "Press any key to continue..."

      WAIT WINDOW "This is the value of the Database property :" ;
      + CHR(13) + this.oMyCursor.Database ;
      + CHR(13) + "Press any key to continue..."

   ENDPROC
   ENDDEFINE

   DEFINE CLASS myCursor AS Cursor
      Database = ""    && Sets the Database property to empty string
      CursorSource = "myTable"
   ENDDEFINE

Keywords          : kbprg kbVFp kbVFp500afix kbVFp500bug FxprgTable kbbuglist kbfixlist
Version           : 5.0
Platform          : WINDOWS
Issue type        : kbbug
Solution Type     : kbfix