Para poder leer los campos de texto se usa la función read_text_inline. Esto generalmente lo usamos en formularios para mostrar textos de cabecera o de posición por ejemplo.
Para saber como llenar los campos, vamos al lugar donde cargamos el texto:
Una vez ahí clickeamos en el menú Pasar a —> Cabecera…
VG_INLINE suele tener el valor 1 (VG_INLINE = ‘1’.)
El código que tenemos que agregar es:
TYPES: it_lin LIKE tline .
DATA: VG_INLINE TYPE CHAR1,
VG_NAME LIKE THEAD-TDNAME,
IT_LINES TYPE TABLE OF IT_LIN,
IT_INLINE TYPE TABLE OF IT_LIN,
VG_ID LIKE THEAD-TDID,
VG_LANG LIKE THEAD-TDSPRAS,
VG_OBJ LIKE THEAD-TDOBJECT,
CALL FUNCTION ‘READ_TEXT_INLINE’
EXPORTING
ID = VG_ID
INLINE_COUNT = VG_INLINE
LANGUAGE = VG_LANG
NAME = VG_NAME
OBJECT = VG_OBJ
TABLES
INLINES = IT_INLINE
LINES = IT_LINES
EXCEPTIONS
ID = 1
LANGUAGE = 2
NAME = 3
NOT_FOUND = 4
OBJECT = 5
REFERENCE_CHECK = 6
OTHERS = 7.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
* En la tabla IT_LINES nos queda el texto guardado
Deja un comentario