Ayuda Matchcode.

[miguel.esteban.martin]

Hola bueno dias.

Tengo un alv con bastantes campos, uno de ellos se llama "accion".
me gustaria que salir un matchcode con estos valores.

garantia
reparacion
prestamo.

como puedo crear este matchcode sin enlazarlo a ninguna tabla de verificacion ni nada.

Solo por codigo, poner uqe salgan estras 3 opciones.

Muchas gracias.

[Garces]

Hola bueno dias.

Tengo un alv con bastantes campos, uno de ellos se llama "accion".
me gustaria que salir un matchcode con estos valores.

garantia
reparacion
prestamo.

como puedo crear este matchcode sin enlazarlo a ninguna tabla de verificacion ni nada.

Solo por codigo, poner uqe salgan estras 3 opciones.

Muchas gracias.


Chequea este código... te puede ayudar


FORM obtener_matchcode
CHANGING p_accion TYPE string.

DATA: lt_return TYPE STANDARD TABLE OF ddshretval.
DATA: lw_return TYPE ddshretval.

DATA: BEGIN OF lt_matchcode OCCURS 3,
VALOR TYPE string,
END OF lt_matchcode.

lt_matchcode-VALOR = 'Garantía'.
APPEND lt_matchcode.
lt_matchcode-VALOR = 'Reparación'.
APPEND lt_matchcode.
lt_matchcode-VALOR = 'Préstamo'.
APPEND lt_matchcode.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
RETFIELD = 'VALOR'
WINDOW_TITLE = <título_ventana>
VALUE_ORG = 'S'
TABLES
VALUE_TAB = lt_matchcode
RETURN_TAB = lt_return
EXCEPTIONS
PARAMETER_ERROR = 1
NO_VALUES_FOUND = 2
OTHERS = 3.

IF sy-subrc NE 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ELSE.
READ TABLE lt_return INTO lw_return INDEX 1.
p_accion = lw_return-fieldval.
ENDIF.
ENDFORM.


Ello debería funcionar

[miguel.esteban.martin]

mi alv es alv orientado a objetos, esto sirve para objetos tambien???

[Garces]

La verdad nunca lo he probado en ALV's OO ... pero no veo por qué no vaya a funcionar...
En fin.... La única manera de estar seguros es probándolo...
Ojalá tengas suerte...
Nos avisas el resultado