Создание информационной подсистемы склада торгового пред-приятия с помощью программы «1С:Предприятие 7.7

Автор: Пользователь скрыл имя, 08 Декабря 2011 в 17:25, курсовая работа

Описание работы

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

Содержание

Введение 4
1 Выбор и описание объекта автоматизации 6
1.1 Экономическая сущность учета складских операций 9
1.2 Поступление товаров на склад 13
1.3 Отпуск товаров со склада 13
2 Факторы, определяющие принятое решение по созданию подсистемы 15
2.1 Обзор существующих программных средств 15
2.2 Экономическая целесообразность создания подсистемы 18
3 Технико-экономическое обоснование создания подсистемы 22
3.1 Обоснование цели создания подсистемы 22
3.2 Обоснование и выбор видов обеспечения 23
3.3 Информационное обеспечение 23
3.3.1 Входная информация 25
3.3.2 Выходная информация 25
3.3.3 Используемые классификаторы и кодификаторы 25
3.4 Разработка диаграмм Rational Rose 26
3.5 Подготовка технического обеспечения 29
4 Машинная реализация задачи 30
4.1 Описание структуры базы данных 30
4.2 Программная реализация задачи 32
4.2.1 Создание отчетов 34
5 Инструкция по работе с приложением 36
6 Оценка защищенности информационной системы 38
Заключение 39
Список используемых источников 40
Приложения 41
Приложение А 42
Техническое задание 42
Приложение Б 48
Экранные формы 48
Приложение В 51
Отчеты 51
Приложение Г 53
Листинг программы 53

Скачать полностью (313.94 Кб) Сколько стоит заказать работу?

Работа содержит 1 файл

КП - Склад.doc

— 570.50 Кб (Скачать)

ВыбратьСтроки();

Пока ПолучитьСтроку() = 1 Цикл

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

КонецЦикла;

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

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

Таб.Показать("Печать ПриходнаяНакладная","");

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

//}}ПРОЦЕДУРА_ПЕЧАТИ

Расходная накладная:

Процедура ПриОткрытии()

ПриЗаписиПерепроводить(1);

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

//{{ПРОЦЕДУРА_ПЕЧАТИ(Печать)

Процедура Печать()

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

Таб.ИсходнаяТаблица("Печать");

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

Таб.Опции(0,0,0,0);

ВыбратьСтроки();

Пока ПолучитьСтроку() = 1 Цикл

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

КонецЦикла;

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

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

Таб.Показать("Печать РасходнаяНакладная","");

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

//}}ПРОЦЕДУРА_ПЕЧАТИ

Отчет по невостребованным товарам:

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

Перем Запрос, ТекстЗапроса, Таб;

//Создание объекта типа Запрос

Запрос = СоздатьОбъект("Запрос");

ТекстЗапроса =

"//{{ЗАПРОС(Сформировать)

|Период с (НачМесяца(ТекущаяДата())) по (КонМесяца(ТекущаяДата()));

|ОбрабатыватьДокументы все;

|Без итогов;

|Товары = Справочник.Товары.ТекущийЭлемент;

|Группировка Товары упорядочить по Товары.Код, Товары.Наименование, Товары.Цена;

|"//}}ЗАПРОС;

// Если ошибка в запросе, то выход из процедуры

Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда

Возврат;

КонецЕсли;

// Подготовка к заполнению выходных форм данными запроса

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

Таб.ИсходнаяТаблица("Сформировать");

// Заполнение полей "Заголовок"

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

Состояние("Заполнение выходной таблицы...");

Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);

Пока Запрос.Группировка() = 1 Цикл

// Заполнение полей Сформировать

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

КонецЦикла;

// Вывод заполненной формы

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

Таб.Показать("Сформировать", "");

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

Информация о работе Создание информационной подсистемы склада торгового пред-приятия с помощью программы «1С:Предприятие 7.7