36er Umstellung

[RobertMack]

wie geändert? Hab's noch nicht nachvollzogen...

Feldverwendung/Prüfung/Änderung über die Vorkommen hinweg, z.B. IF AFELD(1) <> AFELD(4)
oder erst nachdem alle Vorkommen eigens geprüft wurden, z.B.
DO 5 $I
$I OCCUR DS
IF AFELD <> IRGENDWAS, merke $I
ENDDO
$I = gesuchtes Vorkommen

[DKSPROFI]

Also:

Programmlauf ALT:

Datei A wird gelesen (Aktuelles KD-Sortiment)

Satzauschluß

Ausgabe 1

Datei A wird erneut gelesen (Aktuelles KD-Sortiment)

Satzauschluß

Ausgabe 2

Datei A wird nochmal gelesen (Aktuelles KD-Sortiment)

Satzauschluß

Ausgabe 3

usw.

Unsere Idee ist:

Datei A wird gelesen (Aktuelles KD-Sortiment)

Satzauschluß

Merken 1
Merken 2
Merken 3
usw.

Aus Merken 1 ($X) weiter
Aus Merken 2 ($X) weiter
Aus Merken 3 ($X) weiter
usw.

In Merken 2 - 5 wird dann eine weitere Verarbeitung gestartet.

Von Merken 1 - x sind aber verschieden Felder zu aktualisieren




Wir wollen eigentlich nur einmal statt fünfmal nach den selben Kriterien lesen.

Hoffentlich habe ich mich verständlich ausgedrückt

[RobertMack]

...leider nicht ;-)

Ich rate jetzt mal:

Sie wollen beim Einlesen prüfen, ob ein Satz ausgeschlossen wird oder in eine von vier Gruppen paßt?

Und dann die vier Gruppen einzeln verarbeiten?

[Pikachu]

Wozu überhaupt Indizes? Ihr könnt die einzelnen Felder in den Datenstrukturen doch direkt über ihre Namen ansprechen.

Nachtrag: Die Datenstrukturen lassen sich mit MOVE OR_REC AA_REC usw. füllen.

[DKSPROFI]

Wozu überhaupt Indizes? Ihr könnt die einzelnen Felder in den Datenstrukturen doch direkt über ihre Namen ansprechen.

Nachtrag: Die Datenstrukturen lassen sich mit MOVE OR_REC AA_REC usw. füllen.

Genau das mache wir. Jetzt wollen wir aber aus der DS nur einzelne Felder haben, also aus DS1(5) das 3 feld, aus DS4(3) das 10 feld usw.

[Pikachu]

Setze den Index einmal direkt hinter die Datenstruktur (anstelle von hinter das Feld): z.B. EVAL AA_DS($X).AA_FELD = Neu

[DKSPROFI]

Setze den Index einmal direkt hinter die Datenstruktur (anstelle von hinter das Feld): z.B. EVAL AA_DS($X).AA_FELD = Neu

VIELEN HERZLICHEN DANK!!!!!!!! Das wars, vielen Dank auch alle anderen Antworten.