Диплом: Автоматизация рабочего места инженера по ремонту вычислительной техники (на примере ООО "Эллис")

Внимание! Если размещение файла нарушает Ваши авторские права, то обязательно сообщите нам
82
SetDlgItemText(IDC_EDIT2, "");
SetDlgItemText(IDC_EDIT3, "");
}
void CWinRem::OnOK()
{
TRY
{
db3.OpenEx(lpszConnect3, CDatabase::noOdbcDialog);
GetDlgItemText(IDC_EDIT1, Buff5);
GetDlgItemText(IDC_EDIT4, Buff6);
if (Buff5 == "" && Buff6 == "")
{
AfxMessageBox(("Не все поля заполнены"),MB_OK);
goto _m0;
}
zSQL3 = "SELECT [Ремонт оборудования].[Номер расписки]"
" FROM [Ремонт оборудования]"
" WHERE ((([Ремонт оборудования].Выполнено)=False) AND (([Ремонт
оборудования].[Номер расписки])=" + Buff5 + "));";
GetDlgItemText(IDC_EDIT5, Buff5);
GetDlgItemText(IDC_EDIT6, Buff6);
if (Buff5 == "" && Buff6 == "")
{
AfxMessageBox(("Не все поля заполнены"),MB_OK);
goto _m0;
}
recset3.Open(CRecordset::forwardOnly, zSQL3, CRecordset::readOnly);
if (recset3.IsEOF())
{
AfxMessageBox(("Выбраное оборудование не находится в очереди ожидающих
ремонта"),MB_OK);
recset3.Close();
goto _m0;
}
else
{
recset3.Close();
}
if (m_bb)
{
///Проверка заполнености полей
GetDlgItemText(IDC_EDIT7, Buff5);
GetDlgItemText(IDC_EDIT8, Buff6);
if (Buff5 == "" && Buff6 == "")
{
AfxMessageBox(("Не все поля заполнены"),MB_OK);
goto _m0;
}
GetDlgItemText(IDC_EDIT9, Buff5);
GetDlgItemText(IDC_EDIT10, Buff6);
if (Buff5 == "" && Buff6 == "")
{
83
AfxMessageBox(("Не все поля заполнены"),MB_OK);
goto _m0;
}
///Проверка отсутсвия этого оборудования в базе данных
GetDlgItemText(IDC_EDIT10, Buff5);
zSQL3 = "SELECT Оборудование.SN"
" FROM Оборудование"
" WHERE (((Оборудование.SN)=" + Buff5 + "));";
recset3.Open(CRecordset::forwardOnly, zSQL3, CRecordset::readOnly);
if (!recset3.IsEOF())
{
AfxMessageBox(("Оборудование с данным серийным номером уже занесено в базу
данных"),MB_OK);
recset3.Close();
goto _m0;
}
else
recset3.Close();
///Добавление записи о новом оборудовании
GetDlgItemText(IDC_EDIT7, Buff5);
GetDlgItemText(IDC_EDIT8, Buff6);
zSQL3 = "INSERT INTO Оборудование ([Тип оборудования], Марка, Модель, SN) "
"VALUES ('" + Buff5 + "', '" + Buff6 + "', '";
GetDlgItemText(IDC_EDIT9, Buff5);
GetDlgItemText(IDC_EDIT10, Buff6);
zSQL3 = zSQL3 + Buff5 + "', " + Buff6 + ")";
db3.ExecuteSQL(zSQL3);
///Получение кода оборудования
zSQL3 = "SELECT Оборудование.[Код оборудования]"
" FROM Оборудование"
" ORDER BY Оборудование.[Код оборудования] DESC;";
recset3.Open(CRecordset::forwardOnly, zSQL3, CRecordset::readOnly);
recset3.IsEOF();
recset3.GetFieldValue("Код оборудования", Buff6);
recset3.Close();
///Добовление описания ремонта в базу данных
GetDlgItemText(IDC_EDIT5, Buff5);
zSQL3 = "INSERT INTO [Описание ремонта] ([Замена\\ремонт], [Описание ремонта],
[Дата ремонта], [Стоимость ремонта], [Новое оборудование])"
"VALUES (True, '" + Buff5 + "', ' ";
GetDlgItemText(IDC_EDIT4, Buff5);
zSQL3 = zSQL3 + Buff5 + "', ";
GetDlgItemText(IDC_EDIT6, Buff5);
zSQL3 = zSQL3 + Buff5 + ", " + Buff6 + ")";
db3.ExecuteSQL(zSQL3);
///Получение кода ремонта
zSQL3 = "SELECT [Описание ремонта].[Код ремонта]"
" FROM [Описание ремонта]"
" ORDER BY [Описание ремонта].[Код ремонта] DESC;";
recset3.Open(CRecordset::forwardOnly, zSQL3, CRecordset::readOnly);
recset3.IsEOF();
recset3.GetFieldValue("Код ремонта", Buff6);
84
recset3.Close();
/// Добавление описания ремонта к заявке
GetDlgItemText(IDC_EDIT1, Buff5);
zSQL3 = "UPDATE [Ремонт оборудования] SET [Ремонт оборудования].Выполнено =
True, [Ремонт оборудования].Описание_ремонта = " + Buff6 + "WHERE ((([Ремонт
оборудования].[Номер расписки])=" + Buff5 + "));";
db3.ExecuteSQL(zSQL3);
AfxMessageBox(("Сохранено"),MB_OK);
}
else
{
GetDlgItemText(IDC_EDIT4, Buff5);
GetDlgItemText(IDC_EDIT5, Buff6);
zSQL3 = "INSERT INTO [Описание ремонта] ([Замена\ремонт], [Описание ремонта],
[Дата ремонта], [Стоимость ремонта]) "
"VALUES (False, '" + Buff6 + "', '" + Buff5 + "', ";
GetDlgItemText(IDC_EDIT6, Buff5);
zSQL3 = zSQL3 + Buff5 + ")";
db3.ExecuteSQL(zSQL3);
zSQL3 = "SELECT [Описание ремонта].[Код ремонта] "
"FROM [Описание ремонта] "
"ORDER BY [Описание ремонта].[Код ремонта] DESC;";
recset3.IsEOF();
recset3.GetFieldValue("Код ремонта", Buff6);
recset3.Close();
GetDlgItemText(IDC_EDIT1, Buff5);
zSQL3 = "UPDATE [Ремонт оборудования] SET [Ремонт
оборудования].Описание_ремонта = '" + Buff6 + "', [Ремонт оборудования].Выполнено =
True"
"WHERE ((([Ремонт оборудования].[Номер расписки])=" + Buff5 + "));";
db3.ExecuteSQL(zSQL3);
AfxMessageBox(("Сохранено"),MB_OK);
}
zSQL3 = "";
}
CATCH_ALL(e)
{ }
END_CATCH_ALL
_m0:
db3.Close();
CDialog::OnOK();
}
void CWinRem::OnCheck1()
{ SetDlgItemText(IDC_EDIT5, "Замена оборудования");
UpdateData();}
void CWinRem::OnCancel()
{ CDialog::OnCancel();}
Размещено на Allbest.ru

Смотрите также:

"Автоматизация обработки заявок ООО "Проектно-Строительная Компания"
"Автоматизация процесса аттестации персонала для ООО "Нэт Бай Нэт Холдинг"
"Анализ интернет-активности конкурентов ( на примере конкурентов "Газпром нефть")
"Бухгалтерский учёт и аудит расчётов с подотчётними лицами в организации на примере ООО "ЛОЦ 10""
«Психологическое сопровождение персонала в организации на примере ООО «Крокус»
Cовершенствование деловой оценки персонала в организации (на примере ООО "Даймонд кейтеринг развитие")
IPO - инструмент финансирования деятельности организации. На примере ПАО «Нефтяная компания «Лукойл»
PR как средство продвижения организации (на примере ПАО "Тамбовский завод "Комсомолец им. Н.С. Артемова")
PR-коммуникации в сфере общественного питания (на примере кафе-кондитерской «Cream Cheese»)
SMM как средство повышения эффективности работы учреждений социокультурной сферы (на примере Малого театра)