Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
29 мар 2024, 02:52

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

Автор Adam_88, 27 окт 2015, 00:12

0 Пользователей и 1 гость просматривают эту тему.

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


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

Теги: ошибка  код 

Похожие темы (5)

Рейтинг@Mail.ru

Поиск