1c/Tasks
1
0
Fork 0
mirror of https://github.com/BlizD/Tasks.git synced 2025-03-17 20:58:01 +02:00
Code Issues Releases Activity

Поправил получение родителя по OBJID

Browse Source
This commit is contained in:
Anton Ivanov 2018-01-27 14:48:06 +03:00
parent ea0580c831
commit 79103f6248
1 changed files with 16 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
src/cf/DataProcessors/узПросмотрИсторииХранилища/Ext/ObjectModule.bsl
View File

@ -194,7 +194,7 @@
Конецесли;
Конецесли;
СтрокаРодителя = ПолучитьСтрокуРодителя(СтрокамТЗHistory.PARENTID);
СтрокаРодителя = ПолучитьСтрокуРодителя(СтрокамТЗHistory);
Если ЗначениеЗаполнено(СтрокаРодителя) Тогда
ПолучитьПолноеИмяМетаданных(ПолноеИмяМетаданных,СтрокаРодителя)
Конецесли;
@ -202,9 +202,16 @@
Возврат ПолноеИмяМетаданных;
КонецФункции
Функция ПолучитьСтрокуРодителя(РодительOBJID)
Функция ПолучитьСтрокуРодителя(СтрокамТЗHistoryРебенок)
Перем СтрокаРодителя;
РодительOBJID = СтрокамТЗHistoryРебенок.PARENTID;
РебенокVERNUM = СтрокамТЗHistoryРебенок.VERNUM;
Если РодительOBJID = "00000000-0000-0000-0000-000000000000" Тогда
Возврат СтрокаРодителя;
Конецесли;
ПараметрыОтбора=Новый Структура();
ПараметрыОтбора.Вставить("OBJID",РодительOBJID);
НайденныеСтроки = мТЗHistory.НайтиСтроки(ПараметрыОтбора);
@ -215,13 +222,19 @@
ИначеЕсли ВсегоНайденныеСтроки > 1 Тогда
МаксVERNUM = 0;
Для каждого СтрокамТЗHistory из НайденныеСтроки цикл
Если СтрокамТЗHistory.VERNUM > РебенокVERNUM Тогда
Прервать;
Конецесли;
Если МаксVERNUM < СтрокамТЗHistory.VERNUM Тогда
МаксVERNUM = СтрокамТЗHistory.VERNUM;
СтрокаРодителя = СтрокамТЗHistory;
Конецесли;
Конеццикла;
Если НЕ ЗначениеЗаполнено(СтрокаРодителя) Тогда
ТекстОшибки = "Ошибка! не удалось найти строку родителя";
Конецесли;
Иначе
ТекстОшибки = "Ошибка! не удалось найти строку родителя";
ТекстОшибки = "Ошибка! не удалось найти строку родителя";
Конецесли;
Если ЗначениеЗаполнено(ТекстОшибки) Тогда