En una entrada anterior hablamos de los textos estándar, estos objetos de texto que nos sirven para la gestión de textos largos y que se pueden incluir en formularios.
Cuando queremos usar estos textos dentro de un programa ya sea para usarlo como texto para un correo, o alguna otra cosa, lo que tenemos que hacer es llamar a la función:
CALL FUNCTION 'READ_TEXT'
EXPORTING
client = lv_client
id = lv_id
language = lv_language
name = lv_name
object = lv_object
archive_handle = lv_archive_handle
IMPORTING
header = lwa_header
TABLES
lines = lti_lines
EXCEPTIONS
id = 1
language = 2
name = 3
not_found = 4
object = 5
reference_check = 6
wrong_access_to_archive = 7.
La definición de los tipos la podemos analizar revisando los tipos desde la transacción SE37, requerimos mandar como constantes el tipo de texto que es, en estos casos "ST" el mandante y el nombre que le asignamos al texto estándar. Con estos datos podemos recuperar los textos y tenerlos a disposición en el parámetro "lines" de tables de la función.
Una vez que hemos recuperado el texto y lo tenemos en una tabla del tipo especificado en el parámetro "lines" podemos usar la siguiente función para reemplazar los símbolos que usamos en el texto estándar.
CALL FUNCTION 'TEXT_SYMBOL_REPLACE'
EXPORTING
endline = lv_cant
header = lwa_header
replace_program = 'X'
replace_text = 'X'
TABLES
lines = lti_lines.
Lo único que debemos de tener en cuenta es crear las variables en el programa que tenga el mismo nombre que nuestros símbolos dentro del texto y que dichas variables estén disponibles en el modulo donde llamamos la función .
Una vez que tenemos estos dos pasos, ya tenemos nuestro texto listo para ser usado, ya sea para mostrar un mensaje en pantalla o enviarlo como cuerpo de un correo electrónico.