leave program to screen 0
leave program set screen 0, leave screen
call selection screen 1000 call transaction ....