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

Сведения о работниках лаборатории: различия между версиями

Материал из Химсофт Вики
Строка 175: Строка 175:
|Получение данных из фильтра <code>Parameters!ReportParameterFio.Label</code> и преобразование в формат И.О. Фамилия
|Получение данных из фильтра <code>Parameters!ReportParameterFio.Label</code> и преобразование в формат И.О. Фамилия
|<syntaxhighlight lang="vb">=FormatFio(First(Fields!surname.Value, "FilterPosition"), First(Fields!name.Value, "FilterPosition"), First(Fields!patronymic.Value, "FilterPosition"), 2)</syntaxhighlight>
|<syntaxhighlight lang="vb">=FormatFio(First(Fields!surname.Value, "FilterPosition"), First(Fields!name.Value, "FilterPosition"), First(Fields!patronymic.Value, "FilterPosition"), 2)</syntaxhighlight>
для преобразования используется функция [[Scripts#FormatFio()|<code>FormatFio()</code>]]
для преобразования ФИО используется функция [[Scripts#FormatFio()|<code>FormatFio()</code>]]
|-
|-
|}
|}

Версия от 07:33, 23 марта 2026

Параметры

Параметр Тип поля Данные Сортировка
1 Выберите лабораторию: выбор значения лаборатории, имеющие записи в журналах сначала головное учреждение, затем остальные по алфавиту
2 Укажите ФИО уполномоченного лица: выбор значения сотрудники из лаборатории (п.1) по алфавиту
3 Укажите должность уполномоченного лица: выбор значения должности сотрудника (п.2) по алфавиту
4 Сотрудники (область аккредитации): выбор одного из 2-х вариантов - «в области аккредитации», «вне области аккредитации» отметка проставляется ТОЛЬКО для сотрудников лаборатории -
5 Введите начальное значение нумерации строк: ввод числа начальное значение, с которого будет начинаться нумерация строк (по умолчанию 1) -

Атрибуты

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

  • СНИЛС
  • Форма привлечения труда
  • Тип занятости
  • Номер договора
  • Дата договора
  • Выполняемые функции
  • Образовательное учреждение
  • Период обучения
  • Специальность, специализация, квалификация
  • Реквизиты документа об образовании
  • Дата получения диплома
  • В области аккредитации

Внимание!

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

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

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

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

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

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

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

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

Заголовок

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

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

Код и комментарии
Сведения о работниках лаборатории
Текущая дата Today.ToString("dd.MM.yyyy")
="По состоянию на: " & Today.ToString("dd.MM.yyyy")

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

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

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

Код и комментарии
№ п/п Сквозная нумерация строк RowNumber(), начальное значение нумерации строк из параметра фильтра Parameters!ReportParametrNumberFirstString.Value – 1
=RowNumber() + Parameters!ReportParametrNumberFirstString.Value  1
из счетчика RowNumber() вычитается единица, чтобы скорректировать смещение относительно числа, введенного пользователем; при вводе пользователем, например, числа 50, для первой строки отчета RowNumber() вернет 1: выражение вычисляется как 1 + 50 - 1, что дает в результате 50 (желаемый начальный номер); для второй строки RowNumber() вернет 2, и выражение даст 2 + 50 - 1 = 51, и так далее
Фамилия, имя, отчество (при наличии), страховой номер индивидуального лицевого счета, дата и место рождения Персонал >> Выбрать запись >> Карточка сотрудника >> Фамилия, Имя, Отчество

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

Fields!snils.Value >> snils / MainDataSet >> STRING_VALUE / EMPLOYEE_ATTRIBUTE

=ConcatFields(vbLF, FormatFio(Fields!surname.Value, Fields!name.Value, Fields!patronymic.Value, 0),  Fields!snils.Value)

в ячейку вносятся (через перенос на новую строку) значение ФИО и значение поля СНИЛС (если не пустое);
для соединения полей используется функция ConcatFields()

Основание для привлечения личного труда (трудовой договор, гражданско-правовой договор или иное), работа по основному месту работы или по совместительству Персонал >> Выбрать запись >> Карточка сотрудника >> Форма привлечения труда; Номер договора; Дата договора; Тип занятости

Fields!employment_form.Value; Fields!contract_number.Value; Fields!employment_type.Value >> employment_form; contract_number; employment_type / MainDataSet >> STRING_VALUE / EMPLOYEE_ATTRIBUTE

Fields!contract_date.Value >> contract_date / MainDataSet >> DATE_VALUE / EMPLOYEE_ATTRIBUTE

=Code.ConcatFields(", ", Fields!employment_form.Value, Fields!contract_number.Value, Format(Fields!contract_date.Value, "dd.MM.yyyy"), Fields!employment_type.Value)

если все 4 поля БД, содержащие форму, номер, дату и тип являются пустыми, то в строку заносится прочерк; иначе вносятся через запятую форма, номер, дата и тип;
для соединения полей используется функция ConcatFields()

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

Fields!function_value.Value >> function_value / MainDataSet >> STRING_VALUE / EMPLOYEE_ATTRIBUTE

=IIF(IsNothing (Fields!function_value.Value), "-", Fields!function_value.Value)
если поле БД, содержащее функцию, пустое, то вносится прочерк, иначе вносится функция из поля
Образование (наименование учебного заведения, год окончания, квалификация по документу об образовании, реквизиты документа об образовании) Персонал >> Выбрать запись >> Карточка сотрудника >> Образовательное учреждение; Дата получения диплома; Специальность, специализация, квалификация; Реквизиты документа об образовании

Fields!uni.Value; Fields!prof.Value; Fields!diplom.Value >> uni; prof; diplom / MainDataSet >> STRING_VALUE / EMPLOYEE_ATTRIBUTE

Fields!uni_year.Value >> uni_year / MainDataSet >> DATE_VALUE / EMPLOYEE_ATTRIBUTE

=Code.ConcatFields(", ",Fields!uni.Value,  Fields!uni_year.Value, Fields!prof.Value, Fields!diplom.Value)

если все 4 поля БД (учебное заведение, год окончания, специальность и реквизиты диплома) пустые, то вносится прочерк; иначе через запятую выводятся только не пустые поля;
для соединения полей используется функция ConcatFields()

Практический опыт по исследованиям, испытаниям, измерениям, включенным в область аккредитации (в годах, с указанием, в каких организациях, в какой период и по каким видам исследований (испытаний) измерений получен) Персонал >> Выбрать запись >> Карточка сотрудника >> Дата получения диплома

Fields!diplom_date.Value >> diplom_date / MainDataSet >> DATE_VALUE / EMPLOYEE_ATTRIBUTE

=IIF(IsNothing(Fields!diplom_date.Value),  "-",  Code.YearsWithSuffix(Fields!diplom_date.Value)  & vbLF & Format(Fields!diplom_date.Value, "dd.MM.yyyy") & " - по текущую дату")

если в БД поле даты начала трудовой деятельности пустое, выводится прочерк; иначе выводятся

  • количество лет и текстовый суффикс « год/года/лет» в зависимости от числа лет стажа (используется функция YearsWithSuffix());
  • перенос строки (vbLF);
  • год начала трудовой деятельности + «по текущую дату».

Для вывода основной информации также использовались:

Подписи

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

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

Код и комментарии
Должность Подстановка из фильтра Parameters!ReportParameterPosition.Label
=Parameters!ReportParameterPosition.Label
ФИО Получение данных из фильтра Parameters!ReportParameterFio.Label и преобразование в формат И.О. Фамилия
=FormatFio(First(Fields!surname.Value, "FilterPosition"), First(Fields!name.Value, "FilterPosition"), First(Fields!patronymic.Value, "FilterPosition"), 2)

для преобразования ФИО используется функция FormatFio()

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

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

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

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