Please use the code tags in the editor to make your code readable. Also, cut and paste your code thus avoiding errors whilst retyping. I have fixed both for you.
What is the problem? What are the rules about perform and what happens once it has done its work? Why would you try to execute in 8000 code from 2000. It should be the other way around. And why try to execue an exit anyway.
Finally - what happened when you tried? You did try, didn't you? with lots of DISPLAYs so that you could see what was happening?
The problem I have is that people can explain things quickly but I can only comprehend slowly.