?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
bump product version to 4.1.6.2
[LibreOffice.git] / dbaccess / source / ui / dlg / queryfilter.cxx
blob381291e661f876cd4d62cd25c8bc422825b4bef6
1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
2 /*
3 * This file is part of the LibreOffice project.
4 *
5 * This Source Code Form is subject to the terms of the Mozilla Public
6 * License, v. 2.0. If a copy of the MPL was not distributed with this
7 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
8 *
9 * This file incorporates work covered by the following license notice:
10 *
11 * Licensed to the Apache Software Foundation (ASF) under one or more
12 * contributor license agreements. See the NOTICE file distributed
13 * with this work for additional information regarding copyright
14 * ownership. The ASF licenses this file to you under the Apache
15 * License, Version 2.0 (the "License"); you may not use this file
16 * except in compliance with the License. You may obtain a copy of
17 * the License at http://www.apache.org/licenses/LICENSE-2.0 .
18 */
19
20 #include "queryfilter.hxx"
21 #include "moduledbu.hxx"
22 #include <com/sun/star/sdbc/DataType.hpp>
23 #include <com/sun/star/util/Date.hpp>
24 #include <com/sun/star/util/DateTime.hpp>
25 #include <com/sun/star/util/Time.hpp>
26 #include <com/sun/star/sdb/XSQLQueryComposer.hpp>
27 #include <com/sun/star/sdbc/ColumnSearch.hpp>
28 #include <com/sun/star/sdbcx/XColumnsSupplier.hpp>
29 #include <com/sun/star/sdb/SQLFilterOperator.hpp>
30 #include <com/sun/star/sdbc/XRow.hpp>
31 #include <com/sun/star/sdbc/XResultSet.hpp>
32 #include <com/sun/star/container/XNameAccess.hpp>
33 #include <comphelper/string.hxx>
34 #include <tools/diagnose_ex.h>
35 #include <osl/diagnose.h>
36 #include <connectivity/sqliterator.hxx>
37 #include <connectivity/dbtools.hxx>
38 #include "queryfilter.hrc"
39 #include "dbustrings.hrc"
40 #include <com/sun/star/sdb/XSingleSelectQueryComposer.hpp>
41
42 using namespace dbaui;
43 using namespace connectivity;
44 using namespace ::com::sun::star::uno;
45 using namespace ::com::sun::star::lang;
46 using namespace ::com::sun::star::container;
47 using namespace ::com::sun::star::util;
48 using namespace ::com::sun::star::sdb;
49 using namespace ::com::sun::star::sdbc;
50 using namespace ::com::sun::star::sdbcx;
51 using namespace ::com::sun::star::beans;
52
53 void Replace_OS_PlaceHolder(String& aString)
54 {
55 while (aString.SearchAndReplace( '*', '%' ) != STRING_NOTFOUND) ;
56 while (aString.SearchAndReplace( '?', '_' ) != STRING_NOTFOUND) ;
57 }
58
59 void Replace_SQL_PlaceHolder(String& aString)
60 {
61 while (aString.SearchAndReplace( '%', '*' ) != STRING_NOTFOUND) ;
62 while (aString.SearchAndReplace( '_', '?' ) != STRING_NOTFOUND) ;
63 }
64
65 DBG_NAME(DlgFilterCrit);
66
67 DlgFilterCrit::DlgFilterCrit(Window * pParent,
68 const Reference< XComponentContext >& rxContext,
69 const Reference< XConnection>& _rxConnection,
70 const Reference< XSingleSelectQueryComposer >& _rxComposer,
71 const Reference< XNameAccess>& _rxCols
72 )
73 :ModalDialog( pParent, ModuleRes( DLG_FILTERCRIT ) )
74 ,aLB_WHEREFIELD1 ( this, ModuleRes( LB_WHEREFIELD1 ) )
75 ,aLB_WHERECOMP1 ( this, ModuleRes( LB_WHERECOMP1 ) )
76 ,aET_WHEREVALUE1 ( this, ModuleRes( ET_WHEREVALUE1 ) )
77 ,aLB_WHERECOND2 ( this, ModuleRes( LB_WHERECOND2 ) )
78 ,aLB_WHEREFIELD2 ( this, ModuleRes( LB_WHEREFIELD2 ) )
79 ,aLB_WHERECOMP2 ( this, ModuleRes( LB_WHERECOMP2 ) )
80 ,aET_WHEREVALUE2 ( this, ModuleRes( ET_WHEREVALUE2 ) )
81 ,aLB_WHERECOND3 ( this, ModuleRes( LB_WHERECOND3 ) )
82 ,aLB_WHEREFIELD3 ( this, ModuleRes( LB_WHEREFIELD3 ) )
83 ,aLB_WHERECOMP3 ( this, ModuleRes( LB_WHERECOMP3 ) )
84 ,aET_WHEREVALUE3 ( this, ModuleRes( ET_WHEREVALUE3 ) )
85 ,aFT_WHEREFIELD ( this, ModuleRes( FT_WHEREFIELD ) )
86 ,aFT_WHERECOMP ( this, ModuleRes( FT_WHERECOMP ) )
87 ,aFT_WHEREVALUE ( this, ModuleRes( FT_WHEREVALUE ) )
88 ,aFT_WHEREOPER ( this, ModuleRes( FT_WHEREOPER ) )
89 ,aFL_FIELDS ( this, ModuleRes( FL_FIELDS ) )
90 ,aBT_OK ( this, ModuleRes( BT_OK ) )
91 ,aBT_CANCEL ( this, ModuleRes( BT_CANCEL ) )
92 ,aBT_HELP ( this, ModuleRes( BT_HELP ) )
93 ,aSTR_NOENTRY ( ModuleRes( STR_NOENTRY ) )
94 ,aSTR_COMPARE_OPERATORS( ModuleRes( STR_COMPARE_OPERATORS ) )
95 ,m_xQueryComposer(_rxComposer)
96 ,m_xColumns( _rxCols )
97 ,m_xConnection( _rxConnection )
98 ,m_xMetaData( _rxConnection->getMetaData() )
99 ,m_aPredicateInput( rxContext, _rxConnection, getParseContext() )
100 {
101 DBG_CTOR(DlgFilterCrit,NULL);
102 // Write the String for noEntry into the ListBoxes of the field names
103 aLB_WHEREFIELD1.InsertEntry( aSTR_NOENTRY );
104 aLB_WHEREFIELD2.InsertEntry( aSTR_NOENTRY );
105 aLB_WHEREFIELD3.InsertEntry( aSTR_NOENTRY );
106
107 try
108 {
109 // ... also write it into the remaining fields
110 Sequence< OUString> aNames = m_xColumns->getElementNames();
111 const OUString* pIter = aNames.getConstArray();
112 const OUString* pEnd = pIter + aNames.getLength();
113 Reference<XPropertySet> xColumn;
114 for(;pIter != pEnd;++pIter)
115 {
116 try
117 {
118 xColumn.set( m_xColumns->getByName( *pIter ), UNO_QUERY_THROW );
119
120 sal_Int32 nDataType( 0 );
121 OSL_VERIFY( xColumn->getPropertyValue( PROPERTY_TYPE ) >>= nDataType );
122 sal_Int32 eColumnSearch = ::dbtools::getSearchColumnFlag( m_xConnection, nDataType );
123 if ( eColumnSearch == ColumnSearch::NONE )
124 continue;
125
126 sal_Bool bIsSearchable( sal_True );
127 OSL_VERIFY( xColumn->getPropertyValue( PROPERTY_ISSEARCHABLE ) >>= bIsSearchable );
128 if ( !bIsSearchable )
129 continue;
130 }
131 catch( const Exception& )
132 {
133 DBG_UNHANDLED_EXCEPTION();
134 }
135 aLB_WHEREFIELD1.InsertEntry( *pIter );
136 aLB_WHEREFIELD2.InsertEntry( *pIter );
137 aLB_WHEREFIELD3.InsertEntry( *pIter );
138 }
139
140 Reference<XNameAccess> xSelectColumns = Reference<XColumnsSupplier>(m_xQueryComposer,UNO_QUERY)->getColumns();
141 aNames = xSelectColumns->getElementNames();
142 pIter = aNames.getConstArray();
143 pEnd = pIter + aNames.getLength();
144 for(;pIter != pEnd;++pIter)
145 {
146 // don't insert a column name twice
147 if ( !m_xColumns->hasByName(*pIter) )
148 {
149 xColumn.set(xSelectColumns->getByName(*pIter),UNO_QUERY);
150 OSL_ENSURE(xColumn.is(),"DlgFilterCrit::DlgFilterCrit: Column is null!");
151 sal_Int32 nDataType(0);
152 xColumn->getPropertyValue(PROPERTY_TYPE) >>= nDataType;
153 sal_Int32 eColumnSearch = dbtools::getSearchColumnFlag(m_xConnection,nDataType);
154 // TODO
155 // !pColumn->IsFunction()
156 if(eColumnSearch != ColumnSearch::NONE)
157 {
158 aLB_WHEREFIELD1.InsertEntry( *pIter );
159 aLB_WHEREFIELD2.InsertEntry( *pIter );
160 aLB_WHEREFIELD3.InsertEntry( *pIter );
161 }
162 }
163 }
164 // initialize the listboxes with noEntry
165 aLB_WHEREFIELD1.SelectEntryPos(0);
166 aLB_WHEREFIELD2.SelectEntryPos(0);
167 aLB_WHEREFIELD3.SelectEntryPos(0);
168
169 // insert the criteria into the dialog
170 Sequence<Sequence<PropertyValue > > aValues = m_xQueryComposer->getStructuredFilter();
171 fillLines(aValues);
172 aValues = m_xQueryComposer->getStructuredHavingClause();
173 fillLines(aValues);
174
175 }
176 catch(const Exception&)
177 {
178 FreeResource();
179 throw;
180 }
181
182 EnableLines();
183
184 aLB_WHEREFIELD1.SetSelectHdl(LINK(this,DlgFilterCrit,ListSelectHdl));
185 aLB_WHEREFIELD2.SetSelectHdl(LINK(this,DlgFilterCrit,ListSelectHdl));
186 aLB_WHEREFIELD3.SetSelectHdl(LINK(this,DlgFilterCrit,ListSelectHdl));
187
188 aLB_WHERECOMP1.SetSelectHdl(LINK(this,DlgFilterCrit,ListSelectCompHdl));
189 aLB_WHERECOMP2.SetSelectHdl(LINK(this,DlgFilterCrit,ListSelectCompHdl));
190 aLB_WHERECOMP3.SetSelectHdl(LINK(this,DlgFilterCrit,ListSelectCompHdl));
191
192 aET_WHEREVALUE1.SetLoseFocusHdl( LINK( this, DlgFilterCrit, PredicateLoseFocus ) );
193 aET_WHEREVALUE2.SetLoseFocusHdl( LINK( this, DlgFilterCrit, PredicateLoseFocus ) );
194 aET_WHEREVALUE3.SetLoseFocusHdl( LINK( this, DlgFilterCrit, PredicateLoseFocus ) );
195
196 if ( aET_WHEREVALUE1.IsEnabled() )
197 aET_WHEREVALUE1.GrabFocus();
198
199 FreeResource();
200 }
201
202 DlgFilterCrit::~DlgFilterCrit()
203 {
204 DBG_DTOR(DlgFilterCrit,NULL);
205 }
206
207 #define LbText(x) ((x).GetSelectEntry())
208 #define LbPos(x) ((x).GetSelectEntryPos())
209
210 sal_Int32 DlgFilterCrit::GetOSQLPredicateType( const String& _rSelectedPredicate ) const
211 {
212 sal_Int32 nPredicateIndex = -1;
213 for ( xub_StrLen i=0; i < comphelper::string::getTokenCount(aSTR_COMPARE_OPERATORS, ';'); ++i)
214 if ( aSTR_COMPARE_OPERATORS.GetToken(i) == _rSelectedPredicate )
215 {
216 nPredicateIndex = i;
217 break;
218 }
219
220 sal_Int32 nPredicateType = SQLFilterOperator::NOT_SQLNULL;
221 switch ( nPredicateIndex )
222 {
223 case 0:
224 nPredicateType = SQLFilterOperator::EQUAL;
225 break;
226 case 1:
227 nPredicateType = SQLFilterOperator::NOT_EQUAL;
228 break;
229 case 2:
230 nPredicateType = SQLFilterOperator::LESS;
231 break;
232 case 3:
233 nPredicateType = SQLFilterOperator::LESS_EQUAL;
234 break;
235 case 4:
236 nPredicateType = SQLFilterOperator::GREATER;
237 break;
238 case 5:
239 nPredicateType = SQLFilterOperator::GREATER_EQUAL;
240 break;
241 case 6:
242 nPredicateType = SQLFilterOperator::LIKE;
243 break;
244 case 7:
245 nPredicateType = SQLFilterOperator::NOT_LIKE;
246 break;
247 case 8:
248 nPredicateType = SQLFilterOperator::SQLNULL;
249 break;
250 case 9:
251 nPredicateType = SQLFilterOperator::NOT_SQLNULL;
252 break;
253 default:
254 OSL_FAIL( "DlgFilterCrit::GetOSQLPredicateType: unknown predicate string!" );
255 break;
256 }
257
258 return nPredicateType;
259 }
260
261 sal_uInt16 DlgFilterCrit::GetSelectionPos(sal_Int32 eType,const ListBox& rListBox) const
262 {
263 sal_uInt16 nPos;
264 switch(eType)
265 {
266 case SQLFilterOperator::EQUAL:
267 nPos = 0;
268 break;
269 case SQLFilterOperator::NOT_EQUAL:
270 nPos = 1;
271 break;
272 case SQLFilterOperator::LESS:
273 nPos = 2;
274 break;
275 case SQLFilterOperator::LESS_EQUAL:
276 nPos = 3;
277 break;
278 case SQLFilterOperator::GREATER:
279 nPos = 4;
280 break;
281 case SQLFilterOperator::GREATER_EQUAL:
282 nPos = 5;
283 break;
284 case SQLFilterOperator::NOT_LIKE:
285 nPos = rListBox.GetEntryCount() > 2 ? rListBox.GetEntryCount()-3 : 0;
286 break;
287 case SQLFilterOperator::LIKE:
288 nPos = rListBox.GetEntryCount() > 2 ? rListBox.GetEntryCount()-4 : 1;
289 break;
290 case SQLFilterOperator::SQLNULL:
291 nPos = rListBox.GetEntryCount()-2;
292 break;
293 case SQLFilterOperator::NOT_SQLNULL:
294 nPos = rListBox.GetEntryCount()-1;
295 break;
296 default:
297 // TODO What value should this be?
298 nPos = 0;
299 break;
300 }
301 return nPos;
302 }
303
304 sal_Bool DlgFilterCrit::getCondition(const ListBox& _rField,const ListBox& _rComp,const Edit& _rValue,PropertyValue& _rFilter) const
305 {
306 sal_Bool bHaving = sal_False;
307 try
308 {
309 OUString sTableName;
310 sal_Bool bFunction = sal_False;
311 _rFilter.Name = _rField.GetSelectEntry();
312 Reference< XPropertySet > xColumn = getQueryColumn(_rFilter.Name);
313 if ( xColumn.is() )
314 {
315 Reference< XPropertySetInfo > xInfo = xColumn->getPropertySetInfo();
316 if ( xInfo->hasPropertyByName(PROPERTY_REALNAME) )
317 {
318 if ( xInfo->hasPropertyByName(PROPERTY_TABLENAME) )
319 {
320 xColumn->getPropertyValue(PROPERTY_TABLENAME) >>= sTableName;
321 if ( !sTableName.isEmpty() )
322 {
323 // properly quote all parts of the table name, so
324 // e.g. <schema>.<table> becomes "<schema>"."<table>"
325 OUString aCatlog,aSchema,aTable;
326 ::dbtools::qualifiedNameComponents( m_xMetaData, sTableName, aCatlog, aSchema, aTable, ::dbtools::eInDataManipulation );
327 sTableName = ::dbtools::composeTableName( m_xMetaData, aCatlog, aSchema, aTable, sal_True, ::dbtools::eInDataManipulation );
328 }
329 }
330 xColumn->getPropertyValue(PROPERTY_REALNAME) >>= _rFilter.Name;
331 static OUString sAgg("AggregateFunction");
332 if ( xInfo->hasPropertyByName(sAgg) )
333 xColumn->getPropertyValue(sAgg) >>= bHaving;
334 static OUString sFunction("Function");
335 if ( xInfo->hasPropertyByName(sFunction) )
336 xColumn->getPropertyValue(sFunction) >>= bFunction;
337 }
338 if ( !bFunction )
339 {
340 const OUString aQuote = m_xMetaData.is() ? m_xMetaData->getIdentifierQuoteString() : OUString();
341 _rFilter.Name = ::dbtools::quoteName(aQuote,_rFilter.Name);
342 if ( !sTableName.isEmpty() )
343 {
344 static OUString sSep(".");
345 sTableName += sSep;
346 sTableName += _rFilter.Name;
347 _rFilter.Name = sTableName;
348 }
349 }
350 }
351 }
352 catch(const Exception&)
353 {
354 }
355
356 _rFilter.Handle = GetOSQLPredicateType( _rComp.GetSelectEntry() );
357 if ( SQLFilterOperator::SQLNULL != _rFilter.Handle && _rFilter.Handle != SQLFilterOperator::NOT_SQLNULL )
358 {
359 String sPredicateValue = m_aPredicateInput.getPredicateValue( _rValue.GetText(), getMatchingColumn( _rValue ), sal_False );
360 if ( _rFilter.Handle == SQLFilterOperator::LIKE ||
361 _rFilter.Handle == SQLFilterOperator::NOT_LIKE )
362 ::Replace_OS_PlaceHolder( sPredicateValue );
363 _rFilter.Value <<= OUString(sPredicateValue);
364 }
365 return bHaving;
366 }
367
368 Reference< XPropertySet > DlgFilterCrit::getColumn( const OUString& _rFieldName ) const
369 {
370 Reference< XPropertySet > xColumn;
371 try
372 {
373 if ( m_xColumns.is() && m_xColumns->hasByName( _rFieldName ) )
374 m_xColumns->getByName( _rFieldName ) >>= xColumn;
375
376 Reference< XNameAccess> xColumns = Reference< XColumnsSupplier >(m_xQueryComposer,UNO_QUERY)->getColumns();
377 if ( xColumns.is() && !xColumn.is() )
378 {
379 Sequence< OUString> aSeq = xColumns->getElementNames();
380 const OUString* pIter = aSeq.getConstArray();
381 const OUString* pEnd = pIter + aSeq.getLength();
382 for(;pIter != pEnd;++pIter)
383 {
384 Reference<XPropertySet> xProp(xColumns->getByName(*pIter),UNO_QUERY);
385 if ( xProp.is() && xProp->getPropertySetInfo()->hasPropertyByName(PROPERTY_REALNAME) )
386 {
387 OUString sRealName;
388 xProp->getPropertyValue(PROPERTY_REALNAME) >>= sRealName;
389 if ( sRealName == _rFieldName )
390 {
391 if ( m_xColumns.is() && m_xColumns->hasByName( *pIter ) )
392 m_xColumns->getByName( *pIter ) >>= xColumn;
393 break;
394 }
395 }
396 }
397 }
398 }
399 catch( const Exception& )
400 {
401 DBG_UNHANDLED_EXCEPTION();
402 }
403
404 return xColumn;
405 }
406
407 Reference< XPropertySet > DlgFilterCrit::getQueryColumn( const OUString& _rFieldName ) const
408 {
409 Reference< XPropertySet > xColumn;
410 try
411 {
412 Reference< XNameAccess> xColumns = Reference< XColumnsSupplier >(m_xQueryComposer,UNO_QUERY)->getColumns();
413 if ( xColumns.is() && xColumns->hasByName( _rFieldName ) )
414 xColumns->getByName( _rFieldName ) >>= xColumn;
415 }
416 catch( const Exception& )
417 {
418 DBG_UNHANDLED_EXCEPTION();
419 }
420
421 return xColumn;
422 }
423
424 Reference< XPropertySet > DlgFilterCrit::getMatchingColumn( const Edit& _rValueInput ) const
425 {
426 // the name
427 OUString sField;
428 if ( &_rValueInput == &aET_WHEREVALUE1 )
429 {
430 sField = aLB_WHEREFIELD1.GetSelectEntry();
431 }
432 else if ( &_rValueInput == &aET_WHEREVALUE2 )
433 {
434 sField = aLB_WHEREFIELD2.GetSelectEntry();
435 }
436 else if ( &_rValueInput == &aET_WHEREVALUE3 )
437 {
438 sField = aLB_WHEREFIELD3.GetSelectEntry();
439 }
440 else {
441 OSL_FAIL( "DlgFilterCrit::getMatchingColumn: invalid event source!" );
442 }
443
444 // the field itself
445 return getColumn( sField );
446 }
447
448 IMPL_LINK( DlgFilterCrit, PredicateLoseFocus, Edit*, _pField )
449 {
450 OSL_ENSURE( _pField, "DlgFilterCrit::PredicateLoseFocus: invalid event source!" );
451 if ( _pField )
452 {
453 // retrieve the field affected
454 Reference< XPropertySet> xColumn( getMatchingColumn( *_pField ) );
455 // and normalize it's content
456 if ( xColumn.is() )
457 {
458 OUString sText( _pField->GetText() );
459 m_aPredicateInput.normalizePredicateString( sText, xColumn );
460 _pField->SetText( sText );
461 }
462 }
463
464 return 0L;
465 }
466
467 void DlgFilterCrit::SetLine( sal_uInt16 nIdx,const PropertyValue& _rItem,sal_Bool _bOr )
468 {
469 DBG_CHKTHIS(DlgFilterCrit,NULL);
470 OUString aCondition;
471 _rItem.Value >>= aCondition;
472 String aStr = aCondition;
473 if ( _rItem.Handle == SQLFilterOperator::LIKE ||
474 _rItem.Handle == SQLFilterOperator::NOT_LIKE )
475 ::Replace_SQL_PlaceHolder(aStr);
476 aStr = comphelper::string::stripEnd(aStr, ' ');
477
478 Reference< XPropertySet > xColumn = getColumn( _rItem.Name );
479
480 // remove the predicate from the condition
481 switch(_rItem.Handle)
482 {
483 case SQLFilterOperator::EQUAL:
484 // aStr.Erase(0,1);
485 break;
486 case SQLFilterOperator::NOT_EQUAL:
487 aStr.Erase(0,2);
488 break;
489 case SQLFilterOperator::LESS:
490 aStr.Erase(0,1);
491 break;
492 case SQLFilterOperator::LESS_EQUAL:
493 aStr.Erase(0,2);
494 break;
495 case SQLFilterOperator::GREATER:
496 aStr.Erase(0,1);
497 break;
498 case SQLFilterOperator::GREATER_EQUAL:
499 aStr.Erase(0,2);
500 break;
501 case SQLFilterOperator::NOT_LIKE:
502 aStr.Erase(0,8);
503 break;
504 case SQLFilterOperator::LIKE:
505 aStr.Erase(0,4);
506 break;
507 case SQLFilterOperator::SQLNULL:
508 aStr.Erase(0,7);
509 break;
510 case SQLFilterOperator::NOT_SQLNULL:
511 aStr.Erase(0,11);
512 break;
513 }
514 aStr = comphelper::string::stripStart(aStr, ' ');
515
516 // to make sure that we only set first three
517 ListBox* pColumnListControl = NULL;
518 ListBox* pPredicateListControl = NULL;
519 Edit* pPredicateValueControl = NULL;
520 switch( nIdx )
521 {
522 case 0:
523 pColumnListControl = &aLB_WHEREFIELD1;
524 pPredicateListControl = &aLB_WHERECOMP1;
525 pPredicateValueControl = &aET_WHEREVALUE1;
526 break;
527 case 1:
528 aLB_WHERECOND2.SelectEntryPos( _bOr ? 1 : 0 );
529
530 pColumnListControl = &aLB_WHEREFIELD2;
531 pPredicateListControl = &aLB_WHERECOMP2;
532 pPredicateValueControl = &aET_WHEREVALUE2;
533 break;
534 case 2:
535 aLB_WHERECOND3.SelectEntryPos( _bOr ? 1 : 0 );
536
537 pColumnListControl = &aLB_WHEREFIELD3;
538 pPredicateListControl = &aLB_WHERECOMP3;
539 pPredicateValueControl = &aET_WHEREVALUE3;
540 break;
541 }
542
543 if ( pColumnListControl && pPredicateListControl && pPredicateValueControl )
544 {
545 OUString sName;
546 if ( xColumn.is() )
547 xColumn->getPropertyValue(PROPERTY_NAME) >>= sName;
548 else
549 sName = _rItem.Name;
550 // select the appropriate field name
551 SelectField( *pColumnListControl, sName );
552 ListSelectHdl( pColumnListControl );
553
554 // select the appropriate condition
555 pPredicateListControl->SelectEntryPos( GetSelectionPos( (sal_Int32)_rItem.Handle, *pPredicateListControl ) );
556
557 // initially normalize this value
558 OUString aString( aStr );
559 m_aPredicateInput.normalizePredicateString( aString, xColumn );
560 pPredicateValueControl->SetText( aString );
561 }
562 }
563
564 void DlgFilterCrit::SelectField( ListBox& rBox, const String& rField )
565 {
566 DBG_CHKTHIS(DlgFilterCrit,NULL);
567 sal_uInt16 nCnt = rBox.GetEntryCount();
568
569 for( sal_uInt16 i=0 ; i<nCnt ; i++ )
570 {
571 if(rBox.GetEntry(i) == rField)
572 {
573 rBox.SelectEntryPos(i);
574 return;
575 }
576 }
577
578 rBox.SelectEntryPos(0);
579 }
580
581 void DlgFilterCrit::EnableLines()
582 {
583 DBG_CHKTHIS(DlgFilterCrit,NULL);
584 // enabling/disabling of whole lines
585 if( LbPos(aLB_WHEREFIELD1) == 0 )
586 {
587 aLB_WHEREFIELD2.Disable();
588 aLB_WHERECOND2.Disable();
589 aLB_WHERECOMP2.Disable();
590 aET_WHEREVALUE2.Disable();
591
592 aLB_WHEREFIELD3.Disable();
593 aLB_WHERECOND3.Disable();
594 aLB_WHERECOMP3.Disable();
595 aET_WHEREVALUE3.Disable();
596 }
597 else
598 {
599 aLB_WHEREFIELD2.Enable();
600 aLB_WHERECOND2.Enable();
601 aLB_WHERECOMP2.Enable();
602 aET_WHEREVALUE2.Enable();
603
604 aLB_WHEREFIELD3.Enable();
605 aLB_WHERECOND3.Enable();
606 aLB_WHERECOMP3.Enable();
607 aET_WHEREVALUE3.Enable();
608 }
609
610 if( LbPos(aLB_WHEREFIELD2) == 0 )
611 {
612 aLB_WHEREFIELD3.Disable();
613 aLB_WHERECOND3.Disable();
614 aLB_WHERECOMP3.Disable();
615 aET_WHEREVALUE3.Disable();
616 }
617 else
618 {
619 aLB_WHEREFIELD3.Enable();
620 aLB_WHERECOND3.Enable();
621 aLB_WHERECOMP3.Enable();
622 aET_WHEREVALUE3.Enable();
623 }
624
625 // comparison field equal to NOENTRY
626 if( LbPos(aLB_WHEREFIELD1) == 0 )
627 {
628 aLB_WHERECOMP1.Disable();
629 aET_WHEREVALUE1.Disable();
630 }
631 else
632 {
633 aLB_WHEREFIELD1.Enable();
634 aLB_WHERECOMP1.Enable();
635 aET_WHEREVALUE1.Enable();
636 }
637
638 if( LbPos(aLB_WHEREFIELD2) == 0 )
639 {
640 aLB_WHERECOND2.Disable();
641 aLB_WHERECOMP2.Disable();
642 aET_WHEREVALUE2.Disable();
643 }
644 else
645 {
646 aLB_WHERECOND2.Enable();
647 aLB_WHEREFIELD2.Enable();
648 aLB_WHERECOMP2.Enable();
649 aET_WHEREVALUE2.Enable();
650 }
651
652 if( LbPos(aLB_WHEREFIELD3) == 0 )
653 {
654 aLB_WHERECOND3.Disable();
655 aLB_WHERECOMP3.Disable();
656 aET_WHEREVALUE3.Disable();
657 }
658 else
659 {
660 aLB_WHERECOND3.Enable();
661 aLB_WHERECOND3.Enable();
662 aLB_WHEREFIELD3.Enable();
663 aLB_WHERECOMP3.Enable();
664 aET_WHEREVALUE3.Enable();
665 }
666
667 // comparison operator equal to ISNULL or ISNOTNULL
668 if(aLB_WHERECOMP1.GetEntryCount() > 2 &&
669 ((LbPos(aLB_WHERECOMP1) == aLB_WHERECOMP1.GetEntryCount()-1) ||
670 (LbPos(aLB_WHERECOMP1) == aLB_WHERECOMP1.GetEntryCount()-2)) )
671 aET_WHEREVALUE1.Disable();
672
673 if(aLB_WHERECOMP2.GetEntryCount() > 2 &&
674 ((LbPos(aLB_WHERECOMP2) == aLB_WHERECOMP2.GetEntryCount()-1) ||
675 (LbPos(aLB_WHERECOMP2) == aLB_WHERECOMP2.GetEntryCount()-2)) )
676 aET_WHEREVALUE2.Disable();
677
678 if(aLB_WHERECOMP3.GetEntryCount() > 2 &&
679 ((LbPos(aLB_WHERECOMP3) == aLB_WHERECOMP3.GetEntryCount()-1) ||
680 (LbPos(aLB_WHERECOMP3) == aLB_WHERECOMP3.GetEntryCount()-2)) )
681 aET_WHEREVALUE3.Disable();
682 }
683
684 IMPL_LINK( DlgFilterCrit, ListSelectHdl, ListBox *, pListBox )
685 {
686 String aName;
687 ListBox* pComp;
688 if(pListBox == &aLB_WHEREFIELD1)
689 {
690 aName = LbText(aLB_WHEREFIELD1);
691 pComp = &aLB_WHERECOMP1;
692 }
693 else if(pListBox == &aLB_WHEREFIELD2)
694 {
695 aName = LbText(aLB_WHEREFIELD2);
696 pComp = &aLB_WHERECOMP2;
697 }
698 else
699 {
700 aName = LbText(aLB_WHEREFIELD3);
701 pComp = &aLB_WHERECOMP3;
702 }
703
704 pComp->Clear();
705
706 Reference<XPropertySet> xColumn = getColumn(aName);
707 if ( xColumn.is() )
708 {
709 sal_Int32 nDataType = 0;
710 xColumn->getPropertyValue(PROPERTY_TYPE) >>= nDataType;
711 sal_Int32 eColumnSearch = dbtools::getSearchColumnFlag(m_xConnection,nDataType);
712
713 if(eColumnSearch == ColumnSearch::FULL)
714 {
715 for(xub_StrLen i=0;i < comphelper::string::getTokenCount(aSTR_COMPARE_OPERATORS, ';');i++)
716 pComp->InsertEntry(aSTR_COMPARE_OPERATORS.GetToken(i));
717 }
718 else if(eColumnSearch == ColumnSearch::CHAR)
719 {
720 for(xub_StrLen i=6;i<10;i++)
721 pComp->InsertEntry(aSTR_COMPARE_OPERATORS.GetToken(i));
722 }
723 else if(eColumnSearch == ColumnSearch::BASIC)
724 {
725 xub_StrLen i;
726 for( i = 0; i < 6; i++ )
727 pComp->InsertEntry(aSTR_COMPARE_OPERATORS.GetToken(i));
728 for(i=8; i < comphelper::string::getTokenCount(aSTR_COMPARE_OPERATORS, ';'); ++i)
729 pComp->InsertEntry(aSTR_COMPARE_OPERATORS.GetToken(i));
730 }
731 else
732 {
733 OSL_FAIL("DlgFilterCrit::ListSelectHdl: This column should not exist at all.");
734 }
735 }
736 pComp->SelectEntryPos(0);
737
738 EnableLines();
739 return 0;
740 }
741
742 IMPL_LINK_INLINE_START( DlgFilterCrit, ListSelectCompHdl, ListBox *, /*pListBox*/ )
743 {
744 EnableLines();
745 return 0;
746 }
747 IMPL_LINK_INLINE_END( DlgFilterCrit, ListSelectCompHdl, ListBox *, pListBox )
748
749 void DlgFilterCrit::BuildWherePart()
750 {
751 DBG_CHKTHIS(DlgFilterCrit,NULL);
752 Sequence<Sequence<PropertyValue> > aFilter,aHaving;
753 aFilter.realloc(1);
754 aHaving.realloc(1);
755
756 if( LbPos(aLB_WHEREFIELD1) != 0 )
757 {
758 PropertyValue aValue;
759 if ( getCondition(aLB_WHEREFIELD1,aLB_WHERECOMP1,aET_WHEREVALUE1,aValue) )
760 {
761 aHaving[0].realloc(1);
762 aHaving[0][0] = aValue;
763 }
764 else
765 {
766 aFilter[0].realloc(1);
767 aFilter[0][0] = aValue;
768 }
769 }
770
771 if( LbPos(aLB_WHEREFIELD2) != 0 )
772 {
773 PropertyValue aValue;
774 Sequence<Sequence<PropertyValue> >& _rValues = aFilter;
775 if ( getCondition(aLB_WHEREFIELD2,aLB_WHERECOMP2,aET_WHEREVALUE2,aValue) )
776 _rValues = aHaving;
777 PropertyValue* pPos = NULL;
778 if ( aLB_WHERECOND2.GetSelectEntryPos() )
779 {
780 sal_Int32 nPos = _rValues.getLength();
781 _rValues.realloc( nPos + 1);
782 _rValues[nPos].realloc( 1);
783 pPos = &_rValues[nPos][0];
784 }
785 else
786 {
787 sal_Int32 nPos = _rValues.getLength() - 1;
788 sal_Int32 nAndPos = _rValues[nPos].getLength();
789 _rValues[nPos].realloc( _rValues[nPos].getLength() + 1);
790 pPos = &_rValues[nPos][nAndPos];
791 }
792 *pPos = aValue;
793 }
794
795 if( LbPos(aLB_WHEREFIELD3) != 0 )
796 {
797 PropertyValue aValue;
798 Sequence<Sequence<PropertyValue> >& _rValues = aFilter;
799 if ( getCondition(aLB_WHEREFIELD3,aLB_WHERECOMP3,aET_WHEREVALUE3,aValue) )
800 _rValues = aHaving;
801 PropertyValue* pPos = NULL;
802 if ( aLB_WHERECOND3.GetSelectEntryPos() )
803 {
804 sal_Int32 nPos = _rValues.getLength();
805 _rValues.realloc( nPos + 1);
806 _rValues[nPos].realloc( 1);
807 pPos = &_rValues[nPos][0];
808 }
809 else
810 {
811 sal_Int32 nPos = _rValues.getLength() - 1;
812 sal_Int32 nAndPos = _rValues[nPos].getLength();
813 _rValues[nPos].realloc( _rValues[nPos].getLength() + 1);
814 pPos = &_rValues[nPos][nAndPos];
815 }
816 *pPos = aValue;
817 }
818 try
819 {
820 m_xQueryComposer->setStructuredFilter(aFilter);
821 m_xQueryComposer->setStructuredHavingClause(aHaving);
822 }
823 catch(const Exception&)
824 {
825 DBG_UNHANDLED_EXCEPTION();
826 }
827 }
828
829 void DlgFilterCrit::fillLines(const Sequence<Sequence<PropertyValue > >& _aValues)
830 {
831 const Sequence<PropertyValue >* pOrIter = _aValues.getConstArray();
832 const Sequence<PropertyValue >* pOrEnd = pOrIter + _aValues.getLength();
833 sal_Bool bOr = sal_True;
834 for(sal_uInt16 i=0;pOrIter != pOrEnd; ++pOrIter)
835 {
836 bOr = sal_True;
837 const PropertyValue* pAndIter = pOrIter->getConstArray();
838 const PropertyValue* pAndEnd = pAndIter + pOrIter->getLength();
839 for(;pAndIter != pAndEnd; ++pAndIter)
840 {
841 SetLine( i++,*pAndIter,bOr);
842 bOr = sal_False;
843 }
844 }
845 }
846
847 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
FREE OFFICE SUITE