‎2007 May 09 7:25 AM
‎2007 May 09 7:30 AM
‎2007 May 09 7:28 AM
Hi,
you can use the event AT SELECTION-SCREEN OUTPUT to hide the fields that you don't want by checking the value..
Ex.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
if pasos-descripcion = '01 DERIVACION BANORTE'.
IF SCREEN-NAME = ' CC5'.
Make it invisible..
SCREEN-ACTIVE = 0.
MODIFY SCREEN.
ENDIF.
ENDIF.
ENDLOOP.
regards
Nicole
‎2007 May 09 7:28 AM
Hi,
write below code in AT SELECTION-SCREEN OUTPUT event.
loop at screen.
if screen -name = 'ur field'.
screen-invisible = '1'.
modify screen.
endif.
endloop.
rgds,
bharat.
‎2007 May 09 7:30 AM
‎2007 May 09 7:35 AM
Hi,
This code will help you, enabling a field if a check box is selected and if it is not the field will be disabled.
PARAMETERS: p_ck AS CHECKBOX USER-COMMAND chk,
p1(10) MODIF ID aaa.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
CASE screen-group1.
WHEN 'AAA'.
IF p_ck <> 'X'.
screen-input = 0.
ELSE.
screen-input = 1.
ENDIF.
ENDCASE.
MODIFY SCREEN.
ENDLOOP.
END-OF-SELECTION.
WRITE:/ p1.
Hope this info would be helpful.
Regards,
Kumar.
‎2007 May 09 7:37 AM
Hi Balu,
either use <b>No Display</b> in extension to declaring selection screen parameters or use <b>loop at screen</b> statement
parameters : d_matnr like mara-matnr no display.
or
at selection screen output
LOOP AT SCREEN.
IF SCREEN-NAME ='d_matnr'.
SCREEN-ACTIVE = '0'.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
reward points if helpful.
regards,
Hemant
‎2007 May 09 7:42 AM
REPORT ZRD_TEST no standard page heading line-size 250 line-count 60(10)
.
tables:vbap.
data: begin of itab occurs 0,
vbeln like vbap-vbeln,
posnr like vbap-posnr,
matnr like vbap-matnr,
end of itab.
selection-screen begin of block b with frame title text-001.
select-options: s_vbeln for vbap-vbeln modif id vbe,
s_posnr for vbap-posnr modif id pos.
parameters: rd1 radiobutton group 1 default 'X',
rd2 radiobutton group 1.
selection-screen end of block b.
at selection-screen output.
if rd1 = 'X'.
loop at screen.
if screen-group1 = 'VBE'.
screen-input = '0'.
screen-invisible = '1'.
modify screen.
endif.
endloop.
ELSE.
loop at screen.
if screen-group1 = 'POS'.
screen-input = '0'.
screen-invisible = '1'.
modify screen.
endif.
endloop.
endif.
this code will help you
‎2007 May 09 7:45 AM
Try the code as given as below:
SELECTION-SCREEN BEGIN OF BLOCK b01 WITH FRAME TITLE text-001.
PARAMETERS : p_bukrs LIKE t001-bukrs,
p_year TYPE numc4 OBLIGATORY ,
p_month TYPE numc2 .
SELECT-OPTIONS : s_saknr FOR ska1-saknr MODIF ID grp.
PARAMETERS : p_input LIKE rlgrap-filename MODIF ID mod OBLIGATORY
DEFAULT c_output,
p_output LIKE rlgrap-filename OBLIGATORY DEFAULT
c_output.
SELECTION-SCREEN SKIP.
SELECTION-SCREEN BEGIN OF BLOCK b11 WITH FRAME TITLE text-b11.
PARAMETERS : p_prev RADIOBUTTON GROUP rd1 USER-COMMAND flag,
p_sapd RADIOBUTTON GROUP rd1 DEFAULT 'X'.
SELECTION-SCREEN END OF BLOCK b11.
SELECTION-SCREEN END OF BLOCK b01.
----
AT SELECTION SCREEN OUTPUT *
----
AT SELECTION-SCREEN OUTPUT.
*--Take the selection from the user
LOOP AT SCREEN.
IF p_prev IS INITIAL AND screen-group1 = c_mod.
screen-active = 0.
ENDIF.
MODIFY SCREEN.
ENDLOOP.
‎2007 May 09 7:47 AM
Hi,
there is a screen table releated with each Selection-screen.
if u want to deactivate some options then just use filed <b>Active</b> = 0.
Reward points if useful..
Regards
Nilesh
‎2007 May 09 7:47 AM
hi,
fisrt take the fields u want either as a full structure or semi structure..thn take the select-option n the fields u want in the select statemetns eg;
tables : mara, marc, mard.
data : begin of itab occurs 0,
matnr like mara-matnr,
ersda like mara-ersda,
ernam like mara-ernam,
end of itab.
data : begin of jtab occurs 0,
matnr like marc-matnr,
werks like marc-werks,
pstat like marc-pstat,
end of jtab.
data : begin of ktab occurs 0,
lgort like mard-lagort,
lfmon like mard-lfmon,
end of ktab.
select-options matnr for mara-matnr.
start-of-selection.
select matnr ersda ernam from mara into table itab.
top-of-page.
write :/10 'material number', 30 'date', 40 'name'.
end-of-page .
write :/10 'system date:', sy-datum, 30 'page no:', sy-pagno.
end-of-selection.
loop at itab.
write :/10 itab-matnr, 20 itab-ersda, 30 itab-ernam.
hide itab-matnr.
endloop.
at line-selection.
if sy-lsind = 1.
select matnr werks pstat from matc into table jtab where matnr = itab-matnr.
write :/10 'material no', 30 'plant', 40 'status'.
loop at jtab.
write :/10 jtab-matnr, 30 jtab-werks, 40 jtab-pstat.
hide itab-matnr.
hide jtab-werks.
endloop.
if sy-lsind = 2.
select lgort lfmon from mard into table ktab.
write :/10 'storage location', 30 'current period'.
loop at ktab.
write :/10 ktab-lgort, ktab-lfmon.
endloop.
This is the way hide statement is used.
if useful reward with points.
with regards,
madhuri.