summaryrefslogtreecommitdiffstats
path: root/tqtinterface/qt4/src/sql/tqsqlresult.cpp
diff options
context:
space:
mode:
authorMichele Calgaro <michele.calgaro@yahoo.it>2019-04-21 23:22:20 +0900
committerMichele Calgaro <michele.calgaro@yahoo.it>2019-04-21 23:22:20 +0900
commitdba036816b279bc1539a9f3894fbc414665d2bce (patch)
tree29e4bf00bafe515e7afdd02168d65a47a3f9fbc0 /tqtinterface/qt4/src/sql/tqsqlresult.cpp
parent6f1b4f0c7505a049d992a33f6e409b7c75732d4b (diff)
downloadexperimental-dba036816b279bc1539a9f3894fbc414665d2bce.tar.gz
experimental-dba036816b279bc1539a9f3894fbc414665d2bce.zip
Removed unnecessary and/or TDE-unrelated code.
Signed-off-by: Michele Calgaro <michele.calgaro@yahoo.it> Signed-off-by: Slávek Banko <slavek.banko@axis.cz>
Diffstat (limited to 'tqtinterface/qt4/src/sql/tqsqlresult.cpp')
-rw-r--r--tqtinterface/qt4/src/sql/tqsqlresult.cpp368
1 files changed, 0 insertions, 368 deletions
diff --git a/tqtinterface/qt4/src/sql/tqsqlresult.cpp b/tqtinterface/qt4/src/sql/tqsqlresult.cpp
deleted file mode 100644
index 0555929..0000000
--- a/tqtinterface/qt4/src/sql/tqsqlresult.cpp
+++ /dev/null
@@ -1,368 +0,0 @@
-/****************************************************************************
-**
-** Implementation of TQSqlResult class
-**
-** Created : 2000-11-03
-**
-** Copyright (C) 2005-2008 Trolltech ASA. All rights reserved.
-**
-** This file is part of the sql module of the TQt GUI Toolkit.
-**
-** This file may be used under the terms of the GNU General
-** Public License versions 2.0 or 3.0 as published by the Free
-** Software Foundation and appearing in the files LICENSE.GPL2
-** and LICENSE.GPL3 included in the packaging of this file.
-** Alternatively you may (at your option) use any later version
-** of the GNU General Public License if such license has been
-** publicly approved by Trolltech ASA (or its successors, if any)
-** and the KDE Free TQt Foundation.
-**
-** Please review the following information to ensure GNU General
-** Public Licensing requirements will be met:
-** http://trolltech.com/products/qt/licenses/licensing/opensource/.
-** If you are unsure which license is appropriate for your use, please
-** review the following information:
-** http://trolltech.com/products/qt/licenses/licensing/licensingoverview
-** or contact the sales department at sales@trolltech.com.
-**
-** This file may be used under the terms of the Q Public License as
-** defined by Trolltech ASA and appearing in the file LICENSE.TQPL
-** included in the packaging of this file. Licensees holding valid TQt
-** Commercial licenses may use this file in accordance with the TQt
-** Commercial License Agreement provided with the Software.
-**
-** This file is provided "AS IS" with NO WARRANTY OF ANY KIND,
-** INCLUDING THE WARRANTIES OF DESIGN, MERCHANTABILITY AND FITNESS FOR
-** A PARTICULAR PURPOSE. Trolltech reserves all rights not granted
-** herein.
-**
-**********************************************************************/
-
-#include "tqsqlresult.h"
-#include "private/tqsqlextension_p.h"
-
-#ifndef TQT_NO_SQL
-
-class TQSqlResultPrivate
-{
-public:
- const TQSqlDriver* sqldriver;
- int idx;
- TQString sql;
- bool active;
- bool isSel;
- TQSqlError error;
- TQSqlExtension * ext;
-};
-
-/*!
- \class TQSqlResult
- \brief The TQSqlResult class provides an abstract interface for
- accessing data from SQL databases.
-
- \ingroup database
- \module sql
-
- Normally you would use TQSqlQuery instead of TQSqlResult since TQSqlQuery
- provides a generic wrapper for database-specific implementations of
- TQSqlResult.
-
- \sa TQSql
-*/
-
-
-/*!
- Protected constructor which creates a TQSqlResult using database \a
- db. The object is initialized to an inactive state.
-*/
-
-TQSqlResult::TQSqlResult( const TQSqlDriver * db ): forwardOnly( FALSE )
-{
- d = new TQSqlResultPrivate();
- d->sqldriver = db;
- d->idx = TQSql::BeforeFirst;
- d->isSel = FALSE;
- d->active = FALSE;
- d->ext = new TQSqlExtension();
-}
-
-/*!
- Destroys the object and frees any allocated resources.
-*/
-
-TQSqlResult::~TQSqlResult()
-{
- if ( d->ext )
- delete d->ext;
- delete d;
-}
-
-/*!
- Sets the current query for the result to \a query. The result must
- be reset() in order to execute the query on the database.
-*/
-
-void TQSqlResult::setQuery( const TQString& query )
-{
- d->sql = query;
-}
-
-/*!
- Returns the current SQL query text, or TQString::null if there is none.
-*/
-
-TQString TQSqlResult::lastQuery() const
-{
- return d->sql;
-}
-
-/*!
- Returns the current (zero-based) position of the result.
-*/
-
-int TQSqlResult::at() const
-{
- return d->idx;
-}
-
-
-/*!
- Returns TRUE if the result is positioned on a valid record (that
- is, the result is not positioned before the first or after the
- last record); otherwise returns FALSE.
-*/
-
-bool TQSqlResult::isValid() const
-{
- return ( d->idx != TQSql::BeforeFirst && \
- d->idx != TQSql::AfterLast ) ? TRUE : FALSE;
-}
-
-/*!
- \fn bool TQSqlResult::isNull( int i )
-
- Returns TRUE if the field at position \a i is NULL; otherwise
- returns FALSE.
-*/
-
-
-/*!
- Returns TRUE if the result has records to be retrieved; otherwise
- returns FALSE.
-*/
-
-bool TQSqlResult::isActive() const
-{
- return d->active;
-}
-
-/*!
- Protected function provided for derived classes to set the
- internal (zero-based) result index to \a at.
-
- \sa at()
-*/
-
-void TQSqlResult::setAt( int at )
-{
- d->idx = at;
-}
-
-
-/*!
- Protected function provided for derived classes to indicate
- whether or not the current statement is a SQL SELECT statement.
- The \a s parameter should be TRUE if the statement is a SELECT
- statement, or FALSE otherwise.
-*/
-
-void TQSqlResult::setSelect( bool s )
-{
- d->isSel = s;
-}
-
-/*!
- Returns TRUE if the current result is from a SELECT statement;
- otherwise returns FALSE.
-*/
-
-bool TQSqlResult::isSelect() const
-{
- return d->isSel;
-}
-
-/*!
- Returns the driver associated with the result.
-*/
-
-const TQSqlDriver* TQSqlResult::driver() const
-{
- return d->sqldriver;
-}
-
-
-/*!
- Protected function provided for derived classes to set the
- internal active state to the value of \a a.
-
- \sa isActive()
-*/
-
-void TQSqlResult::setActive( bool a )
-{
- d->active = a;
-}
-
-/*!
- Protected function provided for derived classes to set the last
- error to the value of \a e.
-
- \sa lastError()
-*/
-
-void TQSqlResult::setLastError( const TQSqlError& e )
-{
- d->error = e;
-}
-
-
-/*!
- Returns the last error associated with the result.
-*/
-
-TQSqlError TQSqlResult::lastError() const
-{
- return d->error;
-}
-
-/*!
- \fn int TQSqlResult::size()
-
- Returns the size of the result or -1 if it cannot be determined.
-*/
-
-/*!
- \fn int TQSqlResult::numRowsAffected()
-
- Returns the number of rows affected by the last query executed.
-*/
-
-/*!
- \fn TQVariant TQSqlResult::data( int i )
-
- Returns the data for field \a i (zero-based) as a TQVariant. This
- function is only called if the result is in an active state and is
- positioned on a valid record and \a i is non-negative.
- Derived classes must reimplement this function and return the value
- of field \a i, or TQVariant() if it cannot be determined.
-*/
-
-/*!
- \fn bool TQSqlResult::reset( const TQString& query )
-
- Sets the result to use the SQL statement \a query for subsequent
- data retrieval. Derived classes must reimplement this function and
- apply the \a query to the database. This function is called only
- after the result is set to an inactive state and is positioned
- before the first record of the new result. Derived classes should
- return TRUE if the query was successful and ready to be used,
- or FALSE otherwise.
-*/
-
-/*!
- \fn bool TQSqlResult::fetch( int i )
-
- Positions the result to an arbitrary (zero-based) index \a i. This
- function is only called if the result is in an active state. Derived
- classes must reimplement this function and position the result to the
- index \a i, and call setAt() with an appropriate value. Return TRUE
- to indicate success, or FALSE to signify failure.
-*/
-
-/*!
- \fn bool TQSqlResult::fetchFirst()
-
- Positions the result to the first record in the result. This
- function is only called if the result is in an active state.
- Derived classes must reimplement this function and position the result
- to the first record, and call setAt() with an appropriate value.
- Return TRUE to indicate success, or FALSE to signify failure.
-*/
-
-/*!
- \fn bool TQSqlResult::fetchLast()
-
- Positions the result to the last record in the result. This
- function is only called if the result is in an active state.
- Derived classes must reimplement this function and position the result
- to the last record, and call setAt() with an appropriate value.
- Return TRUE to indicate success, or FALSE to signify failure.
-*/
-
-/*!
- Positions the result to the next available record in the result.
- This function is only called if the result is in an active state.
- The default implementation calls fetch() with the next index.
- Derived classes can reimplement this function and position the result
- to the next record in some other way, and call setAt() with an
- appropriate value. Return TRUE to indicate success, or FALSE to
- signify failure.
-*/
-
-bool TQSqlResult::fetchNext()
-{
- return fetch( at() + 1 );
-}
-
-/*!
- Positions the result to the previous available record in the
- result. This function is only called if the result is in an active
- state. The default implementation calls fetch() with the previous
- index. Derived classes can reimplement this function and position the
- result to the next record in some other way, and call setAt() with
- an appropriate value. Return TRUE to indicate success, or FALSE to
- signify failure.
-*/
-
-bool TQSqlResult::fetchPrev()
-{
- return fetch( at() - 1 );
-}
-
-/*!
- Returns TRUE if you can only scroll forward through a result set;
- otherwise returns FALSE.
-*/
-bool TQSqlResult::isForwardOnly() const
-{
- return forwardOnly;
-}
-
-/*!
- Sets forward only mode to \a forward. If forward is TRUE only
- fetchNext() is allowed for navigating the results. Forward only
- mode needs far less memory since results do not have to be cached.
- forward only mode is off by default.
-
- \sa fetchNext()
-*/
-void TQSqlResult::setForwardOnly( bool forward )
-{
- forwardOnly = forward;
-}
-
-// XXX BCI HACK - remove in 4.0
-/*! \internal */
-void TQSqlResult::setExtension( TQSqlExtension * ext )
-{
- if ( d->ext )
- delete d->ext;
- d->ext = ext;
-}
-
-/*! \internal */
-TQSqlExtension * TQSqlResult::extension()
-{
- return d->ext;
-}
-#endif // TQT_NO_SQL