My flow is:

ActiveDoc class set as 'main'
Run Event:
     do main.prg
     (main sets up environment, runs my first form, etc)

CommandTargetExec Event:
     do case
        case nCommandID = 37
        This.ContainerRelease
     endcase

Container Release Event:
     clear events
     release all
     clear all
     This.ContainerReleaseType = 1

I get errors when the user clicks [quit] in my main form.
"Cannot clear objects in use"
"Internal Consistency Error"
And then the app quits.

Help?