Создание автоматизиpованной инфоpмационно-спpавочной системы расписания движения поездов и продажи билетов - Программирование, компьютеры и кибернетика курсовая работа
![](/file/c17a668ccb7333e986a5a.jpg)
Главная
Программирование, компьютеры и кибернетика
Создание автоматизиpованной инфоpмационно-спpавочной системы расписания движения поездов и продажи билетов
Нормализация и схема базы данных, структура меню. Предназначение информационно-справочной системы. Покупка и бронирование билетов пассажирами. Программная реализация информационной системы. Справочники, документы, регистры, журналы, администрирование.
посмотреть текст работы
скачать работу можно здесь
полная информация о работе
весь список подобных работ
Нужна помощь с учёбой? Наши эксперты готовы помочь!
Нажимая на кнопку, вы соглашаетесь с
политикой обработки персональных данных
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
ФЕДЕРАЛЬНОЕ АГЕНТСТВО МОРСКОГО И РЕЧНОГО ТРАНСПОРТА
Федеральное государственное образовательное учреждение высшего профессионального образования
«Санкт-Петербургский государственный университет водных коммуникаций»
ПО ДИСЦИПЛИНЕ «БАЗЫ ДАННЫХ И ЭКСПЕРТНЫЕ СИСТЕМЫ»
« Создание автоматизиpованной инфоpмационно - спpавочной системы расписания движения поездов и продажи билетов »
- формирование и печать сопроводительных документов, операций с пассажирами;
- формирование и печать отчёта расписания поездов;
- формирование и печать отчёта о ценах билетов;
- формирование и печать отчёта о проданных билетах за период;
- формирование и печать отчёта о билете конкретного пассажира;
- формирование и печать отчёта о поездах за период;
- формирование и печать отчёта о движениях наличности за период;
- разграничение прав доступа пользователей к той или иной информации, хранящейся в информационной базе.
1.1 Нормализация и схема базы данных
Определим объекты и атрибуты проектируемой системы. Рассмотрим отношение следующей структуры:
ПриемПациента (Код_Пациента, Наименование_Пациента, Диагноз, НомерАмбулаторнойКарты, Адрес, Вид_Оплаты, Документ, Симптомы, Наименование_Услуга, Цена, Количество, Сумма)
В этом отношении имеется составной ключ - это код_пациент, диагноз, услуга. Все атрибуты отношения атомарны, значит оно находится в 1НФ. Рассмотрим наблюдающиеся в этом отношении функциональные зависимости. Прежде всего, в отношении содержится частичная функциональная зависимость неключевых атрибутов от ключа отношения:
Пациент - Наименование_Пациента, Пациент - Адрес_Пациента, Диагноз - Симптомы, наименование_Услуга - Цена.
Не ключевой атрибут Наименование_Пациента зависит от от ключа Код_Пациента.
Транзитивные зависимости: Диагноз ->-> Услуга->-> Симптомы
Наименование_Пациента ->-> Симптомы
Приведем это отношение ко 2НФ, разбивая исходное отношение и производя внешнее кодирование, при этом получаем отношения:
Пациент(Код, Наименование_Пациента, Адрес, Симптомы)
АмбулаторнаяКарта(Код_Пациента,Наименование_Пациента, Номер_АмбулаторнаяКарта, Диагноз, Услуга, Цена, Сумма)
Услуга(Код_Услуги, Наименование_Услуги, Цена_Услуги, Единица_Измерения)
Перейдём к рассмотрению в полученных отношениях транзитивных зависимостей неключевых атрибутов от ключа.
Код_Пациента -> Номер_АмбулаторнаяКарта -> Диагноз.
Ввиду дублирования информации об одном диагнозе для одного товара, избыточность данных, будем дальше преобразовывать отношение.
Выявим теперь независимые многозначные зависимости, они имеются в отношении ПриёмаПацинта:
Номер ->-> Код_Пациента ->-> Номер->->Код_Услуги
Будем считать, что у нас нет транзитивных зависимостей неключевых атрибутов от ключа. Получаем следующие отношения:
Пациент (Номер Пациента, Дата Рождения, НомерАмбулаторнойКарта);
Сотрудники (Номер_Сотрудника,ФИО, Данные);
Услуги (Дата, Наименование, Цена, Сеанс, ЕдиницаИзмерения);
Документ (НомерДокумента, ДатаВыдачи).
Здесь мы освобождаем отношение от избыточности, а также различного рода аномалий. Но не всех.
В нашем отношении присутствует зависимость неключивого атрибута от ключа. Для того, чтобы не возникало новых аномалий, необходимо ликвидировать части составного ключа от неключевых атрибутов. С этой целью исходное отношение разлагается на отношения:
Выявлено у пациента (Диагноз, Пациент) и Назначение (Пациент, Услуги).
Теперь раскладываем исходное отношение на несколько отношений с многозначными зависимостями от одного ключа. Раскладываем отношение на два отношения: Номер_АмбулаторнаяКарта (АмбулаторнаяКарта, Пациент);
В результате нормализации была получена следующая система отношений:
· Пациент ( Наименование_Пациента, Дата_Рождения, Пол, Номер_АмбулаторнойКарты, Адрес);
· Сотрудник(Наименование_Сотрудника, Дата_Рождения, Пол, Образование);
· Документ (Наименование_ Документ, Номер, Дата_Выдачи);
· Услуги(Наименование_Услуги, Цена, Сеанс, Единица_Измерения);
· Болезни (Код_ Болезни, Наименование_ Болезни);
В главном меню пользователю предоставляется возможность выбирать следующие пункты меню и пункты подменю:
2 Программная реализация информационной системы
На снимке экрана представлены перечисления, используемые в системе:
В данной информационно-справочной системе существуют следующие справочники: Документ, Места, Пассажиры, Поезд.
Печатная форма элемента справочника:
Процедура Место Цена При Изменении (Элемент)
Строка Табличной Части = Элементы Формы. Место. Текущие Данные; Рассчитать Сумму (Строка Табличной Части );
Процедура Место НДС При Изменении (Элемент)
Строка Табличной Части = Элементы Формы. Место. Текущие Данные; Рассчитать Сумму (Строка Табличной Части );
Процедура Перед Записью (Отказ, Режим Записи, Режим Проведения)
Сумма Документа = Место. Итог ("Сумма");
//{{_КОНСТРУКТОР_ПЕЧАТИ_ЭЛЕМЕНТ(Печать)
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
Таб Док = Новый Табличный Документ;
Макет = Документы. Билет. Получить Макет("Печать");
// Заголово Область = Макет. Получить Область("Заголовок");
Область = Макет. Получить Область("Шапка");
Область. Параметры. Номер Билета = Номер Билета;
Область. Параметры. Документ = Документ;
Область. Параметры. Станция Отправления = Станция Отправления;
Область. Параметры. Станция Прибытия = Станция Прибытия;
Область. Параметры. Дата Отправления = Дата Отправления;
Область. Параметры. Дата Прибытия = Дата Прибытия;
Область = Макет. Получить Область ("Вагон Шапка");
Для Каждого Тек Строка Вагон Из Вагон Цикл
Область = Макет. Получить Область ("Вагон");
Область. Параметры. ТипВагона = ТекСтрока Вагон. Тип Вагона;
Область. Параметры. Номер Вагона = ТекСтрока Вагон. Номер Вагона;
Область = Макет. Получить Область ("Место Шапка");
Для Каждого ТекСтрока Место Из Место Цикл
Область = Макет. Получить Область ("Место");
Область. Параметры. Номер Места = ТекСтрока Место. Номер Места ;
Область. Параметры. Цена = ТекСтрока Место. Цена;
Область. Параметры. НДС = ТекСтрока Место. НДС;
Область. Параметры. Сумма = ТекСтрока Место. Сумма;
Область = Макет. Получить Область("Подвал");
Область. Параметры. Сумма Документа = Сумма Документа ;
ПараметрыПредметаИсчисления="рубль,рубля,рублей,м,копейка,копейки,копеек,ж,2";
Область. Параметры. Сумма Прописью = Число Прописью (Сумма Документа, Форматная Строка, Параметры Предмета Исчисления );
ТабДок. Отображать Заголовки = Ложь;
//{{_КОНСТРУКТОР_ПЕЧАТИ_ЭЛЕМЕНТ(Печать)
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
Макет = Документы. Бронирование Билетов. Получить Макет("Печать");
Область = Макет. Получить Область ("Заголовок");
Область = Макет. Получить Область ("Шапка");
Область. Параметры. Документ = Документ;
Область. Параметры. Станция Отправления = Станция Отправления;
Область. Параметры. Дата Отправления = Дата Отправления;
Область. Параметры. Станция Прибытия = Станция Прибытия;
Область. Параметры. Дата Прибытия = Дата Прибытия;
ПараметрыПредметаИсчисления="рубль,рубля,рублей,м,копейка,копейки,копеек,ж,2";
Область. Параметры. Сумма Прописью = Число Прописью (Цена, Форматная Строка, Параметры Предмета Исчисления );
ТабДок. Отображать Заголовки = Ложь;
//{{_КОНСТРУКТОР_ПЕЧАТИ_ЭЛЕМЕНТ(Печать1)
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
Макет = Документы. Возврат Билетов. Получить Макет("Печать1");
Область = Макет. Получить Область ("Заголовок");
Область = Макет. Получить Область ("Шапка");
Область. Параметры. Пассажир = Пассажир;
Область. Параметры. Номер Билета = Номер Билета ;
Область. Параметры. Станция Отправления = Станция Отправления;
Область. Параметры. Станция Прибытия = Станция Прибытия;
Область. Параметры. Дата Отправления = Дата Отправления;
Область. Параметры. Дата Прибытия = Дата Прибытия;
Область. Параметры. Сумма = Сумма; ПараметрыПредметаИсчисления="рубль,рубля,рублей,м,копейка,копейки,копеек,ж,2";
Область. Параметры .Сумма Прописью = Число Прописью (Сумма, Форматная Строка, Параметры Предмета Исчисления );
ТабДок. Отображать Заголовки = Ложь;
//{{_КОНСТРУКТОР_ПЕЧАТИ_ЭЛЕМЕНТ(Печать)
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
Макет = Документы. Расписание Поездов. Получить Макет ("Печать");
Область = Макет. Получить Область ("Заголовок");
Область = Макет. Получить Область("Шапка");
Область. Параметры. Номер Поезда = Номер Поезда ;
Область. Параметры. Название Поезда = Название Поезда;
Область. Параметры. Станция Отправления = Станция Отправления;
Область. Параметры. Дата Отправления = Дата Отправления;
Область. Параметры. Станция Прибытия = Станция Прибытия;
Область. Параметры. Дата Прибытия = Дата Прибытия;
ТабДок. Отображать Заголовки = Ложь;
1) Цены На Билеты (регистр сведений) - независимый, цены вводятся пользователем.
2) Продажа Билетов (регистр сведений) - регистратором является документ Билет.
3) Информация О поездах (регистр сведений) - регистратором является документы Билет и Расписание Поездов.
4) Проданные Билеты (регистр остатков) - регистратором является документы Билет, Возврат Билетов.
5) Касса (регистр остатков) - регистратором является документы Билет, Возврат Билетов, Бронирование Билетов .
процедура Действия Формы Цены На Билеты Сформировать (Кнопка)
//{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ_ПРОЦЕДУРА_ВЫЗОВА(Цены На Билеты)
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
ТабДок = Элементы Формы. Поле Табличного Документа ;
//}}КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ_ПРОЦЕДУРА_ВЫЗОВА
Процедура Цены На Билеты(ТабДок) Экспорт
//{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ(Цены На Билеты)
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
Макет = Отчет Объект. Получить Макет ("Цены На Билеты ");
| ПРЕДСТАВЛЕНИЕ(Цены На Билеты. Поезд),
| Регистр Сведений. Цены На Билеты КАК Цены На Билеты ";
Область Заголовок = Макет. Получить Область("Заголовок");
Область Подвал = Макет. Получить Область("Подвал");
Область Шапка Таблицы = Макет. Получить Область ("Шапка Таблицы");
Область Подвал Таблицы = Макет. Получить Область ("Подвал Таблицы ");
Область Детальных Записей = Макет. Получить Область ("Детали");
ТабДок. Вывести(Область Заголовок );
ТабДок. Вывести(Область Шапка Таблицы);
ТабДок. Начать Автогруппировку Строк();
Выборка Детали = Результат .Выбрать();
Пока Выборка Детали. Следующий() Цикл
Область Детальных Записей. Параметры. Заполнить (Выборка Детали );
ТабДок. Вывести (Область Детальных Записей, Выборка Детали. Уровень());
ТабДок. Закончить Автогруппировку Строк();
ТабДок. Вывести(Область Подвал Таблицы);
Процедура ДействияФормыИнформацияОПоездахСформировать(Кнопка)
//{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ_ПРОЦЕДУРА_ВЫЗОВА(ИнформацияОПоездах)
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
ТабДок = ЭлементыФормы.ПолеТабличногоДокумента;
ИнформацияОПоездах(ТабДок, ДатаКонца, ДатаНачала);
//}}КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ_ПРОЦЕДУРА_ВЫЗОВА
Процедура ИнформацияОПоездах(ТабДок, ДатаКонца, ДатаНачала) Экспорт
//{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ(ИнформацияОПоездах)
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
Макет = ОтчетОбъект.ПолучитьМакет("ИнформацияОПоездах");
| ИнформацияОПоездах.СтанцияОтправления,
| ИнформацияОПоездах.СтанцияПрибытия,
| ИнформацияОПоездах.ДатаОтправления,
| Регистр Сведений.ИнформацияОПоездах КАК Информация О Поездах
| ИнформацияОПоездах.Период МЕЖДУ &ДатаНачала И &ДатаКонца";
Запрос.УстановитьПараметр("ДатаКонца", ДатаКонца);
Запрос.УстановитьПараметр("ДатаНачала", ДатаНачала);
ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");
ОбластьШапкаТаблицы = Макет.ПолучитьОбласть("ШапкаТаблицы");
ОбластьПодвалТаблицы = Макет.ПолучитьОбласть("ПодвалТаблицы");
ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали");
ТабДок.Вывести(ОбластьШапкаТаблицы);
ТабДок.НачатьАвтогруппировкуСтрок();
ВыборкаДетали = Результат.Выбрать();
Пока ВыборкаДетали.Следующий() Цикл
ОбластьДетальныхЗаписей.Параметры.Заполнить(ВыборкаДетали);
ТабДок.Вывести(ОбластьДетальныхЗаписей, ВыборкаДетали.Уровень());
ТабДок.ЗакончитьАвтогруппировкуСтрок();
ТабДок.Вывести(ОбластьПодвалТаблицы);
Процедура Действия Формы Расписание Поездов Сформировать(Кнопка)
//{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ_ПРОЦЕДУРА_ВЫЗОВА(Расписание Поездов)
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
ТабДок = Элементы Формы. Поле Табличного Документа;
//}}КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ_ПРОЦЕДУРА_ВЫЗОВА
Процедура Расписание Поездов(ТабДок) Экспорт
//{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ(Расписание Поездов)
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
Макет = Отчет Объект. Получить Макет ("Расписание Поездов ");
| РасписаниеПоездов.НазваниеПоезда,
| ПРЕДСТАВЛЕНИЕ(РасписаниеПоездов.НазваниеПоезда),
| РасписаниеПоездов.СтанцияОтправления,
| РасписаниеПоездов.СтанцияПрибытия,
| РасписаниеПоездов.ДатаОтправления,
| Документ.РасписаниеПоездов КАК РасписаниеПоездов";
ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");
ОбластьШапкаТаблицы = Макет.ПолучитьОбласть("ШапкаТаблицы");
ОбластьПодвалТаблицы = Макет.ПолучитьОбласть("ПодвалТаблицы");
ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали");
ТабДок.Вывести(ОбластьШапкаТаблицы);
ТабДок.НачатьАвтогруппировкуСтрок();
ВыборкаДетали = Результат.Выбрать();
Пока ВыборкаДетали.Следующий() Цикл
ОбластьДетальныхЗаписей.Параметры.Заполнить(ВыборкаДетали);
ТабДок.Вывести(ОбластьДетальныхЗаписей, ВыборкаДетали.Уровень());
ТабДок.ЗакончитьАвтогруппировкуСтрок();
ТабДок.Вывести(ОбластьПодвалТаблицы);
Процедура ДействияФормыПроданныеБилетыСформировать(Кнопка)
//{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ_ПРОЦЕДУРА_ВЫЗОВА(ПроданныеБилеты)
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
ТабДок = ЭлементыФормы.ПолеТабличногоДокумента;
ПроданныеБилеты(ТабДок, ДатаКонца, ДатаНачала);
//}}КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ_ПРОЦЕДУРА_ВЫЗОВА
Процедура ПроданныеБилеты(ТабДок, ДатаКонца, ДатаНачала) Экспорт
//{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ(ПроданныеБилеты)
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
Макет = ОтчетОбъект.ПолучитьМакет("ПроданныеБилеты");
| РегистрНакопления.ПроданныеБилеты КАК ПроданныеБилеты
| ПроданныеБилеты.Период МЕЖДУ &ДатаНачала И &ДатаКонца";
Запрос.УстановитьПараметр("ДатаКонца", ДатаКонца);
Запрос.УстановитьПараметр("ДатаНачала", ДатаНачала);
ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");
ОбластьШапкаТаблицы = Макет.ПолучитьОбласть("ШапкаТаблицы");
ОбластьПодвалТаблицы = Макет.ПолучитьОбласть("ПодвалТаблицы");
ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали");
ТабДок.Вывести(ОбластьШапкаТаблицы);
ТабДок.НачатьАвтогруппировкуСтрок();
ВыборкаДетали = Результат.Выбрать();
Пока ВыборкаДетали.Следующий() Цикл
ОбластьДетальныхЗаписей.Параметры.Заполнить(ВыборкаДетали);
ТабДок.Вывести(ОбластьДетальныхЗаписей, ВыборкаДетали.Уровень());
ТабДок.ЗакончитьАвтогруппировкуСтрок();
ТабДок.Вывести(ОбластьПодвалТаблицы);
Процедура ДействияФормыБилетСформировать(Кнопка)
//{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ_ПРОЦЕДУРА_ВЫЗОВА(Билет)
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
ТабДок = ЭлементыФормы.ПолеТабличногоДокумента;
//}}КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ_ПРОЦЕДУРА_ВЫЗОВА
Процедура Билет(ТабДок, ФИО) Экспорт
//{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ(Билет)
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
Макет = ОтчетОбъект.ПолучитьМакет("Билет");
| Билет.СуммаДокумента КАК СуммаДокумента
Запрос.УстановитьПараметр("ФИО", ФИО);
ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");
ОбластьШапкаТаблицы = Макет.ПолучитьОбласть("ШапкаТаблицы");
ОбластьПодвалТаблицы = Макет.ПолучитьОбласть("ПодвалТаблицы");
ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали");
Вагон Область Шапка Таблицы = Макет. Получить Область ("Вагон Шапка Таблицы");
Вагон Область Подвал Таблицы = Макет. Получить Область("Вагон Подвал Таблицы");
Вагон Область Детальных Записей = Макет. Получить Область("Вагон Детали");
Место Область Шапка Таблицы = Макет. Получить Область("Место Шапка Таблицы");
Место Область Подвал Таблицы = Макет. Получить Область("Место Подвал Таблицы");
Место Область Детальных Записей = Макет. Получить Область("Место Детали");
ТабДок.Вывести(ОбластьШапкаТаблицы);
ТабДок.НачатьАвтогруппировкуСтрок();
ВыборкаДетали = Результат.Выбрать();
Пока ВыборкаДетали.Следующий() Цикл
ОбластьДетальныхЗаписей.Параметры.Заполнить(ВыборкаДетали);
ТабДок.Вывести(ОбластьДетальныхЗаписей, ВыборкаДетали.Уровень());
ТабДок.Вывести(ВагонОбластьШапкаТаблицы);
ТабДок.НачатьАвтогруппировкуСтрок();
ВагонВыборкаДетали = ВыборкаДетали.Вагон.Выбрать();
Пока ВагонВыборкаДетали.Следующий() Цикл
ВагонОбластьДетальныхЗаписей.Параметры.Заполнить(ВагонВыборкаДетали);
ТабДок.Вывести(ВагонОбластьДетальныхЗаписей, ВагонВыборкаДетали.Уровень());
ТабДок.ЗакончитьАвтогруппировкуСтрок();
ТабДок.Вывести(ВагонОбластьПодвалТаблицы);
ТабДок.Вывести(МестоОбластьШапкаТаблицы);
ТабДок.НачатьАвтогруппировкуСтрок();
МестоВыборкаДетали = ВыборкаДетали.Место.Выбрать();
Пока МестоВыборкаДетали.Следующий() Цикл
МестоОбластьДетальныхЗаписей.Параметры.Заполнить(МестоВыборкаДетали);
ТабДок.Вывести(МестоОбластьДетальныхЗаписей, МестоВыборкаДетали.Уровень());
ТабДок.ЗакончитьАвтогруппировкуСтрок();
ТабДок.Вывести(МестоОбластьПодвалТаблицы);
ТабДок.ЗакончитьАвтогруппировкуСтрок();
ТабДок.Вывести(ОбластьПодвалТаблицы);
6 ) Движение наличности за период
Процедура ДействияФормыДвижениеНаличностиЗаПериодСформировать(Кнопка)
//{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ_ПРОЦЕДУРА_ВЫЗОВА(ДвижениеНаличностиЗаПериод)
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
ТабДок = ЭлементыФормы.ПолеТабличногоДокумента;
ДвижениеНаличностиЗаПериод(ТабДок, ДатаКонца, ДатаНачала);
//}}КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ_ПРОЦЕДУРА_ВЫЗОВА
Процедура ДвижениеНаличностиЗаПериод(ТабДок, ДатаКонца, ДатаНачала) Экспорт
//{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ(ДвижениеНаличностиЗаПериод)
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
Макет = Отчет Объект. Получить Макет("Движение Наличности За Период");
| РегистрНакопления.Касса КАК Касса
Запрос.УстановитьПараметр("ДатаКонца", ДатаКонца);
Запрос.УстановитьПараметр("ДатаНачала", ДатаНачала);
ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");
ОбластьШапкаТаблицы = Макет.ПолучитьОбласть("ШапкаТаблицы");
ОбластьПодвалТаблицы = Макет.ПолучитьОбласть("ПодвалТаблицы");
ОбластьОбщийИтог = Макет.ПолучитьОбласть("ОбщиеИтоги");
ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали");
ТабДок.Вывести(ОбластьШапкаТаблицы);
ТабДок.НачатьАвтогруппировкуСтрок();
Выборка Общий Итог = Результат. Выбрать(Обход Результата Запроса. По Группировкам);
ВыборкаОбщийИтог.Следующий(); // Общий итог
ОбластьОбщийИтог.Параметры.Заполнить(ВыборкаОбщийИтог);
ТабДок.Вывести(ОбластьОбщийИтог, ВыборкаОбщийИтог.Уровень());
ВыборкаДетали = ВыборкаОбщийИтог.Выбрать();
Пока ВыборкаДетали.Следующий() Цикл
ОбластьДетальныхЗаписей.Параметры.Заполнить(ВыборкаДетали);
ТабДок.Вывести(ОбластьДетальныхЗаписей, ВыборкаДетали.Уровень());
ТабДок.ЗакончитьАвтогруппировкуСтрок();
ТабДок.Вывести(ОбластьПодвалТаблицы);
В программе были созданы три пользователя с различными правами и интерфейсами:
1) Администратор . Этому пользователю предоставляются полные администраторские права.
2) Бухгалтер. Этому пользователю предоставляются права выполнять все возможные действия, помимо административных, в подсистеме «Бухгалтерия».
3) Кассир. Этому пользователю предоставляются права выполнять все возможные действия, помимо административных, в подсистеме «Кассир».
Работа была выполнена в среде 1С:Предприятие 8.0 . В результате данной работы была создана автоматизированная информационно-справочная система, которая полностью решает поставленную задачу и удовлетворяет всем поставленным требованиям.
Типовая конфигурация 1С Предприятие 8.0 реализует наиболее общие схемы учета и может использоваться в большинстве организаций. Для отражения специфики учета конкретного предприятия типовую конфигурацию можно изменить в соответствии с требованиями учета.
Разнообразные возможности системы позволяют использовать ее как средство полной автоматизации учета от ввода первичных документов до формирования отчетности.
1С Предприятие 8.0 позволяет вести торговый учет, производственный учет, учет в сфере оказания услуг, налоговый учет и т.д., а также несложный расчет заработной платы. 1С Предприятие 8.0 включает набор форм бухгалтерской и налоговой отчетности. Разнообразные возможности системы позволяют использовать ее как средство полной автоматизации учета от ввода первичных документов до формирования отчетности.
Гибкость платформы позволяет применять «1С:Предприятие 8.0» в самых разнообразных областях:
· автоматизация производственных и торговых предприятий, бюджетных и финансовых организаций, предприятий сферы обслуживания и т.д.;
· поддержка оперативного управления предприятием;
· автоматизация организационной и хозяйственной деятельности;
· ведение бухгалтерского учета с несколькими планами счетов и произвольными измерениями учета, регламентированная отчетность;
· широкие возможности для управленческого учета и построения аналитической отчетности, поддержка многовалютного учета;
· решение задач планирования, бюджетирования и финансового анализа;
Современные программные продукты для автоматизации ведения бухгалтерского учета. Описание автоматизированной системы для учета выбранного вида деятельности на предприятии в среде 1С. Технология инсталляции, запуска и работы с программным изделием. курсовая работа [3,4 M], добавлен 14.01.2013
Предназначение информационно-справочной системы - ведение учета студентов в деканате, переводя их с курса на курс. Основные функции системы: зачисление, отчисление, начисление стипендии. Нормализация (построение структуры). Главное меню пользователя. курсовая работа [1,7 M], добавлен 09.01.2013
Реализация информационно-справочной системы расписания поездов в Microsoft Visual Studio 2008 на языке C#. Методика разработки и основное содержание данной программы, алгоритмы ее реализации. Требования к программе и оценка ее эффективности, листинг. курсовая работа [5,0 M], добавлен 19.08.2012
Создание программного обеспечения для автоматизации процесса администрирования сеансов кинотеатра и продажи билетов. Разработка приложений базы данных по учету управления продажи билетов в кинотеатре средствами Microsoft Access. Программный листинг. курсовая работа [572,9 K], добавлен 15.04.2014
Основные принципы функционирования и структура кинотеатра. Особенности автоматизации продажи билетов в кинотеатре. Методика построения модели и проект создания информационной системы по продаже билетов в кинотеатре, спецификация ее поведения и состояния. курсовая работа [560,0 K], добавлен 11.12.2010
Необходимость особых подходов к проектированию сверхбольших БД. Создание БД для хранения информации о рейсах в программном продукте Microsoft Access 2003. Редактирование базы билетов. Поиск и просмотр информации в базе данных о бронировании билета. курсовая работа [2,2 M], добавлен 18.11.2014
Проектирование информационной системы бронирования билетов кассы аэропорта. Анализ информационных задач и круга пользователей системы. Составление реляционных отношений. Дополнительные ограничения целостности. Физическое проектирование базы данных. курсовая работа [949,1 K], добавлен 28.03.2011
Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д. PPT, PPTX и PDF-файлы представлены только в архивах. Рекомендуем скачать работу .
© 2000 — 2021
Создание автоматизиpованной инфоpмационно-спpавочной системы расписания движения поездов и продажи билетов курсовая работа. Программирование, компьютеры и кибернетика.
Реферат: Русские славянофилы А.С. Хомяков и И.В. Киреевский. Скачать бесплатно и без регистрации
Написать Сочинение По Картине Шевандроновой На Террасе
Контрольная работа по теме Вікові особливості розвитку і поведінки дітей
Дипломная работа по теме Устойство измерения отношения двух напряжений
Реферат: Критика Линь Бяо и Конфуция
Практическое задание по теме Определение взаимосвязи между хронотипом учащихся 6–х классов и особенностями организации занятий в ...
Курсовая История Развития Логистики
Дипломная работа по теме Проект газоснабжения 60 квартирного жилого дома
Темы Курсовых Муниципальное Управление
Реферат На Тему Породы Древесины
Курсовая Работа На Тему Особые Экономические Зоны
Доклад по теме Физическая культура и ее влияние на организм человека
Реферат: Учет затрат по системе стандарт-кост
Курсовая работа: Электрические источники света
Реферат по теме Скинхеды, их происхождение и характеристика
Курсовая Работа На Тему Генеральное Планирование Производства
Диссертация Без Аттестации Вак
Курсовая работа: Территориальные особенности воспроизводства и расселения народонаселения России. Скачать бесплатно и без регистрации
Дипломная работа по теме Товарные запасы, товарооборачиваемость. Влияние товарооборачиваемости на результаты хозяйственной деятельности (на примере ЧУП 'Белкоопоптторг', м–н 'Дисконт')
Реферат по теме Экология (классификация)
Метаморфозы листьев (усики, колючки, филлодии, ловчие аппараты) - Биология и естествознание реферат
Моделирование процесса приема больных в больницу - Программирование, компьютеры и кибернетика курсовая работа
Япония - География и экономическая география презентация