Автоматизация учета отдела материально-технического снабжения
СОДЕРЖАНИЕ
Введение
.
Описание предметной области и круга задач для автоматизации
.1
Описание предметной области
.2
Описание круга задач для автоматизации
.
Проектирование задачи
.1
Разработка концептуальной модели предметной области
.
Разработка конфигурации в 1С:Предприятии
.1
Создание констант и перечислений
.2
Создание справочников, написание программных модулей
.3
Создание журналов и документов, описание обработки проведения и вывода на
печать
.4
Создание отчетов
.
Администрирование
.1
Создание пользователя и пользовательского интерфейса
Заключение
Список
использованных источников
Приложение
A Листинг справочников, печатных форм и проводок
Приложение
Б Листинг запросов на создание отчетов
ВВЕДЕНИЕ
Материально-техническое снабжение (МТС) - это
вид коммерческой деятельности по обеспечению материально-техническими ресурсами
процесса производства, осуществляемый до начала производства - от момента
возникновения потребности в ресурсах вплоть до их использования при
изготовлении продукции.
Цель МТС - доведение до производственных
потребителей конкретных ресурсов требуемых конструктивных, технологических
свойств в необходимых количествах (объемах), в точный срок, в определенном
месте с минимально допустимыми затратами.
Предмет МТС - материально-технические ресурсы
(мтр), необходимые для обеспечения производственного процесса предприятия.
Субъектами МТС являются, с одной стороны,
потребитель (как правило, производственное предприятие), с другой - поставщики
материально-технических ресурсов (производственные и посреднические структуры).
Объекты МТС - потребители
материально-технических ресурсов.
Целью курсового проекта является разработка АРМ
«Отдел материально-технического снабжения» предназначенной для автоматизации
учета проведения выставок племенных животных.
Курсовой проект выполнялся с помощью программы
«1С: Предприятие». Главной целью создаваемой программы является упрощение
хранения необходимой информации о поставках МТС, поставщиках МТС,
внутрихозяйственных операций с МТС, товарно-транспортных операциях МТС. Продукт
позволит работнику упростить работу по учету МТС.
При учете МТС через работника предприятия
проходит большой объем данных, сведенья о поставщиках, информация о товаре,
информация о движении материалов.
В ходе создания курсового проекта для правильной
работы системы необходимо создать: справочники, документы, отчеты, а так же
печатные формы, предусмотренные по документам.
Готовый курсовой проект должен отвечать всем
требованиям, предъявляемым к нему и решать все поставленные задачи. Быть
простым и понятным в использовании, а документы и их печатные формы
соответствовать документам, используемым на предприятии.
Задачами курсового проекта являются:
автоматизация справочной системы;
формирование и проведение документов;
формирование отчетов;
разработка удобного интерфейса.
1. ОПИСАНИЕ ПРЕДМЕТНОЙ ОБЛАСТИ И КРУГА ЗАДАЧ ДЛЯ
АВТОМАТИЗАЦИИ
1.1 Описание
предметной области
МТС, как деятельность, непосредственно
предшествующая производству, снабжение не просто направлено на обеспечение
ресурсами для изготовления товара, но и само в некоторой мере создает его
потребительную стоимость и цену.
Для учета работы отдела материально-технического
снабжения необходимо иметь справочную информацию о складах, на которых будут
располагаться материалы, информацию о сотрудниках, необходима для ведения
документов, информация о контрагентах, поставщиках и покупателях материалов,
машины на которых будет производиться транспортировка материалов.
Основными документами будут являться документ о
внутри хозяйственных перемещениях, документ о поступлении материалов на склад,
документ о транспортировке материалов потребителям.
Любая выставка проводится специализированных
помещениях в которые животные сами по себе не попадут, поэтому необходим учет
перевозок животных, а так же командировочных, данная информация должна хранится
в документах.
Для ведения любого учета необходимы отчеты о
проделанной работе отдела.
Отчет по товарам- количество товара и его
стоимость.
Отчет по ТТН-объем поставленного товара.
Отчет по внутри хозяйственным перемещением
товара - объем товара который был перенаправлен с одного склада на другой.
справочный конфигурация предприятие интерфейс
1.2 Описание круга
задач для автоматизации
В ходе создания курсового проекта необходимо
автоматизировать учет отдела материально-технического снабжения, а именно:
1. Автоматизация заполнения документов.
2. Автоматизация заполнения справочников.
. Автоматизация процесса изменения данных
и дополнения информацией.
. Автоматизацию вывода на печать
информации по справочникам и по документам.
. Автоматизацию вывода отчетов.
Все перечисленные выше задачи необходимо
автоматизировать для того, что бы облегчить учет работы отдела
материально-технического снабжения. Автоматизация поставленных задач позволит
сократить время работы сотрудника с документами.
Необходимо создать формы документов для работы с
ними сотрудников, к таким документам относятся «ТТН», «Поступление», «Внутри
хозяйственные перемещения».
Наличие отчетов позволят сотруднику по
требованию руководителя в короткий промежуток времени получить сводные сведения
по необходимой области. Для решения этой задачи необходимо разработать формы
отчетов по документам. Компьютерная обработка информации позволит сотруднику в
быстрые сроки обработать полученную информацию. Использование базы данных
позволит хранить большие объемы информации по операциям связанным с
материалами. Наличие печатных форм документов, позволят сотруднику при
необходимости быстро найти необходимый документ или составить нужный отчет и
распечатать его. Без использование разработанной базы данных, работа отдела
материально технического снабжения будет долгой.
2. ПРОЕКТИРОВАНИЕ ЗАДАЧИ
2.1 Разработка
концептуальной модели предметной области
Изучив и проанализировав область применения
разрабатываемого приложения, список документов используемых в ходе работы с
системой, документы, которые необходимо получать в качестве выходных данных, а
так же отчеты, которые необходимо составлять в ходе работы с программой можно
разработать функциональную модель системы.
За входные данные были использованы справочники
«Склад», «Сотрудники», «Контрагенты», «Материалы», «Машины».
Управляющим персоналом является «Сотрудники».
Управляющим документом «Должностная инструкция».
Выходными данными являются документы и ответы:
«ВнутриХозПермещение», «Поступление», «ТТН», «Отчет товаров», «Отчет ТТН»,
«Отчет внутри хозяйственного перемещения».
При декомпозиции основной функциональной модели
было выделить 3 основных процесса, которые совершаются при учете работы отдела
материально-технического снабжения племенных животных: составление плана
выставок, проведение выставок, формирование отчетов.
На рисунке 2.1 представлена разработанная
модель, а на рисунке 2.2 показана ее декомпозиция.
Рисунок 2.1 - Диаграмма функциональной модели
Как видно из рисунка 2.2 представленного ниже,
что в ходе работы с системой можно выделить 3 основных процесса:
поступление материалов;
продажа материалов;
формирование отчетов.
Так же отображено, к какому процессу относятся
те или иные документы и что получается в результате выполнения процесса.
Рисунок 2.2 - Декомпозиция функциональной модели
учета работы отдела материально технического обслуживания
3
РАЗРАБОТКА КОНФИГУРАЦИИ В 1С: ПРЕДПРИЯТИЕ
3.1 Создание
констант и перечислений
В ходе разработки системы отвечающей
требованиям, предъявляемым к ней, были созданы перечисления.
Перечисление - это средство работы с элементами
данных, список возможных значений которых жестко задан в конфигурации и при
выполнении задачи не могут быть изменены [1].
На рисунке 3.1 отражен перечень перечислений
используемых в системе, а в таблице 1 отражена краткая их характеристика.
Рисунок 3.1 - Список перечислений
Таблица 1 - Характеристика перечислений
|
Идентификатор
|
Значения
|
|
ЕдИзмерения
|
КГ,ШТ,Литры
|
|
Тип_машины
|
Легковая,
Грузовая
|
3.2 Создание
справочников, написание программных модулей
В базе предусмотрено 5 справочников: «Склад»,
«Сотрудники», «Контрагенты», «Материалы», «Машины».
Для ведения информации по складам, на которых
хранятся материалы предназначен справочник «Склад»
Таблица 3.1 - Характеристика реквизитов
справочника «Животные»
|
Наименование
поля
|
Тип
значения
|
Длинна
|
|
Адрес
|
Строка
|
-
|
|
Ответственное
лицо
|
Справочник.
Сотрудники
|
-
|
|
Площадь
|
Число
|
10
|
Так же справочник имеет возможность вывода на
печать.
Рисунок 3.3 - Настройка справочника «Склад»
Для ведения информации о сотрудниках,
предназначен справочник «Сотрудники»
Таблица 3.2 - Характеристика реквизитов
«Сотрудники»
|
Наименование
поля
|
Тип
значения
|
Длинна
|
|
Адрес
|
Строка
|
Неогр
|
|
Должность
|
Строка
|
9
|
|
Телефон
|
Число
|
10
|
Так же справочник имеет возможность вывода на
печать.
Рисунок 3.3 -Настройки справочника «Сотрудники»
Для ведения информации по поставщикам материалов
и по потребителям материалов, служит справочник «Контрагенты».
Таблица 3.3 - Характеристика реквизитов
справочника «Контрагенты»
|
Наименование
поля
|
Тип
значения
|
Длинна
|
|
Адрес
|
Строка
|
Неогр
|
|
Банковский
счет
|
Число
|
10
|
|
Телефон
|
Число
|
10
|
|
Контактное
лицо
|
Строка
|
|
Так же справочник имеет возможность вывода на
печать.
Рисунок 3.4 -Настройки справочника «Контрагенты»
Для хранения информации о товарах предназначен
справочник «Материалы»
Таблица 3.4 - Характеристика реквизитов
справочника «Животные»
|
Наименование
поляТип значенияДлинна
|
|
|
|
ЕдИзмер
|
Перечисление
ЕдИзмер
|
-
|
|
Количество
|
Число
|
10
|
|
Цена
|
Число
|
10
|
Так же справочник имеет возможность вывода на
печать.
Рисунок 3.5 -Настройки справочника «Материалы»
Для хранения информации о транспортных средствах
для перевозки служит справочник «Машины»
Таблица 3.5 - Характеристика реквизитов
справочника «Машины»
|
Наименование
поляТип значенияДлинна
|
|
|
|
Гос
номер
|
Строка
|
-
|
|
Тип
|
Перечисление
Тип
|
|
Так же справочник имеет возможность вывода на
печать.
Рисунок 3.6 -Настройки справочника «Машины»
3.3 Создание журналов и
документов, описание обработки проведения и вывода на печать
Для осуществления наиболее качественного учета
работы отдела материально технического обслуживания, необходимы 3 документа
«ТТН», «Поступление», «Внутрихоз перемещение». Для каждого документа
предусмотрен отдельный журнал документов, который имеет аналогичное название
как и сам документ. Как и справочники, каждый документ имеет вывод на печать.
Ниже будет рассмотрена форма каждого документа и
краткое описание документа.
ТТН-в данном документе будут учитываться
перевозки материалов покупателям.
Рисунок 3.7 - Форма документа ТТН
Документ Поступление-учет поступивших материалов
на склад.
Рисунок 3.7 - Форма документа Поставки
Документ Внутрихоз перемещение-учет перевозок материалов
со склада на склад
.
Рисунок 3.8 - Форма документа Внутрихоз
перемещение.
.4 Создание отчетов
Отчеты предназначены для вывода информации из
базы данных. Отчеты похожи на документы, только эти объекты выполняют разные
функции [4].
Каждый отчет выводит отобранную информацию в
таблички для удобного просмотра необходимых данных
Для возможности получения сводной информации по
всем данным, хранящимся в системе, было создано четыре вида отчетов:
«Отчет товаров» предназначен для вывода товаров
хранящихся на складе;
«Отчет по ТТН» применяется для вывода материалов
отгруженных потребителю;
«Отчет по внутри хозяйственным операциям»
отражает информацию о материалах которые были перемещены со склада на склад.
Рисунок 3.12 - Отчет по поступлению
Рисунок 3.13 - Отчет по Внутри хозяйственным
операциям
Рисунок 3.14 - Отчет по ТТН
4. АДМИНИСТРИРОВАНИЕ
.1 Создание
пользователя и интерфейса пользователя
Для обеспечения исправной работы системы,
безопасности данных при создании проекта был создан пользователь со всеми
правами доступа ко всем данным.
Для данного пользователя был разработан
интерфейс «Администратор»
Для пользователя администратор был выбран
интерфейс Администратор и права Администратор.
Поэтому для пользователя администратор, будут
доступны все возможности разработанной конфигурации.
Для интерфейса Администратор, была изменена
панель инструментов, добавлены панели документов, справочников, журналов
документов и отчетов. В эти панели добавлены все разработанные инструменты для
ведения учета работы отдела материально технического снабжения.
ЗАКЛЮЧЕНИЕ
В результате выполнения курсового проекта была
разработана система, которая позволяет вести учет работы отдела материально
технического снабжения. Данная система отвечает всем требованиям, предъявленным
в задании курсового проекта.
Система содержит все необходимое для учета
работы справочники, отчеты документы и печатные формы. Разработанная система
позволяет вести поступления материалов, внутри хозяйственные операции, отгрузку
материалов потребителям, выводить данные из справочников, документов на
печатную форму, формировать отчет.
Разработанная система по учету работы отдела
материально технического снабжения имеет пользовательский интерфейс и простоту
ориентирования.
Наличие дополнительных справочников в которых
содержится информация о контрагентах, складах, работниках, материалах,
благодаря которым упрощается ввод данных, что несомненно является плюсом
разработанной системы.
Были разработаны отчеты, позволяющие получать
сводную информацию по подсчету сумм и количества элементов из проведенных
документов.
СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ
1. Харитонов,
С.А. Учебник по 1С Предприятие 7.7 С.А. Харитонов, 2010. - 49с.
2. Рязанцева,
Н.Б., Рязанцев, А.А. 1С: Предприятие. Зарплата и кадры. Секреты работы / Н.Б.
Рязанцева, А.А. Рязанцев, 2012. - 204с.
. Митичкин,
С.А. Практика программирования в среде 1С: Предприятие 7.7 / С.А. Митичкин,
2010. - 272с.
. Шубина,
Е.В. Работаем в 1С: Предприятие 7.7. Настройка, эксплуатация, конфигурирование
и программирование / Е.В. Шубина, 2011 - 400с.
. Герасимова,
Л.Г., Смоляк, Р.В. 1С: Зарплата и Кадры 7.7. Повседневные операции. Советы
опытного бухгалтера / Л.Г. Герасимова, Р.В. Смоляков, 2013. - 236с.
ПРИЛОЖЕНИЕ А
Листинг справочников, печатных форм и проводок
документов
//{{ПРОЦЕДУРА_ПЕЧАТИ(Печать)
//Данный фрагмент построен конструктором.
//При повторном использовании конструктора,
внесенные вручную изменения будут потеряны!!!
Процедура Печать()
Спр =
СоздатьОбъект("Справочник.Материалы");
Спр.ИспользоватьДату(ИспользоватьДату());
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Печать");
Таб.ВывестиСекцию("Шапка");
Таб.Опции(0,0,Таб.ВысотаТаблицы(),0);
Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент() = 1 Цикл
Если Спр.ЭтоГруппа() = 1 Тогда
Таб.ВывестиСекцию("Группа");
Иначе
Таб.ВывестиСекцию("Строка");
КонецЕсли;
КонецЦикла;
Таб.ВывестиСекцию("Подвал");
Таб.ТолькоПросмотр(1);
Таб.Показать("Печать
Животные","");
КонецПроцедуры
//}}ПРОЦЕДУРА_ПЕЧАТИ
//{{ПРОЦЕДУРА_ПЕЧАТИ(Печать)
Процедура Печать()
Спр =
СоздатьОбъект("Справочник.Контрагенты");
Спр.ИспользоватьДату(ИспользоватьДату());
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Печать");
Таб.ВывестиСекцию("Шапка");
Таб.Опции(0,0,Таб.ВысотаТаблицы(),0);
Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент() = 1 Цикл
Если Спр.ЭтоГруппа() = 1 Тогда
Таб.ВывестиСекцию("Группа");
Иначе
Таб.ВывестиСекцию("Строка");
КонецЕсли;
КонецЦикла;
Таб.ВывестиСекцию("Подвал");
Таб.ТолькоПросмотр(1);
Таб.Показать("Печать
Контрагенты","");
КонецПроцедуры
//}}ПРОЦЕДУРА_ПЕЧАТИ
//{{ПРОЦЕДУРА_ПЕЧАТИ(Печать)
//Данный фрагмент построен конструктором.
//При повторном использовании конструктора,
внесенные вручную изменения будут потеряны!!!
Процедура Печать()
Спр =
СоздатьОбъект("Справочник.Машины");
Спр.ИспользоватьДату(ИспользоватьДату());
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Печать");
Таб.ВывестиСекцию("Шапка");
Таб.Опции(0,0,Таб.ВысотаТаблицы(),0);
Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент() = 1 Цикл
Если Спр.ЭтоГруппа() = 1 Тогда
Таб.ВывестиСекцию("Группа");
Иначе
Таб.ВывестиСекцию("Строка");
КонецЕсли;
КонецЦикла;
Таб.ВывестиСекцию("Подвал");
Таб.ТолькоПросмотр(1);
Таб.Показать("Печать
Место_Проведения_Выставки","");
КонецПроцедуры
//}}ПРОЦЕДУРА_ПЕЧАТИ
//{{ПРОЦЕДУРА_ПЕЧАТИ(Печать)
//Данный фрагмент построен конструктором.
//При повторном использовании конструктора,
внесенные вручную изменения будут потеряны!!!
Процедура Печать()
Спр =
СоздатьОбъект("Справочник.Сотрудники");
Спр.ИспользоватьДату(ИспользоватьДату());
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Печать");
Таб.ВывестиСекцию("Шапка");
Таб.Опции(0,0,Таб.ВысотаТаблицы(),0);
Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент() = 1 Цикл
Если Спр.ЭтоГруппа() = 1 Тогда
Таб.ВывестиСекцию("Группа");
Иначе
Таб.ВывестиСекцию("Строка");
КонецЕсли;
КонецЦикла;
Таб.ВывестиСекцию("Подвал");
Таб.ТолькоПросмотр(1);
Таб.Показать("Печать
Сотрудники","");
КонецПроцедуры
//}}ПРОЦЕДУРА_ПЕЧАТИ
Процедура ПриОткрытии()
ПриЗаписиПерепроводить(1);
КонецПроцедуры
//{{ПРОЦЕДУРА_ПЕЧАТИ(Печать)
//Данный фрагмент построен конструктором.
//При повторном использовании конструктора,
внесенные вручную изменения будут потеряны!!!
Процедура Печать()
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Печать");
Таб.ВывестиСекцию("Шапка");
Таб.Опции(0,0,0,0);
ВыбратьСтроки();
Пока ПолучитьСтроку() = 1 Цикл
Таб.ВывестиСекцию("Строка");
КонецЦикла;
Таб.ВывестиСекцию("Подвал");
Таб.ТолькоПросмотр(1);
Таб.Показать("Печать
ТТН","");
КонецПроцедуры
//}}ПРОЦЕДУРА_ПЕЧАТИ
Процедура ПриОткрытии()
ПриЗаписиПерепроводить(1);
КонецПроцедуры
//{{ПРОЦЕДУРА_ПЕЧАТИ(Печать)
//Данный фрагмент построен конструктором.
//При повторном использовании конструктора,
внесенные вручную изменения будут потеряны!!!
Процедура Печать()
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Печать");
Таб.ВывестиСекцию("Шапка");
Таб.Опции(0,0,0,0);
ВыбратьСтроки();
Пока ПолучитьСтроку() = 1 Цикл
Таб.ВывестиСекцию("Строка");
КонецЦикла;
Таб.ВывестиСекцию("Подвал");
Таб.ТолькоПросмотр(1);
Таб.Показать("Печать
Выставки","");
КонецПроцедуры
//}}ПРОЦЕДУРА_ПЕЧАТИ
Процедура ПриОткрытии()
ПриЗаписиПерепроводить(1);
КонецПроцедуры
//{{ПРОЦЕДУРА_ПЕЧАТИ(Печать)
//Данный фрагмент построен конструктором.
//При повторном использовании конструктора,
внесенные вручную изменения будут потеряны!!!
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Печать");
Таб.ВывестиСекцию("Шапка");
Таб.Опции(0,0,0,0);
ВыбратьСтроки();
Пока ПолучитьСтроку() = 1 Цикл
Таб.ВывестиСекцию("Строка");
КонецЦикла;
Таб.ВывестиСекцию("Подвал");
Таб.ТолькоПросмотр(1);
Таб.Показать("Печать
Командировочные","");
КонецПроцедуры
//}}ПРОЦЕДУРА_ПЕЧАТИ
Процедура ПриОткрытии()
ПриЗаписиПерепроводить(1);
КонецПроцедуры
//{{ПРОЦЕДУРА_ПЕЧАТИ(Печать)
//Данный фрагмент построен конструктором.
//При повторном использовании конструктора,
внесенные вручную изменения будут потеряны!!!
Процедура Печать()
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Печать");
Таб.ВывестиСекцию("Шапка");
Таб.Опции(0,0,0,0);
ВыбратьСтроки();
Пока ПолучитьСтроку() = 1 Цикл
Таб.ВывестиСекцию("Строка");
КонецЦикла;
Таб.ВывестиСекцию("Подвал");
Таб.ТолькоПросмотр(1);
Таб.Показать("Печать
План_выставок","");
КонецПроцедуры
//}}ПРОЦЕДУРА_ПЕЧАТИ
ПРИЛОЖЕНИЕ Б
Листинг запросов на создание отчетов
//*******************************************
// Процедура генерации запроса Сформировать.
//
Процедура Сформировать()
Перем Запрос, ТекстЗапроса, Таб;
//Создание объекта типа Запрос
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|Период с ВыбНачПериода по ВыбКонПериода;
|Обрабатывать НеПомеченныеНаУдаление;
|Материал = Документ.Поступление.Материал;
|Количество = Документ.Поступление.Количество;
|Стоимость = Документ.Поступление.Стоимость;
|Функция КоличествоСумма = Сумма(Количество);
|Функция СтоимостьСумма = Сумма(Стоимость);
|Группировка Материал;
|"//}}ЗАПРОС
;
// Если ошибка в запросе, то выход из процедуры
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;
// Подготовка к заполнению выходных форм данными
запроса
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
// Заполнение полей "Заголовок"
Таб.ВывестиСекцию("Заголовок");
Состояние("Заполнение выходной
таблицы...");
Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
Пока Запрос.Группировка(1) = 1 Цикл
// Заполнение полей Материал
Таб.ВывестиСекцию("Материал");
КонецЦикла;
// Заполнение полей "Итого"
Таб.ВывестиСекцию("Итого");
// Вывод заполненной формы
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать",
"");
КонецПроцедуры
// Подготовка к заполнению выходных форм данными
запроса
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
// Заполнение полей "Заголовок"
Таб.ВывестиСекцию("Заголовок");
Состояние("Заполнение выходной
таблицы...");
Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
Пока Запрос.Группировка(1) = 1 Цикл
// Заполнение полей Фамилия
Таб.ВывестиСекцию("Фамилия");
КонецЦикла;
// Заполнение полей "Итого"
Таб.ВывестиСекцию("Итого");
// Вывод заполненной формы
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать",
"");
КонецПроцедуры
//*******************************************
// Процедура генерации запроса Сформировать.
//
Процедура Сформировать()
Перем Запрос, ТекстЗапроса, Таб;
//Создание объекта типа Запрос
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|Период с ВыбНачПериода по ВыбКонПериода;
|Материал =
Документ.ВнутриХозПеремещение.Материал;
|Количество =
Документ.ВнутриХозПеремещение.Количество;
|Функция КоличествоСумма = Сумма(Количество);
|Группировка Материал;
|"//}}ЗАПРОС
;
// Если ошибка в запросе, то выход из процедуры
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;
// Подготовка к заполнению выходных форм данными
запроса
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
// Заполнение полей "Заголовок"
Таб.ВывестиСекцию("Заголовок");
Состояние("Заполнение выходной
таблицы...");
Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
Пока Запрос.Группировка(1) = 1 Цикл
// Заполнение полей Материал
Таб.ВывестиСекцию("Материал");
КонецЦикла;
// Заполнение полей "Итого"
Таб.ВывестиСекцию("Итого");
// Вывод заполненной формы
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать",
"");
КонецПроцедуры
//*******************************************
// Процедура генерации запроса Сформировать.
//
Процедура Сформировать()
Перем Запрос, ТекстЗапроса, Таб;
//Создание объекта типа Запрос
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|Период с ВыбНачПериода по ВыбКонПериода;
|Обрабатывать НеПомеченныеНаУдаление;
|Материал = Документ.ТТН.Материал;
|Количетсво = Документ.ТТН.Количетсво;
|Отпускная_стоим = Документ.ТТН.Отпускная_стоим;
|Стоимость = Документ.ТТН.Стоимость;
|Стоимость_перевозки =
Документ.ТТН.Стоимость_перевозки;
|Функция КоличетсвоСумма = Сумма(Количетсво);
|Функция Отпускная_стоимСумма =
Сумма(Отпускная_стоим);
|Функция СтоимостьСумма = Сумма(Стоимость);
|Функция Стоимость_перевозкиСумма =
Сумма(Стоимость_перевозки);
|Группировка Материал;
|"//}}ЗАПРОС
;
// Если ошибка в запросе, то выход из процедуры
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;
// Подготовка к заполнению выходных форм данными
запроса
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Сформировать");
// Заполнение полей "Заголовок"
Таб.ВывестиСекцию("Заголовок");
Состояние("Заполнение выходной таблицы...");
Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
Пока Запрос.Группировка(1) = 1 Цикл
// Заполнение полей Материал
Таб.ВывестиСекцию("Материал");
КонецЦикла;
// Заполнение полей "Итого"
Таб.ВывестиСекцию("Итого");
// Вывод заполненной формы
Таб.ТолькоПросмотр(1);
Таб.Показать("Сформировать",
"");
КонецПроцедуры