Удалить занятую лицензию.
Процедура УдалитьЗанятуюЛицензию(Знач ДанныеОЛицензии) Экспорт
Услуга = Тарификация.УслугаПоИдентификаторуИИдентификаторуПоставщика(ДанныеОЛицензии.ServiceID,
ДанныеОЛицензии.ServiceProviderID);
Набор = РегистрыСведений.ЗанятыеЛицензии.СоздатьНаборЗаписей();
Набор.Отбор.Услуга.Установить(Услуга);
Набор.Отбор.ИдентификаторЛицензии.Установить(ДанныеОЛицензии.ID);
Набор.Отбор.КонтекстЛицензии.Установить(ДанныеОЛицензии.LicenseContext);
УстановитьПривилегированныйРежим(Истина);
Набор.Записать();
УстановитьПривилегированныйРежим(Ложь);
КонецПроцедуры
///////////////////////////////////////////////////////////////////////////////////////////////////////
// Copyright (c) 2019, ООО 1С-Софт
// Все права защищены. Эта программа и сопроводительные материалы предоставляются
// в соответствии с условиями лицензии Attribution 4.0 International (CC BY 4.0)
// Текст лицензии доступен по ссылке:
// https://creativecommons.org/licenses/by/4.0/legalcode
///////////////////////////////////////////////////////////////////////////////////////////////////////
УдалитьДанныеПоЛицензиям (БСП)
ОчиститьВсеСвоиКромеЗанятых (БСП)
УдалитьДанныеПоЛицензиямВПриложенииАбонента (БСП)
ОбновитьДанныеПоЛицензиям (БСП)
Канал FastCode 1C в Телеграм! Шаблоны кода, статьи, полезные советы, курсы по 1С (8К участников)