5. Juni 2008 15:59
Ok problem, nur doppelt vorhandene Referenzen auszugeben, wurde wie folgt gelöst:
OnPreDataItem() wird für den MenüButton entsprechend per SETFILTER gefiltert. (für EAN, ASIN, ISBN etc.)
Ein SETCURRENTKEY bewirkt an dieser Stelle noch eine schöne sortierte Ausgabe der entsprechenden Referenznummern.
OnAfterGetRecord() wird ein globaler Record (rItemCrossRef) mit Subtype "Item Cross Reference" genutzt (nicht temporär, da nichts geschrieben wird, sondern nur ausgelesen).
Hier wird für den MenüButton entsprechend nochmals (wie bereits oben) per SETFILTER auf den erstellten Record gefiltert.
anschließend führt folgender Code zur Lösung:
- Code:
printReference := FALSE;
IF rItemCrossRef.COUNT > 1 THEN
BEGIN
cRefNo := "Item Cross Reference"."Cross-Reference No.";
iRefNoCount := rItemCrossRef.COUNT;
printReference:= TRUE;
END;
Die Globale "cRefNo" wird in der Section zur Ausgabe der Referenznummer genutzt
Die Globale "iRefNoCount" wird in der Section zur Ausgabe der Häufigkeit der Referenznummer genutzt.
Das wars eigentlich :)