topic Re: Disabling Fields in Application Development and Automation Discussions

Disabling Fields

Former Member — Thu, 06 Nov 2008 11:26:12 GMT

Hi there

Is there a way to do the following: I have a screen with a couple of select-options and one check box. If the check box is ticked the select-option fields should become read only..

Thanx,

Jan

Re: Disabling Fields

Former Member — Thu, 06 Nov 2008 11:28:46 GMT

Use the LOOP AT SCREEN ... ENDLOOP statements in the event AT SELECTION-SCREEN OUTPUT.

Re: Disabling Fields

Former Member — Thu, 06 Nov 2008 11:30:00 GMT

Hi,

Use the loop at screen

LOOP AT SCREEN.
   IF rb_head = c_x  AND screen-group1 = c_aa.
SCREEN-OUTPUT      1   "C Displayed field 
 MODIFY screen.
   ENDIF.
EnDLOOP.

Regards,

Nandha

Re: Disabling Fields

former_member585060 — Thu, 06 Nov 2008 11:37:27 GMT

Hi,

Try this code

TABLES : mara.

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

SELECT-OPTIONS : s_matnr FOR mara-matnr MODIF ID ggg.

SELECTION-SCREEN END OF BLOCK b1.

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

PARAMETERS : rd_r1 TYPE c RADIOBUTTON GROUP r2 MODIF ID ccc,

rd_r2 TYPE c RADIOBUTTON GROUP r2 MODIF ID ccc,

rd_r3 TYPE c RADIOBUTTON GROUP r2 MODIF ID ccc.

SELECTION-SCREEN END OF BLOCK b2.

PARAMETERS var1 TYPE c

AS CHECKBOX USER-COMMAND onli.

AT SELECTION-SCREEN OUTPUT.

IF var1 = 'X' .

LOOP AT SCREEN.

CASE screen-group1.

WHEN 'GGG'.

screen-active = 0.

MODIFY SCREEN.

ENDCASE.

ENDLOOP.

ENDIF.

START-OF-SELECTION.

Regards

Bala Krishna

Re: Disabling Fields

Former Member — Thu, 06 Nov 2008 11:42:57 GMT

Awesome!

Thanx,

Jan

Re: Disabling Fields

Former Member — Thu, 06 Nov 2008 11:43:56 GMT

REPORT ZSRK_024 . .

TABLES : VBAP.

SELECT-OPTIONS : S_VBELN FOR VBAP-VBELN,

S_POSNR FOR VBAP-POSNR,

S_MATNR FOR VBAP-MATNR,

S_WERKS FOR VBAP-WERKS.

PARAMETER : CH AS CHECKBOX.

AT SELECTION-SCREEN OUTPUT.

IF CH EQ 'X'.

LOOP AT SCREEN.

IF SCREEN-NAME CS 'S_VBELN' OR

SCREEN-NAME CS 'S_POSNR' OR

SCREEN-NAME CS 'S_MATNR' OR

SCREEN-NAME CS 'S_WERKS'.

SCREEN-INPUT = 0.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

ENDIF.