Показать сообщение отдельно
Старый 26.11.2007, 09:15   #8  
Артем Enot Грунин is offline
Артем Enot Грунин
Moderator
Аватар для Артем Enot Грунин
MCBMSS
Злыдни
Most Valuable Professional
Лучший по профессии 2017
Лучший по профессии 2015
Лучший по профессии 2014
Лучший по профессии AXAWARD 2013
Лучший по профессии 2011
Лучший по профессии 2009
 
3,912 / 623 (28) +++++++
Регистрация: 16.08.2007
Адрес: Пермь!
Записей в блоге: 151
Thumbs up
Пост старый и никого, кроме меня, похоже эта проблема не волнует , но все же решил поделиться своим открытием... Нормальную шапку отчета все же можно выводить!
В студии, в свойствах отчета: меню Report -> Report Properties. Есть такая вкладка Code. Сюда можно поместить свой код, причем не на скрипотвых языках, а на полноценном Visual Basic .NET (если конечно считать этот язык полноценным). Вот таким кодом, например, можно выковыривать свои параметры из строки фильтра:

Код:
    Const defaultVal As String = "Не указано"
    Const backspace As Char = Chr(10)
    Const newline As Char = Chr(13)
    Const space As Char = Chr(32)

    Function getParameter(ByVal filterText As String, ByVal className As String, ByVal attributeName As String, ByVal expression As String) As String
        Dim result As String = defaultVal
        Dim pos As Integer = filterText.IndexOf(className, StringComparison.OrdinalIgnoreCase)
        If (pos <> -1) Then
            pos = filterText.IndexOf(attributeName, pos + className.Length, StringComparison.OrdinalIgnoreCase)
            If (pos <> -1) Then
                pos = filterText.IndexOf(expression, pos + attributeName.Length, StringComparison.OrdinalIgnoreCase)
                If (pos <> -1) Then
                    Dim startPos As Integer = pos + expression.Length
                    pos = filterText.IndexOf(Chr(10), pos + expression.Length)
                    result = filterText.Substring(startPos, pos - startPos).Trim(New Char() {backspace, newline, space})
                End If
            End If
        End If
        Return result
    End Function
Далее вызываем его из полей отчета:
Code.GetParameter(Parameters!CRM_FilterText.Value, "Заказ", "Дата создания", "в указанную дату или ранее")

Достаточно удобное и простое решение. Есть тем не менее и более правильный способ: есть возможность создать и использовать в любом отчете целую библиотеку с любыми удобными для вас функциями и константами! Кроме того, так вам будет доступна вся мощь .NET и снимается ограничение на кодирование только на Basic. Я пошел именно этой дорогой.
Короече, если кому-то интересно подробнее об этом можно узнать тут:

http://msdn2.microsoft.com/ru-ru/library/ms155798.aspx
http://msdn2.microsoft.com/en-us/library/ms153561.aspx
http://msdn2.microsoft.com/en-us/library/ms155034.aspx
http://www.microsoft.com/Rus/Msdn/pu...RSCstCode.mspx Если что, спрашивайте.

Последний раз редактировалось Артем Enot Грунин; 26.11.2007 в 09:22.
За это сообщение автора поблагодарили: Roman08 (1).