Организация ООО "Автодор" оказывает транспортные услуги. Имеется свой автопарк
в 20 единиц. При организации есть ремонтная мастерская, где производится
ремонт транспортных средств.
Задача: написать программу по учету расходных материалов
на ремонт транспортных средств. Затраты должны отражаться на забалансовом,
количественном, активном счете "СКЛ". Итоги должны выводиться в отчет
"Оборотно-сальдовая
ведомость".
Что за активный счет "СКЛ" как его создать?
Вот что я сделал на данный момент:
1)
http://s1.ipicture.ru/uploads/20120310/sTX12jz7.jpg2)
http://s1.ipicture.ru/uploads/20120310/Xbt3HyOz.jpg3)
http://s1.ipicture.ru/uploads/20120310/JAjnchud.jpgНа первом скрине, это печатная форма расходов на материалы потраченные на данный заказ наряд.
На 2-ом скрине реализовал приход материала, т.е. закупку самих этих материалов и справа на скрине показан документ заказ-наряд.
На 3-ем скрине уже показан документ "печать"..т.е. на этом документе я хотел как раз реализовать итог "оборотно-сальдовая ведомость".
Вот код модуля докмента "Приходматериалов":
Процедура ОбработкаПроведения()
ВыбратьСтроки();
Пока ПолучитьСтроку()=1 Цикл
Регистр.Остатки.Номенклатура = Наименование;
Регистр.Остатки.Кол_во = Количество;
Регистр.Остатки.ДвижениеПриходВыполнить();
КонецЦикла;
КонецПроцедуры
Вот код модуля документа "заказ_наряд"
Процедура ОбработкаПроведения()
ВыбратьСтроки();
Пока ПолучитьСтроку()=1 Цикл
Регистр.Заказ_наряд.Заказчик = Заказчик;
Регистр.Заказ_наряд.Транспорт = Транспорт;
Регистр.Заказ_наряд.Мастер = Мастер;
Регистр.Заказ_наряд.Склад = Склад;
Регистр.Заказ_наряд.Показание_спидометра = Показание_спидометра;
Регистр.Заказ_наряд.Состояние_наряда = Состояние_наряда;
Регистр.Заказ_наряд.Номенклатура = Номенклатура;
Регистр.Заказ_наряд.Кол_во = Кол_во;
Регистр.Заказ_наряд.Цена = Цена;
Регистр.Заказ_наряд.Сумма = Сумма;
Регистр.Заказ_наряд.Ед_измерения = Ед_измерения;
Регистр.Заказ_наряд.ДвижениеПриходВыполнить();
Регистр.Остатки.Номенклатура = Номенклатура;
Регистр.Остатки.Кол_во = Кол_во;
Регистр.Остатки.ДвижениеРасходВыполнить();
КонецЦикла;
КонецПроцедуры
вот код модуля документа печать
Процедура ОбработкаПроведения()
ВыбратьСтроки();
Пока ПолучитьСтроку()=1 Цикл
Если Кол_во > 0 Тогда
Регистр.Заказ_наряд.Номенклатура = Номенклатура;
Регистр.Заказ_наряд.Кол_во = Кол_во;
Регистр.Заказ_наряд.Цена = Цена;
Регистр.Заказ_наряд.Сумма = Сумма;
Регистр.Заказ_наряд.Ед_измерения = Ед_измерения;
Регистр.Заказ_наряд.ДвижениеРасходВыполнить();
КонецЕсли;
КонецЦикла
не уверен ,только в двух последних кодах модулей.
Но смысл думаю таков:
1)Фиксирую определенное число товаров в документе "Приходматериалов"(Например 20 шин)
2)В документе "заказ-наряд" , оформляю сам заказ т.е. указываю количесвто материалов потраченные на починку авто(например в колонке кол_во указываю материал-шины, кол-во - 4шт.)
3)В документе печать уже выводиться итог ввиде "оборотно сальдовой ведомости".(т.е. указываю сколько было шин изначально т.е. 20 штук..и сколько потратилось т.е. 4 штуки..и выводим разность т.е. 16 штук)
Не знаю как вывести в итог изначальное кол-во материала т.е. шины, и сколько потрачено, и сколько осталось шин.