Duplikate in einer internen Tabelle

Getting started ... Alles für einen gelungenen Start.
17 Beiträge • Vorherige Seite 2 von 2 (current)
17 Beiträge Vorherige Seite 2 von 2 (current)

Re: Duplikate in einer internen Tabelle

Beitrag von ewx (Top Expert / 4784 / 294 / 628 ) »

Code: Alles auswählen.

TYPES: BEGIN OF ty_data,
        werks TYPE werks_d,
        kunnr TYPE kunnr,
      END OF ty_data.
DATA: gs_data TYPE ty_data,
      gt_data TYPE STANDARD TABLE OF ty_data,
      gt_data2 TYPE STANDARD TABLE OF ty_data,
      gv_tabix TYPE i.
FIELD-SYMBOLS <data> TYPE ty_data.

INITIALIZATION.
  gs_data-werks = '0001'. gs_data-kunnr = '0000000815'.
  APPEND gs_data TO gt_data.
  gs_data-kunnr = '0000004711'.
  APPEND gs_data TO gt_data.
  APPEND gs_data TO gt_data. "Wir brauchen ja auch einen doppelten Eintrag!!

* so sieht sie nu aus:
*0001	0000000815
*0001	0000004711
*0001	0000004711  <0=== Der muss weg und erkannt werden, weil doppelt!!

START-OF-SELECTION.
*Hier isser:
  gt_data2 = gt_data.
  DELETE ADJACENT DUPLICATES FROM gt_data. "comparing werks kunnr
* nun ist gt_data bereinigt; keine doppelten Einträge mehr

* bereinigte Tabelle: jeden Eintrag prüfen...
  LOOP AT gt_data ASSIGNING <data>.
*... ob er in der anderen Tabelle vorhanden ist.
    READ TABLE gt_data2 TRANSPORTING NO FIELDS
     WITH KEY werks = <data>-werks kunnr = <data>-kunnr.
    IF sy-subrc = 0.
* Eintrag MUSS da sein: Löschen
      DELETE gt_data2 INDEX sy-tabix.
    ENDIF.
  ENDLOOP.

* nun stehen in gt_data2 nur noch die übrig gebliebenen - also doppelten - Einträge.
*gt_data:
*0001	0000000815
*0001	0000004711
*
*gt_data2:
*0001	0000004711


gesponsert
Stellenangebote auf ABAPforum.com schalten
kostenfrei für Ausbildungsberufe und Werksstudenten


Re: Duplikate in einer internen Tabelle

Beitrag von Ratazong (Specialist / 144 / 1 / 14 ) »
Ah, so rum, ja, das tut natürlich. :up:

Naja, manchmal sieht man den Wald vor lauter Bäumen nicht.

Vergleichbare Themen

4
Antw.
3100
Views
Interne Tabelle Duplikate löschen Zähler Inkrementieren
von SamyB » 19.03.2012 16:52 • Verfasst in ABAP® für Anfänger
3
Antw.
5245
Views
Inhalt einer internen Tabelle in eine transparente Tabelle?
von Gast » 19.10.2004 14:23 • Verfasst in ABAP® Core
2
Antw.
3334
Views
Daten aus internen Tabelle in Tabelle speichern
von Stahle71 » 03.06.2015 11:03 • Verfasst in ABAP® für Anfänger
4
Antw.
4376
Views
DELETE aus internen Tabelle
von meistercoach » 15.04.2015 09:09 • Verfasst in ABAP® für Anfänger

Über diesen Beitrag


Unterstütze die Community und teile den Beitrag für mehr Leser und Austausch

Aktuelle Forenbeiträge

Zugriff auf Daten via Webdav
vor einer Stunde von msfox 2 / 36
Interne Tabelle
vor 18 Stunden von sap_enthusiast 3 / 163
Zwischensumme Adobe Forms
vor 3 Tagen von Lucyalison 1 / 71

Newsletter Anmeldung

Keine Beiträge verpassen! Wöchentlich versenden wir lesenwerte Beiträge aus unserer Community.
Die letzte Ausgabe findest du hier.
Details zum Versandverfahren und zu Ihren Widerrufsmöglichkeiten findest du in unserer Datenschutzerklärung.

Aktuelle Forenbeiträge

Zugriff auf Daten via Webdav
vor einer Stunde von msfox 2 / 36
Interne Tabelle
vor 18 Stunden von sap_enthusiast 3 / 163
Zwischensumme Adobe Forms
vor 3 Tagen von Lucyalison 1 / 71

Unbeantwortete Forenbeiträge

Zwischensumme Adobe Forms
vor 3 Tagen von Lucyalison 1 / 71
Group Items auf einer Filterbar
vor einer Woche von Bright4.5 1 / 111
tRFC Transaktionen SM58
vor 4 Wochen von A6272 1 / 141