Дипломная работа: Проект автоматизированного рабочего места специалиста по формированию программ радиовещания
frmDataModule.
tbVkljuchenie. MasterSource:
=frmDataModule. dsPeredachi;
frmDataModule.
tbVkljuchenie. MasterFields: ='Cod_peredachi';
frmDataModule.
tbElementy. MasterSource: =frmDataModule. dsVkljuchenie;
frmDataModule.
tbElementy. MasterFields: ='Cod_elementa';
frmDataModule.
tbObrabotka. MasterSource: =frmDataModule. dsElementy;
frmDataModule.
tbObrabotka. MasterFields: ='Cod_elementa';
frmDataModule.
tbSotrudniki. MasterSource: =frmDataModule. dsObrabotka;
frmDataModule.
tbSotrudniki. MasterFields: ='Tab_nomer';
Форма для организации связи
представлена на рисунке 2.17.

Рисунок 2.17 - Внешний вид
диалогового окна для связного просмотра данных по выбранной передаче и входящих
в нее элементах вещания.
Сортировка данных в табличных
формах, представляемых пользователю в главном окне приложения, осуществляется в
обработчике нажатия на независимый переключатель путем подключения созданных
ранее индексов таблиц. Программно это происходит следующим образом.
procedure TfrmMain. CheckBox1Click (Sender: TObject);
begin
if CheckBox1.
Checked=True
then
frmDataModule.
tbPeredachi. IndexName: ='ixNaimen_Peredachi'
else
frmDataModule.
tbPeredachi. IndexName: ='';
end;
Фильтрация данных в табличных
формах, представляемых пользователю в главном окне приложения, осуществляется в
обработчике нажатия на независимый переключатель путем заполнения свойства Filter компонентов TTable
соответствующими значениями [14-15]. Программно это происходит следующим
образом.
procedure TfrmMain. Button1Click (Sender: TObject);
begin
try
StrToDate (MaskEdit2.
Text);
frmDataModule.
tbVkljuchenie. Filter: =' [Data_prinjatia] ='+''''+MaskEdit2. Text+'''';
frmDataModule.
tbVkljuchenie. Filtered: =True;
except
ShowMessage ('Введите
правильную дату! ');
end;
end;
Запрос при разработке приложения
в Delphi осуществляется с использованием компонента Tquery, который ответственен за реляционную обработку данных
в таблицах. Построение запросов осуществляется статически, динамически (формируется
программно) и параметрически (используются параметры, вводимые пользователем в
компоненты). В данном дипломном проекте реализован статический запрос с
использованием параметров, вводимых пользователем. В свойство SQL
компонента Tquery записывается непосредственно текст
запроса [13].
В качестве примеров обработки
данных в БД АРМ реализованы следующие запросы.
Первый запрос. Выдать данные о
заполнении планируемой передачи элементами вещания с подсчетом суммарного
времени вещания.
Реализация запроса на языке SQL.
select a.
Cod_peredachi, a. Naimen_peredachi, a. Dlitelnoct, sum (b.
Dlitelnost_v_peredache) as Tekushaja_dlitelnost
from Peredachi
a, Vkljuchenie b
where a.
Cod_peredachi=b. Cod_peredachi and a. Naimen_peredachi=: Par1
group by a.
Cod_peredachi, a. Naimen_peredachi, a. Dlitelnoct
В данной реализации параметр: Par1 задается пользователем с помощью компонента ТEdit:
Query1.
ParamByName ('Par1'). Value: =Edit1. Text;
Результат выполнения приведен на
рисунке 2.18.

Рисунок 2.18 -
Результат выдачи данных о заполнении планируемой передачи элементами вещания по
запросу
Второй запрос. Определить
количество элементов вещания, поставленных каждым поставщиком.
Реализация запроса на языке SQL.
Select a.
Cod_postavshika, a. Naimen_postavshika, count (*) as
Kolvo_postavlennych_elementov
from
Postavshiki a, Elementy b
where a.
Cod_postavshika=b. Cod_postashika
group by a.
Cod_postavshika, a. Naimen_postavshika
В данной реализации параметры не
используются.
Результат выполнения приведен на
рисунке 2.19.

Рисунок 2.19 - Результат выдачи
данных о количестве элементов вещания, поставленных каждым поставщиком.
Третий запрос. Предъявить
пользователю суммарные объемы обработки сотрудниками элементов вещания,
сгруппированные по форматам их хранения.
Реализация запроса на языке SQL.
Select a.
Format_chranenia, a. Ed_izmerenia, sum (a. "Ob,jem") as
Obshij_objem_obrabotki
from Elementy
a, Obrabotka b, Sotrudniki c
where b.
Tab_nomer=c. Tab_nomer and b. Cod_elementa=a. Cod_elementa
group by a.
Format_chranenia, a. Ed_izmerenia
В данной реализации параметры не
используются.
Результат приведен на рисунке 2.20.

Рисунок 2.20 - Результат выдачи
данных о суммарных объемах обработки сотрудниками элементов вещания,
сгруппированных по форматам их хранения
Отчет с помощью компонентов Delphi закладки QReport организуется
на отдельной форме, которая пользователю в процессе работы не предъявляется
[15]. Внешний вид формы на этапе проектирования приведен на рисунке 2.21.

Рисунок 2.21 - Формы отчета на
этапе проектирования
Просмотр и, по желанию
пользователя, печать отчета осуществляется с помощью вызова метода frmReport. QuickRep1. Preview. Результат его выполнения приведен на рисунке 2.22.

Рисунок 2.22 - Внешний вид
отчета "Обработка элементов вещания"
2.5 Получение справки по работе с приложением
Пользователь может получить справку
по работе с приложением при выборе соответствующего пункта главного меню окна
приложения. При этом запускается Internet-броузер (программа
для просмотра файлов в формате HTML, в данном проекте -
это Internet Explorer)
пользователю предоставляется справочный файл в виде гипертекстового документа.
Он содержит общую информацию о предметной области, структуру таблиц, входящих в
базу данных, а также формы приложения и комментарии по работе с ними.
Использование данной справки позволит пользователю получить необходимую помощь
в затруднительных ситуациях как с точки зрения пользовательского интерфейса,
так и работы по формированию программ радиовещания и учета данных об этом
бизнес-процессе.
Работа с приложением баз данных
АРМ специалиста по формированию программ радиовещания должна начинаться с
запуска исполняемого файла ARM_Radio.
exe, находящемся в основном каталоге приложения (каталог,
или папка, может размещаться на любом диске персонального компьютера и иметь
любое название). Для нормальной работы приложения на компьютере требуется
наличие Borland Database Engine.
Создания псевдонима БД в системе не требуется.
После запуска исполняемого файла
пользователь имеет возможность работать с главным окном приложения, в котором
располагается многостраничный элемент управления, каждая страница которого
представляет собой отдельное диалоговое окно. В них располагаются табличные
формы с данными об основных объектах предметной области - о передачах, элементах
вещания, поставщиках этих элементов, сотрудниках радиостанции, а также о связях
между ними - включении элементов вещания в передачи и обработке элементов
сотрудниками. Установление связей между объектами и назначение возможных
значений таких полей, как Формат хранения, Должность, Вид передачи (элемента,
поставщика), облегчено использованием распахивающихся списков непосредственно в
ячейках табличных форм.
На закладках Включение в
сценарий и Обработка многостраничного элемента управления имеется возможность
выполнить фильтрацию записей в табличных формах с помощью установленных
независимых переключателей, полей ввода текста и командных кнопок.
На всех закладках главной формы
имеется возможность включить или отключить сортировку записей в табличных
формах по различным критериям, указанным в названии зависимых переключателей.
На закладках Передачи, Элементы
вещания, поставщики и Сотрудники имеется возможность поиска нужной записи в
табличной форме путем ввода нужного значения в поле ввода текста, причем поиск
по ближнему соответствию начинается при вводе уже первого символа.
Приложение дает возможность с
помощью пункта меню Выполнение запросов получить данные заполнении планируемой
передачи элементами вещания, о количестве поставленных элементов вещания по поставщикам
и об объемах обработки, выполненной сотрудниками по форматам хранения.
С помощью пункта меню Выдача
отчетов можно получить данные о ходе обработки элементов вещания.
С помощью пункта меню Выдача
справки пользователь может получить дополнительные сведения о предметной
области и структуре таблиц базы данных.
Спроектированное в данном
проекте автоматизированное рабочее места специалиста по формированию программ
радиовещания позволяет автоматизировать деятельность играющего важную роль в
бизнес-процессе радиостанции работника, дает возможность повысить
производительность его труда, быстроту и качество принимаемых им решений.
Автоматизация деятельности специалиста позволит повысить качество формируемых
передач за счет уменьшения количества накладок и использования наиболее
подходящих материалов в передачах. Автоматизация учета данных обо всех объектах
бизнес-процеса, в котором участвует данный специалист, дает также
соответствующий выигрыш за счет централизованного хранения, доступа и поиска
данных в электронном виде.
Страницы: 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16 |