topic Re: alv layout in Application Development and Automation Discussions

alv layout

Former Member — Mon, 10 Mar 2008 08:10:21 GMT

hi,

how to add f4 help to the layout parameter in the selection-screen.

regards

Re: alv layout

Former Member — Mon, 10 Mar 2008 08:13:41 GMT

Check out the below related thread

http://help.sap.com/saphelp_nw70/helpdata/en/79/34a246d9b511d1950e0000e8353423/content.htm

Re: alv layout

Former Member — Mon, 10 Mar 2008 08:18:04 GMT

AT SELECTION-SCREEN ON VALUE-REQUEST FOR PARAMETER.

This event will trigger the F4 values on the Paramter in selection-screen.

Regards

Vinayak

Re: alv layout

Former Member — Mon, 10 Mar 2008 08:25:38 GMT

hi,

u can make search help and add it to ur selection field like

SELECTION-SCREEN:BEGIN OF BLOCK blk1 WITH FRAME TITLE text-001.

PARAMETERS:doc LIKE lips-vbeln MATCHCODE OBJECT zdel_typ,

text(200) TYPE c .

SELECTION-SCREEN:END OF BLOCK blk1.

or u can do like this

TYPES : BEGIN OF ty_kna1,

kunnr TYPE kna1-kunnr, "CUstomer Code

name1 TYPE kna1-name1, "Customer Code

END OF ty_kna1.

DATA : dyfields LIKE dynpread OCCURS 1 WITH HEADER LINE ,

i_kna1 TYPE TABLE OF ty_kna1 WITH HEADER LINE.

DATA : wa_value_tab TYPE ty_kna1.

DATA : value_tab LIKE wa_value_tab OCCURS 0 WITH HEADER LINE.

DATA : field_tab LIKE dfies OCCURS 0 WITH HEADER LINE.

DATA : return_tab LIKE ddshretval OCCURS 0 WITH HEADER LINE.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR kunnr-low.

SELECT kna1_{kunnr kna1}name1

INTO TABLE i_kna1

FROM kna1 INNER JOIN vbrk

ON kna1_{kunnr = vbrk}kunag.

SORT i_kna1 BY kunnr.

DELETE ADJACENT DUPLICATES FROM i_kna1.

CLEAR : value_tab,field_tab,return_tab.

REFRESH : value_tab,field_tab,return_tab.

field_tab-fieldname = 'KUNNR'.

field_tab-tabname = 'KNA1'.

APPEND field_tab.

field_tab-fieldname = 'NAME1'.

field_tab-tabname = 'KNA1'.

APPEND field_tab.

field_tab-fieldname = 'KUNNR'.

LOOP AT i_kna1 .

value_tab-kunnr = i_kna1-kunnr.

APPEND value_tab.

CLEAR value_tab.

value_tab-name1 = i_kna1-name1.

APPEND value_tab.

ENDLOOP.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

retfield = field_tab-fieldname

TABLES

value_tab = value_tab

field_tab = field_tab

return_tab = return_tab

EXCEPTIONS

parameter_error = 1

no_values_found = 2

OTHERS = 3.

IF sy-subrc = 0.

kunnr-low = return_tab-fieldval.

ENDIF.

reward if usefull...

Re: alv layout

Former Member — Mon, 10 Mar 2008 08:25:38 GMT

Hi,

TABLES : MARA.

DATA : BEGIN OF i_mara OCCURS 0.

INCLUDE STRUCTURE mara.

DATA : END OF i_mara

DATA : v_return LIKE ddshretval OCCURS 0 WITH HEADER LINE.

SELECT-OPTIONS :s_matnr FOR mara-matnr.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR s_matnr-low .

SELECT matnr INTO TABLE i_mara

FROM mara.

IF sy-subrc EQ 0.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

retfield = 'MATNR'

dynpprog = ws_repid

dynpnr = sy-dynnr

value_org = 'S'

TABLES

value_tab = i_mara

return_tab = v_return

EXCEPTIONS

parameter_error = 1

no_values_found = 2

OTHERS = 3.

IF sy-subrc <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

s_matnr-low = v_return-fieldval.

Re: alv layout

arpit_shah — Mon, 10 Mar 2008 10:11:36 GMT

Hi,

pls check following code,

SELECTION-SCREEN BEGIN OF BLOCK SD3 WITH FRAME TITLE TEXT-S04.

PARAMETERS: vlayout LIKE disvariant-variant.

SELECTION-SCREEN END OF BLOCK SD3.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR vlayout.

g_variant-report = sy-repid.

call function 'REUSE_ALV_VARIANT_F4'

exporting

is_variant = g_variant

i_save = g_save

importing

e_exit = g_exit

es_variant = gx_variant

exceptions

not_found = 2.

if sy-subrc = 2.

message id sy-msgid type 'S' number sy-msgno

with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.

else.

if g_exit = space.

vlayout = gx_variant-variant.

endif.

gs_vlayout = vlayout.

& pass this gs_layout in FM : REUSE_ALV_GRID_DISPLAY

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

I_BACKGROUND_ID = 'ALV_BACKGROUND'

I_BUFFER_ACTIVE = 'X'

I_CALLBACK_PROGRAM = G_REPID

IS_LAYOUT = GS_LAYOUT

I_SAVE = G_SAVE

IS_VARIANT = GS_VARIANT

IT_EVENTS = GT_EVENTS[]

IT_EVENTS = V_EVENTS

IT_FIELDCAT = FC_DC

IMPORTING

E_EXIT_CAUSED_BY_CALLER = G_EXIT_CAUSED_BY_CALLER

ES_EXIT_CAUSED_BY_USER = GS_EXIT_CAUSED_BY_USER

TABLES

T_OUTTAB = ZTAB

EXCEPTIONS

PROGRAM_ERROR = 1

OTHERS = 2.

give point if u get solution.

Regards,

Arpit