725044_de-DE

liliconcom

Löschen doppelter Skripte

Hallo,

Ich habe mehrere Dateien in einer Datenbank verkettet, was zu einer Datenbank mit vielen duplizierten Skripten geführt hat. Gibt es eine Möglichkeit, ein Skript zu schreiben, um doppelte Skripte zu entfernen? Ich möchte sie nicht manuell löschen, da ich in Zukunft weitere Dateien mit Verkettung zur Datenbank hinzufügen werde, wodurch die Skripte erneut zur Datei hinzugefügt würden.

Automatisierung und SkripterstellungBetreff: Doppelte Skripte löschen

Sie können „Get Table Script Names“ verwenden, um Namen aller Tabellenskripte abzurufen. Dann können Sie diese nach einer Liste der Skripte filtern, die Sie entfernen möchten, und diese schließlich mit << Skripte löschen löschen

Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");
names = dt << Get Table Script Names;
Show(names);

Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");
dt << New Table Script(
	"New Script",
	Distribution(Column(:Height, :Weight), By(:sex))
);
Wait(2);
dt << Delete Scripts("New Script");

Betreff: Doppelte Skripte löschen

Update – ich habe es mit dieser Methode gelöst:

dt = Current Data Table(); 
names = dt << Get Table Script Names;

Show(names);
wordsToDelete = {"Script 1 name", "Script 2 name", "Script 3 name"};
For(i = 1, i <= N Items(names), i++,
    scriptName = names[i];
    containsWord = 0;
    For(j = 1, j <= N Items(wordsToDelete), j++,
        word = wordsToDelete[j];
        If( Contains( scriptName, word ),
            containsWord = 1;
            Break();
        );
    );
   If( containsWord,
        dt << Delete Scripts( scriptName );
    );
);