![](/cvo_files/imgs_sap_abap/logos/logo_cvo_academy_it.png)
✒️ABAP Las subrutinas
ABAP Las subrutinas
![ABAP Las subrutinas ABAP Las subrutinas](https://www.cvosoft.com/cvo_files/imgs_sap_abap/og-images/304.jpg)
SUBRUTINAS:
Son secciones de codigo que pueden ser utilizadas mas de una vez.la idea es para que sean mas faciles de leer y mantener.
Modulizar: se llama asi a la acción de pasar el código de un programa a subrutinas, para mejorar la lectura y mantenimiento del mismo. lo ideal que la Subrutina no tenaga mas de 50 lineas, asi ayuda a encontrar mas facil los errores, al debaguear el programa solo me preocupo que el resultado de la subrutina sea el esperado.
Las subrutinas se declaran con la palabra reservada PERFOM seguido del nombre de la subrutina
Ejemplo
PERFOM selecciono_datos.
para crear una subrutina para modulizar el ejemplo anterior hacemos doble click en el nombre de la subrutina, el sistema nos dirá si queremos crear la subrutina contestamos que SI y nos preguntará donde queremos crearla , las opciones son : Crear un nuevo INCLUDE de DATOS o crearlas en el mismo progrmaa de control , para este caso las crearemos en el mismo pgm de control. IMPORTANTE : el nombre de la subrutina se le asigne un nombre que se alo mas representativo posible del resultado que produce la subrutina y el nombre no debe exceder de los 30 caracteres
TIPOS de SUBRUTINAS
Internas: Cuando la subrutina está dentro del mismo programa que la llama.
Externas: Cuando la subrutina está en un programa distinto al que las llama. Como puede ser el caso de un Include de Subrutinas o otro programa.
Subrutinas Internas. para crearla usamos la palabra PERFOM y el nombre de la subrutina. Esto creará un bloque FORM-ENDFORM donde colocamos código.
se pueden pasar datos entre losprogramas principales y una subrutina a través de parámetros. A los parámetros definidos en el pgm principal , a la derecha del PERFORM se llaman parámetros actuales.
Los parámetros pueden ser de dos tipos:
De Entrada: cuando se utilizan para pasar datos del Pgm principal a la subrutina
De Salida: cuando se utilizan para pasar datos de la subrutina al Programa Principal.
PASO DE PARÄMETROS a SUBRUTINAS
Utilizaremos tres opciones: USING, CHANGING y TABLES
Se deben escribir en el orden que muestro a continuación
PERFORM subrutina TABLES <tabla de salida>
USING <parametro de entrada>
CHANGING <parámetro de salida>.
en el bloque FORM-ENDFORM debemos especificar el tipo de parámetros formales(definidos a la derecha del FORM).De esta forma no aseguramos que solo pasen los parámetros del tipo que corresponden a la subrutina.
Ejemplo ; pasamos un tabla interna, una estructura y una variable de tipo carácter
DATA: ti_vuelos LIKE STANDART TABLE OF SFLIGHT,
st_vuelos LIKE LINE OF ti_vuelos,
v_flag Type sy_subrc.
* Procesar datos de entrada
PERFORM procesar_datos TABLES ti_vuelos
USING st_vuelos
CHANGING v_flag.
ENDFORM.
Cuando una subrutina es llamada, los parámetros deben ser pasado en el mismo orden en que fueron declarados se debe respetar esa misma secuencia en el bloque FORM-ENDFORM.
HAY 3 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 actuales(a la derecha del PERFORM) los cambios en los parámetros formales no afectan a los parámetros actuales.
ejemplo:
DATA: v_f1(1) TYPE c VALUE 'B'
PERFORM paso _por_valor USING v_f1.
WRITE v_f1.
FORM paso_por_valor USING VALUE (pf1).
PF1 = 'X'.
ENDFORM.
Y la salida será "B"
Audio tips
El nombre del parámetro actual v_f1, es decir el que se especifica a la derecha de la palabra reservada PERFORM, es diferente al nombre del parámetro formal pf1 el que se especifica a la derecha de la palabra reservada FORM en la declaración de la subrutina paso por valor.
Paso por Referencia
Durante la llamada a la subrutina, solo la direccion de los parametros 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 tambien 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
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.
AUDIO TIPS
En el paso por valor las modificaciones que se realizan dentro de la subrutina, una vez que salimos de la subrutina no se ven reflejadas.
-En el paso por Referencia las modificaciones que se realizan dentro de la subrutina, una vez que salimos de la subrutina Si se ven reflejadas.
 
 
 
Sobre el autor
Publicación académica de Carlos Alberto Carreira, en su ámbito de estudios para la Carrera Consultor ABAP.
Carlos Alberto Carreira
Profesión: Consultor Técnico en Jde W.s. - Argentina - Legajo: KC15G
✒️Autor de: 92 Publicaciones Académicas
🎓Cursando Actualmente: Consultor ABAP Nivel Inicial
🎓Egresado de los módulos:
Certificación Académica de Carlos Carreira