Блокировка от параллельного выполнения функционала на примере регламентных заданий

Публикация № 1123020

Разработка - Практика программирования

Регламентные задания блокировка

Как не допустить одновременного выполнения каких-либо функций в системе. Например, есть 2 регламентных задания, которые выполняют один и тот же функционал параллельно.

У меня есть регламентное задание, которое выполняет функцию каждые 15 минут. Также функцию может вызвать вручную пользователь. Если функция уже выполняется, то пользователь, запустив ее вручную, рискует получить ошибки в данных.

Чтобы контролировать процесс, первое, что приходит в голову - записывать время старта и время окончания и проверять, выполняется ли функция. Но тут есть вопросы, связанные с обработкой ошибок, выключением сервера или даже падением сессии регламентных заданий.

Придется писать проверки, которые смотрят за статистикой выполнения и если интервал превышен, то...

Но есть способ гораздо проще. Это стандартные блокировки объектов 1С. Для этого у меня есть справочник:

Поле ТипОбъектаКонтроля - это перечисление в котором находятся все разделы функционала вызываемые регламентными заданиями. Стандартная функция, которая осуществляет блокировку:

ОбъектСправочника.Заблокировать();

Если мы в функции, которая выполняется будем проверять блокировку и блокировать элемент справочника. То даже если сессия упадет, или закончится ошибкой, у нас не возникнет ситуации "вечной блокировки".

Немного кода. Очень важно вернуть в вашу функцию объект блокировки. Если этого не сделать, блокировка снимется автоматически.
 

 
&НаСервере
Функция ЗаблокироватьПоТипуОбъектаКонтроля(_ТипОбъектаКонтроля, _Комментарий = "") Экспорт
	
	Результат = Неопределено;
	
	Запрос = Новый Запрос;
	Запрос.Текст = 
		"ВЫБРАТЬ
		|	БлокировкиФункционала.Ссылка
		|ИЗ
		|	Справочник.БлокировкиФункционала КАК БлокировкиФункционала
		|ГДЕ
		|	БлокировкиФункционала.ПометкаУдаления = ЛОЖЬ
		|	И БлокировкиФункционала.ТипОбъектаКонтроля = &ТипОбъектаКонтроля";
	
	Запрос.УстановитьПараметр("ТипОбъектаКонтроля", _ТипОбъектаКонтроля);
	
	РезультатЗапроса = Запрос.Выполнить();
	
	ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();

	Если  Не ВыборкаДетальныеЗаписи.Количество() = 1 Тогда
		Возврат Результат;
	КонецЕсли;
	
	Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
		БФ = ВыборкаДетальныеЗаписи.Ссылка;
		
		БФО = БФ.ПолучитьОбъект();
		
		Попытка
			БФО.Заблокировать();
			БФО.ДатаБлокировки	= ТекущаяДата();
			БФО.Комментарий		= _Комментарий;
			БФО.Записать();
		Исключение
			Результат = Неопределено;
		КонецПопытки;
		
		Результат = БФО;
	КонецЦикла;
	
	Возврат Результат;
	
КонецФункции

&НаСервере
Функция РазблокироватьПоТипуОбъектаКонтроля(_ТипОбъектаКонтроля, _Комментарий = "") Экспорт 
	
	Результат = Неопределено;
	
	Запрос = Новый Запрос;
	Запрос.Текст = 
		"ВЫБРАТЬ
		|	БлокировкиФункционала.Ссылка
		|ИЗ
		|	Справочник.БлокировкиФункционала КАК БлокировкиФункционала
		|ГДЕ
		|	БлокировкиФункционала.ПометкаУдаления = ЛОЖЬ
		|	И БлокировкиФункционала.ТипОбъектаКонтроля = &ТипОбъектаКонтроля";
	
	Запрос.УстановитьПараметр("ТипОбъектаКонтроля", _ТипОбъектаКонтроля);
	
	РезультатЗапроса = Запрос.Выполнить();
	
	ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
	
	Если  Не ВыборкаДетальныеЗаписи.Количество() = 1 Тогда
		Возврат Результат;
	КонецЕсли;

	Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
		БФ = ВыборкаДетальныеЗаписи.Ссылка;
		
		БФО = БФ.ПолучитьОбъект();
		
		Попытка
			БФО.ДатаБлокировки	= ОбщийСерверКеш.ПустаяДата();
			БФО.Комментарий		= "";
			БФО.Записать();
			
			БФО.Разблокировать();
		Исключение
			Результат = Неопределено;
		КонецПопытки;
		
		Результат = БФО;
	КонецЦикла;
	
	Возврат Результат;
	
КонецФункции

&НаСервере
Функция ПроверитьБлокировкуПоТипуОбъектаКонтроля(_ТипОбъектаКонтроля) Экспорт
	
	Результат = Ложь;
	
	Запрос = Новый Запрос;
	Запрос.Текст = 
		"ВЫБРАТЬ
		|	БлокировкиФункционала.Ссылка
		|ИЗ
		|	Справочник.БлокировкиФункционала КАК БлокировкиФункционала
		|ГДЕ
		|	БлокировкиФункционала.ПометкаУдаления = ЛОЖЬ
		|	И БлокировкиФункционала.ТипОбъектаКонтроля = &ТипОбъектаКонтроля";
	
	Запрос.УстановитьПараметр("ТипОбъектаКонтроля", _ТипОбъектаКонтроля);
	
	РезультатЗапроса = Запрос.Выполнить();
	
	ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
	
	Если  Не ВыборкаДетальныеЗаписи.Количество() = 1 Тогда
		Возврат Результат;
	КонецЕсли;

	Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
		БФ = ВыборкаДетальныеЗаписи.Ссылка;
		
		БФО = БФ.ПолучитьОбъект();
		
		Попытка
			БФО.Заблокировать();
		Исключение
			Результат = Истина;
		КонецПопытки;
	КонецЦикла;
	
	Возврат Результат;
	
КонецФункции



 
 

 

Специальные предложения

Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. soft_wind 16.09.19 15:15 Сейчас в теме
а вы сами тестировали свой функционал? там на глаз пара дырок точно есть
1.обход выборки циклом! если есть несколько элементов с одним типом, то блокировки на первые сбросятся
2.при установке блокировки, вы не обрабатываете исключение, и если блокировка не произошла вы всеравно возвращаете объект
и др.
4. 2tvad 66 16.09.19 16:51 Сейчас в теме
(1) Спасибо. Я несколько упростил функции для публикации.
1. Контроль уникальности есть: проверки на дубли значения в справочнике при чтении и записи. Они стопорят функционал и пишут пользователю, в лог на e_mail.
2. Вы правы. Поправлю.
2. VmvLer 16.09.19 16:46 Сейчас в теме
не увидел транзакции - это будет работать без них?
5. 2tvad 66 16.09.19 16:52 Сейчас в теме
(2) Будет работать без транзакций.
6. fancy 12 17.09.19 07:45 Сейчас в теме
Для таких случаев возможно проще создавать предопределенные элементы спр-ка "БлокировкиФункционала" по одному для каждого нужного задания, тогда не нужно искать запросом нужный элемент для блокировки

БФО = Справочники.БлокировкаФункционала.НужныйЭлемент.ПолучитьОбъект();


а так метод рабочий, используем
7. 2tvad 66 17.09.19 11:15 Сейчас в теме
(6) Да, спасибо. Действительно так будет проще.
8. Lapitskiy 986 19.09.19 07:49 Сейчас в теме
Прекрасная идея.

Но если поставить ключ регламентного задания, оно и так не будет выполнятся одновременно.
Или о чем речь ?
9. 2tvad 66 19.09.19 10:09 Сейчас в теме
(8) Ну например, у нас интеграция выполняется по регламентному заданию. Так же пользователь может запустить этот же функционал в ручном режиме, когда интеграция еще не отработала, что может вызвать коллизии. На самом деле у нас есть еще ряд интеграции, которые взаимосвязаны и выполняются с разными интервалами.

Ну например, при передаче данных на сайт, есть идея, сначала подготовить все данные - в виде текста SQL запросов, а потом выполнять их. Т.е. блокировать функционал, нужно будет только во время подготовки SQL запросов, а выполнять их можно уже не обращая внимание на изменение данных другими регламентными заданиями. Т.е. блокировка будет действовать, не 5 минут, а 1 минуту.
Оставьте свое сообщение

См. также

Использование классов .Net в 1С для новичков Промо

Практика программирования Разработка внешних компонент Универсальные функции v7.7 v8 Бесплатно (free)

Руководство для новичков. Написав статью http://infostart.ru/public/238584/, я понял, что многие не понимают того, что написано. Поэтому в этой статье постараюсь более подробно остановиться на азах и без кода на вражеском языке (C#)

27.01.2016    80502    Serginio    113    

Полезные примеры СКД, ч.2

Практика программирования v8 v8::СКД Бесплатно (free)

Еще несколько примеров решения задач в СКД.

06.04.2021    5433    Neti    7    

Неочевидные нюансы записи управляемой формы

Практика программирования v8 v8::УФ Платформа 1C v8.2 1cv8.cf Бесплатно (free)

Разберем несколько нюансов записи управляемой формы.

02.04.2021    6518    SeiOkami    52    

Обзор полезных методов БСП 3.1.4

Практика программирования БСП (Библиотека стандартных подсистем) v8 1cv8.cf Бесплатно (free)

Библиотека стандартных подсистем (далее - БСП) является частью любой типовой конфигурации, поэтому умение применять готовые процедуры и функции повышает качество разработки и избавляет от написания лишнего кода. К сожалению, не у всех есть время и упорство овладеть всей документацией, поэтому я собрал воедино наиболее популярный функционал.

25.03.2021    21336    rayastar    49    

Звуковое управление в 1С 8.3 Промо

Практика программирования v8 1cv8.cf Бесплатно (free)

В данной статье описано создание библиотеки для звукового управления (выполнение команд голосом) для платформы 1С 8.3. Задача была поставлена так, чтобы модуль функционировал непосредственно на клиенте 1С, осуществляя управление формами, и взаимодействовал с интерфейсом.

16.03.2021    3881    velemir    31    

Доработка проведения в ERP 2.5. (Регистры накопления, Регистры сведений)

Практика программирования v8 ERP2 БУ Бесплатно (free)

Покажу точки входа для доработки "типового" проведения документов в ERP для регистров оперативного учета. Рассмотрим три основные ситуации: нужно изменить имеющееся проведение документа; нужно сделать записи в существующие регистры; нужно с нуля описать алгоритм проведения в добавленный регистр. Пример реализован на 1С:ERP Управление предприятием 2 (2.5.4.120)

10.01.2021    7442    BuriyLesha    9    

Serverless (Faas) в 1С. Создание и вызов Yandex Cloud Functions

Универсальные функции Практика программирования v8 Бесплатно (free)

"Я не могу просто взять и скопировать код с гитхаба", "у нас 1С микросервисами окружена", "возможностей мало" - частые фразы 1С разработчиков. которым не хватает возможностей платформы в современном мире. Faas, конечно, история не новая, но нас сдерживало 152ФЗ и задержки по пингам. Для того, чтобы действительно использовать в 1С код, к примеру, на Python, надо было приложить усилия. Теперь всё намного проще - берём и используем.

28.12.2020    5795    comol    31    

Базовые вещи БСП, которые облегчат жизнь программисту 1С

Практика программирования БСП (Библиотека стандартных подсистем) v8 1cv8.cf Россия Бесплатно (free)

В данной публикации я опишу полезные процедуры и функции модуля общего назначения библиотеки стандартных подсистем, обязательные к использованию любым программистом 1С.

30.08.2020    14711    quazare    34    

Использование программных перечислений, ч.1: строковые константы Промо

Практика программирования v8 1cv8.cf Бесплатно (free)

Часто ли у вас возникает необходимость в коде выполнять сравнение на строку?

10.12.2016    39241    unichkin    74    

Форма выбора (подбор) в управляемых формах

Практика программирования v8 v8::УФ 1cv8.cf Россия Бесплатно (free)

Разбор небольших примеров того, как правильно открывать форму выбора (подбора) в управляемых формах, не прибегая к модальным окнам.

08.05.2020    50640    user5300    17    

Программная работа с настройками СКД

Практика программирования v8 v8::СКД 1cv8.cf Бесплатно (free)

Нюансы программной работы с настройками системы компоновки данных в отчетах и динамических списках. Обзор всех видов настроек компоновки. Что в каких случаях правильно применять. В качестве примера рассмотрена работа с отборами и группировками.

27.01.2020    49190    ids79    26    

[СКД] Программное создание схемы компоновки данных

Практика программирования v8 v8::СКД 1cv8.cf Бесплатно (free)

Сделаем отчет на СКД полностью программно, без использования макета "схема компоновки данных".

15.01.2020    35300    John_d    22    

Вспомогательные инструкции в коде 1С Промо

Практика программирования v8 1cv8.cf Бесплатно (free)

Помогаем редактору кода 1С помогать нам писать и анализировать код.

15.10.2018    33396    tormozit    105    

Последовательности событий при проведении документа 1С. Шпаргалка + про формы + про расширения

Практика программирования v8 Россия Бесплатно (free)

Собрал информацию о событиях/подписках/расширениях в одном месте.

30.12.2019    27871    kuzyara    38    

30 задач. Странных и не очень

Практика программирования v8 Бесплатно (free)

30 задач на знание языка программирования 1С и некоторого поведения платформы. Маленьких. Странных и не очень.

02.12.2019    20574    YPermitin    61    

Как передать IP адрес, который вызвал HTTP запрос в 1C (для веб-сервера Apache)

Практика программирования v8 Бесплатно (free)

Столкнулся с задачей получения IP адреса, который вызывает http сервис 1С. Итак, решение:

22.11.2019    10962    Sibars    19    

Оформление и рефакторинг сложных логических выражений Промо

Практика программирования v8 Россия Бесплатно (free)

В сложных логических выражениях нередко самому автору спустя какое-то время тяжело разобраться, не говоря уже о других программистах. Предлагаемая методика позволяет повысить наглядность таких выражений путем оформления в виде И-ИЛИ дерева и одновременно выполнять их рефакторинг.

20.09.2012    80432    tormozit    131    

Полезные процедуры и функции для программиста

Практика программирования Универсальные функции v8 1cv8.cf Россия Бесплатно (free)

Все мы пишем программный код и часто используем процедуры, облегчающие его написание. Ниже приведена выборка таких полезных процедур и функций.

07.10.2019    35428    HostHost    41    

Таблица значений. Нюансы

Практика программирования v8 Бесплатно (free)

Обзор некоторых аспектов использования общеизвестного инструмента 1С.

01.10.2019    45355    Yashazz    50    

О программе Postman для тестирования API и для чего она нужна 1С-нику

Практика программирования Программное обеспечение (software) v8 Бесплатно (free)

Для чего нужна программа Postman для тестирования API и какая от него польза для 1С-программиста.

24.09.2019    16742    budidich    29    

Запись значения в поле ввода/формы со срабатыванием события ПриИзменении Промо

Практика программирования v8 1cv8.cf Россия Бесплатно (free)

Иногда возникает необходимость после записи значения в какое либо поле ввода/формы вызвать для него обработчик события ПриИзменении, а о вызове самого события приходится только мечтать. В этой статье приводится программный способ вызова этого события.

11.07.2007    51441    tormozit    51    

[Шпаргалка] Программное создание элементов формы

Практика программирования Работа с интерфейсом v8 1cv8.cf Бесплатно (free)

Программное создание практически всех популярных элементов формы.

06.09.2019    79816    rpgshnik    70    

Агрегатные функции СКД, о которых мало кто знает

Практика программирования v8 v8::СКД 1cv8.cf Бесплатно (free)

Пользуетесь ли Вы всеми возможными агрегатными функциями, которые предоставляет система компоновки данных? Если Вы используете только: СУММА, КОЛИЧЕСТВО, МИНИМУМ, МАКСИМУМ, СРЕДНЕЕ, то эта статья для Вас.

05.09.2019    65419    ids79    55    

Регистры бухгалтерии. Общая информация

Практика программирования Математика и алгоритмы v8 v8::БУ БУ Бесплатно (free)

Общая информация о внутреннем устройстве регистров бухгалтерии.

05.09.2019    37864    YPermitin    25    

Как сделать из &НаКлиентеНаСервереБезКонтекста почти &НаКлиентеНаСервере Промо

Практика программирования v8 1cv8.cf Россия Бесплатно (free)

Как сделать метод формы, доступный на клиенте и на сервере одновременно, и сохранить при этом удобство разработки

10.09.2017    48219    tormozit    74    

Три костыля. Сказ про фокусы в коде

Практика программирования v8 Бесплатно (free)

Три интересных (или странных) костыля в коде, которые могут помочь в повседневных и не очень задачах.

03.09.2019    28077    YPermitin    81    

Отслеживание выполнения фонового задания

Практика программирования Универсальные функции Разработка v8 1cv8.cf Бесплатно (free)

Запуск фонового задания из модуля внешней обработки. Отслеживание выполнения задания в виде прогресса, расположенного на форме.

17.08.2019    39765    ids79    19    

Функции СКД: ВычислитьВыражение, ВычислитьВыражениеСГруппировкойМассив

Практика программирования v8 v8::СКД 1cv8.cf Бесплатно (free)

Подробное описание и использование внутренних функций системы компоновки данных: Вычислить, ВычислитьВыражение, ВычислитьВыражениеСГруппировкойМассив, ВычислитьВыражениеСГруппировкойТаблицаЗначений.

08.08.2019    124220    ids79    72    

Выгрузка документа по условию Промо

Практика программирования Разработка v8 Бесплатно (free)

Что делать, если документы нужно выгружать не все подряд, а по какому-то фильтру: статусу, дате, набору условий... А что если он соответствовал этим условиям, а потом перестал? А если потом опять начал? Такие ситуации заставили попотеть не одного программиста.

25.04.2019    16834    m-rv    3    

Фоновое выполнение кода в 1С - это просто

Практика программирования v8 1cv8.cf Бесплатно (free)

Как легко запускать выполнение в фоне, не прибегая к долгому описанию фоновых процедур.

02.08.2019    50535    avalakh    26    

Разбираемся с параметрами редактирования СКД

Практика программирования v8 v8::СКД 1cv8.cf Бесплатно (free)

Связь по типу, Параметры выбора, Связи параметров выбора

31.07.2019    34109    json    15    

СКД - наборы данных и связи между ними, создание собственной иерархии, вложенные отчеты

Практика программирования v8 v8::СКД 1cv8.cf Бесплатно (free)

Набор данных объект. Использование в схеме компоновки нескольких наборов данных. Различные варианты связи наборов: объединение, соединение. Использование иерархии в отчетах на СКД. Создание собственной иерархии, иерархия детальных записей. Использование вложенных схем в отчетах на СКД.

26.07.2019    88063    ids79    14    

Как прикрутить ГУИД к регистру сведений Промо

Практика программирования Перенос данных из 1C8 в 1C8 Разработка v8 Бесплатно (free)

... и немного теории обмена данными. В частности, разберем боль всех, кто пишет небанальные обмены данными: как набору записей регистра сведений назначить гуид и далее использовать его в обмене для идентификации этого набора.

16.04.2019    21528    m-rv    17    

СКД - использование расширений языка запросов, секция ХАРАКТЕРИСТИКИ

Инструментарий разработчика Практика программирования v8 v8::СКД Бесплатно (free)

Автоматическое и не автоматическое заполнение полей компоновки данных. Использование расширений языка запросов для СКД «{…}», секция ВЫБРАТЬ, секция ГДЕ, параметры виртуальных таблиц. Автоматизированное использование дополнительных данных в запросе: секция ХАРАКТЕРИСТИКИ.

17.07.2019    43053    ids79    27    

Регистры сведений. За кулисами

Практика программирования Разработка v8 1cv8.cf Бесплатно (free)

Небольшие заметки по внутреннему устройству регистров сведений.

09.07.2019    30554    YPermitin    14    

"Меньше копипаста!", или как Вася универсальную процедуру писал

Практика программирования Разработка v8 v8::СКД 1cv8.cf Бесплатно (free)

Программист Вася разбирает подход создания универсальных методов на примере программного вывода СКД.

04.07.2019    20884    SeiOkami    52    

Как сделать запрос на изменение данных Промо

Практика программирования v8 v8::Запросы 1cv8.cf Бесплатно (free)

В статье приведены особенности внутренней архитектуры и примеры работы с расширением языка запросов 1С.

01.06.2018    33812    m-rv    22    

Работа с настройками системы компоновки данных

Практика программирования v8 v8::СКД 1cv8.cf Бесплатно (free)

Варианты отчетов, работа с настройками вариантов: структура группировок, поля отчета, отборы, сортировка, условное оформление, другие настройки, настройки отображения диаграмм.

02.07.2019    69304    ids79    17    

Создание отчетов с помощью СКД - основные понятия и элементы

Практика программирования Математика и алгоритмы v8 v8::СКД Бесплатно (free)

Основные принципы работы СКД. Понятия схемы компоновки и макета компоновки. Описание основных элементов схемы компоновки: наборы данных, поля, вычисляемые поля, ресурсы, параметры.

25.06.2019    66517    ids79    26    

Многопоточное ускорение однопользовательских нагрузок в 1С + Microsoft SQL Server 2017

Практика программирования Производительность и оптимизация (HighLoad) v8 v8::Запросы Бесплатно (free)

Взаимодействие с Microsoft SQL Server нередко вызывает трудности у 1С-ников, а потому интересны любые моменты, связанные с его использованием. О своем опыте работы с новым SQL Server 2017 участникам конференции Infostart-2018 рассказал директор ООО «Аналитика софт» Дмитрий Дудин.

11.06.2019    28314    dmurk    148    

Метод формирования движений в типовых регистрах нетиповыми регистраторами Промо

Практика программирования v8 1cv8.cf Бесплатно (free)

Вариант решения задач с проведением по типовым регистрам нетиповыми регистраторами. Зачем - чтобы при сравнении конфигурации не обращать внимание на свойства регистров и исключить вероятность допущения горькой оплошности при обновлении информационных баз, заменив типы регистраторов основной конфигурации типами конфигурации поставщика. Для программных продуктов, имеющих в своем составе метаданных документ "Корректировка регистров"("Корректировка записей регистров").

05.12.2017    29288    itriot11    34    

Регистры накопления. Структура хранения в базе данных

Практика программирования Разработка v8 1cv8.cf Бесплатно (free)

Структура хранения регистров накопления в базе данных для платформы 1С:Предприятие 8.x. Первая часть в серии публикаций.

16.05.2019    55079    YPermitin    30    

О расширениях замолвите слово...

Практика программирования Разработка v8 Бесплатно (free)

О чём стоит задуматься при принятии решения о создании расширения конфигурации…

07.04.2019    39877    ellavs    130    

Git-репозитории для 1С-кода (опыт использования при небольших проектах)

Практика программирования v8 Бесплатно (free)

Инструкции по взаимодействию с Git-репозиторием, которые писались для тех наших программистов, которые вообще никогда не работали с Git (руководства в духе "Как получить код из git-репозитория?", "Как отправить код в git-репозиторий")...

28.03.2019    29763    ellavs    90    

Автоматические и управляемые блокировки применительно к типовым конфигурациям 1С Промо

Математика и алгоритмы Практика программирования v8 v8::blocking 1cv8.cf Бесплатно (free)

Основные принципы работы с режимами автоматических и управляемых блокировок в 1С Предприятие 8. Теория и применение в типовых конфигурациях: БП, УТ, ЕРП

10.11.2018    40255    ids79    44    

Трюки с внешними источниками данных

Практика программирования Разработка v8 1cv8.cf Бесплатно (free)

Некоторые трюки для преодоления ограничений внешних источников данных.

14.03.2019    37100    YPermitin    53    

Ошибки при работе с хранилищем конфигурации и способы их решения

Практика программирования v8 Бесплатно (free)

В статье собраны наиболее распространенные ошибки при работе с хранилищем конфигурации и способы их обхода и решения.

01.03.2019    55893    Смешной 1С    32    

Разработка и сценарное тестирование с Vanessa-ADD. Отчетность Allure. Автоматизация запуска сценариев

Практика программирования Vanessa Automation v8 Россия Бесплатно (free)

Формируем отчетность о результатах выполнения сценариев. Автоматизируем запуск.

26.02.2019    25826    Vladimir Litvinenko    28