Четверг, 10.10.2024, 13:42
Главная Регистрация RSS
Приветствую Вас, Гость
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Пожелания по шаблонам кода
alexgremburgДата: Пятница, 28.08.2015, 11:02 | Сообщение # 1
Майор
Группа: Проверенные
Сообщений: 93
Репутация: 34
Статус: Оффлайн
Пытался пользоваться шаблонами кода, но многие шаблоны на находились, поэтому предлагаю изменить поиск шаблона в таблице так (Обработка ирКлсПолеТекстовогоДокументаСКонтекстнойПодсказкой, Модуль объекта (3590)):
        
Код
//Было:
          //СтрокаШаблона = ТаблицаШаблоновТекста.Найти(НРег(НачалоКонтекста), "Шаблон");
          //Стало:
          СтрокаШаблона=Неопределено;
          Для каждого ТекСтрокаШаблона Из ТаблицаШаблоновТекста Цикл
              Если Найти(ТекСтрокаШаблона.Шаблон, НРег(НачалоКонтекста))>0 Тогда
                  СтрокаШаблона = ТекСтрокаШаблона;
                  Прервать;
              КонецЕсли;
              ШаблонБезСкобок = СтрЗаменить(ТекСтрокаШаблона.Шаблон, "[", "");
              ШаблонБезСкобок = СтрЗаменить(ШаблонБезСкобок, "]", "");
              Если Найти(ШаблонБезСкобок, НРег(НачалоКонтекста))>0 Тогда
                  СтрокаШаблона = ТекСтрокаШаблона;
                  Прервать;
              КонецЕсли;
          КонецЦикла;


Сообщение отредактировал alexgremburg - Пятница, 28.08.2015, 11:02
 
tormozitДата: Пятница, 28.08.2015, 11:54 | Сообщение # 2
Генералиссимус
Группа: Администраторы
Сообщений: 6386
Репутация: 165
Статус: Оффлайн
Нужно указать какие именно шаблоны не находились. Вслепую вносить изменение не хотелось бы. Поэтому желательно описать способ воспроизведения проблемы. По всей видимости для этого нужно будет предоставить файл шаблонов.
 
alexgremburgДата: Суббота, 29.08.2015, 00:55 | Сообщение # 3
Майор
Группа: Проверенные
Сообщений: 93
Репутация: 34
Статус: Оффлайн
Нет проблем! Используемый шаблон приложил. Для пример не работают шаблоны "ДляП[о]", "ДляК[аждог]о" и т.п.
Прикрепления: Development.st (89.3 Kb)


Сообщение отредактировал alexgremburg - Суббота, 29.08.2015, 01:05
 
tormozitДата: Понедельник, 31.08.2015, 00:40 | Сообщение # 4
Генералиссимус
Группа: Администраторы
Сообщений: 6386
Репутация: 165
Статус: Оффлайн
Спасибо. Исправлено в 3.41
 
alexgremburgДата: Среда, 20.04.2016, 11:03 | Сообщение # 5
Майор
Группа: Проверенные
Сообщений: 93
Репутация: 34
Статус: Оффлайн
В версии 3.59 вновь не работает.
 
tormozitДата: Среда, 20.04.2016, 11:06 | Сообщение # 6
Генералиссимус
Группа: Администраторы
Сообщений: 6386
Репутация: 165
Статус: Оффлайн
В какой максимальной версии это работало? Думаю что проблема не в изменении подсистемы, т.к. этот функционал с тех пор с большой вероятностью не менялся.
 
alexgremburgДата: Среда, 20.04.2016, 11:18 | Сообщение # 7
Майор
Группа: Проверенные
Сообщений: 93
Репутация: 34
Статус: Оффлайн
В 3.57 вроде работало.
Не работает из-за того, что почему то закомментированы строки поиска текста. Они заменены на строки сравнения

Код
Для каждого ТекСтрокаШаблона Из ТаблицаШаблоновТекста Цикл
            //Если Найти(ТекСтрокаШаблона.Шаблон, НРег(НачалоКонтекста)) > 0 Тогда
            Если ТекСтрокаШаблона.Шаблон = НРег(НачалоКонтекста) Тогда
            ...
            //Если Найти(ШаблонБезСкобок, НРег(НачалоКонтекста)) > 0 Тогда
            Если ШаблонБезСкобок = НРег(НачалоКонтекста) Тогда
            ...
КонецЦикла;
 
tormozitДата: Среда, 20.04.2016, 11:44 | Сообщение # 8
Генералиссимус
Группа: Администраторы
Сообщений: 6386
Репутация: 165
Статус: Оффлайн
Работать могло только если ты модифицировал код. В оригинальной подсистеме это не работало всегда (во всех версиях). Будет исправлено в следующей версии.
 
alexgremburgДата: Среда, 20.04.2016, 11:56 | Сообщение # 9
Майор
Группа: Проверенные
Сообщений: 93
Репутация: 34
Статус: Оффлайн
А сообщение

Цитата
Спасибо. Исправлено в 3.41

не считается? Кто-то ведь добавил в подсистему строки с перебором всех строк таблицы
Ладно, это не суть. Главное, чтобы работало


Сообщение отредактировал alexgremburg - Среда, 20.04.2016, 11:57
 
tormozitДата: Среда, 20.04.2016, 12:17 | Сообщение # 10
Генералиссимус
Группа: Администраторы
Сообщений: 6386
Репутация: 165
Статус: Оффлайн
В 3.41 я внес исправление, но оно не привело к полностью корректному поведению.
 
tormozitДата: Понедельник, 25.04.2016, 00:11 | Сообщение # 11
Генералиссимус
Группа: Администраторы
Сообщений: 6386
Репутация: 165
Статус: Оффлайн
Исправлено в 3.60
 
  • Страница 1 из 1
  • 1
Поиск: