Создание отчетов

Приступая к созданию отчетов для нашей цели необходимо создать Перечисление СтатусКомплект с двумя атрибутами «В наличии» и «Нет в наличи» а после добавить в справочник Комплектующие, для того чтобы знать какое комплектующие имеется на складе а какое нет (рис.22-23).

Рисунок 22 – Окно редактирования Перечисления СтатусКомплект

Рисунок 23 – Перечисление СтатусКомплект в справочнике Комплектующие

Дальше можно создавать отчеты. Создать перечисление СтатусКомплект нам нужно было с целью последующего создания отчета на основе этого перечисления. Создадим два отчета:

1) ОтчетКомп – будет выводить список комплектующих по заданному ценовому диапазону;

2) ОтчетоКомп2 – будет выводить списк комплектующих по наличию, для него мы и создавали перечисление СтатусКомплект.

Создадим ОтчетКомп, добавим форму, печатную форму и необходимые элементы а так же напишем код для вывода отчета (рис.24-26).

Рисунок 24 – Редактирование формы отчета ОтчетКомп

Рисунок 25 – Печатная форма отчета ОтчетКомп

Код для процедуры Сформировать():

Процедура Сформировать()

Таб=СоздатьОбъект ("Таблица");

Таб.ИсходнаяТаблица ("Комплект");

Таб.ВывестиСекцию("Шапка");

Комплектующие=СоздатьОбъект ("Справочник.Комплектующие");

Комплектующие. ВыбратьЭлементы();

НомерСтроки=0;

Пока Комплектующие. ПолучитьЭлемент ()=1 Цикл

Если (Комплектующие.Цена >= Минг) И (Комплектующие.Цена <= Максг)

Тогда

НомерСтроки=НомерСтроки +1;

Таб.ВывестиСекцию("Строка");

КонецЕсли;

КонецЦикла;

Таб.ТолькоПросмотр(1);

Таб.Показать("Комплект");

КонецПроцедуры

Рисунок 26 – Работа отчета ОтчетКомп в режиме «Предприятие»

Теперь создадим Создадим ОтчетКомп2, добавим форму, печатную форму и необходимые элементы а так же напишем код для вывода отчета (рис.27-26).

Рисунок 27 – Редактирование формы отчета ОтчетКомп2

Рисунок 28 – Печатная форма отчета ОтчетКомп2

Код для процедуры Сформировать():

Процедура Сформировать()

Таб=СоздатьОбъект ("Таблица");

Таб.ИсходнаяТаблица ("стату");

Таб.ВывестиСекцию("Шапка");

Комплектующие=СоздатьОбъект ("Справочник.Комплектующие");

Комплектующие. ВыбратьЭлементы();

НомерСтроки=0;

Пока Комплектующие. ПолучитьЭлемент ()=1 Цикл

Если (Комплектующие.Статус = стат)

тогда

НомерСтроки=НомерСтроки +1;

Таб.ВывестиСекцию("Строка")

КонецЕсли;

КонецЦикла;

Таб.ТолькоПросмотр(1);

Таб.Показать("стату");

КонецПроцедуры

Рисунок 29 – Работа отчета ОтчетКомп2 в режиме «Предприятие»

Как мы видим на рисунке, в форме отчета мы брали атрибут перечисления «Нет в наличии» и нам вышла печатная форма со списком комплектующих которых на данный момент не имеется на складе.

Заключение

В ходе проведения данного проектирования был создан модуль для гипотетического предприятия по сборке и ремонту компьютеров.

Данный модуль предполагает сборку готовой продукции из комплектующих и расходных материалов. Также можно распечатать конфигурацию собранного системного блока и прайс лист комплектующих. Также был создан отчет, который показывает наличие готовой продукции и отчет выводящий список комплектующих по заданному ценовому диапазону. Были созданы 4 справочника, 2 документа, 2 отчета, 1 журнал документов и 1 перечисление.

Разработанный модуль является актуальным в наше время и может быть внедрен в любое предприятие по сборке и ремонту компьютеров.

Список использованной литературы

1) Грянина, Е.А.; Харитонов, С.А. Секреты профессиональной работы с программой "1С: Зарплата и управление персоналом 8". Введение в конфигурацию; Наука -, 2008. - 293 c.

2) Жадаев А. Наглядный самоучитель 1С:Бухгалтерия 7.7; -, 2008. - 288 c.

3) Титаренко Г.А. Автоматизированные информационные технологии в экономике. Под. Ред, Москва, «Компьютер», 1998.

4) Фатрепп Р.; Шафер Д., Шафер Л. Управление программными проектами. Достижение. Достижение оптимального качества при минимуме затрат, «Вильямс», Москва – Санкт-Петербург – Киев, 2003.

5) Шубина Е. В. Работаем в 1С: Предприятие 7.7. Настройка. Эксплуатация. Конфигурирование. Программирование; - 2014. - 448 c.

Дата добавления: 2015-08-31