two check boxes

[Former Member]

Hi All,

I have 2 check boxes. I want to desiable one check box if we checked other.

if 1 first is checked ,2nd one should be disiable .

if i checked 2nd one , 1 st one should be desiable.

regards,

Ajay

[Former Member]

Hi ,

Check the below code . It will give idea to u

-

---

&----

---

*& Report ZTEST_SCRIPT01

*&

&----

---

*&

*&

&----

---

REPORT ZTEST_SCRIPT01.

SELECTION-SCREEN BEGIN OF BLOCK B4 WITH FRAME TITLE TEXT-100.

skip.

SELECTION-SCREEN BEGIN OF LINE.

PARAMETERS : R4 RADIOBUTTON GROUP G2 DEFAULT 'X' MODIF ID S4 USER-COMMAND UK4.

SELECTION-SCREEN COMMENT 5(20) TEXT-041 FOR FIELD R4 .

SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN BEGIN OF LINE.

PARAMETERS : R5 RADIOBUTTON GROUP G2 .

SELECTION-SCREEN COMMENT 5(20) TEXT-042 FOR FIELD R5 .

SELECTION-SCREEN END OF LINE.

skip.

SELECTION-SCREEN END OF BLOCK B4.

*selectio-screen for file names.

SELECTION-SCREEN BEGIN OF BLOCK B3 WITH FRAME TITLE TEXT-005.

PARAMETERS : P_SESSN LIKE APQI-groupid modif id s5. "for session name

SELECTION-SCREEN END OF BLOCK B3.

*selectio-screen for file names.

SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-002.

PARAMETERS : P_H_FILE TYPE IBIPPARMS-PATH MODIF ID S2. "Presentation server file(header)

PARAMETERS : P_I_FILE TYPE IBIPPARMS-PATH MODIF ID S2. "Presentation server file(item)

skip.

PARAMETERS : P_H_FIL1 TYPE IBIPPARMS-PATH MODIF ID S3. "Application server file(header)

PARAMETERS : P_I_FIL1 TYPE IBIPPARMS-PATH MODIF ID S3. "Application server file(item)

SELECTION-SCREEN END OF BLOCK B2.

• selection-screen for radio buttons

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

SELECTION-SCREEN BEGIN OF LINE.

PARAMETERS : R1 RADIOBUTTON GROUP G1 DEFAULT 'X' MODIF ID S1 USER-COMMAND UK1.

SELECTION-SCREEN COMMENT 5(20) TEXT-003 FOR FIELD R1 .

SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN BEGIN OF LINE.

PARAMETERS : R2 RADIOBUTTON GROUP G1 .

SELECTION-SCREEN COMMENT 5(20) TEXT-004 FOR FIELD R2 .

SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN END OF BLOCK B1.

• to change the attributes of the screen

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF R5 = 'X' AND SCREEN-GROUP1 = 'S5'.

SCREEN-active = 0.

MODIFY SCREEN.

ENDIF.

IF R4 = 'X' AND SCREEN-GROUP1 = 'S5'.

SCREEN-active = 1.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

LOOP AT SCREEN.

IF R1 = 'X' AND SCREEN-GROUP1 = 'S3'.

SCREEN-INPUT = 0 .

MODIFY SCREEN.

ENDIF.

IF R2 = 'X' AND SCREEN-GROUP1 = 'S2'.

SCREEN-INPUT = 0 .

MODIFY SCREEN.

ENDIF.

ENDLOOP.

-

---

<REMOVED BY MODERATOR>

Thanks Jagadeesh.G

Edited by: Alvaro Tejada Galindo on Apr 21, 2008 12:54 PM

[Former Member]

Hello

Would it work instead for you to use radio buttons instead of checkboxes?

That way the user can select only one of the two buttons.

Regards

Greg Kern

[Sm1tje]

do the LOOP AT SCREEN.

But remember, if one as marked one checkbox and other will be disabled, there is no way in un-disabling it, if user for example has made a mistake. In this case, radiobutton would be better, just a suggestion.

[Former Member]

Hi All,

I know that I can use radio button instead of check box.

but here I shoud use Check box only.

regards,

Ajay

[Former Member]

Hi,

PARAMETERS: CHK1 AS CHECKBOX USER-COMMAND RUSR,

CHK2 AS CHECKBOX USER-COMMAND RUSR.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF CHK1 = 'X'.

IF SCREEN-NAME = 'CHK2'.

SCREEN-INPUT = 0.

ENDIF.

ELSEIF CHK2 = 'X'.

IF SCREEN-NAME = 'CHK1'.

SCREEN-INPUT = 0.

ENDIF.

ENDIF.

MODIFY SCREEN.

ENDLOOP.

[Former Member]

Hi,

Instead of going with checkboxes you can go radiobuttons. Please refer the code below:

TABLES : bsis.


SELECTION-SCREEN : BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETER : sp_sel radiobutton group rad USER-COMMAND radio DEFAULT 'X',
            sp_all RADIOBUTTON GROUP rad.
SELECTION-SCREEN END OF BLOCK b1.

SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.
SELECT-OPTIONS : so_bukrs FOR bsis-bukrs MODIF ID sp1.
SELECT-OPTIONS : so_hkont FOR bsis-hkont MODIF ID sp2.
SELECTION-SCREEN END OF BLOCK b2.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.
  IF sp_sel = 'X'.


      IF screen-group1 = 'SP2'.
        screen-input = '0'.
        screen-invisible = '1'.
        screen-required = '0'.
        MODIFY SCREEN.
      ENDIF.
      endif.
 ENDLOOP.

Thanks,

Sriram Ponna.

[Former Member]

Solved.

[Former Member]

Hi,

I think this is just what you need:

You have for example two checkboxs:

c_r1 and c_r2.

*AT SELECTION-SCREEN OUTPUT.

• check what checkbox is selected

• IF c_r1 = 'X'.

• LOOP AT SCREEN.

• IF screen-name = '%_P_ORD_%_APP_%-TEXT'.

• screen-invisible = '0'.

• screen-input = '1'.

• MODIFY SCREEN.

• ELSEIF screen-name = 'P_PATH'.

• screen-name = '%_P_PATH_%_APP_%-TEXT'.

• screen-invisible = '1'.

• screen-input = '0'.

• MODIFY SCREEN.

• ENDIF.

• ENDLOOP.

• ELSEIF c_r2 ='X'.

• LOOP AT SCREEN.

• IF screen-name = '%_P_PATH_%_APP_%-TEXT'.

• screen-invisible = '0'.

• screen-input = '1'.

• MODIFY SCREEN.

• ELSEIF screen-name = 'P_ORD'.

• screen-name = '%_P_ORD_%_APP_%-TEXT'.

• screen-invisible = '1'.

• screen-input = '0'.

• MODIFY SCREEN.

• ENDIF.

• ENDLOOP.

• ENDIF.

Regards,

Sebastián

<REMOVED BY MODERATOR>

Edited by: Alvaro Tejada Galindo on Apr 21, 2008 12:54 PM