✒️ABAP Los cortes de control utilizando tablas internas
ABAP Los cortes de control utilizando tablas internas
Cortes de control:
Se utiliza para imprimir un listado por pantalla.
Ejemplo:
Ordeno la tabla interna
SORT ti_clientes BY nrocli region distrito cuenta concepto.
* Recorro la tabla interna
LOOP AT ti_clientes INTO st_clientes.
* Copio el contenido del registro a una estructura auxiliar
CLEAR st_clientes_aux.
st_clientes_aux = st_clientes.
* Por cada nuevo cliente
AT NEW nrocli.
CLEAR v_importe_acumulado.
FORMAT COLOR 1.
WRITE:/ 'Cliente:', st_clientes_aux-nrocli.
ENDAT.
* Acumulo el importe
ADD st_clientes_aux-importe TO v_importe_acumulado.
AT END OF nrocli.
FORMAT COLOR 1.
WRITE:/10 'Region',
20 'Distrito',
30 'Cuenta',
45 'Concepto',
55 'Importe Total'.
WRITE: /10 st_clientes_aux-region,
20 st_clientes_aux-distrito,
30 st_clientes_aux-cuenta,
45 st_clientes_aux-concepto,
55 v_importe_acumulado.
WRITE:/ sy-uline.
ENDAT.
ENDLOOP.
AT NEW :
Internamente compara, en este caso, el actual numero de cliente con el anterior.
En caso de ser diferente, realiza las instrucciones que posee.
AT END OF:
Internamente compara, en este caso, el actual numero de cliente con el próximo.
En caso de ser diferente, realiza las instrucciones que posee.
 
 
 
Agradecimiento:
Ha agradecido este aporte: Publio Sanchez Buitrago
Sobre el autor
Publicación académica de Martin Alejandro Goya, en su ámbito de estudios para la Carrera Consultor ABAP.
Martin Alejandro Goya
Profesión: Ingeniero en Computacion - Argentina - Legajo: CJ13E
✒️Autor de: 49 Publicaciones Académicas
🎓Egresado del módulo:
Certificación Académica de Martin Goya