1С-Предприятие 8.0. Практическое пособие разработчика


Добавление движений по регистру бухгалтерии Управленческий в документ ОказаниеУслуги - часть 8


           Движение = Движения.СтоимостьМатериалов.Добавить();

            Движение.ВидДвижения = ВидДвиженияНакопления.Расход;

           Движение.Период = Дата;

           Движение.Материал = ВыборкаРезультатаЗапроса.Номенклатура;

           //расчитать стоимость материала

           СтоимостьМатериала = ?(ВыборкаРезультатаЗапроса.КоличествоОстаток = Null, 0,

               ВыборкаРезультатаЗапроса.СтоимостьОстаток / ВыборкаРезультатаЗапроса.КоличествоОстаток);

           Движение.Стоимость = СтоимостьМатериала * ВыборкаРезультатаЗапроса.Количество;

           //По регистру Управленческий

           //первая проводка:

           //Д 62(ДебиторскаяЗадолженность) - К 90 (Капитал)

           //розничная сумма

           Движение = Движения.Управленческий.Добавить();

           Движение.СчетДт = ПланыСчетов.Основной.ДебиторскаяЗадолженность;

           Движение.СчетКт = ПланыСчетов.Основной.Капитал;

           Движение.Период = Дата;

           Движение.Сумма = ВыборкаРезультатаЗапроса.Сумма;

           Движение.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.Клиенты] = Клиент;




Начало  Назад  Вперед