cebdff63-8609-4119-9275-e0643b844bb2SQL11inStringLocaleCodeIntegerStartIntegerEndStringPoolNameStringPoolIDStringParamLabelsStringParamValuesIntegerUTCOffsettrue8.5intrue1in1intrue8.25intrue0.125in0.25in=Code.GetLabel("LBL_VM_MOTION_HISTORY") + ": " + Parameters!PoolName.Value0.375intrue1inf036bf6b-97cc-4c92-956d-af76056f0e0b7.71indaySystem.DateTimehourSystem.StringidSystem.Int32vmnameSystem.Stringto_hostnameSystem.Stringfrom_hostnameSystem.Stringrecommendation_idSystem.Int32reasonSystem.Int32move_timeSystem.DateTimeKirkwoodDBConnectionStringtrueCloud Software Group
Function GetLabel(Label as String) as String
Dim i As Integer
Dim Names() As String
Dim Values() As String
Dim Param As Parameter = Report.Parameters!ParamLabels
Dim ParamVal As Parameter = Report.Parameters!ParamValues
Names = Split(Param.Value.ToString(), "|")
Values = Split(ParamVal.Value.ToString(), "|")
For i = 0 to Ubound(Names)
If (Names(i) = Label) Then Return Values(i)
Next i
Return Label
End Function
Function GetDateFromOffset(Offset as Integer) As String
Dim currentDate As DateTime = Now
Return DateAdd( "D", Offset, Now).ToShortDateString()
End Function
Function GetPageNumberText() As String
Dim strPageFormatString As String = String.Empty
strPageFormatString = System.String.Format(GetLabel("LBL_FOOTER_PAGE"), Report.Globals!PageNumber, Report.Globals!TotalPages)
Return strPageFormatString
End Function
8.5in