doppelte Zeilen aus ITAB eliminieren
12 Beiträge
•
Seite 1 von 1
12 Beiträge
Seite 1 von 1
Hallo zusammen,
ich suche eine elegante Lösung um doppelte Einräge aus einer ITAB zu löschen.
Sieht wie folgt aus.
Select auf dbtab in itab mit bestimmten Kriterien.
Itab ist gefüllt.
Nun kann die Itab mehrere Einträge der gleiche Belegnummer haben, wobwi auch die 3 weiteren Keyfelder identisch sind. Keyfeld 5 ist different.
Jetzt sollen alle Einträge der Itab, die die den identischen Schlüssel der ersten vier Keyfelder haben rausfliegen.
Jetzt mein Problem: wie finde ich heraus das es mehrere Einträge zu einem best. Schlüssel in der itab gibt? Und wie eliminiere ich diese aus der itab?
Danke
ich suche eine elegante Lösung um doppelte Einräge aus einer ITAB zu löschen.
Sieht wie folgt aus.
Select auf dbtab in itab mit bestimmten Kriterien.
Itab ist gefüllt.
Nun kann die Itab mehrere Einträge der gleiche Belegnummer haben, wobwi auch die 3 weiteren Keyfelder identisch sind. Keyfeld 5 ist different.
Jetzt sollen alle Einträge der Itab, die die den identischen Schlüssel der ersten vier Keyfelder haben rausfliegen.
Jetzt mein Problem: wie finde ich heraus das es mehrere Einträge zu einem best. Schlüssel in der itab gibt? Und wie eliminiere ich diese aus der itab?
Danke
gesponsert ⓘ
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten
kostenfrei für Ausbildungsberufe und Werksstudenten
Ich muß nicht nur die doppelten Einträge löschen, sondern es sollen nur die Einträge in der itab bleiben die ursprünglich singulär vorkommen.
Belnr 1 a b c d
belnr 1 a b c d
belnr 1 a b c d
belnr 2 a b c d
zum Beispiel so, und alle Einträge belnr 1 sollen gelöscht werden, nicht nur die doppelten.
Nach DELETE ADJACENT DUPLICATES FROM itab. sieht die itab doch so aus
Belnr 1 a b c d
belnr 2 a b c d
es soll aber nur noch Eintrag
belnr 2 a b c d
in der itab stehen.
Belnr 1 a b c d
belnr 1 a b c d
belnr 1 a b c d
belnr 2 a b c d
zum Beispiel so, und alle Einträge belnr 1 sollen gelöscht werden, nicht nur die doppelten.
Nach DELETE ADJACENT DUPLICATES FROM itab. sieht die itab doch so aus
Belnr 1 a b c d
belnr 2 a b c d
es soll aber nur noch Eintrag
belnr 2 a b c d
in der itab stehen.
Beitrag
von ralf.wenzel (Top Expert / 3924 / 200 /
280
)
»
Was meinst du damit "was damit gemacht werden soll"? comparing ist schon richtig. Damit löst du dein Problem.mörtel hat geschrieben:mit comparing fields lege ich nur die Vergleichsfelder fest, aber nicht was damit gemacht werden soll.
Ralf
Ralf Wenzel • Heuristika SAP-Development
25 Jahre SAP-Entwickler • 20 Jahre Freiberufler
Publikationen • Ungarische Notation • Xing
SAP HELP
Syntax
... ADJACENT DUPLICATES FROM itab
[COMPARING { comp1 comp2 ...}|{ALL FIELDS}]... .
Zusatz:
... COMPARING {comp1 comp2 ...}|{ALL FIELDS}
Wirkung
Mit diesen Zusätzen löscht die Anweisung DELETE in Gruppen aufeinander folgender Zeilen, die in bestimmten Komponenten den gleichen Inhalt haben, alle Zeilen bis auf die erste Zeile der Gruppe.
ich will aber das auch der erste Eintrag der Gruppierung gelöscht wird.
Syntax
... ADJACENT DUPLICATES FROM itab
[COMPARING { comp1 comp2 ...}|{ALL FIELDS}]... .
Zusatz:
... COMPARING {comp1 comp2 ...}|{ALL FIELDS}
Wirkung
Mit diesen Zusätzen löscht die Anweisung DELETE in Gruppen aufeinander folgender Zeilen, die in bestimmten Komponenten den gleichen Inhalt haben, alle Zeilen bis auf die erste Zeile der Gruppe.
ich will aber das auch der erste Eintrag der Gruppierung gelöscht wird.
Selbst ist der Mann .....
Sort Itab by 5 Keyfelder.
Lese (1.) Satz. (index merken, als letzten "gelesenen" Satz)
Vergleiche mit nächstem Satz (index +1).
Sind die ersten 4 keyfelder identisch: lösche alle Sätze deren 4 Keyfelder übereinstimmen. Lese index(letzten gelesen Satz wieder, da dieser der nächste ist)
....nächster Satz, gleiches Prozedre...
Sort Itab by 5 Keyfelder.
Lese (1.) Satz. (index merken, als letzten "gelesenen" Satz)
Vergleiche mit nächstem Satz (index +1).
Sind die ersten 4 keyfelder identisch: lösche alle Sätze deren 4 Keyfelder übereinstimmen. Lese index(letzten gelesen Satz wieder, da dieser der nächste ist)
....nächster Satz, gleiches Prozedre...
Du wirst da nicht um ein LOOP über die itab herum kommen. Ich würde das in etwa so lösenmörtel hat geschrieben:ich will aber das auch der erste Eintrag der Gruppierung gelöscht wird.
Code: Alles auswählen.
* Tabelle nach Key sortieren
SORT itab BY key1 key2 key3 key4.
* Mehrfacheinträge löschen
LOOP AT itab INTO wa.
* zähler initialisieren
AT NEW key4.
CLEAR g_count
ENDAT.
* Zählen
g_count = g_count + 1.
* Wenn Mehrfacheinträge dann löschen
AT END OF key4.
IF g_count > 1.
DELETE itab WHERE key1 = wa-key1
AND key2 = wa-key2
AND key3 = wa-key3
AND key4 = wa-key4.
ENDIF.
ENDAT.
ENDLOOP.
Ohne deinen Select zu kennen, hier ein Beispiel mit SUBQUERY:
Code: Alles auswählen.
SELECT *
FROM dbtab
INTO TABLE itab
WHERE eins IN s_eins
AND zwei IN s_zwei
AND NOT EXISTS ( SELECT *
FROM dbtab
WHERE key1 = dbtab~key1
AND key2 = dbtab~key2
AND key3 = dbtab~key3
AND key4 = dbtab~key4
AND key5 <> dbtab~key5 )
Gruß Hendrik
Seite 1 von 1
Vergleichbare Themen
2
Antw.
Antw.
607
Views
Views
1
Antw.
Antw.
7956
Views
Views
Überflüssige Nachkommastellen eliminieren
von Newbee » 05.02.2007 22:28 • Verfasst in ABAP® für Anfänger
von Newbee » 05.02.2007 22:28 • Verfasst in ABAP® für Anfänger
30
Antw.
Antw.
14129
Views
Views
5
Antw.
Antw.
5876
Views
Views
6
Antw.
Antw.
2385
Views
Views
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 2 Tagen von DeathAndPain 4 / 1129
vor 2 Tagen von DeathAndPain 4 / 1129
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 2 Tagen von DeathAndPain 4 / 1129
vor 2 Tagen von DeathAndPain 4 / 1129