12-05-2007 7:12 AM
hi all.
Please look at this code, am using this to make my filed output only.. But its not working properly. Please let me know what is wrong in this code.
parameter: p_parm1(2) default 'MY'.
at selection-screen output.
loop at screen.
if screen-name = 'P_PARM1'.
screen-output = 1.
modify screen.
exit.
endif.
endloop.
Regards
Prajwal.K
12-05-2007 7:15 AM
parameter: p_parm1(2) default 'MY'.
at selection-screen output.
loop at screen.
if screen-name = 'P_PARM1'.
<b>screen-input = 0.</b>
modify screen.
exit.
endif.
endloop.
plz reward ppoints if dis helps
12-05-2007 7:15 AM
Hi,
Refer this code
----
PARAMETERS & SELECT-OPTIONS *
----
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-011.
PARAMETERS : p_pay1 RADIOBUTTON GROUP grp USER-COMMAND fc DEFAULT 'X',
p_pay2 RADIOBUTTON GROUP grp.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-001.
SELECT-OPTIONS : s_pernr FOR pa0000-pernr. "Personnel Number
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT (31) text-018.
PARAMETERS : p_begda LIKE pa0000-begda OBLIGATORY. "Start Date
SELECTION-SCREEN COMMENT 52(05) text-019.
PARAMETERS : p_endda LIKE pa0000-endda OBLIGATORY. "End Date
SELECTION-SCREEN END OF LINE.
SELECT-OPTIONS : s_stat2 FOR pa0000-stat2, "Status
s_werks FOR pa0001-werks, "Personnel Area
s_raufnr FOR catsdb-raufnr MODIF ID md1. "Internal Order Number
SELECTION-SCREEN END OF BLOCK b2.
----
AT SELECTION-SCREEN *
----
AT SELECTION-SCREEN OUTPUT.
IF p_pay1 EQ 'X'.
LOOP AT SCREEN.
IF screen-group1 = 'MD1'.
screen-active = '1'.
screen-input = '0'.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
ELSEIF p_pay2 EQ 'X'.
LOOP AT SCREEN.
IF screen-group1 = 'MD1'.
screen-active = '1'.
screen-input = '1'.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
ENDIF.
Regards,
Prashant
12-05-2007 7:15 AM
parameter: p_parm1(2) default 'MY'.
at selection-screen output.
loop at screen.
if screen-name = 'P_PARM1'.
<b>screen-input = 0.</b>
modify screen.
exit.
endif.
endloop.
plz reward ppoints if dis helps
12-05-2007 7:26 AM