Matchcode por modulo de función

[jjeffer]

Mira lo que debes hacer es crear un modulo de funciones por la SE37, sin parametros de IMPORT y EXPORT, pero si con los siguientes parametros.

En TABLES
SHLP_TAB TYPE SHLP_DESCT
RECORD_TAB TYPE SEAHLPRES

En CHANGING
SHLP TYPE SHLP_DESCR
CALLCONTROL LIKE DDSHF4CTRL

Luego si va el código
************************************
* Se declara la estructura que almacena los datos del MatchCode
************************************
DATA: BEGIN OF ti_ngpa OCCURS 0,
name1 TYPE gpnam1, "Debe ser igual al nombre del parametro
END OF ti_ngpa.

IF callcontrol-step = 'SELECT'.
************************************
* Inicio Se realiza la consulta y se almacenan los datos
************************************
SELECT pernr
FROM nper
INTO TABLE ti_nper
WHERE sptyp EQ '01'.

LOOP AT ti_nper.
SELECT SINGLE gpart
FROM ngpa
INTO lv_gpa
WHERE gpart = ti_nper-pernr.

CLEAR ti_ngpa.

CALL FUNCTION 'ISH_NGPA_CONCATENATE'
EXPORTING
ss_gpart = lv_gpa
ss_read_ngpa = 'X'
IMPORTING
ss_pname = ti_ngpa-name1
EXCEPTIONS
wrong_gpart = 1
OTHERS = 2.

APPEND ti_ngpa.
ENDLOOP.
************************************
* Fin Se realiza la consulta y se almacenan los datos
************************************

REFRESH record_tab.

CALL FUNCTION 'F4UT_RESULTS_MAP'
TABLES
shlp_tab = shlp_tab
record_tab = record_tab
source_tab = ti_ngpa
CHANGING
shlp = shlp
callcontrol = callcontrol
EXCEPTIONS
illegal_structure = 1
OTHERS = 2.

callcontrol-step = 'DISP'.

CALL FUNCTION 'F4UT_PARAMETER_VALUE_GET'
EXPORTING
parameter = 'NAME1' " Reference to search help parameter
fieldname = 'NAME1' " Reference to field of Seatinfo
TABLES
shlp_tab = shlp_tab
record_tab = record_tab
results_tab = ti_ngpa
CHANGING
shlp = shlp
callcontrol = callcontrol.
ENDIF.


Espero te sirva

[mysmb2]

en la tabla shlp-selopt que es pasada como CHANGING están todos los parámetros por los que filtraste en la ayuda para búsqueda y tiene la siguiente estructura similar a un rango.
SHLPNAME
SHLPFIELD
SIGN
OPTION
LOW
HIGH

Saludos.

[adge]

Gracias por los aportes.

Pero tengo un problema tonto que no se como resolver ya que no se como leer el numero de empleado. Hago una ayuda de búsqueda en el infotipo 61 donde un campo tendrá un valor según el TRFAR,TRFGB, y TRFGR del infotipo 8. Lo que no consigo es leer el PERNR.

He probado con PERNR en el import y con una estructura INNNN-PERNR pero no consigo obtener el numero del empleado de la ayuda de busqueda asociada a ese infotipo dodne lo leo.

MUchas Gracias.
Saludos.

[adge]

Me da que va a ser imposible pq la ayuda de búsqueda la disparó en una tabla. Y necesito leer el pernr del infotipo 61, pero no tengo ninguna relación con esa tabla, sólo la categoría.