topic Re: selection screens . in Application Development and Automation Discussions

selection screens .

Former Member — Wed, 12 Dec 2007 06:22:20 GMT

I have two blocks b1 and b2 on selections screens

and I have two push buttons .

If i click one button b1 should be visible and b2 should be hided .

If i push another button b2 should be visible and b1 should be hided .

Thanks and Regards

Ramesh.G

Re: selection screens .

Former Member — Wed, 12 Dec 2007 06:27:42 GMT

To disable the parameter field you need to loop at screen table and give the "SCREEN-INPUT = 0". Which will make the field disable for the input.

Check the scenario i have pasted here. Here i am taking two radio buttons. If the first button is selected then then the related fields of the other radio button should be disabled. <b>Replace the Radio button definition with Push buttons.</b>

PARAMETERS:

P_VAR1 TYPE C,

R1 RADIOBUTTON GROUP G1 USER_COMMAND U1,

R2 RADIOBUTTON GROUP G1 DEFAULT 'X',

P_VAR2 TYPE I MODIFID SC1,

P_VAR3 TYPE I MODIFID SC2.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF R1 ='X'.

IF SCREEN-GROUP = 'SC1'.

SCREEN-ACTIVE = 1.

MODIFY SCREEN.

ELSEIF SCREEN-GROUP = 'SC2'.

SCREEN-ACTIVE = 1.

SCREEN-INPUT = 0.

MODIFY SCREEN.

ENDIF.

ELSEIF R2 ='X'.

IF SCREEN-GROUP = 'SC1'.

SCREEN-ACTIVE = 1.

SCREEN-INPUT = 0.

MODIFY SCREEN.

ELSEIF SCREEN-GROUP = 'SC2'.

SCREEN-ACTIVE = 1.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

Reward points if useful.

Re: selection screens .

Former Member — Wed, 12 Dec 2007 06:29:10 GMT

Hi,

Instead of Push buttons you can have radio options. To do

While declaring the selection screen parameters you have mention the parameters and select-options as groups.

At selection screen output event.

You can use the below logic.

Loop at screen.

if screen-group = 'Group name'.
  screen-field = 'Fieldname'  "Give the name of the fields to be hidden
screen-invisible = 0.
modify screen.
endif.

if screen-group = 'Other Group name'.
  screen-field = 'Fieldname'  "Give the name of the fields to be hidden
screen-invisible = 0.
modify screen.
endif.
endloop.

Thanks,

Sriram Ponna.

Re: selection screens .

Former Member — Wed, 12 Dec 2007 06:30:35 GMT

Hi,

Instead of Push buttons you can have radio options. To do

While declaring the selection screen parameters you have mention the parameters and select-options as groups.

At selection screen output event.

You can use the below logic.

Loop at screen.

if screen-group = 'Group name'.
  screen-field = 'Fieldname'  "Give the name of the fields to be hidden
screen-invisible = 0.
modify screen.
endif.

if screen-group = 'Other Group name'.
  screen-field = 'Fieldname'  "Give the name of the fields to be hidden
screen-invisible = 0.
modify screen.
endif.
endloop.

Thanks,

Sriram Ponna.

Re: selection screens .

Former Member — Wed, 12 Dec 2007 06:32:27 GMT

Hi,

Instead of Push buttons you can have radio options. To do

While declaring the selection screen parameters you have mention the parameters and select-options as groups.

At selection screen output event.

You can use the below logic.

Loop at screen.

if screen-group = 'Group name'.
  screen-field = 'Fieldname'  "Give the name of the fields to be hidden
screen-invisible = 0.
modify screen.
endif.

if screen-group = 'Other Group name'.
  screen-field = 'Fieldname'  "Give the name of the fields to be hidden
screen-invisible = 0.
modify screen.
endif.
endloop.

Thanks,

Sriram Ponna.

Re: selection screens .

Former Member — Wed, 12 Dec 2007 07:27:17 GMT

I have push buttons on application tool bar not on screen to replace pushbuttons with radio buttons

Re: selection screens .

former_member386202 — Wed, 12 Dec 2007 07:36:25 GMT

Hi,

Refer this code

----

PARAMETERS & SELECT-OPTIONS *

----

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-011.

PARAMETERS : p_pay1 RADIOBUTTON GROUP grp USER-COMMAND fc DEFAULT 'X',

p_pay2 RADIOBUTTON GROUP grp.

SELECTION-SCREEN END OF BLOCK b1.

SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-001.

SELECT-OPTIONS : s_pernr FOR pa0000-pernr. "Personnel Number

SELECTION-SCREEN BEGIN OF LINE.

SELECTION-SCREEN COMMENT (31) text-018.

PARAMETERS : p_begda LIKE pa0000-begda OBLIGATORY. "Start Date

SELECTION-SCREEN COMMENT 52(05) text-019.

PARAMETERS : p_endda LIKE pa0000-endda OBLIGATORY. "End Date

SELECTION-SCREEN END OF LINE.

SELECT-OPTIONS : s_stat2 FOR pa0000-stat2, "Status

s_werks FOR pa0001-werks, "Personnel Area

s_raufnr FOR catsdb-raufnr MODIF ID md1. "Internal Order Number

SELECTION-SCREEN END OF BLOCK b2.

----

AT SELECTION-SCREEN *

----

AT SELECTION-SCREEN OUTPUT.

IF p_pay1 EQ 'X'.

LOOP AT SCREEN.

IF screen-group1 = 'MD1'.

screen-active = '1'.

screen-input = '0'.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

ELSEIF p_pay2 EQ 'X'.

LOOP AT SCREEN.

IF screen-group1 = 'MD1'.

screen-active = '1'.

screen-input = '1'.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

ENDIF.

regards,

Prashant

Re: selection screens .

Former Member — Wed, 12 Dec 2007 09:00:45 GMT

dont use different blocks

use same one block BLOCK_1

add select options and parameters of first block b1 with modif id sb1 in BLOCK_1

add select options and parameters of second block b2 with modif id sb2 in BLOCK_1

add both of above in same block

in pai use ok_code

if ok_code eq 'Button_1'.

Loop at screen.

if screen-group = 'sb2'.

screen-field = 'Fieldname' "Give the name of the fields to be hidden

screen-invisible = 0.

modify screen.

endif.

endloop.

endif.

if ok_code eq 'Button_2'.

Loop at screen.

if screen-group = 'sb1'.

screen-field = 'Fieldname' "Give the name of the fields to be hidden

screen-invisible = 0.

modify screen.

endif.

endloop.

endif.