When you call a procedure via ON KEY, the first line in the called code should be PUSH KEY CLEAR and the last POP KEY.
In your case, push the keys in Setup, and pop them in Cleanup (View/General Options when you are editing the menu)