X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/ea24eeb2dbfc99c1bac186a91662b1fa1ba5032a..f2616db56739e4962f683f59ac9e207756efe23c:/samples/db/dbtest.cpp?ds=sidebyside diff --git a/samples/db/dbtest.cpp b/samples/db/dbtest.cpp index 3608ad0a73..4c8037a85d 100644 --- a/samples/db/dbtest.cpp +++ b/samples/db/dbtest.cpp @@ -46,6 +46,14 @@ //extern wxDbList WXDLLEXPORT *PtrBegDbList; /* from db.cpp, used in getting back error results from db connections */ +#if wxUSE_NEW_GRID +#include +#include +#include + +#define CHOICEINT +#endif + #include "dbtest.h" /* Header file for this demonstration program */ #include "listdb.h" /* Code to support the "Lookup" button on the editor dialog */ @@ -54,44 +62,10 @@ IMPLEMENT_APP(DatabaseDemoApp) extern wxChar ListDB_Selection[]; /* Used to return the first column value for the selected line from the listDB routines */ extern wxChar ListDB_Selection2[]; /* Used to return the second column value for the selected line from the listDB routines */ -const char *GetExtendedDBErrorMsg(wxDb *pDb, char *ErrFile, int ErrLine) -{ - static wxString msg; - msg = wxT(""); - - wxString tStr; - if (ErrFile || ErrLine) - { - msg += wxT("File: "); - msg += ErrFile; - msg += wxT(" Line: "); - tStr.Printf(wxT("%d"),ErrLine); - msg += tStr.c_str(); - msg += wxT("\n"); - } - - msg.Append (wxT("\nODBC errors:\n")); - msg += wxT("\n"); - - // Display errors for this connection - int i; - for (i = 0; i < DB_MAX_ERROR_HISTORY; i++) - { - if (pDb->errorList[i]) - { - msg.Append(pDb->errorList[i]); - if (wxStrcmp(pDb->errorList[i],wxT("")) != 0) - msg.Append(wxT("\n")); - // Clear the errmsg buffer so the next error will not - // end up showing the previous error that have occurred - wxStrcpy(pDb->errorList[i],wxT("")); - } - } - msg += wxT("\n"); - - return msg.c_str(); -} // GetExtendedDBErrorMsg +#if !wxUSE_ODBC + #error Sample cannot be compiled unless setup.h has wxUSE_ODBC set to 1 +#endif bool DataTypeSupported(wxDb *pDb, SWORD datatype) @@ -111,202 +85,266 @@ bool DataTypeSupported(wxDb *pDb, SWORD datatype) void CheckSupportForAllDataTypes(wxDb *pDb) { - bool supported; + wxLogMessage("\nThe following datatypes are supported by the\ndatabase you are currently connected to:"); #ifdef SQL_C_BINARY - supported = DataTypeSupported(pDb,SQL_C_BINARY); + if (DataTypeSupported(pDb,SQL_C_BINARY)) + wxLogMessage("SQL_C_BINARY"); #endif #ifdef SQL_C_BIT - supported = DataTypeSupported(pDb,SQL_C_BIT); + if (DataTypeSupported(pDb,SQL_C_BIT)) + wxLogMessage("SQL_C_BIT"); #endif #ifdef SQL_C_BOOKMARK - supported = DataTypeSupported(pDb,SQL_C_BOOKMARK); + if (DataTypeSupported(pDb,SQL_C_BOOKMARK)) + wxLogMessage("SQL_C_BOOKMARK"); #endif #ifdef SQL_C_CHAR - supported = DataTypeSupported(pDb,SQL_C_CHAR); + if (DataTypeSupported(pDb,SQL_C_CHAR)) + wxLogMessage("SQL_C_CHAR"); #endif #ifdef SQL_C_DATE - supported = DataTypeSupported(pDb,SQL_C_DATE); + if (DataTypeSupported(pDb,SQL_C_DATE)) + wxLogMessage("SQL_C_DATE"); #endif #ifdef SQL_C_DEFAULT - supported = DataTypeSupported(pDb,SQL_C_DEFAULT); + if (DataTypeSupported(pDb,SQL_C_DEFAULT)) + wxLogMessage("SQL_C_DEFAULT"); #endif #ifdef SQL_C_DOUBLE - supported = DataTypeSupported(pDb,SQL_C_DOUBLE); + if (DataTypeSupported(pDb,SQL_C_DOUBLE)) + wxLogMessage("SQL_C_DOUBLE"); #endif #ifdef SQL_C_FLOAT - supported = DataTypeSupported(pDb,SQL_C_FLOAT); + if (DataTypeSupported(pDb,SQL_C_FLOAT)) + wxLogMessage("SQL_C_FLOAT"); #endif #ifdef SQL_C_GUID - supported = DataTypeSupported(pDb,SQL_C_GUID); + if (DataTypeSupported(pDb,SQL_C_GUID)) + wxLogMessage("SQL_C_GUID"); #endif #ifdef SQL_C_INTERVAL_DAY - supported = DataTypeSupported(pDb,SQL_C_INTERVAL_DAY); + if (DataTypeSupported(pDb,SQL_C_INTERVAL_DAY)) + wxLogMessage("SQL_C_INTERVAL_DAY"); #endif #ifdef SQL_C_INTERVAL_DAY_TO_HOUR - supported = DataTypeSupported(pDb,SQL_C_INTERVAL_DAY_TO_HOUR); + if (DataTypeSupported(pDb,SQL_C_INTERVAL_DAY_TO_HOUR)) + wxLogMessage("SQL_C_INTERVAL_DAY_TO_HOUR"); #endif #ifdef SQL_C_INTERVAL_DAY_TO_MINUTE - supported = DataTypeSupported(pDb,SQL_C_INTERVAL_DAY_TO_MINUTE); + if (DataTypeSupported(pDb,SQL_C_INTERVAL_DAY_TO_MINUTE)) + wxLogMessage("SQL_C_INTERVAL_DAY_TO_MINUTE"); #endif #ifdef SQL_C_INTERVAL_DAY_TO_SECOND - supported = DataTypeSupported(pDb,SQL_C_INTERVAL_DAY_TO_SECOND); + if (DataTypeSupported(pDb,SQL_C_INTERVAL_DAY_TO_SECOND)) + wxLogMessage("SQL_C_INTERVAL_DAY_TO_SECOND"); #endif #ifdef SQL_C_INTERVAL_HOUR - supported = DataTypeSupported(pDb,SQL_C_INTERVAL_HOUR); + if (DataTypeSupported(pDb,SQL_C_INTERVAL_HOUR)) + wxLogMessage("SQL_C_INTERVAL_HOUR"); #endif #ifdef SQL_C_INTERVAL_HOUR_TO_MINUTE - supported = DataTypeSupported(pDb,SQL_C_INTERVAL_HOUR_TO_MINUTE); + if (DataTypeSupported(pDb,SQL_C_INTERVAL_HOUR_TO_MINUTE)) + wxLogMessage("SQL_C_INTERVAL_HOUR_TO_MINUTE"); #endif #ifdef SQL_C_INTERVAL_HOUR_TO_SECOND - supported = DataTypeSupported(pDb,SQL_C_INTERVAL_HOUR_TO_SECOND); + if (DataTypeSupported(pDb,SQL_C_INTERVAL_HOUR_TO_SECOND)) + wxLogMessage("SQL_C_INTERVAL_HOUR_TO_SECOND"); #endif #ifdef SQL_C_INTERVAL_MINUTE - supported = DataTypeSupported(pDb,SQL_C_INTERVAL_MINUTE); + if (DataTypeSupported(pDb,SQL_C_INTERVAL_MINUTE)) + wxLogMessage("SQL_C_INTERVAL_MINUTE"); #endif #ifdef SQL_C_INTERVAL_MINUTE_TO_SECOND - supported = DataTypeSupported(pDb,SQL_C_INTERVAL_MINUTE_TO_SECOND); + if (DataTypeSupported(pDb,SQL_C_INTERVAL_MINUTE_TO_SECOND)) + wxLogMessage("SQL_C_INTERVAL_MINUTE_TO_SECOND"); #endif #ifdef SQL_C_INTERVAL_MONTH - supported = DataTypeSupported(pDb,SQL_C_INTERVAL_MONTH); + if (DataTypeSupported(pDb,SQL_C_INTERVAL_MONTH)) + wxLogMessage("SQL_C_INTERVAL_MONTH"); #endif #ifdef SQL_C_INTERVAL_SECOND - supported = DataTypeSupported(pDb,SQL_C_INTERVAL_SECOND); + if (DataTypeSupported(pDb,SQL_C_INTERVAL_SECOND)) + wxLogMessage("SQL_C_INTERVAL_SECOND"); #endif #ifdef SQL_C_INTERVAL_YEAR - supported = DataTypeSupported(pDb,SQL_C_INTERVAL_YEAR); + if (DataTypeSupported(pDb,SQL_C_INTERVAL_YEAR)) + wxLogMessage("SQL_C_INTERVAL_YEAR"); #endif #ifdef SQL_C_INTERVAL_YEAR_TO_MONTH - supported = DataTypeSupported(pDb,SQL_C_INTERVAL_YEAR_TO_MONTH); + if (DataTypeSupported(pDb,SQL_C_INTERVAL_YEAR_TO_MONTH)) + wxLogMessage("SQL_C_INTERVAL_YEAR_TO_MONTH"); #endif #ifdef SQL_C_LONG - supported = DataTypeSupported(pDb,SQL_C_LONG); + if (DataTypeSupported(pDb,SQL_C_LONG)) + wxLogMessage("SQL_C_LONG"); #endif #ifdef SQL_C_NUMERIC - supported = DataTypeSupported(pDb,SQL_C_NUMERIC); + if (DataTypeSupported(pDb,SQL_C_NUMERIC)) + wxLogMessage("SQL_C_NUMERIC"); #endif #ifdef SQL_C_SBIGINT - supported = DataTypeSupported(pDb,SQL_C_SBIGINT); + if (DataTypeSupported(pDb,SQL_C_SBIGINT)) + wxLogMessage("SQL_C_SBIGINT"); #endif #ifdef SQL_C_SHORT - supported = DataTypeSupported(pDb,SQL_C_SHORT); + if (DataTypeSupported(pDb,SQL_C_SHORT)) + wxLogMessage("SQL_C_SHORT"); #endif #ifdef SQL_C_SLONG - supported = DataTypeSupported(pDb,SQL_C_SLONG); + if (DataTypeSupported(pDb,SQL_C_SLONG)) + wxLogMessage("SQL_C_SLONG"); #endif #ifdef SQL_C_SSHORT - supported = DataTypeSupported(pDb,SQL_C_SSHORT); + if (DataTypeSupported(pDb,SQL_C_SSHORT)) + wxLogMessage("SQL_C_SSHORT"); #endif #ifdef SQL_C_STINYINT - supported = DataTypeSupported(pDb,SQL_C_STINYINT); + if (DataTypeSupported(pDb,SQL_C_STINYINT)) + wxLogMessage("SQL_C_STINYINT"); #endif #ifdef SQL_C_TIME - supported = DataTypeSupported(pDb,SQL_C_TIME); + if (DataTypeSupported(pDb,SQL_C_TIME)) + wxLogMessage("SQL_C_TIME"); #endif #ifdef SQL_C_TIMESTAMP - supported = DataTypeSupported(pDb,SQL_C_TIMESTAMP); + if (DataTypeSupported(pDb,SQL_C_TIMESTAMP)) + wxLogMessage("SQL_C_TIMESTAMP"); #endif #ifdef SQL_C_TINYINT - supported = DataTypeSupported(pDb,SQL_C_TINYINT); + if (DataTypeSupported(pDb,SQL_C_TINYINT)) + wxLogMessage("SQL_C_TINYINT"); #endif #ifdef SQL_C_TYPE_DATE - supported = DataTypeSupported(pDb,SQL_C_TYPE_DATE); + if (DataTypeSupported(pDb,SQL_C_TYPE_DATE)) + wxLogMessage("SQL_C_TYPE_DATE"); #endif #ifdef SQL_C_TYPE_TIME - supported = DataTypeSupported(pDb,SQL_C_TYPE_TIME); + if (DataTypeSupported(pDb,SQL_C_TYPE_TIME)) + wxLogMessage("SQL_C_TYPE_TIME"); #endif #ifdef SQL_C_TYPE_TIMESTAMP - supported = DataTypeSupported(pDb,SQL_C_TYPE_TIMESTAMP); + if (DataTypeSupported(pDb,SQL_C_TYPE_TIMESTAMP)) + wxLogMessage("SQL_C_TYPE_TIMESTAMP"); #endif #ifdef SQL_C_UBIGINT - supported = DataTypeSupported(pDb,SQL_C_UBIGINT); + if (DataTypeSupported(pDb,SQL_C_UBIGINT)) + wxLogMessage("SQL_C_UBIGINT"); #endif #ifdef SQL_C_ULONG - supported = DataTypeSupported(pDb,SQL_C_ULONG); + if (DataTypeSupported(pDb,SQL_C_ULONG)) + wxLogMessage("SQL_C_ULONG"); #endif #ifdef SQL_C_USHORT - supported = DataTypeSupported(pDb,SQL_C_USHORT); + if (DataTypeSupported(pDb,SQL_C_USHORT)) + wxLogMessage("SQL_C_USHORT"); #endif #ifdef SQL_C_UTINYINT - supported = DataTypeSupported(pDb,SQL_C_UTINYINT); + if (DataTypeSupported(pDb,SQL_C_UTINYINT)) + wxLogMessage("SQL_C_UTINYINT"); #endif #ifdef SQL_C_VARBOOKMARK - supported = DataTypeSupported(pDb,SQL_C_VARBOOKMARK); + if (DataTypeSupported(pDb,SQL_C_VARBOOKMARK)) + wxLogMessage("SQL_C_VARBOOKMARK"); #endif // Extended SQL types #ifdef SQL_DATE - supported = DataTypeSupported(pDb,SQL_DATE); + if (DataTypeSupported(pDb,SQL_DATE)) + wxLogMessage("SQL_DATE"); #endif #ifdef SQL_INTERVAL - supported = DataTypeSupported(pDb,SQL_INTERVAL); + if (DataTypeSupported(pDb,SQL_INTERVAL)) + wxLogMessage("SQL_INTERVAL"); #endif #ifdef SQL_TIME - supported = DataTypeSupported(pDb,SQL_TIME); + if (DataTypeSupported(pDb,SQL_TIME)) + wxLogMessage("SQL_TIME"); #endif #ifdef SQL_TIMESTAMP - supported = DataTypeSupported(pDb,SQL_TIMESTAMP); + if (DataTypeSupported(pDb,SQL_TIMESTAMP)) + wxLogMessage("SQL_TIMESTAMP"); #endif #ifdef SQL_LONGVARCHAR - supported = DataTypeSupported(pDb,SQL_LONGVARCHAR); + if (DataTypeSupported(pDb,SQL_LONGVARCHAR)) + wxLogMessage("SQL_LONGVARCHAR"); #endif #ifdef SQL_BINARY - supported = DataTypeSupported(pDb,SQL_BINARY); + if (DataTypeSupported(pDb,SQL_BINARY)) + wxLogMessage("SQL_BINARY"); #endif #ifdef SQL_VARBINARY - supported = DataTypeSupported(pDb,SQL_VARBINARY); + if (DataTypeSupported(pDb,SQL_VARBINARY)) + wxLogMessage("SQL_VARBINARY"); #endif #ifdef SQL_LONGVARBINARY - supported = DataTypeSupported(pDb,SQL_LONGVARBINARY); + if (DataTypeSupported(pDb,SQL_LONGVARBINARY)) + wxLogMessage("SQL_LONGVARBINARY"); #endif #ifdef SQL_BIGINT - supported = DataTypeSupported(pDb,SQL_BIGINT); + if (DataTypeSupported(pDb,SQL_BIGINT)) + wxLogMessage("SQL_BIGINT"); #endif #ifdef SQL_TINYINT - supported = DataTypeSupported(pDb,SQL_TINYINT); + if (DataTypeSupported(pDb,SQL_TINYINT)) + wxLogMessage("SQL_TINYINT"); #endif #ifdef SQL_BIT - supported = DataTypeSupported(pDb,SQL_BIT); + if (DataTypeSupported(pDb,SQL_BIT)) + wxLogMessage("SQL_BIT"); #endif #ifdef SQL_GUID - supported = DataTypeSupported(pDb,SQL_GUID); + if (DataTypeSupported(pDb,SQL_GUID)) + wxLogMessage("SQL_GUID"); #endif #ifdef SQL_CHAR - supported = DataTypeSupported(pDb,SQL_CHAR); + if (DataTypeSupported(pDb,SQL_CHAR)) + wxLogMessage("SQL_CHAR"); #endif #ifdef SQL_INTEGER - supported = DataTypeSupported(pDb,SQL_INTEGER); + if (DataTypeSupported(pDb,SQL_INTEGER)) + wxLogMessage("SQL_INTEGER"); #endif #ifdef SQL_SMALLINT - supported = DataTypeSupported(pDb,SQL_SMALLINT); + if (DataTypeSupported(pDb,SQL_SMALLINT)) + wxLogMessage("SQL_SMALLINT"); #endif #ifdef SQL_REAL - supported = DataTypeSupported(pDb,SQL_REAL); + if (DataTypeSupported(pDb,SQL_REAL)) + wxLogMessage("SQL_REAL"); #endif #ifdef SQL_DOUBLE - supported = DataTypeSupported(pDb,SQL_DOUBLE); + if (DataTypeSupported(pDb,SQL_DOUBLE)) + wxLogMessage("SQL_DOUBLE"); #endif #ifdef SQL_NUMERIC - supported = DataTypeSupported(pDb,SQL_NUMERIC); + if (DataTypeSupported(pDb,SQL_NUMERIC)) + wxLogMessage("SQL_NUMERIC"); #endif #ifdef SQL_DATE - supported = DataTypeSupported(pDb,SQL_DATE); + if (DataTypeSupported(pDb,SQL_DATE)) + wxLogMessage("SQL_DATE"); #endif #ifdef SQL_TIME - supported = DataTypeSupported(pDb,SQL_TIME); + if (DataTypeSupported(pDb,SQL_TIME)) + wxLogMessage("SQL_TIME"); #endif #ifdef SQL_TIMESTAMP - supported = DataTypeSupported(pDb,SQL_TIMESTAMP); + if (DataTypeSupported(pDb,SQL_TIMESTAMP)) + wxLogMessage("SQL_TIMESTAMP"); #endif #ifdef SQL_VARCHAR - supported = DataTypeSupported(pDb,SQL_VARCHAR); + if (DataTypeSupported(pDb,SQL_VARCHAR)) + wxLogMessage("SQL_VARCHAR"); #endif - // UNICODE #ifdef SQL_C_TCHAR - supported = DataTypeSupported(pDb,SQL_C_TCHAR); + if (DataTypeSupported(pDb,SQL_C_TCHAR)) + wxLogMessage("SQL_C_TCHAR (Unicode support is possible)"); #endif + + wxLogMessage("\n"); } // CheckSupportForAllDataTypes() @@ -326,6 +364,9 @@ bool DatabaseDemoApp::OnInit() file_menu->Append(FILE_CREATE, wxT("&Create CONTACT table")); file_menu->Append(FILE_RECREATE_TABLE, wxT("&Recreate CONTACT table")); file_menu->Append(FILE_RECREATE_INDEXES, wxT("&Recreate CONTACT indexes")); +#if wxUSE_NEW_GRID + file_menu->Append(FILE_DBGRID_TABLE, wxT("&Open DB Grid example")); +#endif file_menu->Append(FILE_EXIT, wxT("E&xit")); wxMenu *edit_menu = new wxMenu; @@ -476,20 +517,22 @@ void DatabaseDemoApp::CreateDataTable(bool recreate) { wxEndBusyCursor(); wxString tStr; - tStr = wxT("Error creating CONTACTS table.\nTable was not created.\n\n"); - tStr += GetExtendedDBErrorMsg(Contact->GetDb(),__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + tStr = wxT("Error creating CONTACTS table.\nTable was not created.\n\n"); + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + success = FALSE; } else { - if (!Contact->CreateIndexes()) + if (!Contact->CreateIndexes(recreate)) { wxEndBusyCursor(); wxString tStr; - tStr = wxT("Error creating CONTACTS indexes.\nIndexes will be unavailable.\n\n"); - tStr += GetExtendedDBErrorMsg(Contact->GetDb(),__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + tStr = wxT("Error creating CONTACTS indexes.\nIndexes will be unavailable.\n\n"); + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + success = FALSE; } } @@ -505,6 +548,9 @@ BEGIN_EVENT_TABLE(DatabaseDemoFrame, wxFrame) EVT_MENU(FILE_CREATE, DatabaseDemoFrame::OnCreate) EVT_MENU(FILE_RECREATE_TABLE, DatabaseDemoFrame::OnRecreateTable) EVT_MENU(FILE_RECREATE_INDEXES, DatabaseDemoFrame::OnRecreateIndexes) +#if wxUSE_NEW_GRID + EVT_MENU(FILE_DBGRID_TABLE, DatabaseDemoFrame::OnDbGridTable) +#endif EVT_MENU(FILE_EXIT, DatabaseDemoFrame::OnExit) EVT_MENU(EDIT_PARAMETERS, DatabaseDemoFrame::OnEditParameters) EVT_MENU(HELP_ABOUT, DatabaseDemoFrame::OnAbout) @@ -520,8 +566,16 @@ DatabaseDemoFrame::DatabaseDemoFrame(wxFrame *frame, const wxString& title, // Put any code in necessary for initializing the main frame here pEditorDlg = NULL; pParamDlg = NULL; + + delete wxLog::SetActiveTarget(new wxLogStderr); + } // DatabaseDemoFrame constructor +DatabaseDemoFrame::~DatabaseDemoFrame() +{ + delete wxLog::SetActiveTarget(NULL); +} // DatabaseDemoFrame destructor + void DatabaseDemoFrame::OnCreate(wxCommandEvent& event) { @@ -537,21 +591,35 @@ void DatabaseDemoFrame::OnRecreateTable(wxCommandEvent& event) void DatabaseDemoFrame::OnRecreateIndexes(wxCommandEvent& event) { - if (!wxGetApp().Contact->CreateIndexes()) + wxGetApp().Contact->GetDb()->RollbackTrans(); // Make sure the current cursor is in a known/stable state + + if (!wxGetApp().Contact->CreateIndexes(TRUE)) { while (wxIsBusy()) wxEndBusyCursor(); wxString tStr; - tStr = wxT("Error creating CONTACTS indexes.\nNew indexes will be unavailable.\n\n"); - tStr += GetExtendedDBErrorMsg(wxGetApp().Contact->GetDb(),__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + tStr = wxT("Error creating CONTACTS indexes.\nNew indexes will be unavailable.\n\n"); + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),wxGetApp().Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + } - else + else wxMessageBox(wxT("Index(es) were successfully recreated."),wxT("Notice..."),wxOK | wxICON_INFORMATION); } // DatabaseDemoFrame::OnRecreateIndexes() +#if wxUSE_NEW_GRID +void DatabaseDemoFrame::OnDbGridTable(wxCommandEvent& ) +{ + DbGridFrame *frame = new DbGridFrame(this); + if (frame->Initialize()) + { + frame->Show(); + } +} +#endif + void DatabaseDemoFrame::OnExit(wxCommandEvent& event) { Close(); @@ -697,9 +765,10 @@ Ccontact::~Ccontact() if (!wxDbFreeConnection(GetDb())) { wxString tStr; - tStr = wxT("Unable to Free the Ccontact data table handle\n\n"); - tStr += GetExtendedDBErrorMsg(GetDb(),__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + tStr = wxT("Unable to Free the Ccontact data table handle\n\n"); + + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),wxGetApp().Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); } } } // Ccontract destructor @@ -723,7 +792,7 @@ void Ccontact::SetupColumns() SetColDefs ( 6,wxT("COUNTRY"), DB_DATA_TYPE_VARCHAR, Country, SQL_C_CHAR, sizeof(Country), FALSE,TRUE); SetColDefs ( 7,wxT("JOINDATE"), DB_DATA_TYPE_DATE, &JoinDate, SQL_C_TIMESTAMP, sizeof(JoinDate), FALSE,TRUE); SetColDefs ( 8,wxT("IS_DEV"), DB_DATA_TYPE_INTEGER, &IsDeveloper, SQL_C_BOOLEAN(IsDeveloper), sizeof(IsDeveloper), FALSE,TRUE); - SetColDefs ( 9,wxT("CONTRIBS"), DB_DATA_TYPE_INTEGER, &Contributions, SQL_C_USHORT, sizeof(Contributions), FALSE,TRUE); + SetColDefs ( 9,wxT("CONTRIBS"), DB_DATA_TYPE_INTEGER, &Contributions, SQL_C_UTINYINT, sizeof(Contributions), FALSE,TRUE); SetColDefs (10,wxT("LINE_CNT"), DB_DATA_TYPE_INTEGER, &LinesOfCode, SQL_C_ULONG, sizeof(LinesOfCode), FALSE,TRUE); SetColDefs (11,wxT("LANGUAGE"), DB_DATA_TYPE_INTEGER, &NativeLanguage, SQL_C_ENUM, sizeof(NativeLanguage), FALSE,TRUE); #if wxODBC_BLOB_EXPERIMENT > 0 @@ -732,7 +801,7 @@ void Ccontact::SetupColumns() } // Ccontact::SetupColumns -bool Ccontact::CreateIndexes(void) +bool Ccontact::CreateIndexes(bool recreate) { // This index could easily be accomplished with an "orderBy" clause, // but is done to show how to construct a non-primary index. @@ -749,7 +818,7 @@ bool Ccontact::CreateIndexes(void) indexName = GetTableName(); indexName += "_IDX1"; - Ok = CreateIndex(indexName.c_str(), TRUE, 2, idxDef); + Ok = CreateIndex(indexName.c_str(), TRUE, 2, idxDef, recreate); return Ok; } // Ccontact::CreateIndexes() @@ -862,13 +931,9 @@ void CeditorDlg::OnCommand(wxWindow& win, wxCommandEvent& event) if (widgetName == pCopyBtn->GetName()) { - - CheckSupportForAllDataTypes(wxGetApp().READONLY_DB); -/* SetMode(mCreate); pNameTxt->SetValue(wxT("")); pNameTxt->SetFocus(); -*/ return; } @@ -957,9 +1022,10 @@ void CeditorDlg::OnCommand(wxWindow& win, wxCommandEvent& event) if (!wxGetApp().Contact->Query()) { wxString tStr; - tStr = wxT("ODBC error during Query()\n\n"); - tStr += GetExtendedDBErrorMsg(wxGetApp().Contact->GetDb(),__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + tStr = wxT("ODBC error during Query()\n\n"); + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),wxGetApp().Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + SetMode(mView); return; } @@ -1026,9 +1092,10 @@ void CeditorDlg::OnCommand(wxWindow& win, wxCommandEvent& event) if (!wxGetApp().Contact->Query()) { wxString tStr; - tStr = wxT("ODBC error during Query()\n\n"); - tStr += GetExtendedDBErrorMsg(wxGetApp().Contact->GetDb(),__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + tStr = wxT("ODBC error during Query()\n\n"); + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),wxGetApp().Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + return; } // Display the first record from the query set @@ -1062,9 +1129,9 @@ void CeditorDlg::OnCommand(wxWindow& win, wxCommandEvent& event) if (!wxGetApp().Contact->Query()) { wxString tStr; - tStr = wxT("ODBC error during Query()\n\n"); - tStr += GetExtendedDBErrorMsg(wxGetApp().Contact->GetDb(),__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + tStr = wxT("ODBC error during Query()\n\n"); + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),wxGetApp().Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); return; } if (!wxGetApp().Contact->GetNext()) @@ -1099,6 +1166,30 @@ void CeditorDlg::OnCommand(wxWindow& win, wxCommandEvent& event) return; } + + if (widgetName == pDataTypesBtn->GetName()) + { + CheckSupportForAllDataTypes(wxGetApp().READONLY_DB); + wxMessageBox("Support datatypes was dumped to stdout."); + return; + } // Data types Button + + if (widgetName == pDbDiagsBtn->GetName()) + { + DisplayDbDiagnostics(wxGetApp().READONLY_DB); + wxMessageBox("Diagnostics info was dumped to stdout."); + return; + } + + if (widgetName == pCatalogBtn->GetName()) + { + if (wxGetApp().Contact->GetDb()->Catalog("","catalog.txt")) + wxMessageBox("The file 'catalog.txt' was created."); + else + wxMessageBox("Creation of the file 'catalog.txt' was failed."); + return; + } + } // CeditorDlg::OnCommand() @@ -1122,11 +1213,8 @@ bool CeditorDlg::Initialize() wxGetApp().DbConnectInf->GetDefaultDir())) { wxString tStr; - tStr.Printf(wxT("Unable to open the table '%s'.\n\nTable may need to be created...?\n\n"),CONTACT_TABLE_NAME); - tStr += GetExtendedDBErrorMsg(wxGetApp().Contact->GetDb(),__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); - - bool createTable = (wxMessageBox(wxT("Do you wish to try to create/clear the CONTACTS table?"),wxT("Confirm"),wxYES_NO|wxICON_QUESTION) == wxYES); + tStr.Printf(wxT("Unable to open the table '%s'. The table may\nneed to be created.\n\nDo you wish to try to create/clear the table?\n\n"),CONTACT_TABLE_NAME); + bool createTable = (wxMessageBox(tStr.c_str(),wxT("Confirm"),wxYES_NO|wxICON_QUESTION) == wxYES); if (!createTable) { @@ -1150,13 +1238,14 @@ bool CeditorDlg::Initialize() // open the table. if (!wxGetApp().Contact->GetDb()->TablePrivileges(CONTACT_TABLE_NAME, wxT("SELECT"), wxGetApp().Contact->GetDb()->GetUsername(), - wxGetApp().Contact->GetDb()->GetUsername(), - wxGetApp().DbConnectInf->GetDefaultDir())) + wxGetApp().Contact->GetDb()->GetUsername(), + wxGetApp().DbConnectInf->GetDefaultDir())) { wxString tStr; tStr.Printf(wxT("Unable to open the table '%s' (likely due to\ninsufficient privileges of the logged in user).\n\n"),CONTACT_TABLE_NAME); - tStr += GetExtendedDBErrorMsg(wxGetApp().Contact->GetDb(),__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),wxGetApp().Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); } else #endif @@ -1166,8 +1255,8 @@ bool CeditorDlg::Initialize() { wxString tStr; tStr.Printf(wxT("Unable to open the table '%s' as the table\ndoes not appear to exist in the tablespace available\nto the currently logged in user.\n\n"),CONTACT_TABLE_NAME); - tStr += GetExtendedDBErrorMsg(wxGetApp().Contact->GetDb(),__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),wxGetApp().Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); } return FALSE; @@ -1225,6 +1314,10 @@ bool CeditorDlg::Initialize() pLinesMsg = new wxStaticText(this, EDITOR_DIALOG_LINES_MSG, wxT("Lines of code:"), wxPoint(303, 380), wxSize( -1, -1), 0, wxT("LinesMsg")); pLinesTxt = new wxTextCtrl(this, EDITOR_DIALOG_LINES_TEXT, wxT(""), wxPoint(303, 397), wxSize(100, 25), 0, wxDefaultValidator, wxT("LinesTxt")); + pCatalogBtn = new wxButton(this, EDITOR_DIALOG_CATALOG, wxT("Catalo&g"), wxPoint(430, 287), wxSize( 70, 35), 0, wxDefaultValidator, wxT("CatalogBtn")); + pDataTypesBtn = new wxButton(this, EDITOR_DIALOG_DATATYPES, wxT("Data&types"), wxPoint(430, 337), wxSize( 70, 35), 0, wxDefaultValidator, wxT("DataTypesBtn")); + pDbDiagsBtn = new wxButton(this, EDITOR_DIALOG_DB_DIAGS, wxT("DB Dia&gs"), wxPoint(430, 387), wxSize( 70, 35), 0, wxDefaultValidator, wxT("DbDiagsBtn")); + // Now that all the widgets on the panel are created, its safe to allow ::OnCommand() to // handle all widget processing widgetPtrsSet = TRUE; @@ -1260,9 +1353,9 @@ bool CeditorDlg::Initialize() if (!wxGetApp().Contact->Query()) { wxString tStr; - tStr = wxT("ODBC error during Query()\n\n"); - tStr += GetExtendedDBErrorMsg(wxGetApp().Contact->GetDb(),__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + tStr = wxT("ODBC error during Query()\n\n"); + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),wxGetApp().Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); return FALSE; } @@ -1512,29 +1605,30 @@ bool CeditorDlg::Save() if (result == DB_ERR_INTEGRITY_CONSTRAINT_VIOL) { wxString tStr; - tStr = wxT("A duplicate key value already exists in the table.\nUnable to save record\n\n"); - tStr += GetExtendedDBErrorMsg(wxGetApp().Contact->GetDb(),__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + tStr = wxT("A duplicate key value already exists in the table.\nUnable to save record\n\n"); + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),wxGetApp().Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); } else { - // Some other unexpexted error occurred + // Some other unexpected error occurred wxString tStr; - tStr = wxT("Database insert failed\n\n"); - tStr += GetExtendedDBErrorMsg(wxGetApp().Contact->GetDb(),__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + tStr = wxT("Database insert failed\n\n"); + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),wxGetApp().Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); } } } else // mode == mEdit { + wxGetApp().Contact->GetDb()->RollbackTrans(); wxGetApp().Contact->whereStr.Printf("NAME = '%s'",saveName.c_str()); if (!wxGetApp().Contact->UpdateWhere(wxGetApp().Contact->whereStr)) { wxString tStr; - tStr = wxT("Database update failed\n\n"); - tStr += GetExtendedDBErrorMsg(wxGetApp().Contact->GetDb(),__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + tStr = wxT("Database update failed\n\n"); + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),wxGetApp().Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); failed = TRUE; } } @@ -1639,9 +1733,9 @@ bool CeditorDlg::GetRec(const wxString &whereStr) if (!wxGetApp().Contact->Query()) { wxString tStr; - tStr = wxT("ODBC error during Query()\n\n"); - tStr += GetExtendedDBErrorMsg(wxGetApp().Contact->GetDb(),__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + tStr = wxT("ODBC error during Query()\n\n"); + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),wxGetApp().Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); return(FALSE); } @@ -1949,9 +2043,9 @@ CqueryDlg::CqueryDlg(wxWindow *parent, wxDb *pDb, wxChar *tblName[], { wxEndBusyCursor(); wxString tStr; - tStr = wxT("ODBC error during GetColumns()\n\n"); - tStr += GetExtendedDBErrorMsg(pDb,__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + tStr = wxT("ODBC error during GetColumns()\n\n"); + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),wxGetApp().Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); return; } @@ -2352,9 +2446,9 @@ void CqueryDlg::ProcessCountBtn() if (!dbTable->Open()) { wxString tStr; - tStr = wxT("ODBC error during Open()\n\n"); - tStr += GetExtendedDBErrorMsg(dbTable->GetDb(),__FILE__,__LINE__); - wxMessageBox(tStr,wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + tStr = wxT("ODBC error during Open()\n\n"); + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),wxGetApp().Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); return; } } @@ -2412,6 +2506,456 @@ bool CqueryDlg::ValidateWhereClause() +void DisplayDbDiagnostics(wxDb *pDb) +{ + wxString s, t; + bool comma = FALSE; + + s = langDBINF_DB_NAME; + s += pDb->dbInf.dbmsName; + s += "\n"; + + s += langDBINF_DB_VER; + s += pDb->dbInf.dbmsVer; + s += "\n"; + + s += langDBINF_DRIVER_NAME; + s += pDb->dbInf.driverName; + s += "\n"; + + s += langDBINF_DRIVER_ODBC_VER; + s += pDb->dbInf.odbcVer; + s += "\n"; + + s += langDBINF_DRIVER_MGR_ODBC_VER; + s += pDb->dbInf.drvMgrOdbcVer; + s += "\n"; + + s += langDBINF_DRIVER_VER; + s += pDb->dbInf.driverVer; + s += "\n"; + + s += langDBINF_SERVER_NAME; + s += pDb->dbInf.serverName; + s += "\n"; + + s += langDBINF_FILENAME; + s += pDb->dbInf.databaseName; + s += "\n"; + + s += langDBINF_OUTER_JOINS; + s += pDb->dbInf.outerJoins; + s += "\n"; + + s += langDBINF_STORED_PROC; + s += pDb->dbInf.procedureSupport; + s += "\n"; + + if (pDb->dbInf.maxConnections) + t.sprintf("%s%d\n", langDBINF_MAX_HDBC, pDb->dbInf.maxConnections); + else + t.sprintf("%s%s\n", langDBINF_MAX_HDBC, langDBINF_UNLIMITED); + s += t; + + if (pDb->dbInf.maxStmts) + t.sprintf("%s%d\n", langDBINF_MAX_HSTMT, pDb->dbInf.maxStmts); + else + t.sprintf("%s%s\n", langDBINF_MAX_HSTMT, langDBINF_UNLIMITED); + s += t; + + s += langDBINF_API_LVL; + switch(pDb->dbInf.apiConfLvl) + { + case SQL_OAC_NONE: s += langDBINF_NONE; break; + case SQL_OAC_LEVEL1: s += langDBINF_LEVEL1; break; + case SQL_OAC_LEVEL2: s += langDBINF_LEVEL2; break; + } + s += "\n"; + + s += langDBINF_CLI_LVL; + switch(pDb->dbInf.cliConfLvl) + { + case SQL_OSCC_NOT_COMPLIANT: s += langDBINF_NOT_COMPLIANT; break; + case SQL_OSCC_COMPLIANT: s += langDBINF_COMPLIANT; break; + } + s += "\n"; + + s += langDBINF_SQL_LVL; + switch(pDb->dbInf.sqlConfLvl) + { + case SQL_OSC_MINIMUM: s += langDBINF_MIN_GRAMMAR; break; + case SQL_OSC_CORE: s += langDBINF_CORE_GRAMMAR; break; + case SQL_OSC_EXTENDED: s += langDBINF_EXT_GRAMMAR; break; + } + s += "\n"; + + s += langDBINF_COMMIT_BEHAVIOR; + switch(pDb->dbInf.cursorCommitBehavior) + { + case SQL_CB_DELETE: s += langDBINF_DELETE_CURSORS; break; + case SQL_CB_CLOSE: s += langDBINF_CLOSE_CURSORS; break; + case SQL_CB_PRESERVE: s += langDBINF_PRESERVE_CURSORS; break; + } + s += "\n"; + + s += langDBINF_ROLLBACK_BEHAVIOR; + switch(pDb->dbInf.cursorRollbackBehavior) + { + case SQL_CB_DELETE: s += langDBINF_DELETE_CURSORS; break; + case SQL_CB_CLOSE: s += langDBINF_CLOSE_CURSORS; break; + case SQL_CB_PRESERVE: s += langDBINF_PRESERVE_CURSORS; break; + } + s += "\n"; + + s += langDBINF_SUPP_NOT_NULL; + switch(pDb->dbInf.supportNotNullClause) + { + case SQL_NNC_NULL: s += langNO; break; + case SQL_NNC_NON_NULL: s += langYES; break; + } + s += "\n"; + + s += langDBINF_SUPP_IEF; + s += pDb->dbInf.supportIEF; + s += "\n"; + + // DEFAULT setting for "Transaction Isolation Level" + s += langDBINF_TXN_ISOLATION; + switch(pDb->dbInf.txnIsolation) + { + case SQL_TXN_READ_UNCOMMITTED: s += langDBINF_READ_UNCOMMITTED; break; + case SQL_TXN_READ_COMMITTED: s += langDBINF_READ_COMMITTED; break; + case SQL_TXN_REPEATABLE_READ: s += langDBINF_REPEATABLE_READ; break; + case SQL_TXN_SERIALIZABLE: s += langDBINF_SERIALIZABLE; break; +#ifdef ODBC_V20 + case SQL_TXN_VERSIONING: s += langDBINF_VERSIONING; break; +#endif + } + s += "\n"; + + // CURRENT setting for "Transaction Isolation Level" + long txnIsoLvl; + s += langDBINF_TXN_ISOLATION_CURR; + if (SQLGetConnectOption(pDb->GetHDBC(),SQL_TXN_ISOLATION,&txnIsoLvl) == SQL_SUCCESS) + { + switch(txnIsoLvl) + { + case SQL_TXN_READ_UNCOMMITTED: s += langDBINF_READ_UNCOMMITTED; break; + case SQL_TXN_READ_COMMITTED: s += langDBINF_READ_COMMITTED; break; + case SQL_TXN_REPEATABLE_READ: s += langDBINF_REPEATABLE_READ; break; + case SQL_TXN_SERIALIZABLE: s += langDBINF_SERIALIZABLE; break; +#ifdef ODBC_V20 + case SQL_TXN_VERSIONING: s += langDBINF_VERSIONING; break; +#endif + } + } + s += "\n"; + + comma = FALSE; + s += langDBINF_TXN_ISOLATION_OPTS; + if (pDb->dbInf.txnIsolationOptions & SQL_TXN_READ_UNCOMMITTED) + {s += langDBINF_READ_UNCOMMITTED; comma++;} + if (pDb->dbInf.txnIsolationOptions & SQL_TXN_READ_COMMITTED) + {if (comma++) s += ", "; s += langDBINF_READ_COMMITTED;} + if (pDb->dbInf.txnIsolationOptions & SQL_TXN_REPEATABLE_READ) + {if (comma++) s += ", "; s += langDBINF_REPEATABLE_READ;} + if (pDb->dbInf.txnIsolationOptions & SQL_TXN_SERIALIZABLE) + {if (comma++) s += ", "; s += langDBINF_SERIALIZABLE;} +#ifdef ODBC_V20 + if (pDb->dbInf.txnIsolationOptions & SQL_TXN_VERSIONING) + {if (comma++) s += ", "; s += langDBINF_VERSIONING;} +#endif + s += "\n"; + + comma = FALSE; + s += langDBINF_FETCH_DIRS; + if (pDb->dbInf.fetchDirections & SQL_FD_FETCH_NEXT) + {s += langDBINF_NEXT; comma++;} + if (pDb->dbInf.fetchDirections & SQL_FD_FETCH_PRIOR) + {if (comma++) s += ", "; s += langDBINF_PREV;} + if (pDb->dbInf.fetchDirections & SQL_FD_FETCH_FIRST) + {if (comma++) s += ", "; s += langDBINF_FIRST;} + if (pDb->dbInf.fetchDirections & SQL_FD_FETCH_LAST) + {if (comma++) s += ", "; s += langDBINF_LAST;} + if (pDb->dbInf.fetchDirections & SQL_FD_FETCH_ABSOLUTE) + {if (comma++) s += ", "; s += langDBINF_ABSOLUTE;} + if (pDb->dbInf.fetchDirections & SQL_FD_FETCH_RELATIVE) + {if (comma++) s += ", "; s += langDBINF_RELATIVE;} +#ifdef ODBC_V20 + if (pDb->dbInf.fetchDirections & SQL_FD_FETCH_RESUME) + {if (comma++) s += ", "; s += langDBINF_RESUME;} +#endif + if (pDb->dbInf.fetchDirections & SQL_FD_FETCH_BOOKMARK) + {if (comma++) s += ", "; s += langDBINF_BOOKMARK;} + s += "\n"; + + comma = FALSE; + s += langDBINF_LOCK_TYPES; + if (pDb->dbInf.lockTypes & SQL_LCK_NO_CHANGE) + {s += langDBINF_NO_CHANGE; comma++;} + if (pDb->dbInf.lockTypes & SQL_LCK_EXCLUSIVE) + {if (comma++) s += ", "; s += langDBINF_EXCLUSIVE;} + if (pDb->dbInf.lockTypes & SQL_LCK_UNLOCK) + {if (comma++) s += ", "; s += langDBINF_UNLOCK;} + s += "\n"; + + comma = FALSE; + s += langDBINF_POS_OPERS; + if (pDb->dbInf.posOperations & SQL_POS_POSITION) + {s += langDBINF_POSITION; comma++;} + if (pDb->dbInf.posOperations & SQL_POS_REFRESH) + {if (comma++) s += ", "; s += langDBINF_REFRESH;} + if (pDb->dbInf.posOperations & SQL_POS_UPDATE) + {if (comma++) s += ", "; s += langDBINF_UPD;} + if (pDb->dbInf.posOperations & SQL_POS_DELETE) + {if (comma++) s += ", "; s += langDBINF_DEL;} + if (pDb->dbInf.posOperations & SQL_POS_ADD) + {if (comma++) s += ", "; s += langDBINF_ADD;} + s += "\n"; + + comma = FALSE; + s += langDBINF_POS_STMTS; + if (pDb->dbInf.posStmts & SQL_PS_POSITIONED_DELETE) + {s += langDBINF_POS_DEL; comma++;} + if (pDb->dbInf.posStmts & SQL_PS_POSITIONED_UPDATE) + {if (comma++) s += ", "; s += langDBINF_POS_UPD;} + if (pDb->dbInf.posStmts & SQL_PS_SELECT_FOR_UPDATE) + {if (comma++) s += ", "; s += langDBINF_SELECT_FOR_UPD;} + s += "\n"; + + comma = FALSE; + s += langDBINF_SCROLL_CONCURR; + if (pDb->dbInf.scrollConcurrency & SQL_SCCO_READ_ONLY) + {s += langDBINF_READ_ONLY; comma++;} + if (pDb->dbInf.scrollConcurrency & SQL_SCCO_LOCK) + {if (comma++) s += ", "; s += langDBINF_LOCK;} + if (pDb->dbInf.scrollConcurrency & SQL_SCCO_OPT_ROWVER) + {if (comma++) s += ", "; s += langDBINF_OPT_ROWVER;} + if (pDb->dbInf.scrollConcurrency & SQL_SCCO_OPT_VALUES) + {if (comma++) s += ", "; s += langDBINF_OPT_VALUES;} + s += "\n"; + + comma = FALSE; + s += langDBINF_SCROLL_OPTS; + if (pDb->dbInf.scrollOptions & SQL_SO_FORWARD_ONLY) + {s += langDBINF_FWD_ONLY; comma++;} + if (pDb->dbInf.scrollOptions & SQL_SO_STATIC) + {if (comma++) s += ", "; s += langDBINF_STATIC;} + if (pDb->dbInf.scrollOptions & SQL_SO_KEYSET_DRIVEN) + {if (comma++) s += ", "; s += langDBINF_KEYSET_DRIVEN;} + if (pDb->dbInf.scrollOptions & SQL_SO_DYNAMIC) + {if (comma++) s += ", "; s += langDBINF_DYNAMIC;} + if (pDb->dbInf.scrollOptions & SQL_SO_MIXED) + {if (comma++) s += ", "; s += langDBINF_MIXED;} + s += "\n"; + + comma = FALSE; + s += langDBINF_STATIC_SENS; + if (pDb->dbInf.staticSensitivity & SQL_SS_ADDITIONS) + {s += langDBINF_ADDITIONS; comma++;} + if (pDb->dbInf.staticSensitivity & SQL_SS_DELETIONS) + {if (comma++) s += ", "; s += langDBINF_DELETIONS;} + if (pDb->dbInf.staticSensitivity & SQL_SS_UPDATES) + {if (comma++) s += ", "; s += langDBINF_UPDATES;} + s += "\n"; + + + s += langDBINF_TXN_CAPABLE; + switch(pDb->dbInf.txnCapable) + { + case SQL_TC_NONE: s += langNO; break; + case SQL_TC_DML: s += langDBINF_DML_ONLY; break; + case SQL_TC_DDL_COMMIT: s += langDBINF_DDL_COMMIT; break; + case SQL_TC_DDL_IGNORE: s += langDBINF_DDL_IGNORE; break; + case SQL_TC_ALL: s += langDBINF_DDL_AND_DML; break; + } + s += "\n"; + + t.sprintf("%s%d\n", langDBINF_LOGIN_TIMEOUT, pDb->dbInf.loginTimeout); + s += t; + + // Oracle specific information + if (pDb->Dbms() == dbmsORACLE) + { + s += "\n"; + s += langDBINF_ORACLE_BANNER; + s += "\n"; + + // Oracle cache hit ratio + SDWORD cb; + ULONG dbBlockGets; + pDb->ExecSql("SELECT VALUE FROM V$SYSSTAT WHERE NAME = 'db block gets'"); + pDb->GetNext(); + if (pDb->GetData(1, SQL_C_ULONG, &dbBlockGets, 0, &cb)) + { + t.sprintf("%s: %lu\n", langDBINF_DB_BLOCK_GETS, dbBlockGets); + s += t; + } + + ULONG consistentGets; + pDb->ExecSql("SELECT VALUE FROM V$SYSSTAT WHERE NAME = 'consistent gets'"); + pDb->GetNext(); + if (pDb->GetData(1, SQL_C_ULONG, &consistentGets, 0, &cb)) + { + t.sprintf("%s: %lu\n", langDBINF_CONSISTENT_GETS, consistentGets); + s += t; + } + + ULONG physReads; + pDb->ExecSql("SELECT VALUE FROM V$SYSSTAT WHERE NAME = 'physical reads'"); + pDb->GetNext(); + if (pDb->GetData(1, SQL_C_ULONG, &physReads, 0, &cb)) + { + t.sprintf("%s: %lu\n", langDBINF_PHYSICAL_READS, physReads); + s += t; + } + + ULONG hitRatio = (ULONG)((1.00 - ((float)physReads / (float)(dbBlockGets + consistentGets))) * 100.00); + t.sprintf("*** %s: %lu%%\n", langDBINF_CACHE_HIT_RATIO, hitRatio); + s += t; + + // Tablespace information + s += "\n"; + s += langDBINF_TABLESPACE_IO; + s += "\n"; + ULONG physWrites; + char tablespaceName[257]; + pDb->ExecSql("SELECT NAME,PHYRDS,PHYWRTS FROM V$DATAFILE, V$FILESTAT WHERE V$DATAFILE.FILE# = V$FILESTAT.FILE#"); + while (pDb->GetNext()) + { + pDb->GetData(1, SQL_C_CHAR, tablespaceName, 257, &cb); + pDb->GetData(2, SQL_C_ULONG, &physReads, 0, &cb); + pDb->GetData(3, SQL_C_ULONG, &physWrites, 0, &cb); + t.sprintf("%s\n\t%s: %lu\t%s: %lu\n", tablespaceName, + langDBINF_PHYSICAL_READS, physReads, langDBINF_PHYSICAL_WRITES, physWrites); + s += t; + } + + s += "\n"; + } + + wxLogMessage(s); + +} // DisplayDbDiagnostics() + +#if wxUSE_NEW_GRID + +BEGIN_EVENT_TABLE(DbGridFrame, wxFrame) + // EVT_CLOSE(DbGridFrame::OnCloseWindow) +END_EVENT_TABLE() + + +DbGridFrame::DbGridFrame(wxWindow *parent) + : wxFrame (parent, -1, wxT("Database Table"), + wxDefaultPosition, wxSize(400, 325)) +{ + initialized = FALSE; +} + + +void DbGridFrame::OnCloseWindow(wxCloseEvent& event) +{ + this->Destroy(); +} + + +bool DbGridFrame::Initialize() +{ + wxGrid *grid = new wxGrid(this, -1, wxDefaultPosition); + + grid->RegisterDataType(wxGRID_VALUE_DATETIME, + new wxGridCellDateTimeRenderer(_T("%d %b %Y")), + new wxGridCellTextEditor); +#ifdef CHOICEINT + grid->RegisterDataType(wxGRID_VALUE_CHOICEINT, + new wxGridCellEnumRenderer, + new wxGridCellEnumEditor); + + wxString NativeLangChoice( wxString::Format("%s:%s,%s,%s,%s,%s",wxGRID_VALUE_CHOICEINT, + wxT("English"), + wxT("French"), + wxT("German"), + wxT("Spanish"), + wxT("Other") )); +#endif + + // Columns must match the sequence specified in SetColDef() calls + wxDbGridColInfo* cols = + new wxDbGridColInfo( 0,wxGRID_VALUE_STRING,wxT("Name"), + new wxDbGridColInfo( 1,wxGRID_VALUE_STRING,wxT("Address 1"), + new wxDbGridColInfo( 2,wxGRID_VALUE_STRING,wxT("Address 2"), + new wxDbGridColInfo( 3,wxGRID_VALUE_STRING,wxT("City"), + new wxDbGridColInfo( 4,wxGRID_VALUE_STRING,wxT("State"), + new wxDbGridColInfo( 5,wxGRID_VALUE_STRING,wxT("PostCode"), + new wxDbGridColInfo( 6,wxGRID_VALUE_STRING,wxT("Country"), + new wxDbGridColInfo( 7,wxGRID_VALUE_DBAUTO,wxT("Join Date"), + new wxDbGridColInfo( 8,wxGRID_VALUE_BOOL, wxT("Developer"), + new wxDbGridColInfo( 9,wxGRID_VALUE_NUMBER,wxT("Contributions"), + new wxDbGridColInfo(10,wxGRID_VALUE_NUMBER,wxT("Lines Of Code"), +#ifdef CHOICEINT + new wxDbGridColInfo(11,NativeLangChoice, wxT("Native Language"),NULL)))))))))))); +#else + new wxDbGridColInfo(11,wxGRID_VALUE_NUMBER,wxT("Native Language"),NULL)))))))))))); +#endif + + Ccontact *Contact = new Ccontact(); + //wxGetApp().Contact + + if (!Contact) + { + wxMessageBox(wxT("Unable to instantiate an instance of Ccontact"), wxT("Error..."), wxOK | wxICON_EXCLAMATION); + return FALSE; + } + + if (!Contact->Open()) + { + if (Contact->GetDb()->TableExists(CONTACT_TABLE_NAME, Contact->GetDb()->GetUsername(), + wxGetApp().DbConnectInf->GetDefaultDir())) + { + wxString tStr; + tStr.Printf(wxT("Unable to open the table '%s'.\n\n"),CONTACT_TABLE_NAME); + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),wxGetApp().Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + } + + return FALSE; + } + + // Execute the following query using the cursor designated + // for full table query + Contact->SetRowMode(wxDbTable::WX_ROW_MODE_QUERY); + + if (!Contact->Query()) + { + wxString tStr; + tStr = wxT("ODBC error during Query()\n\n"); + wxMessageBox(wxDbLogExtendedErrorMsg(tStr.c_str(),wxGetApp().Contact->GetDb(),__FILE__,__LINE__), + wxT("ODBC Error..."),wxOK | wxICON_EXCLAMATION); + return FALSE; + } + + // No data has been read in from the database yet, so + // we need to initialize the data members to valid values + // so Fit() can correctly size the grid + Contact->Initialize(); + + wxDbGridTableBase* db = new wxDbGridTableBase(Contact, cols, wxUSE_QUERY, TRUE); + + delete cols; + + grid->SetTable(db,TRUE); + grid->SetMargins(0, 0); + + grid->Fit(); + wxSize size = grid->GetSize(); + size.x += 10; + size.y += 10; + SetClientSize(size); + initialized = TRUE; + return TRUE; +} // DbGridFrame::Initialize() + +#endif // #if wxUSE_NEW_GRID /* TEST CODE FOR TESTING THE wxDbCreateDataSource() FUNCTION