# coding: windows-1252
#
#---Bezeichnung: Ordner verschieben
#   Klassen: Ordner
#   CondExpression:
#   Selectedobjectsscript: Yes
#   EventType: Kein
#---Ändert den Parentordner des aktuellen Ordners.
#   Dieser wird damit verschoben.
#---03.02.2004, Vertec AG: erstellt.
#   03.03.2017, sr: Script in Python erstellt.
#   15.10.2024, sth: Angepasst an selectedobjects mit Version 6.7.0.12.
#   14.03.2025, sth: Wirft Exception, wenn Ordner und Überordner gleich sind.

def main(ordnerlist):
    # Neuen Parentordner bestimmen
    parentord = vtcapp.selectobjectintree("Überordner für die Ordnerkopie auswählen ", [], browsefilter="", selectfilter="AbstractOrdner")    
    for ord in ordnerlist:
        if parentord:
            try:
                if parentord == ord:
                    raise Exception('Ordner und Überordner müssen unterschiedlich sein')
                ord.parentordner = parentord
            except Exception as e:
                vtcapp.msgbox('Beim Verschieben des Ordners ist ein Problem aufgetreten.\nDer Fehler lautet: %s' % str(e))
                continue
                
main(selectedobjects)