How to get values of selection screen fields in the POV event

Question

I have two radio buttons r1,r2 and a field file_name on  selection screen.
I have written At selection screen on value-request for the field file_name. Based on the selection of radio buttons I have to display different screens when f4 for field_name is pressed.
Unfortunately the values of r1 or r2 are not populated in the AT selection screen on value-request event.
Can any one tell me if there is a way to obtain the values of r1 or r2 in the AT selection  screen on value-request event.

Answer 1

Hi..
Try out this.
REPORT  ZH_TEST4                                .
CONSTANTS : c_x                TYPE char01 VALUE 'X',
            c_rg1(4)        TYPE c      VALUE 'RG1',
            c_gr2(3)        TYPE c      VALUE 'GR2',
            c_gr3(3)        TYPE c      VALUE 'GR3',
            c_zero          TYPE n      VALUE '0',
            c_neg(2)        TYPE c      VALUE '-1'.
data: w_sscrfields_ucomm1   TYPE sscrfields-ucomm.
SELECTION-SCREEN : BEGIN OF BLOCK blk1 WITH FRAME TITLE text-001.
PARAMETERS       : p_back   RADIOBUTTON GROUP rg1
                                 USER-COMMAND pc,
                   p_fore   RADIOBUTTON GROUP rg1
                                      DEFAULT 'X'.
SELECTION-SCREEN : END OF BLOCK blk1.
SELECTION-SCREEN : BEGIN OF BLOCK blk2 WITH FRAME TITLE text-002.
PARAMETERS : p_phif LIKE rlgrap-filename  MODIF ID gr2,
             p_ahif LIKE rlgrap-filename  MODIF ID gr3.
SELECTION-SCREEN : END OF BLOCK blk2.
AT SELECTION-SCREEN OUTPUT.
  IF p_fore EQ c_x.
    w_sscrfields_ucomm1 = c_rg1.
  ELSE.
    w_sscrfields_ucomm1 = space.
  ENDIF.
  LOOP AT SCREEN.
    IF w_sscrfields_ucomm1 EQ space.
      IF screen-group1 = c_gr2.
        screen-active = c_zero.
      ENDIF.
    ELSE.
      IF screen-group1 = c_gr3.
        screen-active = c_zero.
      ENDIF.
    ENDIF.
    MODIFY SCREEN.
  ENDLOOP.
also try out function module POPUP_WITH_TABLE_DISPLAY.
Plz reward points if this helps by clicking on star!1
Good Luck!!
Cheers,
Rajeev