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

               Остаток = ?(ВыборкаРезультатаЗапроса.КоличествоНаСкладе = Null, 0, ВыборкаРезультатаЗапроса.КоличествоНаСкладе);
             Сообщить(Остаток);
            
    Если Остаток < ВыборкаРезультатаЗапроса.Количество Тогда
                Сообщить("Материала " + СокрЛП(ВыборкаРезультатаЗапроса.Номенклатура) + "имеется только" + Остаток);
                Отказ = Истина;
                Возврат;  
            КонецЕсли;
            Для Каждого ТекСтрокаТовары Из Товары Цикл
        Движение = Движения.ОстаткиТоваровНаСкладах.Добавить();
        Движение.ВидДвижения = ВидДвиженияНакопления.Расход;
        Движение.Период = Дата;
        Движение.Номенклатура = ВыборкаРезультатаЗапроса.Номенклатура;
        Движение.Склад = Склад;
        Движение.Количество = ВыборкаРезультатаЗапроса.КоличествоНаСкладе;
    КонецЦикла;

            КонецЦикла;
            Движения.ОстаткиТоваровНаСкладах.Записать();
                    КонецПроцедуры

по отладчику доходит до строки Пока ВыборкаРезультатаЗапроса.Следующий()   Цикл
и сразу перескапивает на  Движения.ОстаткиТоваровНаСкладах.Записать();

неправильно. при оперативном перепроведении лажа.

ну и вообще через пердь... null какой-то, цикл в цикле...

+ сообщения
Сообщить(ВыборкаРезультатаЗапроса.Количество);
        Сообщить (ВыборкаРезультатаЗапроса.КоличествоНаСкладе);
просто пустые строки

так мне нужно чтобы и при оперативном и при не оперативном не проводилось если нет товара

(3) логично

(4) сейчас в тренде - записываешь движения, потом проверяешь, что минусов не получилось...

посмотреть как в типовых сделано не предлагать?

так а лажа хоть в том что в конструкторе запроса напортачила или в остальном??

(6) это транзакция со всеми вытекающими

(9) а? дяденька, я же не настоящий сварщик!

(10) ну как словишь нежданчик при мгновенном обмене, так и заваришь

(11) а что иль кто есть "мгновенный обмен", советник?

ну я брала за основу пример с другого форума, и там все работает. так у меняж блин слово в слово как там кроме текста из конструктора. вот текст


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

ВыборкаРезультатаЗапроса = Запрос.Выполнить().Выбрать();

Пока ВыборкаРезультатаЗапроса.Следующий() Цикл
      Остаток = ?(ВыборкаРезультатаЗапроса.КоличествоОстатокНаСкладе = Null,0,ВыборкаРезультатаЗапроса.КоличествоОстатокНаСкладе);
            Сообщить (Остаток);
                  Если Остаток < ВыборкаРезультатаЗапроса.Кои Тогда
                        Сообщить ("Материала "+ СокрЛП(ВыборкаРезультатаЗапроса.Номенклатура) +
                        " имеется только "+ Остаток);
                        Отказ = Истина;
                        Возврат;
                  КонецЕсли;    
       Для Каждого ТекСтрокаНоменклатура Из Номенклатура Цикл
            Движение = Движения.ОстаткиМатериалов.Добавить();
            Движение.ВидДвижения = ВидДвиженияНакопления.Расход;
            Движение.Период = Дата;
            Движение.Номенклатура = ВыборкаРезультатаЗапроса.Номенклатура;
            Движение.Склад = Склад;
            Движение.Количество = ВыборкаРезультатаЗапроса.КоличествоОстатокНаСкладе;
      КонецЦикла;
КонецЦикла;


      Движения.ОстаткиМатериалов.Записать();
      КонецПроцедуры

(12) у всех по разному. некоторые на запись регистров вешают

(14) да, есть много способов выстрелить себе в ногу. но подход из (6), например, позволяет переключить на управляемые блокировки вообще без дополнительного кода. а дятлы, которые на подписку у регистра вешают обмен - должны это учитывать.

(15) ты это всегда проверяешь когда работу меняешь?

(6) уже хз как давно так в тренде

(0) Я сразу понимаю, что неправильно:
1. Что за СписаниеТоваровТовары.Номенклатура.Ссылка = &Ссылка? Такой запрос всегда вернет пустой результат, так как параметр Ссылка имеет тип ДокументСсылка.СписаниеТоваров, а фильтруемое поле СписаниеТоваровТовары.Номенклатура.Ссылка - номенклатура.
2. Нет группировки строк документа по номенклатуре с суммированием по полям "Сумма", "Количество", либо проверки на дубли.

если кому интересно
строку
СписаниеТоваровТовары.Номенклатура.Ссылка = &Ссылка";
нужно заменить на
СписаниеТоваровТовары.Ссылка = &Ссылка";
Спасибо  GANR навели на мысль из-за чего ошибка

Никому не интересно

я за вас рада

ну и до кучи если используете единицы измерения и коэффициенты не забудьте пересчитать количество в единицах хранения остатков

Для Каждого ТекСтрокаТовары Из Товары Цикл
        Движение = Движения.ОстаткиТоваровНаСкладах.Добавить();
        Движение.ВидДвижения = ВидДвиженияНакопления.Расход;
        Движение.Период = Дата;
        Движение.Номенклатура = ВыборкаРезультатаЗапроса.Номенклатура;
        Движение.Склад = Склад;
        Движение.Количество = ВыборкаРезультатаЗапроса.КоличествоНаСкладе;
    КонецЦикла

и вот это совсем непонятно...
те у вас N строк в ТЧ и соответсвенно на каждую запись будет по N движений.. зачем?

Жуть...

Вместо Возврат ставьте Продолжить
а после завершения цикла
Если Отказ Тогда
Возврат;
КонецЕсли;

иначе будет такая лажа допустим у вас по 3 позициям не хватает остатка. Вы запускаете проведение прогамма Вам выдает, что нет остатка по товару 1 и завершает процедуру. Далее вы исправляете ТЧ нажимаете провести
Программа дает не хватает остатка по товару 2
на N ом сообщении пользователь Вас порвет

Остаток = ?(ВыборкаРезультатаЗапроса.КоличествоНаСкладе = Null, 0, ВыборкаРезультатаЗапроса.КоличествоНаСкладе);
почему сразу в запросе не сделать?
ЕстьNULL(ОстаткиТоваровНаСкладахОстатки.КоличествоОстаток,0) КАК КоличествоНаСкладе