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

Паспорт качества газа (ГОСТ 5542)

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

Параметры

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

Параметр Тип поля Данные Сортировка
1 Выберите лабораторию: выбор значения лаборатории, имеющие записи в журналах по алфавиту
2 Введите номер паспорта: ввод текста 1 (значение по умолчанию) -
3 Введите начало периода поставки: поле-календарь 01.01.2020 0:00 (значение по умолчанию) -
4 Введите завершение периода поставки: поле-календарь текущие дата и время (значение по умолчанию) -
5 Введите газораспределительные станции: ввод текста газораспределительные станции ("-" значение по умолчанию) -
6 Выберите сотрудника, утверждающего паспорт: выбор значения сотрудники лаборатории (п.1) по алфавиту
7 Выберите сотрудников, ответственных за оформление паспорта: выбор одного или нескольких значений сотрудники лаборатории (п.1) по алфавиту

Внимание!

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

Атрибуты

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

  • Дата поставки пробы
  • Определен
  • Группа в паспорт качества
  • Номер в паспорт качества
  • Норма при стандартных условиях

Внимание!

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

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

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

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

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

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

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

Код и комментарии
Наименование организации
=Fields!head_org.Value
Адрес, телефоны, e-mail
=Fields!head_org_address.Value & vbLF & "тел, e-mail: " & ConcatFields("; ", Fields!head_org_tel.Value, Fields!head_org_mail.Value)
Наименование лаборатории
=Fields!lab_name.Value
Адрес лаборатории
=Fields!lab_address.Value

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

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

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

Код и комментарии
=First(Fields!position.Value)
=First(Fields!lab_name.Value)
=FormatFio(Fields!surname.Value, Fields!name.Value, Fields!patronimyc.Value, 2)

Общие данные паспорта

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

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

Код и комментарии
="Паспорт качества № " & Parameters!ReportParameterNum.Value
=Fields!ao_full_name.Value & " по " & Fields!quant_norm.Value
Код ОКПД2
-
Паспорт качества распространяется на объемы газа, поданного через газораспределительные станции:
=IIF(Parameters!ReportParameterStation.Value = "-", "", Parameters!ReportParameterStation.Value)
Дата (период) отбора проб
=Format(Min(Fields!sampling_date.Value), "dd.MM.yyyy") & " - " & Format(Max(Fields!sampling_date.Value), "dd.MM.yyyy")
НД на метод отбора
=First(Fields!sampling_norm_doc.Value)
Место отбора проб
=First(Fields!place_name.Value)
Дата (период) испытаний
=Format(Min(Fields!delivery_date.Value), "dd.MM.yyyy") & " - " & Format(Max(Fields!delivery_date.Value), "dd.MM.yyyy")

Таблица результатов

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

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

Код и комментарии
=Fields!group_index.Value & "."
Наименование показателя
=GetIndName(Fields!group_number.Value, Fields!met_ind_name.Value, Fields!ind_name.Value, Fields!unit.Value)
Метод испытания
=GetOrDash(Fields!norm_document.Value)
Норма минимальная и максимальная (строка 1)
=IIF(Fields!serial_number.Value = 1, GetNorms(Fields!group_number.Value, Fields!min.Value, Fields!comment.Value, Fields!limit_scale.Value), "")
Норма минимальная и максимальная (строка 2)
=GetNorms(Fields!group_number.Value, Fields!min.Value, Fields!comment.Value, Fields!limit_scale.Value)
Норма минимальная (строка 3)
=GetNorms(Fields!group_number.Value, Fields!min.Value, Fields!comment.Value, Fields!limit_scale.Value)
Норма максимальная (строка 3)
=GetNorms(Fields!group_number.Value, Fields!max.Value, Fields!comment.Value, Fields!limit_scale.Value)
Результаты испытаний
=GetResult(Fields!group_number.Value, Fields!ind_name.Value, Fields!num_result.Value, Fields!str_result.Value, Fields!min.Value, Fields!max.Value, Fields!round_num.Value, Fields!round_type.Value)

Примечания

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

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

Код и комментарии

Подписи

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

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

Код и комментарии