Community
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
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for 
Search instead for 
Did you mean: 
Read only

SELECTION SCREEN OUTPUT

Former Member

‎2007 Apr 28 12:22 PM

0 Likes
430

I HAVE TWO RADIO BUTTON AND 2 INPUT FIELDS.

WHEN I SELECT RADIO BUTTON RB1 THEN FIELD2 SHOULD BE DISABLED

WHEN I SELECT RADIO BUTTON RB2 THEN FIELD1 SHOULD BE DISABLED

CAN ANYONE COMPLETE THE CODE OR CHECK FOR ERRORS :

constants: C TYPE C VALUE 'X'.

selection-screen BEGIN OF BLOCK BLK1 WITH FRAME title T1.

parameters : RB1 RADIOBUTTON GROUP A,

RB2 RADIOBUTTON GROUP A.

selection-screen SKIP.

PARAMETER : FEILD1 TYPE C MODIF ID AA.

SELECTION-SCREEN END OF BLOCK BLK1.

INITIALIZATION.

T1 = 'BBLOCK ONE'.

selection-screen BEGIN OF BLOCK BLK2 WITH FRAME title T2.

*parameters : RB2 RADIOBUTTON GROUP A.

selection-screen SKIP.

PARAMETER : FEILD2 TYPE C MODIF ID AA.

SELECTION-SCREEN END OF BLOCK BLK2.

INITIALIZATION.

T2 = 'BBLOCK TWO'.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF RB1 = C.

IF SCREEN-NAME = FIELD1.

SCREEN-INPUT = 0.

CLEAR FIELD1.

ENDIF.

MODIFY SCREEN.

ENDIF.

IF RB2 = C.

IF SCREEN-NAME = FIELD2.

SCREEN-INPUT = 0.

CLEAR FIELD2.

ENDIF.

MODIFY SCREEN.

ENDIF.

3 REPLIES 3
Read only

Former Member

‎2007 Apr 28 12:25 PM

0 Likes
412

Hi!

LOOP AT SCREEN.

IF RB1 = C.

IF SCREEN-NAME = 'FIELD1'. "use ' characters, because it a name

SCREEN-INPUT = 0.

*CLEAR FIELD1. "not needed

ENDIF.

*MODIFY SCREEN. "modify only once

ENDIF.

IF RB2 = C.

IF SCREEN-NAME = 'FIELD2'. "use ' characters, because it a name

SCREEN-INPUT = 0.

*CLEAR FIELD2. "not needed

ENDIF.

*MODIFY SCREEN. "modify only once

ENDIF.

MODIFY SCREEN. "modify here

ENDLOOP.

Regards

Tamás

Message was edited by:

Tamás Nyisztor

Read only

Former Member

‎2007 Apr 28 12:42 PM

0 Likes
412

selection-screen BEGIN OF BLOCK BLK1 WITH FRAME title T1.

parameters : RB1 RADIOBUTTON GROUP A default 'X' user-command flag.

selection-screen SKIP.

PARAMETER : FEILD1 TYPE C MODIF ID A1.

parameters : RB2 RADIOBUTTON GROUP serv.

selection-screen SKIP.

PARAMETER : FEILD2 TYPE C MODIF ID A2.

SELECTION-SCREEN END OF BLOCK BLK1.

*INITIALIZATION. "Initialization is an event it will come only once

*

INITIALIZATION.

T1 = 'BBLOCK ONE'.

*instead of using this code

*AT SELECTION-SCREEN OUTPUT.

*LOOP AT SCREEN.

*IF RB1 = C.

*IF SCREEN-NAME = FIELD1.

*SCREEN-INPUT = 0.

*CLEAR FIELD1.

*ENDIF.

*MODIFY SCREEN.

*ENDIF.

*

*IF RB2 = C.

*IF SCREEN-NAME = FIELD2.

*SCREEN-INPUT = 0.

*CLEAR FIELD2.

*ENDIF.

*MODIFY SCREEN.

*ENDIF.

*use following:-

at selection-screen output.

loop at screen.

case screen-group1.

when 'A1'.

if RB1 eq space.

screen-input = 0.

endif.

when 'A2'.

if RB2 eq space.

screen-input = 0.

endif.

endcase.

modify screen.

endloop.

Read only

Former Member

‎2007 Apr 28 12:58 PM

0 Likes
412

THANK YOU SHEFALI GANGRADE CODE WHICH U PROPOSED IS WORKING.

I HAVE REWARDED POINTS FOR IT.

AND TAMAS CODE WHICH U HAVE SENT IS NOT WORKING.