Файл: Проектирование реализации операций бизнес-процесса «Складской учет» (Характеристика существующих бизнес –процессов).pdf
Добавлен: 12.03.2024
Просмотров: 44
Скачиваний: 0
СОДЕРЖАНИЕ
1.1. Выбор комплекса задач автоматизации
1.2. Характеристика документооборота, возникающего при решении задачи
1.3. Характеристика существующих бизнес –процессов
1.4. Обоснование проектных решений по информационному обеспечению
1.5. Обоснование проектных решений по программному обеспечению
2.1. Информационная модель и её описание
2.2. Характеристика нормативно-справочной, входной и оперативной информации
2.3. Характеристика результатной информации
2.4. Общие положения (дерево функций и сценарий диалога)
2.5. Характеристика базы данных
2.6. Структурная схема пакета (дерево вызова программных модулей)
if(DBEditName->Text=="" )//проверка введенных данных
{ShowMessage("Введите название!");//вывод диалогового окна с сообщением
return;//выход из процедуры
}
//-----------
ADODataSetVidTehniki->Post();//запомнить все изменения в таблице БД
Panel1->Visible=true;//сделать панель видимой
Panel2->Visible=false;//сделать панель невидимой
GroupBox1->Visible=false;//сделать панель невидимой
ButtonChange->Enabled=true;//сделать кнопку Изменить доступной
ButtonDelete->Enabled=true;//сделать кнопку Удалить доступной
}
//---------------------------------------------------------------------------
//Выполняется при нажатии кнопки Отменить
void __fastcall TFormVidTehniki::ButtonOtmenClick(TObject *Sender)
{
ADODataSetVidTehniki->Cancel();//отменить все изменения - данные в таблице БД не сохраняются
Panel1->Visible=true;//сделать панель видимой
Panel2->Visible=false;//сделать панель невидимой
GroupBox1->Visible=false;//сделать панель невидимой
}
//---------------------------------------------------------------------------
void __fastcall TFormVidTehniki::FormShow(TObject *Sender)
{
ADODataSetVidTehniki->Close();
ADODataSetVidTehniki->Open();
ADODataSetComputerTehnika->Close();
ADODataSetComputerTehnika->Open();
}
//---------------------------------------------------------------------------
void __fastcall TFormVidTehniki::DBEditNameKeyPress(TObject *Sender,
char &Key)
{
if(Key==13)
ButtonPostClick(Sender);
}
//--------------------------------------------------------------------------- class TFormComputerTehnika : public TForm
{
__published: // IDE-managed Components
TDBGrid *DBGridComputerTehnika;
TDataSource *DataSourceComputerTehnika;
TADODataSet *ADODataSetComputerTehnika;
TAutoIncField *ADODataSetComputerTehnikaCod;
TWideStringField *ADODataSetComputerTehnikaName;
TBCDField *ADODataSetComputerTehnikaCena;
TDateTimeField *ADODataSetComputerTehnikaDataPostup;
TMemoField *ADODataSetComputerTehnikaOpisanie;
TBlobField *ADODataSetComputerTehnikaPicture;
TIntegerField *ADODataSetComputerTehnikaCodVidTehniki;
TADODataSet *ADODataSetVidTehniki;
TDataSource *DataSourceVidTehniki;
TAutoIncField *ADODataSetVidTehnikiCod;
TWideStringField *ADODataSetVidTehnikiName;
TStringField *ADODataSetComputerTehnikaNameVidTehniki;
TBooleanField *ADODataSetComputerTehnikaProdan;
TGroupBox *GroupBox1;
TLabel *Label1;
TDBEdit *DBEditName;
TLabel *Label2;
TDBEdit *DBEditCena;
TLabel *Label3;
TDateTimePicker *DateTimePickerDataPostup;
TLabel *Label4;
TDBMemo *DBMemoOpisanie;
TLabel *Label5;
TDBLookupComboBox *DBLookupComboBoxVidTehniki;
TButton *ButtonFoto;
TDBImage *DBImageFoto;
TOpenDialog *OpenDialogFoto;
TPanel *Panel1;
TButton *ButtonAdd;
TButton *ButtonDelete;
TButton *ButtonChange;
TButton *ButtonExit;
TPanel *Panel2;
TButton *ButtonPost;
TButton *ButtonOtmen;
void __fastcall ButtonFotoClick(TObject *Sender);
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);
private: // User declarations
public: // User declarations
__fastcall TFormComputerTehnika(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFormComputerTehnika *FormComputerTehnika;
//---------------------------------------------------------------------------
#endif
//---------------------------------------------------------------------------
#ifndef DiagrammaOkladH
#define DiagrammaOkladH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ADODB.hpp>
#include <Chart.hpp>
#include <DB.hpp>
#include <DbChart.hpp>
#include <DBGrids.hpp>
#include <ExtCtrls.hpp>
#include <Grids.hpp>
#include <TeEngine.hpp>
#include <TeeProcs.hpp>
#include <Series.hpp>
#include <Menus.hpp>
//---------------------------------------------------------------------------
class TFormDiagrammaOklad : public TForm
{
__published: // IDE-managed Components
TDBGrid *DBGridManager;
TADODataSet *ADODataSetManager;
TDataSource *DataSourceManager;
TAutoIncField *ADODataSetManagerCod;
TWideStringField *ADODataSetManagerFIO;
TBCDField *ADODataSetManagerOklad;
TDateTimeField *ADODataSetManagerDataRozhd;
TWideStringField *ADODataSetManagerPasport;
TWideStringField *ADODataSetManagerPassword;
TIntegerField *ADODataSetManagerCodDolgnost;
TDBChart *DBChartManager;
TPieSeries *Series1;
TStringField *ADODataSetManagerFIO2;
TButton *ButtonExit;
TPopupMenu *PopupMenu1;
TMenuItem *N1;
void __fastcall FormShow(TObject *Sender);
void __fastcall ADODataSetManagerCalcFields(TDataSet *DataSet);
void __fastcall ButtonExitClick(TObject *Sender);
void __fastcall N1Click(TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TFormDiagrammaOklad(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFormDiagrammaOklad *FormDiagrammaOklad;
//---------------------------------------------------------------------------
#endif
//---------------------------------------------------------------------------
#ifndef DMH
#define DMH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ADODB.hpp>
#include <DB.hpp>
//---------------------------------------------------------------------------
class TDM1 : public TDataModule
{
__published: // IDE-managed Components
TADOConnection *ADOConnection1;
private: // User declarations
public: // User declarations
__fastcall TDM1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TDM1 *DM1;
//---------------------------------------------------------------------------
#endif
//---------------------------------------------------------------------------
#ifndef DolgnostH
#define DolgnostH
//---------------------------------------------------------------------------
#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 TFormDolgnost : public TForm
{
__published: // IDE-managed Components
TDBGrid *DBGridDolgnost;
TADODataSet *ADODataSetDolgnost;
TDataSource *DataSourceDolgnost;
TAutoIncField *ADODataSetDolgnostCod;
TWideStringField *ADODataSetDolgnostName;
TDataSource *DataSourceManager;
TADODataSet *ADODataSetManager;
TGroupBox *GroupBox1;
TDBEdit *DBEditName;
TPanel *Panel1;
TButton *ButtonAdd;
TButton *ButtonDelete;
TButton *ButtonChange;
TButton *ButtonExit;
TPanel *Panel2;
TButton *ButtonPost;
TButton *ButtonOtmen;
TAutoIncField *ADODataSetManagerCod;
TWideStringField *ADODataSetManagerFIO;
TBCDField *ADODataSetManagerOklad;
TDateTimeField *ADODataSetManagerDataRozhd;
TWideStringField *ADODataSetManagerPasport;
TWideStringField *ADODataSetManagerPassword;
TIntegerField *ADODataSetManagerCodDolgnost;
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 TFormDolgnost(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFormDolgnost *FormDolgnost;
//---------------------------------------------------------------------------
#endif
//---------------------------------------------------------------------------
#ifndef MainAISH
#define MainAISH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Menus.hpp>
#include <ExtCtrls.hpp>
#include <jpeg.hpp>
//---------------------------------------------------------------------------
class TFormMainAIS : public TForm
{
__published: // IDE-managed Components
TMainMenu *MainMenu1;
TMenuItem *N1;
TMenuItem *N2;
TMenuItem *N3;
TMenuItem *N4;
TMenuItem *N5;
TMenuItem *N6;
TMenuItem *N7;
TMenuItem *N8;
TPopupMenu *PopupMenu1;
TMenuItem *N9;
TMenuItem *N10;
TMenuItem *N12;
TMenuItem *N13;
TMenuItem *N14;
TMenuItem *N11;
TMenuItem *N15;
TImage *Image1;
void __fastcall N8Click(TObject *Sender);
void __fastcall N4Click(TObject *Sender);
void __fastcall N5Click(TObject *Sender);
void __fastcall N3Click(TObject *Sender);
void __fastcall N6Click(TObject *Sender);
void __fastcall N9Click(TObject *Sender);
void __fastcall N10Click(TObject *Sender);
void __fastcall N12Click(TObject *Sender);
void __fastcall N13Click(TObject *Sender);
void __fastcall N14Click(TObject *Sender);
void __fastcall N11Click(TObject *Sender);
void __fastcall N15Click(TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TFormMainAIS(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFormMainAIS *FormMainAIS;
//---------------------------------------------------------------------------
#endif
//---------------------------------------------------------------------------
#ifndef MainComputerH
#define MainComputerH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ADODB.hpp>
#include <DB.hpp>
#include <Buttons.hpp>
//---------------------------------------------------------------------------
class TFormVxod : public TForm
{
__published: // IDE-managed Components
TLabel *Label1;
TComboBox *ComboBoxManager;
TLabel *Label2;
TEdit *EditPassword;
TBitBtn *BitBtnExit;
TButton *ButtonVxod;
TADODataSet *ADODataSetManager;
TAutoIncField *ADODataSetManagerCod;
TWideStringField *ADODataSetManagerFIO;
TBCDField *ADODataSetManagerOklad;
TDateTimeField *ADODataSetManagerDataRozhd;
TWideStringField *ADODataSetManagerPasport;
TWideStringField *ADODataSetManagerPassword;
TIntegerField *ADODataSetManagerCodDolgnost;
void __fastcall FormShow(TObject *Sender);
void __fastcall BitBtnExitClick(TObject *Sender);
void __fastcall ButtonVxodClick(TObject *Sender);
void __fastcall EditPasswordKeyPress(TObject *Sender, char &Key);
private: // User declarations
public: // User declarations
__fastcall TFormVxod(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFormVxod *FormVxod;
extern int TekManager;
//---------------------------------------------------------------------------
#endif
//---------------------------------------------------------------------------
#ifndef ManagerH
#define ManagerH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ADODB.hpp>
#include <ComCtrls.hpp>
#include <DB.hpp>
#include <DBCtrls.hpp>
#include <DBGrids.hpp>
#include <ExtCtrls.hpp>
#include <Grids.hpp>
#include <Mask.hpp>
#include <Menus.hpp>
//---------------------------------------------------------------------------
class TFormManager : public TForm
{
__published: // IDE-managed Components
TDBGrid *DBGridFormManager;
TDataSource *DataSourceManager;
TADODataSet *ADODataSetManager;
TAutoIncField *ADODataSetManagerCod;
TWideStringField *ADODataSetManagerFIO;
TBCDField *ADODataSetManagerOklad;
TDateTimeField *ADODataSetManagerDataRozhd;
TWideStringField *ADODataSetManagerPasport;
TWideStringField *ADODataSetManagerPassword;
TIntegerField *ADODataSetManagerCodDolgnost;
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
//---------------------------------------------------------------------------
#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>
#include <DBGrids.hpp>
#include <Grids.hpp>
#include <DBCtrls.hpp>
#include <Menus.hpp>
//---------------------------------------------------------------------------
class TFormProdano : 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;
TDataSource *DataSourceHistory;
TADODataSet *ADODataSetHistory;
TAutoIncField *ADODataSetHistoryCod;
TIntegerField *ADODataSetHistoryCodComputerTehnika;
TIntegerField *ADODataSetHistoryCodManager;
TDateTimeField *ADODataSetHistoryDataProdazhi;
TBCDField *ADODataSetHistoryCena;
TDateField *ADODataSetComputerTehnikaDataProdazhi;
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 TFormProdano(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFormProdano *FormProdano;
//---------------------------------------------------------------------------
#endif
//---------------------------------------------------------------------------
#ifndef ProdazhaH
#define ProdazhaH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <ADODB.hpp>
#include <DB.hpp>
#include <DBCtrls.hpp>
#include <DBGrids.hpp>
#include <Grids.hpp>
#include <Menus.hpp>
//---------------------------------------------------------------------------
class TFormProdazha : public TForm
{
__published: // IDE-managed Components
TLabel *Label1;
TDateTimePicker *DateTimePickerDataProdazhi;
TGroupBox *GroupBox1;
TDBGrid *DBGridComputerTehnika;
TADODataSet *ADODataSetComputerTehnika;
TDataSource *DataSourceComputerTehnika;
TAutoIncField *ADODataSetComputerTehnikaCod;