ПоследнееОбновлениеДоступа (БСП)

Последнее обновление доступа. Для функции ЗапуститьОбновлениеДоступаНаУровнеЗаписей и

// Для функции ЗапуститьОбновлениеДоступаНаУровнеЗаписей и
// процедур ОбновлениеДоступаНаУровнеЗаписей, ОтменитьОбновлениеДоступаНаУровнеЗаписей и
// формы ОбновлениеДоступаНаУровнеЗаписей.
//
Функция ПоследнееОбновлениеДоступа(ТекущееЗначение = Неопределено) Экспорт
	
	Если ТекущееЗначение = Неопределено Тогда
		Запрос = Новый Запрос;
		Запрос.Текст =
		"ВЫБРАТЬ
		|	ПоследнееОбновлениеДоступа.Значение КАК Значение
		|ИЗ
		|	Константа.ПоследнееОбновлениеДоступа КАК ПоследнееОбновлениеДоступа";
		
		Выборка = Запрос.Выполнить().Выбрать();
		ТекущееЗначение = ?(Выборка.Следующий(), Выборка.Значение, Неопределено);
	КонецЕсли;
	
	Свойства = Новый Структура;
	Свойства.Вставить("ДатаЗапускаНаСервере",      '00010101');
	Свойства.Вставить("ДатаЗавершенияНаСервере",   '00010101');
	Свойства.Вставить("ОбновлениеОтменено",        Ложь);
	Свойства.Вставить("ПоследнееВыполнениеСекунд", 0);
	Свойства.Вставить("ТекстОшибкиЗавершения",     "");
	Свойства.Вставить("НомерСеанса",               0);
	Свойства.Вставить("НачалоСеанса",              '00010101');
	Свойства.Вставить("ИмяКомпьютера",             "");
	Свойства.Вставить("ОбновлениеДоступаЗапрещено", Ложь);
	Свойства.Вставить("ИдентификаторФоновогоЗадания",
		ОбщегоНазначенияКлиентСервер.ПустойУникальныйИдентификатор());
	Свойства.Вставить("ПоследнееПланированиеОбработкиУстаревшихЭлементов", '00010101');
	
	Если ТипЗнч(ТекущееЗначение) <> Тип("ХранилищеЗначения") Тогда
		Возврат Свойства;
	КонецЕсли;
	
	ТекущиеСвойства = ТекущееЗначение.Получить();
	
	Если ТипЗнч(ТекущиеСвойства) <> Тип("Структура") Тогда
		Возврат Свойства;
	КонецЕсли;
	
	ЗаполнитьЗначенияСвойств(Свойства, ТекущиеСвойства);
	
	Возврат Свойства;
	
КонецФункции

///////////////////////////////////////////////////////////////////////////////////////////////////////
// Copyright (c) 2019, ООО 1С-Софт
// Все права защищены. Эта программа и сопроводительные материалы предоставляются 
// в соответствии с условиями лицензии Attribution 4.0 International (CC BY 4.0)
// Текст лицензии доступен по ссылке:
// https://creativecommons.org/licenses/by/4.0/legalcode
///////////////////////////////////////////////////////////////////////////////////////////////////////

// Для функции ЗапуститьОбновлениеДоступаНаУровнеЗаписей и
// процедур ОбновлениеДоступаНаУровнеЗаписей, ОтменитьОбновлениеДоступаНаУровнеЗаписей и
// формы ОбновлениеДоступаНаУровнеЗаписей.
//
Функция ПоследнееОбновлениеДоступа(ТекущееЗначение = Неопределено) Экспорт
	
	Если ТекущееЗначение = Неопределено Тогда
		Запрос = Новый Запрос;
		Запрос.Текст =
		"ВЫБРАТЬ
		|	ПоследнееОбновлениеДоступа.Значение КАК Значение
		|ИЗ
		|	Константа.ПоследнееОбновлениеДоступа КАК ПоследнееОбновлениеДоступа";
		
		Выборка = Запрос.Выполнить().Выбрать();
		ТекущееЗначение = ?(Выборка.Следующий(), Выборка.Значение, Неопределено);
	КонецЕсли;
	
	Свойства = Новый Структура;
	Свойства.Вставить("ДатаЗапускаНаСервере",      '00010101');
	Свойства.Вставить("ДатаЗавершенияНаСервере",   '00010101');
	Свойства.Вставить("ОбновлениеОтменено",        Ложь);
	Свойства.Вставить("ПоследнееВыполнениеСекунд", 0);
	Свойства.Вставить("ТекстОшибкиЗавершения",     "");
	Свойства.Вставить("НомерСеанса",               0);
	Свойства.Вставить("НачалоСеанса",              '00010101');
	Свойства.Вставить("ИмяКомпьютера",             "");
	Свойства.Вставить("ОбновлениеДоступаЗапрещено", Ложь);
	Свойства.Вставить("ИдентификаторФоновогоЗадания",
		ОбщегоНазначенияКлиентСервер.ПустойУникальныйИдентификатор());
	Свойства.Вставить("ПоследнееПланированиеОбработкиУстаревшихЭлементов", '00010101');
	
	Если ТипЗнч(ТекущееЗначение) <> Тип("ХранилищеЗначения") Тогда
		Возврат Свойства;
	КонецЕсли;
	
	ТекущиеСвойства = ТекущееЗначение.Получить();
	
	Если ТипЗнч(ТекущиеСвойства) <> Тип("Структура") Тогда
		Возврат Свойства;
	КонецЕсли;
	
	ЗаполнитьЗначенияСвойств(Свойства, ТекущиеСвойства);
	
	Возврат Свойства;
	
КонецФункции

///////////////////////////////////////////////////////////////////////////////////////////////////////
// Copyright (c) 2019, ООО 1С-Софт
// Все права защищены. Эта программа и сопроводительные материалы предоставляются 
// в соответствии с условиями лицензии Attribution 4.0 International (CC BY 4.0)
// Текст лицензии доступен по ссылке:
// https://creativecommons.org/licenses/by/4.0/legalcode
///////////////////////////////////////////////////////////////////////////////////////////////////////