Coger texto descriptivo de un dominio

[ale12]

Haber si me explico.

Necesito coger el texto de la descripción breve de un dominio.

Exactamente del ámbito de valores de un dominio.

Alguien sabe como hacerlo?

[oscar]

Utiliza esta función RM_DOMAIN_VALUES_GET, te pongo un ejemplo.

Código: [Seleccionar]

FORM recuperar_txt_destino .
  DATA: BEGIN OF dom_values OCCURS 0.
  DATA: domvalue TYPE char10,
        ddtext   TYPE val_text.
  DATA: END OF dom_values.

  DATA: t_domain_values TYPE dd07v OCCURS 0.
  DATA: e_domain_values TYPE dd07v.


  REFRESH: t_domain_values, dom_values.

  CALL FUNCTION 'RM_DOMAIN_VALUES_GET'
    EXPORTING
      i_name          = 'ZDESTI'    "Dominio
      i_langu         = sy-langu
      i_read_texts    = 'X'         "Recupera descripción
    IMPORTING
      e_domain_values = t_domain_values
    EXCEPTIONS
      illegal_input   = 1
      OTHERS          = 2.

  IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.

  CLEAR txt_otro_destino.
  LOOP AT t_domain_values INTO e_domain_values
          WHERE domvalue_l = zwp_cabe-destino.

    dom_values-domvalue = e_domain_values-domvalue_l.
    txt_otro_destino    = e_domain_values-ddtext.
  ENDLOOP.

ENDFORM.                    " recuperar_txt_destino

Un saludo...

[ale12]

Muchas gracias Oscar, ha sido de gran ayuda la función.

 

[yenkobebe]

tenia el mismo problema
he probado el codigo que has posteado y me ha ido de maravillas!!!!!!!!!!!!
muchas gracias amigo
un saludo
yenko.-

[abapito]

Ohhhh!!!!

Que bueno. Muchas gracias.