# coding: windows-1252
#
#---Bezeichnung: Ordner einer Benutzergruppe zur Ansicht anfügen
#   Klasse: Benutzergruppe
#   ObjectScript: Yes
#   ContainerScript: No
#   EventType: Kein
#---Fügt einen bestehenden Rootordner der aktuellen Benutzergruppe
#   zur Ansicht an. Der entsprechende Rootordner muss über die
#   ID angegeben werden.
#---14.05.2007, Vertec AG: erstellt.
#---03.03.2017, sr: Script in Python erstellt.

def main():
    gruppe = argobject
    if gruppe.istypeof('BenutzerGruppe'):
        ordnerid = vtcapp.inputbox('Vertec','Geben Sie die ID des Rootordners an','')
        try:
            rootord = vtcapp.getobjectbyid(ordnerid)
        except:
            vtcapp.msgbox('Kein Rootordner mit dieser ID gefunden')
        else:
            gruppe.persrooteintraege.append(rootord)
    else:
        vtcapp.msgbox('Dieses Script muss auf einer Benutzergruppe ausgeführt werden')

main()