[duv] Evento On Tab

Boa tarde Srs.

Estou com uma dúvida no evento ON TAB preciso usar esse evento para navegar entre as frames.

Segue abaixo o script.

Código:

 def button sair label "sair" auto-endkey.
def var c-nome as char view-as selection-list 
    inner-chars 30  inner-lines 9 sort scrollbar-vertical.
def frame a
    c-nome  
    with center title "seleção de representantes" no-labels width 50 1 col.
def frame b sair.

for each salesrep by salesrep.sales-rep:
    c-nome :add-last (salesrep.sales-rep).
end.

on value-changed of c-nome   
    do:
        assign c-nome.
        for each salesrep where salesrep.sales-rep = c-nome:
        
         disp         Region 
                        Rep-Name
                        Month-Quota[1] 
                        Month-Quota[2] 
                        Month-Quota[3] 
                        Month-Quota[4] 
                        Month-Quota[5] 
                        Month-Quota[6] 
                        Month-Quota[7] 
                        Month-Quota[8] 
                        Month-Quota[9] 
                        Month-Quota[10] 
                        Month-Quota[11] 
                        Month-Quota[12] with frame b.
           update     sair 
                with frame b at row 8 col 1 width 51 1 col.
        end.
        
    end.    
        
    update c-nome with frame a.
    enable all with frame a.
    enable all with frame b.
wait-for choose of sair. 

Qual a duvida?

eu não estou conseguindo encerrar o programa com o botão que foi definido na frame b, quando eu clico no botão ele volta pra frame a, gostaria de saber se com o evento ON TAB da pra encerrar as duas frames...

Para sair no botão

Código:

ON CHOOSE OF sair do:

    quit.

end.