Hi everybody,

Try to reproduce the following problem: open several forms, type something and then go to the menu and try to close the application using Exit. On the question: Do you want to save changes? Answer Cancel. Then go to any other menu item. You'll get the error goAPP is not the object and the only way out is to kill the application.

Here is a quick and simple fix:

local lnYesNo
store 0 to lnYesNo

if vartype(m.goApp) = "O" && if an application object available?
	if m.goApp.lDebugMode and !m.goApp.lDebugDisableAppQuit
		lnYesNo = MsgSvc("quitapp")
		if m.lnYesNo = IDYES
			goApp.onShutdown()
		else
			return
		endif
	else
		goApp.onShutdown()
	endif
else
	clear all
endif

Thanks in advance.