Паспорт качества газа (ГОСТ 5542): различия между версиями

Версия от 06:14, 20 марта 2026

Параметры

В форме используются 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)

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

Поля	Интерфейс `...` >> `...` и данные `...` >> `...`	Код и комментарии

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

Поля	Интерфейс `...` >> `...` и данные `...` >> `...`	Код и комментарии

Примечания

Поля	Интерфейс `...` >> `...` и данные `...` >> `...`	Код и комментарии

Подписи

Поля	Интерфейс `...` >> `...` и данные `...` >> `...`	Код и комментарии

@@ Строка 87: / Строка 87: @@
 !Код и комментарии
 |-
-|
+|УТВЕРЖДАЮ
-|
-|<syntaxhighlight lang="vb"></syntaxhighlight>
-|-
-|
-|
-|<syntaxhighlight lang="vb"></syntaxhighlight>
-|-
-|
-|
-|<syntaxhighlight lang="vb"></syntaxhighlight>
-|-
-|
-|
-|<syntaxhighlight lang="vb"></syntaxhighlight>
-|-
-|
-|
-|<syntaxhighlight lang="vb"></syntaxhighlight>
-|-
-|
 |
 |<syntaxhighlight lang="vb"></syntaxhighlight>
@@ Строка 113: / Строка 93: @@
 |
 |
-|<syntaxhighlight lang="vb"></syntaxhighlight>
+|<syntaxhighlight lang="vb">=First(Fields!position.Value)</syntaxhighlight>
 |-
 |
 |
-|<syntaxhighlight lang="vb"></syntaxhighlight>
+|<syntaxhighlight lang="vb">=First(Fields!lab_name.Value)</syntaxhighlight>
 |-
 |
 |
-|<syntaxhighlight lang="vb"></syntaxhighlight>
+|<syntaxhighlight lang="vb">=FormatFio(Fields!surname.Value, Fields!name.Value, Fields!patronimyc.Value, 2)</syntaxhighlight>
 |-
 |}