ےے  CHHVBScriptEngine       	(General)   (Declarations)'(Declarations)
ے™
'Formel: URLAUBSANSPRUCH
'Beschreibung: aliquoter Urlaubsanspruch
Function Formel ()
	'Ihre Formel kommt hierher
	Beginn = DateSerial(Abrechnungsjahr(), 1,1)
	Ende = DateSerial (Abrechnungsjahr(), Abrechnungsmonat()+1, 1-1)

	Tage = DateDiff ("d", Beginn, Ende)
	Anspruch = 25 / 365 * Tage
	
	Betrag = Runden (Anspruch, 0)
	Zwischenspeicher (7) = Betrag
	Formel = 1	'successful
End Function

'End of (Declarations)

rations)