|
1 2 3 4 5 6 7 8 9 10 11 |
Процедура ОбработкаПроведения() Пока ПолучитьСтроку() = 1 Цикл Операция.НоваяПроводка(); Операция.Кредит.Счет = СчетПоКоду("60.1"); Операция.Дебет.Счет = СчетПоКоду("08.4"); Операция.СодержаниеПроводки = "Поступление ОС"; Операция.Сумма = Сумма; Операция.НомерЖурнала="OC"; КонецЦикла; Операция.Записать(); КонецПроцедуры |
About the Author
