Code: Alles auswählen.
* <gt_data> ist Referenz zu der dynamischen Tabelle
* Kopie der Tabelle
CREATE DATA dref LIKE TABLE OF <gt_data>.
ASSIGN dref->* TO <table>.
* Arbeitsbereich kopierte Tabelle
CREATE DATA dref_wa LIKE LINE OF <table>.
ASSIGN dref_wa->* TO <wa>.
* Arbeitsbereich originale Tabelle
CREATE DATA dref_comp LIKE LINE OF <gt_data>.
ASSIGN dref_comp->* TO <comp>.
LOOP AT <gt_data> INTO <comp>.
IF sy-index GE 200.
EXIT.
ENDIF.
<wa> = <comp>.
APPEND <wa> TO <table>.
DELETE <gt_data>.
ENDLOOP.
Code: Alles auswählen.
Es wurde versucht, zwei Datenobjekte aufeinander zu kopieren.
Dies ist im vorliegenden Fall nicht möglich, da dabei ein Datenobjekt
vom Typ "u" in den Typ "h" konvertiert werden soll; dies wird nicht
unterstützt.
Liste der internen ABAP-Typen:
C Text (Character)
N numerischer Text
D Datum (YYYYMMDD)
T Zeitpunkt (HHMMSS)
X Hexadezimal
I ganze Zahl (Integer)
P gepackte Zahl
F Gleitpunktzahl
h Interne Tabelle
r Objektreferenz
l Datenreferenz
g String vom Typ C
y String vom Typ X
s 2-Byte-Integer mit Vorzeichen
b 1-Byte-Integer ohne Vorzeichen
u Struktur (flache Struktur)
v Struktur (tiefe Struktur)
Code: Alles auswählen.
* Feldleiste für Originaltabelle
CREATE DATA dref_comp LIKE LINE OF <gt_data>.
ASSIGN dref_comp->* TO <comp>.
* Kopie der Feldleiste
CREATE DATA dref_wa LIKE <comp>.
ASSIGN dref_wa->* TO <wa>.
* Table von Feldleistenkopie
CREATE DATA dref LIKE TABLE OF <wa>.
ASSIGN dref->* TO <table>.
LOOP AT <gt_data> INTO <comp>.
...
ASSIGN <comp> TO <wa>.
APPEND <wa> TO <table>.
DELETE <gt_data>.
ENDLOOP.