‎2006 Jul 26 7:00 AM
Hi friends,
just see this code.
tables : t001, bsid, tgsb, zbaero.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME.
SELECT-OPTIONS so_bukrs FOR t001-bukrs NO-EXTENSION NO
INTERVALS.
SELECT-OPTIONS so_gjahr FOR bsid-gjahr NO-EXTENSION NO
INTERVALS .
SELECT-OPTIONS so_gsber FOR tgsb-gsber . " NO-EXTENSION NO
*INTERVALS.
SELECT-OPTIONS so_monat FOR bsid-monat NO-EXTENSION NO
INTERVALS.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b4 WITH FRAME TITLE text-102.
PARAMETERS: r1 RADIOBUTTON GROUP rad1,
r2 RADIOBUTTON GROUP rad1,
r3 RADIOBUTTON GROUP rad1,
r4 RADIOBUTTON GROUP rad1,
r5 RADIOBUTTON GROUP rad1,
r6 RADIOBUTTON GROUP rad1.
SELECTION-SCREEN END OF BLOCK b4.
SELECTION-SCREEN BEGIN OF BLOCK b5 WITH FRAME TITLE text-103.
PARAMETERS: r7 RADIOBUTTON GROUP rad2 USER-COMMAND cond1 DEFAULT 'X',
r8 RADIOBUTTON GROUP rad2,
r9 RADIOBUTTON GROUP rad2 .
SELECTION-SCREEN END OF BLOCK b5.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-100.
SELECT-OPTIONS : so_ero FOR zbaero-zznewdimen.
SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-101.
SELECT-OPTIONS : so_sec FOR zbaero-zzsec matchcode object ZTEST.
SELECTION-SCREEN END OF BLOCK b3.
SELECTION-SCREEN BEGIN OF BLOCK b10 WITH FRAME TITLE text-110.
SELECT-OPTIONS : so_ero_s FOR zbaero-zznewdimen.
SELECTION-SCREEN END OF BLOCK b10.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF screen-name CS 'so_ero' .
IF r7 <> 'X' .
screen-input = 0.
screen-output = 0.
screen-active = 0.
MODIFY SCREEN.
ENDIF.
ENDIF.
IF screen-name CS 'so_sec'.
IF r8 <> 'X'.
screen-input = 0.
screen-output = 0.
screen-active = 0.
MODIFY SCREEN.
ENDIF.
ENDIF.
IF screen-name CS 'so_ero_s'.
IF r9 <> 'X'.
screen-input = 0.
screen-output = 0.
screen-active = 0.
MODIFY SCREEN.
ENDIF.
ENDIF.
******************************************
please execute and see this code.
When I am clicking on radio button r7 it is showing select-options so_ero.
When I am clicking on radio button r8 it is showing select-options so_sec.
but when I clicked on radio button r9 it should show select-options so_ero_s, but it is not showing anything.
I want to display so_ero_e selection screen when i click on r9 button.
thanks and regards.
Krishna
‎2006 Jul 26 7:07 AM
Hello,
Change your so_ero_s to so_era_s.
SELECTION-SCREEN BEGIN OF BLOCK b10 WITH FRAME TITLE text-110.
SELECT-OPTIONS : <b>so_era_s</b> FOR zbaero-zznewdimen.
SELECTION-SCREEN END OF BLOCK b10.
and also change it in at selection screen output, like :
IF screen-name CS <b>'so_era_s'.</b>
IF r9 <> 'X'.
screen-input = 0.
screen-output = 0.
screen-active = 0.
MODIFY SCREEN.
ENDIF.
ENDIF.
Regards,
Naimesh
‎2006 Jul 26 7:07 AM
Hello,
Change your so_ero_s to so_era_s.
SELECTION-SCREEN BEGIN OF BLOCK b10 WITH FRAME TITLE text-110.
SELECT-OPTIONS : <b>so_era_s</b> FOR zbaero-zznewdimen.
SELECTION-SCREEN END OF BLOCK b10.
and also change it in at selection screen output, like :
IF screen-name CS <b>'so_era_s'.</b>
IF r9 <> 'X'.
screen-input = 0.
screen-output = 0.
screen-active = 0.
MODIFY SCREEN.
ENDIF.
ENDIF.
Regards,
Naimesh
‎2006 Jul 26 7:16 AM
hi
Change your so_ero_s to so_era_s.
SELECTION-SCREEN BEGIN OF BLOCK b10 WITH FRAME TITLE text-110.
SELECT-OPTIONS : so_era_s FOR zbaero-zznewdimen.
SELECTION-SCREEN END OF BLOCK b10.
and also change it in at selection screen output, like :
IF screen-name CS 'so_era_s'.
IF r9 <> 'X'.
screen-input = 0.
screen-output = 0.
screen-active = 0.
MODIFY SCREEN.
ENDIF.
ENDIF.
Regards,
chetan