Like most applications, I begin with a prg that displays a splash screen, sets up the environment, opens the database, checks the user's permissions, and finally calls the menu.

Before the database is opened, I issue the following command:
on error do GiveUp
open database MyData shared

*------------------------------------------------
procedure GiveUp

=MessageBox("Helpful Hints ...")
close all
clear all
quit
cancel
return

All I want to do is to display a message and terminate.When the database cannot be opened, the messagebox does appear but, the application continues to run and produce error after error. Also, making this a function and returning .F. won't work either.

Is it possible to force the termination of an application. If so. How?