✒️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.