![]() |
|
||||||||||||||||
COMMENT ***** Mit Hilfe dieses Scriptes können Datensätze in der Datenmenge *****..ermittelt werden, die in 2 Datenfelder Übereinstimmungen haben und in einem ***** Feld unterschiedlich sind. END COMMENT ***** Überschreiben von vorherigen Ergebnissen SET SAFETY OFF COMMENT ***** Löschen aller vorheriger Variablen DELETE ALL OK COMMENT ***** Dialogfeld zur Auswahl des Tabellennamens und des Namens für die ***** Ergebnistabelle DIALOG (DIALOG TITLE "GLEICH, GLEICH, UNTERSCHIEDLICH Duplikate" WIDTH 588 HEIGHT 175 ) (BUTTONSET TITLE "&OK;&Cancel" AT 480 60 DEFAULT 1 ) (TEXT TITLE "Wählen sie die Tabelle" AT 24 40 ) (ITEM TITLE "f" TO "v_table_name" AT 240 36 WIDTH 186 ) (TEXT TITLE "Geben Sie den Output-Tabellenname ein" AT 24 100 ) (EDIT TO "v_output_table" AT 240 96 WIDTH 186 ) OPEN %v_table_name% COMMENT ***** Auswahl der 3 verschiedenen Felder DIALOG (DIALOG TITLE " GLEICH, GLEICH, UNTERSCHIEDLICH Duplikate " WIDTH 635 HEIGHT 232 ) (BUTTONSET TITLE "&OK;&Cancel" AT 516 72 DEFAULT 1 ) (TEXT TITLE "Erstes Duplikatsfeld" AT 20 40 WIDTH 176 ) (TEXT TITLE "Zweites Duplikatsfeld" AT 20 88 ) (TEXT TITLE "Schlüsselfeld das unterschiedlich ist" AT 20 136 WIDTH 176 ) (ITEM TITLE "CD" TO "v_key_field_1" AT 228 36 WIDTH 244 ) (ITEM TITLE "CD" TO "v_key_field_2" AT 228 84 WIDTH 244 ) (ITEM TITLE "CD" TO "v_key_field_duplicates" AT 228 132 WIDTH 244 ) (TEXT TITLE "Bemerkung: Numerische oder Logische Felder können nicht als Schlüsselfeld verwendet werden" AT 45 184 ) COMMENT ***** Entfernen aller Duplikate nach den 3 Feldern SUMMARIZE ON %v_key_field_1% %v_key_field_2% %v_key_field_duplicates% OTHER ALL TO "Temp_Table.FIL" OPEN PRESORT DUPLICATES ON %v_key_field_1% %v_key_field_2% OTHER ALL ERRORLIMIT 10 TO "%v_output_table%.FIL" PRESORT DELETE FORMAT Temp_Table OK DELETE "Temp_Table.FIL" OK OPEN "%v_output_table%" SET SAFETY ON ********************* |
|
||||||||||||||||
| |
|||||||||||||||||