Pasar mas de 1parámetro a funcion

[nenuke]

Hola,

tienes que hacer algo parecido a esto:

*---------------------------------------------------------------------*
* FORM USER_COMMAND *
*---------------------------------------------------------------------*
* ........ *
*---------------------------------------------------------------------*
* --> R_UCOMM *
* --> RS_SELFIELD *
*---------------------------------------------------------------------*
FORM user_command USING r_ucomm LIKE sy-ucomm
rs_selfield TYPE slis_selfield.

IF r_ucomm = '&IC1' AND rs_selfield-sel_tab_field = '1-ANLN1'.

*Lees la tabla que contiene los datos del listado
*usando como clave el campo donde ha pinchado el usuario.

read table li_itab with key anln1 = rs_selfield-value.

SET PARAMETER ID 'AN1' FIELD rs_selfield-value.
SET PARAMETER ID 'AN2' FIELD li_itab-anln2.
SET PARAMETER ID 'BUK' FIELD li_itab-bukrs.

CALL TRANSACTION 'AS03' AND SKIP FIRST SCREEN.

ENDIF.


ENDFORM. "user_command


Donde li_itab es la tabla que le pasas al ALV o donde contengas los datos para generar tu listado.

Un saludo.