Code: Alles auswählen.
**
interne Tabelle: Ausgabetabelle
TYPES: BEGIN OF t_itab_output,
blart TYPE t003-blart, "Belegart
y2000 TYPE i, "Anzahl der Belege 2000
y2001 TYPE i, "Anzahl der Belege 2001
y2002 TYPE i, "Anzahl der Belege 2002
y2003 TYPE i, "Anzahl der Belege 2003
y2004 TYPE i, "Anzahl der Belege 2004
y2005 TYPE i, "Anzahl der Belege 2005
y2006 TYPE i, "Anzahl der Belege 2006
y2007 TYPE i, "Anzahl der Belege 2007
fdate TYPE bkpf-budat, "Erste Buchung
ldate TYPE bkpf-budat, "Letzte Buchung
END OF t_itab_output.
DATA: it_output TYPE STANDARD TABLE OF t_itab_output,
wa_output TYPE t_itab_output.
Code: Alles auswählen.
**
* Zeiger auf das Feld in der Struktur
FIELD-SYMBOLS: <fs> TYPE string.
* Nimmt Feldnamen auf
DATA: g_fieldname TYPE string,
year TYPE i VALUE 2000,
year_begin(4) TYPE c.
WHILE year IN s_gjahr.
year_begin = year.
* Feldnamen zusammenbasteln
CONCATENATE 'Y' year_begin INTO g_fieldname.
* Zeiger auf Feld ausrichten
ASSIGN (g_fieldname) TO <fs> .
year = year + 1.
ENDWHILE.
Code: Alles auswählen.
TYPES: BEGIN OF t_itab_output,
blart TYPE t003-blart, "Belegart
jahr(4), "Jahr
anzahl TYPE i, "Anzahl der Belege
fdate TYPE bkpf-budat, "Erste Buchung
ldate TYPE bkpf-budat, "Letzte Buchung
END OF t_itab_output.