- адреса всех перечисленных субъектов.

      Заполнение  формы РП представлено ниже.

 

       
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

      Кроме формы РП в Роспатент необходимо направить еще ряд документов. В частности, так называемый, реферат, в котором отражается основная информация о программе (вес программного кода, язык написания, платформа, необходимые технические средства для ее использования). Так же стоит отметить, что реферат заполняется в двух экземплярах. Результат показан ниже.

 
 

      Завершающим этапом подготовки является написания  результирующего заявления (сопроводительного  письма), в котором указывается  выбранный вид получения свидетельства и все документы, входящие в пакет, а так же ставится дата заполнения и подпись.

 

ЗАКЛЮЧЕНИЕ

      В ходе выполнения данного курсового  проекта были достигнуты все поставленные цели и задачи:

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

       Выполнение  курсовой работы также помогло:

1. развить навыки самостоятельного планирования и выполнения научно-исследовательской работы;
2. получить опыт сбора и обработки материала, анализу научно-технической литературы;
3. углубить теоретические и практические знания в области патентования программных средств.

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

       Создание  курсовой работы помогло закрепить пройденный материал по курсу «Разработка и стандартизация программных средств и информационных технологий», углубить знания по разработке удаленных баз данных и клиентских приложений, работающих с ними. Также были получены навыки патентной защиты программ для ЭВМ. 
 
 
 

СПИСОК ИСПОЛЬЗУЕМЫХ ИСТОЧНИКОВ

 

1. «CASE-технологии. Современные методы и средства проектирования         информационных систем» А.М. Вендров, http://www.webresurs.ru.
2. А.Я. Архангельский,  «Программирование в C++ Builder 6». — М.:«БИНОМ», 2003 г.
3. Бори Х.,  «FIREBIRD. Руководство разработчика баз данных». –С-Пб.:     «БХВ», 2006 г., 2-е издание.
4. Першиков В. И., Савинков В. М. Толковый словарь по информатике.: – М.: Финансы и статистика 1995г.; 2-е издание.
5. Тоу Д. Настройка SQL. Для профессионалов — СПб.: БХВ-Петербург 2004.
6. Кравец Л.Г. Патентно-информационное обеспечение конкурентной разведки; Информ-издат. центр. - М.: ИНИЦ Роспатента, 1999- 60 с.
7. Михелёв В.М. Базы данных и СУБД: учебное пособие – Белгород: Изд-во БелГУ, 2007 г. – 200 с.
8. Устинова Е.А. Патентный закон Российской Федерации и практика патентования изобретений в области информатики. - 2-е изд.. - М.: Российское агентство по патентам и товарным знакам, 2001 - 68 с.

Приложение

//--------------------------------------------------------------------------- 

#include <vcl.h>

#pragma hdrstop 

#include "Unit1.h"

#include "Unit2.h"

#include "Unit3.h"

#include "Unit4.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

//---------------------------------------------------------------------------

__fastcall TForm1::TForm1(TComponent* Owner)

        : TForm(Owner)

{

}

//--------------------------------------------------------------------------- 

void __fastcall TForm1::Button1Click(TObject *Sender)

{

DataModule2->IBStoredProc1->ParamByName("FIO_CL")->AsString=Form1->Edit1->Text;

DataModule2->IBStoredProc1->ParamByName("ADRES")->AsString=Form1->Edit2->Text;

DataModule2->IBStoredProc1->ParamByName("TELEPHONE")->AsString=Form1->Edit3->Text;

DataModule2->IBStoredProc1->Prepare();

DataModule2->IBStoredProc1->ExecProc();

DataModule2->IBTransaction1->Commit();

DataModule2->IBTable1->Active=false;

DataModule2->IBTable1->Active=true;

DataModule2->IBTable2->Active=true;

DataModule2->IBTable3->Active=true;

DataModule2->IBTable4->Active=true;

DataModule2->IBTable5->Active=true; 
 

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)

{DataModule2->IBStoredProc2->ParamByName("ID_CLIENT")->AsString=DBEdit1->Text;

DataModule2->IBStoredProc2->ParamByName("FIO_CL")->AsString=Edit4->Text;

DataModule2->IBStoredProc2->ParamByName("ADRES")->AsString=Edit5->Text;

DataModule2->IBStoredProc2->ParamByName("TELEPHONE")->AsString=Edit6->Text;

DataModule2->IBStoredProc2->Prepare();

DataModule2->IBStoredProc2->ExecProc();

DataModule2->IBTransaction1->Commit();

DataModule2->IBTable1->Active=false;

DataModule2->IBTable1->Active=true;} 

//---------------------------------------------------------------------------

void __fastcall TForm1::Button3Click(TObject *Sender)

{

DataModule2->IBStoredProc3->ParamByName("ID_CLIENT")->AsString=DBEdit1->Text;

DataModule2->IBStoredProc3->Prepare();

DataModule2->IBStoredProc3->ExecProc();

DataModule2->IBTransaction1->Commit();

DataModule2->IBTable1->Active=false;

DataModule2->IBTable1->Active=true;

DataModule2->IBTable2->Active=true;

DataModule2->IBTable3->Active=true;

DataModule2->IBTable4->Active=true;

DataModule2->IBTable5->Active=true;

}

//--------------------------------------------------------------------------- 

void __fastcall TForm1::Edit7Change(TObject *Sender)

{

if (RadioButton1->Checked)

{TLocateOptions LO;

DataModule2->IBTable1->Locate("FIO_CL", Edit7->Text, LO<<loPartialKey<< loCaseInsensitive);}

else if (RadioButton2->Checked)

{TLocateOptions LO;

DataModule2->IBTable1->Locate("ADRES", Edit7->Text, LO<<loPartialKey<< loCaseInsensitive);}

else if (RadioButton3->Checked)

{TLocateOptions LO;

DataModule2->IBTable1->Locate("TELEPHONE", Edit7->Text, LO<<loPartialKey<< loCaseInsensitive);}

}

//--------------------------------------------------------------------------- 

void __fastcall TForm1::RadioButton4Click(TObject *Sender)

{

DataModule2->IBTable1->Active=false;

DataModule2->IBTable1->IndexFieldNames="FIO_CL";

DataModule2->IBTable1->Active=true;

}

//--------------------------------------------------------------------------- 

void __fastcall TForm1::RadioButton5Click(TObject *Sender)

{

DataModule2->IBTable1->Active=false;