2010 Jul 14 3:54 PM
Hi,
I tried in SDn to find suitable thread atlast i am creating query here.
My requirement is: i have two radiobuttons.
when i click first radiobutton it hasto show one selection screen it contains pernr and bukrs
when i click second radiobutton it has to show second selection screen . This screen includes personnel area and Wage type
Thanks,
Maheedhar
2010 Jul 14 4:04 PM
Use "AT SELECTION-SCREEN OUTPUT" and distinguish them with "MODIF ID"
Code flows like this:
PARAMETERS r_online RADIOBUTTON GROUP g1
USER-COMMAND ex DEFAULT 'X'.
PARAMETERS r_batch RADIOBUTTON GROUP g1.
PARAMETERS r_down RADIOBUTTON GROUP g1.
PARAMETER: p_bukrs LIKE t024e-bukrs OBLIGATORY
DEFAULT 'US60'.
SELECT-OPTIONS: s_werks FOR marc-werks.
PARAMETER: p_vari TYPE slis_vari MODIF ID md5.
PARAMETERS: p_a_file LIKE rlgrap-filename
DEFAULT '/transfer/us6/ZUS6MM04_MatPlt'
MODIF ID md2.
PARAMETERS: p_h_file LIKE rlgrap-filename
DEFAULT '/transfer/us6/ZUS6MM04_MatPlt_HDR'
MODIF ID md2.
PARAMETERS: p_hfile1 LIKE rlgrap-filename
DEFAULT '/transfer/us6/ZUS6MM04_MatPlt_HDR'
MODIF ID md3.
PARAMETERS: p_hfile2 LIKE rlgrap-filename
default 'C:\Transfer\US6\ZUS6MM04_MatPlt_HDR.txt'
MODIF ID md4.
*--------------------------------------------------------------------*
* AT SELECTION-SCREEN EVENTS
*--------------------------------------------------------------------*
AT SELECTION-SCREEN OUTPUT.
PERFORM modify_screen.
*&-------------------------------------------------------------------*
*& Form MODIFY_SCREEN
*&-------------------------------------------------------------------*
*
*--------------------------------------------------------------------*
FORM modify_screen .
LOOP AT SCREEN.
IF r_online = 'X'.
IF screen-group1 = 'MD3' OR
screen-group1 = 'MD4' OR
screen-group1 = 'MD2'.
screen-active = '0'.
ENDIF.
ELSEIF r_batch = 'X'.
IF screen-group1 = 'MD3' OR
screen-group1 = 'MD4' OR
screen-group1 = 'MD5'.
screen-active = '0'.
ENDIF.
ELSEIF r_down = 'X'.
IF screen-group1 = 'MD2' OR
screen-group1 = 'MD5'.
screen-active = '0'.
ENDIF.
ENDIF.
MODIFY SCREEN.
ENDLOOP.
ENDFORM. " MODIFY_SCREEN
Hi,
I tried in SDn to find suitable thread atlast i am creating query here.
My requirement is: i have two radiobuttons.
when i click first radiobutton it hasto show one selection screen it contains pernr and bukrs
when i click second radiobutton it has to show second selection screen . This screen includes personnel area and Wage type
Thanks,
Maheedhar
2010 Jul 14 4:04 PM
Use "AT SELECTION-SCREEN OUTPUT" and distinguish them with "MODIF ID"
Code flows like this:
PARAMETERS r_online RADIOBUTTON GROUP g1
USER-COMMAND ex DEFAULT 'X'.
PARAMETERS r_batch RADIOBUTTON GROUP g1.
PARAMETERS r_down RADIOBUTTON GROUP g1.
PARAMETER: p_bukrs LIKE t024e-bukrs OBLIGATORY
DEFAULT 'US60'.
SELECT-OPTIONS: s_werks FOR marc-werks.
PARAMETER: p_vari TYPE slis_vari MODIF ID md5.
PARAMETERS: p_a_file LIKE rlgrap-filename
DEFAULT '/transfer/us6/ZUS6MM04_MatPlt'
MODIF ID md2.
PARAMETERS: p_h_file LIKE rlgrap-filename
DEFAULT '/transfer/us6/ZUS6MM04_MatPlt_HDR'
MODIF ID md2.
PARAMETERS: p_hfile1 LIKE rlgrap-filename
DEFAULT '/transfer/us6/ZUS6MM04_MatPlt_HDR'
MODIF ID md3.
PARAMETERS: p_hfile2 LIKE rlgrap-filename
default 'C:\Transfer\US6\ZUS6MM04_MatPlt_HDR.txt'
MODIF ID md4.
*--------------------------------------------------------------------*
* AT SELECTION-SCREEN EVENTS
*--------------------------------------------------------------------*
AT SELECTION-SCREEN OUTPUT.
PERFORM modify_screen.
*&-------------------------------------------------------------------*
*& Form MODIFY_SCREEN
*&-------------------------------------------------------------------*
*
*--------------------------------------------------------------------*
FORM modify_screen .
LOOP AT SCREEN.
IF r_online = 'X'.
IF screen-group1 = 'MD3' OR
screen-group1 = 'MD4' OR
screen-group1 = 'MD2'.
screen-active = '0'.
ENDIF.
ELSEIF r_batch = 'X'.
IF screen-group1 = 'MD3' OR
screen-group1 = 'MD4' OR
screen-group1 = 'MD5'.
screen-active = '0'.
ENDIF.
ELSEIF r_down = 'X'.
IF screen-group1 = 'MD2' OR
screen-group1 = 'MD5'.
screen-active = '0'.
ENDIF.
ENDIF.
MODIFY SCREEN.
ENDLOOP.
ENDFORM. " MODIFY_SCREEN
2010 Jul 14 4:07 PM
| User | Count |
|---|---|
| 3 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 |