Ошибки в коде при нажатии обновить конф БД

[Adam_88]

Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения)
   Для Каждого СтрокаТабличнойЧасти Из СписокКниг Цикл
      мЗапрос = Новый Запрос;
      мЗапрос.Текст =
      "ВЫБРАТЬ
      |   КнигиУЧитателейОстатки.КоличествоОстаток
      |ИЗ
      |   РегистрНакопления.КнигиУЧитателей.Остатки(&ДатаДокумента, ) КАК КнигиУЧитателейОстатки
      |ГДЕ
      |   КнигиУЧитателейОстатки.Книга = &Книга
      |   И КнигиУЧитателейОстатки.Читатель = &Читатель";
      мЗапрос.УстановитьПараметр("Книга",СтрокаТабличнойЧасти.Книга);
      мЗапрос.УстановитьПараметр("Читатель",Читатель);
      Результат = мЗапрос.Выполнить();
      ВыборкаИзЗапроса = Результат.Выбрать();
      Если ВыборкаИзЗапроса.Следующий(); Тогда
         Если СтрокаТабличнойЧасти.Количество > ВыборкаИзЗапроса.КоличествоОстаток Тогда
            Сообщить("Книга "+СтрокаТабличнойЧасти.Книга+ " была выдана в меньшем количестве");
            Отказ = Истина;
         КонецЕсли;
      Иначе
         Сообщить("Книга "+СтрокаТабличнойЧасти.Книга+ " не была выдана");
         Отказ = Истина;   
      КонецЕсли;
   КонецЦикла;   
      
КонецПроцедуры


Нажимаю обновить конф БД и выдает:

{Документ.ВозвратКниг.МодульОбъекта(48,36)}: Ожидается ключевое слово 'Тогда' ('Then')
      Если ВыборкаИзЗапроса.Следующий()<<?>>; Тогда (Проверка: Толстый клиент (обычное приложение))
{Документ.ВозвратКниг.МодульОбъекта(48,38)}: Неопознанный оператор
      Если ВыборкаИзЗапроса.Следующий(); <<?>>Тогда (Проверка: Толстый клиент (обычное приложение))
{Документ.ВозвратКниг.МодульОбъекта(48,43)}: Ожидается символ ';'
      Если ВыборкаИзЗапроса.Следующий(); Тогда<<?>> (Проверка: Толстый клиент (обычное приложение))
{Документ.ВозвратКниг.МодульОбъекта(53,3)}: Ожидается ключевое слово 'КонецПроцедуры' ('EndProcedure')
      <<?>>Иначе  (Проверка: Толстый клиент (обычное приложение))
{Документ.ВозвратКниг.МодульОбъекта(57,13)}: Обнаружено логическое завершение исходного текста модуля
   КонецЦикла;<<?>>    (Проверка: Толстый клиент (обычное приложение))






 

[DmitriyF]

Adam_88, УФ или как?? и Запрос в цикле ой как не хорошо.

Добавлено: 27 окт 2015, 00:28

Если ВыборкаИзЗапроса.Следующий(); Тогда       точка с запятой лтшняя

[Adam_88]

Помогли, спасибо.

Добавлено: 27 окт 2015, 13:36

УФ или как??

Честно сказать не понял. НЕ судите строго.