База данных АРМ ’валютный кассир’
БД, входящая в состав АРМ ’Валютный кассир’ написана как Delphi
приложение с использованием языка программирования Object Pascal
для работы под ОС Windows 95
. БД состоит из двух основных частей:
-управляющего модуля;
-модулей экранных форм.
Рассмотрим процесс создания и заполнения таблиц данных. В составе БД имеется три основные таблицы:
1
таблица
содержит в себе данные, характеризующие каждый обменный пункт филиала, а именно: название Банка, текущую дату, режим работы, адрес обменного пункта, его регистрационный номер, фамилия кассира, выданный аванс ‑ денежной массы и документов;
2
таблица
содержит данные об иностранной валюте, с которой обменный пункт проводит операции, а именно – название каждой валюты и ее код, текущая дата, курс ЦБ, внутренние курсы покупки /
продажи валют, а также остаток денежной массы на текущий момент;
3 таблица
здесь содержатся такие данные о справках строгой отчетности, как: серия и номер справки, информация о том, была ли забракована справка или нет, текущая дата, режим работы (Утро /
Вечер) и регистрационный номер обменного пункта.
Создание таблиц происходило следующим образом. Прежде всего, с помощью диспетчера файлов Windows (Windows File Manager)
, делается новый каталог C
: \
BOXLIGHT
\
TEMP
. Это то место, где будут размещаться таблицы и индексы. Позднее они будут скопированы в каталог, специально предназначенный для приложения.
Далее, следует перейти к Delphi
, из меню Tools
(Инструментальные средства) запустить Database Desktop (
Рабочий стол БД). Из меню File
(Файл) в DBD
нужно выбрать New/Table
(Новая Таблица) и выбрать dBase
для Windows
из предложенного набора типов файлов. Открывшийся после этого диалог Create Table
(Создать таблицу) помогает определить таблицу с помощью специфики полей.
Для создания индекса по полю таблицы следует щелкнуть кнопкой на Define
(Определить), в результате чего на экране появляется диалог Define Index
(Определить индекс). Из списка полей выбирается индексируемое поле, на нем надо дважды щелкнуть, затем отметить индикатор Unique
(Уникальный), т.к. индекс по этому полю должен иметь характеристику ’уникальный’. Полностью специфицировав все поля и индексы следует нажать кнопку Save as
(Сохранить как) в диалог Create Table
и записать файл в каталог C: \ BOXLOGHT \ TEMP
.
Без разработки при помощи Delphi
быстрых черновых инструментальных средств не обойтись. Одна из утилит должна содержать DBMemo
‑объект, который должен быть связан с полем мемо. Затем ввести данные в это поле во все записи таблицы и перекомпилировать утилиту так, чтобы объект DBMemо был связан с другим полем мемо. После этого все
текстуальные данные
в таблицу введены. Затем можно переключиться на таблицу общей информации и обработать мемо‑
поля там.
Вторая утилита должна содержать объект DBImage
, который следует связать с полем BLOB Перейти на страницу: 1 2 3