summaryrefslogtreecommitdiffstats
path: root/experimental/tqtinterface/qt4/src/sql/tqsqlerror.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'experimental/tqtinterface/qt4/src/sql/tqsqlerror.cpp')
-rw-r--r--experimental/tqtinterface/qt4/src/sql/tqsqlerror.cpp228
1 files changed, 228 insertions, 0 deletions
diff --git a/experimental/tqtinterface/qt4/src/sql/tqsqlerror.cpp b/experimental/tqtinterface/qt4/src/sql/tqsqlerror.cpp
new file mode 100644
index 000000000..55d98202d
--- /dev/null
+++ b/experimental/tqtinterface/qt4/src/sql/tqsqlerror.cpp
@@ -0,0 +1,228 @@
+/****************************************************************************
+**
+** Implementation of TQSqlError 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 "tqsqlerror.h"
+#include <tqmessagebox.h>
+
+#ifndef TQT_NO_SQL
+
+/*!
+ \class TQSqlError tqsqlerror.h
+ \brief The TQSqlError class provides SQL database error information.
+
+ \ingroup database
+ \module sql
+
+ This class is used to report database-specific errors. An error
+ description and (if appropriate) a database-specific error number
+ can be obtained using this class.
+*/
+
+/*!
+ \enum TQSqlError::Type
+
+ This enum type describes the type of SQL error that occurred.
+
+ \value None no error occurred
+ \value Connection connection error
+ \value Statement SQL statement syntax error
+ \value Transaction transaction failed error
+ \value Unknown unknown error
+*/
+
+/*!
+ Constructs an error containing the driver error text \a
+ driverText, the database-specific error text \a databaseText, the
+ type \a type and the optional error number \a number.
+*/
+
+TQSqlError::TQSqlError( const TQString& driverText,
+ const TQString& databaseText,
+ int type,
+ int number )
+: driverError(driverText),
+ databaseError(databaseText),
+ errorType(type),
+ errorNumber(number)
+{
+}
+
+/*!
+ Creates a copy of \a other.
+*/
+
+TQSqlError::TQSqlError( const TQSqlError& other )
+: driverError(other.driverError),
+ databaseError(other.databaseError),
+ errorType(other.errorType),
+ errorNumber(other.errorNumber)
+{
+}
+
+/*!
+ Sets the error equal to \a other.
+*/
+
+TQSqlError& TQSqlError::operator=( const TQSqlError& other )
+{
+ driverError = other.driverError;
+ databaseError = other.databaseError;
+ errorType = other.errorType;
+ errorNumber = other.errorNumber;
+ return *this;
+}
+
+/*!
+ Destroys the object and frees any allocated resources.
+*/
+
+TQSqlError::~TQSqlError()
+{
+}
+
+/*!
+ Returns the text of the error as reported by the driver. This may
+ contain database-specific descriptions.
+*/
+TQString TQSqlError::driverText() const
+{
+ return driverError;
+}
+
+/*!
+ Sets the driver error text to the value of \a driverText.
+*/
+
+void TQSqlError::setDriverText( const TQString& driverText )
+{
+ driverError = driverText;
+}
+
+/*!
+ Returns the text of the error as reported by the database. This
+ may contain database-specific descriptions.
+*/
+
+TQString TQSqlError::databaseText() const
+{
+ return databaseError;
+}
+
+/*!
+ Sets the database error text to the value of \a databaseText.
+*/
+
+void TQSqlError::setDatabaseText( const TQString& databaseText )
+{
+ databaseError = databaseText;
+}
+
+/*!
+ Returns the error type, or -1 if the type cannot be determined.
+
+ \sa TQSqlError::Type.
+*/
+
+int TQSqlError::type() const
+{
+ return errorType;
+}
+
+/*!
+ Sets the error type to the value of \a type.
+*/
+
+void TQSqlError::setType( int type )
+{
+ errorType = type;
+}
+
+/*!
+ Returns the database-specific error number, or -1 if it cannot be
+ determined.
+*/
+
+int TQSqlError::number() const
+{
+ return errorNumber;
+}
+
+/*!
+ Sets the database-specific error number to \a number.
+*/
+
+void TQSqlError::setNumber( int number )
+{
+ errorNumber = number;
+}
+
+/*!
+ This is a convenience function that returns databaseText() and
+ driverText() concatenated into a single string.
+
+ \sa showMessage(), driverText(), databaseText()
+*/
+
+TQString TQSqlError::text() const
+{
+ if ( databaseError.endsWith("\n") )
+ return databaseError + driverError;
+ else
+ return databaseError + " " + driverError;
+}
+
+/*!
+ \obsolete
+
+ This is a convenience function that pops up a TQMessageBox
+ containing the message returned by text(). An additional string
+ can be passed in via the \a msg parameter, which will be
+ concatenated with the text() message.
+
+ \sa text(), driverText(), databaseText()
+*/
+void TQSqlError::showMessage( const TQString& msg ) const
+{
+#ifndef TQT_NO_MESSAGEBOX
+ TQMessageBox::warning( NULL, "SQL Error", msg + text(),
+ TQMessageBox::Ok, TQMessageBox::NoButton );
+#endif // TQT_NO_MESSAGEBOX
+}
+#endif // TQT_NO_SQL