1С Режим Конфигуратор


Дополнение - часть 11


          Операция.НоваяПроводка();

          Операция.Дебет.Счет = СчетПоКоду("20",ПланыСчетов.Наш);

          Операция.Кредит.Счет = СчетПоКоду("10.2",ПланыСчетов.Наш);

          Операция.Дебет.ВидЗатрат = Перечисление.ВидыЗатрат.НаКомплектующие;

          Операция.Дебет.Изделие = Изделие;

          Операция.Дебет.НарядНаКомплектацию = ТекущийДокумент();

          Операция.Кредит.МестоХранения = Склад;

          Операция.Кредит.Комплектующее = КомП;

          Операция.Кредит.ПриходнаяНакладная = ДокП;

          Операция.Фирма = ФирмаДокумента;

          Операция.Комментарий = "Передача комплектующих на сборку";

          Операция.НомерЖурнала = "10";

          Операция.Сумма = СумП;

          Операция.Количество = КолП;

          Колич=Колич-КолП;

          СуммаОпер=СуммаОпер+СумП;

          ТабКом.УстановитьЗначение(СтрП,"Кол",0);

          ТабКом.УстановитьЗначение(СтрП,"Сум",0);

// Опустошаем партию полностью

        Иначе

          СумО=Окр(Колич*(СумП/КолП),2,1);

          ПривязыватьСтроку(НС);

          Операция.НоваяПроводка();

          Операция.Дебет.Счет = СчетПоКоду("20",ПланыСчетов.Наш);

          Операция.Кредит.Счет = СчетПоКоду("10.2",ПланыСчетов.Наш);

          Операция.Дебет.ВидЗатрат = Перечисление.ВидыЗатрат.НаКомплектующие;

          Операция.Дебет.Изделие = Изделие;




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



Книжный магазин