Модуль Mat_Zamen_New.pas

2.5.2. Модуль Mat_Zamen_New.pas

На форму модуля Mat_Zamen_New вынесены следующие компоненты: TDBGridEh, TbitBtn, TdataSource, TclientDataSet, Tedit, TradioGroup (рис.5).

Рис.5. Модуль Mat_Zamen_New

TDBGridEh – таблица в которую заносятся данные , TbitBtn – кнопки ввода замены и отмены, TdataSource и TclientDataSet – для соединения с базой данных, Tedit – строки с материалами, TradioGroup – выбор полной или частичной замены.

Процедура выбора типа замены:

rocedure TFNew_Zamen.RGClick(Sender: TObject);

begin

if RG.ItemIndex = 1 then

begin

DBN_OldKol.Enabled := True;

end

else if RG.ItemIndex = 0 then

begin

DBN_OldKol.Enabled := False;

DBN_OldKol.Value := Old_Kol;

end;

Zamen_Type := RG.ItemIndex;

end;

Процедура ввода замены:

procedure TFNew_Zamen.BitBtn1Click(Sender: TObject);

var Old, Max, New : WideString;

begin

Old := FloatToStr(DBN_OldKol.Value);

Max := FloatToStr(Max_Kol);

New := FloatToStr(DBN_NewKol.Value);

V.Mat_Zamen_Create(Kat_Id,

Mat_Id,

CDS_Mats.FieldByName('MATERIAL_ID').AsInteger,

Old,

Max,

New,

Zamen_Type);

Close;end;

 

2.5.2. Модуль Mat_Zamen_CNTR_Add.pas

На форме (рис. 6) находятся следующие компоненты: Tedit, TDBNumberEditEh, TspeedButton, TclientDataSet, TdataSource, TcomboBox.

Tedit – наименование контрагента, TDBNumberEditEh – количество закупаемого материала и цена, TcomboBox – выпадающее меню выбора едениц измерения, TspeedButton – рабочие кнопки , TclientDataSet и TdataSource – связь с базой данных.

Рис.6. Модуль Mat_Zamen_CNTR_Add

2.5.2. Модуль формирования очета

На форму (Рис.7 ) вынесена таблица, меню и компоненты связи с базой данных.

После заполнения таблицы, выбрав из меню строку «печать отчета» появится окно компонента FastReport (Рис.8). Этот компонент отвечает за печать отчета.

Рис.7. Таблица закупок

Рис.8. Отчет FastReport

                                                             3. Технологическая часть 3.1. Требования к аппаратному и программному обеспечению

§    Требования к аппаратному обеспечению:

- Процессор Pentium 800 МГц;

- Объем оперативной памяти 128 Мбайт;

- Объем жесткого диска не менее 5 Гбайт;

- Монитор SVGA, клавиатура и манипулятор мышь.

§    Требования к программному обеспечению:

- программа должна работать под управлением операционной системы Microsoft Windows 98/ME/2000/XP.

3.2. Установка подсистемы

Вычислительная среда поставляется на диске CD-R, емкостью 700 Мб. Установка производится в несколько этапов:

§    Проверить соответствие оборудования, на которое предполагается произвести установку, минимальным требованиям для работы подсистемы;

§    Вставить компакт-диск с программой в CD-ROM;

§    Скопировать каталог K_T_Base и все его содержимое на жесткий диск, с которого предполагается производить запуск программы, в каталог C:\ K_T_Base;

§    Для удобства запуска создать на рабочем столе операционной системы значок «K_T_Base», ссылающийся на программу C:\ K_T_Base \ K_T_Base.exe, рабочий каталог C:\ K_T_Base;

§    Создать в главном меню элемент, ссылающийся на программу C:\ K_T_Base \ K_T_Base.exe;

§    Произвести запуск программы;

§    Установка завершена.

3.3. Руководство администратора

Для функционирования подсистемы необходимо наличие специального ПО:

1. На сервере баз данных необходимо установить серверную часть Oracle.

2. Для сервера приложений необходимо установить: клиентскую часть Oracle – для связи с сервером Oracle, Borland Socket Server – для прослушивания порта, к которому будет происходить подключение и Borland Database Engine – для соединения сервера приложений с клиентской частью Oracle.

3. Также необходимо зарегистрировать сервер приложений, запустив его.

4. На клиентских машинах нет необходимости в установке дополнительного программного обеспечения, кроме самой подсистемы.

5. На клиентской машине необходимо однократно настроить имя сервера приложений и указать порт, к которому будет происходить подключение.

Порт должен быть точно таким же, какой указан Borland Socket Server.

Для успешного администрирования базы данных, также необходимо обладать знаниями навыками по настройке и администрированию сервера Oracle.

7. При запуске сервера приложений на панели задач появляется иконка сервера приложений. Когда сервер закрывается, иконка тоже исчезает.

2.4. Руководство оператора

3.3.1. Запуск подсистемы

После запуска операционной системы Microsoft Windows 98/ME/2000/XP запуск программы можно провести несколькими способами:

§    используя кнопку «Пуск» («Start» в англоязычной версии Windows);

§    используя значок «Расчет трудоемкости», расположенный на рабочем столе Windows;

§    используя команду выполнить с аргументом «C:\K_T_Base\ K_T_Base.exe»;

§    используя проводник Windows или аналогичную программу.

Для запуска первым способом необходимо нажать кнопку «Пуск» и выбрать в меню пункт «Программы» («Program» в англоязычной версии Windows). После чего в подменю выбрать строку «K_T_Base» и осуществить таким образом запуск программы.

Для запуска вторым способом необходимо дважды щелкнуть левой клавишей мыши на значок «K_T_Base», расположенный на рабочем столе.

Для запуска третьим способом необходимо нажать кнопку «Пуск» и выбрать в меню пункт «Выполнить». Далее ввести в окно текст «C:\K_T_Base\K_T_Base.exe» с клавиатуры или воспользовавшись возможностью обзора, нажать кнопку «Ok».

Для запуска четвертым способом необходимо запустить проводник, выбрать каталог «C:\K_T_Base \», в нем выбрать программу «K_T_Base.exe».

3.3.2. Начало работы

Разработанная подсистема выполняет следующие функции:

§    Расчет потребностей материалов

§    Добавление необходимых замен

§    Удаление необходимых замен

§    Добавление контрагентов

§    Удаление контрагентов

§    Формирование таблицы закупок

§    Вывод отчета

На рис. 9. показано окно подсистемы, с которого пользователь начинает работу.

Рис 9. Проверка доступа

В этом окне пользователю необходимо ввести имя пользователя и пароль. Доступ к серверу баз данных открывает администратор, пароль и имя пользователя вводятся латинскими буквами. Пароль не отоброжается, в случае необходимости просмотра пароля надо поставить галочку в ячейке «Показать пароль». После ввода данных надо нажать на кнопку «ОК», в результате, если данные верны, открывается сама программа (Рис.10).

Рис.10. Окно системы К_Т_Base.

В окне выбирается каталог, для которого будет производиться расчет потребности. В строке меню, при нажатии кнопки «Отчеты», появляется выпадающее меню в котором необходимо выбрать строку «Закупки материалов» (Рис.11).

Рис. 10. Меню «Отчеты».

3.3.3. Новый расчет

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

Рис.11. Окно выбора каталога

После выбора каталога следует нажать кнопку «Данные», в результате будет произведен расчет потребности, и будет сформирована форма с тремя взаимосвязанными таблицами. В таблице «Список материалов» находятся материалы, их код ОКП, количество и единица измерения. В таблице «Список замен» находятся заменяемые материалы, их код ОКП, количество заменяемого и нового материала. В таблице «Список контрагентов» находятся контрагенты, количество материала необходимого к закупке, его единица измерения и цена (рис. 12.). Все три таблицы взаимосвязаны: каждому материалу соответствует своя замена и контрагент, каждой замене соответствует свой контрагент.

Рис. 12. Основное окно программы

Чтобы начать ввод замен и контрагентов, необходимо в главном меню выбрать пункт «Действие», в результате появится выпадающее меню (рис.13), в котором пользователь выбирает необходимое действие.

Рис. 13. Меню «Действие».

3.3.4. Ввод замен

Ввод замен производится при выборе строки меню «Ввести замену», в результате появляется новое окно, отраженное на рис.14. В этом окне отображается к какой группе относится материал, тип замены (полная или частичная), старый материал и его количество, новый материал и его количество. Новый материал выбирается из таблицы, его количество вводится вручную. Если замена частичная, то количество замены, должно быть меньше, иначе появится окно с ошибкой замены. Материал можно заменять на несколько других, но общее количество замены не должно превышать рассчитанное по норме. Это производится аналогично полной замене. Когда все замены введены, надо нажать кнопку «Ввести замену», если замены не требуется – нажать «Отмена».

Рис. 14. Ввод замен

3.3.5. Ввод контрагентов

После того, как введены замены, можно начать ввод контрагентов. Контрагенты вводятся как для материала, так и для замены. Для этого надо выбрать в главном меню строку «Ввести контрагента» и появится окно, представленное на рис. 15., в нем выбирается контрагент. Если найден нужный контрагент, нажать кнопку «Выбрать», в противном случае «Отмена».

Рис. 15. Справочник контрагентов

После ввода контрагента появляется окно «Добавление контрагентов», в него заносим количество материала на закупку, предполагаемую цену и единицу измерения. Чтобы очистить поля данных, надо нажать кнопку «Очистить». Если данные не требуется изменять, следует нажать кнопку «Добавить в таблицу». Если требуется изменить контрагента – нажать «Отмена» (Рис. 16).

Рис. 16. Добавление контрагентов

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