sunlight-b of Sunlight BA Team
4/26/2018 - 4:25 PM

Get date data of the current loss description and test if the date has been filled

	Dim DateDeConsolidation as Date
	Dim objLossDescription As clsLossDescription
	objLossDescription = GetObjectToBeUsedForThisClass(GetType(clsLossDescription).Name, ListOfObjectsToBeUsedInFormula)
	If Not objLossDescription Is Nothing Then
		Trace("objLossDescription  found " & objLossDescription.AsString(""),7)
		DateDeConsolidation = clsDynamicMethodOrPropertyCall.Manager.ValueForAPropertyName(objLossDescription, "DateDeConsolidation",Nothing,True)
		Trace("DateDeConsolidation="& DateDeConsolidation ,7)
		if DateTime.MinValue<>DateDeConsolidation then
			result(0)=true
		end if
	End If