IBParam.cpp File Reference

#include <dcl/Config.h>
#include <stdlib.h>
#include <time.h>
#include <ibase.h>
#include <dcl/Object.h>
#include <dcl/SQLCore.h>
#include <dcl/BytesOutputStream.h>
#include <dcl/InputStream.h>
#include <dcl/Charset.h>
#include "IBConnection.h"
#include "IBQuery.h"
#include "IBParam.h"

Go to the source code of this file.

Macros
#define	__SQLTYPE_IS(_sqltype)

Functions
__DCL_BEGIN_NAMESPACE	IMPLEMENT_CLASSINFO (IBParam, SQL::Param) IBParam
const wchar_t *	__dataTypeName (const XSQLVAR *_sqlvar)
size_t	__MIN (size_t x, size_t y)

Macro Definition Documentation

__SQLTYPE_IS

#define __SQLTYPE_IS

(

_sqltype

)

Value:

((__sqltype & ~1) == _sqltype)

Function Documentation

__dataTypeName()

const wchar_t * __dataTypeName

(

const XSQLVAR *

_sqlvar

)

Definition at line 199 of file IBField.cpp.

{
    switch(_sqlvar->sqltype & ~1) {
        case SQL_SHORT:
        case SQL_LONG:
        case SQL_INT64: {
            if (_sqlvar->sqlscale) {
#ifdef __DCL_DEBUG
                switch (_sqlvar->sqltype & ~1) {
                    SQLTYPE_NAME(SQL_SHORT, "DECIMAL(16)");
                    SQLTYPE_NAME(SQL_LONG,  "DECIMAL(32)");
                    SQLTYPE_NAME(SQL_INT64, "DECIMAL(64)");
                }
#else
                return L"DECIMAL";
#endif
            }
            else {
                switch (_sqlvar->sqltype & ~1) {
                    SQLTYPE_NAME(SQL_SHORT, "SMALLINT");
                    SQLTYPE_NAME(SQL_LONG,  "INTEGER");
                    SQLTYPE_NAME(SQL_INT64, "INT64");
                }
            }
        }
        SQLTYPE_NAME(SQL_FLOAT,         "FLOAT");
        SQLTYPE_NAME(SQL_DOUBLE,        "DOUBLE");
        SQLTYPE_NAME(SQL_TYPE_TIME,     "TIME");
        SQLTYPE_NAME(SQL_TYPE_DATE,     "DATE");
        SQLTYPE_NAME(SQL_TIMESTAMP,     "TIMESTAMP");
        SQLTYPE_NAME(SQL_TEXT,          "CHAR");
        SQLTYPE_NAME(SQL_VARYING,       "VARCHAR");
        case SQL_BLOB: {
            if (_sqlvar->sqlsubtype == 1)
                return L"BLOB(TEXT)";
            else
                return L"BLOB";
        }
    }
    return L"Unknown Type: Driver is not Support";
}

__MIN()

size_t __MIN ( size_t x, size_t y )

inline

Definition at line 316 of file IBParam.cpp.

{
    return x < y ? x : y;
}

IMPLEMENT_CLASSINFO()

__DCL_BEGIN_NAMESPACE IMPLEMENT_CLASSINFO	(	IBParam	,
		SQL::Param	)

Definition at line 28 of file IBParam.cpp.

    : Param(NULL)
{
    __sqlvar = NULL;
}