Skip to Content
avatar image
Former Member

dynamic text changes in selection screen

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

Add comment
10|10000 characters needed characters exceeded

  • Get RSS Feed

2 Answers

  • avatar image
    Former Member
    Feb 21, 2009 at 02:41 PM

    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.

    Add comment
    10|10000 characters needed characters exceeded

  • avatar image
    Former Member
    Feb 21, 2009 at 02:52 PM

    hi pravik ....u just copy this code and get relaxed....

    selection-screen begin of block b0 with frame-title abcd .

    parameters:r1 radiobutton group rd1 default 'x' user-command abc,

    r2 radiobutton group rd1.

    selection-screen end of block b0.

    at selection-screen output.

    if r1 = 'x' .

    move 'sales' to abcd.

    elseif r2 = 'x' .

    move 'delivery' to abcd.

    endif.

    Add comment
    10|10000 characters needed characters exceeded