# coding: windows-1252
#
#---Bezeichnung: Ordner einer Benutzergruppe zur Ansicht anfügen
#   Klasse: Benutzergruppe
#   Selectedobjectsscript: Yes
#   Condexpression: self->size = 1
#   EventType: Kein
#---Fügt einen bestehenden Root-Ordner der aktuellen Benutzergruppe
#   zur Ansicht an. Der entsprechende Ordner wird in einer 
#   Auswahl abgefragt.
#---14.05.2007, Vertec AG: erstellt.
#   03.03.2017, sr: Script in Python erstellt.
#   28.10.2024, sth: Angepasst an selectedobjects mit Version 6.7.0.12.

def main(gruppen):
    for gruppe in gruppen:
        if gruppe.istypeof('BenutzerGruppe'):
            # Rootordner bestimmen
            rootord = vtcapp.selectobjectintree("Wählen Sie den Rootordner, den Sie der Gruppe hinzufügen wollen ", [], browsefilter="", selectfilter="AbstractOrdner")
            if rootord:
                gruppe.persrooteintraege.append(rootord)           
        else:
            vtcapp.msgbox('Dieses Script muss auf einer Benutzergruppe ausgeführt werden')

main(selectedobjects)