Code: Alles auswählen.
TYPES: BEGIN OF ty_adresse,
name TYPE c LENGTH 50,
vorname TYPE c LENGTH 50,
geburtstdatum TYPE sy-datum,
geschlecht TYPE c LENGTH 50,
END OF ty_adresse.
DATA: i_tabel TYPE TABLE OF ty_adresse,
wa_tabel TYPE ty_adresse.
wa_tabel-name = 'Mustermann'.
wa_tabel-vorname = 'Max'.
wa_tabel-geburtstdatum = '20000101'.
wa_tabel-geschlecht = 'mänlich'.
APPEND wa_tabel TO i_tabel.
wa_tabel-name = 'Mustermann2'.
wa_tabel-vorname = 'Max2'.
wa_tabel-geburtstdatum = '20000101'.
wa_tabel-geschlecht = 'mänlich'.
APPEND wa_tabel TO i_tabel.
wa_tabel-name = 'Mustermann3'.
wa_tabel-vorname = 'Max3'.
wa_tabel-geburtstdatum = '20000101'.
wa_tabel-geschlecht = 'mänlich'.
APPEND wa_tabel TO i_tabel.
WRITE: /.
WRITE: / 'Tabelle mit LOOP ausgeben'.
LOOP AT i_tabel INTO wa_tabel.
WRITE: / wa_tabel-name,
/ wa_tabel-vorname,
/ wa_tabel-geburtstdatum,
/ wa_tabel-geschlecht.
WRITE: /.
ENDLOOP.
WRITE: /.
WRITE: / 'Tabelle mit DO ausgeben'.
DO 3 TIMES.
write: / wa_tabel-name,
/ wa_tabel-vorname,
/ wa_tabel-geburtstdatum,
/ wa_tabel-geschlecht.
WRITE: /.
ENDDO.
WRITE: /.
WRITE: / 'Tabelle mit WHILE ausgeben'.
WHILE wa_tabel-name = 'Mustermann3'.
WRITE: / wa_tabel-name.
EXIT.
WRITE: /.
ENDWHILE.
Code: Alles auswählen.
TYPES: BEGIN OF ty_adresse,
name TYPE c LENGTH 50,
vorname TYPE c LENGTH 50,
geburtstdatum TYPE sy-datum,
geschlecht TYPE c LENGTH 50,
END OF ty_adresse.
DATA: i_tabel TYPE TABLE OF ty_adresse,
wa_tabel TYPE ty_adresse.
wa_tabel-name = 'Mustermann'.
wa_tabel-vorname = 'Max'.
wa_tabel-geburtstdatum = '20000101'.
wa_tabel-geschlecht = 'mänlich'.
APPEND wa_tabel TO i_tabel.
wa_tabel-name = 'Mustermann2'.
wa_tabel-vorname = 'Max2'.
wa_tabel-geburtstdatum = '20000101'.
wa_tabel-geschlecht = 'mänlich'.
APPEND wa_tabel TO i_tabel.
wa_tabel-name = 'Mustermann3'.
wa_tabel-vorname = 'Max3'.
wa_tabel-geburtstdatum = '20000101'.
wa_tabel-geschlecht = 'mänlich'.
APPEND wa_tabel TO i_tabel.
WRITE: /.
WRITE: / 'Tabelle mit LOOP ausgeben'.
write: / sy-uline(165).
write: / sy-vline, 'Name',
50 sy-vline, 'Vorname',
100 sy-vline, 'Geb.',
112 sy-vline, 'Geschl.', 165 sy-vline.
write: / sy-uline(165).
LOOP AT i_tabel INTO wa_tabel.
write: / sy-vline, wa_tabel-name,
50 sy-vline, wa_tabel-vorname,
100 sy-vline, wa_tabel-geburtstdatum,
112 sy-vline, wa_tabel-geschlecht, sy-vline.
write: / sy-uline(165).
ENDLOOP.