управляемый » Поиск

Результаты по ключевому слову: управляемый

Внешние источники данных Категория: Встроенные Функции

Управляемый режим блокировки данных

Вопрос: Как использовать управляемый режим блокировки данных?
Ответ: Рассмотрим на примере удаления записей из регистра сведений.
1. В свойствах объекта, для которого используется управляемый режим блокировки данных установить поле «Режим управления блокировкой данных» в значение «Управляемый» (иначе будет сообщение об ошибке «Автоматический режим блокировки недопустим в этой транзакции»). Причем если это делается для документа, то необходимо перевести в этот же режим блокировки все регистры, в которых делает движения этот документ.
2. Пример кода управляемой блокировки регистра при удалении из него записи:
Например:

Код 1C v 8.х

 Процедура ОчиститьЗаПериод()

	Пока Истина Цикл

		НачатьТранзакцию(РежимУправленияБлокировкойДанных.Управляемый);

		Попытка

			текЗапрос = новый Запрос;

			текЗапрос.Текст = 



			"ВЫБРАТЬ

			|	усИсторияОстатковПоПоказателям.Склад,

			|	усИсторияОстатковПоПоказателям.Поклажедатель,

			|	усИсторияОстатковПоПоказателям.Показатель,

			|	усИсторияОстатковПоПоказателям.Период

			|ИЗ

			|	РегистрСведений.усИсторияОстатковПоПоказателям КАК усИсторияОстатковПоПоказателям

			|ГДЕ

			|	усИсторияОстатковПоПоказателям.Период МЕЖДУ &ПериодС И &ПериодПо";



			текЗапрос.УстановитьПараметр("ПериодС", ГраницаОчисткиС);

			текЗапрос.УстановитьПараметр("ПериодПо", ГраницаОчисткиПо);

			тбзЗаписиЖурнала = текЗапрос.Выполнить().Выгрузить();



			// Блокировка данных

			текБлокировка = Новый БлокировкаДанных;

			тбдЖурнал = текБлокировка.Добавить("РегистрСведений.усИсторияОстатковПоПоказателям");

			тбдЖурнал.Режим = РежимБлокировкиДанных.Исключительный;

			Если тбзЗаписиЖурнала.Количество() тогда

				тбдЖурнал.ИсточникДанных = тбзЗаписиЖурнала;

				тбдЖурнал.ИспользоватьИзИсточникаДанных("Склад", "Склад");

				тбдЖурнал.ИспользоватьИзИсточникаДанных("Поклажедатель", "Поклажедатель");

				тбдЖурнал.ИспользоватьИзИсточникаДанных("Показатель", "Показатель");



				// Заблокировать

				текБлокировка.Заблокировать();



				Для каждого текЗаписьЖурнала из тбзЗаписиЖурнала цикл

					текЗапись = РегистрыСведений.усИсторияОстатковПоПоказателям.СоздатьМенеджерЗаписи();

					ЗаполнитьЗначенияСвойств(текЗапись, текЗаписьЖурнала);

					текЗапись.Удалить();

				КонецЦикла;



			КонецЕсли;



			ЗафиксироватьТранзакцию();

			Прервать;



		Исключение // сообщим об ошибке

			стрОписаниеОшибки = ОписаниеОшибки();

			ОтменитьТранзакцию();

			Сообщить("Ошибка блокировки" + ОписаниеОшибки());

			Прервать;

		КонецПопытки;

	КонецЦикла;

КонецПроцедуры // ОчиститьЗаПериод()

Источник

Категория: Встроенные Функции

Кнопка ~ Программное добавление на управляемую форму поля или кнопки?

Код 1C v 8.2 УП

 &НаСервере

Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)

   

    // Добавляем новый реквизит в форму

    ДобавляемыеРеквизиты = Новый Массив;

    Реквизит = Новый РеквизитФормы("Реквизит1", Новый ОписаниеТипов("Строка"), , "Введите строку", Истина);

    ДобавляемыеРеквизиты.Добавить(Реквизит);

    ИзменитьРеквизиты(ДобавляемыеРеквизиты);

   

    //Добавляем новое поле ввода на форму

    Элемент = ЭтаФорма.Элементы.Добавить("Поле", Тип("ПолеФормы"), ЭтаФорма);

    Элемент.Вид = ВидПоляФормы.ПолеВвода;

    Элемент.ПутьКДанным = "Реквизит1";

   

    //Добавляем новую команду

    Кмд = ЭтаФорма.Команды.Добавить("Команда1");

    Кмд.Действие = "НажатиеКнопки";

    Кмд.Заголовок = "Нажатие кнопки";

   

    //Добавляем новую кнопку

    Элемент2 = ЭтаФорма.Элементы.Добавить("Кнопка1", Тип("КнопкаФормы"), ЭтаФорма);

    Элемент2.Вид = ВидКнопкиФормы.ОбычнаяКнопка;

    Элемент2.ИмяКоманды = "Команда1";

   

КонецПроцедуры



&НаКлиенте

Процедура НажатиеКнопки()

    // Вставить содержимое обработчика.

    ЭтаФорма.Реквизит1 = "Готово";

   

КонецПроцедуры

Программное добавление кнопок в управляемый интерфейс
Если упрощенно, то помог код следующего содержания:

Код 1C v 8.2 УП

 &НаСервере

Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)

    Для Каждого ТекИмяКнопки Из Параметры.МассивИменКнопок Цикл

        КомандаФормы  = Команды.Добавить(ТекИмяКнопки);

        КомандаФормы.Действие = "ПроцедураОбработкиНажатия";

        Элементы.Добавить(ТекИмяКнопки,Тип("КнопкаФормы"), Элементы.ПоПравилуОбработкиПодменю);

        Элементы[ТекИмяКнопки].Заголовок = ТекИмяКнопки;

        Элементы[ТекИмяКнопки].ИмяКоманды = ТекИмяКнопки;

    КонецЦикла

КонецПроцедуры

Параметры.МассиИменКнопок – Массив, в котором содержаться имена создаваемых кнопок.
Элементы.ПоПравилуОбработкиПодменю – группа подменю, в которую добавляются кнопки.
«ПроцедураОбработкиНажатия» – имя процедуры, которая объявлена на стороне клиента. Именно ей будет передаваться управление в случае нажатия кнопки. Идентификацию того, какая именно кнопка была нажата проводил по имени команды.

Код 1C v 8.2 УП

 &НаКлиенте

Процедура ПроцедураОбработкиНажатия(Элемент)

    Состояние("Выполняется нажатие кнопки с командой" + Элемент.Имя);

КонецПроцедуры

Следует отметить, что обязательно создание команд. Если кнопке не определить имя команды, то платформа такую кнопку не покажет.

Категория: Работа с Формой (Диалог) и её элементами

Как начать транзакцию в режиме управляемых транзакционных блокировок?

У метода системы НачатьТранзакцию() есть параметр, с помощью которого можно указать режим управления.

Код 1C v 8.х

 // Указание режима открываемой транзакции

// Транзакция предназначена для записи в информационную базу согласованных изменений. 

// Все изменения, внесенные в информационную базу после начала транзакции,

// будут затем либо целиком записаны, либо целиком отменены. 

НачатьТранзакцию(РежимУправленияБлокировкойДанных.Управляемый); 

	

	// Код, исполняемый в рамках транзакции.

	// ...	

   

  Если ОбнаруженыОшибки Тогда 

   // Отменяем открытую ранее транзакцию.

   // Все изменения, внесенные в информационную базу в процессе транзакции, будут отменены.   

   ОтменитьТранзакцию();

   КонецЕсли;



// Завершаем успешную транзакцию. 

// Все изменения, внесенные в информационную базу в процессе транзакции, будут записаны. 

ЗафиксироватьТранзакцию();

Следует помнить, что «вложенных» транзакций в системе 1С:Предприятие 8 нет. Также надо иметь в виду, что параметр «действует» только в том случае, если в свойстве конфигурации Режим управления блокировкой данных выбрано значение Автоматический и управляемый. Если для конфигурации установлен режим Автоматический, то все транзакции будут исполняться в автоматическом режиме; если Управляемый, то в управляемом режиме.

Пример:

Код 1C v 8.х

 // Увеличение закупочной цены на 5%

ВыборкаТоваров = Справочники.Номенклатура.Выбрать();

НачатьТранзакцию();

Пока ВыборкаТоваров.Следующий() Цикл

    ТоварОбъект = ВыборкаТоваров.ПолучитьОбъект();

    ЗакупочнаяЦена = ТоварОбъект.ЗакупочнаяЦена;

    Если ЗакупочнаяЦена <> 0 Тогда

        ТоварОбъект.ЗакупочнаяЦена = ЗакупочнаяЦена * 1.05;

        ТоварОбъект.Записать();

    КонецЕсли;

КонецЦикла;

ЗафиксироватьТранзакцию();

Категория: Встроенные Функции