Содержимое динамических параметров служб Reporting Services на основе других настроек параметров

Question

Можно ли в службах отчетов заполнять параметр на основе значения, выбранного в другом параметре? Мы рассчитываем заменить набор существующих отчетов на устаревшей платформе отчетов, которая делает это много.

Answer 1

Пожалуйста, укажите этот вопрос. Обновление параметров отчета на основе выбора параметров? (SSRS)

Answer 2

Открытая общая функция RemoveDuplicates (параметр как параметр) как строка () Затемнить элементы как объект () = параметр. Значение

    System.Array.Sort(items) 

    Dim k As Integer = 0

    For i As Integer = 0 To items.Length - 1
        If i > 0 AndAlso items(i).Equals(items(i - 1)) Then
            Continue For
        End If
    items(k) = items(i)
    k += 1
    Next

    Dim unique As [String]() = New [String](k - 1) {}
    System.Array.Copy(items, 0, unique, 0, k)
Return unique

Функция завершения

Открытая общая функция BuildList (ByVal variableName As String, ByVal paramValues ​​As Object ()) As String Dim insertStatements As New System.Text.StringBuilder () Для каждого paramValue как объекта в paramValues insertStatements.AppendLine (String.Format ("INSERT {0} VALUES ('{1}')", variableName, paramValue)) следующий Возврат insertStatements.ToString () Конечная функция

Открытая функция createLabel (ByVal месяц AS целое число, индекс ByVal AS целое число) AS строка Dim year AS Integer = Now.Year

If month <= 0 Then
    month   = month + 12
    year    = year - 1
End If

If month - index > 0 Then
    Return MonthName(month - index) & " " & year
Else 
    Return MonthName(month  + (12 - index)) & " " & year -1
End If

Функция завершения

Открытая функция createValue (ByVal месяц AS целое число, индекс ByVal AS целое число) AS строка Dim year AS Integer = Now.Year

If month <= 0 Then
    month   = month + 12
    year    = year - 1
End If


If month - index > 0 Then
    Return RIGHT("0" & month - index,2)  & year
Else 
    Return RIGHT("0" & month  + (12 - index),2)  & year -1
End If

Функция завершения