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

Протокол испытаний (вода)

Материал из Химсофт Вики

Общий вид

Page1

Page2

Параметры

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

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

Внимание!

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

Атрибуты

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

  • Полное наименование
  • Юридический адрес

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

  • Официальное наименование лаборатории
  • Место осуществления деятельности
  • Контактные данные
  • Аттестат аккредитации

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

  • Заказчик
  • Контактные данные заказчика
  • Юридический адрес заказчика
  • Фактический адрес заказчика
  • Основание для отбора проб
  • План отбора
  • Метод отбора проб
  • № акта
  • Дата, время отбора
  • Дата поступления пробы
  • Шифр пробы
  • Дата анализа

В наборах данных FilterYearDataSet, FilterMonthDataSet и FilterNumAndDateDataSet в таблице ATTRIBUTE_NAME используются атрибуты со следующими значениями NAME:

  • № акта
  • Дата, время отбора

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

  • Шифр пробы
  • № акта
  • Дата, время отбора

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

  • Шифр пробы
  • № акта
  • Дата, время отбора
  • Оборудование 1
  • Оборудование 2

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

  • № акта
  • Дата, время отбора
  • Отклонения, дополнения или исключения из МИ
  • Условия проведения исследований

Внимание!

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

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

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

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

Информация об организации

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

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

Код и комментарии
Полное наименование головной организации Подразделения предприятия >> Выбрать основное предприятие >> Редактировать >> Карточка подразделения >> Дополнительная информация >> Полное наименование

Fields!full_name.Value >> full_name / HeadOrgInfoDataSet >> STRING_VALUE / COMPANY_LEVEL_ATTRIBUTE 

=First(Fields!full_name.Value)
Краткое наименование головной организации Подразделения предприятия >> Выбрать основное предприятие >> Редактировать >> Карточка подразделения >> Краткое наименование

Fields!short_name.Value >> short_name / HeadOrgInfoDataSet >> SHORT_NAME / COMPANY_LEVEL 

="(" & First(Fields!short_name.Value) & ")"
Юридический адрес головной организации Подразделения предприятия >> Выбрать основное предприятие >> Редактировать >> Карточка подразделения >> Дополнительная информация >> Юридический адрес

Fields!registered_address.Value >> registered_address / HeadOrgInfoDataSet >> STRING_VALUE / COMPANY_LEVEL_ATTRIBUTE 

=First(Fields!registered_address.Value)
Официальное наименование лаборатории Подразделения предприятия >> + >> Выбрать предприятие >> Редактировать >> Карточка подразделения >> Дополнительная информация >> Официальное наименование лаборатории

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

=First(Fields!official_name.Value)
Полное наименование лаборатории Подразделения предприятия >> + >> Выбрать предприятие >> Редактировать >> Карточка подразделения >> Полное наименование

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

=First(Fields!full_name.Value)
Адрес места осуществления лабораторной деятельности Подразделения предприятия >> + >> Выбрать предприятие >> Редактировать >> Карточка подразделения >> Дополнительная информация >> Место осуществления деятельности

Fields!place_activity.Value, Fields!contacts.Value >> place_activity, contacts / OrgInfoDataSet >> STRING_VALUE / COMPANY_LEVEL_ATTRIBUTE 

="Адрес места осуществления лабораторной деятельности: " & ConcatFields(vbLF, Fields!place_activity.Value, Fields!contacts.Value)
Сведения об аккредитации Подразделения предприятия >> + >> Выбрать предприятие >> Редактировать >> Карточка подразделения >> Дополнительная информация >> Аттестат аккредитации

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

="Уникальный номер записи в реестре аккредитованных лиц Национальной системы аккредитации " & Fields!attestat.Value

Блок утверждения

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

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

Код и комментарии
Должность Персонал >> Выбрать запись >> Карточка сотрудника >> Должность

Fields!position.Value >> position / FilterDataSetFio >> SURNAME; NAME; PATRONYMIC / EMPLOYEE 

=First(Fields!position.Value)
И.О. Фамилия Персонал >> Выбрать запись >> Карточка сотрудника >> Фамилия; Имя; Отчество

Fields!surname.Value, Fields!name.Value, Fields!patronimyc.Value >> surname, name, patronimyc / FilterDataSetFio >> SURNAME; NAME; PATRONYMIC / EMPLOYEE 

=FormatFio(Fields!surname.Value, Fields!name.Value, Fields!patronimyc.Value, 2)
Дата Parameters!ReportParameterDate.Value 
=Format(Parameters!ReportParameterDate.Value, "dd.MM.yyyy")

Общие данные протокола исследований

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

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

Код и комментарии
Заголовок 
="ПРОТОКОЛ ИССЛЕДОВАНИЙ № " & Parameters!ReportParameterProtocolNum.Value & " от " & Parameters!ReportParameterDate.Value
1. Наименование объектов: 
=GetOrDash(Fields!ao_name.Value)
2. Наименование и контактные данные заказчика: 
=ConcatFields(", ", Fields!employer.Value, Fields!contacts.Value)
3. Юридический адрес заказчика: 
=GetOrDash(Fields!juridical_address.Value)
4. Фактический адрес места осуществления деятельности заказчика: 
=GetOrDash(Fields!fact_address.Value)
5. Основание для отбора проб и проведения исследований: 
=GetOrDash(Fields!basis.Value)
6. План отбора проб: 
=GetOrDash(Fields!plane.Value)
7. Места отбора проб: 
=GetOrDash(Fields!ss_name.Value)
8. Методы отбора и консервации проб: 
=GetOrDash(Fields!method_sample.Value)
9. Регистрационный номер акта отбора проб, дата отбора: 
=SetNumAndDate(Fields!act_num.Value,  Fields!min_date_selection.Value, Fields!max_date_selection.Value)
10. Дата поступления проб в Химическую лабораторию: 
=GetOrDash(Format(Fields!date_receipt.Value, "dd.MM.yyyy"))
11. Даты проведения исследований: 
=RangeDate(Fields!min_date_analysis.Value, Fields!max_date_analysis.Value)

Результаты лабораторных исследований

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

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

Код и комментарии
Номер таблицы 
=12 + GroupIndex() & "."
Шифр пробы: 
=First(Fields!code.Value)
Точка отбора (объект): 
=First(Fields!parent_ss_name.Value) & ", " & First(Fields!child_ss_name.Value)
№ п/п 
=Fields!row_index.Value
Определяемый показатель 
=IIF(Fields!met_ind_name.Value, Fields!met_ind_name.Value.Trim(), Fields!ind_name.Value.Trim())
Единица измерения 
="<style> body {font-family: 'Times New Roman', Times, serif; font-size: 10pt; line-height: 1.0; text-align: center; margin-top: 2px;} sup {vertical-align: 2pt; font-size: 8pt;} sub {vertical-align: -1pt; font-size: 8pt;} </style> <body> " & Fields!unit.Value &"</body>"
Результаты лабораторных исследований 
=GetOrDash(GetResult(Fields!avg_result.Value, Fields!error.Value, Fields!min.Value, Fields!max.Value))
Применяемая методика измерений 
=GetOrDash(Fields!norm_doc.Value)

Средства измерений (СИ), испытательное оборудование (ИО), применяемые для проведения исследований

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

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

Код и комментарии
Источник — https://wiki.chemsoft.ru/index.php?title=Протокол_испытаний_(вода)&oldid=2517