conversion de tipo de dato lraw a texto

[mseidller]

Muy buenos dias a todos, esperando su apoyo les comento que al elaborar un reporte me tope con un campo tipo lraw, el punto es que no he podido convertir ese campo para poder visualizarlo en el reporte, investigue la funcion SX_CONVERT_RAW_TXT pero no he dado con la forma de utilizarlo, la tabla que necesito para el reporte es la STXL, esperando su apoyo al respecto.

[ballan]

Para leer textos standar utiliza la funcion read_text

[eljota]

usa esta función!

Muy buenos dias a todos, esperando su apoyo les comento que al elaborar un reporte me tope con un campo tipo lraw, el punto es que no he podido convertir ese campo para poder visualizarlo en el reporte, investigue la funcion SX_CONVERT_RAW_TXT pero no he dado con la forma de utilizarlo, la tabla que necesito para el reporte es la STXL, esperando su apoyo al respecto.

Hola,

lo que tienes que hacer es usar la funcion read_text de la siguiente forma:

* Aqui devolverla la info de lineas stxl
DATA: BEGIN OF LTEXT OCCURS 0.
INCLUDE STRUCTURE TLINE.
DATA: END OF LTEXT.

* Aqui devolverla la info de cabecera stxh
DATA: BEGIN OF HTEXT.
INCLUDE STRUCTURE THEAD.
DATA: END OF HTEXT.


CALL FUNCTION 'READ_TEXT'
EXPORTING
* CLIENT = SY-MANDT
ID = "el campo TDID"
LANGUAGE = "campo TDSPRAS"
NAME = "campo TDNAME"
OBJECT = "campo TDOBJECT"
* ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT
EXCEPTIONS
ID = 1
LANGUAGE = 2
NAME = 3
NOT_FOUND = 4
OBJECT = 5
REFERENCE_CHECK = 6
WRONG_ACCESS_TO_ARCHIVE = 7
OTHERS = 8.

IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

* Luego lo muestras o ya veras que haces con el dato
LOOP AT LTEXT.
WRITE:/ LTEXT-TDLINE.
ENDLOOP.

salu2