FORMATO DE SALIDA DE LOS DATOS.
==============================
ABAP ofrece instrucciones para generar reportes (salida por pantalla), estos son:
-WRITE:
WRITE:/ <offset>(<long>) '<datos a visualizar>' <adicional>.
offset : columna donde empezara la impresion en pantalla.
long : longitud de los valores a visualizar.
adicional : Comando que le da un toque extra a la salida. Puede ser :
Left-justified: Justificada a la izq.
Centered: Centrado.
Right-justified : Justificada a la derecha.
no-zero : elimina los ceros y los cambia por espacios.
no-gap : el blanco despues del campo que se desea imprimir es omitido.
no-sign: el sigo no aparace en la salida.
decimals n : n define el numero de digitos decimales.
round n : redondea el campo de salida para los tipos p.
dd/mm/yy : fecha con separadores.
Ejemplo: WRITE: /1(70) 'Hola Mundo'.
Para dejar una linea en blanco se usa : SKIP.
Para escribir una linea horizontal se usa : ULINE.
FORMATOS DE PAGINA.
==================
Existen instrucciones especialmente destinadas a darle formato a la salida de un reporte ya sea por pantalla o por impresora.
- Evento TOP-OF-PAGE : Ocurre tan pronto el sistema empieza a procesar una nueva pagina. Por ejempo para poner titulo.
Ejemplo: ...
TOP-OF-PAGE.
WRITE:/ 'Datos de los usuarios del sistema'.
ULINE.
- Evento END-OF-SELECTION : Se usa para realizar la impresion por pantalla de los datos, de modo que se separe del procesamiento de los mismos. Se ejecuta luego del evento START-OF-SELECTION.
- Agregado a REPORT : Se agrega la sentencia NO STANDARD PAGE HEADING <extra>.
Donde extra puede ser:
LINE-SIZE : Para modificar la cantidad de lineas.
LINE-COUNT : Para modificar la cantidad de filas.
Ejercicios.
===========
*&---------------------------------------------------------------------*
*& Report ZABAP_FORMATO_ESTMO99K
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT ZABAP_FORMATO_ESTMO99K NO STANDARD PAGE HEADING LINE-SIZE 200
LINE-COUNT 50.
DATA: fecha(10) TYPE c,
dia(2) type c,
mes(2) type c,
anio(4) type c.
INITIALIZATION.
fecha = sy-datum.
dia = fecha 6(2).
mes = fecha 4(2).
anio = fecha(4).
START-OF-SELECTION.
ULINE. "Liena horizontal
"WRITE:/ sy-datum DDMMYY. "Fecha con formato DD/MM/AAAA
CONCATENATE dia mes anio INTO fecha SEPARATED BY '/'.
"WRITE: /'Variable sy-datum : ',sy-datum.
WRITE:/'La fecha del sistema (DD/MM/AAAA) es:',fecha.
TOP-OF-PAGE.
WRITE: 'Reporte de prueba de formatos'.
END-OF-SELECTION.