Бух 2.0, док "Перемещение товаров", хочу дописать некоторые движения по забалансовому счету при проведении этого документа.

Пытался сделать так:
Процедура ПодпискаНаСобытие1ОбработкаПроведения(Источник, Отказ, РежимПроведения) Экспорт

   Набор = Источник.Движения.Хозрасчетный;
   Если Набор.Количество()>0 Тогда
   Иначе        
       Набор.Прочитать();
   КонецЕсли;
   
КонецПроцедуры

В итоге при первом проведении - мой набор всегда пуст, при перепроведении документа - набор содержит "старые" записи по бух.регистру (т.е. существовавшие до перепроведения документа)

Вопрос. Каким образом можно (и можно ли вообще) получить новые движения документа через подписку на событие по этому документу?

если хочешь дописать, то и дописывай
Движение = Источник.Движения.Хозрасчетный.Добавить()

(0) А читать за чем? Пиши в коллекцию и спи спокойно

или после записи получай набор, предварительно проверив на проведен()

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

(0) Делай через набор записей

НаборЗаписей=РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Регистратор.Установить(Регистратор);
НаборЗаписей.Прочитать();

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

// код рабочий
НаборДвиженийБУ  = Источник.Движения.Хозрасчетный.Выгрузить();
   //  убиваем строки с 91 счетом
   МстрокДоходов = НаборДвиженийБу.Найтистроки(Новый Структура("СчетДт,СчетКт",ПланыСчетов.Хозрасчетный.РасчетыСПоставщиками,ПланыСчетов.Хозрасчетный.ПрочиеДоходы));
   
   Для каждого строка из МстрокДоходов Цикл
       НаборДвиженийБУ.Удалить(строка);
   Конеццикла;    
   
   МстрокРасходов = НаборДвиженийБу.Найтистроки(Новый Структура("СчетДт,СчетКт",ПланыСчетов.Хозрасчетный.ПрочиеРасходы,ПланыСчетов.Хозрасчетный.РасчетыСПоставщиками));
   
   Для каждого строка из МстрокРасходов Цикл
       НаборДвиженийБУ.Удалить(строка);
   Конеццикла;
   
   //Ищем товары
   СЗОбработанныхстрок = Новый СписокЗначений;
   
   МстрокТоваров = НаборДвиженийБу.Найтистроки(Новый Структура("СчетКт",ПланыСчетов.Хозрасчетный.ТоварыНаСкладах));
   Для каждого строка из МстрокТоваров Цикл
       МстрокТЧ  = Источник.товары.Найтистроки(Новый структура("Номенклатура,Количество",Строка.СубконтоКт1,Строка.КоличествоКт));
       Если МстрокТЧ.Количество() > 1 тогда //Осторожно  тк может быть одно количество и разные цены
           ОсобаяОбработка = Истина;
       иначе
           ОсобаяОбработка = Ложь;
       КонецЕсли;
       
       Для каждого строкаТЧ из МстрокТЧ цикл
           Если ОсобаяОбработка и НЕ СЗОбработанныхстрок.НайтиПоЗначению(строкаТЧ.НомерСтроки) = неопределено тогда //новая строка
           Строка.Сумма  = ?(Источник.СуммаВключаетНДС,СтрокаТЧ.Сумма-СтрокаТЧ.СуммаНДС,СтрокаТЧ.Сумма);
           СЗОбработанныхстрок.Добавить(СтрокаТЧ.Номерстроки);    
           иначеесли ОсобаяОбработка и СЗОбработанныхстрок.НайтиПоЗначению(строкаТЧ.НомерСтроки) = неопределено тогда// уже ее обработали
           продолжить;
           иначеЕсли Не ОсобаяОбработка тогда
           Строка.Сумма  = ?(Источник.СуммаВключаетНДС,СтрокаТЧ.Сумма-СтрокаТЧ.СуммаНДС,СтрокаТЧ.Сумма);
           Конецесли;
       
       КонецЦикла;
       
   Конеццикла;
   
   Источник.Движения.Хозрасчетный.Загрузить(НаборДвиженийБУ);

(7) Подписка обработка проведения

(5) Код, похожий на твой, уже пробовал, но таблица движений остается пустая:

НаборЗаписей=РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Регистратор.Установить(Источник.Ссылка);
НаборЗаписей.Прочитать();

(6)(7)Спасибо, сейчас попробую

нет, тоже не прокатывает..
первая же строчка
НаборДвиженийБУ  = Источник.Движения.Хозрасчетный.Выгрузить();

возвращает пустую ТЗ. Но движения определенно есть! После проведения документа вижу целых 4 проводки

видимо, придется через подписку ПриЗаписи наборазаписей регистра делать.. хотя лично мне кажется более удобным (да и логичным) засунуть это в подписку ОбработкаПроведения самого документа.

&suvolod хочешь нас уверить, что у тебя в подписке на событии приведенный выше код не видит движений?

да

(14) Быть такого не может.

(14) Движение по регистру бух. выполняется в модуле проведения или в еще одной подписке?

(4) 1С считает, что алгоритм подписки не должен зависеть/влиять от алгоритма проведения документа.

(0)
НачатьТранзакцию нигде не применяешь?

(0) Явно подписка не на то событие. На какое событие подписываешься?

(15) может. Там или или. Или вариант из (0) видит движения или из (5).

(20) В подписке уже есть все движения т.е. она выполняется после модуля проведения (у меня на этом конфа вся построена а автор уверяет, что движений там нету).

(14)как это проверить?
Я использую абсолютно типовую БП 2.0, в которой добавил единственную подписку - Источник: ДокументОбъект.ПеремещениеТоваров, Событие - ОбработкаПроведения. Код:

Процедура ПодпискаНаСобытие1ОбработкаПроведения(Источник, Отказ, РежимПроведения) Экспорт
   НаборЗаписейРББух = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей();
   НаборЗаписейРББух.Отбор.Регистратор.Установить(Источник.Ссылка);
   НаборЗаписейРББух.Прочитать();

КонецПроцедуры

НаборЗаписей пуст, хотя после проведения проводки по доку есть

(22) Не знаю как работает типовая, но с удовольствием бы посмотрел как может этот код не возвращать записи..

(21) если движения не записаны, тогда Источник.Движения их видит, а НаборЗаписей.Прочитать() не видит.

или случай 2. Движения пишутся через НаборЗаписей. ТОгда надо всегда делать Прочитать();

(22) Такой код вроде как должен вернуть пустой набор, т.к. данные еще не записаны в базу.

Код из (0) более правильный - получать набор через свойство Источник.Движения.

(24) Так как они могут быть не записаны, если в "подписку на событие" попадаем только когда выполнится "модуль проведения"

(0)   Набор = Источник.Движения.Хозрасчетный;
здесь что?

в модуль подписки вообще попадает?
все должно быть, если есть движения у документа
Галки сервер стоят, вызов сервера?

(26) Молча.
Если в коде обработки проведения ни где не было принудительной записи Движения.Записать() или Движения.Хозрасчетный.Записать(), то наборы записеи будут записаны в базу по окончании транзакции.

Функция ПолучитьТаблицуДвиженийРегистра(Док, стрРегистр="Хозрасчетный")
   НаборДвижений=Док.Движения[стрРегистр];
   Если НаборДвижений.Количество()>0 Тогда
       Возврат Док.Движения[стрРегистр].Выгрузить();
   КонецЕсли;

   НаборДвижений=РегистрыНакопления[стрРегистр].СоздатьНаборЗаписей();
   НаборДвижений.Отбор.Регистратор.Установить(Док.Ссылка);
   НаборДвижений.Прочитать();
   Если НаборДвижений.Количество()>0 Тогда
       Возврат НаборДвижений.Выгрузить();
   КонецЕсли;

   Возврат Неопределено;
КонецФункции

(26) в общем случае они могут быть записаны в модуле набора записей регистра,
(22) кстати там идет обращение к движениям, там что показывает в наборе?

(30) В обработке проведения твой код вернет либо пустой набор (при первом проведении), либо старый набор (при перепроведении).

(32) Мы же говорим о подписке на событие ведь так?

(33) Да.

(34) может код проверить?

(29) обработка проведения выполняется в транзакции

(36) Бинго!
Так что прочитать записи наборов ты сможешь только по окончании транзакции (если не делается принудительная их запись в коде Движения.Записать())

(37) и что, они же должны быть видны через Движения.Хозрасчетный всеравно

(37) т.е. в БП 2.0 забыли написать Движения.Записать())?????????

(38) Совершенно верно.

Через свойства Источник.Движения ты их увидишь.
А из базы прочитать не сможешь - их в базе еще нет.

(39) А зачем они должны были это написать?....

(41) для механизма подписок епт..

(39) Свой код в (22) исправь:


Процедура ПодпискаНаСобытие1ОбработкаПроведения(Источник, Отказ, РежимПроведения) Экспорт
   НаборЗаписейРББух = Источник.Движения.Хозрасчетный;
КонецПроцедуры

(42) Дятел?
Тебе русским языком говорят, что надо читать набор через свойства документа Движения. В подписке это будет выглядеть так:

Проводки = Источник.Движения.Хозрасчетный;

(44) хехе см (0)

(45) я читал (0). И сильно сомневаюсь, что там написана правда.
Либо обработчик вообще не отрабатывает, либо подписка сделана на другое событие, а не на обработку проведения.

(46) судя по параметрам имеено на проведение сделана)

(44)Сам дятел
Как ты запросом будешь получать движения с учетом движений, уже сделанных этим документом.
скройся под стол

кеш почисть xD

suvolod возьми код из (30) - потом unregistered расскажешь работает так или нет.

(48) Солнышко.

И откуда у нас вдруг вылез запрос?

Что-то в (0) про запрос ни какой речи нет.

(50) Не будет твой код работать.
Он получит СТАРЫЕ движения докмента.

(51) у меня в подписке на проведение запрос, использующий движеня из обработки проведения...
кстати (0) не первый

v8: В обработчике подписки на обработку проведения в наборе регистра пусто

(52) не вижу смысла спорить - если автору будет интересно - он проверит (будет\небудет)

(53) А чтож ты родной раньше молчал?

Если тебе в обработке проведения нужно получать данные из регстров уже С УЧЕТОМ проведения, то единственный способ это делать принудительную запись - Движения.Записать() или Движения.Хозрасчетный.Записать() и только после этого писать свои запросы к регистрам.

(55) ну у меня получение остатков идет, конечно, вид границы исключая, но движения, насколько помню, попадали, если без границы

Короче только что проверил.

БП 2.0.37.14
Документ ПеремещениеТоваров
Подписка на событие ОбработкаПроведения

Код обработчика подписки:

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

При любых раскладах (первое проведение/перепроведение ранее проведенного) выдает правильный результат. То есть набор записей есть и с правильным количеством записей.

Можете спорить дальше сколько хотите.

(57) споришь ты. доказывал, что в типовой в подписке может не быть движений

(56) >> движения, насколько помню, попадали

Такого быть не может.
Как может что-то попасть в результат запроса, если этого еще нет в базе данных?

Либо этот запрос делался уже после записи (которая идет в одной транзакции с проведением). Либо внутри обработки проведения была выполнена принудительная запись движений.

(58) Ааааааа.....

Перечитай все мои посты и найди, где я говорил, что движений нет!

Ты хоть понимаешь разницу между

НаборЗаписей = Источник.Движения.Хозрасчетный;

и

НаборЗаписей = РегистрыНакопления[стрРегистр].СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Регистратор.Установить(Док.Ссылка);
НаборЗаписей.Прочитать();

+ к (60)

Движения (свойство документа, содержащее наборы записей по всем регистрам) есть.

Но эти наборы записей еще не записаны в базу данных.

Поэтому посмотреть наборы записей через свойство документа "Движения" ты можешь, а вот прочитать их из базы запросом или объектной моделью методом СоздатьНаборЗаписей() - нет.

(0) Всю ветку не читал... но мнение имею :)
1. Проверяем как делает движения документ. Если документ делает движения стандартным способом то это одно, если делает записи в наборы регистров, то подписку нужно делать на запись в регистр, иначе не перехватишь.
2. По поводу пустого набора записей. Скорее всего документ действительно делает запись движений "кривым" - правильным способом. В подписке ты перехватываешь только затирание движений, а сами движения записываются в другом месте петум прямой записи в набор записи регистра.
3. При простой - "не правильной" записи движений, в подписке перехватываются движения которые документ будет делать если ты их не изменишь.

(59) внутри обработки проведения была запись движений. КА, РТиУ