Консультация № 108855
10.11.2007, 21:18
0.00 руб.
0 2 2
Здравствуйте!

Как осуществить движения по регистрам? 1С 8.1

Обсуждение

Неизвестный
10.11.2007, 21:37
общий
это ответ
Здравствуйте, Игорь Станиславович!

НовоеДвижение=ДокументОбъект.Движения.ИмяРегистра.Добавить();
НовоеДвижение.Регистратор=Ссылка;
НовоеДвижение.Дата=Дата;
-----------------------------

ДокументОбъект.Движения.ИмяРегистра.Записать();
Неизвестный
12.11.2007, 07:01
общий
это ответ
Здравствуйте, Игорь Станиславович!
Ниже смотрите пример проводки для регистров бухгалтерии

Приложение:
Процедура ОбработкаПроведения(Отказ, Режим) //{{__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ // Данный фрагмент построен конструктором. // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!! // регистр Основной Движение = Движения.Основной.Добавить(); Движение.СчетДт = ПланыСчетов.Основной.ИзделияВзалоге; Движение.СчетКт = ПланыСчетов.Основной.принятыеОбязательстваПоХранению; Движение.Период = Дата; Движение.Сумма = ВыданнаяСсуда; Движение.Регистратор=Ссылка; Движение.КоличествоДт = 1; Движение.Содержание = "Принято в залог от"; Движение.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.Фирма] = Фирма; Движение.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.Клиент] = Клиент; Движение.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.Изделия] = Изделие; Движение.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконто.Фирма] = Фирма; Движение.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконто.Клиент] = Клиент; Движение.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконто.Изделия] = Изделие; // записываем движения регистров Движения.Основной.Записать(); //}}__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВКонецПроцедуры
Форма ответа