✒️ABAP Las subrutinas
ABAP Las subrutinas
UNIDAD 4
SUBRUTINAS
Es una sección de código que puede ser utilizada más de una vez. La idea es pasar el código de los programas a subrutinas para que los programas sean más fáciles de leer y mantener.
MODULARIZAR
Es la acción de pasar el código de un programa a subrutinas, para mejor lectura y mantenimiento. Lo ideal es que una subrutina no tenga más de 50 líneas de código.
Esta modularización ayuda a encontrar más fácilmente los errores en los programas. Esto porque al debaguear únicamente debo de estar atento a que el resultado de una subrutina sea el esperado sin entrar en detalle de cómo se llega a ese resultado.
Una subrutina se declara con la palabra reservada PERFORM seguida del nombre de la subrutina.
PERFORM selecciono_datos.
De esta manera se ha creado una subrutina para modularizar la selección de los datos. Ahora, si hacemos doble clic en el nombre de la subrutina el sistema lanzará una ventana de creación. A la cual debemos seleccionar sí.
A continuación se nos preguntará donde queremos guardar la subrutina, las opciones son Include de Datos y crearlas en el mismo programa de control. En este caso seleccionamos la opción de crearla en el mismo programa de control.
En seguida el sistema generará un bloque de código en el programa para que lo completemos con el código que corresponda.
Nota: Es importante asignar el nombre a la subrutina tratando de apegarse lo más que se pueda a su tarea principal.
TIPOS DE SUBRUTINAS
Internas: Son las que se están creadas dentro del mismo programa desde el que se está trabajando. Estas se crean mediante la palabra reservada PERFORM seguida del nombre de subrutina, a continuación se crea un bloque FORM/ENDFORM que es donde colocamos el código.
Externas: Es cuando una subrutina está en un programa distinto al que las llama.
SUBRUTINAS INTERNAS:
Para pasar datos entre los programas principales y las subrutinas se hace a través de parámetros. A los parámetros que son definidos a partir del programa principal se les coloca a la derecha de la palabra PERFORM, se les conoce como parámetros actuales.
A los parámetros que se definen en la subrutina se les conoce como parámetros actuales.
PERFORM “Parámetros actuales
FORM “Parámetros formales
Los parámetros pueden ser de tres tipos:
Entrada: Pasan datos del programa principal a la subrutina.
Salida: Cuando se pasan datos de la subrutina al programa principal.
Entrada y Salida: Cuando se pasan e ingresan datos de la subrutina al programa principal y viceversa.
PASO DE PARÁMETROS A SUBRUTINAS
PERFORM subrutina TABLES <TABLA DE SALIDA>
USING <PARÁMETRO DE ENTRADA>
CHANGING < PARÁMETRO DE SALIDA>
En el bloque FORM_ENFORM debemos especificar el tipo de parámetros formales. De esta manera nos aseguramos que solo se pasen parámetros del tipo que corresponde a la subrutina.
DATA: ti_vuelos LIKE STANDARD TABLE OF sflight,
st_vuelos LIKE LINE OF ti_vuelos,
v_flag TYPE sy-subrc.
* Procesar los datos de entrada
PERFORM procesar_datos TABLES ti_vuelos
USING st_vuelos
CHANGING v_flag.
NOTA: Es importante respetar el orden en el que se declararon los datos (DATA) para después declarar la subrutina, tiene que seguirse el mismo orden en el bloque FORM/ENFORM.
Hay tres formas de pasar parámetros:
Paso por valor: Durante la llamada a la subrutina, los parámetros formales son creados como copias de los parámetros formales.
DATA: v_f1(1) TYPE c VALUE 'B'. PERFORM paso_por_valor USING v_f1. Como vemos en la imagen, el nombre del parámetro actual v_f1, es decir, el que se especifica a la derecha de la palabra PERFORM es diferente al nombre del parámetro formal pf1, es decir, el que se especifica a la derecha de la palabra reservada FORM en la declaración de la subrutina paso por valor. Basta con que ambos parámetros se encuentren en el mismo orden y su tipo sea el mismo para que ABAP los interprete correctamente. Para pasar parámetros por valor utilizamos en la declaración de la subrutina la palabra VALUE y encerramos al parámetro entre paréntesis. Cuando se pasan parámetros por valor debemos tener bien claro que las modificaciones que se realicen al parámetro dentro de la subrutina no tendrán efecto alguno fuera de la subrutina en el programa principal. Ahora bien, al momento de declarar en el programa principal la variable v_f1 le asignamos el valor “B”, luego ejecutamos la subrutina paso por valor pasando a la variable v_f1 como parámetro pro valor. Dentro de la subrutina paso por valor vemos que el nombre del parámetro cambia y que se le asigna al mismo una X. Tal como mencionamos anteriormente, debido al paso por valor a la salida de la subrutina el parámetro v_f1 vuelve a tener el mismo valor que tenía antes de ingresar a la misma, es decir, B. Finalmente la impresión del contenido de la variable en pantalla será B. Paso por Referencia: Durante la llamada a la subrutina, sólo la dirección de los parámetros actuales se transfieren a los parámetros formales. Dentro de la subrutina se trabaja con el campo del programa que hace la llamada. Si cambiamos los parámetros formales el contenido del campo del programa que hace la llamada también cambia.
DATA: v_g1(1) TYPE c VALUE 'A', v_g2(1) TYPE c VALUE 'B'. WRITE: v_g1 , v_g2. PERFORM paso_por_referencia USING v_g1 CHANGING v_g2. WRITE: v_g1 , v_g2. FORM paso_por_referencia USING p_g1 CHANGING p_g2. P_g1 = p_g2 = ‘X’. ENDFORM Si ejecutamos, la salida será AB y X X. Como vemos, los nombres de los parámetros v:g1 y v_g2, es decir, los que se especifican a la derecha de la palabra reservada PERFORM, son diferentes a los nombres de los parámetros formales p_g1 y p_g2, es decir, a los que se especifican a la derecha de la palabra reservada FORM en la declaración de la subrutina paso por referencia. Basta con que los parámetros se encuentren en el mismo orden y su tipo sea el mismo para que ABAP los interprete correctamente. Cuando se pasan parámetros por referencia debemos tener claro que las modificaciones que se realicen al parámetro dentro de la subrutina sí tendrán efecto fuera de la subrutina en el programa principal.
Ahora bien, al momento de declarar en el programa principal las variables v_g1 y v_g2 les asignamos los valores A y B. Luego imprimimos en pantalla las variables por lo que la salida en pantalla es A B. a continuación ejecutamos la subrutina paso por referencia
 
 
 
Sobre el autor
Publicación académica de Franco Alfieri Maringota Alvarado, en su ámbito de estudios para la Carrera Consultor ABAP.
Franco Alfieri Maringota Alvarado
Peru - Legajo: GF44M
✒️Autor de: 288 Publicaciones Académicas
🎓Egresado de los módulos:
- Carrera Consultor en SAP FI Nivel Inicial
- Carrera Consultor en SAP BI / BW BO Nivel Avanzado
- Carrera Consultor ABAP Nivel Avanzado
- Carrera Consultor ABAP Nivel Inicial
- Carrera Consultor en SAP BI / BW BO Nivel Inicial