sdconsts.pas

SQLDirect Component Library is a light-weight Borland Database Engine replacement for Borland Delphi

{*******************************************************}
{							}
{       Delphi SQLDirect Component Library		}
{       SQLDirect string constans    			}
{                                                       }
{       Copyright (c) 1997,2005 by Yuri Sheino		}
{                                                       }
{*******************************************************}

unit SDConsts;

interface

const
  SSQLDirectProductName = 'SQLDirect';
  SSQLDirectVersion     = '4.2.8';
  
  SLinkSQLDirectHome	= 'http://www.sqldirect-soft.com';
  SLinkSQLDirectStdOrder= 'http://www.shareit.com/programs/101656.htm';
  SLinkSQLDirectProOrder= 'http://www.shareit.com/programs/101657.htm';
  SLinkSQLDirectSupport	= 'mailto:[e-mail]';
  SErrOpenWwwSite	= 'Error opening following address: %s';
  srSQLDirect		= 'SQLDirect';

const
	{ constants for database's parameters }
  szUSERNAME    = 'USER NAME';
  szPASSWORD    = 'PASSWORD';

  szAPPNAME     = 'APPLICATION NAME';
  szHOSTNAME    = 'HOST NAME';
  szMAXCURSORS  = 'MAX CURSORS';
  szQUOTE_IDENT = 'QUOTE IDENTIFIER';           // use quoted (delimited) identifiers for automatically generated statements of a live querys and a table component
  szQUOTEDIDENT	= 'QUOTED IDENTIFIER';		// enable or disable to use of quoted identifiers (for MSSQL and Sybase)
  szSINGLECONN	= 'SINGLE CONNECTION';		// whether to use a single database process/connection (for MSSQL)
  szTDSPACKETSIZE   = 'TDS PACKET SIZE';	// TDS packet size (for OLEDB&MSSQL, Sybase)
  szRTRIMCHAROUTPUT = 'RTRIM CHAR OUTPUT';	// trim trailing spaces in the output of CHAR  datatype for Oracle. VARCHAR is returned without changes
  szENABLEINTS	= 'ENABLE INTEGERS';		// converts NUMERIC database field with no scale into integer field in an application, it has preference before "ENABLE BCD"
  szENABLEBCD	= 'ENABLE BCD';			// converts NUMERIC database field with scale (1-4) into BCD field in an application to exclude the rounding errors
  szENABLEMONEY	= 'ENABLE MONEY';		// converts NUMERIC database field with scale (1-4) into TCurrencyField in an application (for MySQL)
  szSQLDialect	= 'SQL Dialect';		// client SQL Dialect(1,2,3) for Interbase
  szLOCALCHARSET= 'LOCAL CHARSET';		// local charset for Interbase
  szROLENAME	= 'ROLE NAME';			// role name for Interbase and Oracle (connect as SYSDBA, SYSOPER)
  szAUTOCOMMIT	= 'AUTOCOMMIT';			// whether to use autocommit when transaction processing is not used explicitly
  szLOGINTIMEOUT= 'LOGIN TIMEOUT';		// number of seconds to wait for a login request
  szCMDTIMEOUT	= 'COMMAND TIMEOUT';		// number of seconds to wait for any request on the connection to complete
  szNEWPASSWORD	= 'NEW PASSWORD';		// it is used when a server returns 'Password expired' error
  szSERVERPORT	= 'SERVER PORT';		// number of a server port(non-default) for MySQL
  szXACONN	= 'XA CONNECTION';   		// whether to use RemoteDatabase as a service name of transaction monitor
  szTRANSLOGGING= 'TRANSACTION LOGGING';	// if it's equal FALSE, transaction logging is not performed (rollback is impossible) for SQLBase
  szMAXFIELDNAMELEN = 'MAXFIELDNAMELEN'; 	// max length of field names
  szMAXCHARPARAMLEN = 'MAXCHARPARAMLEN'; 	// defines maximum size of a buffer for string parameters, by default, it's equal 255
  szMAXSTRINGSIZE= 'MAX STRING SIZE';		// a limit of a string field size, larger fields will be considered as blob
  szFORCEOCI7 	= 'FORCE OCI7';			// force to use OCI7(SQL*Net 2.x - Oracle7 interface) to access Oracle server
  szCOMPRESSEDPROT = 'COMPRESSED PROTOCOL';	// whether to use the compressed client/server protocol for MySQL, by default it's True
  szENCRYPTION	= 'ENCRYPTION';			// whether to use encrypted password security handshaking (Sybase), by default it's false
  szPREFETCHROWS= 'PREFETCH ROWS';		// sets the number of rows to be prefetched (for Oracle8, DB2, Informmix, ODBC)(prefetching is not in effect if SELECT contains BLOB columns)
  szAPILIBRARY_FMT = '%s API LIBRARY';	 	// interface library
  szFIELDREQUIRED= 'FIELD REQUIRED';            // value of Required property of all TField
  szEMPTYSTRASNULL = 'EMPTY STRING AS NULL';    // empty string ('') is treated as NULL for parameter's values, default is False (for Sybase)
  szUSEOLEDB    = 'USE OLEDB';                  // use OLEDB connection, even ServerType is not equal stOLEDB, default is False (for MSSQL now)
  szBLOBPIECESIZE='BLOB PIECE SIZE';            // size of read/write blob piece (for SQLBase, ODBC, OLEDB, Oracle, Sybase)
  szSERVERCURSOR ='SERVER CURSOR';              // use server cursors, default is False (OLEDB, ODBC)
  szBYTE16ASGUID ='BYTE16 AS GUID';             // binary(16) and GUID columns will be considered as TGuidField (SQLServer). DB-Library returns both datatypes as binary.
  szANSINULLS   = 'ANSI NULLS';                 // set ANSI_NULLS (comparison) setting (MSSQL)
  szTRANSRETAINING = 'TRANSACTION RETAINING';   // when False, then force to set off commit/rollback retaining. Default value is True (Interbase, Firebird)
  szMAXBLOBSIZE = 'MAX BLOB SIZE';              // when it is required to restrict blob size of the selected data (ODBC&DB2 host)
  szUSEREGISTRYPATH= 'USE REGISTRY PATH';       // ??? use registry key to locate API library, when it is possible

  	{ aren't used now }
  szSERVERNAME	= 'SERVER NAME';
  szDATABASENAME= 'DATABASE NAME';

	{ Constans are used in GetSchemaInfo methods }
  CAT_NAME_FIELD 	= 'CATALOG_NAME';	// database, where it's possible
  SCH_NAME_FIELD 	= 'SCHEMA_NAME';	// owner
  TBL_NAME_FIELD 	= 'TABLE_NAME';
  TBL_TYPE_FIELD 	= 'TABLE_TYPE';
  PROC_NAME_FIELD 	= 'PROC_NAME';
  PROC_TYPE_FIELD 	= 'PROC_TYPE';
  PROC_IN_PARAMS	= 'IN_PARAMS';
  PROC_OUT_PARAMS	= 'OUT_PARAMS';

  COL_NAME_FIELD 	= 'COLUMN_NAME';
  COL_POS_FIELD 	= 'COLUMN_POSITION';
  COL_TYPE_FIELD 	= 'COLUMN_TYPE';
  COL_DATATYPE_FIELD 	= 'COLUMN_DATATYPE';
  COL_TYPENAME_FIELD 	= 'COLUMN_TYPENAME';
  COL_SUBTYPE_FIELD 	= 'COLUMN_SUBTYPE';
  COL_PREC_FIELD 	= 'COLUMN_PRECISION';
  COL_SCALE_FIELD 	= 'COLUMN_SCALE';
  COL_LENGTH_FIELD 	= 'COLUMN_LENGTH';
  COL_NULLABLE_FIELD 	= 'COLUMN_NULLABLE';
  COL_DEFAULT_FIELD 	= 'COLUMN_DEFAULT';

  PARAM_NAME_FIELD      = 'PARAM_NAME';
  PARAM_POS_FIELD 	= 'PARAM_POSITION';
  PARAM_TYPE_FIELD      = 'PARAM_TYPE';
  PARAM_DATATYPE_FIELD  = 'PARAM_DATATYPE';
  PARAM_TYPENAME_FIELD  = 'PARAM_TYPENAME';
  PARAM_PREC_FIELD      = 'PARAM_PRECISION';
  PARAM_SCALE_FIELD     = 'PARAM_SCALE';
  PARAM_LENGTH_FIELD    = 'PARAM_LENGTH';
  PARAM_NULLABLE_FIELD  = 'PARAM_NULLABLE';

  IDX_NAME_FIELD 	= 'INDEX_NAME';
  IDX_COL_NAME_FIELD 	= 'COLUMN_NAME';
  IDX_COL_POS_FIELD 	= 'COLUMN_POSITION';
  IDX_TYPE_FIELD 	= 'INDEX_TYPE';
  IDX_PKEY_NAME_FIELD 	= 'PKEY_NAME';
  IDX_SORT_FIELD 	= 'SORT_ORDER';
  IDX_FILTER_FIELD 	= 'INDEX_FILTER';

  PACKAGE_NAME_FIELD 	= 'OBJECT_NAME';

	// it's used to rename fields, which are not possible to remove from schema info result sets 
  OLD_FIELD_PREFIX = 'OLD_';

  	// Table types, which used in TSDDatabase.GetSchemaInfo 
  ttTable	= $1;
  ttView	= $2;
  ttSysTable	= $4;
  ttSynonym	= $8;
  ttTempTable	= $10;
  ttLocalTable	= $20;

  	// Index types and sort orders, which used in TSDDatabase.GetSchemaInfo
  NonUniqueIndexType	= $1;
  UniqueIndexType	= $2;
  PrimaryIndexType	= $4;

  AscSortOrder 		= 'A';
  DescSortOrder 	= 'D';
  
        // procedure types, which used in TSDDatabase.GetSchemaInfo
  ProcedureProcType  = 1;
  FunctionProcType   = 2;  

  DB2_SelectAutoIncField= 'VALUES IDENTITY_VAL_LOCAL()';
  Inf_SelectAutoIncField= 'select UNIQUE DBINFO ("sqlca.sqlerrd1") from SYSTABLES where TABID=1';
  MySql_SelectAutoIncField= 'select LAST_INSERT_ID()';
  SS_SelectAutoIncField= 'select CONVERT(int, @@IDENTITY)';	// for MS and Sybase SQL Server and ASA

  SQL_TOKEN_Select    = 'SELECT ';           { do not localize }

  CRChar        = #$0D;
  LFChar        = #$0A;
  SPChar        = #$20;  
  CRLFString = #$0D#$0A;
  FilterWildcard = '*';         // it could be used in Filter property