How to make a cell non editable in table control at runtime.
Hi,
I ahve a requirement that i hav eto make table control field non editable if there is no value in that cell.ia have written a piece code below.
In that code i have declared a module called module change_cell in screen painter screen flow logic.I have written the corresponding subruotine in the program.When the program is executed the module is not called,so i could not make the cell ineditable.
please review my code and let me know any corrections required.
PROCESS BEFORE OUTPUT.
*&SPWIZARD: PBO FLOW LOGIC FOR TABLECONTROL 'ZS_TAB1'
MODULE ZS_TAB1_CHANGE_TC_ATTR.
*&SPWIZARD: MODULE ZS_TAB1_CHANGE_COL_ATTR.
LOOP AT T_EMPMONTH
INTO ZSTEMPMONTH
WITH CONTROL ZS_TAB1
CURSOR ZS_TAB1-CURRENT_LINE.
<b>* module change_cell.</b>
*&SPWIZARD: MODULE ZS_TAB1_CHANGE_FIELD_ATTR
ENDLOOP.
<b>In program</b>
loop at screen.
if screen-name = 'ZSTEMPMONTH-EMPNO' or screen-name = 'ZSTEMPMONTH-JAN' or screen-name = 'ZSTEMPMONTH-FEB' OR
screen-name = 'ZSTEMPMONTH-MAR' OR screen-name = 'ZSTEMPMONTH-APR' OR screen-name = 'ZSTEMPMONTH-MAY' OR screen-name = 'ZSTEMPMONTH-JUNE' OR screen-name = 'ZSTEMPMONTH-JULY' OR screen-name = 'ZSTEMPMONTH-AUG' OR screen-name = 'ZSTEMPMONTH-SEP' OR
screen-name = 'ZSTEMPMONTH-OCT' OR screen-name = 'ZSTEMPMONTH-NOV' OR screen-name = 'ZSTEMPMONTH-DECE'.
screen-input = '0'.
screen-active = '0'.
SCREEN-INVISIBLE = '1'.
modify screen.
endif.
endif.
endloop.
regards,
Soumya