diff --git a/src/cf/DataProcessors/узПросмотрИсторииХранилища/Ext/ObjectModule.bsl b/src/cf/DataProcessors/узПросмотрИсторииХранилища/Ext/ObjectModule.bsl index d88642a5d..6aafef613 100644 --- a/src/cf/DataProcessors/узПросмотрИсторииХранилища/Ext/ObjectModule.bsl +++ b/src/cf/DataProcessors/узПросмотрИсторииХранилища/Ext/ObjectModule.bsl @@ -210,8 +210,18 @@ НайденныеСтроки = мТЗHistory.НайтиСтроки(ПараметрыОтбора); ВсегоНайденныеСтроки = НайденныеСтроки.Количество(); ТекстОшибки = ""; - Если ВсегоНайденныеСтроки >= 1 Тогда + Если ВсегоНайденныеСтроки = 1 Тогда СтрокаРодителя = НайденныеСтроки[0]; + ИначеЕсли ВсегоНайденныеСтроки > 1 Тогда + МаксVERNUM = 0; + Для каждого СтрокамТЗHistory из НайденныеСтроки цикл + Если МаксVERNUM < СтрокамТЗHistory.VERNUM Тогда + МаксVERNUM = СтрокамТЗHistory.VERNUM; + СтрокаРодителя = СтрокамТЗHistory; + Конецесли; + Конеццикла; + Иначе + ТекстОшибки = "Ошибка! не удалось найти строку родителя"; Конецесли; Если ЗначениеЗаполнено(ТекстОшибки) Тогда