Korrigiert verrechnete Leistungen, Spesen und Auslagen ohne Rechnung
Standard
|Expert
CLOUD ABO
|ON-PREMISES
Leistung & CRM
Budget & Teilprojekt
Fremdkosten
Ressourcenplanung
Business Intelligence
Setzt verrechnete Leistungen, Spesen und Auslagen, die fälschlicherweise verrechnet wurden, wieder auf offen. Es werden nur die Leistungen, Spesen und Auslagen korrigiert, die sich nicht auf einer Rechnung befinden. Korrekte Leistungen, Spesen und Auslagen werden nicht tangiert.
Alle Versionen
Auf einem einzelnen Projekt, dessen verrechnete Leistungen, Spesen und Auslagen korrigiert werden sollen.
CorrVerrLeistSpesenAuslagenOhneRechnung.txt
'---Bezeichnung: Leistungen, Spesen und Auslagen korrigieren
' Klasse: Projekt
' ObjectScript: Yes
' ContainerScript: No
' EventType: Kein
'---Setzt verrechnete Leistungen, Spesen und Auslagen, die fälschlicherweise
' verrechnet wurden, wieder auf offen. Es werden nur die Leistungen,
' Spesen und Auslagen korrigiert, die sich nicht auf einer Rechnung befinden.
'---07.05.2007, Vertec AG: erstellt.
'---20.03.2015, Vertec AG, SR: Leistungen und Spesen von pauschalen Phasen
' werden rausgefiltert, da sich diese nicht direkt auf der Rechnung befinden.
'---03.09.2015, Vertec AG, BR: Script für verrechnete Auslagen ohne Rechnung erweitert.
option explicit
dim list
dim eintrag
dim i
'Leistungen korrigieren
set list = Vertec.argobject.member("verrechneteLeistungen")
for i = list.count-1 to 0 step -1
set eintrag = list.objects(i)
if ((eintrag.member("rechnung") is nothing) AND (not eintrag.eval("phase.pauschal"))) then
eintrag.MakeOffen
end if
next
'Spesen korrigieren
set list = Vertec.argobject.member("verrechneteSpesen")
for i = list.count-1 to 0 step -1
set eintrag = list.objects(i)
if ((eintrag.member("rechnung") is nothing) AND (not eintrag.eval("phase.pauschalspesen"))) then
eintrag.MakeOffen
end if
next
'Auslagen korrigieren
set list = Vertec.argobject.member("verrechneteAuslagen")
for i = list.count-1 to 0 step -1
set eintrag = list.objects(i)
if ((eintrag.member("rechnung") is nothing) AND (not eintrag.eval("phase.pauschalauslagen"))) then
eintrag.MakeOffen
end if
next