Ordnet alle aktiven Bearbeiter allen Projektphasen zu
Standard
|Expert
CLOUD ABO
|ON-PREMISES
Leistung & CRM
Budget & Teilprojekt
Fremdkosten
Ressourcenplanung
Business Intelligence
Ordnet alle aktiven Bearbeiter allen Projektphasen zu. Auch der Administrator wird zugeordnet.
Findet vor allem dann Verwendung, wenn für alle Phasen Bearbeiterbudgets erstellt werden sollen.
Ab Version 4
Irgendwo in Vertec.
Aktive Bearbeiter allen Phasen zuordnen.txt
'---Bezeichnung: Aktive Bearbeiter allen Phasen zuordnen ' Klassen: BusinessClassesRoot '---Dieses Script ordnet alle aktiven Bearbeiter allen ' Projektphasen zu. Auch der Administrator wird zugeordnet. ' Findet vor allem dann Verwendung, wenn für alle Phasen ' Bearbeiterbudgets erstellt werden sollen. '---13.11.2006, Vertec AG: erstellt option explicit dim phasenlist dim bearbeiterlist dim linklist dim phasenlink dim bearb dim phase dim projektphase dim bearbeiter set phasenlist = vertec.eval("projektphase") set bearbeiterlist = vertec.eval("projektbearbeiter->select(aktiv)") function CheckBearbeiter(bearb, phase) CheckBearbeiter = false set linklist = bearb.eval("bearbeiterphasen") for p = 0 to linklist.count-1 set phasenlink = linklist.objects(p) if ((phasenlink.eval("phase") is phase)) then CheckBearbeiter = true Exit Function end if next end function for i = 0 to bearbeiterlist.count-1 set bearbeiter = bearbeiterlist.objects(i) for k = 0 to phasenlist.count-1 set projektphase = phasenlist.objects(k) if (CheckBearbeiter(bearbeiter, projektphase) = false) then set phasenlink = vertec.createObject("BearbeiterPhaseLink") phasenlink.member("bearbeiter") = bearbeiter phasenlink.member("phase") = projektphase end if next next