PRB: Non-Standard RETURN TO MASTER Behavior After LOCATE Error

• Microsoft Visual FoxPro for Windows, versions 3.0, 3.0b, 5.0
• Microsoft Visual FoxPro for Macintosh, version 3.0b

SYMPTOMS

In an error-handling routine of a sub-program, a RETURN TO MASTER command returns processing to the highest level running program.

An error caused by a faulty LOCATE FOR command does not result in a successful RETURN TO MASTER until after first returning to the command immediately following the line that caused the error.

STATUS

Microsoft is researching this behavior and will post new information here in the Microsoft Knowledge Base as it becomes available.

MORE INFORMATION

Steps to Reproduce Behavior

Copy the following two programs, and paste them into appropriately named program (.prg) files:

1. Copy the following into a program named ReturnFail:

   ** Returnfail.prg - demonstrates failure of ** RETURN TO MASTER in a class error method DEFINE CLASS returntest AS custom

         PROCEDURE init
            CLEAR
            USE HOME()+"samples\data\customer"
            ERROR 12, "MyError"
            *LOCATE FOR CustHeight="Steve" && No such column in table
            =MESSAGEBOX("It didn't return to master")
         ENDPROC
   
         PROCEDURE error
            LPARAMTERS  nError, cMethod, nLine
            =MESSAGEBOX("The error is " + STR(nError,2,0) + ;
                " in " + cMethod +" method.")
            RETURN TO MASTER
         ENDPROC
      ENDDEFINE
   
   

2. Copy the following into a program named TryFail:

   ** Tryfail.prg - program to test the failure of ** RETURN TO MASTER in a class where the error is ** caused by a LOCATE FOR fault. CLEAR CLOSE ALL SET PROCEDURE TO returnfail oRef = CREATEOBJECT("returntest") =MESSAGEBOX("It did return to master")

3. Run TryFail with the command "Do tryfail" (without the quotes). Observe that the only message is "It did return to master."

4. Edit the program "ReturnFail" by issuing the following command:

         MODIFY COMMAND returnfail
   

   Find the following two lines of code:

         ERROR 12, "MyError"
         *LOCATE FOR CustHeight="Steve" && No such column in table
   

   Remove the asterisk from the second line, and place an asterisk to the left of the first so that the lines look like:

         *ERROR 12, "MyError"
         LOCATE FOR CustHeight="Steve" && No such column in table
   

   Save that program.

5. Run tryfail again and observe the second and third messages.

An error caused by a faulty LOCATE FOR command does not result in a successful RETURN TO MASTER until after first returning to the command immediately following the line that caused the error.