[maximus]

Конфигурация УПП.

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

[alex040269]

Я всегда предполагал, что каждый док сам создает свои движения при проведении, но если очень хочется, то можно записать через отбор.

набор.отбор.регистратор.установить(докСсылка);
набор.Записать(Истина);

где-то так

[maximus]

Я всегда предполагал, что каждый док сам создает свои движения при проведении, но если очень хочется, то можно записать через отбор.

набор.отбор.регистратор.установить(докСсылка);
набор.Записать(Истина);

где-то так

Сейчас я выбираю движения документа вот так:

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

а как записать в него новые движения?

[Домовик]

maximus, поделитесь, пожалуйста, зачем вам такое делать? А если вы будете проводить и перепроводить документ-приемник, как будут формироваться ваши движения? или это какая-то будет разовая обработка данных?

[maximus]

maximus, поделитесь, пожалуйста, зачем вам такое делать? А если вы будете проводить и перепроводить документ-приемник, как будут формироваться ваши движения? или это какая-то будет разовая обработка данных?

У меня товарищ проходит курсы по программированию 1С и вот там дали такое ДЗ. Мне тоже не совсем ясна логика этого процесса, но интересно)

[Домовик]

логика такова, что движений может быть по нескольким регистрам, и вам это нужно учесть
тут пример замены движений в одном регистре Расходной Накладной, имя кот ДОходыИРасходы. код не отлаживался, просто в модуле был набран.поэтому не знаю

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

движенияИсточник.ДоходыиРасходы.Выгрузить(ТЗ);
ТЗ.ЗаполнитьЗначения(ДокПриемник,"Регистратор");
движенияПриемник.ДоходыИРасходы.Загрузить(ТЗ);

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

Сообщение отредактировал Домовик - 13.02.13, 11:44

[maximus]

пишу так:

                             ДокИсточник = ДокументИсточник.ПолучитьОбъект();
         ДокПриемник = ДокументПриемник.ПолучитьОбъект();
         
         
                  ТЗ = Новый ТаблицаЗначений;
        ДвиженияИсточник=Докисточник.Движения;
        ДвиженияПриемник=ДокПриемник.Движения;

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

но начинает ругаться на НаборЗаписейРегистра.Выгрузить(ТЗ);

[Vofka]

ТЗ = НаборЗаписейРегистра.Выгрузить();

[maximus]

ТЗ = НаборЗаписейРегистра.Выгрузить();

Ошибка ушла - Спасибо!

А как правильно быть в этом куске

движенияПриемник.НаборЗаписейРегистра.Загрузить(ТЗ);

т.к. не находит
Поле объекта не обнаружено (НаборЗаписейРегистра)
движенияПриемник.НаборЗаписейРегистра.Загрузить(ТЗ);

[Домовик]

тз=НаборЗаписейРегистра.Выгрузить() это одна из интаксических ошибок )


я просто сомневаюсь, что можно вот так движения редактировать. в синтакс-помощнике на Выгрузить() (РегистрНакопленияНАборЗаписей) есть граммотный код.

Сообщение отредактировал Домовик - 13.02.13, 14:51

[maximus]

не могу сообразить как этот набор движений загрузить в документ приемник?

тз=НаборЗаписейРегистра.Выгрузить() это одна из интаксических ошибок )


я просто сомневаюсь, что можно вот так движения редактировать. в синтакс-помощнике на Выгрузить() (РегистрНакопленияНАборЗаписей) есть граммотный код.

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

[Vofka]

тз=НаборЗаписейРегистра.Выгрузить() это одна из интаксических ошибок )

Это почему?

А как правильно быть в этом куске

Ошибка в том, что НаборЗаписейРегистра - это набор записей источника. В него можно что-то писать или что-то читать. Нельзя через него обратиться к какому-то другому набору записей.

[maximus]

т.е. мне нужно создать второй набор записей по документу приемнику и в этот набор загрузить набор записей с документа ичсточника?

[Домовик]

Vofka, моих синтаксических ошибок . Код от фонаря пишу. ). идею внедрить выгрузить -загрузить хотелось сделать, а кода не знаю.

Сообщение отредактировал Домовик - 13.02.13, 15:01

[Vofka]

т.е. мне нужно создать второй набор записей по документу приемнику и в этот набор загрузить набор записей с документа ичсточника?

Ну да.

Домовик, а .

[maximus]

Ну да.

Домовик, а .

Я прошу прощения конечно, за глупые вопросы, но мне эти действия нужно делать цикл в цикле?

[Домовик]

в том-то и сложность. может быть движений по нескольким регистрам. нет, не желательно цикл в цикле . а подыскивать соответсвующий набор приемника набору источника по регистру. но как.

Сообщение отредактировал Домовик - 13.02.13, 15:14

[alex040269]

тз=НаборЗаписейРегистра.Выгрузить();
//изменить тз
набор = РегтистрыЧегото.СоздатьНаборЗаписей();
набор.Загрузить(тз);

//установить отбор
набор.Записать(Истина);

[Vofka]

maximus, документы разные? Если да - тогда прописывайте обращения к конкретным регистрам, это же не проблема.

[maximus]

maximus, документы разные? Если да - тогда прописывайте обращения к конкретным регистрам, это же не проблема.

Документы всегда одинаковые