Inhalt einer Tabelle kopieren?
2 Beiträge
•
Seite 1 von 1
2 Beiträge
Seite 1 von 1
Hallo Ihr,
ich habe eine kleine Frage. Ich möchte dynamisch den Tabelleninhalt von Tabelle A nach Tabelle B kopieren, wobei Tabelle B genau ein Feld mehr besitzt als Tabelle A. Da das ganze wie gesagt dynamisch erfolgen soll, arbeite ich mit Feld-Symbolen und Datenreferenzen. Nur frage ich mich nun, wie ich das ganze anstelle. Das Grobgerüst habe ich bereits erstellt, bin nun nur am überlegen, was in die LOOP-Schleife bestenfalls kommt.
Hier zunächst mal der Code-Schnippsel:
Also bin ich gerade am schauen, wie ich das mit dem INSERT am besten hinbekomme bzw. wie ich erstmal die 2. Tabelle aufbaue, da bei der neuen Spalte ("SPARTE") auch Werte eingesetzt werden sollen (der Einfachheit halber würde '01' als Wert zunächst einmal ausreichen). Scheint recht tricky das ganze zu sein, zumindest für einen Neuling in ABAP 
Würde mich über Hinweise und Tipps freuen
Viele Grüße und Danke!
JetGum
ich habe eine kleine Frage. Ich möchte dynamisch den Tabelleninhalt von Tabelle A nach Tabelle B kopieren, wobei Tabelle B genau ein Feld mehr besitzt als Tabelle A. Da das ganze wie gesagt dynamisch erfolgen soll, arbeite ich mit Feld-Symbolen und Datenreferenzen. Nur frage ich mich nun, wie ich das ganze anstelle. Das Grobgerüst habe ich bereits erstellt, bin nun nur am überlegen, was in die LOOP-Schleife bestenfalls kommt.
Hier zunächst mal der Code-Schnippsel:
Code: Alles auswählen.
* Dynamisches Zuweisen der eingegebenen Datenbanktabellen
CREATE DATA lref_table TYPE TABLE OF (p_table1).
CREATE DATA lref_row TYPE (p_table1).
ASSIGN lref_table->* TO <fs_table>.
ASSIGN lref_row->* TO <fs_row>.
* Auslesen der Datenbanktabelle auf dem Start-Mandanten
SELECT * FROM (p_table1) CLIENT SPECIFIED
INTO TABLE <fs_table>
UP TO 20 ROWS "TODO: entfernen
WHERE mandt = p_mandt1.
* Einfügen der Datenbanktabelle auf dem Ziel-Mandanten
LOOP AT <fs_table> INTO <fs_row>.
ENDLOOP.Würde mich über Hinweise und Tipps freuen
Viele Grüße und Danke!
JetGum
gesponsert ⓘ
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten
kostenfrei für Ausbildungsberufe und Werksstudenten
Hallo JetGum,
hier mein Vorschlag ...
wenn deine zweite Tabelle auch dynamisch sein soll, dann musst du es genauso wie bei der ersten Tabelle machen.
Nur mit dem Zusatz
ASSIGN COMPONENT 'SPARTE' OF STRUCTURE <fs_row2> TO <fs_sparte>
und ersetze
ls_tab2-sparte = '01'
durch
<fs_sparte> = '01'
Gruß
pXo
hier mein Vorschlag ...
Code: Alles auswählen.
DATA: BEGIN OF ls_tab2.
INCLUDE STRUCTURE anderetab.
DATA: sparte TYPE spart.
DATA: END OF ls_tab2.
DATA: lt_tab2 LIKE TABLE OF ls_tab2.
* Dynamisches Zuweisen der eingegebenen Datenbanktabellen
CREATE DATA lref_table TYPE TABLE OF (p_table1).
CREATE DATA lref_row TYPE (p_table1).
ASSIGN lref_table->* TO <fs_table>.
ASSIGN lref_row->* TO <fs_row>.
* Auslesen der Datenbanktabelle auf dem Start-Mandanten
SELECT * FROM (p_table1) CLIENT SPECIFIED
INTO TABLE <fs_table>
UP TO 20 ROWS.
WHERE mandt = p_mandt1.
* Einfügen der Datenbanktabelle auf dem Ziel-Mandanten
LOOP AT <fs_table> INTO <fs_row>.
MOVE-CORRESPONDING <fs_row> TO ls_tab2.
ls_tab2-sparte = '01'.
APPEND ls_tab2 TO lt_tab2.
ENDLOOP.
Nur mit dem Zusatz
ASSIGN COMPONENT 'SPARTE' OF STRUCTURE <fs_row2> TO <fs_sparte>
und ersetze
ls_tab2-sparte = '01'
durch
<fs_sparte> = '01'
Gruß
pXo
Real programmers do not comment their code. It is hard to write and it should be hard to understand!
Seite 1 von 1
Vergleichbare Themen
1
Antw.
Antw.
1142
Views
Views
5
Antw.
Antw.
3405
Views
Views
1
Antw.
Antw.
1924
Views
Views
9
Antw.
Antw.
1880
Views
Views
Tabelle auf Tabelle kopieren (unterschiedliche Feldnamen,-längen)
von MarkusW » 25.01.2024 15:14 • Verfasst in ABAP® Core
von MarkusW » 25.01.2024 15:14 • Verfasst in ABAP® Core
Frage die ABAP Experten
Über diesen Beitrag
Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch
Aktuelle Forenbeiträge
Nach Transport von Stellen über RHMOVE30 nur Planvariante "nie verwenden"
vor 3 Tagen von DeathAndPain 4 / 1224
vor 3 Tagen von DeathAndPain 4 / 1224
Newsletter Anmeldung
Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.Die letzte Ausgabe findest du hier.
Aktuelle Forenbeiträge
Nach Transport von Stellen über RHMOVE30 nur Planvariante "nie verwenden"
vor 3 Tagen von DeathAndPain 4 / 1224
vor 3 Tagen von DeathAndPain 4 / 1224