В типовых конфигурациях присутствуют документы корректировки регистров, такие как "Перенос данных" и "Корректировка регистров", разберем программное создание и заполнение документов. На примере конфигурации ЗУП 3.1 и документа "Перенос данных", документ "Корректировка регистров" можно сделать по аналогии. Необходимо заполнить регистр накопления "ВзаиморасчетыСДепонентами"
НовыйПереносДанных = Документы.ПереносДанных.СоздатьДокумент();
НовыйПереносДанных.Дата = ТекущаяДата();
//выберем движения по документу
ДвиженияПереносДанных = НовыйПереносДанных.Движения;
//добавляем табличную часть регистра в документ, обязательно указываем имя регистра
НовыйПереносДанныхРН = НовыйПереносДанных.ТаблицаРегистров.Добавить();
НовыйПереносДанныхРН.Имя = "ВзаиморасчетыСДепонентами";
//выбираем движения по регистру
ВзаиморасчетыСДепонентами = ДвиженияПереносДанных.ВзаиморасчетыСДепонентами;
НовыйПереносДанных.Записать(); //обязательно записываем документ т.к. нужна ссылка на регистратор
Строка = ВзаиморасчетыСДепонентами.Добавить(); //добавляем движения
Строка.Период = ДатаРегистрацииДвижений;
Строка.Регистратор = НовыйПереносДанных.Ссылка;
Строка.ВидДвижения = ВидДвиженияНакопления.Приход;
Строка.Ведомость = ВедомостьНаВыплатуЗарплатыВКассу;
Строка.Активность = Истина;
Строка.Организация = ОрганизацияДляДвижения;
Строка.ФизическоеЛицо = ФизЛицоДляДвижения;
Строка.Сумма = Сумма;
//записываем сначала движения затем документ
ВзаиморасчетыСДепонентами.Записать();
НовыйПереносДанных.Записать();
Комментариев нет:
Отправить комментарий