СоздатьЗаписьДоступныеЛицензии (БСП)

Создать запись доступные лицензии. Создает запись в РС "ДоступныеЛицензии".

// Создает запись в РС "ДоступныеЛицензии".
//
// Параметры:
//  ИдентификаторПодписки - УникальныйИждентификатор - идентификатор подписки.
//  Услуга - Справочникссылка.Услуги - услуга.
//  ДатаНачалаДействия - Дата - дата начала действия услуги.
//  ДатаОкончанияДействия - Дата - дата окончания дейтсвия подписки.
//  НомерПодписки - Стркоа - номер подписки.
//  КоличествоДоступныхЛицензий - Число - количество доступных лицензий (если "-1", значит количество доступных лицензий
//                                        неограниченно).
//
Процедура СоздатьЗаписьДоступныеЛицензии(Знач ИдентификаторПодписки, Знач Услуга, Знач ДатаНачалаДействия, 
	Знач ДатаОкончанияДействия, Знач НомерПодписки, Знач КоличествоДоступныхЛицензий = 0) Экспорт
	
	Запись = РегистрыСведений.ДоступныеЛицензии.СоздатьМенеджерЗаписи();
	Запись.ИдентификаторПодписки = ИдентификаторПодписки;
	Запись.Услуга = Услуга;
	Запись.ДатаНачалаДействия = ДатаНачалаДействия;
	Запись.ДатаОкончанияДействия = ДатаОкончанияДействия;
	Запись.НомерПодписки = НомерПодписки;
	Запись.КоличествоЛицензий = КоличествоДоступныхЛицензий;
	Запись.ДатаИзменения = ТекущаяДатаСеанса();
	Запись.Записать();
	
	ПараметрыЛицензии = ОбщегоНазначения.СтруктураПоМенеджеруЗаписи(Запись, Метаданные.РегистрыСведений.ДоступныеЛицензии);
	ТарификацияПереопределяемый.ПриОбновленииДоступныхЛицензий(ПараметрыЛицензии);
	
КонецПроцедуры

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

// Создает запись в РС "ДоступныеЛицензии".
//
// Параметры:
//  ИдентификаторПодписки - УникальныйИждентификатор - идентификатор подписки.
//  Услуга - Справочникссылка.Услуги - услуга.
//  ДатаНачалаДействия - Дата - дата начала действия услуги.
//  ДатаОкончанияДействия - Дата - дата окончания дейтсвия подписки.
//  НомерПодписки - Стркоа - номер подписки.
//  КоличествоДоступныхЛицензий - Число - количество доступных лицензий (если "-1", значит количество доступных лицензий
//                                        неограниченно).
//
Процедура СоздатьЗаписьДоступныеЛицензии(Знач ИдентификаторПодписки, Знач Услуга, Знач ДатаНачалаДействия, 
	Знач ДатаОкончанияДействия, Знач НомерПодписки, Знач КоличествоДоступныхЛицензий = 0) Экспорт
	
	Запись = РегистрыСведений.ДоступныеЛицензии.СоздатьМенеджерЗаписи();
	Запись.ИдентификаторПодписки = ИдентификаторПодписки;
	Запись.Услуга = Услуга;
	Запись.ДатаНачалаДействия = ДатаНачалаДействия;
	Запись.ДатаОкончанияДействия = ДатаОкончанияДействия;
	Запись.НомерПодписки = НомерПодписки;
	Запись.КоличествоЛицензий = КоличествоДоступныхЛицензий;
	Запись.ДатаИзменения = ТекущаяДатаСеанса();
	Запись.Записать();
	
	ПараметрыЛицензии = ОбщегоНазначения.СтруктураПоМенеджеруЗаписи(Запись, Метаданные.РегистрыСведений.ДоступныеЛицензии);
	ТарификацияПереопределяемый.ПриОбновленииДоступныхЛицензий(ПараметрыЛицензии);
	
КонецПроцедуры

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