diff --git a/extension/src/ChartsOfCharacteristicTypes/ПС_ВидыЗначенийНастроек.xml b/extension/src/ChartsOfCharacteristicTypes/ПС_ВидыЗначенийНастроек.xml new file mode 100644 index 0000000..f60204d --- /dev/null +++ b/extension/src/ChartsOfCharacteristicTypes/ПС_ВидыЗначенийНастроек.xml @@ -0,0 +1,185 @@ + + + + + + 8d5a99cd-d7ca-445d-a8e9-e7fd2ee4eda9 + 5b6c191f-635e-47bf-988d-6b89e02c21df + + + 67eaa487-1ab2-4c5d-9b69-307a0c5807e2 + c0478010-5618-402d-bcc5-3efdf575661d + + + 51e77e14-cd35-4b1c-96f5-2f423fe9205b + af42f2bb-5094-4fb3-a086-8572e9c4c357 + + + a513673c-c4bf-4fc1-9600-7b2b0b721003 + 23416a9b-3280-49f3-a37d-8d656406377f + + + 6856a5fc-5441-43d7-b052-1b37118f639e + 3ee47073-477d-4353-a355-740914fa9603 + + + c8e5c8c4-f917-488b-a662-fd90197bcbda + 0b101c09-1ca3-4f6c-bda0-c14f60f2b0c7 + + + + ПС_ВидыЗначенийНастроек + + + ru + Виды настроек + + + + true + false + + + cfg:CatalogRef.Склады + cfg:CatalogRef.ПС_ВидыТехники + cfg:CatalogRef.ПС_ТиповыеКонфигурации1СПредприятие + cfg:CatalogRef.ПС_ВидыРасходныхМатериаловДляВидовРабот + cfg:CatalogRef.ТарифныеПланы + cfg:CatalogRef.Сотрудники + cfg:CatalogRef.ПС_Конфигурации1СПредприятиеКонтрагентов + cfg:CatalogRef.ДоговорыКонтрагентов + cfg:CatalogRef.ПС_Техника + cfg:CatalogRef.ПС_РасходныеМатериалы + xs:boolean + cfg:CatalogRef.ПС_ВидыКартриджей + cfg:CatalogRef.КонтактныеЛица + cfg:CatalogRef.НоменклатурныеГруппы + cfg:CatalogRef.ПС_ВидыРабот + xs:string + cfg:CatalogRef.Контрагенты + cfg:CatalogRef.ПС_Картриджи + xs:dateTime + cfg:CatalogRef.ПС_ФирмыПроизводителиПрограммногоОбеспечения + cfg:CatalogRef.ПС_РолиПользователей + xs:decimal + cfg:CatalogRef.ПС_Конфигурации1СПредприятиеОрганизации + cfg:CatalogRef.Пользователи + cfg:CatalogRef.СтатьиЗатрат + cfg:CatalogRef.Организации + cfg:CatalogRef.ПС_МоделиТехники + cfg:CatalogRef.Номенклатура + cfg:CatalogRef.ПС_ФирмыПроизводителиТехники + cfg:CatalogRef.ПС_МоделиКартриджей + cfg:CatalogRef.ФизическиеЛица + + 10 + 0 + Any + + + 250 + Variable + + + Date + + + true + true + 9 + Variable + 100 + WholeCharacteristicKind + true + true + AsDescription + + Auto + InDialog + false + BothWays + + ChartOfCharacteristicTypes.ПС_ВидыЗначенийНастроек.StandardAttribute.Description + ChartOfCharacteristicTypes.ПС_ВидыЗначенийНастроек.StandardAttribute.Code + + DontUse + Begin + Directly + DontUse + Auto + + + + + + + + + + + + + Managed + Use + + + + + ru + Редактирование настроек + + + + + DontUse + false + false + + + + + Имя + + + ru + Наименование для разработчиков + + + + + xs:string + + 50 + Variable + + + false + + + + false + + false + false + + + false + + DontCheck + Items + + + Auto + Auto + + + Auto + Index + ForItem + Use + Use + + + + + \ No newline at end of file diff --git a/extension/src/ChartsOfCharacteristicTypes/ПС_ВидыЗначенийНастроек/Ext/ObjectModule.bsl b/extension/src/ChartsOfCharacteristicTypes/ПС_ВидыЗначенийНастроек/Ext/ObjectModule.bsl new file mode 100644 index 0000000..62be83e --- /dev/null +++ b/extension/src/ChartsOfCharacteristicTypes/ПС_ВидыЗначенийНастроек/Ext/ObjectModule.bsl @@ -0,0 +1,11 @@ + +Процедура ПередЗаписью(Отказ) + Если Не ЗначениеЗаполнено(Наименование) Тогда + Наименование = Код; + КонецЕсли; + Если Не ЗначениеЗаполнено(Имя) Тогда + Если Не ЭтоГруппа Тогда + Имя = Наименование; + КонецЕсли; + КонецЕсли; +КонецПроцедуры diff --git a/extension/src/ChartsOfCharacteristicTypes/ПС_ВидыЗначенийНастроек/Ext/Predefined.xml b/extension/src/ChartsOfCharacteristicTypes/ПС_ВидыЗначенийНастроек/Ext/Predefined.xml new file mode 100644 index 0000000..2df9637 --- /dev/null +++ b/extension/src/ChartsOfCharacteristicTypes/ПС_ВидыЗначенийНастроек/Ext/Predefined.xml @@ -0,0 +1,618 @@ + + + + Документооборот + 000000010 + Документооборот + + true + + + ВходящиеДокументы + 000000023 + Входящие документы + + true + + + СрокРассмотрения + 000000024 + Срок рассмотрения руководством (дни) + + xs:decimal + + 10 + 0 + Any + + + false + + + + + ИсходящиеДокументы + 000000022 + Исходящие документы + + true + + + СрокКорректировкиИсходящегоДокумента + 000000014 + Срок корректировки исходящего документа (дни) + + xs:decimal + + 10 + 0 + Any + + + false + + + СрокОтправкиИсходящегоДокумента + 000000013 + Срок отправки исходящего документа (дни) + + xs:decimal + + 10 + 0 + Any + + + false + + + СрокПодтвержденияПолученияИсходящегоДокумента + 000000012 + Срок подтверждения получения исходящего документа (дни) + + xs:decimal + + 10 + 0 + Any + + + false + + + СрокСогласованияИсходящегоДокумента + 000000011 + Срок согласования исходящего документа (дни) + + xs:decimal + + 10 + 0 + Any + + + false + + + + + + + Основные + 000000001 + Основные + + true + + + ДатаЗапретаРедактированияДанныхСервиса + 000000006 + Дата запрета редактирования данных сервиса + + xs:dateTime + + Date + + + false + + + КомментироватьСобытия + 000000067 + Комментировать события + + xs:boolean + + false + + + ОсновнаяОрганизация + 000000005 + Основная организация + + d6p1:CatalogRef.Организации + + false + + + ПрефиксQRКодирования + 000000020 + Префикс QR-Кодирования + + xs:boolean + + false + + + + + УчетРабот + 000000002 + Учет работ + + true + + + МонтажСистемыВидеонаблюдения + 000000043 + Монтаж системы видеонаблюдения + + true + + + НоменклатурнаяГруппаДляРаботПоМонтажуСистемыВидеонаблюдения + 000000068 + Номенклатурная группа для работ по монтажу системы видеонаблюдения + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + НоменклатурнаяГруппаДляРаботПоМонтажуСистемыВидеонаблюденияФизическихЛиц + 000000039 + Номенклатурная группа для работ по монтажу системы видеонаблюдения физических лиц + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + ТарифныйПланДляРаботПоМонтажуСистемыВидеонаблюденияФизическихЛиц + 000000066 + Тарифный план для работ по монтажу системы видеонаблюдения физических лиц + + d8p1:CatalogRef.ТарифныеПланы + + false + + + + + Планирование + 000000015 + Планирование + + true + + + КоличествоДнейНаВозвратНаряда + 000000021 + Количество дней на возврат наряда + + xs:decimal + + 10 + 0 + Any + + + false + + + МинутаНачалаРабочегоДня + 000000018 + Начало рабочего дня (минут) + + xs:decimal + + 2 + 0 + Any + + + false + + + ЧасНачалаРабочегоДня + 000000016 + Начало рабочего дня (час) + + xs:decimal + + 2 + 0 + Any + + + false + + + МинутаОкончанияРабочегоДня + 000000019 + Окончание рабочего дня (минут) + + xs:decimal + + 2 + 0 + Any + + + false + + + ЧасОкончанияРабочегоДня + 000000017 + Окончание рабочего дня (час) + + xs:decimal + + 2 + 0 + Any + + + false + + + + + ПрочиеРаботы + 000000047 + Ует прочих работ + + true + + + НоменклатурнаяГруппаДляРаботПоПрочимРаботам + 000000036 + Номенклатурная группа для работ по прочим работам + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + НоменклатурнаяГруппаДляРаботПоПрочимРаботамФизическихЛиц + 000000037 + Номенклатурная группа для работ по прочим работам физических лиц + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + ТарифныйПланДляРаботПоПрочимРаботамФизическихЛиц + 000000057 + Тарифный план для работ по прочим работам физических лиц + + d8p1:CatalogRef.ТарифныеПланы + + false + + + + + Курсы + 000000044 + Учет курсов + + true + + + НоменклатурнаяГруппаДляРаботПоКурсам + 000000040 + Номенклатурная группа для работ по курсам + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + НоменклатурнаяГруппаДляРаботПоКурсамФизическихЛиц + 000000041 + Номенклатурная группа для работ по курсам физических лиц + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + ТарифныйПланДляРаботПоКурсамФизическихЛиц + 000000055 + Тарифный план для работ по курсам физических лиц + + d8p1:CatalogRef.ТарифныеПланы + + false + + + + + КонсультацииПКиОргтехника + 000000060 + Учет работ по выездным и дистанционным консультациям в ПК и оргтехнике + + true + + + НоменклатурнаяГруппаДляВыездныхРаботПоПКиОргтехнике + 000000061 + Номенклатурная группа для выездных работ по ПК и оргтехнике + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + НоменклатурнаяГруппаДляВыездныхРаботПоПКиОргтехникеФизическихЛиц + 000000062 + Номенклатурная группа для выездных работ по ПК и оргтехнике физических лиц + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + ТарифныйПланДляВыездныхРаботПоПКиОргтехникеФизическихЛиц + 000000064 + Тарифный план для выездных работ по ПК и оргтехнике физических лиц + + d8p1:CatalogRef.ТарифныеПланы + + false + + + + + Консультации1С + 000000045 + Учет работ по выездным и дистанционным консультациям в программах "1С:Предприятие" + + true + + + НоменклатурнаяГруппаДляВыездныхРаботПо1С + 000000030 + Номенклатурная группа для выездных работ, связанных с программами "1С:Предприятие" + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + НоменклатурнаяГруппаДляВыездныхРаботПо1СФизическихЛиц + 000000031 + Номенклатурная группа для выездных работ, связанных с программами "1С:Предприятие" физических лиц + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + ТарифныйПланДляВыездныхРаботПо1СФизическихЛиц + 000000059 + Тарифный план для выездных работ, связанных с программами "1С:Предприятие" физических лиц + + d8p1:CatalogRef.ТарифныеПланы + + false + + + + + РаботыПоКартриджу + 000000003 + Учет работ по заправке восстановлению картриджей + + true + + + ВидРаботПоЗаправкеКартриджа + 000000027 + Вид работ для обслуживания ПК и оргтехники физических лиц + + d8p1:CatalogRef.ПС_ВидыРабот + + false + + + НоменклатурнаяГруппаДляРаботПоКартриджу + 000000008 + Номенклатурная группа для работ по картриджу + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + НоменклатурнаяГруппаДляРаботПоКартриджуФизическихЛиц + 000000007 + Номенклатурная группа для работ по картриджу физических лиц + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + ТарифныйПланДляРаботПоКартриджуФизическихЛиц + 000000026 + Тарифный план для работ по картриджу физических лиц + + d8p1:CatalogRef.ТарифныеПланы + + false + + + + + МонтажЛВС + 000000042 + Учет работ по монтажу ЛВС + + true + + + НоменклатурнаяГруппаДляРаботПоМонтажуЛВС + 000000032 + Номенклатурная группа для работ по монтажу ЛВС + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + НоменклатурнаяГруппаДляРаботПоМонтажуЛВСФизическихЛиц + 000000033 + Номенклатурная группа для работ по монтажу ЛВС физических лиц + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + ТарифныйПланДляРаботПоМонтажуЛВСФизическихЛиц + 000000051 + Тарифный план для работ по монтажу ЛВС физических лиц + + d8p1:CatalogRef.ТарифныеПланы + + false + + + + + РаботыПоТехнике + 000000004 + Учет работ по обслуживанию/ремонту техники + + true + + + НоменклатурнаяГруппаДляРаботПоТехнике + 000000028 + Номенклатурная группа для работ по технике + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + НоменклатурнаяГруппаДляРаботПоТехникеФизическихЛиц + 000000029 + Номенклатурная группа для работ по технике физических лиц + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + ТарифныйПланДляРаботПоТехникеФизическихЛиц + 000000049 + Тарифный план для работ по технике физических лиц + + d8p1:CatalogRef.ТарифныеПланы + + false + + + + + РазработкаСайта + 000000046 + Учет работ по разработке сайта + + true + + + НоменклатурнаяГруппаДляРаботПоРазработкеСайта + 000000034 + Номенклатурная группа для работ по разработке сайта + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + НоменклатурнаяГруппаДляРаботПоРазработкеСайтаФизическихЛиц + 000000035 + Номенклатурная группа для работ по разработке сайта физических лиц + + d8p1:CatalogRef.НоменклатурныеГруппы + + false + + + ТарифныйПланДляРаботПоРазработкеСайтаФизическихЛиц + 000000053 + Тарифный план для работ по разработке сайта физических лиц + + d8p1:CatalogRef.ТарифныеПланы + + false + + + + + МаксимальноеКоличествоЧасовНепрерывнойДистанционнойРаботы + 000000069 + Максимальное количество часов непрерывной дистанционной работы + + xs:decimal + + 2 + 0 + Any + + + false + + + ПутьКПапкеСФайломСтатистикиОбращенийУдаленногоОбслуживания + 000000070 + Путь к папке с файлом статистики обращений удаленного обслуживания + + xs:string + + 250 + Variable + + + false + + + ПутьКПапкеСФайломСтатистикиСеансовУдаленногоДоступа + 000000071 + Путь к папке с файлом статистики обращений удаленного обслуживания + + xs:string + + 250 + Variable + + + false + + + СкладРасходныхМатериалов + 000000009 + Склад расходных материалов + + d6p1:CatalogRef.Склады + + false + + + + \ No newline at end of file diff --git a/extension/src/CommonModules/ПС_РаботаСЗначениямиНастроек.xml b/extension/src/CommonModules/ПС_РаботаСЗначениямиНастроек.xml new file mode 100644 index 0000000..ccf9f50 --- /dev/null +++ b/extension/src/CommonModules/ПС_РаботаСЗначениямиНастроек.xml @@ -0,0 +1,23 @@ + + + + + ПС_РаботаСЗначениямиНастроек + + + ru + Работа с настройками + + + + false + false + true + false + false + false + false + DontUse + + + \ No newline at end of file diff --git a/extension/src/CommonModules/ПС_РаботаСЗначениямиНастроек/Ext/Module.bsl b/extension/src/CommonModules/ПС_РаботаСЗначениямиНастроек/Ext/Module.bsl new file mode 100644 index 0000000..8cd857b --- /dev/null +++ b/extension/src/CommonModules/ПС_РаботаСЗначениямиНастроек/Ext/Module.bsl @@ -0,0 +1,551 @@ +Функция ТекущееЗначениеНастройки(Настройка) Экспорт + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ТекущаяДата(), Новый Структура("ВидНастройки",Настройка)).ЗначениеНастройки; +КонецФункции // ЗначениеНастройки(Настройка) + +Функция ТекущееЗначениеНастройкиПоИмени(Имя) Экспорт + Настройка = ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НайтиПоРеквизиту("Имя",Имя); + Если Настройка.Пустая() Тогда + Возврат Неопределено + Иначе + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ТекущаяДата(), Новый Структура("ВидНастройки",Настройка)).ЗначениеНастройки; + КонецЕсли; +КонецФункции // ЗначениеНастройки(Настройка) + +Функция ЗаписатьТекущееЗначениеНастройкиПоИмени(Имя,Значение) Экспорт + РезультатЗаписи = Истина; + Настройка = ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НайтиПоРеквизиту("Имя",Имя); + Если Настройка.Пустая() Тогда + РезультатЗаписи = Ложь; + Иначе + Попытка + ДанныеНастроек = РегистрыСведений.ПС_ЗначенияНастроек.СоздатьМенеджерЗаписи(); + ДанныеНастроек.ВидНастройки = Настройка; + ДанныеНастроек.Период = ТекущаяДата(); + ДанныеНастроек.ЗначениеНастройки = Значение; + ДанныеНастроек.Записать(); + Исключение + РезультатЗаписи = Ложь; + КонецПопытки; + КонецЕсли; + Возврат РезультатЗаписи; +КонецФункции // ЗначениеНастройки(Настройка) + +Функция ЗначениеНастройкиНаДату(Настройка, Дата) Экспорт + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(Дата, Новый Структура("ВидНастройки",Настройка)).ЗначениеНастройки; +КонецФункции // ЗначениеНастройкиНаДату(Настройка) + +Функция ЗначениеНастройкиПоИмениНаДату(Имя, Дата) Экспорт + Настройка = ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НайтиПоРеквизиту("Имя",Имя); + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(Дата, Новый Структура("ВидНастройки",Настройка)).ЗначениеНастройки; +КонецФункции // ЗначениеНастройкиНаДату(Настройка) + +Функция ЗаписатьТекущееЗначениеНастройкиПоИмениНаДату(Имя,Значение,Дата) Экспорт + РезультатЗаписи = Истина; + Настройка = ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НайтиПоРеквизиту("Имя",Имя); + Если Настройка.Пустая() Тогда + РезультатЗаписи = Ложь; + Иначе + Попытка + ДанныеНастроек = РегистрыСведений.ПС_ЗначенияНастроек.СоздатьМенеджерЗаписи(); + ДанныеНастроек.ВидНастройки = Настройка; + ДанныеНастроек.Период = Дата; + ДанныеНастроек.ЗначениеНастройки = Значение; + ДанныеНастроек.Записать(); + Исключение + РезультатЗаписи = Ложь; + КонецПопытки; + КонецЕсли; + Возврат РезультатЗаписи; +КонецФункции // ЗначениеНастройки(Настройка) + +Функция ДатаЗапретаРедактированияДанныхСервиса(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ДатаЗапретаРедактированияДанныхСервиса); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //ОрганизацияПоУмолчанию(Дата = Неопределено) + +Функция ДатаВРазрешенномПериодеРедактирования(ПроверяемаяДата) Экспорт + Возврат НачалоДня(ПроверяемаяДата) > НачалоДня(ДатаЗапретаРедактированияДанныхСервиса(ТекущаяДата())); +КонецФункции // ДатаВЗапрещенномПериодеРедактирования() + + +Функция ОсновнаяОрганизация(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ОсновнаяОрганизация); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //ОрганизацияПоУмолчанию(Дата = Неопределено) + +Функция ОсновнойСкладРасходныхМатериалов(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.СкладРасходныхМатериалов); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //ОрганизацияПоУмолчанию(Дата = Неопределено) + +Функция НоменклатурнаяГруппаДляОбслуживанияПКИОргтехники(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляОбслуживанияПКИОргтехники); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияПКИОргтехники(Дата = Неопределено) + +Функция ВидРаботПоЗаправкеКартриджа(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ВидРаботПоЗаправкеКартриджа); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + +#Область НоменклатурныеГруппыОбслуживанияФизическихЛиц +Функция НоменклатурнаяГруппаДляРаботПоКартриджуФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляРаботПоКартриджуФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция НоменклатурнаяГруппаДляРаботПоТехникеФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляРаботПоТехникеФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция НоменклатурнаяГруппаДляРаботПоМонтажуЛВСФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляРаботПоМонтажуЛВСФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция НоменклатурнаяГруппаДляРаботПоМонтажуСистемыВидеонаблюденияФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляРаботПоМонтажуСистемыВидеонаблюденияФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция НоменклатурнаяГруппаДляРаботПоКурсамФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляРаботПоКурсамФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция НоменклатурнаяГруппаДляВыездныхРаботПо1СФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляВыездныхРаботПо1СФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция НоменклатурнаяГруппаДляВыездныхРаботПоПКиОргтехникеФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляВыездныхРаботПоПКиОргтехникеФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция НоменклатурнаяГруппаДляРаботПоРазработкеСайтаФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляРаботПоРазработкеСайтаФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция НоменклатурнаяГруппаДляРаботПоПрочимРаботамФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляРаботПоПрочимРаботамФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + +#КонецОбласти + +#Область НоменклатурныеГруппыОбслуживания +Функция НоменклатурнаяГруппаДляРаботПоКартриджу(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляРаботПоКартриджу); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция НоменклатурнаяГруппаДляРаботПоТехнике(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляРаботПоТехнике); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция НоменклатурнаяГруппаДляРаботПоМонтажуЛВС(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляРаботПоМонтажуЛВС); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция НоменклатурнаяГруппаДляРаботПоМонтажуСистемыВидеонаблюдения(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляРаботПоМонтажуСистемыВидеонаблюдения); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция НоменклатурнаяГруппаДляРаботПоКурсам(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляРаботПоКурсам); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция НоменклатурнаяГруппаДляВыездныхРаботПо1С(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляВыездныхРаботПо1С); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция НоменклатурнаяГруппаДляВыездныхРаботПоПКиОргтехнике(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляВыездныхРаботПоПКиОргтехнике); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция НоменклатурнаяГруппаДляРаботПоРазработкеСайта(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляРаботПоРазработкеСайта); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция НоменклатурнаяГруппаДляРаботПоПрочимРаботам(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.НоменклатурнаяГруппаДляРаботПоПрочимРаботам); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //НоменклатурнаяГруппаДляОбслуживанияФизическихЛиц(Дата = Неопределено) + +#КонецОбласти + +#Область ТарифныеПланыОбслуживанияФизическихЛиц +Функция ТарифныйПланДляРаботПоКартриджуФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ТарифныйПланДляРаботПоКартриджуФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //ТарифныйПланДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция ТарифныйПланДляРаботПоТехникеФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ТарифныйПланДляРаботПоТехникеФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //ТарифныйПланДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция ТарифныйПланДляРаботПоМонтажуЛВСФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ТарифныйПланДляРаботПоМонтажуЛВСФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //ТарифныйПланДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция ТарифныйПланДляРаботПоМонтажуСистемыВидеонаблюденияФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ТарифныйПланДляРаботПоМонтажуСистемыВидеонаблюденияФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //ТарифныйПланДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция ТарифныйПланДляРаботПоКурсамФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ТарифныйПланДляРаботПоКурсамФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //ТарифныйПланДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция ТарифныйПланДляВыездныхРаботПо1СФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ТарифныйПланДляВыездныхРаботПо1СФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //ТарифныйПланДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция ТарифныйПланДляВыездныхРаботПоПКиОргтехникеФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ТарифныйПланДляВыездныхРаботПоПКиОргтехникеФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //ТарифныйПланДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция ТарифныйПланДляРаботПоРазработкеСайтаФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ТарифныйПланДляРаботПоРазработкеСайтаФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //ТарифныйПланДляОбслуживанияФизическихЛиц(Дата = Неопределено) + + +Функция ТарифныйПланДляРаботПоПрочимРаботамФизическихЛиц(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ТарифныйПланДляРаботПоПрочимРаботамФизическихЛиц); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //ТарифныйПланДляОбслуживанияФизическихЛиц(Дата = Неопределено) + +#КонецОбласти + +Функция НачалоРабочегоДня(ДатаПолученияНастройки = Неопределено) Экспорт + НастройкаПолученияЧаса = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ЧасНачалаРабочегоДня); + НастройкаПолученияМинуты = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.МинутаНачалаРабочегоДня); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Час = РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,НастройкаПолученияЧаса).ЗначениеНастройки; + Если Час = Неопределено Тогда + Час = 0; + КонецЕсли; + Минута = РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,НастройкаПолученияМинуты).ЗначениеНастройки; + Если Минута = Неопределено Тогда + Минута = 0; + КонецЕсли; + Возврат Дата(1,1,1,Час,Минута,0); +КонецФункции //НачалоРабочегоДня(ДатаПолученияНастройки = Неопределено) + +Функция ОкончаниеРабочегоДня(ДатаПолученияНастройки = Неопределено) Экспорт + НастройкаПолученияЧаса = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ЧасОкончанияРабочегоДня); + НастройкаПолученияМинуты = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.МинутаОкончанияРабочегоДня); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Час = РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,НастройкаПолученияЧаса).ЗначениеНастройки; + Если Час = Неопределено Тогда + Час = 23; + КонецЕсли; + Минута = РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,НастройкаПолученияМинуты).ЗначениеНастройки; + Если Минута = Неопределено Тогда + Минута = 59; + КонецЕсли; + Возврат Дата(1,1,1,Час,Минута,0); +КонецФункции //ОкончаниеРабочегоДня(ДатаПолученияНастройки = Неопределено) + +Функция ПрефиксQRКодирования(ДатаПолученияНастройки = Неопределено) Экспорт + НастройкаПолученияПрефикса = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ПрефиксQRКодирования); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Префикс = РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,НастройкаПолученияПрефикса).ЗначениеНастройки; + Если Префикс = Неопределено Тогда + Префикс = ""; + КонецЕсли; + Возврат Префикс; +КонецФункции //ПрефиксQRКодирования(ДатаПолученияНастройки = Неопределено) + +Функция КомментироватьСобытия(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.КомментироватьСобытия); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Результат = РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; + Если Результат = Неопределено Тогда + Результат = Ложь; + КонецЕсли; + Возврат Результат; +КонецФункции //КомментироватьСобытия(ДатаПолученияНастройки = Неопределено) + +Процедура СообщитьОСобытии(СообщениеОСобытии,Ссылка = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.КомментироватьСобытия); + ДатаПолученияНастройки = ТекущаяДата(); + КомментироватьСобытия = РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; + Если КомментироватьСобытия = Неопределено Тогда + КомментироватьСобытия = Ложь; + КонецЕсли; + Если КомментироватьСобытия Тогда + Сообщение = Новый СообщениеПользователю; + Сообщение.Текст = Строка(СообщениеОСобытии); + Если Ссылка <> Неопределено Тогда + Если ЗначениеЗаполнено(Ссылка) Тогда + Сообщение.КлючДанных = Ссылка; + КонецЕсли; + КонецЕсли; + Сообщение.Сообщить(); + КонецЕсли; + Попытка + ЗаголовокСообщения = "ПС. " + ПараметрыСеанса.ПС_ВерсияРасширения + ". Диагностическое сообщение."; + Исключение + ЗаголовокСообщения = "ПС. Диагностическое сообщение."; + КонецПопытки; + ЗаписьЖурналаРегистрации(ЗаголовокСообщения,,,Ссылка,СообщениеОСобытии); +КонецПроцедуры //СообщитьОСобытии(СообщениеОСобытии) + +Функция НомерМесяца(ПереданныйМесяц) + ВозвращаемыйНомер = 0; + Если ТипЗнч(ПереданныйМесяц) = ТипЗнч(Перечисления.ПС_Месяцы.Январь) Тогда + Если ПереданныйМесяц = Перечисления.ПС_Месяцы.Январь Тогда + ВозвращаемыйНомер = 1; + ИначеЕсли ПереданныйМесяц = Перечисления.ПС_Месяцы.Февраль Тогда + ВозвращаемыйНомер = 2; + ИначеЕсли ПереданныйМесяц = Перечисления.ПС_Месяцы.Март Тогда + ВозвращаемыйНомер = 3; + ИначеЕсли ПереданныйМесяц = Перечисления.ПС_Месяцы.Апрель Тогда + ВозвращаемыйНомер = 4; + ИначеЕсли ПереданныйМесяц = Перечисления.ПС_Месяцы.Май Тогда + ВозвращаемыйНомер = 5; + ИначеЕсли ПереданныйМесяц = Перечисления.ПС_Месяцы.Июнь Тогда + ВозвращаемыйНомер = 6; + ИначеЕсли ПереданныйМесяц = Перечисления.ПС_Месяцы.Июль Тогда + ВозвращаемыйНомер = 7; + ИначеЕсли ПереданныйМесяц = Перечисления.ПС_Месяцы.Август Тогда + ВозвращаемыйНомер = 8; + ИначеЕсли ПереданныйМесяц = Перечисления.ПС_Месяцы.Сентябрь Тогда + ВозвращаемыйНомер = 9; + ИначеЕсли ПереданныйМесяц = Перечисления.ПС_Месяцы.Октябрь Тогда + ВозвращаемыйНомер = 10; + ИначеЕсли ПереданныйМесяц = Перечисления.ПС_Месяцы.Ноябрь Тогда + ВозвращаемыйНомер = 11; + ИначеЕсли ПереданныйМесяц = Перечисления.ПС_Месяцы.Декабрь Тогда + ВозвращаемыйНомер = 12; + КонецЕсли; + КонецЕсли; + Возврат ВозвращаемыйНомер; +КонецФункции // НомерМесяца() + +Функция ПериодОбслуживаняВСтандартныйПериод(МесяцОбслуживания,ГодОбслуживания) Экспорт + ВозвращаемыйСтандартныйПериод = Новый СтандартныйПериод; + ВозвращаемыйСтандартныйПериод.ДатаНачала = Дата(1,1,1,0,0,0); + ВозвращаемыйСтандартныйПериод.ДатаОкончания = Дата(1,1,1,0,0,0); + НомерМесяцаОбслуживания = НомерМесяца(МесяцОбслуживания); + Если НомерМесяцаОбслуживания > 0 Тогда + Попытка + ВозвращаемыйСтандартныйПериод.ДатаНачала = Дата(ГодОбслуживания,НомерМесяцаОбслуживания,1,0,0,0); + ВозвращаемыйСтандартныйПериод.ДатаОкончания = КонецМесяца(ВозвращаемыйСтандартныйПериод.ДатаНачала); + Исключение + КонецПопытки; + КонецЕсли; + Возврат ВозвращаемыйСтандартныйПериод; +КонецФункции + + +Функция МесяцПоНомеру(ПереданныйНомер) + ВозвращаемыйМесяц = 0; + Если ТипЗнч(ПереданныйНомер) = ТипЗнч(1) Тогда + Если ПереданныйНомер = 1 Тогда + ВозвращаемыйМесяц = Перечисления.ПС_Месяцы.Январь; + ИначеЕсли ПереданныйНомер = 2 Тогда + ВозвращаемыйМесяц = Перечисления.ПС_Месяцы.Февраль; + ИначеЕсли ПереданныйНомер = 3 Тогда + ВозвращаемыйМесяц = Перечисления.ПС_Месяцы.Март; + ИначеЕсли ПереданныйНомер = 4 Тогда + ВозвращаемыйМесяц = Перечисления.ПС_Месяцы.Апрель; + ИначеЕсли ПереданныйНомер = 5 Тогда + ВозвращаемыйМесяц = Перечисления.ПС_Месяцы.Май; + ИначеЕсли ПереданныйНомер = 6 Тогда + ВозвращаемыйМесяц = Перечисления.ПС_Месяцы.Июнь; + ИначеЕсли ПереданныйНомер = 7 Тогда + ВозвращаемыйМесяц = Перечисления.ПС_Месяцы.Июль; + ИначеЕсли ПереданныйНомер = 8 Тогда + ВозвращаемыйМесяц = Перечисления.ПС_Месяцы.Август; + ИначеЕсли ПереданныйНомер = 9 Тогда + ВозвращаемыйМесяц = Перечисления.ПС_Месяцы.Сентябрь; + ИначеЕсли ПереданныйНомер = 10 Тогда + ВозвращаемыйМесяц = Перечисления.ПС_Месяцы.Октябрь; + ИначеЕсли ПереданныйНомер = 11 Тогда + ВозвращаемыйМесяц = Перечисления.ПС_Месяцы.Ноябрь; + ИначеЕсли ПереданныйНомер = 12 Тогда + ВозвращаемыйМесяц = Перечисления.ПС_Месяцы.Декабрь; + КонецЕсли; + КонецЕсли; + Возврат ВозвращаемыйМесяц; +КонецФункции // НомерМесяца() + + +Функция ДатаОбслуживанияВПериодОбслуживаня(ДатаОбслуживания) Экспорт + ВозвращаемыйПериодОбслуживания = Новый Структура("МесяцОбслуживания,ГодОбслуживания"); + Попытка + ВозвращаемыйПериодОбслуживания.МесяцОбслуживания = МесяцПоНомеру(Месяц(ДатаОбслуживания)); + ВозвращаемыйПериодОбслуживания.ГодОбслуживания = Год(ДатаОбслуживания); + Исключение + КонецПопытки; + Возврат ВозвращаемыйПериодОбслуживания; +КонецФункции + +Функция МаксимальноеКоличествоЧасовНепрерывнойДистанционнойРаботы(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.МаксимальноеКоличествоЧасовНепрерывнойДистанционнойРаботы); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //МаксимальноеКоличествоЧасовНепрерывнойДистанционнойРаботы(Дата = Неопределено) + +Функция ПутьКПапкеСФайломСтатистикиОбращенийУдаленногоОбслуживания(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ПутьКПапкеСФайломСтатистикиОбращенийУдаленногоОбслуживания); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //ПутьКПапкеСФайломСтатистикиОбращенийУдаленногоОбслуживания(Дата = Неопределено) + +Функция ПутьКПапкеСФайломСтатистикиСеансовУдаленногоДоступа(ДатаПолученияНастройки = Неопределено) Экспорт + Настройка = Новый Структура("ВидНастройки",ПланыВидовХарактеристик.ПС_ВидыЗначенийНастроек.ПутьКПапкеСФайломСтатистикиСеансовУдаленногоДоступа); + Если ДатаПолученияНастройки = Неопределено Тогда + ДатаПолученияНастройки = ТекущаяДата() + КонецЕсли; + Возврат РегистрыСведений.ПС_ЗначенияНастроек.ПолучитьПоследнее(ДатаПолученияНастройки,Настройка).ЗначениеНастройки; +КонецФункции //ПутьКПапкеСФайломСтатистикиСеансовУдаленногоДоступа(Дата = Неопределено) diff --git a/extension/src/Configuration.xml b/extension/src/Configuration.xml index 7c44e64..9e34954 100644 --- a/extension/src/Configuration.xml +++ b/extension/src/Configuration.xml @@ -37,7 +37,7 @@ Adopted - Настройки + ЗначенияНастроек ruНастройки Расширение контекста Настройки AddOn @@ -54,6 +54,7 @@ 3.0.0.3 + ruХранение настроек с историей изменения ruУниверсальное хранилище настроек. Простые типы: булево, строка, дата, число. Разработано совместно с MiMoCode (Xiaomi MiMo Team). ru1С:Франчайзи ООО "Профи-Софт", код партнера 42575-13 @@ -61,9 +62,9 @@ TaxiEnableVersion8_2 - ПС_ВидыНастроек - ПС_Настройки - ПС_РаботаСНастройками - + ПС_ВидыЗначенийНастроек + ПС_ЗначенияНастроек + ПС_РаботаСЗначениямиНастроек + \ No newline at end of file diff --git a/extension/src/Ext/Logo.xml b/extension/src/Ext/Logo.xml index 03b105c..4b08e25 100644 --- a/extension/src/Ext/Logo.xml +++ b/extension/src/Ext/Logo.xml @@ -4,4 +4,4 @@ LogoPS.png false - \ No newline at end of file + diff --git a/extension/src/InformationRegisters/ПС_ЗначенияНастроек.xml b/extension/src/InformationRegisters/ПС_ЗначенияНастроек.xml new file mode 100644 index 0000000..070a18b --- /dev/null +++ b/extension/src/InformationRegisters/ПС_ЗначенияНастроек.xml @@ -0,0 +1,175 @@ + + + + + + a28d33ef-edaa-4a04-8bfd-d6669f69eeff + 18e64e7a-1c4c-4e9d-ba0e-3622fb97df81 + + + 6ad5a84c-c880-45d3-a54a-55fa66e8aea9 + 2b55dc8d-fb80-4527-97c3-68b39c9f1306 + + + b2d90406-f611-46b2-8f9b-a24a0cfa0174 + de962d72-0133-482e-a8be-d80e24e22a94 + + + 72874cfa-497a-4f59-b202-718d0e558abf + 760fa967-3b5e-4803-8f07-a240daa799a5 + + + 5241194a-31ee-4bb7-adf6-d679ea1495a8 + 179f08e9-1dfc-481a-861f-d61a12b157bb + + + bae90479-5039-46ca-993b-573db33e5716 + 793c69d5-eccd-40ca-9e43-86b3e0fb635e + + + c5a441dd-475a-40bd-9cb6-bffb38bf9f8e + b06c1782-8a61-4513-b340-993d458e1b06 + + + + ПС_ЗначенияНастроек + + + ru + Настройки + + + + true + InDialog + + + + + Day + Independent + true + false + Managed + DontUse + false + false + + + + + ru + Значения настроек + + + + + DontUse + false + false + + + + + ЗначениеНастройки + + + ru + Значение настройки + + + + + xs:boolean + xs:string + xs:dateTime + xs:decimal + cfg:AnyIBRef + + 10 + 0 + Any + + + 250 + Variable + + + DateTime + + + false + + + + false + + false + false + + + false + + DontCheck + Items + + + Auto + Auto + + + InformationRegister.ПС_ЗначенияНастроек.Dimension.ВидНастройки + 0 + + Auto + DontIndex + Use + Use + + + + + ВидНастройки + + + ru + Вид настройки + + + + + cfg:ChartOfCharacteristicTypesRef.ПС_ВидыНастроек + + false + + + + false + + false + false + + + true + + DontCheck + Items + + + Auto + Auto + + + Auto + true + true + true + DontIndex + Use + Use + TransformValues + + + + + \ No newline at end of file diff --git a/ЗначенияНастроек_v3.1.0.0.cfe b/ЗначенияНастроек_v3.1.0.0.cfe new file mode 100644 index 0000000..ca9c160 Binary files /dev/null and b/ЗначенияНастроек_v3.1.0.0.cfe differ diff --git a/Настройки_v3.0.0.6.cfe b/Настройки_v3.0.0.6.cfe new file mode 100644 index 0000000..8afaa52 Binary files /dev/null and b/Настройки_v3.0.0.6.cfe differ