Главная страница
Навигация по странице:

  • Учебно-методическая литература

  • Интернет-ресурсы

  • Код вычисления «Суммы»

  • Код вычисления «СуммыПоДокументу»

  • Код конструктора движения регистров документа «Поступление билетов»

  • Код конструктора печати «Поступление билетов»

  • Код отчета «Персонал» (данные упорядочены по убыванию)

  • Программный код для предоставления Скидки

  • Код для автоматической подстановки цен из регистра сведений в форме документа

  • Код для автоматической подстановки цен из регистра сведений в общем модуле

  • Проектная часть 4 Краткий анализ предметной области 4


    Скачать 0.99 Mb.
    НазваниеПроектная часть 4 Краткий анализ предметной области 4
    Дата25.05.2022
    Размер0.99 Mb.
    Формат файлаdocx
    Имя файлаs30op7iOehDacqst 2.docx
    ТипАнализ
    #549427
    страница6 из 6
    1   2   3   4   5   6

    Тестирование разработанного прикладного решения


    Процесс тестирования информационной системы заключается в ее установке, заполнении данными и проведении документов.

    Так, на Рисунок 30 представлено заполнение регистра сведений «Тарифы» в режиме 1С.



    Рисунок 30 - Заполнение регистра сведений "Тарифы"
    На Рисунок 31 показано заполнение документа «Продажа билетов». Заполнение цены происходит автоматически. Вычисление суммы и суммы по документу также вычисляется автоматически. Выбор тарифа происходит исходя из вида предоставляемой услуги.

    При нажатии на кнопку Скидка будет произведен пересчет суммы.



    Рисунок 31 - Заполнение документа "Продажа билетов"
    Нажатие кнопки Печать обеспечит вывод документа на печать (Рисунок 32).



    Рисунок 32 - Вывод документа "Продажа билетов" на печать
    Вывод отчета «Расписание полетов» (Рисунок 33).



    Рисунок 33 - Отчет "Расписание полетов"

    заключение


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

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

    В результате выполнения курсовой работы все поставленные цели достигнуты.

    Изучение литературы по теме курсовой работы показало, что в данное время существует достаточный выбор программных продуктов, позволяющих автоматизировать работу «Терминала аэропорта».

    В курсовой работе описаны технологии функционирования ИС, выполнено физическое проектирование БД, разработаны экранные формы ввода-вывода, разработаны функциональные модули.

    Информационная система разработана на платформе «1С: Предприятие» версии 8.3. Данный выбор обусловлен широкими возможностями по ведению учета хозяйственных операций, предоставляемыми системой.

    Все поставленные задачи курсовой работы были решены.

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


    Учебно-методическая литература

    1. Бойко Э.В., 1С: Предприятие 8.0. Универсальный самоучитель

    2. Варкентин В.В. Информационные системы на базе 1 С:Предприятие//Научное сообщество студентов XXI столетия. Технические науки: сб. ст. по мат. XXXIX междунар.студ.науч.-практ. Конф. № 2(39) https://sibac.info/studconf/tech/xxxix/47278 (дата обращения: 15.04.2019)


    Интернет-ресурсы

    1. Официальный сайт 1С: Предприятие — № 6 [электронный ресурс] — Режим доступа. — URL: http://v8.1c.ru/ (дата обращения 13.04.2019)

    2. Электронная книга 1С Предприятие 8.3., https://freesoft.ru/windows/elektr_kniga_1s_predpriyatie_83

    3. Официальный сайт «АвиаБит» [электронный ресурс] — Режим доступа. — URL:http://www.aviabit.ru/airport


    Приложение


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

    Код вычисления «Суммы»

    &НаКлиенте

    Процедура ПереченьУслугПриИзменении(Элемент)

    СтрТабЧасти=Элементы.ПереченьУслуг.ТекущиеДанные;

    СтрТабЧасти.Сумма=СтрТабЧасти.Цена*СтрТабЧасти.Количество;

    КонецПроцедуры
    Код вычисления «СуммыПоДокументу»

    &НаКлиенте

    Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения)

    СуммаТЧ=0;

    Для Каждого СтрТабЧасти Из ПереченьУслуг Цикл

    СуммаТЧ= СуммаТЧ+ СтрТабЧасти.Сумма;

    КонецЦикла;

    СуммаПоДокументу= СуммаТЧ;

    КонецПроцедуры
    Код конструктора движения регистров документа «Поступление билетов»

    Процедура ОбработкаПроведения(Отказ, Режим)

    //{{__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ

    // Данный фрагмент построен конструктором.

    // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!

    // регистр КоличествоБилетов Расход

    Движения.КоличествоБилетов.Записывать = Истина;

    Для Каждого ТекСтрокаПереченьУслуг Из ПереченьУслуг Цикл

    Движение = Движения.КоличествоБилетов.Добавить();

    Движение.ВидДвижения = ВидДвиженияНакопления.Расход;

    Движение.Период = Дата;

    Движение.Направление = Направление;

    Движение.Количество = ТекСтрокаПереченьУслуг.Количество;

    КонецЦикла;

    //}}__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ

    КонецПроцедуры
    Код конструктора печати «Поступление билетов»

    &НаКлиенте

    Процедура ОбработкаКоманды(ПараметрКоманды, ПараметрыВыполненияКоманды)

    //{{_КОНСТРУКТОР_ПЕЧАТИ(Печать)

    ТабДок = Новый ТабличныйДокумент;

    Печать(ТабДок, ПараметрКоманды);

    ТабДок.ОтображатьСетку = Ложь;

    ТабДок.Защита = Ложь;

    ТабДок.ТолькоПросмотр = Истина;

    ТабДок.ОтображатьЗаголовки = Ложь;

    ТабДок.Показать();

    //}}

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

    &НаСервере

    Процедура Печать(ТабДок, ПараметрКоманды)

    Документы.ПоступлениеБилетов.Печать(ТабДок, ПараметрКоманды);

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

    Код отчета «Персонал» (данные упорядочены по убыванию)

    ВЫБРАТЬ

    Персонал.Ссылка КАК Ссылка,

    Персонал.ВерсияДанных КАК ВерсияДанных,

    Персонал.ПометкаУдаления КАК ПометкаУдаления,

    Персонал.Код КАК Код,

    Персонал.Наименование КАК Наименование,

    Персонал.Должность КАК Должность,

    Персонал.ДатаРождения КАК ДатаРождения,

    Персонал.КоличествоЛетныхЧасов КАК КоличествоЛетныхЧасов,

    Персонал.СрокКонтракта КАК СрокКонтракта,

    Персонал.СемейноеПоложение КАК СемейноеПоложение,

    Персонал.МестоРаботы.(

    Ссылка КАК Ссылка,

    НомерСтроки КАК НомерСтроки,

    МестоПредыдущейРаботы КАК МестоПредыдущейРаботы,

    ДатаНазначения КАК ДатаНазначения,

    ДатаУвольнения КАК ДатаУвольнения,

    Должность КАК Должность

    ) КАК МестоРаботы,

    Персонал.Предопределенный КАК Предопределенный,

    Персонал.ИмяПредопределенныхДанных КАК ИмяПредопределенныхДанных

    ИЗ

    Справочник.Персонал КАК Персонал

    УПОРЯДОЧИТЬ ПО КоличествоЛетныхЧасов УБЫВ
    Программный код для предоставления Скидки

    &НаКлиенте

    Процедура Скидка(Команда)

    Для Каждого ТекСтрокаПереченьУслуг Из Объект.ПереченьУслуг Цикл

    ТекСтрокаПереченьУслуг.Цена=ТекСтрокаПереченьУслуг.Цена*0.9;

    ТекСтрокаПереченьУслуг.Сумма=

    ТекСтрокаПереченьУслуг.Цена*ТекСтрокаПереченьУслуг.Количество;

    КонецЦикла

    КонецПроцедуры
    Код для автоматической подстановки цен из регистра сведений в форме документа

    &НаКлиенте

    Процедура ПереченьУслугПредоставляемаяУслугаПриИзменении(Элемент)

    Стр=Элементы.ПереченьУслуг.ТекущиеДанные;

    Стр.Цена=ОбщиеФункции.ТарифНаДень(Объект.Дата,Стр.ПредоставляемаяУслуга);

    КонецПроцедуры
    Код для автоматической подстановки цен из регистра сведений в общем модуле

    Функция ТарифНаДень(ДатаОплаты,ПредоставляемаяУслуга) Экспорт

    ТарифУслуги=ПредоставляемаяУслуга.ВидТарифа;

    Отбор=Новый Структура("ВидТарифа",ТарифУслуги);

    ИнформацияИзРегистра=

    РегистрыСведений.Тарифы.ПолучитьПоследнее(ДатаОплаты,Отбор);

    Возврат ИнформацияИзРегистра.ЗначениеТарифа;

    КонецФункции
    1   2   3   4   5   6


    написать администратору сайта