Активный Счет "скл" На 1c 7.7, написать программу по учету расходных материалов на ремонт авто. |
1. Пользуйтесь тегами кода. - [code] ... [/code]
2. Точно указывайте язык, название и версию компилятора (интерпретатора).
3. Название темы должно быть информативным.
В описании темы указываем язык!!!
Активный Счет "скл" На 1c 7.7, написать программу по учету расходных материалов на ремонт авто. |
dron4ik |
10.03.2012 8:34
Сообщение
#1
|
Бывалый Группа: Пользователи Сообщений: 318 Пол: Мужской Репутация: 0 |
Организация ООО "Автодор" оказывает транспортные услуги. Имеется свой автопарк
в 20 единиц. При организации есть ремонтная мастерская, где производится ремонт транспортных средств. Задача: написать программу по учету расходных материалов на ремонт транспортных средств. Затраты должны отражаться на забалансовом, количественном, активном счете "СКЛ". Итоги должны выводиться в отчет "Оборотно-сальдовая ведомость". Что за активный счет "СКЛ" как его создать? Вот что я сделал на данный момент: 1) http://s1.ipicture.ru/uploads/20120310/sTX12jz7.jpg 2) http://s1.ipicture.ru/uploads/20120310/Xbt3HyOz.jpg 3) http://s1.ipicture.ru/uploads/20120310/JAjnchud.jpg На первом скрине, это печатная форма расходов на материалы потраченные на данный заказ наряд. На 2-ом скрине реализовал приход материала, т.е. закупку самих этих материалов и справа на скрине показан документ заказ-наряд. На 3-ем скрине уже показан документ "печать"..т.е. на этом документе я хотел как раз реализовать итог "оборотно-сальдовая ведомость". Вот код модуля докмента "Приходматериалов": Код: Код Процедура ОбработкаПроведения() ВыбратьСтроки(); Пока ПолучитьСтроку()=1 Цикл Регистр.Остатки.Номенклатура = Наименование; Регистр.Остатки.Кол_во = Количество; Регистр.Остатки.ДвижениеПриходВыполнить(); КонецЦикла; КонецПроцедуры Вот код модуля документа "заказ_наряд" Код: Код Процедура ОбработкаПроведения() ВыбратьСтроки(); Пока ПолучитьСтроку()=1 Цикл Регистр.Заказ_наряд.Заказчик = Заказчик; Регистр.Заказ_наряд.Транспорт = Транспорт; Регистр.Заказ_наряд.Мастер = Мастер; Регистр.Заказ_наряд.Склад = Склад; Регистр.Заказ_наряд.Показание_спидометра = Показание_спидометра; Регистр.Заказ_наряд.Состояние_наряда = Состояние_наряда; Регистр.Заказ_наряд.Номенклатура = Номенклатура; Регистр.Заказ_наряд.Кол_во = Кол_во; Регистр.Заказ_наряд.Цена = Цена; Регистр.Заказ_наряд.Сумма = Сумма; Регистр.Заказ_наряд.Ед_измерения = Ед_измерения; Регистр.Заказ_наряд.ДвижениеПриходВыполнить(); Регистр.Остатки.Номенклатура = Номенклатура; Регистр.Остатки.Кол_во = Кол_во; Регистр.Остатки.ДвижениеРасходВыполнить(); КонецЦикла; КонецПроцедуры вот код модуля документа печать Код: П Код роцедура ОбработкаПроведения() ВыбратьСтроки(); Пока ПолучитьСтроку()=1 Цикл Если Кол_во > 0 Тогда Регистр.Заказ_наряд.Номенклатура = Номенклатура; Регистр.Заказ_наряд.Кол_во = Кол_во; Регистр.Заказ_наряд.Цена = Цена; Регистр.Заказ_наряд.Сумма = Сумма; Регистр.Заказ_наряд.Ед_измерения = Ед_измерения; Регистр.Заказ_наряд.ДвижениеРасходВыполнить(); КонецЕсли; КонецЦикла не уверен ,только в двух последних кодах модулей. Но смысл думаю таков: 1)Фиксирую определенное число товаров в документе "Приходматериалов"(Например 20 шин) 2)В документе "заказ-наряд" , оформляю сам заказ т.е. указываю количесвто материалов потраченные на починку авто(например в колонке кол_во указываю материал-шины, кол-во - 4шт.) 3)В документе печать уже выводиться итог ввиде "оборотно сальдовой ведомости".(т.е. указываю сколько было шин изначально т.е. 20 штук..и сколько потратилось т.е. 4 штуки..и выводим разность т.е. 16 штук) Не знаю как вывести в итог изначальное кол-во материала т.е. шины, и сколько потрачено, и сколько осталось шин. |
Текстовая версия | 29.04.2024 0:21 |