mirror of
https://github.com/tormozit/RDT1C.git
synced 2025-12-17 05:04:11 +00:00
124 lines
9.9 KiB
Plaintext
124 lines
9.9 KiB
Plaintext
//ирПортативный Перем ирПортативный Экспорт;
|
||
//ирПортативный Перем ирОбщий Экспорт;
|
||
//ирПортативный Перем ирСервер Экспорт;
|
||
//ирПортативный Перем ирКэш Экспорт;
|
||
//ирПортативный Перем ирПривилегированный Экспорт;
|
||
|
||
Перем ТаблицаАктивныхФоновыхЗаданий Экспорт;
|
||
|
||
Функция ДлительностьФоновогоЗадания(ФоновоеЗадание) Экспорт
|
||
|
||
#Если Сервер И Не Сервер Тогда
|
||
ФоновоеЗадание = ФоновыеЗадания.НайтиПоУникальномуИдентификатору();
|
||
#КонецЕсли
|
||
Если Не ЗначениеЗаполнено(ФоновоеЗадание.Конец) Тогда
|
||
Длительность = ТекущаяДата() - ФоновоеЗадание.Начало;
|
||
Иначе
|
||
Длительность = ФоновоеЗадание.Конец - ФоновоеЗадание.Начало;
|
||
КонецЕсли;
|
||
Возврат Длительность;
|
||
|
||
КонецФункции
|
||
|
||
Процедура ОбновитьСтрокуФоновогоЗадания(Знач СтрокаСпискаФоновыхЗаданий, Знач ФоновоеЗадание = Неопределено, Знач Длительность = Неопределено) Экспорт
|
||
|
||
Если ФоновоеЗадание = Неопределено Тогда
|
||
ФоновоеЗадание = ФоновыеЗадания.НайтиПоУникальномуИдентификатору(Новый УникальныйИдентификатор(СтрокаСпискаФоновыхЗаданий.Идентификатор));
|
||
КонецЕсли;
|
||
Если Длительность = Неопределено Тогда
|
||
Длительность = ДлительностьФоновогоЗадания(ФоновоеЗадание);
|
||
КонецЕсли;
|
||
СтрокаСпискаФоновыхЗаданий.Наименование = ФоновоеЗадание.Наименование;
|
||
СтрокаСпискаФоновыхЗаданий.Ключ = ФоновоеЗадание.Ключ;
|
||
СтрокаСпискаФоновыхЗаданий.ИмяМетода = ФоновоеЗадание.ИмяМетода;
|
||
СтрокаСпискаФоновыхЗаданий.Начало = ФоновоеЗадание.Начало;
|
||
СтрокаСпискаФоновыхЗаданий.Конец = ФоновоеЗадание.Конец;
|
||
СтрокаСпискаФоновыхЗаданий.Длительность = Длительность;
|
||
СтрокаСпискаФоновыхЗаданий.Сервер = ФоновоеЗадание.Расположение;
|
||
Если ФоновоеЗадание.ИнформацияОбОшибке <> Неопределено Тогда
|
||
СтрокаСпискаФоновыхЗаданий.Ошибка = ПодробноеПредставлениеОшибки(ФоновоеЗадание.ИнформацияОбОшибке);
|
||
КонецЕсли;
|
||
Если Истина
|
||
И ФоновоеЗадание.Состояние = СостояниеФоновогоЗадания.Активно
|
||
И ТаблицаАктивныхФоновыхЗаданий <> Неопределено
|
||
Тогда
|
||
СтрокаАктивногоФоновогоЗадания = ТаблицаАктивныхФоновыхЗаданий.Найти(ФоновоеЗадание.УникальныйИдентификатор, "Идентификатор");
|
||
Если СтрокаАктивногоФоновогоЗадания <> Неопределено Тогда
|
||
СтрокаСпискаФоновыхЗаданий.НомерСеанса = СтрокаАктивногоФоновогоЗадания.НомерСеанса;
|
||
СтрокаСпискаФоновыхЗаданий.НомерСоединения = СтрокаАктивногоФоновогоЗадания.НомерСоединения;
|
||
КонецЕсли;
|
||
КонецЕсли;
|
||
СтрокаСпискаФоновыхЗаданий.Идентификатор = ФоновоеЗадание.УникальныйИдентификатор;
|
||
СтрокаСпискаФоновыхЗаданий.СостояниеЗадания = ФоновоеЗадание.Состояние;
|
||
СтрокаСпискаФоновыхЗаданий.СостояниеПредставление = ФоновоеЗадание.Состояние;
|
||
СтрокаСпискаФоновыхЗаданий.РазделениеДанных = ФоновоеЗадание.РазделениеДанных;
|
||
СтрокаСпискаФоновыхЗаданий.РазделениеДанныхПредставление = ирОбщий.РасширенноеПредставлениеЗначенияЛкс(ФоновоеЗадание.РазделениеДанных);
|
||
|
||
КонецПроцедуры
|
||
|
||
Функция ОтборДляЖурналаПоФоновымЗаданиям(Знач ТекущаяСтрока = Неопределено) Экспорт
|
||
|
||
СтруктураОтбора = Новый Структура;
|
||
СтруктураОтбора.Вставить("ИмяПриложения", "BackgroundJob");
|
||
Если Истина
|
||
И ТекущаяСтрока <> Неопределено
|
||
И ЗначениеЗаполнено(ТекущаяСтрока.НомерСеанса)
|
||
Тогда
|
||
СтруктураОтбора.Вставить("Сеанс", ТекущаяСтрока.НомерСеанса);
|
||
КонецЕсли;
|
||
Возврат СтруктураОтбора;
|
||
|
||
КонецФункции
|
||
|
||
Процедура ОткрытьОшибкиЖРПоЗаданию(Знач ВыбраннаяСтрока) Экспорт
|
||
|
||
СтруктураОтбора = ОтборДляЖурналаПоФоновымЗаданиям(ВыбраннаяСтрока);
|
||
СтруктураОтбора.Вставить("Уровень", "Ошибка");
|
||
АнализЖурналаРегистрации = ирОбщий.СоздатьОбъектПоПолномуИмениМетаданныхЛкс("Обработка.ирАнализЖурналаРегистрации");
|
||
#Если Сервер И Не Сервер Тогда
|
||
АнализЖурналаРегистрации = Обработки.ирАнализЖурналаРегистрации.Создать();
|
||
#КонецЕсли
|
||
АнализЖурналаРегистрации.ОткрытьСОтбором(ВыбраннаяСтрока.Начало, ВыбраннаяСтрока.Конец, СтруктураОтбора);
|
||
|
||
КонецПроцедуры
|
||
|
||
Функция ПолучитьФоновыеЗадания(Знач КонечныйОтбор) Экспорт
|
||
|
||
Попытка
|
||
Фоновые = ФоновыеЗадания.ПолучитьФоновыеЗадания(КонечныйОтбор);
|
||
Исключение
|
||
Фоновые = Новый Массив;
|
||
КонецПопытки;
|
||
Возврат Фоновые;
|
||
|
||
КонецФункции
|
||
|
||
Функция КоличествоОшибокВЖурнале(Знач Начало, Знач Конец, СтруктураОтбора, МаксимальныйРазмерВыгрузки = 1000) Экспорт
|
||
|
||
Если ЗначениеЗаполнено(Конец) Тогда
|
||
КоличествоОшибокВЖурнале = ирКэш.КоличествоОшибокВЖурналеЛкс(Начало, Конец, СтруктураОтбора, МаксимальныйРазмерВыгрузки);
|
||
Иначе
|
||
КоличествоОшибокВЖурнале = ирОбщий.КоличествоОшибокВЖурналеЛкс(Начало, Конец, СтруктураОтбора, МаксимальныйРазмерВыгрузки);
|
||
КонецЕсли;
|
||
Возврат КоличествоОшибокВЖурнале;
|
||
|
||
КонецФункции
|
||
|
||
//ирПортативный лФайл = Новый Файл(ИспользуемоеИмяФайла);
|
||
//ирПортативный ПолноеИмяФайлаБазовогоМодуля = Лев(лФайл.Путь, СтрДлина(лФайл.Путь) - СтрДлина("Модули\")) + "ирПортативный.epf";
|
||
//ирПортативный #Если Клиент Тогда
|
||
//ирПортативный Контейнер = Новый Структура();
|
||
//ирПортативный Оповестить("ирПолучитьБазовуюФорму", Контейнер);
|
||
//ирПортативный Если Не Контейнер.Свойство("ирПортативный", ирПортативный) Тогда
|
||
//ирПортативный ирПортативный = ВнешниеОбработки.ПолучитьФорму(ПолноеИмяФайлаБазовогоМодуля);
|
||
//ирПортативный ирПортативный.Открыть();
|
||
//ирПортативный КонецЕсли;
|
||
//ирПортативный #Иначе
|
||
//ирПортативный ирПортативный = ВнешниеОбработки.Создать(ПолноеИмяФайлаБазовогоМодуля, Ложь); // Это будет второй экземпляр объекта
|
||
//ирПортативный #КонецЕсли
|
||
//ирПортативный ирОбщий = ирПортативный.ПолучитьОбщийМодульЛкс("ирОбщий");
|
||
//ирПортативный ирКэш = ирПортативный.ПолучитьОбщийМодульЛкс("ирКэш");
|
||
//ирПортативный ирСервер = ирПортативный.ПолучитьОбщийМодульЛкс("ирСервер");
|
||
//ирПортативный ирПривилегированный = ирПортативный.ПолучитьОбщийМодульЛкс("ирПривилегированный");
|
||
|