Перейти к содержанию

Информация о нормах показателей: различия между версиями

Материал из Химсофт Вики
 
(не показано 8 промежуточных версий этого же участника)
Строка 1: Строка 1:
==Общий вид==
[[Файл:oa_2.png|center|border]]
==Параметры==
==Параметры==


Строка 29: Строка 33:
|-
|-
|Название лаборатории
|Название лаборатории
|<code>Parameters!ReportParameterLaboratory.Value</code>
|<code>Parameters!ReportParameterLaboratory.Label</code>
|<syntaxhighlight lang="vb">=Parameters!ReportParameterLaboratory.Value</syntaxhighlight>
|<syntaxhighlight lang="vb">=Parameters!ReportParameterLaboratory.Label</syntaxhighlight>
|-
|-
|Владелец версии
|Владелец версии
Строка 39: Строка 43:


===Заголовок===
===Заголовок===
{|class="wikitable" style="margin:auto; background-color: #fff;"  
{|class="wikitable" style="margin:auto; background-color: #fff; width: 100%;"  
|-
|-
!Поля
!Поля
Строка 45: Строка 49:
и данные <code style="background-color: #fff3e0;>...</code> >> <code style="background-color: #fff3e0;>...</code>
и данные <code style="background-color: #fff3e0;>...</code> >> <code style="background-color: #fff3e0;>...</code>
!Код и комментарии
!Код и комментарии
|-
|colspan = "3"|Информация о нормах показателей
|-
|-
|Текущая дата  
|Текущая дата  
Строка 83: Строка 89:
|<code style="background-color: #d4edda;>Объекты анализа</code> >> Выбрать объект >> <code style="background-color: #d4edda;>Редактировать</code> >> <code style="background-color: #d4edda;>Показатели</code> >> <code style="background-color: #d4edda;>Группы</code>
|<code style="background-color: #d4edda;>Объекты анализа</code> >> Выбрать объект >> <code style="background-color: #d4edda;>Редактировать</code> >> <code style="background-color: #d4edda;>Показатели</code> >> <code style="background-color: #d4edda;>Группы</code>
<code style="background-color: #fff3e0;>LABEL</code> >> <code style="background-color: #fff3e0;>NAME</code> >> <code style="background-color: #fff3e0;>label_names</code>
<code style="background-color: #fff3e0;>LABEL</code> >> <code style="background-color: #fff3e0;>NAME</code> >> <code style="background-color: #fff3e0;>label_names</code>
|<code>=Fields!label_names.Value</code>
|
<syntaxhighlight lang="vb">
=GetOrDash(Fields!label_names.Value)
</syntaxhighlight>
используется функция [[Scripts#GetOrDash()|<code>GetOrDash()</code>]]
|-
|-
|Наименование нормы
|Наименование нормы
Строка 90: Строка 100:
|
|
<syntaxhighlight lang="vb">
<syntaxhighlight lang="vb">
=IIF(IsNothing(Fields!norm_name.Value), "-", Fields!norm_name.Value)
=GetOrDash(Fields!norm_name.Value)
</syntaxhighlight>
</syntaxhighlight>
используется функция [[Scripts#GetOrDash()|<code>GetOrDash()</code>]]
|-
|-
|Нормы для количественного показателя - Норма
|Нормы для количественного показателя - Норма
Строка 98: Строка 109:
|
|
<syntaxhighlight lang="vb">
<syntaxhighlight lang="vb">
=IIF(IsNothing(Fields!up_limit.Value) And IsNothing(Fields!low_limit.Value), "-",     IIF(Not IsNothing(Fields!up_limit.Value), "не более " & Fields!up_limit.Value, "") &    IIF(Not IsNothing(Fields!up_limit.Value) And Not IsNothing(Fields!low_limit.Value), vbLf, "") &    IIF(Not IsNothing(Fields!low_limit.Value), "не менее " & Fields!low_limit.Value, ""))
=GetOrDash(GetNorms(Fields!low_limit.Value, Fields!up_limit.Value))
</syntaxhighlight>
</syntaxhighlight>
<syntaxhighlight lang="vb">
Public Function GetNorms(lowLimit As Double, upLimit As Double) As String
If upLimit <> 0 Then
Return "не менее " & lowLimit & vbLF & "не более " & upLimit
End If
If lowLimit <> 0 Then
Return "не менее " & lowLimit
End If
   
Return ""
End Function
</syntaxhighlight>
используются функции:
*[[Scripts#GetOrDash()|<code>GetOrDash()</code>]]
|-
|-
|Нормы для количественного показателя - Округление
|Нормы для количественного показателя - Округление
Строка 106: Строка 132:
|
|
<syntaxhighlight lang="vb">
<syntaxhighlight lang="vb">
=IIF(IsNothing(Fields!limit_scale.Value), "-", Fields!limit_scale.Value)
=GetOrDash(Fields!limit_scale.Value)
</syntaxhighlight>
</syntaxhighlight>
используется функция [[Scripts#GetOrDash()|<code>GetOrDash()</code>]]
|-
|-
|Нормы для количественного показателя - Текстовое представление
|Нормы для количественного показателя - Текстовое представление
Строка 114: Строка 141:
|
|
<syntaxhighlight lang="vb">
<syntaxhighlight lang="vb">
=IIF(IsNothing(Fields!text_name.Value), "-", Fields!text_name.Value)
=GetOrDash(Fields!text_name.Value)
</syntaxhighlight>
</syntaxhighlight>
используется функция [[Scripts#GetOrDash()|<code>GetOrDash()</code>]]
|-
|-
|Нормы для качественного показателя - Значение
|Нормы для качественного показателя - Значение
Строка 126: Строка 154:
|-
|-
|}
|}
<div style="background-color: #e7f3ff; border-left: 5px solid #2196f3; padding: 15px; margin: 10px 0;">
'''Для вывода основной информации также использовались:'''
*[[Таблица#Группировка данных таблицы|Группировка данных таблицы]]
*[[Таблица#Объединение соседних ячеек с одинаковыми значениями|Объединение соседних ячеек с одинаковыми значениями]]
*[[Текстовое поле#Выравнивание текста по условию|Выравнивание текста по условию]]
</div>


===Нижний колонтитул===
===Нижний колонтитул===

Текущая версия от 00:56, 2 апреля 2026

Общий вид

Параметры

Параметр Тип поля Данные Сортировка
1 Выберите лабораторию: выбор значения лаборатории, имеющие объекты анализа по алфавиту

Поля, данные, выражения, элементы интерфейса и код

Верхний колонтитул

Поля Интерфейс ... >> ...

и данные ... >> ...

Код и комментарии
Название лаборатории Parameters!ReportParameterLaboratory.Label
=Parameters!ReportParameterLaboratory.Label
Владелец версии Code.Globals.GetVersionOwner()
="Владелец версии: " & Code.Globals.GetVersionOwner()

Заголовок

Поля Интерфейс ... >> ...

и данные ... >> ...

Код и комментарии
Информация о нормах показателей
Текущая дата Today.ToString("dd.MM.yyyy")
="По состоянию на: " & Today.ToString("dd.MM.yyyy")

Основная информация

Поля Интерфейс ... >> ...

и данные ... >> ...

Код и комментарии
№ п/п -
=GroupIndex("AO_Group") + 1 & "." & GroupIndex("Indicator_Group") +1
Наименование показателя Объекты анализа >> Выбрать объект >> Редактировать >> Показатели >> Наименование

INDICATOR >> NAME >> i_name

=Fields!i_name.Value
Ед. изм. Объекты анализа >> Выбрать объект >> Редактировать >> Показатели >> Единицы измерения

INDICATOR_UNIT >> HTML_NAME >> unit

="<style>" + "body {font-family: 'Times New Roman', Times, serif; font-size: 10pt;  margin-top: 1px;  margin-right: 3px;  margin-bottom: 1px;  margin-left: 3px;}" + "</style>" + "<body>" + Fields!unit.Value + "</body>"
Группы Объекты анализа >> Выбрать объект >> Редактировать >> Показатели >> Группы

LABEL >> NAME >> label_names

=GetOrDash(Fields!label_names.Value)

используется функция GetOrDash()

Наименование нормы Объекты анализа >> Выбрать объект >> Редактировать >> Выбрать объект >> Нормы >> Наименование

QUANTITATIVE_NORM >> NAME >> norm_name

=GetOrDash(Fields!norm_name.Value)

используется функция GetOrDash()

Нормы для количественного показателя - Норма Объекты анализа >> Выбрать объект >> Редактировать >> Выбрать объект >> Нормы >> Нижний предел;Верхний предел

QUANTITATIVE_NORM >> LOWER_LIMIT;UPPER_LIMIT >> low_limit;up_limit

=GetOrDash(GetNorms(Fields!low_limit.Value, Fields!up_limit.Value))
Public Function GetNorms(lowLimit As Double, upLimit As Double) As String
	If upLimit <> 0 Then
		Return "не менее " & lowLimit & vbLF & "не более " & upLimit
	End If
	
	If lowLimit <> 0 Then
		Return "не менее " & lowLimit
	End If
    
	Return ""
End Function

используются функции:

Нормы для количественного показателя - Округление Объекты анализа >> Выбрать объект >> Редактировать >> Выбрать объект >> Нормы >> Округление

QUANTITATIVE_NORM >> LIMIT_SCALE >> limit_scale

=GetOrDash(Fields!limit_scale.Value)

используется функция GetOrDash()

Нормы для количественного показателя - Текстовое представление Объекты анализа >> Выбрать объект >> Редактировать >> Выбрать объект >> Нормы >> Текстовое представление

QUANTITATIVE_NORM >> NORM_DOC_INDICATOR_NAME >> text_name

=GetOrDash(Fields!text_name.Value)

используется функция GetOrDash()

Нормы для качественного показателя - Значение - -
Нормы для качественного показателя - Критерий соответствия - -

Нижний колонтитул

Поля Интерфейс ... >> ...

и данные ... >> ...

Код и комментарии
Имя программы Code.Globals.GetProgramName()
=Code.Globals.GetProgramName()
Нумерация страниц Номер страницы Globals!PageNumber и всего страниц Globals!TotalPages
="Страница " & Globals!PageNumber & " из " & Globals!TotalPages