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

Протокол испытаний: различия между версиями

Материал из Химсофт Вики
← Предыдущая правка
Sidminik (обсуждение | вклад)
Бюрократы, Администраторы интерфейса, Скрывающие, Администраторы
2323 правки
Нет описания правки
 
(не показано 40 промежуточных версий этого же участника)
Строка 1: Строка 1:
==Общий вид==
[[Файл:ng_3.png|center|border]]
==Параметры==
==Параметры==
В форме используются 10 фильтров параметров:
В форме используются 10 фильтров параметров:
Строка 29: Строка 33:
|-
|-
|}
|}
<div style="background-color: #fff3cd; border-left: 5px solid #ffc107; padding: 15px; margin: 10px 0;">
'''Внимание!'''
Также для фильтров п.7 и п.9 используются составные поля в DataSet, образующиеся с помощью функции [[Scripts#FormatFio()|<code>FormatFio()</code>]]:
<gallery mode="packed" heights="100px">
Файл:concat_filter_fields.png
</gallery>
</div>


==Атрибуты==
==Атрибуты==
Строка 34: Строка 47:
В таблице <code>ATTRIBUTE_NAME</code> используются атрибуты со следующими значениями <code>NAME</code>.
В таблице <code>ATTRIBUTE_NAME</code> используются атрибуты со следующими значениями <code>NAME</code>.


#В наборе данных <code>MainDataSet</code>:
{| width="100%" style="background:transparent;"
#*Цель проведения испытаний  
| width="50%" valign="top" |
#*Дата и время отбора пробы  
В наборе данных <code>MainDataSet</code>:
#*Номер акта отбора проб  
* Цель проведения испытаний  
#*Номер пробы  
* Дата и время отбора пробы  
#*Номер баллона  
* Номер акта отбора проб  
#*НД на отбор проб  
* Номер пробы  
#*Основние для испытаний  
* Номер баллона  
#*Примечание для протокола  
* НД на отбор проб  
#*Полное наименование
* Основние для испытаний  
#*Поставщик/Заказчик
* Примечание для протокола  
#В наборе данных <code>OrgInfoDataSet</code>:
* Полное наименование
#*Официальное наименование лаборатории
* Поставщик/Заказчик
#*Адрес
* Дата начала анализа
#*Телефоны
* Дата окончания анализа
#*Аттестат аккредитации
| width="50%" valign="top" |
В наборе данных <code>OrgInfoDataSet</code>:
* Официальное наименование лаборатории
* Адрес
* Телефоны
* Аттестат аккредитации
|}
 
<div style="background-color: #fff3cd; border-left: 5px solid #ffc107; padding: 15px; margin: 10px 0;">
'''Внимание!'''
 
Описание атрибутов приведено в соответствии с базой данных <code>ASTRA-PG13</code> на основе созданных пользователем полей.
 
В других базах этих полей может не быть либо их наименование может отличаться!!!
 
Отсутствующие в базе атрибуты не будут выводиться в документе. Для корректной работы документа актуализируйте атрибуты в соответствии с приведенным списком.
</div>


==Поля, данные, выражения, элементы интерфейса и код==
==Поля, данные, выражения, элементы интерфейса и код==
Строка 80: Строка 109:
<code style="background-color: #fff3e0;>Fields!filial_address.Value</code> >> <code style="background-color: #fff3e0;>filial_address /  OrgInfoDataSet</code> >> <code style="background-color: #fff3e0;>STRING_VALUE / COMPANY_LEVEL_ATTRIBUTE</code><br/>
<code style="background-color: #fff3e0;>Fields!filial_address.Value</code> >> <code style="background-color: #fff3e0;>filial_address /  OrgInfoDataSet</code> >> <code style="background-color: #fff3e0;>STRING_VALUE / COMPANY_LEVEL_ATTRIBUTE</code><br/>
<code style="background-color: #fff3e0;>Fields!filial_phone.Value</code> >> <code style="background-color: #fff3e0;>filial_phone /  OrgInfoDataSet</code> >> <code style="background-color: #fff3e0;>STRING_VALUE / COMPANY_LEVEL_ATTRIBUTE</code>
<code style="background-color: #fff3e0;>Fields!filial_phone.Value</code> >> <code style="background-color: #fff3e0;>filial_phone /  OrgInfoDataSet</code> >> <code style="background-color: #fff3e0;>STRING_VALUE / COMPANY_LEVEL_ATTRIBUTE</code>
|<syntaxhighlight lang="vb">=First(Fields!filial_address.Value, "OrgInfoDataSet") & ", тел\факс\эл.адрес: " & First(Fields!filial_phone.Value, "OrgInfoDataSet")</syntaxhighlight>
|<syntaxhighlight lang="vb">=First(Fields!filial_address.Value, "OrgInfoDataSet") & ", тел\факс\эл.адрес: " & First(Fields!filial_phone.Value, "OrgInfoDataSet") & First(Fields!email.Value, "OrgInfoDataSet")</syntaxhighlight>
|-
|-
|Аттестат аккредитации
|Аттестат аккредитации
Строка 115: Строка 144:
|-
|-
|3. Место отбора проб:
|3. Место отбора проб:
|<code style="background-color: #fff3e0;>Fields!sample_source.Value</code> >> <code style="background-color: #fff3e0;>sample_source /  MainDataSet</code> >> <code style="background-color: #fff3e0;>FULL_NAME / SAMPLE_SOURCE</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;>Fields!sample_source.Value</code> >> <code style="background-color: #fff3e0;>sample_source /  MainDataSet</code> >> <code style="background-color: #fff3e0;>FULL_NAME / SAMPLE_SOURCE</code>
|<syntaxhighlight lang="vb">="3. Место отбора проб: " & Fields!sample_source.Value</syntaxhighlight>
|<syntaxhighlight lang="vb">="3. Место отбора проб: " & Fields!sample_source.Value</syntaxhighlight>
|-
|-
Строка 121: Строка 151:
|<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: #d4edda;>Информация</code> >> <code style="background-color: #d4edda;>Дата и время отбора пробы</code>
<code style="background-color: #fff3e0;>Fields!date_value.Value</code> >> <code style="background-color: #fff3e0;>date_value /  MainDataSet</code> >> <code style="background-color: #fff3e0;>DATE_VALUE/ JOURNAL_RECORD_ATTRIBUTE</code>
<code style="background-color: #fff3e0;>Fields!date_value.Value</code> >> <code style="background-color: #fff3e0;>date_value /  MainDataSet</code> >> <code style="background-color: #fff3e0;>DATE_VALUE/ JOURNAL_RECORD_ATTRIBUTE</code>
|<syntaxhighlight lang="vb">="4. Дата и время отбора пробы: " & Format(Fields!date_value.Value, "dd.MM.yyyy") & ", " & Format(Fields!date_value.Value, "HH:mm")</syntaxhighlight>
|<syntaxhighlight lang="vb">="4. Дата и время отбора пробы: " & Format(Fields!date_value.Value, "dd.MM.yyyy; HH:mm")</syntaxhighlight>
|-
|-
|5. Номер акта отбора проб и номер баллона:
|5. Номер акта отбора проб и номер баллона:
Строка 150: Строка 180:
|-
|-
|10. Дата проведения испытания:
|10. Дата проведения испытания:
|
|<code style="background-color: #d4edda;>Лабораторные журналы</code> >> Выбрать подразделение >> Выбрать запись >> <code style="background-color: #d4edda;>Результаты</code> >> <code style="background-color: #d4edda;>Дата начала анализа</code> и <code style="background-color: #d4edda;>Дата окончания анализа</code>
|<syntaxhighlight lang="vb"></syntaxhighlight>
<code style="background-color: #fff3e0;>Fields!start_date.Value</code> >> <code style="background-color: #fff3e0;>start_date /  MainDataSet</code> >> <code style="background-color: #fff3e0;>DATE_VALUE / JOURNAL_RESULT_ATTRIBUTE</code><br>
<code style="background-color: #fff3e0;>Fields!end_date.Value</code> >> <code style="background-color: #fff3e0;>end_date /  MainDataSet</code> >> <code style="background-color: #fff3e0;>DATE_VALUE / JOURNAL_RESULT_ATTRIBUTE</code>
|<syntaxhighlight lang="vb">="10. Дата проведения испытания: " & IIF(Format(Fields!start_date.Value, "dd.MM.yyyy") = Format(Fields!end_date.Value, "dd.MM.yyyy"), Format(Fields!start_date.Value, "dd.MM.yyyy"), Format(Fields!start_date.Value, "dd.MM.yyyy") & " - " & Format(Fields!end_date.Value, "dd.MM.yyyy"))</syntaxhighlight>
|-
|-
|11. Примечание:
|11. Примечание:
|<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: #d4edda;>Информация</code> >> <code style="background-color: #d4edda;>Примечание для протокола</code>
<code style="background-color: #fff3e0;>Fields!note.Value</code> >> <code style="background-color: #fff3e0;>note /  MainDataSet</code> >> <code style="background-color: #fff3e0;>STRING_VALUE / JOURNAL_RECORD_ATTRIBUTE</code>
<code style="background-color: #fff3e0;>Fields!note.Value</code> >> <code style="background-color: #fff3e0;>note /  MainDataSet</code> >> <code style="background-color: #fff3e0;>STRING_VALUE / JOURNAL_RECORD_ATTRIBUTE</code>
|<syntaxhighlight lang="vb">="11. Примечание: " & Fields!note.Value</syntaxhighlight>
|<syntaxhighlight lang="vb">="11. Примечание: " & vbLF & Fields!note.Value</syntaxhighlight>
|-
|-
|12. Результаты проведения испытаний приведены в таблице
|12. Результаты проведения испытаний приведены в таблице
Строка 174: Строка 206:
|Наименование
|Наименование
|<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: #d4edda;>Карточка оборудования</code> >> <code style="background-color: #d4edda;>Наименование</code>  
|<syntaxhighlight lang="vb">=Fields!res_name.Value</syntaxhighlight>
<code style="background-color: #fff3e0;>Fields!res_name.Value</code> >> <code style="background-color: #fff3e0;>res_name / ResourcesDataSet</code> >> <code style="background-color: #fff3e0;>FULLNAME / RESOURCES</code>
|<syntaxhighlight lang="vb">=GetOrDash(Fields!res_name.Value)</syntaxhighlight>
|-
|-
|Тип обслуживания
|Тип обслуживания
|<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: #d4edda;>Основная форма</code> >> <code style="background-color: #d4edda;>Тип обслуживания</code>  
|<syntaxhighlight lang="vb">=Fields!res_service_type.Value</syntaxhighlight>
<code style="background-color: #fff3e0;>Fields!res_service_type.Value</code> >> <code style="background-color: #fff3e0;>res_service_type / ResourcesDataSet</code> >> <code style="background-color: #fff3e0;>NAME / RESOURCE_SERVICE_TYPE</code>
|<syntaxhighlight lang="vb">=GetOrDash(Fields!res_service_type.Value)</syntaxhighlight>
|-
|-
|Заводской номер
|Заводской номер
|<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: #d4edda;>Карточка оборудования</code> >> <code style="background-color: #d4edda;>Заводской номер</code>  
|<syntaxhighlight lang="vb">=Fields!res_number.Value</syntaxhighlight>
<code style="background-color: #fff3e0;>Fields!res_number.Value</code> >> <code style="background-color: #fff3e0;>res_number / ResourcesDataSet</code> >> <code style="background-color: #fff3e0;>FACTORY_NUMBER / RESOURCES</code>
|<syntaxhighlight lang="vb">=GetOrDash(Fields!res_number.Value)</syntaxhighlight>
|-
|-
|Сведения о поверке/аттестации
|Сведения о поверке/аттестации
|<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: #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>
|<syntaxhighlight lang="vb">=IIF(Fields!res_type.Value = "Средство измерений", "свидетельство о поверке № " & Fields!res_service_doc.Value & " до " & Format(Fields!res_service_date.Value, "dd.MM.yyyy", "номер документа об аттестации № ")</syntaxhighlight>
<code style="background-color: #fff3e0;>Fields!res_type.Value</code> >> <code style="background-color: #fff3e0;>res_type / ResourcesDataSet</code> >> <code style="background-color: #fff3e0;>NAME / RESOURCE_SERVICE_TYPE</code>
<code style="background-color: #fff3e0;>Fields!res_service_doc.Value</code> >> <code style="background-color: #fff3e0;>res_service_doc / ResourcesDataSet</code> >> <code style="background-color: #fff3e0;>SERVICE_DOCUMENT / RESOURCE_SERVICE</code>
<code style="background-color: #fff3e0;>Fields!res_service_date.Value</code> >> <code style="background-color: #fff3e0;>res_service_date / ResourcesDataSet</code> >> <code style="background-color: #fff3e0;>NEXT_DATE / RESOURCE_SERVICE</code>
|<syntaxhighlight lang="vb">=GetOrDash(IIF(Fields!res_type.Value = "Средство измерений", "свидетельство о поверке № " & Fields!res_service_doc.Value & " до " & Format(Fields!res_service_date.Value, "dd.MM.yyyy", "номер документа об аттестации № "))</syntaxhighlight>
|-
|-
|}
|}
Строка 198: Строка 236:
!Код и комментарии
!Код и комментарии
|-
|-
|Наименование показателя||-||<syntaxhighlight lang="vb">=Fields!ind_meth_name.Value</syntaxhighlight>
|Наименование показателя
|<code style="background-color: #d4edda;>Лабораторные журналы</code> >> Выбрать подразделение >> Выбрать запись <code style="background-color: #d4edda;>Результаты</code> >> <code style="background-color: #d4edda;>Показатель</code>
<code style="background-color: #fff3e0;>Fields!ind_meth_name.Value</code> >> <code style="background-color: #fff3e0;>ind_meth_name / ResultDataSet</code> >> <code style="background-color: #fff3e0;>INDICATOR_METHODOLOGY_NAME / METHODOLOGY_INDICATOR</code>
|<syntaxhighlight lang="vb">=Fields!ind_meth_name.Value</syntaxhighlight>
|-
|-
|Единица измерения||-||<syntaxhighlight lang="html">="<style>" + "body {font-family: 'Times New Roman', Times, serif; font-size: 10pt;  margin-top: 1px;  margin-right: 3px;  margin-bottom: 1px;  margin-left: 3px; text-align: center;}" + "</style>" + "<body>" + Fields!unit.Value + "</body>"</syntaxhighlight>
|Единица измерения
|<code style="background-color: #d4edda;>Лабораторные журналы</code> >> Выбрать подразделение >> Выбрать запись <code style="background-color: #d4edda;>Результаты</code> >> <code style="background-color: #d4edda;>Показатель</code>
<code style="background-color: #fff3e0;>Fields!unit.Value</code> >> <code style="background-color: #fff3e0;>unit / ResultDataSet</code> >> <code style="background-color: #fff3e0;>HTML_NAME / UNIT</code>
|<syntaxhighlight lang="html">="<style>" + "body {font-family: 'Times New Roman', Times, serif; font-size: 10pt;  margin-top: 1px;  margin-right: 3px;  margin-bottom: 1px;  margin-left: 3px; text-align: center;}" + "</style>" + "<body>" + Fields!unit.Value + "</body>"</syntaxhighlight>
|-
|-
|Метод испытания||-||<syntaxhighlight lang="vb">=Fields!norm_document.Value</syntaxhighlight>
|Метод испытания
|<code style="background-color: #d4edda;>Лабораторные журналы</code> >> Выбрать подразделение >> Выбрать запись <code style="background-color: #d4edda;>Результаты</code> >> <code style="background-color: #d4edda;>Методика анализа</code>
<code style="background-color: #fff3e0;>Fields!norm_document.Value</code> >> <code style="background-color: #fff3e0;>norm_document / ResultDataSet</code> >> <code style="background-color: #fff3e0;>NORMATIVE_DOCUMENT / METHODOLOGY</code>
|<syntaxhighlight lang="vb">=Fields!norm_document.Value</syntaxhighlight>
|-
|-
|Результат||-||<syntaxhighlight lang="vb">=ResultProcessing(Fields!result.Value, Fields!error.Value, Fields!alt_result.Value)</syntaxhighlight>
|Результат
|<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;>Fields!result.Value</code> >> <code style="background-color: #fff3e0;>result / ResultDataSet</code> >> <code style="background-color: #fff3e0;>AVG_R / JOURNAL_RESULT</code>
<code style="background-color: #fff3e0;>Fields!error.Value</code> >> <code style="background-color: #fff3e0;>error / ResultDataSet</code> >> <code style="background-color: #fff3e0;>AVG_R / JOURNAL_RESULT</code>
|<syntaxhighlight lang="vb">=ResultProcessing(Fields!result.Value, Fields!error.Value, Fields!alt_result.Value)</syntaxhighlight>
<syntaxhighlight lang="vb">
<syntaxhighlight lang="vb">
Public Function ResultProcessing(ByVal inputResult As String, ByVal inputError As String, ByVal inputAltResult As String) As String
Public Function ResultProcessing(ByVal inputResult As String, ByVal inputError As String, ByVal inputAltResult As String) As String
Строка 227: Строка 278:
|}
|}


===Завершающая часть===
===Последний блок===
{|class="wikitable" style="margin:auto; background-color: #fff;"  
{|class="wikitable" style="margin:auto; background-color: #fff;"  
|-
|-
Строка 235: Строка 286:
!Код и комментарии
!Код и комментарии
|-
|-
|rowspan="2"|Блок подписи 1||Подстановка должности из параметра <code>ReportParameterPosition_1.Value</code>||<syntaxhighlight lang="vb">=Parameters!ReportParameterPosition_1.Value</syntaxhighlight>
|Должность 1
|Подстановка должности из параметра <code>ReportParameterPosition_1.Value</code>
|<syntaxhighlight lang="vb">=Parameters!ReportParameterPosition_1.Value</syntaxhighlight>
|-
|ФИО 1
|<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;>Fields!surname_1.Value, Fields!name_1.Value, Fields!patronymic_1.Value</code> >> <code style="background-color: #fff3e0;>surname_1, name_1, patronymic_1 / FilterFioDataSet_1</code> >> <code style="background-color: #fff3e0;>SURNAME; NAME; PATRONYMIC / EMPLOYEE</code>
|<syntaxhighlight lang="vb">=FormatFio(Fields!surname_1.Value, Fields!name_1.Value, Fields!patronymic_1.Value, 2)</syntaxhighlight>
|-
|Должность 2
|Подстановка должности из параметра <code>ReportParameterPosition_2.Value</code>
|<syntaxhighlight lang="vb">=Parameters!ReportParameterPosition_2.Value</syntaxhighlight>
|-
|-
|Подстановка ФИО из параметра <code>ReportParameterFio_1.Value</code>||<syntaxhighlight lang="vb">=Parameters!ReportParameterFio_1.Value</syntaxhighlight>
|ФИО 2
|<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;>Fields!surname_2.Value, Fields!name_2.Value, Fields!patronymic_2.Value</code> >> <code style="background-color: #fff3e0;>surname_2, name_2, patronymic_2 / FilterFioDataSet_2</code> >> <code style="background-color: #fff3e0;>SURNAME; NAME; PATRONYMIC / EMPLOYEE</code>
|<syntaxhighlight lang="vb">=FormatFio(Fields!surname_2.Value, Fields!name_2.Value, Fields!patronymic_2.Value, 2)</syntaxhighlight>
|-
|-
|rowspan="2"|Блок подписи 2||Подстановка должности из параметра <code>ReportParameterPosition_2.Value</code>||<syntaxhighlight lang="vb">=Parameters!ReportParameterPosition_2.Value</syntaxhighlight>
|Дополнительная информация
|<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;>Fields!full_name.Value</code> >> <code style="background-color: #fff3e0;>full_name /  OrgInfoDataSet</code> >> <code style="background-color: #fff3e0;>FULL_NAME / COMPANY_LEVEL</code>
|<syntaxhighlight lang="vb">="Результаты испытаний, представленные в настоящем протоколе, относятся только к пробам, прошедшим испытания. Частичная перепечатка протокола и копирование без разрешения химико-аналитической лаборатории " & First(Fields!full_name.Value, "OrgInfoDataSet") & " не допускается"</syntaxhighlight>
|-
|-
|Подстановка ФИО из параметра <code>ReportParameterFio_1.Value</code>||<syntaxhighlight lang="vb">=Parameters!ReportParameterFio_2.Value</syntaxhighlight>
|}
 
<div style="background-color: #fff3cd; border-left: 5px solid #ffc107; padding: 15px; margin: 10px 0;">
'''Внимание!'''
 
В ячейках колонки "Метод испытаний" используются:
*<code>AutoMergeMode = True</code> - для объединения ячеек с одинаковым содержимым;
*<code>CanGrow = True</code> - для увеличения высоты ячеек в соответствии с количеством строк в ячейке; нежелательный эффект - все строки (даже объединенные!!!) имеют эту высоту, но если установить <code>false</code> - при малом количестве ячеек будут обрезаться строки в колонке "Метод испытаний".
 
Во всех строках с данными (<code>Details</code>) данной таблицы установлено свойство <code>KeepTogether = True</code>. Позволяет при короткой таблице переносить последнюю строку таблицы вместе с подписями (элемент - ''"подвал"'', <code>Table Footer</code>) на следующую страницу.  
</div>
 
===Нижний колонтитул===
{|class="wikitable" style="margin:auto; background-color: #fff;"
|-
|-
|Дополнительная информация||-||<syntaxhighlight lang="vb">="Результаты испытаний, представленные в настоящем протоколе, относятся только к пробам, прошедшим испытания. Частичная перепечатка протокола и копирование без разрешения химико-аналитической лаборатории " & First(Fields!full_name.Value, "OrgInfoDataSet") & " не допускается"</syntaxhighlight>
!Поля
!Интерфейс <code style="background-color: #d4edda;>...</code> >> <code style="background-color: #d4edda;>...</code>
и данные <code style="background-color: #fff3e0;>...</code> >> <code style="background-color: #fff3e0;>...</code>
!Код и комментарии
|-
|-
|Нижний колонтитул||-||<syntaxhighlight lang="vb">="Протокол испытаний № " & Parameters!ReportParameterNumber.Value & " от " & Parameters!ReportParameterDate.Value & " на " & Code.ReturnPageWithSuffix(Globals!TotalPages) & ", лист " & Globals!PageNumber</syntaxhighlight>
|Нижний колонтитул||-||<syntaxhighlight lang="vb">="Протокол испытаний № " & Parameters!ReportParameterNumber.Value & " от " & Parameters!ReportParameterDate.Value & " на " & Code.ReturnPageWithSuffix(Globals!TotalPages) & ", лист " & Globals!PageNumber</syntaxhighlight>
<syntaxhighlight lang="vb">
Public Function ReturnPageWithSuffix(ByVal resultPage As Long) As String
Dim resultString As String = resultPage.ToString()
If (resultPage > 20) Then
resultPage = resultPage Mod 10
End If
Select Case resultPage
Case 1
resultString &= $" листе"
Case Else
resultString &= $" листах"
End Select
Return resultString
End Function
</syntaxhighlight>
|-
|-
|}
|}
{{Navbox
|name = Блок документов
|state = collapsed
|title = Блок документов
|bodyclass = hlist
|group1 = Дизайнер документов
|list1 = child
| 1_group1 = Контролы
| 1_list1 =
* [[Текстовое поле|Текстовое поле]]
* [[Форматированный текст|Форматированный текст]]
* [[Таблица|Таблица]]
* [[Табликс|Табликс]]
| 1_group2 = Стандартные формы
| 1_list2 = {{Navbox|subgroup
| group1 = Персонал (картотека)
| list1 =
* [[Сведения о работниках лаборатории|Сведения о работниках лаборатории]]
* [[Общая информация о сотрудниках|Общая информация о сотрудниках]]
* [[Карточка персонального учета сотрудника|Карточка персонального учета сотрудника]]
* [[Информация об уволенных сотрудниках|Информация об уволенных сотрудниках]]
| group2 = Объекты анализа
| list2 =
* [[Информация по спискам показателей объектов и нормативов|Информация по спискам показателей объектов и нормативов]]
* [[Информация о нормах показателей|Информация о нормах показателей]]
| group3 = Методики анализа
| list3 =
* [[Приложение к аттестату аккредитации|Приложение к аттестату аккредитации]]
* [[Общая информация о методиках анализа|Общая информация о методиках анализа]]
* [[Полная информация о методике анализа|Полная информация о методике анализа]]
* [[Информация об использовании методик анализа в ЛЖ|Информация об использовании методик анализа в ЛЖ]]
| group4 = Формулы
| list4 =
* [[Полная информация по методам анализа (формулы)|Полная информация по методам анализа (формулы)]]
| group5 = Структура предприятия (лаборатории)
| list5 =
* [[Структура предприятия (всё дерево)|Структура предприятия (всё дерево)]]
* [[Карточка предприятия|Карточка предприятия]]
| group6 = Источники проб
| list6 =
* [[Структура источников (с выбором уровня)|Структура источников (с выбором уровня)]]
* [[Список мест выбранного типа|Список мест выбранного типа]]
* [[Информация о нормах в источниках проб|Информация о нормах в источниках проб]]
| group7 = Администрирование
| list7 =
* [[Информация о ролях и пользователях|Информация о ролях и пользователях]]
| group8 = Статистика
| list8 =
* [[Общая информация по БД|Общая информация по БД]]
* [[Расширенная статистика запусков|Расширенная статистика запусков]]
| group9 = Лабораторные журналы
| list9 =
* [[Сводный журнал регистрации проб|Сводный журнал регистрации проб]]
* [[Сводный журнал результатов анализов|Сводный журнал результатов анализов]]
* [[Журнал контроля окружающей среды|Журнал контроля окружающей среды]]
* [[Журнал на показатель (фотометрия)|Журнал на показатель (фотометрия)]]
* [[Журнал на показатель (фракционный состав)|Журнал на показатель (фракционный состав)]]
* [[Учет и анализ объемов внесенной информации|Учет и анализ объемов внесенной информации]]
* [[Протокол|Протокол]]
* [[Графическое изображение результатов|Графическое изображение результатов]]
}}
}}

Текущая версия от 10:07, 31 марта 2026

Общий вид

Параметры

В форме используются 10 фильтров параметров:

№ Параметр Тип поля Данные Сортировка
1 Выберите лабораторию: выбор значения лаборатории, имеющие записи в журналах по алфавиту
2 Выберите год: выбор значения года, в которых в лаборатории (п.1) вносились записи в журналах по убыванию
3 Выберите номер пробы: выбор значения дата отбора пробы за год (п.2) и номер отбора пробы для лаборатории (п.1) по убыванию даты
4 Введите номер протокола: ввод текста 1 (значение по умолчанию) -
5 Выводить сведения об оборудовании? выбор значения
  • Да - в протоколе испытаний будет выведена Таблица 1 "Сведения о применяемом оборудовании" (наименование, тип обслуживания, заводской номер и сведения о поверке/аттестации), при этом "Результаты испытаний" будут выведены в Таблице 2;
  • Нет - в протоколе испытаний "Сведения о применяемом оборудовании" выводится не будут; нумерация таблиц автоматически изменится и "Результаты испытаний" будут выведены в Таблице 1
 -
6 Должность сотрудника 1, подписывающего протокол: выбор значения должности лаборатории (п.1) по алфавиту
7 ФИО сотрудника 1, подписывающего протокол: выбор значения сотрудники, имеющие должность (п.6) по алфавиту
8 Должность сотрудника 2, подписывающего протокол: выбор значения должности лаборатории (п.1) по алфавиту
9 ФИО сотрудника 2, подписывающего протокол: выбор значения сотрудники, имеющие должность (п.6) по алфавиту
10 Укажите дату формирования протокола: поле-календарь текущая дата (значение по умолчанию) -

Внимание!

Также для фильтров п.7 и п.9 используются составные поля в DataSet, образующиеся с помощью функции FormatFio():

Атрибуты

В таблице ATTRIBUTE_NAME используются атрибуты со следующими значениями NAME.

В наборе данных MainDataSet:

  • Цель проведения испытаний
  • Дата и время отбора пробы
  • Номер акта отбора проб
  • Номер пробы
  • Номер баллона
  • НД на отбор проб
  • Основние для испытаний
  • Примечание для протокола
  • Полное наименование
  • Поставщик/Заказчик
  • Дата начала анализа
  • Дата окончания анализа

В наборе данных OrgInfoDataSet:

  • Официальное наименование лаборатории
  • Адрес
  • Телефоны
  • Аттестат аккредитации

Внимание!

Описание атрибутов приведено в соответствии с базой данных ASTRA-PG13 на основе созданных пользователем полей.

В других базах этих полей может не быть либо их наименование может отличаться!!!

Отсутствующие в базе атрибуты не будут выводиться в документе. Для корректной работы документа актуализируйте атрибуты в соответствии с приведенным списком.

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

Общая информация

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

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

Код и комментарии
Наименование организации Подразделения предприятия >> Наименование основного предприятия

Fields!head_org.Value >> head_org / OrgInfoDataSet >> SHORT_NAME / COMPANY_LEVEL 

=First(Fields!head_org.Value, "OrgInfoDataSet")
Наименование филиала Подразделения предприятия >> Развернуть >> Выбрать подразделение >> Редактировать >> Карточка подразделения >> Официальное наименование лаборатории

Fields!filial_name.Value >> filial_name / OrgInfoDataSet >> STRING_VALUE / COMPANY_LEVEL_ATTRIBUTE 

=First(Fields!filial_name.Value, "OrgInfoDataSet")
Наименование лаборатории Подразделения предприятия >> Развернуть >> Выбрать подразделение >> Редактировать >> Карточка подразделения >> Тип уровня

Fields!filial_type.Value >> filial_type / OrgInfoDataSet >> NAME / CATALOG_RECORD_TYPE 

=First(Fields!filial_type.Value, "OrgInfoDataSet")
Адрес, контакты Подразделения предприятия >> Развернуть >> Выбрать подразделение >> Редактировать >> Карточка подразделения >> Адрес и Телефоны

Fields!filial_address.Value >> filial_address / OrgInfoDataSet >> STRING_VALUE / COMPANY_LEVEL_ATTRIBUTE
Fields!filial_phone.Value >> filial_phone / OrgInfoDataSet >> STRING_VALUE / COMPANY_LEVEL_ATTRIBUTE 

=First(Fields!filial_address.Value, "OrgInfoDataSet") & ", тел\факс\эл.адрес: " & First(Fields!filial_phone.Value, "OrgInfoDataSet") & First(Fields!email.Value, "OrgInfoDataSet")
Аттестат аккредитации Подразделения предприятия >> Развернуть >> Выбрать подразделение >> Редактировать >> Карточка подразделения >> Аттестат аккредитации

Fields!filial_certificate.Value >> filial_certificate / OrgInfoDataSet >> VALUE / LONGTEXT_STORAGE 

="Аттестат аккредитации " & First(Fields!filial_certificate.Value, "OrgInfoDataSet")
Заголовок ПРОТОКОЛ ИСПЫТАНИЙ
Номер и дата протокола Подстановка номера из параметра ReportParameterNumber и даты из параметра ReportParameterDate 
="№ " & Parameters!ReportParameterNumber.Value & " от " & Parameters!ReportParameterDate.Value

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

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

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

Код и комментарии
1. Наименование объекта испытаний: Объекты анализа >> Выбрать объект >> Редактировать >> Карточка объекта анализа >> Полное наименование

Fields!ao_full_name.Value >> ao_full_name / MainDataSet >> STRING_VALUE / JOURNAL_RECORD_ATTRIBUTE 

="1. Наименование объекта испытаний: " & Fields!ao_full_name.Value
2. Цель испытаний: Лабораторные журналы >> Выбрать подразделение >> Выбрать запись >> Редактировать >> Журнал регистрации проб и результатов испытаний >> Информация >> Цель проведения испытаний

Fields!target.Value >> target / MainDataSet >> STRING_VALUE / JOURNAL_RECORD_ATTRIBUTE 

="2. Цель испытаний: " &  Fields!target.Value
3. Место отбора проб: Лабораторные журналы >> Журнал регистрации проб и испытаний >> Выбрать пробу >> Редактировать >> Карточка пробы >> Источник >> Выбранный источник

Fields!sample_source.Value >> sample_source / MainDataSet >> FULL_NAME / SAMPLE_SOURCE 

="3. Место отбора проб: " & Fields!sample_source.Value
4. Дата и время отбора пробы: Лабораторные журналы >> Выбрать подразделение >> Выбрать запись >> Редактировать >> Журнал регистрации проб и результатов испытаний >> Информация >> Дата и время отбора пробы

Fields!date_value.Value >> date_value / MainDataSet >> DATE_VALUE/ JOURNAL_RECORD_ATTRIBUTE 

="4. Дата и время отбора пробы: " & Format(Fields!date_value.Value, "dd.MM.yyyy; HH:mm")
5. Номер акта отбора проб и номер баллона: Лабораторные журналы >> Выбрать подразделение >> Выбрать запись >> Редактировать >> Журнал регистрации проб и результатов испытаний >> Информация >> Номер акта отбора проб и Номер баллона

Fields!act_num.Value >> act_num / MainDataSet >> STRING_VALUE / JOURNAL_RECORD_ATTRIBUTE
Fields!num_ballon.Value >> num_ballon / MainDataSet >> STRING_VALUE / JOURNAL_RECORD_ATTRIBUTE 

="5. Номер акта отбора проб и номер баллона: " & Fields!act_num.Value & ", " & Fields!num_ballon.Value
6. НД на отбор проб: Лабораторные журналы >> Выбрать подразделение >> Выбрать запись >> Редактировать >> Журнал регистрации проб и результатов испытаний >> Информация >> НД на отбор проб

Fields!doc_sample.Value >> doc_sample / MainDataSet >> STRING_VALUE / JOURNAL_RECORD_ATTRIBUTE 

="6. НД на отбор проб: " & Fields!doc_sample.Value
7. Шифр пробы: Лабораторные журналы >> Выбрать подразделение >> Выбрать запись >> Редактировать >> Журнал регистрации проб и результатов испытаний >> Информация >> Номер пробы

Fields!code.Value >> code / MainDataSet >> STRING_VALUE / JOURNAL_RECORD_ATTRIBUTE 

="7. Шифр пробы: " & Fields!code.Value
8. Заказчик: Лабораторные журналы >> Выбрать подразделение >> Выбрать запись >> Редактировать >> Журнал регистрации проб и результатов испытаний >> Информация >> Поставщик/Заказчик

Fields!supplier_customer.Value >> supplier_customer / MainDataSet >> STRING_VALUE / JOURNAL_RECORD_ATTRIBUTE 

="8. Заказчик: " & First(Fields!head_org.Value, "OrgInfoDataSet")
9. Основание для испытаний: Лабораторные журналы >> Выбрать подразделение >> Выбрать запись >> Редактировать >> Журнал регистрации проб и результатов испытаний >> Информация >> Основание для испытаний

Fields!basis.Value >> basis / MainDataSet >> STRING_VALUE / JOURNAL_RECORD_ATTRIBUTE 

="9. Основание для испытаний: " & Fields!basis.Value
10. Дата проведения испытания: Лабораторные журналы >> Выбрать подразделение >> Выбрать запись >> Результаты >> Дата начала анализа и Дата окончания анализа

Fields!start_date.Value >> start_date / MainDataSet >> DATE_VALUE / JOURNAL_RESULT_ATTRIBUTE
Fields!end_date.Value >> end_date / MainDataSet >> DATE_VALUE / JOURNAL_RESULT_ATTRIBUTE 

="10. Дата проведения испытания: " & IIF(Format(Fields!start_date.Value, "dd.MM.yyyy") = Format(Fields!end_date.Value, "dd.MM.yyyy"), Format(Fields!start_date.Value, "dd.MM.yyyy"), Format(Fields!start_date.Value, "dd.MM.yyyy") & " - " & Format(Fields!end_date.Value, "dd.MM.yyyy"))
11. Примечание: Лабораторные журналы >> Выбрать подразделение >> Выбрать запись >> Редактировать >> Журнал регистрации проб и результатов испытаний >> Информация >> Примечание для протокола

Fields!note.Value >> note / MainDataSet >> STRING_VALUE / JOURNAL_RECORD_ATTRIBUTE 

="11. Примечание: " & vbLF & Fields!note.Value
12. Результаты проведения испытаний приведены в таблице Значение номера таблицы зависит от выбора параметра Parameters!ReportParameterDevice.Value 
="12. Результаты проведения испытаний приведены в таблице " & IIF(Parameters!ReportParameterDevice.Value = False, 2, 1)

Сведения о применяемом оборудовании

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

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

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

Fields!res_name.Value >> res_name / ResourcesDataSet >> FULLNAME / RESOURCES 

=GetOrDash(Fields!res_name.Value)
Тип обслуживания Ресурсы >> Обслуживание оборудования >> Выбор записи >> Редактировать >> Основная форма >> Тип обслуживания

Fields!res_service_type.Value >> res_service_type / ResourcesDataSet >> NAME / RESOURCE_SERVICE_TYPE 

=GetOrDash(Fields!res_service_type.Value)
Заводской номер Ресурсы >> Оборудование >> Выбор записи >> Редактировать >> Карточка оборудования >> Заводской номер

Fields!res_number.Value >> res_number / ResourcesDataSet >> FACTORY_NUMBER / RESOURCES 

=GetOrDash(Fields!res_number.Value)
Сведения о поверке/аттестации Ресурсы >> Обслуживание оборудования >> Выбор записи >> Редактировать >> Основная форма >> Тип обслуживания, и Номер документа, и Дата след

Fields!res_type.Value >> res_type / ResourcesDataSet >> NAME / RESOURCE_SERVICE_TYPE Fields!res_service_doc.Value >> res_service_doc / ResourcesDataSet >> SERVICE_DOCUMENT / RESOURCE_SERVICE Fields!res_service_date.Value >> res_service_date / ResourcesDataSet >> NEXT_DATE / RESOURCE_SERVICE 

=GetOrDash(IIF(Fields!res_type.Value = "Средство измерений", "свидетельство о поверке № " & Fields!res_service_doc.Value & " до " & Format(Fields!res_service_date.Value, "dd.MM.yyyy", "номер документа об аттестации № "))

Результаты испытаний

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

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

Код и комментарии
Наименование показателя Лабораторные журналы >> Выбрать подразделение >> Выбрать запись Результаты >> Показатель

Fields!ind_meth_name.Value >> ind_meth_name / ResultDataSet >> INDICATOR_METHODOLOGY_NAME / METHODOLOGY_INDICATOR 

=Fields!ind_meth_name.Value
Единица измерения Лабораторные журналы >> Выбрать подразделение >> Выбрать запись Результаты >> Показатель

Fields!unit.Value >> unit / ResultDataSet >> 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; text-align: center;}" + "</style>" + "<body>" + Fields!unit.Value + "</body>"
Метод испытания Лабораторные журналы >> Выбрать подразделение >> Выбрать запись Результаты >> Методика анализа

Fields!norm_document.Value >> norm_document / ResultDataSet >> NORMATIVE_DOCUMENT / METHODOLOGY 

=Fields!norm_document.Value
Результат Лабораторные журналы >> Выбрать подразделение >> Выбрать запись Результаты >> Результат и Показатель точности

Fields!result.Value >> result / ResultDataSet >> AVG_R / JOURNAL_RESULT Fields!error.Value >> error / ResultDataSet >> AVG_R / JOURNAL_RESULT 

=ResultProcessing(Fields!result.Value, Fields!error.Value, Fields!alt_result.Value)

Public Function ResultProcessing(ByVal inputResult As String, ByVal inputError As String, ByVal inputAltResult As String) As String
	If (inputResult = "") Then
		Return "-"
	End If
	
	Dim finalStr As String = inputResult
	
	If inputError <> "" And inputError <> "0" Then
		finalStr = finalStr & " ± " & inputError
	End If
	
	If inputAltResult <> "" And inputAltResult <> "0" Then
		finalStr = finalStr & vbLf & "(" & inputAltResult & ")"
	End If
	
	Return finalStr
End Function

Последний блок

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

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

Код и комментарии
Должность 1 Подстановка должности из параметра ReportParameterPosition_1.Value 
=Parameters!ReportParameterPosition_1.Value
ФИО 1 Персонал >> Выбрать запись >> Карточка сотрудника >> Фамилия; Имя; Отчество

Fields!surname_1.Value, Fields!name_1.Value, Fields!patronymic_1.Value >> surname_1, name_1, patronymic_1 / FilterFioDataSet_1 >> SURNAME; NAME; PATRONYMIC / EMPLOYEE 

=FormatFio(Fields!surname_1.Value, Fields!name_1.Value, Fields!patronymic_1.Value, 2)
Должность 2 Подстановка должности из параметра ReportParameterPosition_2.Value 
=Parameters!ReportParameterPosition_2.Value
ФИО 2 Персонал >> Выбрать запись >> Карточка сотрудника >> Фамилия; Имя; Отчество

Fields!surname_2.Value, Fields!name_2.Value, Fields!patronymic_2.Value >> surname_2, name_2, patronymic_2 / FilterFioDataSet_2 >> SURNAME; NAME; PATRONYMIC / EMPLOYEE 

=FormatFio(Fields!surname_2.Value, Fields!name_2.Value, Fields!patronymic_2.Value, 2)
Дополнительная информация Подразделения предприятия >> Развернуть >> Выбрать подразделение >> Карточка подразделения >> Полное наименование

Fields!full_name.Value >> full_name / OrgInfoDataSet >> FULL_NAME / COMPANY_LEVEL 

="Результаты испытаний, представленные в настоящем протоколе, относятся только к пробам, прошедшим испытания. Частичная перепечатка протокола и копирование без разрешения химико-аналитической лаборатории " & First(Fields!full_name.Value, "OrgInfoDataSet") & " не допускается"

Внимание!

В ячейках колонки "Метод испытаний" используются:

  • AutoMergeMode = True - для объединения ячеек с одинаковым содержимым;
  • CanGrow = True - для увеличения высоты ячеек в соответствии с количеством строк в ячейке; нежелательный эффект - все строки (даже объединенные!!!) имеют эту высоту, но если установить false - при малом количестве ячеек будут обрезаться строки в колонке "Метод испытаний".

Во всех строках с данными (Details) данной таблицы установлено свойство KeepTogether = True. Позволяет при короткой таблице переносить последнюю строку таблицы вместе с подписями (элемент - "подвал", Table Footer) на следующую страницу.

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

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

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

Код и комментарии
Нижний колонтитул - 
="Протокол испытаний № " & Parameters!ReportParameterNumber.Value & " от " & Parameters!ReportParameterDate.Value & " на " & Code.ReturnPageWithSuffix(Globals!TotalPages) & ", лист " & Globals!PageNumber

Public Function ReturnPageWithSuffix(ByVal resultPage As Long) As String
	Dim resultString As String = resultPage.ToString()
	
	If (resultPage > 20) Then
		resultPage = resultPage Mod 10
	End If
	
	Select Case resultPage
		Case 1
			resultString &= $" листе"
		Case Else
			resultString &= $" листах"
	End Select
	
	Return resultString
End Function
Источник — https://wiki.chemsoft.ru/index.php?title=Протокол_испытаний&oldid=2324