[wxWidgets.git] / demos / dbbrowse / doc.cpp

//---------------------------------------------------------------------------
// Name:        Doc.cpp
// Purpose:     Holds information for DBBrowser
// Author:      Mark Johnson, mj10777@gmx.net
// Modified by: 19990808.mj10777
// BJO        : Bart A.M. JOURQUIN
// Created:     19990808
// Copyright:   (c) Mark Johnson
// Licence:     wxWindows license
// RCS-ID:      $Id$
//---------------------------------------------------------------------------
//-- all #ifdefs that the whole Project needs. ------------------------------
//---------------------------------------------------------------------------
#ifdef __GNUG__
#pragma implementation
#pragma interface
#endif
//---------------------------------------------------------------------------
// For compilers that support precompilation, includes "wx/wx.h".
#include "wx/wxprec.h"
//---------------------------------------------------------------------------
#ifdef __BORLANDC__
#pragma hdrstop
#endif
//---------------------------------------------------------------------------
#ifndef WX_PRECOMP
#include "wx/wx.h"
#endif
//---------------------------------------------------------------------------
//---------------------------------------------------------------------------
//-- all #includes that every .cpp needs             ----19990807.mj10777 ---
//---------------------------------------------------------------------------
#include "std.h"       // sorgsam Pflegen !
//---------------------------------------------------------------------------
//-- Some Global Vars for all Files (extern in ?.h needed) -----------------
// Global structure for holding ODBC connection information
struct DbStuff DbConnectInf;
//---------------------------------------------------------------------------
wxConfigBase   *p_ProgramCfg;       // All Config and Path information
wxLogTextCtrl  *p_LogBook;          // All Log messages
wxString        LogBuf;             // String for all Logs
//---------------------------------------------------------------------------
mjDoc::mjDoc()
{
  db_Br          = NULL;
  p_DSN          = NULL;
  i_DSN          = 0;
  p_Splitter     = NULL;
  p_MainFrame    = NULL;
  p_PgmCtrl      = NULL;               // Is not active
  p_DBTree       = NULL;
  p_DBGrid       = NULL;
  p_LogWin       = NULL;
  p_TabArea      = NULL;
  p_PageArea     = NULL;
  i_TabNr        = 0;
  i_PageNr       = 0;
}
//---------------------------------------------------------------------------
mjDoc::~mjDoc()
{
  // ----------------------------------------------------------
  // -E-> The Tree Controls take to long to close : Why ??
  // ----------------------------------------------------------
  // wxMessageBox("-I-> end Doc");
  p_TabArea->Show(FALSE);    // Deactivate the Window
  p_PageArea->Show(FALSE);    // Deactivate the Window
  p_PgmCtrl = NULL;
  delete p_PgmCtrl;
  delete [] p_DSN;
  delete p_DBTree;
  p_TabArea  = NULL; delete p_TabArea;
  p_PageArea = NULL; delete p_PageArea;
  p_Splitter = NULL;
  delete p_Splitter;
  delete [] db_Br;
  //  wxMessageBox("~mjDoc");
}
//---------------------------------------------------------------------------
bool mjDoc::OnNewDocument()
{
  //-------------------------------------------------------------------
  if (!OnInitView())
    {
    return FALSE;
    }
  p_PgmCtrl->OnPopulate();
  //-------------------------------------------------------------------
  return TRUE;
}
//---------------------------------------------------------------------------
bool mjDoc::OnInitView()
{
  Sash = p_ProgramCfg->Read("/MainFrame/Sash", 200);
  // wxMessageBox("OnInitView() - Begin ","-I->mjDoc::OnInitView");
  //--------------------------------------------------------------------------
  // create "workplace" window
  //--------------------------------------------------------------------------
  p_TabArea = new wxTabbedWindow(); // Init the Pointer
  p_TabArea->Create(p_Splitter, -1);
  //--------------------------------------------------------------------------
  p_PgmCtrl = new PgmCtrl(p_TabArea, TREE_CTRL_PGM,wxDefaultPosition, wxDefaultSize,
			  wxTR_HAS_BUTTONS | wxSUNKEN_BORDER);
  p_PgmCtrl->i_TabArt = 0; // 0 = Tab ; 1 = Page
  p_PgmCtrl->i_ViewNr = p_TabArea->GetTabCount()-1;
  //--------------------------------------------------------------------------
  wxBitmap *p_FolderClose = new wxBitmap("PgmCtrl"); //, wxBITMAP_TYPE_BMP_RESOURCE); // BJO20000115
  //--------------------------------------------------------------------------
  p_TabArea->AddTab(p_PgmCtrl,"PgmCtrl",p_FolderClose);
  //--------------------------------------------------------------------------
  // now create "output" window
  //--------------------------------------------------------------------------
  p_PageArea = new wxPaggedWindow();  // Init the Pointer
  p_PageArea->Create(p_Splitter, -1);
  //--------------------------------------------------------------------------
  p_LogWin = new wxTextCtrl(p_PageArea,-1,wxEmptyString,
			    wxDefaultPosition, wxDefaultSize,wxTE_MULTILINE );
  //wxFont* ft_Temp = new wxFont(10,wxSWISS,wxNORMAL,wxBOLD,FALSE,"Comic Sans MS");
  wxFont* ft_Temp = new wxFont(wxSystemSettings::GetSystemFont(wxSYS_SYSTEM_FONT));
  p_LogWin->SetFont(* ft_Temp);
  // Don't forget ! This is always : i_TabArt = 0 ; i_ViewNr = 1;
  //------------------------------------------------------------------
  p_LogBook = new wxLogTextCtrl(p_LogWin); // make p_LogWin the LogBook
  p_LogBook->SetActiveTarget(p_LogBook);
  p_LogBook->SetTimestamp( NULL );
  //------------------------------------------------------------------
  p_PageArea->AddTab(p_LogWin,_("LogBook"), "what is this?" );
  i_TabNr  = p_TabArea->GetTabCount()-1;  // Add one when a new AddTab is done;
  i_PageNr = p_PageArea->GetTabCount()-1; // Add one when a new AddTab is done;
  //--------------------------------------------------------------------------
  p_PgmCtrl->pDoc = this;
  p_TabArea->SetActiveTab(i_PageNr);
  //--------------------------------------------------------------------------
  p_Splitter->Initialize(p_TabArea);
  p_Splitter->SplitHorizontally(p_TabArea,p_PageArea,Sash);
  //--------------------------------------------------------------------------
  
  if (!OnInitODBC())
    return FALSE;
  //--------------------------------------------------------------------------
  Temp0.Printf("-I-> mjDoc::OnInitView() - End - %d DSN's found",i_DSN);
  p_MainFrame->SetStatusText(Temp0, 0);
  wxLogMessage(Temp0);
  return TRUE;
}
//----------------------------------------------------------------------------------------
bool mjDoc::OnInitODBC()
{
  char Dsn[SQL_MAX_DSN_LENGTH + 1];
  char DsDesc[255]; // BJO20002501 instead of 512
  Temp0 = "";
  i_DSN = 0;       // Counter
  int i = 0;
  //---------------------------------------------------------------------------
  // Initialize the ODBC Environment for Database Operations
  
  if (SQLAllocEnv(&DbConnectInf.Henv) != SQL_SUCCESS)
    {
      return FALSE;
    }
  //---------------------------------------------------------------------------
  
  const char sep = 3; // separator character used in string between DSN ans DsDesc
  wxStringList s_SortDSNList, s_SortDsDescList;
  // BJO-20000127
  // In order to have same sort result on both Dsn and DsDesc, create a 'keyed' string.
  // The key will be removed after sorting
  wxString KeyString;
  //---------------------------------------------------------------------------
  while(GetDataSource(DbConnectInf.Henv, Dsn, sizeof(Dsn), DsDesc, sizeof(DsDesc)))
    {
      i_DSN++;   // How many Dsn have we ?
      KeyString.Printf("%s%c%s",Dsn, sep, DsDesc);
      s_SortDSNList.Add(Dsn);
      s_SortDsDescList.Add(KeyString);
    }
  s_SortDSNList.Sort();     //BJO
  s_SortDsDescList.Sort();  //BJO
  
  char ** s_SortDSN = s_SortDSNList.ListToArray();        //BJO
  char ** s_SortDsDesc = s_SortDsDescList.ListToArray();  //BJO
  //---------------------------------------------------------------------------
  // Allocate n ODBC-DSN objects to hold the information
  p_DSN = new DSN[i_DSN];  //BJO
  for (i=0;i<i_DSN;i++)
    {
      KeyString = s_SortDsDesc[i];
      KeyString = KeyString.AfterFirst(sep);
      strcpy(s_SortDsDesc[i],KeyString.c_str());
      (p_DSN+i)->Dsn = s_SortDSN[i];
      (p_DSN+i)->Drv = s_SortDsDesc[i];
      (p_DSN+i)->Usr = "";
      (p_DSN+i)->Pas = "";
      Temp0.Printf("%02d) Dsn(%s) DsDesc(%s)",i,(p_DSN+i)->Dsn.c_str(),(p_DSN+i)->Drv.c_str());
      wxLogMessage(Temp0);
    }
  i = 0;
  //---------------------------------------------------------------------------
  // Allocate n wxDatabase objects to hold the column information
  db_Br = new BrowserDB[i_DSN];
  for (i=0;i<i_DSN;i++)
    {
      (db_Br+i)->p_LogWindow = p_LogWin;
      (db_Br+i)->ODBCSource  = (p_DSN+i)->Dsn;
      (db_Br+i)->UserName    = (p_DSN+i)->Usr;
      (db_Br+i)->Password    = (p_DSN+i)->Pas;
      (db_Br+i)->pDoc        = this;
      (db_Br+i)->i_Which     = i;
    }
  
  if (SQLFreeEnv(&DbConnectInf.Henv) != SQL_SUCCESS) // BJO20000125
    {
      // Error freeing environment handle
    }
  
  delete [] s_SortDSN;
  delete [] s_SortDsDesc;
  
  //---------------------------------------------------------------------------
  if (!i_DSN)
    {
      wxMessageBox(_("No Dataset names found in ODBC!\n" \
		     "            Program will exit!\n\n" \
		     "                       Ciao"),"-E-> Fatal situation");
      return FALSE;
    }
  //---------------------------------------------------------------------------
  return TRUE;
}
//----------------------------------------------------------------------------------------
bool mjDoc::OnChosenDSN(int Which)
{
  // wxLogMessage("OnChosenDSN(%d) - Begin",Which);
  //---------------------------------------------------------------------------
  if (p_DBTree != NULL)
    {
      p_TabArea->Show(FALSE);    // Deactivate the Window
      p_TabArea->RemoveTab(p_DBTree->i_ViewNr);
      p_TabArea->Show(TRUE);     // Activate the Window
      OnChosenTbl(77,"");
    }
  //-------------------------
  p_TabArea->Show(FALSE);    // Deactivate the Window
  p_DBTree = new DBTree(p_TabArea, TREE_CTRL_DB,wxDefaultPosition, wxDefaultSize,
			wxTR_HAS_BUTTONS | wxSUNKEN_BORDER);
  p_TabArea->AddTab(p_DBTree,(p_DSN+Which)->Dsn," ? ");
  p_DBTree->i_ViewNr = p_TabArea->GetTabCount()-1;
  p_TabArea->Show(TRUE);    // Deactivate the Window
  p_DBTree->i_Which  = Which;
  p_DBTree->s_DSN    = (p_DSN+Which)->Dsn;
  p_DBTree->i_TabArt = 0;
  p_DBTree->pDoc     = this;
  p_DBTree->OnPopulate();
  p_TabArea->SetActiveTab(p_DBTree->i_ViewNr);
  //---------------------------------------------------------------------------
  // wxLogMessage("OnChosenDSN(%d) - End",Which);
  return TRUE;
}
//----------------------------------------------------------------------------------------
bool mjDoc::OnChosenTbl(int Tab,wxString Table)
{
  // wxLogMessage("OnChosenTbl(%d,%s)",Tab,Table.c_str());
  //-------------------------
  if (p_DBGrid != NULL)
    {
      if (p_DBGrid->i_TabArt == 0)
	{
	  p_TabArea->Show(FALSE);    // Deactivate the Window
	  p_TabArea->RemoveTab(p_DBGrid->i_ViewNr);
	  p_TabArea->Show(TRUE);     // Activate the Window
	}
      if (p_DBGrid->i_TabArt == 1)
	{
	  p_PageArea->Show(FALSE);   // Deactivate the Window
	  p_PageArea->RemoveTab(p_DBGrid->i_ViewNr);
	  p_PageArea->Show(TRUE);    // Activate the Window
	}
      p_DBGrid = NULL;
      delete p_DBGrid;
    }
  if (Tab == 77)               // Delete only
    return TRUE;
  //-------------------------
  if (Tab == 0)  // Tabview
    {
      p_TabArea->Show(FALSE);    // Deactivate the Window
      p_DBGrid = new DBGrid(p_TabArea,GRID_CTRL_DB,wxDefaultPosition, wxDefaultSize,
			    wxSUNKEN_BORDER);
      p_TabArea->AddTab(p_DBGrid, Table, "");
      p_DBGrid->i_ViewNr = p_TabArea->GetTabCount()-1;
      p_DBGrid->pDoc       = this;
      p_DBGrid->db_Br      = db_Br;
      p_DBGrid->OnTableView(Table);
      p_TabArea->SetActiveTab(p_DBGrid->i_ViewNr);
      p_TabArea->Show(TRUE);     // Activate the Window
    }
  if (Tab == 1)  // Pageview
    {
      p_PageArea->Show(FALSE);   // Deactivate the Window
      p_DBGrid = new DBGrid(p_PageArea,GRID_CTRL_DB,wxDefaultPosition, wxDefaultSize,
			    wxSUNKEN_BORDER);
      p_PageArea->AddTab(p_DBGrid, Table, "");
      p_DBGrid->i_ViewNr = p_PageArea->GetTabCount()-1;
      p_DBGrid->pDoc       = this;
      p_DBGrid->db_Br      = db_Br;
      p_DBGrid->i_Which    = p_DBTree->i_Which;
      p_PageArea->Show(TRUE);    // Activate the Window
      p_DBGrid->OnTableView(Table);
      p_PageArea->SetActiveTab(p_DBGrid->i_ViewNr);
    }
  p_DBGrid->i_TabArt = Tab;
  //---*----------------------
  return TRUE;;
}
//----------------------------------------------------------------------------------------
void mjDoc::OnLeer(wxString Aufrufer)
{
Commit	Line	Data
b5ffecfc GT	1	//---------------------------------------------------------------------------
	2	// Name: Doc.cpp
	3	// Purpose: Holds information for DBBrowser
	4	// Author: Mark Johnson, mj10777@gmx.net
	5	// Modified by: 19990808.mj10777
	6	// BJO : Bart A.M. JOURQUIN
	7	// Created: 19990808
	8	// Copyright: (c) Mark Johnson
	9	// Licence: wxWindows license
c09d434d	10	// RCS-ID: $Id$
b5ffecfc GT	11	//---------------------------------------------------------------------------
	12	//-- all #ifdefs that the whole Project needs. ------------------------------
	13	//---------------------------------------------------------------------------
	14	#ifdef __GNUG__
b5ce269b BJ	15	#pragma implementation
b5ce269b BJ	16	#pragma interface
b5ffecfc GT	17	#endif
	18	//---------------------------------------------------------------------------
	19	// For compilers that support precompilation, includes "wx/wx.h".
	20	#include "wx/wxprec.h"
	21	//---------------------------------------------------------------------------
	22	#ifdef __BORLANDC__
b5ce269b	23	#pragma hdrstop
b5ffecfc GT	24	#endif
	25	//---------------------------------------------------------------------------
	26	#ifndef WX_PRECOMP
b5ce269b	27	#include "wx/wx.h"
b5ffecfc GT	28	#endif
	29	//---------------------------------------------------------------------------
	30	//---------------------------------------------------------------------------
	31	//-- all #includes that every .cpp needs ----19990807.mj10777 ---
	32	//---------------------------------------------------------------------------
	33	#include "std.h" // sorgsam Pflegen !
	34	//---------------------------------------------------------------------------
	35	//-- Some Global Vars for all Files (extern in ?.h needed) -----------------
	36	// Global structure for holding ODBC connection information
b5ce269b	37	struct DbStuff DbConnectInf;
b5ffecfc GT	38	//---------------------------------------------------------------------------
	39	wxConfigBase *p_ProgramCfg; // All Config and Path information
	40	wxLogTextCtrl *p_LogBook; // All Log messages
	41	wxString LogBuf; // String for all Logs
	42	//---------------------------------------------------------------------------
	43	mjDoc::mjDoc()
	44	{
b5ce269b BJ	45	db_Br = NULL;
	46	p_DSN = NULL;
	47	i_DSN = 0;
	48	p_Splitter = NULL;
	49	p_MainFrame = NULL;
	50	p_PgmCtrl = NULL; // Is not active
	51	p_DBTree = NULL;
	52	p_DBGrid = NULL;
	53	p_LogWin = NULL;
	54	p_TabArea = NULL;
	55	p_PageArea = NULL;
	56	i_TabNr = 0;
	57	i_PageNr = 0;
b5ffecfc GT	58	}
	59	//---------------------------------------------------------------------------
	60	mjDoc::~mjDoc()
	61	{
b5ce269b BJ	62	// ----------------------------------------------------------
	63	// -E-> The Tree Controls take to long to close : Why ??
	64	// ----------------------------------------------------------
	65	// wxMessageBox("-I-> end Doc");
	66	p_TabArea->Show(FALSE); // Deactivate the Window
	67	p_PageArea->Show(FALSE); // Deactivate the Window
	68	p_PgmCtrl = NULL;
	69	delete p_PgmCtrl;
	70	delete [] p_DSN;
	71	delete p_DBTree;
	72	p_TabArea = NULL; delete p_TabArea;
	73	p_PageArea = NULL; delete p_PageArea;
	74	p_Splitter = NULL;
	75	delete p_Splitter;
	76	delete [] db_Br;
	77	// wxMessageBox("~mjDoc");
b5ffecfc GT	78	}
	79	//---------------------------------------------------------------------------
	80	bool mjDoc::OnNewDocument()
	81	{
b5ce269b	82	//-------------------------------------------------------------------
ed6e827e BJ	83	if (!OnInitView())
ed6e827e BJ	84	{
b5ce269b	85	return FALSE;
ed6e827e	86	}
b5ce269b BJ	87	p_PgmCtrl->OnPopulate();
	88	//-------------------------------------------------------------------
	89	return TRUE;
b5ffecfc GT	90	}
	91	//---------------------------------------------------------------------------
	92	bool mjDoc::OnInitView()
	93	{
b5ce269b BJ	94	Sash = p_ProgramCfg->Read("/MainFrame/Sash", 200);
	95	// wxMessageBox("OnInitView() - Begin ","-I->mjDoc::OnInitView");
	96	//--------------------------------------------------------------------------
	97	// create "workplace" window
	98	//--------------------------------------------------------------------------
	99	p_TabArea = new wxTabbedWindow(); // Init the Pointer
	100	p_TabArea->Create(p_Splitter, -1);
	101	//--------------------------------------------------------------------------
	102	p_PgmCtrl = new PgmCtrl(p_TabArea, TREE_CTRL_PGM,wxDefaultPosition, wxDefaultSize,
	103	wxTR_HAS_BUTTONS \| wxSUNKEN_BORDER);
	104	p_PgmCtrl->i_TabArt = 0; // 0 = Tab ; 1 = Page
	105	p_PgmCtrl->i_ViewNr = p_TabArea->GetTabCount()-1;
	106	//--------------------------------------------------------------------------
	107	wxBitmap *p_FolderClose = new wxBitmap("PgmCtrl"); //, wxBITMAP_TYPE_BMP_RESOURCE); // BJO20000115
	108	//--------------------------------------------------------------------------
	109	p_TabArea->AddTab(p_PgmCtrl,"PgmCtrl",p_FolderClose);
	110	//--------------------------------------------------------------------------
	111	// now create "output" window
	112	//--------------------------------------------------------------------------
	113	p_PageArea = new wxPaggedWindow(); // Init the Pointer
	114	p_PageArea->Create(p_Splitter, -1);
	115	//--------------------------------------------------------------------------
	116	p_LogWin = new wxTextCtrl(p_PageArea,-1,wxEmptyString,
	117	wxDefaultPosition, wxDefaultSize,wxTE_MULTILINE );
b3630c4f	118	//wxFont* ft_Temp = new wxFont(10,wxSWISS,wxNORMAL,wxBOLD,FALSE,"Comic Sans MS");
c45a4560 BJ	119	wxFont* ft_Temp = new wxFont(wxSystemSettings::GetSystemFont(wxSYS_SYSTEM_FONT));
c45a4560 BJ	120	p_LogWin->SetFont(* ft_Temp);
b5ce269b BJ	121	// Don't forget ! This is always : i_TabArt = 0 ; i_ViewNr = 1;
	122	//------------------------------------------------------------------
	123	p_LogBook = new wxLogTextCtrl(p_LogWin); // make p_LogWin the LogBook
	124	p_LogBook->SetActiveTarget(p_LogBook);
	125	p_LogBook->SetTimestamp( NULL );
	126	//------------------------------------------------------------------
	127	p_PageArea->AddTab(p_LogWin,_("LogBook"), "what is this?" );
	128	i_TabNr = p_TabArea->GetTabCount()-1; // Add one when a new AddTab is done;
	129	i_PageNr = p_PageArea->GetTabCount()-1; // Add one when a new AddTab is done;
	130	//--------------------------------------------------------------------------
	131	p_PgmCtrl->pDoc = this;
	132	p_TabArea->SetActiveTab(i_PageNr);
	133	//--------------------------------------------------------------------------
	134	p_Splitter->Initialize(p_TabArea);
	135	p_Splitter->SplitHorizontally(p_TabArea,p_PageArea,Sash);
	136	//--------------------------------------------------------------------------
	137
	138	if (!OnInitODBC())
	139	return FALSE;
	140	//--------------------------------------------------------------------------
	141	Temp0.Printf("-I-> mjDoc::OnInitView() - End - %d DSN's found",i_DSN);
	142	p_MainFrame->SetStatusText(Temp0, 0);
	143	wxLogMessage(Temp0);
	144	return TRUE;
b5ffecfc GT	145	}
	146	//----------------------------------------------------------------------------------------
	147	bool mjDoc::OnInitODBC()
	148	{
b5ce269b BJ	149	char Dsn[SQL_MAX_DSN_LENGTH + 1];
	150	char DsDesc[255]; // BJO20002501 instead of 512
	151	Temp0 = "";
	152	i_DSN = 0; // Counter
	153	int i = 0;
	154	//---------------------------------------------------------------------------
	155	// Initialize the ODBC Environment for Database Operations
	156
	157	if (SQLAllocEnv(&DbConnectInf.Henv) != SQL_SUCCESS)
	158	{
	159	return FALSE;
	160	}
	161	//---------------------------------------------------------------------------
	162
	163	const char sep = 3; // separator character used in string between DSN ans DsDesc
	164	wxStringList s_SortDSNList, s_SortDsDescList;
	165	// BJO-20000127
	166	// In order to have same sort result on both Dsn and DsDesc, create a 'keyed' string.
	167	// The key will be removed after sorting
	168	wxString KeyString;
	169	//---------------------------------------------------------------------------
	170	while(GetDataSource(DbConnectInf.Henv, Dsn, sizeof(Dsn), DsDesc, sizeof(DsDesc)))
	171	{
	172	i_DSN++; // How many Dsn have we ?
	173	KeyString.Printf("%s%c%s",Dsn, sep, DsDesc);
	174	s_SortDSNList.Add(Dsn);
	175	s_SortDsDescList.Add(KeyString);
	176	}
	177	s_SortDSNList.Sort(); //BJO
	178	s_SortDsDescList.Sort(); //BJO
	179
	180	char ** s_SortDSN = s_SortDSNList.ListToArray(); //BJO
	181	char ** s_SortDsDesc = s_SortDsDescList.ListToArray(); //BJO
	182	//---------------------------------------------------------------------------
	183	// Allocate n ODBC-DSN objects to hold the information
	184	p_DSN = new DSN[i_DSN]; //BJO
	185	for (i=0;i<i_DSN;i++)
	186	{
	187	KeyString = s_SortDsDesc[i];
	188	KeyString = KeyString.AfterFirst(sep);
	189	strcpy(s_SortDsDesc[i],KeyString.c_str());
	190	(p_DSN+i)->Dsn = s_SortDSN[i];
	191	(p_DSN+i)->Drv = s_SortDsDesc[i];
	192	(p_DSN+i)->Usr = "";
	193	(p_DSN+i)->Pas = "";
8a89af52	194	Temp0.Printf("%02d) Dsn(%s) DsDesc(%s)",i,(p_DSN+i)->Dsn.c_str(),(p_DSN+i)->Drv.c_str());
b5ce269b BJ	195	wxLogMessage(Temp0);
	196	}
	197	i = 0;
	198	//---------------------------------------------------------------------------
	199	// Allocate n wxDatabase objects to hold the column information
	200	db_Br = new BrowserDB[i_DSN];
	201	for (i=0;i<i_DSN;i++)
	202	{
	203	(db_Br+i)->p_LogWindow = p_LogWin;
	204	(db_Br+i)->ODBCSource = (p_DSN+i)->Dsn;
	205	(db_Br+i)->UserName = (p_DSN+i)->Usr;
	206	(db_Br+i)->Password = (p_DSN+i)->Pas;
	207	(db_Br+i)->pDoc = this;
	208	(db_Br+i)->i_Which = i;
	209	}
	210
	211	if (SQLFreeEnv(&DbConnectInf.Henv) != SQL_SUCCESS) // BJO20000125
	212	{
	213	// Error freeing environment handle
	214	}
	215
	216	delete [] s_SortDSN;
	217	delete [] s_SortDsDesc;
	218
	219	//---------------------------------------------------------------------------
	220	if (!i_DSN)
	221	{
	222	wxMessageBox(_("No Dataset names found in ODBC!\n" \
	223	" Program will exit!\n\n" \
	224	" Ciao"),"-E-> Fatal situation");
	225	return FALSE;
	226	}
	227	//---------------------------------------------------------------------------
	228	return TRUE;
b5ffecfc GT	229	}
	230	//----------------------------------------------------------------------------------------
	231	bool mjDoc::OnChosenDSN(int Which)
	232	{
b5ce269b BJ	233	// wxLogMessage("OnChosenDSN(%d) - Begin",Which);
	234	//---------------------------------------------------------------------------
	235	if (p_DBTree != NULL)
	236	{
	237	p_TabArea->Show(FALSE); // Deactivate the Window
	238	p_TabArea->RemoveTab(p_DBTree->i_ViewNr);
	239	p_TabArea->Show(TRUE); // Activate the Window
	240	OnChosenTbl(77,"");
	241	}
	242	//-------------------------
b5ffecfc	243	p_TabArea->Show(FALSE); // Deactivate the Window
b5ce269b BJ	244	p_DBTree = new DBTree(p_TabArea, TREE_CTRL_DB,wxDefaultPosition, wxDefaultSize,
	245	wxTR_HAS_BUTTONS \| wxSUNKEN_BORDER);
	246	p_TabArea->AddTab(p_DBTree,(p_DSN+Which)->Dsn," ? ");
	247	p_DBTree->i_ViewNr = p_TabArea->GetTabCount()-1;
	248	p_TabArea->Show(TRUE); // Deactivate the Window
	249	p_DBTree->i_Which = Which;
	250	p_DBTree->s_DSN = (p_DSN+Which)->Dsn;
	251	p_DBTree->i_TabArt = 0;
	252	p_DBTree->pDoc = this;
	253	p_DBTree->OnPopulate();
	254	p_TabArea->SetActiveTab(p_DBTree->i_ViewNr);
	255	//---------------------------------------------------------------------------
	256	// wxLogMessage("OnChosenDSN(%d) - End",Which);
	257	return TRUE;
b5ffecfc GT	258	}
	259	//----------------------------------------------------------------------------------------
	260	bool mjDoc::OnChosenTbl(int Tab,wxString Table)
	261	{
b5ce269b BJ	262	// wxLogMessage("OnChosenTbl(%d,%s)",Tab,Table.c_str());
	263	//-------------------------
	264	if (p_DBGrid != NULL)
	265	{
	266	if (p_DBGrid->i_TabArt == 0)
	267	{
	268	p_TabArea->Show(FALSE); // Deactivate the Window
	269	p_TabArea->RemoveTab(p_DBGrid->i_ViewNr);
	270	p_TabArea->Show(TRUE); // Activate the Window
	271	}
	272	if (p_DBGrid->i_TabArt == 1)
	273	{
	274	p_PageArea->Show(FALSE); // Deactivate the Window
	275	p_PageArea->RemoveTab(p_DBGrid->i_ViewNr);
	276	p_PageArea->Show(TRUE); // Activate the Window
	277	}
	278	p_DBGrid = NULL;
	279	delete p_DBGrid;
	280	}
	281	if (Tab == 77) // Delete only
	282	return TRUE;
	283	//-------------------------
	284	if (Tab == 0) // Tabview
	285	{
	286	p_TabArea->Show(FALSE); // Deactivate the Window
	287	p_DBGrid = new DBGrid(p_TabArea,GRID_CTRL_DB,wxDefaultPosition, wxDefaultSize,
	288	wxSUNKEN_BORDER);
	289	p_TabArea->AddTab(p_DBGrid, Table, "");
	290	p_DBGrid->i_ViewNr = p_TabArea->GetTabCount()-1;
	291	p_DBGrid->pDoc = this;
	292	p_DBGrid->db_Br = db_Br;
	293	p_DBGrid->OnTableView(Table);
	294	p_TabArea->SetActiveTab(p_DBGrid->i_ViewNr);
	295	p_TabArea->Show(TRUE); // Activate the Window
	296	}
	297	if (Tab == 1) // Pageview
	298	{
	299	p_PageArea->Show(FALSE); // Deactivate the Window
	300	p_DBGrid = new DBGrid(p_PageArea,GRID_CTRL_DB,wxDefaultPosition, wxDefaultSize,
	301	wxSUNKEN_BORDER);
	302	p_PageArea->AddTab(p_DBGrid, Table, "");
	303	p_DBGrid->i_ViewNr = p_PageArea->GetTabCount()-1;
	304	p_DBGrid->pDoc = this;
	305	p_DBGrid->db_Br = db_Br;
	306	p_DBGrid->i_Which = p_DBTree->i_Which;
	307	p_PageArea->Show(TRUE); // Activate the Window
	308	p_DBGrid->OnTableView(Table);
	309	p_PageArea->SetActiveTab(p_DBGrid->i_ViewNr);
	310	}
	311	p_DBGrid->i_TabArt = Tab;
	312	//---*----------------------
	313	return TRUE;;
b5ffecfc GT	314	}
	315	//----------------------------------------------------------------------------------------
	316	void mjDoc::OnLeer(wxString Aufrufer)
	317	{
b5ce269b BJ	318