Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

at selection screen.

former_member156446
Active Contributor
0 Likes
365

Hi

I have radio buttons on my selection screen.... based on the selection the comment should change...

SELECTION-SCREEN BEGIN OF LINE.

PARAMETER: p_grid TYPE c RADIOBUTTON GROUP g1,

p_list TYPE c RADIOBUTTON GROUP g1.

SELECTION-SCREEN COMMENT 58(10) comment.

SELECTION-SCREEN END OF LINE.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF p_grid = 'X'.

comment = 'GRID'.

ELSE.

comment = 'LIST'.

ENDIF.

MODIFY SCREEN.

ENDLOOP.

3 REPLIES 3
Read only

Former Member
0 Likes
344

Hi

Try this

SELECTION-SCREEN BEGIN OF LINE.
PARAMETER: p_grid TYPE c RADIOBUTTON GROUP g1 DEFAULT 'X' USER-COMMAND AAA,
           p_list TYPE c RADIOBUTTON GROUP g1.
SELECTION-SCREEN COMMENT 58(10) comment.
SELECTION-SCREEN END OF LINE.

AT SELECTION-SCREEN OUTPUT.
  IF p_grid = 'X'.
    comment = 'GRID'.
  ELSE.
    comment = 'LIST'.
  ENDIF.

Max

Read only

0 Likes
344

Thanks.. solved

SELECTION-SCREEN BEGIN OF LINE.
PARAMETER: p_grid TYPE c RADIOBUTTON GROUP g1 DEFAULT 'X' USER-COMMAND a,
           p_list TYPE c RADIOBUTTON GROUP g1.
SELECTION-SCREEN COMMENT 28(10) comment MODIF ID a.
SELECTION-SCREEN COMMENT 17(10) comment1 MODIF ID b.
SELECTION-SCREEN END OF LINE.

AT SELECTION-SCREEN OUTPUT.
  LOOP AT SCREEN.
    IF screen-group1 = 'A' AND p_grid = ' '.
      comment = 'GRID'.
    ELSEIF screen-group1 = 'B'.
      comment = 'LIST'.
    ENDIF.
    MODIFY SCREEN.
  ENDLOOP.

Read only

Former Member
0 Likes
344

Hi,

Try this way...

REPORT zka51151_test.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETER:
p_grid TYPE c RADIOBUTTON GROUP g1 default 'X' USER-COMMAND qwe,
p_list TYPE c RADIOBUTTON GROUP g1.
SELECTION-SCREEN COMMENT 58(10) comment.
SELECTION-SCREEN END OF LINE.

AT SELECTION-SCREEN OUTPUT.
  LOOP AT SCREEN.
    IF p_grid = 'X'.
      comment = 'GRID'.
    ELSE.
      comment = 'LIST'.
    ENDIF.
    MODIFY SCREEN.
  ENDLOOP.

INITIALIZATION.
  IF p_grid = 'X'.
    comment = 'GRID'.
  ELSE.
    comment = 'LIST'.
  ENDIF.