cebdff63-8609-4119-9275-e0643b844bb2SQL11inStringLocaleCodeIntegerStartIntegerEndStringPoolNameStringPoolIDStringParamLabelsStringParamValuesIntegerUTCOffsettrue8.5intrue1in1in1in582e21b6-6d20-45c8-85eb-4be746aa01dedaySystem.DateTimehourSystem.StringhostidSystem.Int32nameSystem.Stringstart_timeSystem.DateTimeavg_total_cpuSystem.Decimalavg_free_memSystem.Int64avg_total_pif_read_per_secSystem.Decimalavg_total_pif_write_per_secSystem.Decimaloptimized_movesSystem.Int32KirkwoodDBConnectionStringtrue
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.5inOutside0true5KirkwoodDBDataSetLocal3030Simple50158.375inPlain