96
СПИСОК ИСПОЛЬЗОВАННОЙ ЛИТЕРАТУРЫ
1. ISO 9001:2015 «Quality management systems – Requirements».
2. ISO/IEC/IEEE 830-1998 «Recommended practice for software
requirements specifications».
3. ISO/IEC/IEEE 1016-1998 «Recommended Practice for Software Design
Descriptions».
4. ISO/IEC/IEEE 1233-1998 «Guide for developing system requirements
specifications».
5. ISO/IEC IEEE Std 42010 1471-2000 «System and software engineering –
Recommended practice for architectural description of software-intensive systems».
6. ISO/IEC 15288:2015 «Разработка систем и программного
обеспечения – Процессы жизненного цикла систем».
7. ISO/IEC 90003:2014 «Software engineering – Guide lines for the
application of ISO 9001:2000 to computer software»
8. ГОСТ 34.601-90 АВТОМАТИЗИРОВАННЫЕ СИСТЕМЫ СТАДИИ
СОЗДАНИЯ.
9. ГОСТ Р ИСО/МЭК 12207-2010. Информационная технология.
Системная и программная инженерия. Процессы жизненного цикла программных
средств.
10. Гражданский кодекс Российской Федерации от 30.11.1994 № 51-ФЗ
(принят ГД ФС РФ 21.11.1994) (ред. от 22.06.2017) // СПС Консультант Плюс.
11. Закон РФ от 07.02.1992 «О защите прав потребителей» № 2300-I (ред.
от 01.05.2017) // СПС Консультант Плюс.
12. Правила продажи товаров дистанционным способом от 27.09.2007
(утв. Постановлением Правительства РФ № 612 от 27.09.2007) (ред. от 04.10.2012)
// СПС Консультант Плюс.
13. Абросимова М.А. Информационные технологии: Учебное пособие. -
М.: КноРус, 2013. - 368 стр.: ил.
14. Балдин К.В. Информационные технологии в менеджменте. - М.: ИЦ
Академия, 2012. - 328 с.
97
15. Васильков А.В. Информационные системы и их безопасность. – М.:
Форум, 2013. – 544 с.
16. Вдовин В.М. Предметно-ориентированные информационные системы. - М.:
Дашков и К, 2013. - 388 с.
17. Гаврилов М.В. Информатика и информационные технологии. - М.:
Юрайт, 2013. - 378 с.
18. Гвоздева В.А. Информатика и автоматизированные
информационные системы. - М.: ИД Форум, 2013. - 544 c.
19. Голицына О.Л. Информационные технологии: Учебник. - М.: Инфра-
М, 2013. - 608 с.
20. Гришин, В.Н. Информационные технологии в профессиональной
деятельности: Учебник / В.Н. Гришин, Е.Е. Панфилова. - М.: ИД ФОРУМ, НИЦ
ИНФРА-М, 2013. - 416 c.
21. Исаев, Г.Н. Информационные системы в экономике: Учебник / Г.Н.
Исаев. - М.: Омега-Л, 2012. - 462 c.
22. Максимов, Н.В. Современные информационные технологии:
Учебное пособие / Н.В. Максимов, Т.Л. Партыка, И.И. Попов. - М.: Форум, 2013.
- 512 c.
23. Мельников, В.П. Информационные технологии: Учебник для
студентов высших учебных заведений / В.П. Мельников. - М.: ИЦ Академия, 2009.
- 432 c.
24. Одинцов, Б.Е. Информационные системы управления
эффективностью бизнеса: Учебник и практикум для бакалавриата и магистратуры
/ Б.Е. Одинцов. - Люберцы: Юрайт, 2016. - 206 c.
25. Олейник, П.П. Корпоративные информационные системы: Учебник
для вузов. Стандарт третьего поколения / П.П. Олейник. - СПб.: Питер, 2012. - 176
c.
26. Уткин, В.Б. Информационные системы в экономике: Учебник для
студентов высших учебных заведений / В.Б. Уткин, К.В. Балдин. - М.: ИЦ
Академия, 2012. - 288 c.
27. Незнанов А.А. Программирование и алгоритмизация. - М.:
Академия, 2012. - 304 с.
98
28. Пирогов В.Ю. Информационные системы и базы данных. - М.:
Организация и проектирование, 2013. - 528 с.
29. Симионов Ю.Ф., Боромотов В.В. Информационный менеджмент. -
Ростов н.Д: Феникс, 2014. - 250стр.: ил.
30. Большая Птица [Электронный ресурс]: // Система онлайн учета для
бизнеса [Офиц. сайт]. URL: http://bigbird.ru/ (дата обращения: 20.10.2017).
31. Система учета ассортимента «Бизнес.Ру» [Электронный ресурс]: //
Программа для автоматизации бизнеса Офиц. сайт]. URL: http://online.business.ru/
(дата обращения: 20.10.2017).
32. ТоргСофт. Программное обеспечение для учета управления
бизнесом [Электронный ресурс]: // Программа для розничной торговли [Офиц.
сайт]. URL: https://torgsoft.ua/ (дата обращения: 20.10.2017).
99
ПРИЛОЖЕНИЕ 1
Листинг программного кода
TMemoField *ADODataSetComputerTehnikaOpisanie;
TBlobField *ADODataSetComputerTehnikaPicture;
TIntegerField *ADODataSetComputerTehnikaCodVidTehniki;
TADODataSet *ADODataSetVidTehniki;
TDataSource *DataSourceVidTehniki;
TAutoIncField *ADODataSetVidTehnikiCod;
TWideStringField *ADODataSetVidTehnikiName;
TStringField *ADODataSetComputerTehnikaNameVidTehniki;
TDataSource *DataSourceHistory;
TADODataSet *ADODataSetHistory;
TAutoIncField *ADODataSetHistoryCod;
TIntegerField *ADODataSetHistoryCodComputerTehnika;
TIntegerField *ADODataSetHistoryCodManager;
TDateTimeField *ADODataSetHistoryDataProdazhi;
TBCDField *ADODataSetHistoryCena;
TDateField *ADODataSetComputerTehnikaDataProdazhi;
void __fastcall QuickRep1AfterPreview(TObject *Sender);
void __fastcall FormActivate(TObject *Sender);
void __fastcall FormShow(TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TFormReport2(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFormReport2 *FormReport2;
//---------------------------------------------------------------------------
#endif
//---------------------------------------------------------------------------
#ifndef VidTehnikiH
#define VidTehnikiH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ADODB.hpp>
#include <DB.hpp>
#include <DBGrids.hpp>
#include <Grids.hpp>
#include <DBCtrls.hpp>
#include <ExtCtrls.hpp>
#include <Mask.hpp>
//---------------------------------------------------------------------------
class TFormVidTehniki : public TForm
100
{
__published: // IDE-managed Components
TDBGrid *DBGridVidTehniki;
TADODataSet *ADODataSetVidTehniki;
TDataSource *DataSourceVidTehniki;
TDataSource *DataSourceManager;
TADODataSet *ADODataSetComputerTehnika;
TGroupBox *GroupBox1;
TDBEdit *DBEditName;
TPanel *Panel1;
TButton *ButtonAdd;
TButton *ButtonDelete;
TButton *ButtonChange;
TButton *ButtonExit;
TPanel *Panel2;
TButton *ButtonPost;
TButton *ButtonOtmen;
TAutoIncField *ADODataSetVidTehnikiCod;
TWideStringField *ADODataSetVidTehnikiName;
TAutoIncField *ADODataSetComputerTehnikaCod;
TWideStringField *ADODataSetComputerTehnikaName;
TBCDField *ADODataSetComputerTehnikaCena;
TDateTimeField *ADODataSetComputerTehnikaDataPostup;
TMemoField *ADODataSetComputerTehnikaOpisanie;
TBlobField *ADODataSetComputerTehnikaPicture;
TIntegerField *ADODataSetComputerTehnikaCodVidTehniki;
TBooleanField *ADODataSetComputerTehnikaProdan;
void __fastcall ButtonAddClick(TObject *Sender);
void __fastcall ButtonDeleteClick(TObject *Sender);
void __fastcall ButtonChangeClick(TObject *Sender);
void __fastcall ButtonExitClick(TObject *Sender);
void __fastcall ButtonPostClick(TObject *Sender);
void __fastcall ButtonOtmenClick(TObject *Sender);
void __fastcall FormShow(TObject *Sender);
void __fastcall DBEditNameKeyPress(TObject *Sender, char &Key);
private: // User declarations
public: // User declarations
__fastcall TFormVidTehniki(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFormVidTehniki *FormVidTehniki;
//---------------------------------------------------------------------------
#endif
//---------------------------------------------------------------------------
#ifndef VnalichiiH
#define VnalichiiH
//---------------------------------------------------------------------------
101
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ADODB.hpp>
#include <DB.hpp>
#include <DBGrids.hpp>
#include <Grids.hpp>
#include <DBCtrls.hpp>
#include <Menus.hpp>
//---------------------------------------------------------------------------
class TFormVnalichii : public TForm
{
__published: // IDE-managed Components
TDBGrid *DBGridComputerTehnika;
TADODataSet *ADODataSetComputerTehnika;
TDataSource *DataSourceComputerTehnika;
TAutoIncField *ADODataSetComputerTehnikaCod;
TWideStringField *ADODataSetComputerTehnikaName;
TBCDField *ADODataSetComputerTehnikaCena;
TBooleanField *ADODataSetComputerTehnikaProdan;
TDateTimeField *ADODataSetComputerTehnikaDataPostup;
TMemoField *ADODataSetComputerTehnikaOpisanie;
TBlobField *ADODataSetComputerTehnikaPicture;
TIntegerField *ADODataSetComputerTehnikaCodVidTehniki;
TDataSource *DataSourceVidTehniki;
TADODataSet *ADODataSetVidTehniki;
TStringField *ADODataSetComputerTehnikaNameVidTehniki;
TDBImage *DBImageFoto;
TDBMemo *DBMemoOpisanie;
TButton *ButtonExit;
TButton *ButtonPrint;
TPopupMenu *PopupMenu1;
TMenuItem *N1;
TMenuItem *N2;
void __fastcall ButtonExitClick(TObject *Sender);
void __fastcall DBGridComputerTehnikaCellClick(TColumn *Column);
void __fastcall FormShow(TObject *Sender);
void __fastcall ButtonPrintClick(TObject *Sender);
void __fastcall N1Click(TObject *Sender);
void __fastcall N2Click(TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TFormVnalichii(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFormVnalichii *FormVnalichii;
//---------------------------------------------------------------------------
102
#endif
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "ComputerTehnika.h"
#include "DM.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFormComputerTehnika *FormComputerTehnika;
//---------------------------------------------------------------------------
__fastcall TFormComputerTehnika::TFormComputerTehnika(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TFormComputerTehnika::ButtonFotoClick(TObject *Sender)
{ char *s;
OpenDialogFoto->InitialDir= ExtractFileDir(Application->ExeName);
if(OpenDialogFoto->Execute()==true) //вызов диалога выбора файла
{DBImageFoto->Visible=true;
s= OpenDialogFoto->FileName.c_str(); //получить наименование выбранного файла
с полным путем
DBImageFoto->Picture->LoadFromFile(s);
}
else
{if(ADODataSetComputerTehnikaPicture->Value=="")
DBImageFoto->Visible=false;
}
}
//---------------------------------------------------------------------------
void __fastcall TFormComputerTehnika::FormShow(TObject *Sender)
{
ADODataSetComputerTehnika->Close();
ADODataSetComputerTehnika->Open();
ADODataSetVidTehniki->Close();
ADODataSetVidTehniki->Open();
}
//---------------------------------------------------------------------------
//Выполняется при нажатии кнопки Добавить
void __fastcall TFormComputerTehnika::ButtonAddClick(TObject *Sender)
{
if(ADODataSetComputerTehnika->State==dsBrowse)
{ADODataSetComputerTehnika->Insert();
Panel1->Visible=false;
103
Panel2->Visible=true;
GroupBox1->Visible=true;
DateTimePickerDataPostup->Date= Date();
DBEditName->SetFocus();
}
}
//---------------------------------------------------------------------------
//Выполняется при нажатии кнопки Удалить
void __fastcall TFormComputerTehnika::ButtonDeleteClick(TObject *Sender)
{
if(ADODataSetComputerTehnika->RecordCount==0) //есть ли данные в БД
{ButtonChange->Enabled=false;//сделать кнопку Изменить недоступной
ButtonDelete->Enabled=false;//сделать кнопку Удалить недоступной
ShowMessage("Данные отсутствуют в БД!"); //вывести сообщение в виде окошка
return;//выход из формы
}
if(ADODataSetComputerTehnika->State==dsBrowse)
if(Application->MessageBoxA("Подтвердите удаление записи
!","Внимание",MB_ICONWARNING+MB_YESNO)==IDYES)
ADODataSetComputerTehnika->Delete();//удалить запись из таблицы БД
}
//---------------------------------------------------------------------------
//Выполняется при нажатии кнопки Изменить
void __fastcall TFormComputerTehnika::ButtonChangeClick(TObject *Sender)
{
if(ADODataSetComputerTehnika->RecordCount==0) //есть ли данные в БД - кол-во
записей в таблице БД
{ShowMessage("Данные отсутствуют в БД!");//вывести сообщение в виде окошка
return;//выход из формы
}
if(ADODataSetComputerTehnika->State==dsBrowse)
ADODataSetComputerTehnika->Edit();//перевести таблицу БД в режим
редактирования
Panel1->Visible=false;//сделать панель невидимой
Panel2->Visible=true;//сделать панель видимой
GroupBox1->Visible=true;//сделать панель видимой
DateTimePickerDataPostup->Date= ADODataSetComputerTehnikaDataPostup-
>Value;
DBEditName->SetFocus(); //установить фокус в поле для ввода
}
//---------------------------------------------------------------------------
//Выполняется при нажатии кнопки Выход
void __fastcall TFormComputerTehnika::ButtonExitClick(TObject *Sender)
{
Close();
TWideStringField *ADODataSetManagerPassword;
TIntegerField *ADODataSetManagerCodDolgnost;
104
TADODataSet *ADODataSetDolgnost;
TAutoIncField *ADODataSetDolgnostCod;
TWideStringField *ADODataSetDolgnostName;
TStringField *ADODataSetManagerNameDolgnost;
TGroupBox *GroupBox1;
TLabel *Label1;
TDBEdit *DBEditFIO;
TLabel *Label2;
TDBLookupComboBox *DBLookupComboBoxDolgnost;
TDataSource *DataSourceDolgnost;
TLabel *Label3;
TDBEdit *DBEditOklad;
TLabel *Label4;
TDBEdit *DBEditPasport;
TLabel *Label5;
TDBEdit *DBEditPassword;
TLabel *Label6;
TDateTimePicker *DateTimePicker1;
TPanel *Panel1;
TButton *ButtonAdd;
TButton *ButtonDelete;
TButton *ButtonChange;
TButton *ButtonExit;
TPanel *Panel2;
TButton *ButtonPost;
TButton *ButtonOtmen;
TPopupMenu *PopupMenu1;
TMenuItem *N1;
void __fastcall FormShow(TObject *Sender);
void __fastcall ButtonAddClick(TObject *Sender);
void __fastcall ButtonDeleteClick(TObject *Sender);
void __fastcall ButtonChangeClick(TObject *Sender);
void __fastcall ButtonExitClick(TObject *Sender);
void __fastcall ButtonPostClick(TObject *Sender);
void __fastcall ButtonOtmenClick(TObject *Sender);
void __fastcall N1Click(TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TFormManager(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFormManager *FormManager;
//---------------------------------------------------------------------------
#endif
//---------------------------------------------------------------------------
#ifndef OtchetManagerH
#define OtchetManagerH
105
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ADODB.hpp>
#include <DB.hpp>
#include <DBGrids.hpp>
#include <Grids.hpp>
#include <Menus.hpp>
//---------------------------------------------------------------------------
class TFormOtchetManager : public TForm
{
__published: // IDE-managed Components
TDBGrid *DBGridManager;
TADODataSet *ADODataSetManager;
TDataSource *DataSourceManager;
TADODataSet *ADODataSetDolgnost;
TDataSource *DataSourceDolgnost;
TADODataSet *ADODataSetComputerTehnika;
TDataSource *DataSourceComputerTehnika;
TADODataSet *ADODataSetHistory;
TDataSource *DataSourceHistory;
TPopupMenu *PopupMenu1;
TMenuItem *N1;
TButton *ButtonExit;
void __fastcall FormShow(TObject *Sender);
void __fastcall N1Click(TObject *Sender);
void __fastcall ButtonExitClick(TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TFormOtchetManager(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFormOtchetManager *FormOtchetManager;
//---------------------------------------------------------------------------
#endif
//---------------------------------------------------------------------------
#ifndef ProdanoH
#define ProdanoH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ADODB.hpp>
#include <DB.hpp>