Error msg: "Allowed DO nesting or expression evaluation level exceeded."
Program: Thor_proc_repository_foxrefpatch
Line is next to last one in module:
Do (_Screen.cOldFoxRefValue) with M.tuPara
Steps to reproduce:
Start foxpro
do thor.app
From menu Select: Tools- > Code References
When I look at the variable values in the debugger I get:
_screen.coldfoxrefvalue =C:\CARPET\THOR\TOOLS\PROCS\THOR_PROC_REPOSITORY_FOXREFPATCH.PRG
m.tupara.mode=0
The problem seems to be that the first line in the case statement was commented out
* Case M.tuPara.Mode == 0 && Code References from the VFP Tools Menu
which if the value is zero, the program just recursively calls itself over and over.
Program: Thor_proc_repository_foxrefpatch
Line is next to last one in module:
Do (_Screen.cOldFoxRefValue) with M.tuPara
Steps to reproduce:
Start foxpro
do thor.app
From menu Select: Tools- > Code References
When I look at the variable values in the debugger I get:
_screen.coldfoxrefvalue =C:\CARPET\THOR\TOOLS\PROCS\THOR_PROC_REPOSITORY_FOXREFPATCH.PRG
m.tupara.mode=0
The problem seems to be that the first line in the case statement was commented out
* Case M.tuPara.Mode == 0 && Code References from the VFP Tools Menu
which if the value is zero, the program just recursively calls itself over and over.