Einfacher (?) Gruppenwechsel, ich stecke fest.

Einfacher (?) Gruppenwechsel, ich stecke fest.

Hallo Community,

ich stecke derzeit in einem (evtl. einfachen) Gruppenwechsel fest. Ich hab auch bereits hier im Forum gesucht, leider bekomm ich die geannten Beispiele nicht umgebogen.

Die Befehle AT und ON sind mir sicherlich ein Begriff, aber die bringen mich nur bedingt weiter. Ich möchte also gerne einen Gruppenwechsel über eigene Kennzeichen realisieren.

Es geht mir nur um den Gruppenwechsel, es sollen danach auch bestimmte Werte addiert werden, aber das sollte jetzt erstmal keine Rolle spielen.

Ich habe mittels "SORT" meine interne Tabelle nach Land und Materialnummer sortiert.

Jetzt möchte ich gerne bei einem Länderwechsel und im selben Land die Materialnummer gruppieren.

Ich möchte also zum Schluß eine Liste habe die folgendermaßen aussieht:



Hab natürlich auch ein wenig Code geschrieben, der auch nur bedingt funktioniert, aber vielleicht kann mir aber jemand einen Tipp geben, wo ich einen Denkfehler habe.

Der Code steht innerhalb einen LOOP - ENDLOOP.
tmpRegion, tmpMatNr und tmpMaxWert sind meine Hilfskennzeichen.
Ich muss mich vielleicht jetzt schon für mein grausiges Coding entschuldigen, bin aber im Selbststudium und noch ziemlich am Anfang.

Mit freundlichem Gruß

Michael

dazu noch ein kleiner Tipp:
wenn man den LOOP mit ASSIGNING <fs> benutzt, hat man alle Felder im Zugriff, weil das FS ja direkt auf die Tabellenzeile verweist.
Das heißt im Besonderen, dass dann keines der Felder mit '*..*' maskiert ist!

Weiterer Tipp:

Wenn man nicht mit "ASSIGNING" arbeiten kann ( etwa weil man "SUM" benutzen möchte ) geht auch folgendes Konstrukt Ich dachte früher immer, dass "AT FIRST" am Anfang der üblichen Schleifenverarbeitung stehen muss , vor den "AT NEW ..."-Zeitpunkten. Dem ist aber nicht so, auch wenn alle Demobeispiele so aussehen.

Auszug Sap-Bibliothek http://help.sap.com/saphelp_46c/helpdat ... ameset.htm

LOOP AT <itab>.
AT FIRST.... ENDAT.
AT NEW <f1>....... ENDAT.
AT NEW <f2>....... ENDAT.
.......
<Einzelsatzverarbeitung>
.......
AT END OF <f2>.... ENDAT.
AT END OF <f1>.... ENDAT.
AT LAST..... ENDAT.
ENDLOOP.

Es ist z.B. durchaus möglich in einem Loop vor "AT FIRST" ABAP-Befehle einzubauen ( die Sternchen der Workarea werden erst bei Eintritt in AT FIRST gefüllt - vorher ist die Workarea vollständig) oder auch hinter "AT LAST" noch ein paar Befehle abzusetzen.
Und ich für beide Versionen schon Situationen gehabt, wo dieses Vorgehen sinnvoll einsetzbar war.

Hallo Michael,

bei der Verwendung von AT gibt es zwei wichtige Aspekte, die man unbedingt beachten sollte:

1. keine WHERE-Klausel:
   SAP schreibt dazu, dass dadurch bestimmte Events nicht korrekt ausgelöst werden (können), weil die internen Prüffelder (wahrscheinlich) bei jedem Durchlauf (ohne Beachtung der WHERE-Klausel) geprüft werden und dann erst entschieden wird, ob die Zeile überhaut in die Bedingung passt.
2. Die Tabelle muss in der Spaltenreihenfolge korrekt aufgebaut sein:
   Ein 'AT NEW Spalte 3' bedeutet immer auch, dass sich etwas in Spalte 1 und/oder 2 geändert haben kann, damit dieses Ereignis ausgelöst wird.
   Das bedeutet z.B. auch, dass bei neu eingefügten Datensätzen ein eventueller Mandant auch korrekt gepflegt sein muss.

//edit:
um sowohl die Summierung als auch Feldsymbole zu benutzen, kann man dann Folgendes machen:

Hallo,
Für den Fall, dass du den SAP-Gruppenwechsel nicht verwenden kannst, weil z.B. die Reihenfolge der Felder in der internen Tabelle nicht angepasst werden kann, bzw. du nicht viele interne Tabellen anlegen und Daten umschaufen willst oder weil eine WHERE-Klausel verwendet wird, schlage ich folgende Logik vor:
1. Zwei Gruppenwechsel-Strukturen definieren
ALT/NEU
* Gruppen-Wechsel-Feld
TYPES: BEGIN OF TY_GRUWE,
BEGIN OF GRU1,
FELD1 TYPE ...,
END OF GRU1,
FELD2 TYPE ...,
END OF TY_VBELN_LFD.
* Gruppen-Wechsel-Feld
DATA WA_GRUWE_NEU TYPE TY_GRUWE.
DATA WA_GRUWE_ALT TYPE TY_GRUWE.

2. Programm-Logik.
...
CLEAR WA_GRUWE_NEU, WA_GRU_ALT.
SORT ITAB BY ...
LOOP AT ITAB WHERE ... .
MOVE ITAB-xxxx TO WA_GRUWE_NEU-xxx.
IF WA_GRUWE_NEU <> WA_GRUWE_ALT.
PERFORM GRUPPENWECHSEL.
ENDIF.
MOVE-CORRESPONDING GRUWE_ALT TO GRUWE_NEU.
ENDLOOP.
PERFORM GRUWE. "letzte Zeile

...
FORM GRUPPENWECHSEL.
PERFORM GRUWE_ENDE_VERARB.
PERFORM GRUWE_ANF_VERARB.
IF WA_GRUWE_NEU-GRU1 <> WA_GRUWE_ALT.
PERFORM GRUWE_OBERGRUPPE. "Mehrstufig
ENDIF.
ENDFORM.

FORM GRUWE_ANF_VERARB.
PERFORM CLEAR_SUMMEN. "usw.
ENDFORM.
FORM GRUWE_END_VERARB.
CHECK GRUWE_ALT IS INITIAL: " 1. Zeile
PERFORM AUSGABE_SUMMEN. "usw.
ENDFORM.

Wenn man diese Logik noch erweitert, kann man daraus
noch eine Zusammen-Mischlogik für verschiedene Interne Tabellen basteln.

So, wollte nur mal ein kleines Feedback geben und mich für die Hilfe und vorallem für die Geduld bedanken.

Es funktioniert wunderbar mit field-symbols, Summen- und Durchschnittsberechnungen führe ich manuell durch, funktioniert auf jeden Fall.

Gruß Michael