Как да промените текста на етикета на бутона и да добавите нова функционалност по време на изпълнение? Oracle Forms

можете да редактирате този фрагмент :

begin 
     if ( :system.mode = 'ENTER-QUERY' ) then
           set_item_property('b_search', label, 'search'); 
           go_block('blk_yours');
           execute_query;    
     else
           set_item_property('b_search', label, 'last record');         
           go_block('blk_yours');    
           enter_query;
     end if;    
           last_record;
end;

в when-button-pressed тригер на елемента b_search