✒️ABAP / Los símbolos de texto Por Gustavo Betancur Guzmán
ABAP Los símbolos de texto
Resumen
Unidad 5 leccion 2
Los simbolos de texto
1- Que son los simbolos de texto?
Son textos q se crean dentro del ámbito de un prog y q se pueden utilizar dentro del prog c/vez q sea necesario en lugar de especificar textos entre comillas simples.
Los símbolos de texto son objetos de abap independientes del prog x lo q debe activarse y transportarse a otros ambientes y mandantes junto con los prog y los demás objetos.
c/prog abap tiene sus propios símbolos de texto.
xa acceder a los símbolos de texto de un prog abap debemos ir al menú = Pasar a = Elementos de texto = símbolos de texto
=> la utilización de los símbolos de texto en los prog abap es suma/ importante ya q evita lo q se denomina Harcodear.
Harcodear => nos referimos a una mal practica de programación q consiste en incluir textos directa/ en el código de los prog. en lugar de utilizar constantes, símbolos de texto, parámetros, textos de selección u otra fuente de información.
Esta práctica es problemática si se desea traducir los textos existentes en un prog ABAP a otros idiomas en caso q trabajemos en una multinacional y el prog sea utilizado en distintos países.
La Tool inspector de codigo los debe identificar xa ser remplazados por simbolos de texto.
2- La implementacion de los simbolo de text en un prog ABAP
xa aprender a utilizar los simbolos de texto vamos a trabajar el prog ztest_simbolos_de_texto el cual recupera los usuarios activos de la tabla DB ztabla_usuarios xa imprimir x pantalla junto con cabecera.
REPORT ztest_simbolos_de_texto NO STANDARD PAGE HEADING LINE SIZE 200 LINE-COUNT 60.
*variables
DATA: ti_usuarios TYPE STANDARD TABLE OF ztabla_usuarios,
wa_usuarios LIKE LINE OF ti_usuarios.
START-OF-SELECTION.
REFRESH ti_usuarios.
SELECT *
FROM ztabla_usuarios
WHERE estado_usu EQ 'A'. " usuarios activios
IF sy-subrc EQ 0.
*impresion de cabecera
PERFORM impresion_cabecera.
* impresion detalle de usuario
PERFORM impresion_usuarios.
ELSE.
MESSAGE e000(z_prueba) WITH 'No existe usuarios activos'.
ENDIF.
Dentro de la subrutina "impresion_cabecera" realiza la impresion de texto de cabecera
FORM impresion_cabecera.
WRITE 1(129) sy-uline.
WRITE:/ 1(1) sy-vline,
2(8) 'DNI',
10(1) sy-vline,
11(35) 'Nombre y Apellido',
46(1) sy-vline,
47(15) 'Estado de usuario',
62(1) sy-vline,
63(30) 'Direccion',
93(1) sy-vline,
94(19) 'Fecha de Nacimiento',
113(1) sy-vline,
114(14) 'Nacionalidad',
128(1) sy-vline.
WRITE:/ 1(129) sy-uline.
ENDFORM.
Dentro de la subrutina "IMPRESION_USUARIOS" registro de usuarios activos.
FORM impresion_usuarios.
LOOP AT ti_usuarios INTO wa_usuarios.
WRITE:/ 1(1) sy-vline,
2(8) wa_usuarios-dni,
10(1) sy-vline,
11(35) wa_usuarios-nombre_ape,
47(1) sy-vline,
ejecutamos el prog ztest_simbolos_de_texto comprobamos la salidad x pantalla.
vamos a implementar los simbolos de texto de modo de arremplazar todos los texto harcodeados q se encuentran en la subrutina imprimir_cabecera y simbolos de texto xa ello reescribimos el codigo de la subrutina imprimir_cabecera
en el prog. ztest_simbolos_de_texto.
FORM impresion_cabecera.
WRITE 1(129) sy-uline.
WRITE: /1(1) sy-vline,
2(8) text-001, " Dni
11(1) sy-vline,
12(35) text-002 , "Nombre y apellido
47(1) sy-vline,
48(15) text-003 , "estado de usuario
63(1) sy-vline,
64(30) text-004, "direccion
94(1) sy-vline,
95(19) text-005 , "fecha de nacimiento
114(1) sy-vline,
115(14) text-006 , "nacionalidad
129(1) sy-vline.
WRITE:/1(129) sy-uline.
ENDFORM. "IMPRESION_CABECERA
Ahora vamos hacer doble clic sobre c/u de los símbolos de texto xa crealos. => el sist. nos propone crearlos ya q el mismo no existe y hacemos clic en Si.
xa q el sist interprete q deseamos crear un simbol ode texto entonces debe comenzar asi => text-### correspondiente y repetimos los mismos pasos xa crear el símbolo de texto a los sgntes: - text-002
- text-003
- text-003
- text-004
- text-005
- text-006
Luego de crealos, se activan
=> la longitud maxima de caracteres x text es de 132.
La columna Long D => indica la longitud del texto
La columna Long M => indica la longitud del texto + los espacios en blanco a la izquierda o derecha
se ejecuta el prog y nada ha cambiado.
Escanear / Compartir
Sobre el autor
Publicación académica de Gustavo Betancur Guzmán, en su ámbito de estudios para el Curso SAP ABAP.
SAP Expert
Gustavo Betancur Guzmán
Profesión: Ingeniero de Sistemas - Colombia - Legajo: WS86O
✒️Autor de: 164 Publicaciones Académicas
🎓Egresado de los módulos:
- Curso SAP ABAP Avanzado
- Curso SAP ABAP
- Carrera Consultor SAP MM Nivel Avanzado
- Carrera Consultor SAP MM Nivel Inicial
Disponibilidad Laboral: FullTime
