Файл: Разработка конфигурации «Транспортная доставка заказов» в среде 1С:Предприятие.pdf

ВУЗ: Не указан

Категория: Курсовая работа

Дисциплина: Не указана

Добавлен: 03.07.2023

Просмотров: 264

Скачиваний: 9

ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.

Рисунок 2.15 Заполнение документа Заказ

Выполним оформление Путевого листа (рис.2.16)

Рисунок 2.16 Заполнение документа Путевой лист

Рисунок 2.17 Заполнение документа Получение заказа.

Получили следующие отчеты: (рис.2.18 – 2.20)

Рисунок 2.18 Отчет Загрузка автомобилей

Рисунок 2.19 Отчет Загнятость водителей

Рисунок 2.20 Отчет Заказы

Заключение

В данной работе был разработана конфигурация для ведения учета транспортной доставки заказов. Данный процесс на рассматриваемом предприятии наиболее сложен в связи с большим количеством клиентов, разнообразием заказов, что накладывает свои требования к разрабатываемой системе.

В аналитической части выполнен комплекс работ, направленных на обоснование необходимости автоматизации: определена сущность задачи, описаны основные свойства системы, дано описание всем существующим бизнес-процессам, рассмотрены вопросы, связанные с анализом существующих разработок в этой области. Также в первой главе обосновываются проектные решения по информационному, программному, техническому и технологическому обеспечению.

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

Приложение

Код формы документа (автоматически вычисляем общую сумму доставленных заказов):

&НаКлиенте

Процедура ЗаказКоличествоПриИзменении(Элемент)

ТекущаяСтрока = элементы.Заказ.ТекущиеДанные.НомерСтроки;

ЗаказКоличествоПриИзмененииСервер(ТекущаяСтрока);

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

&НаСервере

Процедура ЗаказКоличествоПриИзмененииСервер(НомерСтроки)

ТекущиеДанные = Объект.Заказ.Получить(НомерСтроки - 1);

Цена = Регистр накопления.Заказ.НайтиПоКоду(ТекущиеДанные.Номенклатура.Код).Цена;

ТекущиеДанные.Стоимость = ТекущиеДанные.Количество * Цена;