Script: Phasen für Projekt erzeugen

Inhalt

Auf vielen Projekten sollen jeweils die gleichen Phasen erzeugt werden.

Das Script kann registriert und auf den entsprechenden Projekten ausgeführt werden, z.B. nach der Erzeugung des Projekts.

Version

Alle Vertec Versionen

Ausführen

Auf dem Projekt, für das die Phasen erzeugt werden sollen. Die Phasenbezeichnungen müssen entsprechend den Anforderungen angepasst werden.

Script

CreatePhasenForProjekt.txt

Scripttext

'---Bezeichnung: Phasen für Projekt erzeugen
'   Klassen: Projekt
'   ObjectScript: Yes
'   ContainerScript: No
'   EventType: Kein
'---Erzeugt eine Reihe von Phasen für das aktuelle Projekt. Die Phasenbezeichnungen
'   müssen im Script entsprechend angepasst werden.
'---30.04.2007, Vertec AG: erstellt.

option explicit

dim projekt
dim phase

if vertec.argobject.isOfType("Projekt") Then
set projekt = Vertec.ArgObject
set phase = Vertec.CreateObject("Projektphase")

phase.member("projekt") = projekt
phase.member("code") = "VP"
phase.member("beschreibung") = "Vorprojekt"
phase.member("orderidx") = 0

set phase = Vertec.CreateObject("Projektphase")
phase.member("projekt") = projekt
phase.member("code") = "HP"
phase.member("beschreibung") = "Hauptprojekt"
phase.member("orderidx") = 10

set phase = Vertec.CreateObject("Projektphase")
phase.member("projekt") = projekt
phase.member("code") = "IA"
phase.member("beschreibung") = "Inbetriebnahme / Abschluss"
phase.member("orderidx") = 20
end if

27.04.2007 | 30.04.2007
Produktlinien: Expert
Module: Leistung & CRM