I did get this to work issuing 3 read events and 2 clear events. It just seems so clunky!

glcontinueApp=.f.
glFirstTime=.t.

** the form frmnewlogin is modal and window type2 top level form,
** clear events issued in destroy event
Do FORM frmNewLogin
READ EVENTS

IF glContinueApp

glContinueApp = .f.

** the form frmselejob is modal and window type2 top level form,
** clear events issued in destroy event


DO FORM frmselejob
READ events

IF glContinueApp
CLEAR events
ENDIF


glFirstTime=.F.
** need glFirsttime so the the next time frmselejob is selected from the menu it doesn't clear events

IF glContinueApp

Do FORM frmMainMenu

Read EVENTS
*-*

Pop MENU _MSYSMENU
On ERROR
On SHUTDOWN

Set STATUS BAR ON

Set DELETED OFF

Set CURSOR ON

Close DATABASE ALL

Close TABLES ALL
ENDIF
Endif