ACC: Line Numbers Not Automatically Returned by Erl Variable

MORE INFORMATION

Steps to Reproduce Behavior

1. Open any database.
2. Open a new module.
3. Type the following code:

         Sub ErrorTest ()
             Dim x as Integer                ' Declare variable.
             On Error Goto ErrorTest_Error
             x = 5 / 0                       ' Divide by zero error.
             Exit Sub
   
         ErrorTest_Error:
             Debug.Print "Error occurred in line #" & Erl
             Resume Next
         End Sub
   						

4. Open the Debug window.
5. Type the following line in the Debug window (or Immediate window in 1.x and 2.0), and then press ENTER:

   ErrorTest

   Note that you receive the following error:
   Error occurred in line #0

Steps to Work Around Behavior

1. Open the module containing ErrorTest().
2. Modify ErrorTest() as follows:

         Sub ErrorTest ()
             Dim x as Integer                ' Declare variable.
         10:                                 ' NEW LINE!!!
             On Error Goto ErrorTest_Error
         11:                                 ' NEW LINE!!!
             x = 5 / 0                       ' Divide by zero error
         12:                                 ' NEW LINE!!!
             Exit Sub
   
         ErrorTest_Error:
             Debug.Print "Error occurred in line #" & Erl
             Resume Next
         End Sub
   						

3. Open the Debug window.
4. Type the following line into the Debug window, and then press ENTER:

   ErrorTest

   Note that now you receive the following error:
   Error occurred in line #11