Dynamic text changes in selection screen

Question

i want to change the title of block into a selection screen after clicking radio button .the changes will be done dynamically.

Answer 1

Hi Pravik,
try this code:
selection-screen : begin of block b1 with frame title text-034.
selection-screen begin of line.
parameter : r_mas_dl radiobutton group r user-command btn default 'X'.
selection-screen comment 3(50) text-060.
selection-screen end of line.
selection-screen begin of line.
parameter:  r_new_dl radiobutton group r.
selection-screen comment 3(50) text-058.
selection-screen end of line.
selection-screen begin of line.
parameter: r_chn_d1 radiobutton group r.
selection-screen comment 3(50) text-059.
selection-screen end of line.
selection-screen skip 3.
parameter p_file  type rlgrap-filename modif id a.
select-options: s_sernr for risa0-sernr modif id b no-extension no intervals.
selection-screen : end of block b1 .
at selection-screen output.
  if r_mas_dl = c_x.                                      " For the first Radio button
    set titlebar 'MAS' with text-041. " Header Text1.
    loop at screen.
      if screen-group1 = c_a.
*        CLEAR p_file.
        if screen-name = text-052. "'P_FILE'.
          screen-invisible = 0.
          screen-input = 1.
        endif.
      endif.
      if screen-group1 = c_b.
        screen-invisible = 1.
        screen-input = 0.
      endif.
      if screen-group1 = c_c.
        screen-invisible = 1.
        screen-input = 0.
      endif.
      modify screen.
    endloop.
  elseif r_new_dl = c_x.                             " For the second radio button
    clear p_file.
    set titlebar 'SIN' with text-058. " Header Text2
    loop at screen.
      if screen-group1 = c_a.
        clear s_sernr.
        screen-input = 0.
        screen-invisible = 1.
      endif.
      if screen-group1 = c_b.
        screen-input = 1.
        screen-invisible = 0.
      endif.
      if screen-group1 = c_c.
        screen-invisible = 1.
        screen-input = 0.
      endif.
      modify screen.
    endloop.
  elseif r_chn_d1 = c_x.                               " For the third radion button.
    clear p_file.
    set titlebar 'CHG' with text-059. " Header Text3.
    loop at screen.
      if screen-group1 = c_a.
        clear s_sernr.
        screen-input = 0.
        screen-invisible = 1.
      endif.
      if screen-group1 = c_b.
        screen-input = 0.
        screen-invisible = 1.
      endif.
      if screen-group1 = c_c.
        screen-invisible = 0.
        screen-input = 1.
      endif.
      modify screen.
    endloop.
  endif.
hope it helps.