ich habe ein kleines Schleifenproblem. Der nachfolgende Code (kleiner Auszug) steht in einer Funktion, die in einer Subform ausgefĂĽhrt wird.
- Code: Alles auswählen
VerbandKontakte.SETFILTER(VerbandKontakte."Show as Contact Person",'%1',TRUE);
VerbandKontakte.SETFILTER(VerbandKontakte."Organization Type",'%1',VerbandKontakte."Organization Type"::City);
IF VerbandKontakte.FIND('-') THEN
AnzVerteiler := VerbandKontakte.COUNT;
WHILE (AnzVerteiler > 1) DO BEGIN
AnzVerteiler := AnzVerteiler - 1;
VerteilerCode_v := VerbandKontakte."Mailing Group";
SETFILTER("Mailing Group Code",'%1',VerteilerCode_v);
SETRANGE("Structure No.",GliederungsNr);
END;
Hier noch einmal meine verbale Erklärung, was der Code eigentlich machen soll:
In der Tabelle VerbandKontakte können mehrere KontaktVerteiler jeweils für einen Organisationstyp hinterlegt werden.
Es soll für jeden möglichen OrgaTyp geprüft werden, ob mehrere Kontaktverteiler bestehen. Wenn ja, dann soll der Filter entsprechend oft ausgeführt werden, sodass im Ergebnis nur die Kontakte ausgegeben werden, die für den jeweiligen OrgaTyp hinterlegt wurden.
Bsp.: Es gibt fĂĽr den Orgatyp xy die drei Verteiler A, B und C. Dann filtere nur auf die Kontakte, die den Verteiler A, B und C haben.
Ich hoffe, ich konnte mein Anliegen einigermaßen verständlich erklären.