✒️ABAP Las subrutinas
ABAP Las subrutinas
UNIDAD 4: SUBRUTINAS, FUNCIONES Y BATCH
1. SUBRUTINAS:
Son secciones de código que pueden ser utilizados más de una vez.
MODULARIZAR:
Acción de pasar el código de un programa a subrutinas, para mejorar la lectura y mantenimiento del mismo.
Lo ideal es q una subrutina no tenga más de 50 líneas de código.
La modularización ayuda a encontrar más fácilmente los errores en los programas.
Una subrutina se declara con la palabra reservada PERFORM seguida del nombre de la subrutina.
Ej:
* Selecciono datos de tabla de usuarios
PERFORM selecciono_datos.
Al hacer doble click en el nombre de la subrutina (selecciono_datos), el sistema nos propondrá crear la subrutina, si decimos que sí, el sistema nos preguntará dde queremos generar la subrutina, las opciones son: crear un nuevo include de datos o crearlas en el mismo programa de control.
Si lo creamos en el programa de control el sistema generará un bloque de código en nuestro programa para q lo completemos con el código q corresponda:
Ej:
form selecciono_datos.
endform. "selecciono_datos
Es importante q el nombre q se le asigne a una subrutina sea lo más representativo posible del resultado q produce la subrutina.
La longitud del nombre no puede exceder de 30 caracteres.
2. TIPOS DE SUBRUTINAS
- INTERNAS: cdo la subrutina está dentro del mismo programa q la llama.
- EXTERNAS: cdo la subrutina está en un programa distinto al q las llama. Como puede ser el caso de un include de
subrutinas a otro programa.
3. SUBRUTINAS INTERNAS
Para crear una subrutina interna usamos la palabra clave PERFORM <nombre subrutina>
Esto crea un bloque FORM - ENDFORM donde colocamos nuestro código.
Se puede pasar datos entre los programas ppales y una subrutina a través de Parámetros.
Parámetros actuales: son los parámetros definidos en el programa principal, a la derecha de la palabra PERFORM.
Parámetros formales: a los parámetros definidos en la subrutina, a la derecha de la palabra FORM.
Tipos de parámetros:
- De entrada: cdo se utilizan para pasar datos del programa ppal a la subrutina.
- De salida: cdo se utilizan para pasar datos de la subrutina al programa ppal.
- De entrada y salida: cdo se utilizan para pasar datos de la subrutina al programa ppal y viceversa.
4. PASO DE PARAMETROS A SUBRUTINAS.
Tenemos 3 opciones para pasar parámetros:
- USING
- CHANGING
- TABLES
Se deben escribir en el sgte orden:
PERFORM subrutina TABLES <tabla de salida>
USING <parámetro de entrada>
CHANGING <parámetro de salida>
En el bloque FORM-ENDFORM debemos especificar el tipo de parámetros formales. De esta forma nos aseguramos q solo se pasen parámetros del tipo q corresponda a la subrutina.
Ej: dde pasamos una tabla interna, una estructura y una variable de tipo carácter.
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.
* Form procesar_datos
* text
PERFORM paso_por_valor USING v_f1.
WRITE v_f1.
* Form PASO_POR_VALOR
FORM paso_por_valor USING value(pf1).
pf1 = 'X'.
ENDFORM. " PASO_POR_VALOR
Y la salida será B.
Tenemos q tener bien claro q cdo psamos parámentros por valor las modificaciones q se realizan al parámetros dentro de la subrutina no tendrán efecto alguna fuera de la subrutina en el programa ppal.
NOTA: Como vemos en el ejemplo anterior el nombre del parámetro actual v_f1 es decir, el q se especifica a la derecha de la palabra reservada PERFORM es diferente al nombre del parámetro formal pf1 es decir el q se especifica a la derecha de la palabra reservada FORM en la declaración de la subrutina Paso por valor.
Basta con q ambos parámetros se encuentren en el mismo orden y su tipo sea el mismo, para q ABAP los interprete correctamente.
Para pasar parámetros por valor utilizamos en la declaración de la subrutina la palabra reservada Value y encerramos al parámetro entre paréntesis.
Cdo se pasan parámetros por valor debemos tener bien claro q las modificaciones q se realizan al parámetro dentro de la subrutina no tendrán efecto alguna fuera de la subrutina en el programa ppal.
Ahora explicaremos pq la salida por pantalla es B? Al momento de declarar en el programa ppal 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 por valor, dentro de la subrutina Paso por valor vemos q el nombre del parámetro cambia y q 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 q 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, solo la dirección de los parámetros actuales se transfieren a
los parámetros formales, el contenido del campo del programa q hace la llamada too cambia.
Ej:
* Paso de parámetros por referencia
DATA: v_g1(1) TYPE c VALUE 'A',
v_g2(2) 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
FORM paso_por_referencia USING p_g1
CHANGING p_g2.
p_g1 = p_g2 = 'X'.
ENDFORM.
Y la salida será A B y X X.
NOTA: Como vemos en el ej anterior los nombres de los parámetros actuales v_g1 y v_g2, es decir los q 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 los q se especifican a la derecha de la palabra reservada FORM en la declaración de la subrutina Paso por referencia.
Basta con q los parámetros se encuentren en el mismo orden y su tipo sea el mismo, para q ABAP los interprete correctamente.
Cdo se pasan Parámetros por referencia debemos tener bien claro q las modificaciones q se realizan al parámetro dentro de la subrutina si tendrán efecto fuera de la subrutina en el programa ppal.
Ahora explicaremos pq la salida por pantalla es AB XX? Al momento de declarar en el programa ppal la variable v_g1 y v_g2 les asignamos los valores AB luego imprimimos en pantalla las variables, por lo q la salida en pantalla es AB, a continuación ejecutamos la subrutina Paso por referencia, pasando ambas variable como parámetro por referencia dentro de la subrutina vemos q los nombres de los parámetros cambia por p_g1 y p_g2 y q ambos parámetros se le asigna una X a la salida de la ejecución de la subrutina en el programa ppal los parámetros conserva el valor asignado a la subrutina debido al paso por referencia es decir X. Finalmente la impresión del contenido de la variable en pantalla será XX.
- Paso por valor y resultado: durante la llamada a la subrutina, los parámetros formales son creados como copias de
los parámetros actuales. Los cambios en los parámetros formales son copiados a los
parámetros actuales al final de la subrutina.
Ej:
* Paso de parametros por valor y resultado
DATA: v_h1(1) TYPE c VALUE 'A',
v_h2(1) TYPE c VALUE 'B'.
PERFORM paso_por_valor_y_resultado USING v_h2
CHANGING v_h1.
WRITE:/ 'H1 es:', v_h1.
* Form PASO_POR_VALOR_Y_RESULTADO
FORM paso_por_valor_y_resultado USING value(p_f2)
CHANGING value(p_f1).
p_f1 = p_f2.
ENDFORM. " PASO POR VALOR Y RESULTADO
Y la salida sera H1 es: B.
5. SUBRUTINAS EXTERNAS
Si quisiéramos llamar a una subrutina q está en un programa distinto al q estamos procesando, debemos utilizar la siguiente sintaxis:
PERFORM <sub>(<programa>) USING …..
También podemos agregar includes de subrutinas a nuestro programa de la siguiente manera:
INCLUDE <report>.
 
 
 
Sobre el autor
Publicación académica de Mayra Maria Pino Rodriguez, en su ámbito de estudios para la Carrera Consultor ABAP.
Mayra Maria Pino Rodriguez
Profesión: Licenciada Cibernética Matemática - Republica Dominicana - Legajo: RA62Z
✒️Autor de: 56 Publicaciones Académicas
🎓Egresado del módulo:
Certificación Académica de Mayra Pino