Новые статьи
This commit is contained in:
wakadakawaka
parent
e410308e64
commit
651d1c19cc
@ -0,0 +1,17 @@
|
|||||||
|
---
|
||||||
|
title: Утилита ibcmd.exe
|
||||||
|
---
|
||||||
|
Утилита **ibcmd.exe** входит в состав поставки сервера 1C
|
||||||
|
|
||||||
|
С помощью этой утилиты можно выгрузить информационную базу в .dt без получения монопольного режима. Для этого нужно создать текстовый файл, задать ему расширение .bat. В теле этого файла прописывается строка:
|
||||||
|
|
||||||
|
```
|
||||||
|
«C:\Program Files\1cv8\{ВЕРСИЯ ПЛАТФОРМЫ}\bin\ibcmd.exe» infobase dump —db-server={ИМЯ СЕРВЕРА} —dbms=MSSQLServer —db-name={ИМЯ БАЗЫ НА СЕРВЕРЕ} —db-user={ИМЯ ПОЛЬЗОВАТЕЛЯ SQL} —db-pwd={ПАРОЛЬ ПОЛЬЗОВАТЕЛЯ SQL} «c:\my_database.dt»
|
||||||
|
```
|
||||||
|
* **dbms** – тип SQL сервера с базами данных.
|
||||||
|
* **db-server** – адрес или доменное имя по которому доступен SQL сервер.
|
||||||
|
* **db-name** – имя базы данных на SQL сервере.
|
||||||
|
* **db-user** – имя пользователя на SQL сервере, которому доступны необходимые базы данных.
|
||||||
|
* **db-pwd** – пароль от этого пользователя.
|
||||||
|
* **user** – имя пользователя в 1С от этой базы.
|
||||||
|
* **password** – и пароль от него. (ранее программа работала без пользователя 1С) C:\backup\SQL_DB_NAME_date.dt – путь, куда будет выгружена база данных.
|
||||||
@ -0,0 +1,128 @@
|
|||||||
|
---
|
||||||
|
title: Виджет из HTML-документа
|
||||||
|
---
|
||||||
|
|
||||||
|
HTML-документ можно использовать для создания нестандартных элементов управления. Ниже приведен пример создания виджетов
|
||||||
|
```bsl
|
||||||
|
&НаКлиенте
|
||||||
|
Функция ТекстHTMLДляВиджета(КоличествоНовых, КоличествоВРаботе, КоличествоЗакрытых, КоличествоВсего)
|
||||||
|
|
||||||
|
ЗаголовокВиджета = "Информация о заявках";
|
||||||
|
|
||||||
|
Текст = СтрШаблон(
|
||||||
|
"<!DOCTYPE html>
|
||||||
|
|<html lang=""ru"">
|
||||||
|
|
|
||||||
|
|<head>
|
||||||
|
| <meta charset=""UTF-8"">
|
||||||
|
| <meta http-equiv=""X-UA-Compatible"" content=""IE=edge"">
|
||||||
|
| <meta name=""viewport"" content=""width=device-width, initial-scale=1.0"">
|
||||||
|
| <title>Document</title>
|
||||||
|
| <style>
|
||||||
|
| p {
|
||||||
|
| margin: 0;
|
||||||
|
| padding: 0;
|
||||||
|
| }
|
||||||
|
| .wrap {
|
||||||
|
| padding: 0px;
|
||||||
|
| }
|
||||||
|
| .status {
|
||||||
|
| font-family: ""Arial"";
|
||||||
|
| font-weight: 600;
|
||||||
|
| font-size: 12px;
|
||||||
|
| margin-bottom: 5px;
|
||||||
|
| margin-left: 2px;
|
||||||
|
| margin-right: 5px;
|
||||||
|
| padding: 3px;
|
||||||
|
| border-radius: 5px;
|
||||||
|
| display: flex;
|
||||||
|
| justify-content: space-between;
|
||||||
|
| }
|
||||||
|
| .status-opened {
|
||||||
|
| border: 1px solid #A0A0A0;
|
||||||
|
| background-color: #F4F7FC;
|
||||||
|
| }
|
||||||
|
| .status-work {
|
||||||
|
| border: 1px solid #A0A0A0;
|
||||||
|
| background-color: #FBED9E;
|
||||||
|
| }
|
||||||
|
| .status-closed {
|
||||||
|
| border: 1px solid #A0A0A0;
|
||||||
|
| background-color: #ddffdd;
|
||||||
|
| }
|
||||||
|
| .status-all {
|
||||||
|
| border: 1px solid #A0A0A0;
|
||||||
|
| font-size: 16px;
|
||||||
|
| }
|
||||||
|
| .status-header {
|
||||||
|
| margin-bottom: 3px;
|
||||||
|
| padding: 2px;
|
||||||
|
| font-size: 12px;
|
||||||
|
| }
|
||||||
|
| .bottom {
|
||||||
|
| padding: 0px;
|
||||||
|
| margin-top: 6px;
|
||||||
|
| text-align: right;
|
||||||
|
| font-size: 11px;
|
||||||
|
| font-family: ""Arial"";
|
||||||
|
| }
|
||||||
|
| </style>
|
||||||
|
|</head>
|
||||||
|
|
|
||||||
|
|<body>
|
||||||
|
| <div class=""wrap"">
|
||||||
|
| <div class=""status status-header"">
|
||||||
|
| <p><b>%1</b></p>
|
||||||
|
| </div>
|
||||||
|
| <div class=""status status-opened"">
|
||||||
|
| <p><a href=""#"" class=""link-opened"">Новые</a></p>
|
||||||
|
| <p>%2</p>
|
||||||
|
| </div>
|
||||||
|
| <div class=""status status-work"">
|
||||||
|
| <p><a href=""#"" class=""link-work"">В работе</a></p>
|
||||||
|
| <p>%3</p>
|
||||||
|
| </div>
|
||||||
|
| <div class=""status status-closed"">
|
||||||
|
| <p><a href=""#"" class=""link-closed"">Закрытые</a></p>
|
||||||
|
| <p>%4</p>
|
||||||
|
| </div>
|
||||||
|
| <div class=""bottom"">
|
||||||
|
| <div class=""bottom bottom-refresh"">
|
||||||
|
| <p><a href=""#"" class=""link-refresh"">Сбросить</a></p>
|
||||||
|
| </div>
|
||||||
|
| </div>
|
||||||
|
|</body>
|
||||||
|
|
|
||||||
|
|</html>",
|
||||||
|
ЗаголовокВиджета,
|
||||||
|
КоличествоНовых,
|
||||||
|
КоличествоВРаботе,
|
||||||
|
КоличествоЗакрытых);
|
||||||
|
|
||||||
|
Возврат Текст;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
```
|
||||||
|
|
||||||
|
В результате получается что-то вроде
|
||||||
|
|
||||||
|
|
||||||
|
Для отработки кликов на элементах виджета нужно переопределить событие элемента «ПриНажатии», например:
|
||||||
|
```bls
|
||||||
|
&НаКлиенте
|
||||||
|
Процедура ВиджетПриНажатии(Элемент, ДанныеСобытия, СтандартнаяОбработка)
|
||||||
|
|
||||||
|
СписокКлассов = СтрРазделить(ДАнныеСобытия.Element.className, " ", Ложь);
|
||||||
|
Если СписокКлассов.Найти("link-opened") <> Неопределено Тогда
|
||||||
|
// Свой обработчик
|
||||||
|
КонецЕсли;
|
||||||
|
КонецПроцедуры
|
||||||
|
```
|
||||||
|
В тексте HTML-класс «link-opened» созданного элемента расположен в следующем блоке
|
||||||
|
```html
|
||||||
|
<div class=""status status-opened"">
|
||||||
|
<p><a href=""#"" class=""link-opened"">Новые</a></p>
|
||||||
|
<p>%2</p>
|
||||||
|
</div>
|
||||||
|
```
|
||||||
|
Соответственно можно создавать произвольные элементы — кнопки, ссылки, параграфы и пр., что допускается HTML+CSS
|
||||||
@ -0,0 +1,40 @@
|
|||||||
|
---
|
||||||
|
title: Обход всех строк динамического списка
|
||||||
|
---
|
||||||
|
|
||||||
|
```bsl
|
||||||
|
&НаСервере
|
||||||
|
Функция ДанныеВсехСтрокДинамическогоСпискаПулНоменклатурыРазмещение()
|
||||||
|
|
||||||
|
//Получаем схема компановки данных (здесь хранится текст запроса)
|
||||||
|
Схема = Элементы.ПулНоменклатурыРазмещение.ПолучитьИсполняемуюСхемуКомпоновкиДанных();
|
||||||
|
|
||||||
|
//Получаем настройки пользователя (отборы, сортировки и т.п.)
|
||||||
|
Настройки = Элементы.ПулНоменклатурыРазмещение.ПолучитьИсполняемыеНастройкиКомпоновкиДанных();
|
||||||
|
|
||||||
|
//Выводим динамический список в таблицу значений
|
||||||
|
КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных();
|
||||||
|
МакетКомпоновки = КомпоновщикМакета.Выполнить(Схема, Настройки, , ,Тип("ГенераторМакетаКомпоновкиДанныхДляКоллекцииЗначений"));
|
||||||
|
|
||||||
|
ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных;
|
||||||
|
ПроцессорКомпоновки.Инициализировать(МакетКомпоновки);
|
||||||
|
|
||||||
|
ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВКоллекциюЗначений;
|
||||||
|
Результат = ПроцессорВывода.Вывести(ПроцессорКомпоновки); // Тут таблица значений со строками ДС
|
||||||
|
|
||||||
|
ДанныеСтрок = Новый Массив;
|
||||||
|
|
||||||
|
Для Каждого Строка Из Результат Цикл // Обходим ТЗ
|
||||||
|
|
||||||
|
ДанныеСтроки = ПараметрыЗаполненияСтрокиТабличнойЧастиРазмещение();
|
||||||
|
ЗаполнитьЗначенияСвойств(ДанныеСтроки, Строка);
|
||||||
|
ДанныеСтроки.Количество = Строка.Разместить;
|
||||||
|
|
||||||
|
ДанныеСтрок.Добавить(ДанныеСтроки);
|
||||||
|
|
||||||
|
КонецЦикла;
|
||||||
|
|
||||||
|
Возврат ДанныеСтрок;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
```
|
||||||
@ -0,0 +1,13 @@
|
|||||||
|
---
|
||||||
|
title: Обход выделенных строк динамического списка
|
||||||
|
---
|
||||||
|
|
||||||
|
```bsl
|
||||||
|
&НаКлиенте
|
||||||
|
ВыделенныеСтроки = Элементы.ПулНоменклатурыРазмещение.ВыделенныеСтроки;
|
||||||
|
|
||||||
|
Для Каждого Идентификатор Из ВыделенныеСтроки Цикл
|
||||||
|
Строка = ПулНоменклатурыРазмещение.НайтиПоИдентификатору(Идентификатор);
|
||||||
|
<...>
|
||||||
|
КонецЦикла;
|
||||||
|
```
|
||||||
@ -0,0 +1,238 @@
|
|||||||
|
```bsl
|
||||||
|
#Область ПрограммныйИнтерфейс
|
||||||
|
|
||||||
|
// Процедура - Записать сообщение в лог
|
||||||
|
//
|
||||||
|
// Параметры:
|
||||||
|
// Сообщение - Строка - Тело сообщения
|
||||||
|
// УровеньЛогирования - Число - Значение, полученное функциями УровеньЛогирования...()
|
||||||
|
// МассивЛогов - Массив Из Строка, Неопределено - Массив, в который будет записан лог. Если Неопределено, тогда создается новый массив
|
||||||
|
// ЗаписыватьУровеньОтладка - Булево - Если Ложь, то сообщения с уровнем "Отладка" не будут добавлены в массив. По умолчанию Ложь
|
||||||
|
// ВыводБезДополнительнойИнформации - Булево - Если Истина, то не будут выведена информация об уровне отладки и дате события. По умолчанию Ложь
|
||||||
|
// МаксимальнаяДлинаТелаСообщения - Число - Если задано, то тело сообщения будет обрезано до указанного числа, если нет - выведено без ограничений. По умолчанию 0.
|
||||||
|
//
|
||||||
|
Процедура ЗаписатьСообщениеВЛог(Знач Сообщение,
|
||||||
|
УровеньЛогирования,
|
||||||
|
МассивЛогов = Неопределено,
|
||||||
|
РежимОтладки = Ложь,
|
||||||
|
ВыводБезДополнительнойИнформации = Ложь,
|
||||||
|
МаксимальнаяДлинаТелаСообщения = 0) Экспорт
|
||||||
|
|
||||||
|
Если МаксимальнаяДлинаТелаСообщения > 0 Тогда
|
||||||
|
Если СтрДлина(Сообщение) > МаксимальнаяДлинаТелаСообщения Тогда
|
||||||
|
Сообщение = СтрШаблон("%1...", Лев(Сообщение, МаксимальнаяДлинаТелаСообщения - 3));
|
||||||
|
КонецЕсли;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если МассивЛогов = Неопределено Тогда
|
||||||
|
МассивЛогов = Новый Массив;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если УровеньЛогирования = УровеньЛогированияОтладка() И Не РежимОтладки Тогда
|
||||||
|
Возврат;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если ВыводБезДополнительнойИнформации Тогда
|
||||||
|
МассивЛогов.Добавить(Сообщение);
|
||||||
|
Иначе
|
||||||
|
ПредставлениеУровняЛога = ПредставлениеУровняЛогирования(УровеньЛогирования);
|
||||||
|
ТекстСообщения = СтрШаблон("%1 - %2", ПредставлениеУровняЛога, Сообщение);
|
||||||
|
МассивЛогов.Добавить(ТекстСообщения);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
// Процедура - Добавляет запись вида "[Отладка] 2024-11-10 - <Сообщение>" в массив логов
|
||||||
|
//
|
||||||
|
// Параметры:
|
||||||
|
// Сообщение - Строка - Тело сообщения
|
||||||
|
// МассивЛогов - Массив Из Строка -
|
||||||
|
// РежимОтладки - Булево - Если Истина, то запись уровня отладка будет добавлена в массив
|
||||||
|
//
|
||||||
|
Процедура ДобавитьЗаписьУровняОтладка(Сообщение, МассивЛогов, РежимОтладки = Ложь) Экспорт
|
||||||
|
ЗаписатьСообщениеВЛог(Сообщение, УровеньЛогированияОтладка(), МассивЛогов, РежимОтладки, Ложь);
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
// Процедура - Добавляет запись вида "[Информация] 2024-11-10 - <Сообщение>" в массив логов
|
||||||
|
//
|
||||||
|
// Параметры:
|
||||||
|
// Сообщение - Строка - Тело сообщения
|
||||||
|
// МассивЛогов - Массив Из Строка -
|
||||||
|
//
|
||||||
|
Процедура ДобавитьЗаписьУровняИнформация(Сообщение, МассивЛогов) Экспорт
|
||||||
|
ЗаписатьСообщениеВЛог(Сообщение, УровеньЛогированияИнформация(), МассивЛогов, Ложь, Ложь);
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
// Процедура - Добавляет запись вида "[Предупреждение] 2024-11-10 - <Сообщение>" в массив логов
|
||||||
|
//
|
||||||
|
// Параметры:
|
||||||
|
// Сообщение - Строка - Тело сообщения
|
||||||
|
// МассивЛогов - Массив Из Строка -
|
||||||
|
//
|
||||||
|
Процедура ДобавитьЗаписьУровняПредупреждение(Сообщение, МассивЛогов) Экспорт
|
||||||
|
ЗаписатьСообщениеВЛог(Сообщение, УровеньЛогированияПредупреждение(), МассивЛогов, Ложь, Ложь);
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
// Процедура - Добавляет запись вида "[Ошибка] 2024-11-10 - <Сообщение>" в массив логов
|
||||||
|
//
|
||||||
|
// Параметры:
|
||||||
|
// Сообщение - Строка - Тело сообщения
|
||||||
|
// МассивЛогов - Массив Из Строка -
|
||||||
|
//
|
||||||
|
Процедура ДобавитьЗаписьУровняОшибка(Сообщение, МассивЛогов) Экспорт
|
||||||
|
ЗаписатьСообщениеВЛог(Сообщение, УровеньЛогированияОшибка(), МассивЛогов, Ложь, Ложь);
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
// Функция - Массив логов в текст
|
||||||
|
//
|
||||||
|
// Параметры:
|
||||||
|
// МассивЛогов - Массив Из Строка - Массив логов, заполненный с помощью процедур модуля ЛогированиеКлиентСервер
|
||||||
|
// ПараметрыВывода - Структура - Параметры, полученные функцией ПараметрыВыводаМассиваЛоговВТекст()
|
||||||
|
//
|
||||||
|
// Возвращаемое значение:
|
||||||
|
// Строка - Логи выполнения в виде строки
|
||||||
|
//
|
||||||
|
Функция МассивЛоговВТекст(МассивЛогов, ПараметрыВывода) Экспорт
|
||||||
|
|
||||||
|
ВыводитьПрефикс = ПараметрыВывода.ВыводитьПрефикс;
|
||||||
|
ВыводитьЗаписиУровняОтладка = ПараметрыВывода.ВыводитьЗаписиУровняОтладка;
|
||||||
|
ВыводитьЗаписиУровняИнформация = ПараметрыВывода.ВыводитьЗаписиУровняИнформация;
|
||||||
|
ВыводитьЗаписиУровняПредупреждение = ПараметрыВывода.ВыводитьЗаписиУровняПредупреждение;
|
||||||
|
ВыводитьЗаписиУровняОшибка = ПараметрыВывода.ВыводитьЗаписиУровняОшибка;
|
||||||
|
НумероватьСтроки = ПараметрыВывода.НумероватьСтроки;
|
||||||
|
|
||||||
|
ЛогиКВыводу = Новый Массив;
|
||||||
|
Сч = 1;
|
||||||
|
Для Каждого Лог Из МассивЛогов Цикл
|
||||||
|
|
||||||
|
ТекущийУровеньЛога = УровеньЛогированияТекущегоЛога(Лог);
|
||||||
|
|
||||||
|
Если Не ВыводитьЗаписиУровняОтладка И ТекущийУровеньЛога = УровеньЛогированияОтладка() Тогда
|
||||||
|
Продолжить;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если Не ВыводитьЗаписиУровняИнформация И ТекущийУровеньЛога = УровеньЛогированияИнформация() Тогда
|
||||||
|
Продолжить;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если Не ВыводитьЗаписиУровняПредупреждение И ТекущийУровеньЛога = УровеньЛогированияПредупреждение() Тогда
|
||||||
|
Продолжить;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если Не ВыводитьЗаписиУровняОшибка И ТекущийУровеньЛога = УровеньЛогированияОшибка() Тогда
|
||||||
|
Продолжить;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если Не ВыводитьПрефикс Тогда
|
||||||
|
УдалитьПрефиксИзЛога(Лог);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если НумероватьСтроки Тогда
|
||||||
|
ЛогиКВыводу.Добавить(СтрШаблон("%1. %2", Сч, Лог));
|
||||||
|
Иначе
|
||||||
|
ЛогиКВыводу.Добавить(Лог);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Сч = Сч + 1;
|
||||||
|
КонецЦикла;
|
||||||
|
|
||||||
|
Возврат СтрСоединить(ЛогиКВыводу, СтрШаблон("%1%2", Символы.ПС + Символы.ВК, Символы.ПС + Символы.ВК));
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
// Функция - Параметры вывода массива логов в текст
|
||||||
|
//
|
||||||
|
// Возвращаемое значение:
|
||||||
|
// Структура - Структура параметров с ключами:
|
||||||
|
// * ВыводитьПрефикс - Булево - устанавливает, выводить ли представление уровня логирования.
|
||||||
|
// Истина - будет сообщение вида "[Информация] - <Сообщение>"
|
||||||
|
// Ложь - будет сообщение вида "<Сообщение>". По умолчанию Истина
|
||||||
|
// * ВыводитьЗаписиУровняОтладка - Булево - устанавливает, будут ли выведены записи уровня "Отладка". По умолчанию Истина
|
||||||
|
// * ВыводитьЗаписиУровняИнформация - Булево - устанавливает, будут ли выведены записи уровня "Информация". По умолчанию Истина
|
||||||
|
// * ВыводитьЗаписиУровняПредупреждение - Булево - устанавливает, будут ли выведены записи уровня "Предупреждение". По умолчанию Истина
|
||||||
|
// * ВыводитьЗаписиУровняОшибка - Булево - устанавливает, будут ли выведены записи уровня "Ошибка". По умолчанию Истина
|
||||||
|
//
|
||||||
|
Функция ПараметрыВыводаМассиваЛоговВТекст() Экспорт
|
||||||
|
|
||||||
|
ПараметрыВывода = Новый Структура;
|
||||||
|
ПараметрыВывода.Вставить("ВыводитьПрефикс", Истина);
|
||||||
|
ПараметрыВывода.Вставить("ВыводитьЗаписиУровняОтладка", Истина);
|
||||||
|
ПараметрыВывода.Вставить("ВыводитьЗаписиУровняИнформация", Истина);
|
||||||
|
ПараметрыВывода.Вставить("ВыводитьЗаписиУровняПредупреждение", Истина);
|
||||||
|
ПараметрыВывода.Вставить("ВыводитьЗаписиУровняОшибка", Истина);
|
||||||
|
ПараметрыВывода.Вставить("НумероватьСтроки", Ложь);
|
||||||
|
|
||||||
|
Возврат ПараметрыВывода;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
#Область УровниЛогирования
|
||||||
|
|
||||||
|
Функция ПредставлениеУровняЛогирования(УровеньЛогирования) Экспорт
|
||||||
|
|
||||||
|
Представление = "[Неопределено]";
|
||||||
|
|
||||||
|
Если УровеньЛогирования = УровеньЛогированияОтладка() Тогда
|
||||||
|
Представление = "[Отладка]";
|
||||||
|
ИначеЕсли УровеньЛогирования = УровеньЛогированияИнформация() Тогда
|
||||||
|
Представление = "[Информация]";
|
||||||
|
ИначеЕсли УровеньЛогирования = УровеньЛогированияПредупреждение() Тогда
|
||||||
|
Представление = "[Предупреждение]";
|
||||||
|
ИначеЕсли УровеньЛогирования = УровеньЛогированияОшибка() Тогда
|
||||||
|
Представление = "[Ошибка]";
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Возврат Представление;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
Функция УровеньЛогированияОтладка() Экспорт
|
||||||
|
Возврат 4;
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
Функция УровеньЛогированияИнформация() Экспорт
|
||||||
|
Возврат 3;
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
Функция УровеньЛогированияПредупреждение() Экспорт
|
||||||
|
Возврат 2;
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
Функция УровеньЛогированияОшибка() Экспорт
|
||||||
|
Возврат 1;
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
#КонецОбласти
|
||||||
|
|
||||||
|
#КонецОбласти
|
||||||
|
|
||||||
|
#Область СлужебныеПроцедурыИФункции
|
||||||
|
|
||||||
|
Функция УровеньЛогированияТекущегоЛога(Лог)
|
||||||
|
|
||||||
|
Результат = -1;
|
||||||
|
|
||||||
|
Если СтрНачинаетсяС(Лог, ПредставлениеУровняЛогирования(УровеньЛогированияОтладка())) Тогда
|
||||||
|
Результат = УровеньЛогированияОтладка();
|
||||||
|
ИначеЕсли СтрНачинаетсяС(Лог, ПредставлениеУровняЛогирования(УровеньЛогированияИнформация())) Тогда
|
||||||
|
Результат = УровеньЛогированияИнформация();
|
||||||
|
ИначеЕсли СтрНачинаетсяС(Лог, ПредставлениеУровняЛогирования(УровеньЛогированияПредупреждение())) Тогда
|
||||||
|
Результат = УровеньЛогированияПредупреждение();
|
||||||
|
ИначеЕсли СтрНачинаетсяС(Лог, ПредставлениеУровняЛогирования(УровеньЛогированияОшибка())) Тогда
|
||||||
|
Результат = УровеньЛогированияОшибка();
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Возврат Результат;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
Процедура УдалитьПрефиксИзЛога(Лог)
|
||||||
|
|
||||||
|
УровеньЛогированияЛога = УровеньЛогированияТекущегоЛога(Лог);
|
||||||
|
УдаляемаяПодстрока = СтрШаблон("%1 - ", ПредставлениеУровняЛогирования(УровеньЛогированияЛога));
|
||||||
|
Лог = СтрЗаменить(Лог, УдаляемаяПодстрока, "");
|
||||||
|
|
||||||
|
КонецПроцедуры
|
||||||
|
|
||||||
|
#КонецОбласти
|
||||||
|
```
|
||||||
@ -0,0 +1,43 @@
|
|||||||
|
```bsl
|
||||||
|
// Функция - Обращение к пользователю
|
||||||
|
//
|
||||||
|
// Параметры:
|
||||||
|
// Пользователь - СправочникСсылка.Пользователи -
|
||||||
|
//
|
||||||
|
// Возвращаемое значение:
|
||||||
|
// Строка - Возвращает обращение вида "Уважаемый <Фамилия Имя Отчество>" с учетом пола.
|
||||||
|
// Если не удается определить пол, возвращается "Уважаемый(ая)...",
|
||||||
|
// если не удается распарсить ФИО, вместо <Фамилия Имя Отчество> выводится "пользователь"
|
||||||
|
//
|
||||||
|
Функция ОбращениеКПользователю(Пользователь)
|
||||||
|
|
||||||
|
Обращение = "Уважаемый(ая)";
|
||||||
|
|
||||||
|
ФИО = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Пользователь, "Наименование", Истина);
|
||||||
|
|
||||||
|
Если Не ЗначениеЗаполнено(ФИО) Тогда
|
||||||
|
ФИО = "пользователь";
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если ЗначениеЗаполнено(ФИО) Тогда
|
||||||
|
|
||||||
|
ЧастиИмени = СтрРазделить(ФИО, " ", Ложь);
|
||||||
|
|
||||||
|
Если ЧастиИмени.Количество() = 3 Тогда
|
||||||
|
|
||||||
|
Отчество = СокрЛП(ЧастиИмени.Получить(2));
|
||||||
|
|
||||||
|
Если СтрЗаканчиваетсяНа(НРег(Отчество), "вич") Тогда
|
||||||
|
Обращение = "Уважаемый";
|
||||||
|
ИначеЕсли СтрЗаканчиваетсяНа(НРег(Отчество), "вна") Тогда
|
||||||
|
Обращение = "Уважаемая";
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Возврат СтрШаблон("%1 %2!", Обращение, ФИО);
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
```
|
||||||
@ -0,0 +1,118 @@
|
|||||||
|
```bsl
|
||||||
|
// Функция - Уникальный идентификатор набора ссылок. Ключ записи.
|
||||||
|
//
|
||||||
|
// Параметры:
|
||||||
|
// СписокUUID - Массив Из Ссылка - Массив со ссылками на объекты БД
|
||||||
|
// ВозвращатьКакУИД - Булево - определяет, возвращать ли результат как УникальныйИдентификатор. Если Ложь - возвращается строкой
|
||||||
|
//
|
||||||
|
// Возвращаемое значение:
|
||||||
|
// Строка, УникальныйИдентификатор - Ключ записи для некоторого набора ссылок
|
||||||
|
//
|
||||||
|
Функция УникальныйИдентификаторНабораСсылок(СписокСсылок, ВозвращатьКакУИД = Ложь) Экспорт
|
||||||
|
|
||||||
|
// получаем UUID строкой по ссылкам
|
||||||
|
ЧастиЗапроса = Новый Массив;
|
||||||
|
ЧастьЗапросаВыборка =
|
||||||
|
"ВЫБРАТЬ
|
||||||
|
| ПРЕДСТАВЛЕНИЕ(УНИКАЛЬНЫЙИДЕНТИФИКАТОР(Ссылка))
|
||||||
|
|ИЗ
|
||||||
|
| %ИМЯ ТАБЛИЦЫ%
|
||||||
|
|ГДЕ
|
||||||
|
| Ссылка В (&СписокСсылок)
|
||||||
|
|";
|
||||||
|
|
||||||
|
ПерваяСсылка = Истина;
|
||||||
|
Для Каждого Ссылка Из СписокСсылок Цикл
|
||||||
|
|
||||||
|
Если Не ПерваяСсылка Тогда
|
||||||
|
ЧастиЗапроса.Добавить("
|
||||||
|
| ОБЪЕДИНИТЬ ВСЕ
|
||||||
|
|
|
||||||
|
|");
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
ПолноеИмяМетаданных = Ссылка.Метаданные().ПолноеИмя();
|
||||||
|
|
||||||
|
ЧастиЗапроса.Добавить(СтрЗаменить(ЧастьЗапросаВыборка, "%ИМЯ ТАБЛИЦЫ%", ПолноеИмяМетаданных));
|
||||||
|
|
||||||
|
ПерваяСсылка = Ложь;
|
||||||
|
|
||||||
|
КонецЦикла;
|
||||||
|
|
||||||
|
Запрос = Новый Запрос;
|
||||||
|
Запрос.Текст = СтрСоединить(ЧастиЗапроса, "");
|
||||||
|
Запрос.УстановитьПараметр("СписокСсылок", СписокСсылок);
|
||||||
|
|
||||||
|
Возврат УникальныйИдентификаторНабораСтрок(Запрос.Выполнить().Выгрузить().ВыгрузитьКолонку(0), ВозвращатьКакУИД);
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
// Функция - Уникальный идентификатор набора строк. Ключ записи.
|
||||||
|
//
|
||||||
|
// Параметры:
|
||||||
|
// СписокUUID - Массив Из Строка - Массив с произвольными строками
|
||||||
|
// ВозвращатьКакУИД - Булево - определяет, возвращать ли результат как УникальныйИдентификатор. Если Ложь - возвращается строкой
|
||||||
|
//
|
||||||
|
// Возвращаемое значение:
|
||||||
|
// Строка, УникальныйИдентификатор - Ключ записи для некоторого набора строк
|
||||||
|
//
|
||||||
|
Функция УникальныйИдентификаторНабораСтрок(СписокСтрок, ВозвращатьКакУИД = Ложь) Экспорт
|
||||||
|
|
||||||
|
СписокДляСортировки = Новый СписокЗначений;
|
||||||
|
СписокДляСортировки.ЗагрузитьЗначения(СписокСтрок);
|
||||||
|
СписокДляСортировки.СортироватьПоЗначению(НаправлениеСортировки.Возр);
|
||||||
|
СписокСтрок = СписокДляСортировки.ВыгрузитьЗначения();
|
||||||
|
|
||||||
|
СтрокаОбщая = СтрСоединить(СписокСтрок, ",");
|
||||||
|
|
||||||
|
Хеширование = Новый ХешированиеДанных(ХешФункция.SHA1);
|
||||||
|
Хеширование.Добавить(СтрокаОбщая);
|
||||||
|
|
||||||
|
ДвоичныеДанные = Хеширование.ХешСумма;
|
||||||
|
Хеш = НРег(ПолучитьHexСтрокуИзДвоичныхДанных(ДвоичныеДанные));
|
||||||
|
|
||||||
|
// Преобразуем хеш в массив байтов (берем первые 16 байтов)
|
||||||
|
МассивБайтов = Новый Массив;
|
||||||
|
Сч = 1;
|
||||||
|
Пока Сч < 32 Цикл
|
||||||
|
Байт = Сред(Хеш, Сч, 2);
|
||||||
|
МассивБайтов.Добавить(Байт);
|
||||||
|
Сч = Сч + 2;
|
||||||
|
КонецЦикла;
|
||||||
|
|
||||||
|
// Версия UUID 5
|
||||||
|
МассивБайтов[6] = СтрШаблон("5%1", Прав(МассивБайтов[6], 1));
|
||||||
|
|
||||||
|
// Вариант RFC 4122
|
||||||
|
ДесятичноеЧисло = ЧислоИзШестнадцатеричнойСтроки(СтрШаблон("0x%1", МассивБайтов[8]));
|
||||||
|
|
||||||
|
БезДвухБитов = ПобитовоеИ(ДесятичноеЧисло, 63); // обнуляем старшие 2 бита, 63 = 0011 1111
|
||||||
|
ИтоговыйБайт = ПобитовоеИли(БезДвухБитов, 128); // записываем в старшие 2 бита 10, 128 = 1000 000
|
||||||
|
|
||||||
|
СимволыHEX = "0123456789abcdef";
|
||||||
|
СтаршийРазряд = Сред(СимволыHEX, Цел(ИтоговыйБайт / 16) + 1, 1);
|
||||||
|
МладшийРазряд = Сред(СимволыHEX, (ИтоговыйБайт % 16) + 1, 1);
|
||||||
|
|
||||||
|
МассивБайтов[8] = СтаршийРазряд + МладшийРазряд;
|
||||||
|
|
||||||
|
UUIDБезРазделителей = СтрСоединить(МассивБайтов, "");
|
||||||
|
|
||||||
|
ИтоговыйUUID = СтрШаблон("%1-%2-%3-%4-%5",
|
||||||
|
Сред(UUIDБезРазделителей, 1, 8),
|
||||||
|
Сред(UUIDБезРазделителей, 9, 4),
|
||||||
|
Сред(UUIDБезРазделителей, 13, 4),
|
||||||
|
Сред(UUIDБезРазделителей, 17, 4),
|
||||||
|
Сред(UUIDБезРазделителей, 20, 12));
|
||||||
|
|
||||||
|
Если Не СтроковыеФункцииКлиентСервер.ЭтоУникальныйИдентификатор(ИтоговыйUUID) Тогда
|
||||||
|
ВызватьИсключение "Не удалось получить уникальный идентификатор из входных данных. Строка " + ИтоговыйUUID + " не отвечает требованиям УИД";
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Если ВозвращатьКакУИД Тогда
|
||||||
|
ИтоговыйUUID = Новый УникальныйИдентификатор(ИтоговыйUUID);
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
Возврат ИтоговыйUUID;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
```
|
||||||
Loading…
x
Reference in New Issue
Block a user