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

disable selection screens

Former Member
0 Likes
931

Hi

I have three selection screens..


tables: bseg.
parameters: r1 radiobutton group r default 'X'.
parameters: r2 radiobutton group r.
parameters: r3 radiobutton group r.


selection-screen begin of block a1 with frame title text-001.
parameters:p_vkbur like v_equi-vkbur,
           p_kunum like afih-kunum ,
           p_month like usr01-bname obligatory,
           p_kdgrp like knvv-kdgrp.
selection-screen end of block a1.

selection-screen begin of block b1 with frame title text-002.
select-options:s_refno for bseg-aufnr.
selection-screen end of block b1.

selection-screen begin of block c1 with frame title text-003.
select-options:d_refno for bseg-aufnr.
selection-screen end of block c1.

When r1 is checked block 2 & block 3 should inactive.

<b>Here i want to display 2 and 3blocks,but user should not allow to enter anything. same in the foliowing blocks</b>

when r2 is checked block 1 and block 3 should inactive.

when r3 is checked block1 and block 2 should inactive.

When the screen is loaded only first block should be active rest will be inactive.

Can any one tell me how to do this?

Reward guaranteed

cheers

kaki

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
908

Sample:

SELECTION-SCREEN BEGIN OF BLOCK b_1 WITH FRAME TITLE text-000.
SELECT-OPTIONS: s_sapobj FOR toa01-sap_object obligatory,
s_blart FOR bkpf-blart obligatory.
PARAMETERS: rb_img RADIOBUTTON GROUP rad1 user-command rad.
PARAMETERS: rb_invo RADIOBUTTON GROUP rad1.
SELECTION-SCREEN END OF BLOCK b_1.

So u can validate as

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.
IF SCREEN-GROUP1 = 'GR1'. "Name field
IF RB_INVO = SPACE.
SCREEN-ACTIVE = 0.
ELSE.
SCREEN-ACTIVE = 1.
ENDIF.
MODIFY SCREEN.
ELSEIF SCREEN-GROUP1 = 'GR2'.
IF RB_INVO = 'X'.
SCREEN-ACTIVE = 0.
ELSE.
SCREEN-ACTIVE = 1.
ENDIF.
MODIFY SCREEN.
ENDIF.
ENDLOOP.

START-OF-SELECTION.

* Two processing modes available based on radiobutton selection.
*Radiobutton 1 selected
IF NOT RB_IMG IS INITIAL.
PERFORM 
ENDIF.
*Radiobutton 2 selected
IF NOT RB_INVO IS INITIAL.
PERFORM .
ENDIF.

Similiarly u can do.

Kindly reward points and close the threas if ur problem got solved.

Thanks & Regards,

Judith.

Hi

I have three selection screens..


tables: bseg.
parameters: r1 radiobutton group r default 'X'.
parameters: r2 radiobutton group r.
parameters: r3 radiobutton group r.


selection-screen begin of block a1 with frame title text-001.
parameters:p_vkbur like v_equi-vkbur,
           p_kunum like afih-kunum ,
           p_month like usr01-bname obligatory,
           p_kdgrp like knvv-kdgrp.
selection-screen end of block a1.

selection-screen begin of block b1 with frame title text-002.
select-options:s_refno for bseg-aufnr.
selection-screen end of block b1.

selection-screen begin of block c1 with frame title text-003.
select-options:d_refno for bseg-aufnr.
selection-screen end of block c1.

When r1 is checked block 2 & block 3 should inactive.

<b>Here i want to display 2 and 3blocks,but user should not allow to enter anything. same in the foliowing blocks</b>

when r2 is checked block 1 and block 3 should inactive.

when r3 is checked block1 and block 2 should inactive.

When the screen is loaded only first block should be active rest will be inactive.

Can any one tell me how to do this?

Reward guaranteed

cheers

kaki

6 REPLIES 6
Read only

Former Member
0 Likes
908
parameters: r1 radiobutton group r default 'X'.
parameters: r2 radiobutton group r.
parameters: r3 radiobutton group r.


selection-screen begin of block a1 with frame title text-001.
parameters:p_vkbur like v_equi-vkbur modif id m1,
           p_kunum like afih-kunum  modif id m1,
           p_month like usr01-bname obligatory modif id m1,
           p_kdgrp like knvv-kdgrp modif id m1.
selection-screen end of block a1.

selection-screen begin of block b1 with frame title text-002.
*select-options:s_refno for zcsparameters-service_counter modif id m2.
selection-screen end of block b1.

selection-screen begin of block c1 with frame title text-003.
*select-options:d_refno for zcsparameters-service_counter modif id m3.
selection-screen end of block c1.

at selection-screen ON RADIOBUTTON GROUP r.
LOOP AT SCREEN.
    IF r1 <> 'X' AND
       screen-group1 = 'M1'.
      screen-active = '0'.
    ENDIF.
    IF r2 <> 'X' AND
       screen-group1 = 'M1'.
      screen-active = '0'.
    ENDIF.
     IF r3 <> 'X' AND
       screen-group1 = 'M1'.
      screen-active = '0'.
    ENDIF.
    MODIFY SCREEN.
 ENDLOOP.
Read only

0 Likes
908
TABLES : bseg.

parameters: r1 radiobutton group r default 'X' USER-COMMAND flag.
parameters: r2 radiobutton group r.
parameters: r3 radiobutton group r.

selection-screen begin of block a1 with frame title text-001.
parameters:p_vkbur like v_equi-vkbur modif id m1,
p_kunum like afih-kunum modif id m1,
p_month like usr01-bname obligatory modif id m1,
           p_kdgrp like knvv-kdgrp modif id m1.
selection-screen end of block a1.

selection-screen begin of block b1 with
 frame title text-002.
 select-options:s_refno for bseg-aufnr modif id m2.
 selection-screen end of block b1.

 selection-screen begin of block c1 with frame title text-003.
select-options:d_refno for bseg-aufnr modif id m3.
selection-screen end of block c1.

at selection-screen output.
LOOP AT SCREEN.
    IF r1 = 'X' AND
       screen-group1 = 'M2'.
      screen-active = '0'.
    ENDIF.
    IF r1 = 'X' AND
       screen-group1 = 'M3'.
      screen-active = '0'.
    ENDIF.
    IF r2 = 'X' AND
       screen-group1 = 'M1'.
      screen-active = '0'.
    ENDIF.
    IF r2 = 'X' AND
       screen-group1 = 'M3'.
      screen-active = '0'.
    ENDIF.
    IF r3 = 'X' AND
       screen-group1 = 'M1'.
      screen-active = '0'.
    ENDIF.
    IF r3 = 'X' AND
       screen-group1 = 'M2'.
      screen-active = '0'.
    ENDIF.
    MODIFY SCREEN.
 ENDLOOP.

This works. Reward points if helpful.

Read only

Former Member
0 Likes
908

Use addition <b>USER-COMMAND ucomm</b> to radiobutton. See keyword doco (F1 on keyword Parameters) for the full explanation.

Cheers,

Sougata.

Read only

Former Member
0 Likes
909

Sample:

SELECTION-SCREEN BEGIN OF BLOCK b_1 WITH FRAME TITLE text-000.
SELECT-OPTIONS: s_sapobj FOR toa01-sap_object obligatory,
s_blart FOR bkpf-blart obligatory.
PARAMETERS: rb_img RADIOBUTTON GROUP rad1 user-command rad.
PARAMETERS: rb_invo RADIOBUTTON GROUP rad1.
SELECTION-SCREEN END OF BLOCK b_1.

So u can validate as

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.
IF SCREEN-GROUP1 = 'GR1'. "Name field
IF RB_INVO = SPACE.
SCREEN-ACTIVE = 0.
ELSE.
SCREEN-ACTIVE = 1.
ENDIF.
MODIFY SCREEN.
ELSEIF SCREEN-GROUP1 = 'GR2'.
IF RB_INVO = 'X'.
SCREEN-ACTIVE = 0.
ELSE.
SCREEN-ACTIVE = 1.
ENDIF.
MODIFY SCREEN.
ENDIF.
ENDLOOP.

START-OF-SELECTION.

* Two processing modes available based on radiobutton selection.
*Radiobutton 1 selected
IF NOT RB_IMG IS INITIAL.
PERFORM 
ENDIF.
*Radiobutton 2 selected
IF NOT RB_INVO IS INITIAL.
PERFORM .
ENDIF.

Similiarly u can do.

Kindly reward points and close the threas if ur problem got solved.

Thanks & Regards,

Judith.

Read only

0 Likes
908

Just use screen-input...

This works

TABLES : bseg.

parameters: r1 radiobutton group r default 'X' USER-COMMAND flag.
parameters: r2 radiobutton group r.
parameters: r3 radiobutton group r.

selection-screen begin of block a1 with frame title text-001.
parameters:p_vkbur like v_equi-vkbur modif id m1,
p_kunum like afih-kunum modif id m1,
p_month like usr01-bname obligatory modif id m1,
p_kdgrp like knvv-kdgrp modif id m1.
selection-screen end of block a1.

selection-screen begin of block b1 with
frame title text-002.
select-options:s_refno for bseg-aufnr modif id m2.
selection-screen end of block b1.

selection-screen begin of block c1 with frame title text-003.
select-options:d_refno for bseg-aufnr modif id m3.
selection-screen end of block c1.

at selection-screen output.
LOOP AT SCREEN.
IF r1 = 'X' AND
screen-group1 = 'M2'.
screen-input = '0'.
ENDIF.
IF r1 = 'X' AND
screen-group1 = 'M3'.
screen-input = '0'.
ENDIF.
IF r2 = 'X' AND
screen-group1 = 'M1'.
screen-input = '0'.
ENDIF.
IF r2 = 'X' AND
screen-group1 = 'M3'.
screen-input = '0'.
ENDIF.
IF r3 = 'X' AND
screen-group1 = 'M1'.
screen-input = '0'.
ENDIF.
IF r3 = 'X' AND
screen-group1 = 'M2'.
screen-input = '0'.
ENDIF.
MODIFY SCREEN.
ENDLOOP.

Read only

0 Likes
908

Hi Wenceslaus G

Thanks a lot.

full points alloted

cheers

kaki