Code

// DATE CONTAINERS
var vAcqD as Date //Acquired Date
var vCurD as Date //Current Date
var vEffY as Int //Effective Years

// DATE MATH
var vDays as Int //Days Between Acquired Date (vAcqD) and Current Date (vCurD)

// DEPRECIATION CONTAINERS
var vDepY as Money //Yearly Depreciation
var vDepD as Money //Daily Depreciation
var vDepC as Money //Current Depreciation

// VALUE CONTAINERS
var vPurP as Money //Purchase Price
var vSalV as Money //Salvage Value
var vCurV as Money //Current Value

	//LOAD VARIABLES
	vAcqD = Date_Acquired
	vCurD = @Date
	vEffY = Effective_Years
	vPurP = Price
	vSalV = Salvage

	// If vEffY Contains A Value
	If vEffY <> 0 Then
	{  
		//Calculate Yearly Depreciation
		vDepY = (vPurP - vSalV) / vEffY

		//Calculate Daily Depreciation
		vDepD = vDepY / 365.25

		//Calculate Current Depreciation & Current Value
		If vCurD >= vAcqD Then
		{
			//Calculate Days Since Purchase
			vDays = @ToNumber(vCurD - vAcqD)

			//Calculate Depreciation To Date
			vDepC = vDays * vDepD

			//Calculate Current Value
			vCurV = vPurP - vDepC

			//Post Results To Elements
			Yearly_Depreciation = vDepY
			Depreciation_To_Date = vDepC
			Current_Value = vCurV
		}

	}