Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: УПП Документ Списание Товаров
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.2 > Программирование обычных форм 1С 8.2 и не интерфейсной логики
jonson_r
Весь код модуля перерыл... потратил уже часа два. В обработке проведения есть процедура:

необходимо зарегистрироваться для просмотра ссылки
Процедура ДвиженияПоРегистрам(РежимПроведения, СтруктураШапкиДокумента, ТаблицаПоТоварам, ТаблицаПоТаре, Отказ, Заголовок);

    ДвиженияПоРегистрамУпр(РежимПроведения, СтруктураШапкиДокумента, ТаблицаПоТоварам, ТаблицаПоТаре, Отказ, Заголовок);
    ДвиженияПоТоварамОрганизаций(РежимПроведения, СтруктураШапкиДокумента, ТаблицаПоТоварам, ТаблицаПоТаре, Отказ, Заголовок);
    ДвиженияПоТоварамОрганизацийРегл(РежимПроведения, СтруктураШапкиДокумента, ТаблицаПоТоварам, ТаблицаПоТаре, Отказ, Заголовок);
    ДвиженияПоСписаннымТоварам(РежимПроведения, СтруктураШапкиДокумента, ТаблицаПоТоварам, ТаблицаПоТаре, Отказ, Заголовок);

    
    Если ТаблицаПоТоварам.Количество() + ТаблицаПоТаре.Количество() >0 тогда
        УправлениеЗапасами.ЗарегистрироватьДокументВПоследовательностяхПартионногоУчета(ЭтотОбъект, Дата, СтруктураШапкиДокумента.Организация,ОтражатьВУправленческомУчете,СтруктураШапкиДокумента.ОтражатьВБухгалтерскомУчете,СтруктураШапкиДокумента.СпособВеденияПартионногоУчетаПоОрганизации);
    КонецЕсли;    
        

    // При списании партий также делаются записи в регистры бухгалтерского учета.
    Если СтруктураШапкиДокумента.ОтражатьВБухгалтерскомУчете Тогда
        Если Движения.Хозрасчетный.Модифицированность() Тогда
            Движения.Хозрасчетный.Записать();
        КонецЕсли;
    КонецЕсли;
    
    УправлениеЗапасамиПартионныйУчет.ДвижениеПартийТоваров(Ссылка, Движения.СписанныеТовары.Выгрузить());

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

КонецПроцедуры // ДвиженияПоРегистрам()


Пересмотрел все процедуры - ничего не нашел. Причем постоянно в отладчике мониторю Движения.Хозрасчетный.Количество(). И подписки некоторые пересмотрел, все равно не нашел.

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

при выполнении
// Движения по документу.
    ПроводкиБУ = Движения.Хозрасчетный;
    ПроводкиБУ.Прочитать();

уже Движения.Хозрасчетный.Количество() = 2
Так же уже включил "кривую артиллерию" - начал комментировать поочередно верхние процедуры. Движения делаются если раскоментирована 4-я процедура сверху
ДвиженияПоСписаннымТоварам(РежимПроведения, СтруктураШапкиДокумента, ТаблицаПоТоварам, ТаблицаПоТаре, Отказ, Заголовок);


В ней даже в модули наборов записей заходил при их записи - не смог найти...
logist
Как вариант гляньте общий модуль "УправлениеЗапасамиПартионныйУчет" процедура "ЗаполнитьПоляЗаписиСписанияРегл"
jonson_r
logist @ Вчера, 17:33 необходимо зарегистрироваться для просмотра ссылки,
к сожалению, ничего((
jonson_r
Снова закоментировал процедуру
ДвиженияПоСписаннымТоварам(РежимПроведения, СтруктураШапкиДокумента, ТаблицаПоТоварам, ТаблицаПоТаре, Отказ, Заголовок);

- проводок по хозрасчетному нет, вернул назад - есть. Перерыл всю эту процедуру - она двигает только РегистрСведений.СписанныеТовары. Просмотрел и модули этого регистра - ничего. Объективно подписок при записи этого документа или этого регистра не нашел. Вдобавок и Движения.Хозрасчетный.Количество() всегда 0, и только если сделать ему Прочитать() тогда = 2 (две проводки).

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