78
db4.OpenEx(lpszConnect4, CDatabase::noOdbcDialog);
GetDlgItemText(IDC_EDIT1, Buff8);
GetDlgItemText(IDC_EDIT3, Buff9);
if (Buff8 == "" && Buff9 == "")
{
AfxMessageBox(("Заполните поле номера расписки или серийного номера
оборудования"),MB_OK);
goto _m7;}
if (Buff8 != "")
{
zSQL4 = "SELECT Оборудование.[Тип оборудования], Оборудование.Марка,
Оборудование.Модель, Оборудование.SN, [Ремонт оборудования].[Номер расписки],
Неисправность.[Признаки неисправности]"
" FROM Неисправность INNER JOIN (Оборудование INNER JOIN [Ремонт
оборудования] ON Оборудование.[Код оборудования] = [Ремонт
оборудования].Оборудование) ON Неисправность.[Код неисправности] = [Ремонт
оборудования].[Код неисправности]"
" WHERE ((([Ремонт оборудования].[Номер расписки])=" + Buff8 + ") AND (([Ремонт
оборудования].Выполнено)=False));";
}
else
if (Buff9 != "")
{
zSQL4 = "SELECT Оборудование.[Тип оборудования], Оборудование.Марка,
Оборудование.Модель, Оборудование.SN, [Ремонт оборудования].[Номер расписки],
Неисправность.[Признаки неисправности]"
" FROM Неисправность INNER JOIN (Оборудование INNER JOIN [Ремонт
оборудования] ON Оборудование.[Код оборудования] = [Ремонт
оборудования].Оборудование) ON Неисправность.[Код неисправности] = [Ремонт
оборудования].[Код неисправности]"
" WHERE (((Оборудование.SN)=" + Buff9 + ") AND (([Ремонт
оборудования].Выполнено)=False));";
}
recset4.Open(CRecordset::forwardOnly, zSQL4, CRecordset::readOnly);
if (!recset4.IsEOF())
{
recset4.GetFieldValue("Тип оборудования", Buff8);
Buff9 = Buff8;
recset4.GetFieldValue("Марка", Buff8);
Buff9 = Buff9 + " " + Buff8 + " ";
recset4.GetFieldValue("Модель", Buff8);
Buff9 = Buff9 + Buff8;
SetDlgItemText(IDC_EDIT2, Buff9);
recset4.GetFieldValue("SN", Buff8);
SetDlgItemText(IDC_EDIT3, Buff8);
recset4.GetFieldValue("Номер расписки", Buff8);
SetDlgItemText(IDC_EDIT1, Buff8);
recset4.GetFieldValue("Признаки неисправности", Buff8);
SetDlgItemText(IDC_EDIT4, Buff8);
}
else
{