1c/JobsConsole2019
1
0
Fork 0
mirror of https://github.com/kuzyara/JobsConsole2019.epf.git synced 2025-02-19 19:00:08 +02:00
Code Issues Releases Activity

фикс ошибки открытия регламентного

Browse Source
This commit is contained in:
ROSSKO\Nikolay.Kuznecov 2020-05-28 15:58:29 +07:00
parent 865e373bcd
commit ae5a9eca29
2 changed files with 23 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
src/src/ExternalDataProcessors/КонсольЗаданий2019/Forms/ДиалогРегламентногоЗадания/Module.bsl
View File

@ -44,11 +44,8 @@
КонецЕсли; КонецЕсли;
РегламентноеЗадание = Неопределено;
РегламентноеЗаданиеИД = Параметры.ИдентификаторЗадания; РегламентноеЗаданиеИД = Параметры.ИдентификаторЗадания;
Если ЗначениеЗаполнено(РегламентноеЗаданиеИД) Тогда РегламентноеЗадание = ПолучитьОбъектРегламентногоЗадания(РегламентноеЗаданиеИД);
РегламентноеЗадание = РегламентныеЗадания.НайтиПоУникальномуИдентификатору(РегламентноеЗаданиеИД);
КонецЕсли;
Если РегламентноеЗадание <> Неопределено Тогда Если РегламентноеЗадание <> Неопределено Тогда
МетаданныеВыбор = РегламентноеЗадание.Метаданные.Имя; МетаданныеВыбор = РегламентноеЗадание.Метаданные.Имя;
@ -90,10 +87,7 @@
ВызватьИсключение("Не выбраны метаданные регламентного задания."); ВызватьИсключение("Не выбраны метаданные регламентного задания.");
КонецЕсли; КонецЕсли;
РегламентноеЗадание = Неопределено; РегламентноеЗадание = ПолучитьОбъектРегламентногоЗадания(РегламентноеЗаданиеИД);
Если ЗначениеЗаполнено(РегламентноеЗаданиеИД) Тогда
РегламентноеЗадание = РегламентныеЗадания.НайтиПоУникальномуИдентификатору(РегламентноеЗаданиеИД);
КонецЕсли;
Если РегламентноеЗадание = Неопределено Тогда Если РегламентноеЗадание = Неопределено Тогда
РегламентноеЗадание = РегламентныеЗадания.СоздатьРегламентноеЗадание(МетаданныеВыбор); РегламентноеЗадание = РегламентныеЗадания.СоздатьРегламентноеЗадание(МетаданныеВыбор);
@ -132,10 +126,7 @@
&НаСервере &НаСервере
Функция ПолучитьРасписаниеРегламентногоЗадания(УникальныйНомерЗадания) Экспорт Функция ПолучитьРасписаниеРегламентногоЗадания(УникальныйНомерЗадания) Экспорт
ОбъектЗадания = Неопределено; ОбъектЗадания = ПолучитьОбъектРегламентногоЗадания(УникальныйНомерЗадания);
Если ЗначениеЗаполнено(УникальныйНомерЗадания) Тогда
ОбъектЗадания = РегламентныеЗадания.НайтиПоУникальномуИдентификатору(УникальныйНомерЗадания);
КонецЕсли;
Если ОбъектЗадания = Неопределено Тогда Если ОбъектЗадания = Неопределено Тогда
Возврат Новый РасписаниеРегламентногоЗадания; Возврат Новый РасписаниеРегламентногоЗадания;
КонецЕсли; КонецЕсли;
@ -189,3 +180,23 @@
Процедура ПараметрыЗаданияЗначение1ПриИзменении(Элемент) Процедура ПараметрыЗаданияЗначение1ПриИзменении(Элемент)
ОбновитьПараметры(); ОбновитьПараметры();
КонецПроцедуры КонецПроцедуры
&НаСервере
Функция ПолучитьОбъектРегламентногоЗадания(УникальныйНомерЗадания) Экспорт
Попытка
Если НЕ ПустаяСтрока(УникальныйНомерЗадания) Тогда
УникальныйИдентификаторЗадания = Новый УникальныйИдентификатор(УникальныйНомерЗадания);
ТекущееРегламентноеЗадание = РегламентныеЗадания.НайтиПоУникальномуИдентификатору(УникальныйИдентификаторЗадания);
Иначе
ТекущееРегламентноеЗадание = Неопределено;
КонецЕсли;
Исключение
ТекущееРегламентноеЗадание = Неопределено;
КонецПопытки;
Возврат ТекущееРегламентноеЗадание;
КонецФункции

BIN
КонсольЗаданий2019.epf
View File

Binary file not shown.