dynamic selection screen
Dear All,
I have three blocks on a selection screen
1st block contains 2 radio buttons(say A and B).
These 2 radiobuttons correspond to block A and B.These blocks contain no of Parameters and Select options.
If user selects A button ..then block A should be displayed.
If user selects B button then block A should be disabled and block B should be displayed/ready for input.
Can anyone help me please...
Thanks..
have a look at the SAP Help on MODIF ID groups for selection variables.
Or you could define your radiobuttons to have function codes associated to them, check the SY-UCOMM and the loop at your screen to change the output.
_________________
Kind Regards
Rosie Brent
Please remember to search the forum and check the FAQ before posting questions, thank you.
Tuly Idiot most of the time, part-time Guru
Briefly,
Use the instructions
- AT USER-COMMAND
case sy-ucom.
when 'AA'. perform AA
when 'BB'. perform BB
endcase
form AA / BB
- LOOP AT SCREEN / Modify screen. / endloop.
endform.
search ABAP help about these abap instructions.
Best Regards.
JLG
Firstly, ABAP although it claims to be an event driven language is not really. It does not support events such as Mouse down, keypress, Got_Focus and the like.
You will need to define a second screen which contains your blocks, and when a user selects a radio button and clicks onli or presses the enter key, you then decide in the second screens PBO what blocks, buttons or whatever you require to be visible and active.
_________________
Regards
R
Abap KC
SFMDR
this example maybe help u :---
************selection-screen****************
SELECTION-SCREEN BEGIN OF BLOCK ZUSMB WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS: S_werks FOR t001w-werks, "Plant
S_lgort FOR t001l-lgort, "Storage Location
S_charg FOR mch1-charg. "Batch Number
PARAMETER: P_VFDAT LIKE mcha-vfdat OBLIGATORY."Shelf life exp.date
SELECTION-SCREEN END OF BLOCK ZUSMB.
SELECTION-SCREEN BEGIN OF BLOCK ZUSMBB WITH FRAME TITLE TEXT-011.
PARAMETERS: P_matnr RADIOBUTTON GROUP G1 DEFAULT 'X' USER-COMMAND UCOMM.
PARAMETERS: P_ndc RADIOBUTTON GROUP G1.
SELECT-OPTIONS: S_matnr FOR mara-matnr MODIF ID MD2."Material Number
SELECT-OPTIONS: S_ndc FOR mean-ean11 MODIF ID MD1."NDC Number
SELECTION-SCREEN END OF BLOCK ZUSMBB.
*****************************************************
*---------------------------------------------------------------------
* Selection screen Dynamic checks
*---------------------------------------------------------------------
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF SCREEN-GROUP1 = 'MD2'.
IF P_ndc = 'X'.
screen-active = 0.
else.
screen-active = 1.
endif.
modify screen.
endif.
if screen-group1 = 'MD1'.
if p_matnr = 'X'.
screen-active = 0.
else.
screen-active = 1.
endif.
modify screen.
endif.
ENDLOOP.
this example maybe help u :---
************selection-screen****************
SELECTION-SCREEN BEGIN OF BLOCK ZUSMB WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS: S_werks FOR t001w-werks, "Plant
S_lgort FOR t001l-lgort, "Storage Location
S_charg FOR mch1-charg. "Batch Number
PARAMETER: P_VFDAT LIKE mcha-vfdat OBLIGATORY."Shelf life exp.date
SELECTION-SCREEN END OF BLOCK ZUSMB.
SELECTION-SCREEN BEGIN OF BLOCK ZUSMBB WITH FRAME TITLE TEXT-011.
PARAMETERS: P_matnr RADIOBUTTON GROUP G1 DEFAULT 'X' USER-COMMAND UCOMM.
PARAMETERS: P_ndc RADIOBUTTON GROUP G1.
SELECT-OPTIONS: S_matnr FOR mara-matnr MODIF ID MD2."Material Number
SELECT-OPTIONS: S_ndc FOR mean-ean11 MODIF ID MD1."NDC Number
SELECTION-SCREEN END OF BLOCK ZUSMBB.
*****************************************************
*---------------------------------------------------------------------
* Selection screen Dynamic checks
*---------------------------------------------------------------------
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF SCREEN-GROUP1 = 'MD2'.
IF P_ndc = 'X'.
screen-active = 0.
else.
screen-active = 1.
endif.
modify screen.
endif.
if screen-group1 = 'MD1'.
if p_matnr = 'X'.
screen-active = 0.
else.
screen-active = 1.
endif.
modify screen.
endif.
ENDLOOP.
this example maybe help u :---
************selection-screen****************
SELECTION-SCREEN BEGIN OF BLOCK ZUSMB WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS: S_werks FOR t001w-werks, "Plant
S_lgort FOR t001l-lgort, "Storage Location
S_charg FOR mch1-charg. "Batch Number
PARAMETER: P_VFDAT LIKE mcha-vfdat OBLIGATORY."Shelf life exp.date
SELECTION-SCREEN END OF BLOCK ZUSMB.
SELECTION-SCREEN BEGIN OF BLOCK ZUSMBB WITH FRAME TITLE TEXT-011.
PARAMETERS: P_matnr RADIOBUTTON GROUP G1 DEFAULT 'X' USER-COMMAND UCOMM.
PARAMETERS: P_ndc RADIOBUTTON GROUP G1.
SELECT-OPTIONS: S_matnr FOR mara-matnr MODIF ID MD2."Material Number
SELECT-OPTIONS: S_ndc FOR mean-ean11 MODIF ID MD1."NDC Number
SELECTION-SCREEN END OF BLOCK ZUSMBB.
*****************************************************
*---------------------------------------------------------------------
* Selection screen Dynamic checks
*---------------------------------------------------------------------
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF SCREEN-GROUP1 = 'MD2'.
IF P_ndc = 'X'.
screen-active = 0.
else.
screen-active = 1.
endif.
modify screen.
endif.
if screen-group1 = 'MD1'.
if p_matnr = 'X'.
screen-active = 0.
else.
screen-active = 1.
endif.
modify screen.
endif.
ENDLOOP.
this example maybe help u :---
************selection-screen****************
SELECTION-SCREEN BEGIN OF BLOCK ZUSMB WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS: S_werks FOR t001w-werks, "Plant
S_lgort FOR t001l-lgort, "Storage Location
S_charg FOR mch1-charg. "Batch Number
PARAMETER: P_VFDAT LIKE mcha-vfdat OBLIGATORY."Shelf life exp.date
SELECTION-SCREEN END OF BLOCK ZUSMB.
SELECTION-SCREEN BEGIN OF BLOCK ZUSMBB WITH FRAME TITLE TEXT-011.
PARAMETERS: P_matnr RADIOBUTTON GROUP G1 DEFAULT 'X' USER-COMMAND UCOMM.
PARAMETERS: P_ndc RADIOBUTTON GROUP G1.
SELECT-OPTIONS: S_matnr FOR mara-matnr MODIF ID MD2."Material Number
SELECT-OPTIONS: S_ndc FOR mean-ean11 MODIF ID MD1."NDC Number
SELECTION-SCREEN END OF BLOCK ZUSMBB.
*****************************************************
*---------------------------------------------------------------------
* Selection screen Dynamic checks
*---------------------------------------------------------------------
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF SCREEN-GROUP1 = 'MD2'.
IF P_ndc = 'X'.
screen-active = 0.
else.
screen-active = 1.
endif.
modify screen.
endif.
if screen-group1 = 'MD1'.
if p_matnr = 'X'.
screen-active = 0.
else.
screen-active = 1.
endif.
modify screen.
endif.
ENDLOOP.
this example maybe help u :---
************selection-screen****************
SELECTION-SCREEN BEGIN OF BLOCK ZUSMB WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS: S_werks FOR t001w-werks, "Plant
S_lgort FOR t001l-lgort, "Storage Location
S_charg FOR mch1-charg. "Batch Number
PARAMETER: P_VFDAT LIKE mcha-vfdat OBLIGATORY."Shelf life exp.date
SELECTION-SCREEN END OF BLOCK ZUSMB.
SELECTION-SCREEN BEGIN OF BLOCK ZUSMBB WITH FRAME TITLE TEXT-011.
PARAMETERS: P_matnr RADIOBUTTON GROUP G1 DEFAULT 'X' USER-COMMAND UCOMM.
PARAMETERS: P_ndc RADIOBUTTON GROUP G1.
SELECT-OPTIONS: S_matnr FOR mara-matnr MODIF ID MD2."Material Number
SELECT-OPTIONS: S_ndc FOR mean-ean11 MODIF ID MD1."NDC Number
SELECTION-SCREEN END OF BLOCK ZUSMBB.
*****************************************************
*---------------------------------------------------------------------
* Selection screen Dynamic checks
*---------------------------------------------------------------------
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF SCREEN-GROUP1 = 'MD2'.
IF P_ndc = 'X'.
screen-active = 0.
else.
screen-active = 1.
endif.
modify screen.
endif.
if screen-group1 = 'MD1'.
if p_matnr = 'X'.
screen-active = 0.
else.
screen-active = 1.
endif.
modify screen.
endif.
ENDLOOP.
Newuser,
Best thing for you seems to be Tabs (if your SAP version supports it). Read online help on the following statement:
selection-screen begin of tabbed block
_________________
Sudhi Karkada