mirror of https://github.com/tongzx/nt5src
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
137 lines
4.3 KiB
137 lines
4.3 KiB
/***************************************************************************/
|
|
/* DBASE.H */
|
|
/* Copyright 1993-96 SYWARE, Inc. All rights reserved. */
|
|
/***************************************************************************/
|
|
#ifdef _UNIX_
|
|
|
|
#include "unixdefs.h"
|
|
#include "sqltype.h"
|
|
|
|
#else
|
|
|
|
#include "windows.h"
|
|
#include "windowsx.h"
|
|
|
|
typedef unsigned char FAR* LPUSTR;
|
|
|
|
//#define ODBCVER 0x0210
|
|
#include <sql.h>
|
|
#include <sqlext.h>
|
|
#ifndef RC_INVOKED
|
|
#ifndef WIN32
|
|
#include <dos.h>
|
|
#endif
|
|
#endif
|
|
|
|
#endif
|
|
|
|
#ifdef _UNIX_
|
|
#define PATH_SEPARATOR_CHAR '/'
|
|
#define PATH_SEPARATOR_STR "/"
|
|
#else
|
|
#define PATH_SEPARATOR_CHAR '\\'
|
|
#define PATH_SEPARATOR_STR "\\"
|
|
#endif
|
|
|
|
|
|
#define DBASE_ERR_SUCCESS 0
|
|
#define DBASE_ERR_MEMALLOCFAIL 1
|
|
#define DBASE_ERR_NODATAFOUND 2
|
|
#define DBASE_ERR_WRITEERROR 3
|
|
#define DBASE_ERR_TABLEACCESSERROR 4
|
|
#define DBASE_ERR_CONVERSIONERROR 5
|
|
#define DBASE_ERR_CORRUPTFILE 6
|
|
#define DBASE_ERR_CREATEERROR 7
|
|
#define DBASE_ERR_CLOSEERROR 8
|
|
#define DBASE_ERR_NOTSUPPORTED 9
|
|
#define DBASE_ERR_NOSUCHCOLUMN 10
|
|
#define DBASE_ERR_TRUNCATION 11
|
|
#define DBASE_ERR_NOTNULL 12
|
|
#define DBASE_ERR_NULL 13
|
|
|
|
#define DBASE_MAX_PATHNAME_SIZE 127
|
|
|
|
#define DBASE_COLUMN_NAME_SIZE 11
|
|
typedef struct tagDBASECOL {
|
|
/* The following fields are in the disk file */
|
|
UCHAR name[DBASE_COLUMN_NAME_SIZE];
|
|
UCHAR type;
|
|
UCHAR reserved1[4];
|
|
UCHAR length;
|
|
UCHAR scale;
|
|
UCHAR reserved2[2];
|
|
UCHAR workarea;
|
|
UCHAR reserved3[10];
|
|
UCHAR mdx;
|
|
/* The following fields are not in the disk file */
|
|
UCHAR FAR * value;
|
|
} DBASECOL,
|
|
FAR *LPDBASECOL;
|
|
|
|
//forward declaration
|
|
class CSafeIEnumWbemClassObject;
|
|
|
|
|
|
#define IMPLTMT_PASSTHROUGH 1
|
|
#define BATCH_NUM_OF_INSTANCES 10
|
|
typedef struct tagDBASEFILE {
|
|
UWORD columnCount;
|
|
UDWORD FAR* sortArray;
|
|
|
|
|
|
UDWORD currentRecord;
|
|
CSafeIEnumWbemClassObject* tempEnum;
|
|
CMapWordToPtr* pAllRecords; //only next 10 for passthrough SQL
|
|
IWbemClassObject* record;
|
|
|
|
//Passthrough SQL specific
|
|
BOOL fMoreToCome; //flag to indicate if there are more instances to fetch
|
|
|
|
|
|
|
|
} DBASEFILE,
|
|
FAR * LPDBASEFILE;
|
|
|
|
|
|
#define DBASE_HEADER_LENGTH 32
|
|
#define DBASE_COLUMN_DESCR_LENGTH 32
|
|
#define DBASE_RECORD_LENGTH_OFFSET 10
|
|
#define DBASE_HEADER_SIZE_OFFSET 8
|
|
#define DBASE_NOT_ENCRYPTED 0x00
|
|
#define DBASE_MDX_FLAG_OFF 0x00
|
|
#define DBASE_END_OF_COLUMNS 0x0D
|
|
#define DBASE_RECORD_DELETED 0x2A
|
|
#define DBASE_RECORD_NOT_DELETED 0x20
|
|
#define DBASE_FILE_END 0x1A
|
|
#define DBASE_3_FILE 0x03
|
|
#define DBASE_4_FILE 0x03
|
|
#define DBASE_CHAR 'C'
|
|
#define DBASE_NUMERIC 'N'
|
|
#define DBASE_FLOAT 'F'
|
|
#define DBASE_LOGICAL 'L'
|
|
#define DBASE_DATE 'D'
|
|
#define DBASE_MEMO 'M'
|
|
|
|
/***************************************************************************/
|
|
SWORD FAR PASCAL dBaseCreate(LPUSTR);
|
|
SWORD FAR PASCAL dBaseAddColumn(LPUSTR, LPUSTR, UCHAR, UCHAR, UCHAR);
|
|
SWORD FAR PASCAL dBaseOpen(LPUSTR, BOOL, LPDBASEFILE FAR *);
|
|
SWORD FAR PASCAL dBaseColumnCount(LPDBASEFILE, UWORD FAR *);
|
|
SWORD FAR PASCAL dBaseColumnName(LPDBASEFILE, UWORD, LPUSTR);
|
|
SWORD FAR PASCAL dBaseColumnType(LPDBASEFILE, UWORD, UCHAR FAR *);
|
|
SWORD FAR PASCAL dBaseColumnLength(LPDBASEFILE, UWORD, UCHAR FAR *);
|
|
SWORD FAR PASCAL dBaseColumnScale(LPDBASEFILE, UWORD, UCHAR FAR *);
|
|
SWORD FAR PASCAL dBaseSort(LPDBASEFILE, UWORD, BOOL);
|
|
SWORD FAR PASCAL dBaseReadFirst(LPDBASEFILE);
|
|
SWORD FAR PASCAL dBaseReadNext(LPDBASEFILE);
|
|
SWORD FAR PASCAL dBaseColumnCharVal(LPDBASEFILE, UWORD, UDWORD, SDWORD, UCHAR FAR *, BOOL FAR *);
|
|
SWORD FAR PASCAL dBaseColumnNumVal(LPDBASEFILE, UWORD, SDOUBLE FAR *, BOOL FAR *);
|
|
SWORD FAR PASCAL dBaseAddRecord(LPDBASEFILE);
|
|
SWORD FAR PASCAL dBaseSetColumnCharVal(LPDBASEFILE, UWORD, UCHAR FAR *, SDWORD);
|
|
SWORD FAR PASCAL dBaseSetColumnNull(LPDBASEFILE, UWORD);
|
|
SWORD FAR PASCAL dBaseDeleteRecord(LPDBASEFILE);
|
|
SWORD FAR PASCAL dBaseGetBookmark(LPDBASEFILE, UDWORD far *);
|
|
SWORD FAR PASCAL dBasePosition(LPDBASEFILE, UDWORD);
|
|
SWORD FAR PASCAL dBaseClose(LPDBASEFILE);
|
|
SWORD FAR PASCAL dBaseDestroy(LPUSTR);
|
|
/***************************************************************************/
|