Заключение

В изложенной курсовой работе на тему «Автоматизированный учет экспонатов на музейном складе» была реализована задача автоматизированного учета экспоната.

Разработанная конфигурация упростила процедуру оформления необходимых документов.

Разработанная конфигурация полностью соответствует п. 1.3.1. «Постановка задачи».

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

Основным преимуществом программного средства является быстрота и простота работы с информацией.

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

В конечном итоге разработанный мною проект “Автоматизированный учет экспонатов на музейном складе ” на «1С:Предприятие7.7». существенно упростит работу сотрудника и сократит его рабочее время.

Список использованнах источников

1. “1C:Предприятие 7.7 Описание встроенного языка” 77.001.03 14 октября 2006г.

2. “1C:Предприятие 7.7 Введение в конфигурирование ” 2008г.

3. Официальный сайт компании 1С “ www.1C.ru”.

4. “1C:Предприятие 7.7 Руководство по установке и запуску” 77.003.04

5. “1C:Бухгалтерия 7.7Руководство по ведению учета (Описание типовой конфигурации редакции 4.5)” 77.450.02 8 сентября 2004г.

6. “1C:Предприятие 7.7Конфигурирование и администрирование. Часть1 77.002.03 17 октября 2009г.

Приложение а

(обязательное)

Листинг программы

Отчет «Выставка (Количество экспонатов на складе)»

Модуль:

//*******************************************

// Процедура генерации запроса Сформировать.

//

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

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

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

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

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

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

|Период с ВыбНачПериода по ВыбКонПериода;

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

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

|Функция ЭкспонатСтоимостьСумма = Сумма(Экспонат.Стоимость);

|Группировка Экспонат упорядочить по Экспонат.Наименование, Экспонат.Артикул, Экспонат.Автор, Экспонат.Стоимость, Экспонат.СКакогоСкладаЭкспонат;

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

;

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

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

Возврат;

КонецЕсли;

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

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

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

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

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

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

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

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

// Заполнение полей Экспонат

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

КонецЦикла;

// Заполнение полей "Итого"

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

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

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

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

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

КП.2-40 01 01.T491.391.14.ПЗ

КП.2-40 01 01.T391.391.14.ПЗ

КП.2-40 01 01.T391.391.14.ПЗ

38