Hola victor2180,
La sentencia APPEND sirve para agregar registros a una tabla interna (por ejemplo).
Copia el siguiente codigo y ejecutalo.
report ZDEMO1 no standard page heading.
types: begin of ydatos,
nombre(30) type c,
edad(5) type c,
end of ydatos.
data: idatos type table of ydatos."tabla interna
data: wdatos like line of idatos."estructura
clear:wdatos."limpia estructura
wdatos-nombre = 'Jose'.
wdatos-edad = '23'.
append wdatos to idatos."agrega los datos de la estructura a la tabla interna
clear:wdatos.
wdatos-nombre = 'Carlos'.
wdatos-edad = '28'.
append wdatos to idatos.
clear:wdatos.
wdatos-nombre = 'Carmen'.
wdatos-edad = '30'.
append wdatos to idatos.
*-Impresion en pantalla
LOOP AT idatos into wdatos.
write:/1 wdatos.
ENDLOOP.
*Fin
- La impresión quedaria algo asi:
Jose 23
Carlos 28
Carmen 30
__________________
------------------------------------
antony.alza@gmail.com
|