1 ///////////////////////////////////////////////////////////////////////////////
3 // Purpose: Displays a wxDbTable in a wxGrid.
4 // Author: Roger Gammans, Paul Gammans
8 // Copyright: (c) 1999 The Computer Surgery (roger@computer-surgery.co.uk)
9 // Licence: wxWindows licence
10 ///////////////////////////////////////////////////////////////////////////////
11 // Branched From : dbgrid.cpp,v 1.18 2000/12/19 13:00:58
12 ///////////////////////////////////////////////////////////////////////////////
15 #pragma implementation "dbgrid.h"
18 #include "wx/wxprec.h"
29 #include "wx/textctrl.h"
33 #include "wx/generic/gridctrl.h"
34 #include "wx/dbgrid.h"
37 wxDbGridCellAttrProvider::wxDbGridCellAttrProvider()
43 wxDbGridCellAttrProvider::wxDbGridCellAttrProvider(wxDbTable
*tab
, wxDbGridColInfoBase
* ColInfo
)
49 wxDbGridCellAttrProvider::~wxDbGridCellAttrProvider()
53 wxGridCellAttr
*wxDbGridCellAttrProvider::GetAttr(int row
, int col
,
54 wxGridCellAttr::wxAttrKind kind
) const
56 wxGridCellAttr
*attr
= wxGridCellAttrProvider::GetAttr(row
,col
,kind
);
58 if (m_data
&& m_ColInfo
&& (m_data
->GetNumberOfColumns() > m_ColInfo
[col
].DbCol
))
60 //FIXME: this test could.
61 // ??::InsertPending == m_data->get_ModifiedStatus()
62 // and if InsertPending use colDef[].InsertAllowed
63 if (!(m_data
->GetColDefs()[(m_ColInfo
[col
].DbCol
)].Updateable
))
67 case (wxGridCellAttr::Any
):
70 attr
= new wxGridCellAttr
;
71 // Store so we don't keep creating / deleting this...
72 wxDbGridCellAttrProvider
* self
= wxConstCast(this, wxDbGridCellAttrProvider
) ;
74 self
->SetColAttr(attr
, col
);
79 //We now must check what we were returned. and do the right thing (tm)
80 wxGridCellAttr::wxAttrKind attrkind
= attr
->GetKind();
81 if ((attrkind
== (wxGridCellAttr::Default
)) || (attrkind
== (wxGridCellAttr::Cell
)) ||
82 (attrkind
== (wxGridCellAttr::Col
)))
84 wxGridCellAttr
*attrtomerge
= attr
;
85 attr
= new wxGridCellAttr
;
86 attr
->SetKind(wxGridCellAttr::Merged
);
87 attr
->MergeWith(attrtomerge
);
89 attrtomerge
->DecRef();
94 case (wxGridCellAttr::Col
):
95 //As we must have a Coll, and were setting Coll attributes
96 // we can based on wxdbTable's so just set RO if attr valid
99 attr
= new wxGridCellAttr
;
100 wxDbGridCellAttrProvider
* self
= wxConstCast(this, wxDbGridCellAttrProvider
) ;
102 self
->SetColAttr(attr
, col
);
108 // wxGridCellAttr::Cell - Not required, will inherit on merge from row.
109 // wxGridCellAttr::Row - If wxDbtable ever supports row locking could add
110 // support to make RO on a row basis also.
111 // wxGridCellAttr::Default - Don't edit this ! or all cell with a attr will become readonly
112 // wxGridCellAttr::Merged - This should never be asked for.
121 void wxDbGridCellAttrProvider::AssignDbTable(wxDbTable
*tab
)
126 wxDbGridTableBase::wxDbGridTableBase(wxDbTable
*tab
, wxDbGridColInfo
* ColInfo
,
127 int count
, bool takeOwnership
) :
130 m_dbowner(takeOwnership
),
134 if (count
== wxUSE_QUERY
)
136 m_rowtotal
= m_data
? m_data
->Count() : 0;
142 // m_keys.Size(m_rowtotal);
146 m_nocols
= ColInfo
->Length();
147 m_ColInfo
= new wxDbGridColInfoBase
[m_nocols
];
149 wxDbGridColInfo
*ptr
= ColInfo
;
151 while (ptr
&& i
< m_nocols
)
153 m_ColInfo
[i
] = ptr
->m_data
;
160 wxLogDebug(wxT("NoCols over length after traversing %i items"),i
);
164 wxLogDebug(wxT("NoCols under length after traversing %i items"),i
);
170 wxDbGridTableBase::~wxDbGridTableBase()
172 wxDbGridCellAttrProvider
*provider
;
174 //Can't check for update here as
176 //FIXME: should i remove m_ColInfo and m_data from m_attrProvider if a wxDbGridAttrProvider
177 // if ((provider = dynamic_cast<wxDbGridCellAttrProvider *>(GetAttrProvider())))
178 // Using C casting for now until we can support dynamic_cast with wxWindows
179 provider
= (wxDbGridCellAttrProvider
*)(GetAttrProvider());
182 provider
->AssignDbTable(NULL
);
193 bool wxDbGridTableBase::CanHaveAttributes()
195 if (!GetAttrProvider())
197 // use the default attr provider by default
198 SetAttrProvider(new wxDbGridCellAttrProvider(m_data
, m_ColInfo
));
204 bool wxDbGridTableBase::AssignDbTable(wxDbTable
*tab
, int count
, bool takeOwnership
)
206 wxDbGridCellAttrProvider
*provider
;
208 //Remove Information from grid about old data
211 wxGrid
*grid
= GetView();
213 grid
->ClearSelection();
214 if (grid
->IsCellEditControlEnabled())
216 grid
->DisableCellEditControl();
218 wxGridTableMessage
msg(this, wxGRIDTABLE_NOTIFY_ROWS_DELETED
,0,m_rowtotal
);
219 grid
->ProcessTableMessage(msg
);
222 //reset our internals...
230 //FIXME: Remove dynamic_cast before sumision to wxwin
231 // if ((provider = dynamic_cast<wxDbGridCellAttrProvider *> (GetAttrProvider())))
232 // Using C casting for now until we can support dynamic_cast with wxWindows
233 provider
= (wxDbGridCellAttrProvider
*)(GetAttrProvider());
236 provider
->AssignDbTable(m_data
);
239 if (count
== wxUSE_QUERY
)
241 m_rowtotal
= m_data
? m_data
->Count() : 0;
249 //Add Information to grid about new data
252 wxGrid
* grid
= GetView();
253 wxGridTableMessage
msg(this, wxGRIDTABLE_NOTIFY_ROWS_APPENDED
, m_rowtotal
);
254 grid
->ProcessTableMessage(msg
);
257 m_dbowner
= takeOwnership
;
258 m_rowmodified
= FALSE
;
262 wxString
wxDbGridTableBase::GetTypeName(int row
, int col
)
264 if (GetNumberCols() > col
)
266 if (m_ColInfo
[col
].wxtypename
== wxGRID_VALUE_DBAUTO
)
268 if (m_data
->GetNumberOfColumns() <= m_ColInfo
[col
].DbCol
)
270 wxFAIL_MSG (_T("You can not use wxGRID_VALUE_DBAUTO for virtual columns"));
272 switch(m_data
->GetColDefs()[(m_ColInfo
[col
].DbCol
)].SqlCtype
)
275 return wxGRID_VALUE_STRING
;
277 return wxGRID_VALUE_NUMBER
;
279 return wxGRID_VALUE_NUMBER
;
281 return wxGRID_VALUE_NUMBER
;
283 return wxGRID_VALUE_NUMBER
;
285 return wxGRID_VALUE_FLOAT
;
287 return wxGRID_VALUE_FLOAT
;
289 return wxGRID_VALUE_DATETIME
;
291 return wxGRID_VALUE_DATETIME
;
292 case SQL_C_TIMESTAMP
:
293 return wxGRID_VALUE_DATETIME
;
295 return wxGRID_VALUE_STRING
;
300 return m_ColInfo
[col
].wxtypename
;
303 wxFAIL_MSG (_T("unknown column"));
307 bool wxDbGridTableBase::CanGetValueAs(int row
, int col
, const wxString
& typeName
)
309 wxLogDebug(wxT("CanGetValueAs() on %i,%i"),row
,col
);
310 //Is this needed? As it will be validated on GetValueAsXXXX
313 if (typeName
== wxGRID_VALUE_STRING
)
315 //FIXME ummm What about blob field etc.
319 if (m_data
->IsColNull(m_ColInfo
[col
].DbCol
))
324 if (m_data
->GetNumberOfColumns() <= m_ColInfo
[col
].DbCol
)
326 //If a virtual column then we can't find it's type. we have to
327 // return FALSE to get using wxVariant.
330 int sqltype
= m_data
->GetColDefs()[(m_ColInfo
[col
].DbCol
)].SqlCtype
;
332 if (typeName
== wxGRID_VALUE_DATETIME
)
334 if ((sqltype
== SQL_C_DATE
) ||
335 (sqltype
== SQL_C_TIME
) ||
336 (sqltype
== SQL_C_TIMESTAMP
))
342 if (typeName
== wxGRID_VALUE_NUMBER
)
344 if ((sqltype
== SQL_C_SSHORT
) ||
345 (sqltype
== SQL_C_USHORT
) ||
346 (sqltype
== SQL_C_SLONG
) ||
347 (sqltype
== SQL_C_ULONG
))
353 if (typeName
== wxGRID_VALUE_FLOAT
)
355 if ((sqltype
== SQL_C_SSHORT
) ||
356 (sqltype
== SQL_C_USHORT
) ||
357 (sqltype
== SQL_C_SLONG
) ||
358 (sqltype
== SQL_C_ULONG
) ||
359 (sqltype
== SQL_C_FLOAT
) ||
360 (sqltype
== SQL_C_DOUBLE
))
369 bool wxDbGridTableBase::CanSetValueAs(int row
, int col
, const wxString
& typeName
)
371 //Is this needed? As will be validated on SetValueAsXXXX
374 if (m_data
->IsColNull(m_ColInfo
[col
].DbCol
))
379 if (typeName
== wxGRID_VALUE_STRING
)
381 //FIXME ummm What about blob field etc.
385 if (!(m_data
->GetColDefs()[(m_ColInfo
[col
].DbCol
)].Updateable
))
390 if (m_data
->GetNumberOfColumns() <= m_ColInfo
[col
].DbCol
)
392 //If a virtual column then we can't find it's type. we have to faulse to
393 //get using wxVairent.
397 int sqltype
= m_data
->GetColDefs()[(m_ColInfo
[col
].DbCol
)].SqlCtype
;
398 if (typeName
== wxGRID_VALUE_DATETIME
)
400 if ((sqltype
== SQL_C_DATE
) ||
401 (sqltype
== SQL_C_TIME
) ||
402 (sqltype
== SQL_C_TIMESTAMP
))
408 if (typeName
== wxGRID_VALUE_NUMBER
)
410 if ((sqltype
== SQL_C_SSHORT
) ||
411 (sqltype
== SQL_C_USHORT
) ||
412 (sqltype
== SQL_C_SLONG
) ||
413 (sqltype
== SQL_C_ULONG
))
419 if (typeName
== wxGRID_VALUE_FLOAT
)
421 if ((sqltype
== SQL_C_SSHORT
) ||
422 (sqltype
== SQL_C_USHORT
) ||
423 (sqltype
== SQL_C_SLONG
) ||
424 (sqltype
== SQL_C_ULONG
) ||
425 (sqltype
== SQL_C_FLOAT
) ||
426 (sqltype
== SQL_C_DOUBLE
))
435 long wxDbGridTableBase::GetValueAsLong(int row
, int col
)
439 if (m_data
->GetNumberOfColumns() <= m_ColInfo
[col
].DbCol
)
441 wxFAIL_MSG (_T("You can not use GetValueAsLong for virtual columns"));
444 int sqltype
= m_data
->GetColDefs()[(m_ColInfo
[col
].DbCol
)].SqlCtype
;
445 if ((sqltype
== SQL_C_SSHORT
) ||
446 (sqltype
== SQL_C_USHORT
) ||
447 (sqltype
== SQL_C_SLONG
) ||
448 (sqltype
== SQL_C_ULONG
))
450 wxVariant val
= m_data
->GetCol(m_ColInfo
[col
].DbCol
);
451 return val
.GetLong();
453 wxFAIL_MSG (_T("unknown column, "));
457 double wxDbGridTableBase::GetValueAsDouble(int row
, int col
)
459 wxLogDebug(wxT("GetValueAsDouble() on %i,%i"),row
,col
);
462 if (m_data
->GetNumberOfColumns() <= m_ColInfo
[col
].DbCol
)
464 wxFAIL_MSG (_T("You can not use GetValueAsDouble for virtual columns"));
467 int sqltype
= m_data
->GetColDefs()[(m_ColInfo
[col
].DbCol
)].SqlCtype
;
468 if ((sqltype
== SQL_C_SSHORT
) ||
469 (sqltype
== SQL_C_USHORT
) ||
470 (sqltype
== SQL_C_SLONG
) ||
471 (sqltype
== SQL_C_ULONG
) ||
472 (sqltype
== SQL_C_FLOAT
) ||
473 (sqltype
== SQL_C_DOUBLE
))
475 wxVariant val
= m_data
->GetCol(m_ColInfo
[col
].DbCol
);
476 return val
.GetDouble();
478 wxFAIL_MSG (_T("unknown column"));
482 bool wxDbGridTableBase::GetValueAsBool(int row
, int col
)
484 wxLogDebug(wxT("GetValueAsBool() on %i,%i"),row
,col
);
487 if (m_data
->GetNumberOfColumns() <= m_ColInfo
[col
].DbCol
)
489 wxFAIL_MSG (_T("You can not use GetValueAsBool for virtual columns"));
492 int sqltype
= m_data
->GetColDefs()[(m_ColInfo
[col
].DbCol
)].SqlCtype
;
493 if ((sqltype
== SQL_C_SSHORT
) ||
494 (sqltype
== SQL_C_USHORT
) ||
495 (sqltype
== SQL_C_SLONG
) ||
496 (sqltype
== SQL_C_ULONG
))
498 wxVariant val
= m_data
->GetCol(m_ColInfo
[col
].DbCol
);
499 return val
.GetBool();
501 wxFAIL_MSG (_T("unknown column, "));
505 void* wxDbGridTableBase::GetValueAsCustom(int row
, int col
, const wxString
& typeName
)
507 wxLogDebug(wxT("GetValueAsCustom() on %i,%i"),row
,col
);
510 if (m_data
->GetNumberOfColumns() <= m_ColInfo
[col
].DbCol
)
512 wxFAIL_MSG (_T("You can not use GetValueAsCustom for virtual columns"));
515 if (m_data
->IsColNull(m_ColInfo
[col
].DbCol
))
518 if (typeName
== wxGRID_VALUE_DATETIME
)
520 wxDbColDef
*pColDefs
= m_data
->GetColDefs();
521 int sqltype
= pColDefs
[(m_ColInfo
[col
].DbCol
)].SqlCtype
;
523 if ((sqltype
== SQL_C_DATE
) ||
524 (sqltype
== SQL_C_TIME
) ||
525 (sqltype
== SQL_C_TIMESTAMP
))
527 wxVariant val
= m_data
->GetCol(m_ColInfo
[col
].DbCol
);
528 return new wxDateTime(val
.GetDateTime());
531 wxFAIL_MSG (_T("unknown column data type "));
536 void wxDbGridTableBase::SetValueAsCustom(int row
, int col
, const wxString
& typeName
, void* value
)
538 wxLogDebug(wxT("SetValueAsCustom() on %i,%i"),row
,col
);
541 if (m_data
->GetNumberOfColumns() <= m_ColInfo
[col
].DbCol
)
543 wxFAIL_MSG (_T("You can not use SetValueAsCustom for virtual columns"));
547 if (typeName
== wxGRID_VALUE_DATETIME
)
549 int sqltype
= m_data
->GetColDefs()[(m_ColInfo
[col
].DbCol
)].SqlCtype
;
550 if ((sqltype
== SQL_C_DATE
) ||
551 (sqltype
== SQL_C_TIME
) ||
552 (sqltype
== SQL_C_TIMESTAMP
))
554 //FIXME: you can't dynamic_cast from (void *)
555 //wxDateTime *date = wxDynamicCast(value, wxDateTime);
556 wxDateTime
*date
= (wxDateTime
*)value
;
559 wxFAIL_MSG (_T("Failed to convert data"));
563 m_rowmodified
= TRUE
;
564 m_data
->SetCol(m_ColInfo
[col
].DbCol
,val
);
567 wxFAIL_MSG (_T("unknown column data type"));
572 wxString
wxDbGridTableBase::GetColLabelValue(int col
)
574 if (GetNumberCols() > col
)
576 return m_ColInfo
[col
].Title
;
578 wxFAIL_MSG (_T("unknown column"));
582 bool wxDbGridTableBase::IsEmptyCell(int row
, int col
)
584 wxLogDebug(wxT("IsEmtpyCell on %i,%i"),row
,col
);
587 return m_data
->IsColNull(m_ColInfo
[col
].DbCol
);
591 wxString
wxDbGridTableBase::GetValue(int row
, int col
)
593 wxLogDebug(wxT("GetValue() on %i,%i"),row
,col
);
596 wxVariant val
= m_data
->GetCol(m_ColInfo
[col
].DbCol
);
597 wxLogDebug(wxT("\tReturning \"%s\"\n"),val
.GetString().c_str());
599 return val
.GetString();
603 void wxDbGridTableBase::SetValue(int row
, int col
,const wxString
& value
)
605 wxLogDebug(wxT("SetValue() on %i,%i"),row
,col
);
608 wxVariant
val(value
);
610 m_rowmodified
= TRUE
;
611 m_data
->SetCol(m_ColInfo
[col
].DbCol
,val
);
615 void wxDbGridTableBase::SetValueAsLong(int row
, int col
, long value
)
617 wxLogDebug(wxT("SetValueAsLong() on %i,%i"),row
,col
);
620 wxVariant
val(value
);
622 m_rowmodified
= TRUE
;
623 m_data
->SetCol(m_ColInfo
[col
].DbCol
,val
);
627 void wxDbGridTableBase::SetValueAsDouble(int row
, int col
, double value
)
629 wxLogDebug(wxT("SetValueAsDouble() on %i,%i"),row
,col
);
632 wxVariant
val(value
);
634 m_rowmodified
= TRUE
;
635 m_data
->SetCol(m_ColInfo
[col
].DbCol
,val
);
640 void wxDbGridTableBase::SetValueAsBool(int row
, int col
, bool value
)
642 wxLogDebug(wxT("SetValueAsBool() on %i,%i"),row
,col
);
645 wxVariant
val(value
);
647 m_rowmodified
= TRUE
;
648 m_data
->SetCol(m_ColInfo
[col
].DbCol
,val
);
652 void wxDbGridTableBase::ValidateRow(int row
)
654 wxLogDebug(wxT("ValidateRow(%i) currently on row (%i). Array count = %i"),row
,m_row
,m_keys
.GetCount());
660 //We add to row as Count is unsigned!
661 if ((unsigned)(row
+1) > m_keys
.GetCount())
663 wxLogDebug(wxT("\trow key unknown"));
664 // Extend Array, iterate through data filling with keys
665 m_data
->SetRowMode(wxDbTable::WX_ROW_MODE_QUERY
);
667 for (trow
= m_keys
.GetCount(); trow
<= row
; trow
++)
669 wxLogDebug(wxT("Fetching row %i.."), trow
);
670 bool ret
= m_data
->GetNext();
672 wxLogDebug(wxT(" ...success=(%i)"),ret
);
673 GenericKey k
= m_data
->GetKey();
680 wxLogDebug(wxT("\trow key known centering data"));
681 GenericKey k
= m_keys
.Item(row
);
682 m_data
->SetRowMode(wxDbTable::WX_ROW_MODE_INDIVIDUAL
);
683 m_data
->ClearMemberVars();
685 if (!m_data
->QueryOnKeyFields())
687 wxDbLogExtendedErrorMsg("ODBC error during Query()\n\n", m_data
->GetDb(),__FILE__
,__LINE__
);
694 m_rowmodified
= FALSE
;
697 bool wxDbGridTableBase::Writeback() const
705 wxLogDebug(wxT("\trow key unknown"));
707 // FIXME: this code requires dbtable support for record status
709 switch (m_data
->get_ModifiedStatus())
711 case wxDbTable::UpdatePending
:
712 result
= m_data
->Update();
714 case wxDbTable::InsertPending
:
715 result
= (m_data
->Insert() == SQL_SUCCESS
);
722 wxLogDebug(wxT("WARNING : Row writeback not implemented "));
727 #include "wx/arrimpl.cpp"
729 WX_DEFINE_EXPORTED_OBJARRAY(keyarray
);
731 #endif // #if wxUSE_NEW_GRID
732 #endif // #if wxUSE_ODBC