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

Radio button logic required

Former Member
0 Likes
772

Hi all,

I have select option and two radio buttons. if i click one radio bution it will allow to enter some value inthe input selection box, if i click 2nd radiobutton that time it wont allow to enter values in the input selection box. pls if anyone having idea of the logic or give me idea.

Point will be sure.

Mohana.

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
728

Hi

Check this:

This is an example code...on how to grey out the option.

SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.

*SELECTION-SCREEN SKIP 2.

PARAMETERS: FLATF RADIOBUTTON GROUP RAD1 USER-COMMAND X,
            UNIXF RADIOBUTTON GROUP RAD1 .

*SELECTION-SCREEN SKIP 2.
*
*SELECTION-SCREEN SKIP 2.


parameters: P_FNAME type RLGRAP-FILENAME MODIF ID P1,
            UNIXFILE type RLGRAP-FILENAME MODIF ID P2.
SELECTION-SCREEN SKIP .
selection-screen ULINE.
SELECTION-SCREEN: BEGIN OF LINE.

SELECTION-SCREEN POSITION 20.
parameters TESTRUN AS CHECKBOX default 'X'.

SELECTION-SCREEN: END OF LINE.


SELECTION-SCREEN END OF BLOCK B1.
********************************************


***********AT SELECTION SCREEN
AT SELECTION-SCREEN.


AT SELECTION-SCREEN OUTPUT.

  LOOP AT SCREEN.
    IF FLATF = 'X'.
      IF SCREEN-GROUP1 = 'P2'.
        SCREEN-INPUT = 0.
        MODIFY SCREEN.
      ENDIF.
    ENDIF.

    IF UNIXF = 'X'.
      IF SCREEN-GROUP1 = 'P1'.
        SCREEN-INPUT = 0.
        MODIFY SCREEN.
      ENDIF.
    ENDIF.
  ENDLOOP.

Regards,

VIshwa.

6 REPLIES 6
Read only

Former Member
Read only

Former Member
0 Likes
728

Hi,

check this thread:

Thanks & Regards,

Navneeth K.

Read only

Former Member
0 Likes
729

Hi

Check this:

This is an example code...on how to grey out the option.

SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.

*SELECTION-SCREEN SKIP 2.

PARAMETERS: FLATF RADIOBUTTON GROUP RAD1 USER-COMMAND X,
            UNIXF RADIOBUTTON GROUP RAD1 .

*SELECTION-SCREEN SKIP 2.
*
*SELECTION-SCREEN SKIP 2.


parameters: P_FNAME type RLGRAP-FILENAME MODIF ID P1,
            UNIXFILE type RLGRAP-FILENAME MODIF ID P2.
SELECTION-SCREEN SKIP .
selection-screen ULINE.
SELECTION-SCREEN: BEGIN OF LINE.

SELECTION-SCREEN POSITION 20.
parameters TESTRUN AS CHECKBOX default 'X'.

SELECTION-SCREEN: END OF LINE.


SELECTION-SCREEN END OF BLOCK B1.
********************************************


***********AT SELECTION SCREEN
AT SELECTION-SCREEN.


AT SELECTION-SCREEN OUTPUT.

  LOOP AT SCREEN.
    IF FLATF = 'X'.
      IF SCREEN-GROUP1 = 'P2'.
        SCREEN-INPUT = 0.
        MODIFY SCREEN.
      ENDIF.
    ENDIF.

    IF UNIXF = 'X'.
      IF SCREEN-GROUP1 = 'P1'.
        SCREEN-INPUT = 0.
        MODIFY SCREEN.
      ENDIF.
    ENDIF.
  ENDLOOP.

Regards,

VIshwa.

Read only

BH2408
Active Contributor
0 Likes
728

Hi ,

USe the LOOP AT SCREEN .

screen-input = ' '."Put the optios inside the ' '.

screen-output = ' '.

append screen.

endloop.

Regards,

Bharani

Read only

Mohamed_Mukhtar
Active Contributor
0 Likes
728

hi,

Check this code

TABLES: kna1.
SELECTION-SCREEN BEGIN OF BLOCK blk2 WITH FRAME TITLE text-002.
PARAMETERS   :  red_1 RADIOBUTTON GROUP rad DEFAULT 'X' USER-COMMAND comm,
                red_2 RADIOBUTTON GROUP rad.
SELECT-OPTIONS: s_cust FOR kna1-kunnr.
SELECTION-SCREEN END OF BLOCK blk2.
 
AT SELECTION-SCREEN OUTPUT.
 
  IF red_1 = 'X'.
    LOOP AT SCREEN.
      IF screen-name = 'S_CUST-LOW' OR screen-name = 'S_CUST-HIGH'.
        screen-input = '1'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
  ELSEIF red_2 = 'X'.
    LOOP AT SCREEN.
      IF screen-name = 'S_CUST-LOW' OR screen-name = 'S_CUST-HIGH'.
        screen-input = '0'.
        MODIFY SCREEN.
      ENDIF.

Thanks & Regards

Read only

former_member585060
Active Contributor
0 Likes
728

Hi,

Try this code

TABLES : sscrfields, mara, ekko.

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

PARAMETERS : rd_p1 TYPE c RADIOBUTTON GROUP r1 USER-COMMAND abcd,

rd_p2 TYPE c RADIOBUTTON GROUP r1 .

SELECTION-SCREEN END OF BLOCK b1.

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

Select-options : rd_r1 for mara-matnr MODIF ID ccc,

rd_r2 for ekko-ebeln MODIF ID ccc.

SELECTION-SCREEN END OF BLOCK b2.

AT SELECTION-SCREEN OUTPUT.

IF rd_p2 = 'X' .

LOOP AT SCREEN.

CASE screen-group1.

WHEN 'CCC'.

screen-input = 1.

screen-invisible = 1.

MODIFY SCREEN.

ENDCASE.

ENDLOOP.

ENDIF.

START-OF-SELECTION.

Regards

Bala Krishna