5a2a287752
* *
* partial sync with the 3.4 fork codebase. These are the things
synces for the most part:
- copyright headers
- grammar/typos in comments and some readmes
- comment/whitespace/decorations
- variable scoping in C files
- DO CASE/SWITCH and some other alternate syntax usage
- minimal amount of human readable text in strings
- minor code updates
- HB_TRACE() void * casts for pointers and few other changes to
avoid C compiler warnings
- various other, minor code cleanups
- only Harbour/C code/headers were touched in src, utils, contrib,
include. No 3rd party code, no make files, and with just a few
exceptions, no 'tests' code was touched.
- certain components were not touched were 3.4 diverged too much
already, like f.e. hbmk2, hbssl, hbcurl, hbexpat
- the goal was that no actual program logic should be altered by
these changes. Except some possible minor exceptions, any such
change is probably a bug in this patch.
It's a massive patch, if you find anything broken after it, please
open an Issue with the details. Build test was done on macOS.
The goal is make it easier to see what actual code/logic was changed
in 3.4 compared to 3.2 and to make patches easier to apply in both
ways.
1251 lines
54 KiB
C
1251 lines
54 KiB
C
/*
|
|
* Header file for the RDD API
|
|
*
|
|
* Copyright 1999 {list of individual authors and e-mail addresses}
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2, or (at your option)
|
|
* any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; see the file LICENSE.txt. If not, write to
|
|
* the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
|
|
* Boston, MA 02110-1301 USA (or visit https://www.gnu.org/licenses/).
|
|
*
|
|
* As a special exception, the Harbour Project gives permission for
|
|
* additional uses of the text contained in its release of Harbour.
|
|
*
|
|
* The exception is that, if you link the Harbour libraries with other
|
|
* files to produce an executable, this does not by itself cause the
|
|
* resulting executable to be covered by the GNU General Public License.
|
|
* Your use of that executable is in no way restricted on account of
|
|
* linking the Harbour library code into it.
|
|
*
|
|
* This exception does not however invalidate any other reasons why
|
|
* the executable file might be covered by the GNU General Public License.
|
|
*
|
|
* This exception applies only to the code released by the Harbour
|
|
* Project under the name Harbour. If you copy code from other
|
|
* Harbour Project or Free Software Foundation releases into a copy of
|
|
* Harbour, as the General Public License permits, the exception does
|
|
* not apply to the code that you add in this way. To avoid misleading
|
|
* anyone as to the status of such modified files, you must delete
|
|
* this exception notice from them.
|
|
*
|
|
* If you write modifications of your own for Harbour, it is your choice
|
|
* whether to permit this exception to apply to your modifications.
|
|
* If you do not wish that, delete this exception notice.
|
|
*
|
|
*/
|
|
|
|
#ifndef HB_APIRDD_H_
|
|
#define HB_APIRDD_H_
|
|
|
|
#include "hbapifs.h"
|
|
#include "dbinfo.ch" /* Constants for SELF_ORDINFO, SELF_INFO(), SELF_RECINFO() */
|
|
#include "dbstruct.ch" /* Constants for SELF_FIELDINFO() */
|
|
#include "hbapicdp.h"
|
|
|
|
HB_EXTERN_BEGIN
|
|
|
|
#define HB_RDD_MAX_DRIVERNAME_LEN 31
|
|
#define HB_RDD_MAX_ALIAS_LEN HB_SYMBOL_NAME_LEN
|
|
#define HB_RDD_MAX_AREA_NUM 65535
|
|
|
|
|
|
/* DBCMD errors */
|
|
|
|
#define EDBCMD_SEEK_BADPARAMETER 1001
|
|
#define EDBCMD_NOALIAS 1002
|
|
#define EDBCMD_NOVAR 1003
|
|
#define EDBCMD_USE_BADPARAMETER 1005
|
|
#define EDBCMD_REL_BADPARAMETER 1006
|
|
#define EDBCMD_ORDLSTADD_BADPARAMETER 1008
|
|
#define EDBCMD_FIELDNAME_BADPARAMETER 1009
|
|
#define EDBCMD_BADALIAS 1010
|
|
#define EDBCMD_DUPALIAS 1011
|
|
#define EDBCMD_DBCMDBADPARAMETER 1014
|
|
#define EDBCMD_BADPARAMETER 1015
|
|
#define EDBCMD_INFOBADPARAMETER 1032
|
|
#define EDBCMD_DBINFOBADPARAMETER 1034
|
|
#define EDBCMD_DBFILEPUTBADPARAMETER 1041
|
|
#define EDBCMD_DBFILEGETBADPARAMETER 1042
|
|
#define EDBCMD_NOTABLE 2001
|
|
#define EDBCMD_EVAL_BADPARAMETER 2019
|
|
|
|
|
|
|
|
/* Field types */
|
|
|
|
#define HB_FT_NONE 0
|
|
#define HB_FT_STRING 1 /* "C" */
|
|
#define HB_FT_LOGICAL 2 /* "L" */
|
|
#define HB_FT_DATE 3 /* "D" */
|
|
#define HB_FT_LONG 4 /* "N" */
|
|
#define HB_FT_FLOAT 5 /* "F" */
|
|
#define HB_FT_INTEGER 6 /* "I" */
|
|
#define HB_FT_DOUBLE 7 /* "B" */
|
|
#define HB_FT_TIME 8 /* "T" */
|
|
#define HB_FT_TIMESTAMP 9 /* "@" */
|
|
#define HB_FT_MODTIME 10 /* "=" */
|
|
#define HB_FT_ROWVER 11 /* "^" */
|
|
#define HB_FT_AUTOINC 12 /* "+" */
|
|
#define HB_FT_CURRENCY 13 /* "Y" */
|
|
#define HB_FT_CURDOUBLE 14 /* "Z" */
|
|
#define HB_FT_VARLENGTH 15 /* "Q" */
|
|
#define HB_FT_MEMO 16 /* "M" */
|
|
#define HB_FT_ANY 17 /* "V" */
|
|
#define HB_FT_IMAGE 18 /* "P" */
|
|
#define HB_FT_BLOB 19 /* "W" */
|
|
#define HB_FT_OLE 20 /* "G" */
|
|
|
|
|
|
|
|
/* Field flags */
|
|
|
|
#define HB_FF_HIDDEN 0x0001 /* System Column (not visible to user) */
|
|
#define HB_FF_NULLABLE 0x0002 /* Column can store null values */
|
|
#define HB_FF_BINARY 0x0004 /* Binary column */
|
|
#define HB_FF_AUTOINC 0x0008 /* Column is auto-incrementing */
|
|
#define HB_FF_COMPRESSED 0x0010 /* Column is compressed */
|
|
#define HB_FF_ENCRYPTED 0x0020 /* Column is encrypted */
|
|
#define HB_FF_UNICODE 0x0040 /* Column stores Unicode strings */
|
|
|
|
|
|
|
|
/* Flags for DBTRANSINFO */
|
|
|
|
#define DBTF_MATCH 0x0001
|
|
#define DBTF_PUTREC 0x0002
|
|
#define DBTF_CPYCTR 0x0004
|
|
#define DBTF_RECALL 0x0008
|
|
|
|
|
|
|
|
/* Codes for Locking methods */
|
|
|
|
#define DBLM_EXCLUSIVE 1
|
|
#define DBLM_MULTIPLE 2
|
|
#define DBLM_FILE 3
|
|
|
|
|
|
/* Codes for RawLock types */
|
|
|
|
#define FILE_LOCK 1
|
|
#define FILE_UNLOCK 2
|
|
#define REC_LOCK 3
|
|
#define REC_UNLOCK 4
|
|
#define HEADER_LOCK 5
|
|
#define HEADER_UNLOCK 6
|
|
#define APPEND_LOCK 7
|
|
#define APPEND_UNLOCK 8
|
|
|
|
|
|
|
|
/*
|
|
* Forward declarations
|
|
*/
|
|
struct _RDDFUNCS;
|
|
struct _AREA;
|
|
struct _RDDNODE;
|
|
|
|
|
|
/*
|
|
* DBFIELDINFO
|
|
* -----------
|
|
* The field structure
|
|
*/
|
|
|
|
typedef struct
|
|
{
|
|
const char * atomName; /* FIELD (symbol) name */
|
|
HB_USHORT uiType; /* FIELD type */
|
|
HB_USHORT uiTypeExtended; /* FIELD type extended */
|
|
HB_USHORT uiLen; /* Overall FIELD length */
|
|
HB_USHORT uiDec; /* Decimal places of numeric FIELD */
|
|
HB_USHORT uiFlags; /* FIELD flags */
|
|
HB_USHORT unused;
|
|
} DBFIELDINFO;
|
|
|
|
typedef DBFIELDINFO * LPDBFIELDINFO;
|
|
|
|
|
|
|
|
/*
|
|
* DBOPENINFO
|
|
* ----------
|
|
* The Open Info structure
|
|
*/
|
|
|
|
typedef struct
|
|
{
|
|
HB_USHORT uiArea; /* Work Area number of the data store */
|
|
HB_USHORT unused;
|
|
const char * abName; /* The qualified name of the data store */
|
|
const char * atomAlias; /* The logical name of the data store */
|
|
HB_BOOL fShared; /* Share mode of the data store */
|
|
HB_BOOL fReadonly; /* Readonly mode of the data store */
|
|
const char * cdpId; /* Id of a codepage */
|
|
HB_ULONG ulConnection; /* connection handler for RDDs which support it */
|
|
void * lpdbHeader; /* Pointer to a header of the data store */
|
|
} DBOPENINFO;
|
|
|
|
typedef DBOPENINFO * LPDBOPENINFO;
|
|
|
|
|
|
|
|
/*
|
|
* DBORDERCONDINFO
|
|
* ---------------
|
|
* The Create Order conditional Info structure
|
|
*/
|
|
|
|
typedef struct _DBORDERCONDINFO
|
|
{
|
|
HB_BOOL fActive;
|
|
char * abFor;
|
|
char * abWhile;
|
|
PHB_ITEM itmCobFor;
|
|
PHB_ITEM itmCobWhile;
|
|
PHB_ITEM itmCobEval;
|
|
HB_LONG lStep;
|
|
PHB_ITEM itmStartRecID;
|
|
HB_LONG lNextCount;
|
|
PHB_ITEM itmRecID;
|
|
HB_BOOL fRest;
|
|
HB_BOOL fDescending;
|
|
HB_BOOL fScoped;
|
|
HB_BOOL fAll;
|
|
HB_BOOL fAdditive;
|
|
HB_BOOL fUseCurrent;
|
|
HB_BOOL fCustom;
|
|
HB_BOOL fNoOptimize;
|
|
HB_BOOL fCompound;
|
|
HB_BOOL fUseFilter;
|
|
HB_BOOL fTemporary;
|
|
HB_BOOL fExclusive;
|
|
void * lpvCargo;
|
|
} DBORDERCONDINFO;
|
|
|
|
typedef DBORDERCONDINFO * LPDBORDERCONDINFO;
|
|
|
|
|
|
|
|
typedef struct
|
|
{
|
|
const char * abConstrName; /* Name of relational integrity constraint */
|
|
const char * abTargetName; /* Name of target relation table */
|
|
PHB_ITEM itmRelationKey; /* Array of columns in source table to match target primary key */
|
|
HB_BOOL fEnabled; /* Is constraint enabled ? */
|
|
} DBCONSTRAINTINFO;
|
|
|
|
typedef DBCONSTRAINTINFO * LPDBCONSTRAINTINFO;
|
|
|
|
|
|
/*
|
|
* DBORDERCREATE
|
|
* -------------
|
|
* The Create Order Info structure
|
|
*/
|
|
|
|
typedef struct
|
|
{
|
|
LPDBORDERCONDINFO lpdbOrdCondInfo; /* Conditional information */
|
|
const char * abBagName; /* Name of the Order bag */
|
|
const char* atomBagName; /* Name of the Order */
|
|
PHB_ITEM itmOrder;
|
|
HB_BOOL fUnique; /* Flag to determine if all keys are unique */
|
|
PHB_ITEM itmCobExpr; /* Code block containing the KEY expression */
|
|
PHB_ITEM abExpr; /* String containing the KEY expression */
|
|
LPDBCONSTRAINTINFO lpdbConstraintInfo; /* Relational constraint info */
|
|
} DBORDERCREATEINFO;
|
|
|
|
typedef DBORDERCREATEINFO * LPDBORDERCREATEINFO;
|
|
|
|
|
|
|
|
/*
|
|
* DBORDERINFO
|
|
* -----------
|
|
* The Set Index Info structure
|
|
*/
|
|
|
|
typedef struct
|
|
{
|
|
PHB_ITEM atomBagName; /* Name of the Order Bag */
|
|
PHB_ITEM itmOrder; /* Name or Number of the Order */
|
|
PHB_ITEM itmCobExpr; /* Code block containing the KEY expression */
|
|
PHB_ITEM itmResult; /* Operation result */
|
|
PHB_ITEM itmNewVal; /* New Setting */
|
|
HB_BOOL fAllTags; /* Open all tags */
|
|
} DBORDERINFO;
|
|
|
|
typedef DBORDERINFO * LPDBORDERINFO;
|
|
|
|
|
|
|
|
/*
|
|
* DBSCOPEINFO
|
|
* -----------
|
|
* The Scope Info structure
|
|
*/
|
|
|
|
typedef struct
|
|
{
|
|
PHB_ITEM itmCobFor; /* Code Block representation of a FOR clause */
|
|
PHB_ITEM lpstrFor; /* String representation of a FOR clause */
|
|
PHB_ITEM itmCobWhile; /* Code Block representation of a WHILE clause */
|
|
PHB_ITEM lpstrWhile; /* String representation of a WHILE clause */
|
|
PHB_ITEM lNext; /* NEXT record */
|
|
PHB_ITEM itmRecID; /* single record ID */
|
|
PHB_ITEM fRest; /* TRUE if start from the current record */
|
|
HB_BOOL fIgnoreFilter; /* process should ignore any filter condition */
|
|
HB_BOOL fIncludeDeleted; /* process should include deleted records */
|
|
HB_BOOL fLast; /* last record of the current scope required */
|
|
HB_BOOL fIgnoreDuplicates; /* process should ignore duplicate key value */
|
|
HB_BOOL fBackward; /* skip backward */
|
|
HB_BOOL fOptimized; /* Is (should be) scope optimized */
|
|
} DBSCOPEINFO;
|
|
|
|
typedef DBSCOPEINFO * LPDBSCOPEINFO;
|
|
|
|
|
|
/*
|
|
* DBORDSCOPEINFO
|
|
* --------------
|
|
* The Order Scope Info structure
|
|
*/
|
|
|
|
typedef struct
|
|
{
|
|
HB_USHORT nScope; /* scope operation: TOPSCOPE/ENDSCOPE */
|
|
HB_USHORT unused;
|
|
PHB_ITEM scopeValue;
|
|
} DBORDSCOPEINFO;
|
|
|
|
typedef DBORDSCOPEINFO * LPDBORDSCOPEINFO;
|
|
|
|
|
|
/*
|
|
* DBFILTERINFO
|
|
* ------------
|
|
* The Filter Info structure
|
|
*/
|
|
|
|
typedef struct
|
|
{
|
|
PHB_ITEM itmCobExpr; /* Block representation of the FILTER expression */
|
|
PHB_ITEM abFilterText; /* String representation of FILTER expression */
|
|
HB_BOOL fFilter; /* flag to indicate that filter is active */
|
|
HB_BOOL fOptimized; /* Is (should be) filter optimized */
|
|
void * lpvCargo; /* RDD specific extended filter info */
|
|
} DBFILTERINFO;
|
|
|
|
typedef DBFILTERINFO * LPDBFILTERINFO;
|
|
|
|
|
|
|
|
/*
|
|
* DBRELINFO
|
|
* ---------
|
|
* The Relationship Info structure
|
|
*/
|
|
|
|
typedef struct _DBRELINFO
|
|
{
|
|
PHB_ITEM itmCobExpr; /* Block representation of the relational SEEK key */
|
|
PHB_ITEM abKey; /* String representation of the relational SEEK key */
|
|
HB_BOOL isScoped; /* Is this relation scoped */
|
|
HB_BOOL isOptimized; /* Is relation optimized */
|
|
struct _AREA * lpaParent; /* The parent of this relation */
|
|
struct _AREA * lpaChild; /* The parents children */
|
|
struct _DBRELINFO * lpdbriNext; /* Next child or parent */
|
|
} DBRELINFO;
|
|
|
|
typedef DBRELINFO * LPDBRELINFO;
|
|
|
|
|
|
|
|
/*
|
|
* DBEVALINFO
|
|
* ----------
|
|
* The Evaluation Info structure
|
|
*
|
|
* Contains information necessary for a block evaluation
|
|
* on each record of the workarea
|
|
*/
|
|
|
|
typedef struct
|
|
{
|
|
PHB_ITEM itmBlock; /* The block to be evaluated */
|
|
PHB_ITEM abBlock; /* String representation of evaluated block */
|
|
DBSCOPEINFO dbsci; /* Scope info that limits the evaluation */
|
|
} DBEVALINFO;
|
|
|
|
typedef DBEVALINFO * LPDBEVALINFO;
|
|
|
|
/*
|
|
* NOTE: If your redefine Eval() method then you may use itmBlock as
|
|
* string ITEM to make some operations on server side of remote RDD.
|
|
*/
|
|
|
|
|
|
/*
|
|
* DBTRANSITEM
|
|
* -----------
|
|
* The Transfer Item structure
|
|
*
|
|
* Defines a single transfer item (usually a field) from
|
|
* one database to another; used by DBTRANSINFO
|
|
*/
|
|
|
|
typedef struct
|
|
{
|
|
HB_USHORT uiSource; /* Field index number from the source */
|
|
HB_USHORT uiDest; /* Destination field index number */
|
|
} DBTRANSITEM;
|
|
|
|
typedef DBTRANSITEM * LPDBTRANSITEM;
|
|
|
|
|
|
|
|
/*
|
|
* DBTRANSINFO
|
|
* -----------
|
|
* The Transfer Info structure
|
|
*
|
|
* Defines a global transfer of data items from on workarea
|
|
* to another
|
|
*/
|
|
|
|
typedef struct
|
|
{
|
|
struct _AREA * lpaSource; /* Pointer to source work area */
|
|
struct _AREA * lpaDest; /* Pointer to dest work area */
|
|
DBSCOPEINFO dbsci; /* Scope to limit transfer */
|
|
HB_USHORT uiFlags; /* Transfer attributes */
|
|
HB_USHORT uiItemCount; /* Number of items below */
|
|
LPDBTRANSITEM lpTransItems; /* Array of items */
|
|
} DBTRANSINFO;
|
|
|
|
typedef DBTRANSINFO * LPDBTRANSINFO;
|
|
|
|
|
|
|
|
/*
|
|
* DBSORTITEM
|
|
* ----------
|
|
* The Sort Item Structure
|
|
*
|
|
* An array of items that, together, indicate the key value to
|
|
* use while sorting data. The order of the array determines the
|
|
* order of the sorting.
|
|
*/
|
|
|
|
typedef struct
|
|
{
|
|
HB_USHORT uiField; /* Index into the workarea->fields structure */
|
|
HB_USHORT uiFlags; /* Sort flags */
|
|
} DBSORTITEM;
|
|
|
|
typedef DBSORTITEM * LPDBSORTITEM;
|
|
|
|
|
|
/* Flags for DBSORTITEM */
|
|
#define SF_ASCEND 1
|
|
#define SF_CASE 2
|
|
#define SF_DESCEND 4
|
|
#define SF_NUM 32
|
|
#define SF_DOUBLE 64
|
|
#define SF_LONG 128
|
|
|
|
|
|
|
|
/*
|
|
* DBSORTINFO
|
|
* ----------
|
|
* The Sort Info Structure
|
|
*
|
|
* Information for a physical sort on the workarea
|
|
*/
|
|
|
|
typedef struct
|
|
{
|
|
DBTRANSINFO dbtri; /* Destination workarea transfer information */
|
|
LPDBSORTITEM lpdbsItem; /* Fields which compose the key values for the sort */
|
|
HB_USHORT uiItemCount; /* The number of fields above */
|
|
HB_USHORT unused;
|
|
} DBSORTINFO;
|
|
|
|
typedef DBSORTINFO * LPDBSORTINFO;
|
|
|
|
|
|
|
|
/*
|
|
* DBLOCKINFO
|
|
* ----------
|
|
* The Lock Info Structure
|
|
*
|
|
* Information for a record or file lock
|
|
*/
|
|
|
|
typedef struct
|
|
{
|
|
PHB_ITEM itmRecID;
|
|
HB_USHORT uiMethod;
|
|
HB_USHORT fResult;
|
|
} DBLOCKINFO;
|
|
|
|
typedef DBLOCKINFO * LPDBLOCKINFO;
|
|
|
|
|
|
|
|
/*
|
|
* FIELD
|
|
* -----
|
|
* The Field structure
|
|
*
|
|
* This is the basic unit of access for a workarea
|
|
*/
|
|
|
|
typedef struct _FIELD
|
|
{
|
|
HB_USHORT uiType; /* Field type */
|
|
HB_USHORT uiTypeExtended; /* Field type - extended */
|
|
HB_USHORT uiLen; /* Field length */
|
|
HB_USHORT uiDec; /* Decimal length */
|
|
HB_USHORT uiFlags; /* FIELD flags */
|
|
HB_USHORT uiArea; /* Area this field resides in */
|
|
void * sym; /* Symbol that represents the field */
|
|
struct _FIELD * lpfNext; /* The next field in the list */
|
|
} FIELD;
|
|
|
|
typedef FIELD * LPFIELD;
|
|
|
|
/*
|
|
* prototype for function to evaluate against index keys
|
|
* only for local RDDs (DBFNTX, DBFCDX, ...)
|
|
*/
|
|
typedef void ( * HB_EVALSCOPE_FUNC )( HB_ULONG, HB_BYTE *, HB_ULONG, void * );
|
|
|
|
|
|
/*--------------------* WORKAREA structure *----------------------*/
|
|
|
|
/*
|
|
* WORKAREA
|
|
* --------
|
|
* The Workarea Structure
|
|
*
|
|
* Information to administrate the workarea
|
|
*/
|
|
|
|
typedef struct _AREA
|
|
{
|
|
struct _RDDFUNCS * lprfsHost; /* Virtual method table for this workarea */
|
|
#if 0
|
|
/* I'll add this soon, Druzus */
|
|
struct _RDDFUNCS * lprfsSuper;/* Virtual super method table for this workarea */
|
|
#endif
|
|
HB_USHORT uiArea; /* The number assigned to this workarea */
|
|
HB_USHORT rddID; /* RDD id */
|
|
void * atomAlias; /* Pointer to the alias symbol for this workarea */
|
|
HB_USHORT uiFieldExtent; /* Total number of fields allocated */
|
|
HB_USHORT uiFieldCount; /* Total number of fields used */
|
|
LPFIELD lpFields; /* Pointer to an array of fields */
|
|
void * lpFieldExtents; /* Void ptr for additional field properties */
|
|
PHB_ITEM valResult; /* All purpose result holder */
|
|
HB_BOOL fTop; /* HB_TRUE if "top" */
|
|
HB_BOOL fBottom; /* HB_TRUE if "bottom" */
|
|
HB_BOOL fBof; /* HB_TRUE if "bof" */
|
|
HB_BOOL fEof; /* HB_TRUE if "eof" */
|
|
HB_BOOL fFound; /* HB_TRUE if "found" */
|
|
DBSCOPEINFO dbsi; /* Info regarding last LOCATE */
|
|
DBFILTERINFO dbfi; /* Filter in effect */
|
|
LPDBORDERCONDINFO lpdbOrdCondInfo;
|
|
LPDBRELINFO lpdbRelations; /* Parent/Child relationships used */
|
|
HB_USHORT uiParents; /* Number of parents for this area */
|
|
HB_USHORT uiMaxFieldNameLength;
|
|
HB_USHORT heap;
|
|
HB_USHORT heapSize;
|
|
PHB_CODEPAGE cdPage; /* Area's codepage pointer */
|
|
} AREA;
|
|
|
|
typedef AREA * LPAREA;
|
|
|
|
#ifndef AREAP
|
|
#define AREAP LPAREA
|
|
#endif
|
|
|
|
|
|
/*--------------------* Virtual Method Table *----------------------*/
|
|
|
|
typedef HB_ERRCODE ( * DBENTRYP_V )( AREAP area );
|
|
typedef HB_ERRCODE ( * DBENTRYP_BP )( AREAP area, HB_BOOL * param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_B )( AREAP area, HB_BOOL param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_L )( AREAP area, HB_LONG param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_UL )( AREAP area, HB_ULONG param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_I )( AREAP area, PHB_ITEM param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_SI )( AREAP area, HB_USHORT index, PHB_ITEM param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_VO )( AREAP area, LPDBOPENINFO param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_VT )( AREAP area, LPDBTRANSINFO param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_VF )( AREAP area, LPDBFIELDINFO param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_VL )( AREAP area, LPDBLOCKINFO param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_VR )( AREAP area, LPDBRELINFO param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_VS )( AREAP area, LPDBSORTINFO param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_VFI )( AREAP area, LPDBFILTERINFO param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_VEI )( AREAP area, LPDBEVALINFO param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_VLO )( AREAP area, LPDBSCOPEINFO param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_VOC )( AREAP area, LPDBORDERCREATEINFO param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_VOO )( AREAP area, LPDBORDERCONDINFO param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_VOS )( AREAP area, LPDBORDSCOPEINFO param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_VOI )( AREAP area, LPDBORDERINFO param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_SVOI )( AREAP area, HB_USHORT index, LPDBORDERINFO param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_SP )( AREAP area, HB_USHORT * param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_P )( AREAP area, const HB_BYTE * param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_CP )( AREAP area, char * param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_CC )( AREAP area, const char * param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_PP )( AREAP area, HB_BYTE ** param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_S )( AREAP area, HB_USHORT param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_LP )( AREAP area, HB_LONG * param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_ULP )( AREAP area, HB_ULONG * param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_SVP )( AREAP area, HB_USHORT index, void * param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_SSP )( AREAP area, HB_USHORT index, HB_USHORT * param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_SCP )( AREAP area, HB_USHORT index, char * param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_SCCS )( AREAP area, HB_USHORT index, const char * param, HB_USHORT p3 );
|
|
typedef HB_ERRCODE ( * DBENTRYP_VSP )( AREAP area, HB_USHORT action, HB_ULONG lRecord );
|
|
typedef HB_ERRCODE ( * DBENTRYP_SVL )( AREAP area, HB_USHORT index, HB_ULONG * param );
|
|
typedef HB_ERRCODE ( * DBENTRYP_SSI )( AREAP area, HB_USHORT p1, HB_USHORT p2, PHB_ITEM p3 );
|
|
typedef HB_ERRCODE ( * DBENTRYP_ISI )( AREAP area, PHB_ITEM p1, HB_USHORT p2, PHB_ITEM p3 );
|
|
typedef HB_ERRCODE ( * DBENTRYP_BIB )( AREAP area, HB_BOOL p1, PHB_ITEM p2, HB_BOOL p3 );
|
|
typedef HB_ERRCODE ( * DBENTRYP_VPL )( AREAP area, void * p1, HB_LONG p2 );
|
|
typedef HB_ERRCODE ( * DBENTRYP_VPLP )( AREAP area, void * p1, HB_LONG * p2 );
|
|
typedef HB_ERRCODE ( * DBENTRYP_LSP )( AREAP area, HB_ULONG p1, HB_BOOL * p2 );
|
|
|
|
/* this methods DO USE take a Workarea but an RDDNODE */
|
|
|
|
typedef HB_ERRCODE ( * DBENTRYP_R )( struct _RDDNODE * pRDD );
|
|
typedef HB_ERRCODE ( * DBENTRYP_RVVL )( struct _RDDNODE * pRDD, PHB_ITEM p1, PHB_ITEM p2, HB_ULONG p3 );
|
|
typedef HB_ERRCODE ( * DBENTRYP_RVVVL )( struct _RDDNODE * pRDD, PHB_ITEM p1, PHB_ITEM p2, PHB_ITEM p3, HB_ULONG p4 );
|
|
typedef HB_ERRCODE ( * DBENTRYP_RSLV )( struct _RDDNODE * pRDD, HB_USHORT index, HB_ULONG p1, PHB_ITEM p2 );
|
|
/*--------------------* Virtual Method Table *----------------------*/
|
|
|
|
typedef struct _RDDFUNCS
|
|
{
|
|
/* Movement and positioning methods */
|
|
|
|
DBENTRYP_BP bof; /* Determine logical beginning of file. */
|
|
DBENTRYP_BP eof; /* Determine logical end of file. */
|
|
DBENTRYP_BP found; /* Determine outcome of the last search operation. */
|
|
DBENTRYP_V goBottom; /* Position cursor at the last record. */
|
|
DBENTRYP_UL go; /* Position cursor at a specific physical record. */
|
|
DBENTRYP_I goToId; /* Position the cursor to a specific, physical identity. */
|
|
DBENTRYP_V goTop; /* Position cursor at the first record. */
|
|
DBENTRYP_BIB seek; /* */
|
|
DBENTRYP_L skip; /* Reposition cursor relative to current position. */
|
|
DBENTRYP_L skipFilter; /*-Reposition cursor respecting any filter setting. */
|
|
DBENTRYP_L skipRaw; /* Reposition cursor, regardless of filter. */
|
|
|
|
|
|
/* Data management */
|
|
|
|
DBENTRYP_VF addField; /* Add a field to the WorkArea. */
|
|
DBENTRYP_B append; /* Append a record to the WorkArea. */
|
|
DBENTRYP_I createFields; /*-Add all fields defined in an array to the WorkArea. */
|
|
DBENTRYP_V deleterec; /* Delete a record. */
|
|
DBENTRYP_BP deleted; /* Determine deleted status for a record. */
|
|
DBENTRYP_SP fieldCount; /*-Determine the number of fields in the WorkArea. */
|
|
DBENTRYP_VF fieldDisplay; /* */
|
|
DBENTRYP_SSI fieldInfo; /*-Retrieve information about a field. */
|
|
DBENTRYP_SCP fieldName; /*-Determine the name associated with a field number. */
|
|
DBENTRYP_V flush; /* Write data buffer to the data store. */
|
|
DBENTRYP_PP getRec; /* */
|
|
DBENTRYP_SI getValue; /* Obtain the current value of a field. */
|
|
DBENTRYP_SVL getVarLen; /* Obtain the length of a field value. */
|
|
DBENTRYP_V goCold; /* Perform a write of WorkArea memory to the data store. */
|
|
DBENTRYP_V goHot; /* Mark the WorkArea data buffer as hot. */
|
|
DBENTRYP_P putRec; /* Replace the current record. */
|
|
DBENTRYP_SI putValue; /* Assign a value to a field. */
|
|
DBENTRYP_V recall; /* Undelete the current record. */
|
|
DBENTRYP_ULP reccount; /* Obtain number of records in WorkArea. */
|
|
DBENTRYP_ISI recInfo; /* */
|
|
DBENTRYP_ULP recno; /* Obtain physical row number at current WorkArea cursor position. */
|
|
DBENTRYP_I recid; /* Obtain physical row ID at current WorkArea cursor position. */
|
|
DBENTRYP_S setFieldExtent; /* Establish the extent of the array of fields for a WorkArea. */
|
|
|
|
|
|
/* WorkArea/Database management */
|
|
|
|
DBENTRYP_CP alias; /*-Obtain the alias of the WorkArea. */
|
|
DBENTRYP_V close; /* Close the table in the WorkArea. */
|
|
DBENTRYP_VO create; /* Create a data store in the specified WorkArea. */
|
|
DBENTRYP_SI info; /* Retrieve information about the current driver (DBI). */
|
|
DBENTRYP_V newarea; /* Clear the WorkArea for use. */
|
|
DBENTRYP_VO open; /* Open a data store in the WorkArea. */
|
|
DBENTRYP_V release; /*-Release all references to a WorkArea. */
|
|
DBENTRYP_SP structSize; /* Retrieve the size of the WorkArea structure. */
|
|
DBENTRYP_CP sysName; /* Obtain the name of replaceable database driver (RDD) subsystem. */
|
|
DBENTRYP_VEI dbEval; /*-Evaluate code block for each record in WorkArea. */
|
|
DBENTRYP_V pack; /* Remove records marked for deletion from a database. */
|
|
DBENTRYP_LSP packRec; /* */
|
|
DBENTRYP_VS sort; /* Physically reorder a database. */
|
|
DBENTRYP_VT trans; /* Copy one or more records from one WorkArea to another. */
|
|
DBENTRYP_VT transRec; /* Copy a record to another WorkArea. */
|
|
DBENTRYP_V zap; /* Physically remove all records from data store. */
|
|
|
|
|
|
/* Relational Methods */
|
|
|
|
DBENTRYP_VR childEnd; /* Report end of relation. */
|
|
DBENTRYP_VR childStart; /* Report initialization of a relation. */
|
|
DBENTRYP_VR childSync; /* Post a pending relational movement. */
|
|
DBENTRYP_V syncChildren; /*-Force relational movement in child WorkAreas. */
|
|
DBENTRYP_V clearRel; /* Clear all relations in the specified WorkArea. */
|
|
DBENTRYP_V forceRel; /* Force relational seeks in the specified WorkArea. */
|
|
DBENTRYP_SSP relArea; /*-Obtain the workarea number of the specified relation. */
|
|
DBENTRYP_VR relEval; /*-Evaluate a block against the relation in specified WorkArea. */
|
|
DBENTRYP_SI relText; /*-Obtain the character expression of the specified relation. */
|
|
DBENTRYP_VR setRel; /*-Set a relation in the parent file. */
|
|
|
|
|
|
/* Order Management */
|
|
|
|
DBENTRYP_VOI orderListAdd; /* */
|
|
DBENTRYP_V orderListClear; /* */
|
|
DBENTRYP_VOI orderListDelete; /* */
|
|
DBENTRYP_VOI orderListFocus; /* */
|
|
DBENTRYP_V orderListRebuild; /* */
|
|
DBENTRYP_VOO orderCondition; /* */
|
|
DBENTRYP_VOC orderCreate; /* */
|
|
DBENTRYP_VOI orderDestroy; /* */
|
|
DBENTRYP_SVOI orderInfo; /*-Retrieve information about the current order that SELF could not. */
|
|
|
|
|
|
/* Filters and Scope Settings */
|
|
|
|
DBENTRYP_V clearFilter; /*-Clear the active filter expression. */
|
|
DBENTRYP_V clearLocate; /*-Clear the active locate expression. */
|
|
DBENTRYP_V clearScope; /* */
|
|
DBENTRYP_VPLP countScope; /* */
|
|
DBENTRYP_I filterText; /*-Return filter condition of the specified WorkArea. */
|
|
DBENTRYP_SI scopeInfo; /* */
|
|
DBENTRYP_VFI setFilter; /* Set the filter condition for the specified WorkArea. */
|
|
DBENTRYP_VLO setLocate; /*-Set the locate scope for the specified WorkArea. */
|
|
DBENTRYP_VOS setScope; /* */
|
|
DBENTRYP_VPL skipScope; /* */
|
|
DBENTRYP_B locate; /* reposition cursor to positions set by setLocate */
|
|
|
|
|
|
/* Miscellaneous */
|
|
|
|
DBENTRYP_CC compile; /*-Compile a character expression. */
|
|
DBENTRYP_I error; /*-Raise a runtime error. */
|
|
DBENTRYP_I evalBlock; /*-Evaluate a code block. */
|
|
|
|
|
|
/* Network operations */
|
|
|
|
DBENTRYP_VSP rawlock; /* Perform a low-level network lock in the specified WorkArea. */
|
|
DBENTRYP_VL lock; /* Perform a network lock in the specified WorkArea. */
|
|
DBENTRYP_I unlock; /* Release network locks in the specified WorkArea. */
|
|
|
|
|
|
/* Memofile functions */
|
|
|
|
DBENTRYP_V closeMemFile; /* Close a memo file in the WorkArea. */
|
|
DBENTRYP_VO createMemFile; /* Create a memo file in the WorkArea. */
|
|
DBENTRYP_SCCS getValueFile; /* */
|
|
DBENTRYP_VO openMemFile; /* Open a memo file in the specified WorkArea. */
|
|
DBENTRYP_SCCS putValueFile; /* */
|
|
|
|
|
|
/* Database file header handling */
|
|
|
|
DBENTRYP_V readDBHeader; /* Read the database file header record in the WorkArea. */
|
|
DBENTRYP_V writeDBHeader; /* Write the database file header record in the WorkArea. */
|
|
|
|
|
|
/* non WorkArea functions */
|
|
|
|
DBENTRYP_R init; /* init RDD after registration */
|
|
DBENTRYP_R exit; /* unregister RDD */
|
|
DBENTRYP_RVVL drop; /* remove table or index */
|
|
DBENTRYP_RVVL exists; /* check if table or index exists */
|
|
DBENTRYP_RVVVL rename; /* rename table or index */
|
|
DBENTRYP_RSLV rddInfo; /* RDD info */
|
|
|
|
|
|
/* Special and reserved methods */
|
|
|
|
DBENTRYP_SVP whoCares; /* */
|
|
|
|
} RDDFUNCS;
|
|
|
|
typedef RDDFUNCS * PRDDFUNCS;
|
|
|
|
#define RDDFUNCSCOUNT ( sizeof( RDDFUNCS ) / sizeof( DBENTRYP_V ) )
|
|
|
|
/* RDD Node structure */
|
|
typedef struct _RDDNODE
|
|
{
|
|
char szName[ HB_RDD_MAX_DRIVERNAME_LEN + 1 ]; /* Name of RDD */
|
|
HB_USHORT rddID; /* RDD ID */
|
|
HB_USHORT uiType; /* Type of RDD */
|
|
HB_USHORT uiAreaSize; /* Size of the WorkArea */
|
|
HB_USHORT rddSuperID; /* ancestor RDD ID */
|
|
RDDFUNCS pTable; /* Table of functions */
|
|
RDDFUNCS pSuperTable; /* Table of super functions */
|
|
void *lpvCargo; /* RDD specific extended data, if used then
|
|
RDD should free it in EXIT() non WA method */
|
|
} RDDNODE;
|
|
|
|
typedef RDDNODE * LPRDDNODE;
|
|
|
|
/* RDD file/table name redirector function */
|
|
typedef LPRDDNODE ( * HB_RDDACCEPT )( LPRDDNODE pRddNode, const char * szFileName );
|
|
|
|
|
|
/*--------------------* SELF Methods *------------------------*/
|
|
|
|
/* Movement and positioning methods */
|
|
|
|
#define SELF_BOF(w, sp) ((*(w)->lprfsHost->bof)(w, sp))
|
|
#define SELF_EOF(w, sp) ((*(w)->lprfsHost->eof)(w, sp))
|
|
#define SELF_FOUND(w, sp) ((*(w)->lprfsHost->found)(w, sp))
|
|
#define SELF_GOTO(w, l) ((*(w)->lprfsHost->go)(w, l))
|
|
#define SELF_GOTOID(w, sp) ((*(w)->lprfsHost->goToId)(w, sp))
|
|
#define SELF_GOBOTTOM(w) ((*(w)->lprfsHost->goBottom)(w))
|
|
#define SELF_GOTOP(w) ((*(w)->lprfsHost->goTop)(w))
|
|
#define SELF_SEEK(w, i1, v, i2) ((*(w)->lprfsHost->seek)(w, i1, v, i2))
|
|
#define SELF_SKIP(w, l) ((*(w)->lprfsHost->skip)(w, l))
|
|
#define SELF_SKIPFILTER(w, l) ((*(w)->lprfsHost->skipFilter)(w, l))
|
|
#define SELF_SKIPRAW(w, l) ((*(w)->lprfsHost->skipRaw)(w, l))
|
|
|
|
|
|
/* Data management */
|
|
|
|
#define SELF_ADDFIELD(w, ip) ((*(w)->lprfsHost->addField)(w, ip))
|
|
#define SELF_APPEND(w, b) ((*(w)->lprfsHost->append)(w, b))
|
|
#define SELF_CREATEFIELDS(w, v) ((*(w)->lprfsHost->createFields)(w, v))
|
|
#define SELF_DELETE(w) ((*(w)->lprfsHost->deleterec)(w))
|
|
#define SELF_DELETED(w, sp) ((*(w)->lprfsHost->deleted)(w, sp))
|
|
#define SELF_FIELDCOUNT(w, sp) ((*(w)->lprfsHost->fieldCount)(w, sp))
|
|
#define SELF_FIELDDISPLAY(w, sp) ((*(w)->lprfsHost->fieldDisplay)(w, sp))
|
|
#define SELF_FIELDINFO(w,s1,s2,v) ((*(w)->lprfsHost->fieldInfo)(w,s1,s2,v))
|
|
#define SELF_FIELDNAME(w, i, bp) ((*(w)->lprfsHost->fieldName)(w, i, bp))
|
|
#define SELF_FLUSH(w) ((*(w)->lprfsHost->flush)(w))
|
|
#define SELF_GETREC(w, bpp) ((*(w)->lprfsHost->getRec)(w, bpp))
|
|
#define SELF_GETVALUE(w, i, v) ((*(w)->lprfsHost->getValue)(w, i, v))
|
|
#define SELF_GETVARLEN(w, i, lp) ((*(w)->lprfsHost->getVarLen)(w, i, lp))
|
|
#define SELF_GOCOLD(w) ((*(w)->lprfsHost->goCold)(w))
|
|
#define SELF_GOHOT(w) ((*(w)->lprfsHost->goHot)(w))
|
|
#define SELF_PUTVALUE(w, i, v) ((*(w)->lprfsHost->putValue)(w, i, v))
|
|
#define SELF_PUTREC(w, bp) ((*(w)->lprfsHost->putRec)(w, bp))
|
|
#define SELF_RECALL(w) ((*(w)->lprfsHost->recall)(w))
|
|
#define SELF_RECCOUNT(w, lp) ((*(w)->lprfsHost->reccount)(w, lp))
|
|
#define SELF_RECINFO(w,v1,i,v2) ((*(w)->lprfsHost->recInfo)(w,v1,i,v2))
|
|
#define SELF_RECNO(w, lp) ((*(w)->lprfsHost->recno)(w, lp))
|
|
#define SELF_RECID(w, i) ((*(w)->lprfsHost->recid)(w, i))
|
|
#define SELF_SETFIELDEXTENT(w, s) ((*(w)->lprfsHost->setFieldExtent)(w, s))
|
|
|
|
|
|
/* WorkArea/Database management */
|
|
|
|
#define SELF_ALIAS(w, bp) ((*(w)->lprfsHost->alias)(w, bp))
|
|
#define SELF_CLOSE(w) ((*(w)->lprfsHost->close)(w))
|
|
#define SELF_CREATE(w, ip) ((*(w)->lprfsHost->create)(w, ip))
|
|
#define SELF_INFO(w, i, g) ((*(w)->lprfsHost->info)(w, i, g))
|
|
#define SELF_NEW(w) ((*(w)->lprfsHost->newarea)(w))
|
|
#define SELF_OPEN(w, ip) ((*(w)->lprfsHost->open)(w, ip))
|
|
#define SELF_RELEASE(w) ((*(w)->lprfsHost->release)(w))
|
|
#define SELF_STRUCTSIZE(w, sp) ((*(w)->lprfsHost->structSize)(w,sp))
|
|
#define SELF_SYSNAME(w, bp) ((*(w)->lprfsHost->sysName)(w, bp))
|
|
#define SELF_DBEVAL(w, ip) ((*(w)->lprfsHost->dbEval)(w, ip))
|
|
#define SELF_PACK(w) ((*(w)->lprfsHost->pack)(w))
|
|
#define SELF_PACKREC(w, l, sp) ((*(w)->lprfsHost->packRec)(w, l, sp))
|
|
#define SELF_SORT(w, ip) ((*(w)->lprfsHost->sort)(w, ip))
|
|
#define SELF_TRANS(w, ip) ((*(w)->lprfsHost->trans)(w, ip))
|
|
#define SELF_TRANSREC(w, ip) ((*(w)->lprfsHost->transRec)(w, ip))
|
|
#define SELF_ZAP(w) ((*(w)->lprfsHost->zap)(w))
|
|
|
|
|
|
/* Relational Methods */
|
|
|
|
#define SELF_CHILDEND(w, ip) ((*(w)->lprfsHost->childEnd)(w, ip))
|
|
#define SELF_CHILDSTART(w, ip) ((*(w)->lprfsHost->childStart)(w, ip))
|
|
#define SELF_CHILDSYNC(w, ip) ((*(w)->lprfsHost->childSync)(w, ip))
|
|
#define SELF_SYNCCHILDREN(w) ((*(w)->lprfsHost->syncChildren)(w))
|
|
#define SELF_CLEARREL(w) ((*(w)->lprfsHost->clearRel)(w))
|
|
#define SELF_FORCEREL(w) ((*(w)->lprfsHost->forceRel)(w))
|
|
#define SELF_RELAREA(w, s, sp) ((*(w)->lprfsHost->relArea)(w, s, sp))
|
|
#define SELF_RELEVAL(w, ip) ((*(w)->lprfsHost->relEval)(w, ip))
|
|
#define SELF_RELTEXT(w, s, bp) ((*(w)->lprfsHost->relText)(w, s, bp))
|
|
#define SELF_SETREL(w, ip) ((*(w)->lprfsHost->setRel)(w, ip))
|
|
|
|
|
|
/* Order Management */
|
|
|
|
#define SELF_ORDLSTADD(w, lp) ((*(w)->lprfsHost->orderListAdd)(w, lp))
|
|
#define SELF_ORDLSTDELETE(w, lp) ((*(w)->lprfsHost->orderListDelete)(w, lp))
|
|
#define SELF_ORDLSTFOCUS(w, lp) ((*(w)->lprfsHost->orderListFocus)(w,lp))
|
|
#define SELF_ORDLSTREBUILD(w) ((*(w)->lprfsHost->orderListRebuild)(w))
|
|
#define SELF_ORDLSTCLEAR(w) ((*(w)->lprfsHost->orderListClear)(w))
|
|
#define SELF_ORDSETCOND(w, ip) ((*(w)->lprfsHost->orderCondition)(w, ip))
|
|
#define SELF_ORDCREATE(w, ip) ((*(w)->lprfsHost->orderCreate)(w, ip))
|
|
#define SELF_ORDDESTROY(w, p) ((*(w)->lprfsHost->orderDestroy)(w, p))
|
|
#define SELF_ORDINFO(w, i, p) ((*(w)->lprfsHost->orderInfo)(w, i, p))
|
|
#define SELF_ORDEXPR(w, p) ((*(w)->lprfsHost->orderInfo)(w, DBOI_EXPRESSION, p))
|
|
#define SELF_ORDCOND(w, p) ((*(w)->lprfsHost->orderInfo)(w, DBOI_CONDITION, p))
|
|
#define SELF_ORDRECNO(w, p) ((*(w)->lprfsHost->orderInfo)(w, DBOI_RECNO, p))
|
|
#define SELF_ORDPOS(w, p) ((*(w)->lprfsHost->orderInfo)(w, DBOI_POSITION, p))
|
|
#define SELF_ORDNUMBER(w, p) ((*(w)->lprfsHost->orderInfo)(w, DBOI_NUMBER, p))
|
|
#define SELF_ORDNAME(w, p) ((*(w)->lprfsHost->orderInfo)(w, DBOI_NAME, p))
|
|
#define SELF_ORDBAGNAME(w, p) ((*(w)->lprfsHost->orderInfo)(w, DBOI_BAGNAME, p))
|
|
#define SELF_ORDBAGEXT(w, p) ((*(w)->lprfsHost->orderInfo)(w, DBOI_BAGEXT, p))
|
|
|
|
|
|
/* Filters and Scope Settings */
|
|
|
|
#define SELF_CLEARFILTER(w) ((*(w)->lprfsHost->clearFilter)(w))
|
|
#define SELF_CLEARLOCATE(w) ((*(w)->lprfsHost->clearLocate)(w))
|
|
#define SELF_CLEARSCOPE(w) ((*(w)->lprfsHost->clearScope)(w))
|
|
#define SELF_COUNTSCOPE(w,ip,lp) ((*(w)->lprfsHost->countScope)(w,ip,lp))
|
|
#define SELF_FILTERTEXT(w, bp) ((*(w)->lprfsHost->filterText)(w, bp))
|
|
#define SELF_SCOPEINFO(w,i,v) ((*(w)->lprfsHost->scopeInfo)(w,i,v))
|
|
#define SELF_SETFILTER(w, ip) ((*(w)->lprfsHost->setFilter)(w, ip))
|
|
#define SELF_SETLOCATE(w, ip) ((*(w)->lprfsHost->setLocate)(w, ip))
|
|
#define SELF_SETSCOPE(w, ip) ((*(w)->lprfsHost->setScope)(w, ip))
|
|
#define SELF_SKIPSCOPE(w, bp, l) ((*(w)->lprfsHost->skipScope)(w, bp, l))
|
|
#define SELF_LOCATE(w, b) ((*(w)->lprfsHost->locate)(w, b))
|
|
|
|
|
|
/* Miscellaneous */
|
|
|
|
#define SELF_COMPILE(w, bp) ((*(w)->lprfsHost->compile)(w, bp))
|
|
#define SELF_ERROR(w, ip) ((*(w)->lprfsHost->error)(w, ip))
|
|
#define SELF_EVALBLOCK(w, v) ((*(w)->lprfsHost->evalBlock)(w, v))
|
|
|
|
|
|
/* Network operations */
|
|
|
|
#define SELF_GETLOCKS(w, g) ((*(w)->lprfsHost->info)(w, DBI_GETLOCKARRAY, g))
|
|
#define SELF_RAWLOCK(w, i, l) ((*(w)->lprfsHost->rawlock)(w, i, l))
|
|
#define SELF_LOCK(w, sp) ((*(w)->lprfsHost->lock)(w, sp))
|
|
#define SELF_UNLOCK(w, i) ((*(w)->lprfsHost->unlock)(w, i))
|
|
|
|
|
|
/* Memofile functions */
|
|
|
|
#define SELF_CLOSEMEMFILE(w) ((*(w)->lprfsHost->closeMemFile)(w))
|
|
#define SELF_CREATEMEMFILE(w,bp) ((*(w)->lprfsHost->createMemFile)(w,bp))
|
|
#define SELF_GETVALUEFILE(w,i,bp,u) ((*(w)->lprfsHost->getValueFile)(w,i,bp,u))
|
|
#define SELF_OPENMEMFILE(w,bp) ((*(w)->lprfsHost->openMemFile)(w,bp))
|
|
#define SELF_PUTVALUEFILE(w,i,bp,u) ((*(w)->lprfsHost->putValueFile)(w,i,bp,u))
|
|
|
|
|
|
/* Database file header handling */
|
|
|
|
#define SELF_READDBHEADER(w) ((*(w)->lprfsHost->readDBHeader)(w))
|
|
#define SELF_WRITEDBHEADER(w) ((*(w)->lprfsHost->writeDBHeader)(w))
|
|
|
|
|
|
/* Info operations */
|
|
|
|
#define SELF_RECSIZE(w, lp) ((*(w)->lprfsHost->info)(w, DBI_GETRECSIZE, lp))
|
|
#define SELF_HEADERSIZE(w, fp) ((*(w)->lprfsHost->info)(w, DBI_GETHEADERSIZE, fp))
|
|
#define SELF_LUPDATE(w, fp) ((*(w)->lprfsHost->info)(w, DBI_LASTUPDATE, fp ))
|
|
#define SELF_SETDELIM(w, fp) ((*(w)->lprfsHost->info)(w, DBI_SETDELIMITER, fp))
|
|
#define SELF_GETDELIM(w, fp) ((*(w)->lprfsHost->info)(w, DBI_GETDELIMITER, fp))
|
|
#define SELF_TABLEEXT(w, fp) ((*(w)->lprfsHost->info)(w, DBI_TABLEEXT, fp))
|
|
|
|
#define SELF_RDDNODE(w) hb_rddGetNode((w)->rddID)
|
|
|
|
/* non WorkArea functions */
|
|
#define SELF_INIT(r) ((*(r)->pTable.init)(r))
|
|
#define SELF_EXIT(r) ((*(r)->pTable.exit)(r))
|
|
#define SELF_DROP(r, it, ii, l) ((*(r)->pTable.drop)(r, it, ii, l))
|
|
#define SELF_EXISTS(r, it, ii, l) ((*(r)->pTable.exists)(r, it, ii, l))
|
|
#define SELF_RENAME(r, it, ii, in, l) ((*(r)->pTable.rename)(r, it, ii, in, l))
|
|
#define SELF_RDDINFO(r, i, l, g) ((*(r)->pTable.rddInfo)(r, i, l, g))
|
|
|
|
|
|
/*--------------------* SUPER Methods *------------------------*/
|
|
|
|
#ifndef _SUPERTABLE
|
|
#define _SUPERTABLE(w) SUPERTABLE
|
|
#endif
|
|
#ifndef __SUPERTABLE
|
|
#define __SUPERTABLE(w) SUPERTABLE
|
|
#endif
|
|
|
|
/* Movement and positioning methods */
|
|
|
|
#define SUPER_BOF(w, sp) ((*(_SUPERTABLE(w))->bof)(w, sp))
|
|
#define SUPER_EOF(w, sp) ((*(_SUPERTABLE(w))->eof)(w, sp))
|
|
#define SUPER_FOUND(w, sp) ((*(_SUPERTABLE(w))->found)(w, sp))
|
|
#define SUPER_GOTO(w, l) ((*(_SUPERTABLE(w))->go)(w, l))
|
|
#define SUPER_GOTOID(w, sp) ((*(_SUPERTABLE(w))->goToId)(w, sp))
|
|
#define SUPER_GOBOTTOM(w) ((*(_SUPERTABLE(w))->goBottom)(w))
|
|
#define SUPER_GOTOP(w) ((*(_SUPERTABLE(w))->goTop)(w))
|
|
#define SUPER_SEEK(w, i1, v, i2) ((*(_SUPERTABLE(w))->seek)(w, i1, v, i2))
|
|
#define SUPER_SKIP(w, l) ((*(_SUPERTABLE(w))->skip)(w, l))
|
|
#define SUPER_SKIPFILTER(w, l) ((*(_SUPERTABLE(w))->skipFilter)(w, l))
|
|
#define SUPER_SKIPRAW(w, l) ((*(_SUPERTABLE(w))->skipRaw)(w, l))
|
|
|
|
|
|
/* Data management */
|
|
|
|
#define SUPER_ADDFIELD(w, ip) ((*(_SUPERTABLE(w))->addField)(w, ip))
|
|
#define SUPER_APPEND(w, b) ((*(_SUPERTABLE(w))->append)(w, b))
|
|
#define SUPER_CREATEFIELDS(w, v) ((*(_SUPERTABLE(w))->createFields)(w, v))
|
|
#define SUPER_DELETE(w) ((*(_SUPERTABLE(w))->deleterec)(w))
|
|
#define SUPER_DELETED(w, sp) ((*(_SUPERTABLE(w))->deleted)(w, sp))
|
|
#define SUPER_FIELDCOUNT(w, sp) ((*(_SUPERTABLE(w))->fieldCount)(w, sp))
|
|
#define SUPER_FIELDDISPLAY(w, sp) ((*(_SUPERTABLE(w))->fieldDisplay)(w, sp))
|
|
#define SUPER_FIELDINFO(w,s1,s2,v) ((*(_SUPERTABLE(w))->fieldInfo)(w,s1,s2,v))
|
|
#define SUPER_FIELDNAME(w, i, bp) ((*(_SUPERTABLE(w))->fieldName)(w, i, bp))
|
|
#define SUPER_FLUSH(w) ((*(_SUPERTABLE(w))->flush)(w))
|
|
#define SUPER_GETREC(w, bpp) ((*(_SUPERTABLE(w))->getRec)(w, bpp))
|
|
#define SUPER_GETVALUE(w, i, v) ((*(_SUPERTABLE(w))->getValue)(w, i, v))
|
|
#define SUPER_GETVARLEN(w, i, lp) ((*(_SUPERTABLE(w))->getVarLen)(w, i, lp))
|
|
#define SUPER_GOCOLD(w) ((*(_SUPERTABLE(w))->goCold)(w))
|
|
#define SUPER_GOHOT(w) ((*(_SUPERTABLE(w))->goHot)(w))
|
|
#define SUPER_PUTVALUE(w, i, v) ((*(_SUPERTABLE(w))->putValue)(w, i, v))
|
|
#define SUPER_PUTREC(w, bp) ((*(_SUPERTABLE(w))->putRec)(w, bp))
|
|
#define SUPER_RECALL(w) ((*(_SUPERTABLE(w))->recall)(w))
|
|
#define SUPER_RECCOUNT(w, lp) ((*(_SUPERTABLE(w))->reccount)(w, lp))
|
|
#define SUPER_RECINFO(w,v1,i,v2) ((*(_SUPERTABLE(w))->recInfo)(w,v1,i,v2))
|
|
#define SUPER_RECNO(w, lp) ((*(_SUPERTABLE(w))->recno)(w, lp))
|
|
#define SUPER_RECID(w, i) ((*(_SUPERTABLE(w))->recid)(w, i))
|
|
#define SUPER_SETFIELDEXTENT(w, s) ((*(_SUPERTABLE(w))->setFieldExtent)(w, s))
|
|
|
|
|
|
/* WorkArea/Database management */
|
|
|
|
#define SUPER_ALIAS(w, bp) ((*(_SUPERTABLE(w))->alias)(w, bp))
|
|
#define SUPER_CLOSE(w) ((*(_SUPERTABLE(w))->close)(w))
|
|
#define SUPER_CREATE(w, ip) ((*(_SUPERTABLE(w))->create)(w, ip))
|
|
#define SUPER_INFO(w, i, g) ((*(_SUPERTABLE(w))->info)(w, i, g))
|
|
#define SUPER_NEW(w) ((*(_SUPERTABLE(w))->newarea)(w))
|
|
#define SUPER_OPEN(w, ip) ((*(_SUPERTABLE(w))->open)(w, ip))
|
|
#define SUPER_RELEASE(w) ((*(_SUPERTABLE(w))->release)(w))
|
|
#define SUPER_STRUCTSIZE(w, sp) ((*(_SUPERTABLE(w))->structSize)(w, sp))
|
|
#define SUPER_SYSNAME(w, bp) ((*(_SUPERTABLE(w))->sysName)(w, bp))
|
|
#define SUPER_DBEVAL(w, ip) ((*(_SUPERTABLE(w))->dbEval)(w, ip))
|
|
#define SUPER_PACK(w) ((*(_SUPERTABLE(w))->pack)(w))
|
|
#define SUPER_PACKREC(w, l, sp) ((*(_SUPERTABLE(w))->packRec)(w, l, sp))
|
|
#define SUPER_SORT(w, ip) ((*(_SUPERTABLE(w))->sort)(w, ip))
|
|
#define SUPER_TRANS(w, ip) ((*(_SUPERTABLE(w))->trans)(w, ip))
|
|
#define SUPER_TRANSREC(w, ip) ((*(_SUPERTABLE(w))->transRec)(w, ip))
|
|
#define SUPER_ZAP(w) ((*(_SUPERTABLE(w))->zap)(w))
|
|
|
|
|
|
/* Relational Methods */
|
|
|
|
#define SUPER_CHILDEND(w, ip) ((*(_SUPERTABLE(w))->childEnd)(w, ip))
|
|
#define SUPER_CHILDSTART(w, ip) ((*(_SUPERTABLE(w))->childStart)(w, ip))
|
|
#define SUPER_CHILDSYNC(w, ip) ((*(_SUPERTABLE(w))->childSync)(w, ip))
|
|
#define SUPER_SYNCCHILDREN(w) ((*(_SUPERTABLE(w))->syncChildren)(w))
|
|
#define SUPER_CLEARREL(w) ((*(_SUPERTABLE(w))->clearRel)(w))
|
|
#define SUPER_FORCEREL(w) ((*(_SUPERTABLE(w))->forceRel)(w))
|
|
#define SUPER_RELAREA(w, s, sp) ((*(_SUPERTABLE(w))->relArea)(w, s, sp))
|
|
#define SUPER_RELEVAL(w, ip) ((*(_SUPERTABLE(w))->relEval)(w, ip))
|
|
#define SUPER_RELTEXT(w, s, bp) ((*(_SUPERTABLE(w))->relText)(w, s, bp))
|
|
#define SUPER_SETREL(w, ip) ((*(_SUPERTABLE(w))->setRel)(w, ip))
|
|
|
|
|
|
/* Order Management */
|
|
|
|
#define SUPER_ORDLSTADD(w, lp) ((*(_SUPERTABLE(w))->orderListAdd)(w, lp))
|
|
#define SUPER_ORDLSTDELETE(w, lp) ((*(_SUPERTABLE(w))->orderListDelete)(w, lp))
|
|
#define SUPER_ORDLSTFOCUS(w, lp) ((*(_SUPERTABLE(w))->orderListFocus)(w, lp))
|
|
#define SUPER_ORDLSTREBUILD(w) ((*(_SUPERTABLE(w))->orderListRebuild)(w))
|
|
#define SUPER_ORDLSTCLEAR(w) ((*(_SUPERTABLE(w))->orderListClear)(w))
|
|
#define SUPER_ORDSETCOND(w,ip) ((*(_SUPERTABLE(w))->orderCondition)(w, ip))
|
|
#define SUPER_ORDCREATE(w, ip) ((*(_SUPERTABLE(w))->orderCreate)(w, ip))
|
|
#define SUPER_ORDDESTROY(w, ip) ((*(_SUPERTABLE(w))->orderDestroy)(w, ip))
|
|
#define SUPER_ORDDELETE(w, ip) ((*(_SUPERTABLE(w))->orderDelete)(w, ip))
|
|
#define SUPER_ORDINFO(w, i, p) ((*(_SUPERTABLE(w))->orderInfo)(w, i, p))
|
|
#define SUPER_ORDEXPR(w, p) ((*(_SUPERTABLE(w))->orderInfo)(w, DBOI_EXPRESSION, p))
|
|
#define SUPER_ORDCOND(w, p) ((*(_SUPERTABLE(w))->orderInfo)(w, DBOI_CONDITION, p))
|
|
#define SUPER_ORDRECNO(w, p) ((*(_SUPERTABLE(w))->orderInfo)(w, DBOI_RECNO, p))
|
|
#define SUPER_ORDPOS(w, p) ((*(_SUPERTABLE(w))->orderInfo)(w, DBOI_POSITION, p))
|
|
#define SUPER_ORDNUMBER(w, p) ((*(_SUPERTABLE(w))->orderInfo)(w, DBOI_NUMBER, p))
|
|
#define SUPER_ORDNAME(w, p) ((*(_SUPERTABLE(w))->orderInfo)(w, DBOI_NAME, p))
|
|
#define SUPER_ORDBAGNAME(w, p) ((*(_SUPERTABLE(w))->orderInfo)(w, DBOI_BAGNAME, p))
|
|
#define SUPER_ORDBAGEXT(w, p) ((*(_SUPERTABLE(w))->orderInfo)(w, DBOI_BAGEXT, p))
|
|
|
|
|
|
/* Filters and Scope Settings */
|
|
|
|
#define SUPER_CLEARFILTER(w) ((*(_SUPERTABLE(w))->clearFilter)(w))
|
|
#define SUPER_CLEARLOCATE(w) ((*(_SUPERTABLE(w))->clearLocate)(w))
|
|
#define SUPER_CLEARSCOPE(w) ((*(_SUPERTABLE(w))->clearScope)(w))
|
|
#define SUPER_COUNTSCOPE(w,ip,lp) ((*(_SUPERTABLE(w))->countScope)(w,ip,lp))
|
|
#define SUPER_FILTERTEXT(w, bp) ((*(_SUPERTABLE(w))->filterText)(w, bp))
|
|
#define SUPER_SCOPEINFO(w,i,v) ((*(_SUPERTABLE(w))->scopeInfo)(w,i,v))
|
|
#define SUPER_SETFILTER(w, ip) ((*(_SUPERTABLE(w))->setFilter)(w, ip))
|
|
#define SUPER_SETLOCATE(w, ip) ((*(_SUPERTABLE(w))->setLocate)(w, ip))
|
|
#define SUPER_SETSCOPE(w, ip) ((*(_SUPERTABLE(w))->setScope)(w, ip))
|
|
#define SUPER_SKIPSCOPE(w, bp, l) ((*(_SUPERTABLE(w))->skipScope)(w, bp, l))
|
|
#define SUPER_LOCATE(w, b) ((*(_SUPERTABLE(w))->locate)(w, b))
|
|
|
|
|
|
/* Miscellaneous */
|
|
|
|
#define SUPER_COMPILE(w, bp) ((*(_SUPERTABLE(w))->compile)(w, bp))
|
|
#define SUPER_ERROR(w, ip) ((*(_SUPERTABLE(w))->error)(w, ip))
|
|
#define SUPER_EVALBLOCK(w, v) ((*(_SUPERTABLE(w))->evalBlock)(w, v))
|
|
|
|
|
|
/* Network operations */
|
|
|
|
#define SUPER_GETLOCKS(w, g) ((*(_SUPERTABLE(w))->info)(w, DBI_GETLOCKARRAY, g))
|
|
#define SUPER_RAWLOCK(w, i, l) ((*(_SUPERTABLE(w))->rawlock)(w, i, l))
|
|
#define SUPER_LOCK(w, sp) ((*(_SUPERTABLE(w))->lock)(w, sp))
|
|
#define SUPER_UNLOCK(w, i) ((*(_SUPERTABLE(w))->unlock)(w, i))
|
|
|
|
|
|
/* Memofile functions */
|
|
|
|
#define SUPER_CLOSEMEMFILE(w) ((*(_SUPERTABLE(w))->closeMemFile)(w))
|
|
#define SUPER_CREATEMEMFILE(w,bp) ((*(_SUPERTABLE(w))->createMemFile)(w,bp))
|
|
#define SUPER_GETVALUEFILE(w,i,bp,u) ((*(_SUPERTABLE(w))->getValueFile)(w,i,bp,u))
|
|
#define SUPER_OPENMEMFILE(w,bp) ((*(_SUPERTABLE(w))->openMemFile)(w,bp))
|
|
#define SUPER_PUTVALUEFILE(w,i,bp,u) ((*(_SUPERTABLE(w))->putValueFile)(w,i,bp,u))
|
|
|
|
|
|
/* Database file header handling */
|
|
|
|
#define SUPER_READDBHEADER(w) ((*(_SUPERTABLE(w))->readDBHeader)(w))
|
|
#define SUPER_WRITEDBHEADER(w) ((*(_SUPERTABLE(w))->writeDBHeader)(w))
|
|
|
|
|
|
/* Info operations */
|
|
|
|
#define SUPER_RECSIZE(w, lp) ((*(_SUPERTABLE(w))->info)(w, DBI_GETRECSIZE, lp))
|
|
#define SUPER_HEADERSIZE(w, fp) ((*(_SUPERTABLE(w))->info)(w, DBI_GETHEADERSIZE, fp))
|
|
#define SUPER_LUPDATE(w, fp) ((*(_SUPERTABLE(w))->info)(w, DBI_LASTUPDATE, fp ))
|
|
#define SUPER_SETDELIM(w, fp) ((*(_SUPERTABLE(w))->info)(w, DBI_SETDELIMITER, fp))
|
|
#define SUPER_GETDELIM(w, fp) ((*(_SUPERTABLE(w))->info)(w, DBI_GETDELIMITER, fp))
|
|
#define SUPER_TABLEEXT(w, fp) ((*(_SUPERTABLE(w))->info)(w, DBI_TABLEEXT, fp))
|
|
|
|
/* non WorkArea functions */
|
|
#define SUPER_INIT(r) ((*(__SUPERTABLE(r))->init)(r))
|
|
#define SUPER_EXIT(r) ((*(__SUPERTABLE(r))->exit)(r))
|
|
#define SUPER_DROP(r, it, ii, l) ((*(__SUPERTABLE(r))->drop)(r, it, ii, l))
|
|
#define SUPER_EXISTS(r, it, ii, l) ((*(__SUPERTABLE(r))->exists)(r, it, ii, l))
|
|
#define SUPER_RENAME(r, it, ii, in, l) ((*(__SUPERTABLE(r))->rename)(r, it, ii, in, l))
|
|
#define SUPER_RDDINFO(r, i, l, g) ((*(__SUPERTABLE(r))->rddInfo)(r, i, l, g))
|
|
|
|
#define ISSUPER_INIT(r) ((__SUPERTABLE(r))->init != NULL)
|
|
#define ISSUPER_EXIT(r) ((__SUPERTABLE(r))->exit != NULL)
|
|
|
|
/*
|
|
* PROTOTYPES
|
|
* ----------
|
|
*/
|
|
|
|
|
|
/* internal RDD functions */
|
|
extern void hb_rddCloseDetachedAreas( void );
|
|
|
|
/* RDD virtual machine integration functions */
|
|
extern HB_EXPORT void hb_rddShutDown( void );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddGetFieldValue( PHB_ITEM pItem, PHB_SYMB pFieldSymbol );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddPutFieldValue( PHB_ITEM pItem, PHB_SYMB pFieldSymbol );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddFieldGet( PHB_ITEM pItem, PHB_SYMB pFieldSymbol );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddFieldPut( PHB_ITEM pItem, PHB_SYMB pFieldSymbol );
|
|
extern HB_EXPORT int hb_rddGetCurrentWorkAreaNumber( void );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddSelectWorkAreaNumber( int iArea );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddSelectWorkAreaAlias( const char * szAlias );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddSelectWorkAreaSymbol( PHB_SYMB pSymAlias );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddGetAliasNumber( const char * szAlias, int * iArea );
|
|
|
|
/* other functions */
|
|
extern HB_EXPORT void * hb_rddAllocWorkAreaAlias( const char * szAlias, int iArea );
|
|
extern HB_EXPORT void * hb_rddGetCurrentWorkAreaPointer( void );
|
|
extern HB_EXPORT void * hb_rddGetWorkAreaPointer( int iArea );
|
|
extern HB_EXPORT HB_USHORT hb_rddInsertAreaNode( const char *szDriver );
|
|
extern HB_EXPORT void hb_rddReleaseCurrentArea( void );
|
|
|
|
extern HB_EXPORT int hb_rddRegister( const char * szDriver, HB_USHORT uiType );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddInherit( RDDFUNCS * pTable, const RDDFUNCS * pSubTable, RDDFUNCS * pSuperTable, const char * szDrvName );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddInheritEx( RDDFUNCS * pTable, const RDDFUNCS * pSubTable, RDDFUNCS * pSuperTable, const char * szDrvName, HB_USHORT * puiSuperRddId );
|
|
extern HB_EXPORT HB_BOOL hb_rddIsDerivedFrom( HB_USHORT uiRddID, HB_USHORT uiSuperRddID );
|
|
extern HB_EXPORT LPRDDNODE hb_rddGetNode( HB_USHORT uiNode );
|
|
extern HB_EXPORT LPRDDNODE hb_rddFindNode( const char * szDriver, HB_USHORT * uiIndex );
|
|
extern HB_EXPORT LPRDDNODE hb_rddFindFileNode( LPRDDNODE pRddNode, const char * szFileName );
|
|
extern HB_EXPORT void hb_rddSetFileRedirector( HB_RDDACCEPT funcAccept, HB_BOOL fEnable );
|
|
extern HB_EXPORT HB_USHORT hb_rddFieldIndex( AREAP pArea, const char * szName );
|
|
extern HB_EXPORT HB_USHORT hb_rddFieldExpIndex( AREAP pArea, const char * szField );
|
|
extern HB_EXPORT const char * hb_rddFindDrv( const char * szDriver, const char * szFileName );
|
|
extern HB_EXPORT const char * hb_rddDefaultDrv( const char * szDriver );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddSelectFirstAvailable( void );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddVerifyAliasName( const char * szAlias );
|
|
extern HB_EXPORT void * hb_rddNewAreaNode( LPRDDNODE pRddNode, HB_USHORT uiRddID );
|
|
extern HB_EXPORT PHB_ITEM hb_rddList( HB_USHORT uiType );
|
|
extern HB_EXPORT void hb_rddCloseAll( void );
|
|
extern HB_EXPORT void hb_rddFlushAll( void );
|
|
extern HB_EXPORT void hb_rddUnLockAll( void );
|
|
extern HB_EXPORT HB_BOOL hb_rddGetNetErr( void );
|
|
extern HB_EXPORT void hb_rddSetNetErr( HB_BOOL fNetErr );
|
|
|
|
extern HB_EXPORT HB_ERRCODE hb_rddOpenTable(
|
|
const char * szFileName, const char * szDriver,
|
|
HB_USHORT uiArea, const char *szAlias,
|
|
HB_BOOL fShared, HB_BOOL fReadonly,
|
|
const char * szCpId, HB_ULONG ulConnection,
|
|
PHB_ITEM pStruct, PHB_ITEM pDelim );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddCreateTable(
|
|
const char * szFileName, const char * szDriver,
|
|
HB_USHORT uiArea, const char *szAlias,
|
|
HB_BOOL fKeepOpen,
|
|
const char * szCpId, HB_ULONG ulConnection,
|
|
PHB_ITEM pStruct, PHB_ITEM pDelim );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddCreateTableTemp(
|
|
const char * szDriver,
|
|
const char * szAlias,
|
|
const char * szCpId, HB_ULONG ulConnection,
|
|
PHB_ITEM pStruct );
|
|
extern HB_EXPORT HB_ERRCODE hb_dbTransCounters( LPDBTRANSINFO lpdbTransInfo );
|
|
extern HB_EXPORT PHB_ITEM hb_dbTransInfoPut( PHB_ITEM pItem, LPDBTRANSINFO lpdbTransInfo );
|
|
extern HB_EXPORT LPDBTRANSINFO hb_dbTransInfoGet( PHB_ITEM pItem );
|
|
extern HB_EXPORT HB_ERRCODE hb_dbTransStruct(
|
|
AREAP lpaSource, AREAP lpaDest,
|
|
LPDBTRANSINFO lpdbTransInfo,
|
|
PHB_ITEM *pStruct, PHB_ITEM pFields );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddTransRecords(
|
|
AREAP pArea,
|
|
const char *szFileName, const char *szDriver,
|
|
HB_ULONG ulConnection,
|
|
PHB_ITEM pFields, HB_BOOL fExport,
|
|
PHB_ITEM pCobFor, PHB_ITEM pStrFor,
|
|
PHB_ITEM pCobWhile, PHB_ITEM pStrWhile,
|
|
PHB_ITEM pNext, PHB_ITEM pRecID,
|
|
PHB_ITEM pRest,
|
|
const char *szCpId,
|
|
PHB_ITEM pDelim );
|
|
extern HB_EXPORT void hb_tblStructure( AREAP pArea, PHB_ITEM pStruct, HB_USHORT uiSize );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddCloseAllParentRelations( AREAP pArea );
|
|
|
|
extern HB_EXPORT HB_ERRCODE hb_rddEvalWA( PHB_ITEM pBlock );
|
|
|
|
extern HB_EXPORT HB_ERRCODE hb_rddDetachArea( AREAP pArea, PHB_ITEM pCargo );
|
|
extern HB_EXPORT AREAP hb_rddRequestArea( const char * szAlias, PHB_ITEM pCargo,
|
|
HB_BOOL fNewArea, HB_ULONG ulMilliSec );
|
|
extern HB_EXPORT PHB_ITEM hb_rddDetachedList( void );
|
|
|
|
typedef HB_ERRCODE ( * WACALLBACK )( AREAP, void * );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddIterateWorkAreas( WACALLBACK pCallBack, void * cargo );
|
|
extern HB_EXPORT HB_ERRCODE hb_rddGetTempAlias( char * szAliasTmp );
|
|
|
|
HB_EXTERN_END
|
|
|
|
#endif /* HB_APIRDD_H_ */
|