Category

Development Platform
Home > E-Books > View Code
BDE.int
Package: Delphi7 Development　[view]
Upload User: wangqy1229
Upload Date: 2007-01-22
Package Size: 13966k
Code Size: 284k
Category:

E-Books

Development Platform:

Delphi

BDE.int：Code Content
  1.     esType: SQLType;                     { value 2 for Column type. }
  2.     szColName: packed array[0..NAMELENGTH] of Char;{ Column Name. }
  3.     bColQuote: Bool;                      { TRUE = Column Name quoted. }
  4.     szColAlias: packed array[0..NAMELENGTH] of Char;{ Column Alias, if exists. }
  5.     bColAlQuote: Bool;                    { TRUE = Alias Name quoted. }
  6.     szColRelation: packed array[0..NAMELENGTH] of Char;{ Relation associated by alias. }
  7.     szColOwner: packed array[0..NAMELENGTH] of Char;{ Owner of table. }
  8.     eCheck: CHECKType;                   { Check Mark. }
  9.     paiRowCheck: PWord;                  { Array of rows which have checks. }
  10.     iColAggr: Smallint;                  { Column Projected Aggregate. }
  11.     iColExmpl: Integer;                  { Column Example Element. }
  12.     plCell: pLIST;                       { List of Cells for each column. }
  13.   end;
  15.   pSQLConstant = ^SQLConstant;
  16.   SQLConstant = packed record        { Constant structure. }
  17.     esType: SQLType;                    { value 3 for Constant type. }
  18.     szConstValue: packed array[0..NAMELENGTH] of Char;{ Constant Value. }
  19.   end;
  21.   SQLOp = (opUNKNOWNOP, opEQUAL, opNOTEQ, opLESSEQUAL, opGREQUAL, opLESS,
  22.     opGREATER, opLIKE, opNOT, opPLUSX, opMINUSX, opTIMESX, opDIVX, opAND, opOR,
  23.     opBLANK, opAS, opOUTERJOIN, opNOTLIKE, opCHANGETO, opUPPER, opLOWER, opTRIM,
  24.     opSUBSTRING, opPAND, opPOR, opPNOT, opEXTRACT, opFULLOTRJOIN);
  26.   pSQLExpr = ^SQLExpr;
  27.   SQLExpr = packed record            { Expression structure. }
  28.     esType: SQLType;                    { value 4 for Expression type. }
  29.     eOp: SQLOp;                         { Operator for the Objects. }
  30.     plOperands: pLIST;                  { Operands, Objects. }
  31.   end;
  33.   pSQLAggr = ^SQLAggr;
  34.   SQLAggr = packed record            { Aggregate structure. }
  35.     esType: SQLType;                    { value 5 for Aggr. }
  36.     pcolAggr: pSQLColumn;               { Column where aggr occurs. }
  37.     iAggr: Smallint;                    { Type of Aggr. }
  38.     bProjAggr: Bool;                    { Is a Projection Aggr.? }
  39.     pAggrName: pSQLConstant;            { New Aggr's field name. }
  40.   end;
  42.   pSQLCell = ^SQLCell;
  43.   SQLCell = packed record            { Cell structure. }
  44.     esType: SQLType;                    { Value 6 for Cell type. }
  45.     szCellValue: packed array[0..NAMELENGTH] of Char;{ Cell Value. }
  46.     iRow: Integer;                      { Row number of cell value, 0 based. }
  47.   end;
  49.   SQLObject = packed record
  50.     case Integer of
  51.      0: (esType: SQLType);
  52.      1: (pRel: SQLRelation);   {  RELTYPE   (1)  Relation Information. }
  53.      2: (pCol: SQLColumn);     {  COLTYPE   (2)  Column Information. }
  54.      3: (pConst: SQLConstant); {  CONSTYPE  (3)  Constant Information. }
  55.      4: (pExpr: SQLExpr);      {  EXPRTYPE  (4)  Expression Information. }
  56.      5: (pAggr: SQLAggr);      {  AGGRTYPE  (5)  Aggregate Information. }
  57.      6: (pCell: SQLCell);      {  CELLTYPE  (6)  Cell Information. }
  58.   end;
  60. const
  61.   REQVERSION         = 3;                { Version of request structure. }
  63. type
  64.   PSQLRequest = ^TSQLRequest;
  65.   TSQLRequest = packed record           { SQL request. }
  66.     iVersion        : Word;             { Version of request. }
  67.     iMemMark        : Integer;          { Memory Mark to free request. }
  68.     hQry            : hDBIQry;          { Query handle for memory mark. }
  69.     erType          : REQType;          { Request type. }
  70.     hDb             : hDBIDb;           { Database handle. }
  71.     hStmt           : hDBIStmt;         { Statement handle used for parameter binding. }
  72.     iParams         : Integer;          { # of parameters found in SQL statement. }
  73.     iOptions        : Integer;          { Used for determining which options to set. }
  74.     iDistinct       : Integer;          { Has "DISTINCT" been specified. }
  75.     plRelation      : pLIST;            { List of SQLRelation. }
  76.     plProject       : pLIST;            { List of SQLColumn. }
  77.     plWhere         : pLIST;            { List of SQLExpr. }
  78.     plOrder         : pLIST;            { List of SQLColumn. }
  79.     plGroupBy       : pLIST;            { List of SQLColumn. }
  80.     plHaving        : pLIST;            { List of SQLObjects. }
  81.     plAlias         : pLIST;            { List of SQLConstant to represent aliases used. }
  82.    end;
  84. {============================================================================}
  85. {                      DBI Config symbols                                    }
  86. {============================================================================}
  88. { Categories }
  90. const
  91.   szCFGSYSTEM        = 'SYSTEM';
  92.   szCFGDRIVER        = 'DRIVERS';
  93.   szCFGDATABASE      = 'DATABASES';
  94.   szCFGREPOSITORY    = 'REPOSITORIES';
  96. {----------------------------------------------------------------------------}
  97. { System Fields                                                              }
  98. {----------------------------------------------------------------------------}
  100.   szCFGSYSVERSION    = 'VERSION';
  101.   szCFGSYSNETTYPE    = 'NET TYPE';
  102.   szCFGSYSNETDIR     = 'NET DIR';
  103.   szCFGSYSLOCALSHARE = 'LOCAL SHARE';
  104.   szCFGSYSLANGDRV    = 'LANGDRIVER';
  105.   szCFGSYSLANGDRVDIR = 'LANGDRVDIR';
  106.   szCFGSYSMINBUF     = 'MINBUFSIZE';
  107.   szCFGSYSMAXBUF     = 'MAXBUFSIZE';
  108.   szCFGSYSLOCKRETRY  = 'LOCKRETRY';
  109.   szCFGSYSFLAGS      = 'SYSFLAGS';
  110.   szCFGMAXFILEHANDLES = 'MAXFILEHANDLES';
  111.   szCFGSQLQRYMODE    = 'SQLQRYMODE';
  112.   szCFGLOWMEMLIMIT   = 'LOW MEMORY USAGE LIMIT'; { Use this instead of NOLOWMEMBUF }
  113.   szCFGSYSODBCCFGIMPORT = 'AUTO ODBC';
  114.   szCFGAUTOODBC      = 'AUTO ODBC';
  115.   szCFGDEFDRV        = 'DEFAULT DRIVER';
  116.   szCFGSYSLOCALREPOSITORY = 'DATA REPOSITORY';
  117.   szCFGSYSMEMSIZE    = 'MEMSIZE';
  118.   szCFGSYSSHAREDMEMSIZE = 'SHAREDMEMSIZE';
  119.   szCFGSYSSHAREDMEMLOCATION = 'SHAREDMEMLOCATION';
  120.   szCFGSYSMTSPOOLING = 'MTS POOLING';
  122. {----------------------------------------------------------------------------}
  123. { Driver Fields                                                              }
  124. {----------------------------------------------------------------------------}
  126.   szCFGDRVVERSION    = 'VERSION';
  127.   szCFGDRVTYPE       = 'TYPE';
  128.   szCFGDRVDLL        = 'DLL';
  129.   szCFGDRVDLL32      = 'DLL32';
  130.   szCFGDRVFLAGS      = 'DRIVER FLAGS';
  131.   szCFGDRVLANGDRIVER = 'LANGDRIVER';
  132.   szCFGDRVFILLFACTOR = 'FILL FACTOR';
  133.   szCFGDRVBLOCKSIZE  = 'BLOCK SIZE';
  134.   szCFGDRVLOCKPROTOCOL = 'LOCKPROTOCOL';
  135.   szCFGDRVLEVEL      = 'LEVEL';
  136.   szCFGDRVVENDINIT   = 'VENDOR INIT';
  137.   szCFGDRVTRACEMODE  = 'TRACE MODE';
  139. {----------------------------------------------------------------------------}
  140. { Dbase Driver fields                                                        }
  141. {----------------------------------------------------------------------------}
  143.   szCFGDRVMEMOBLOCKSIZE = 'MEMO FILE BLOCK SIZE';
  144.   szCFGDRVMDXBLOCKSIZE = 'MDX BLOCK SIZE';
  147. {----------------------------------------------------------------------------}
  148. { Driver Nodes                                                               }
  149. {----------------------------------------------------------------------------}
  151.   szCFGDRVINIT       = 'INIT';
  152.   szCFGDBCREATE      = 'DB CREATE';
  153.   szCFGDBOPEN        = 'DB OPEN';
  154.   szCFGTBLCREATE     = 'TABLE CREATE';
  155.   szCFGTBLOPEN       = 'TABLE OPEN';
  157. {----------------------------------------------------------------------------}
  158. { Database Nodes                                                             }
  159. {----------------------------------------------------------------------------}
  161.   szCFGDBINFO        = 'DB INFO';
  163. {----------------------------------------------------------------------------}
  164. { Database fields                                                            }
  165. {----------------------------------------------------------------------------}
  167.   szCFGDBTYPE        = 'TYPE';
  168.   szCFGDBPATH        = 'PATH';
  169.   szCFGDBDEFAULTDRIVER = 'DEFAULT DRIVER';
  170.   szCFGDBENABLEBCD   = 'ENABLE BCD';
  172. {----------------------------------------------------------------------------}
  173. { Others                                                                     }
  174. {----------------------------------------------------------------------------}
  176.   szCFGINIT          = 'INIT';
  177.   szTYPe             = 'TYPE';  { Changed from szTYPE to avoid urlmon.h conflict }
  178.   szCFGDBSTANDARD    = 'STANDARD';
  179.   szCFGTRUE          = 'TRUE';
  180.   szCFGFALSE         = 'FALSE';
  181.   szOPENMODE         = 'OPEN MODE';
  182.   szREADWRITE        = 'READ/WRITE';
  183.   szREADONLy         = 'READ ONLY';  { Changed from szREADONLY to avoid DSIntf.hpp conflict }
  184.   szSHAREMODE        = 'SHARE MODE';
  185.   szEXCLUSIVE        = 'EXCLUSIVE';
  186.   szSHARED           = 'SHARED';
  187.   szUSERNAME         = 'USER NAME';
  188.   szPASSWORD         = 'PASSWORD';
  189.   szSERVERNAME       = 'SERVER NAME';
  190.   szDATABASENAME     = 'DATABASE NAME';
  191.   szSCHEMASIZE       = 'SCHEMA CACHE SIZE';
  192.   szCFGSTRICTINTEGRITY = 'STRICTINTEGRTY';
  193.   szSQLPASSMODE      = 'SQLPASSTHRU MODE';
  194.   szNOTSHARED        = 'NOT SHARED';
  195.   szSHAREDAUTOCOMMIT = 'SHARED AUTOCOMMIT';
  196.   szSHAREDNOAUTOCOMMIT = 'SHARED NOAUTOCOMMIT';
  197.   szSCHEMATIME       = 'SCHEMA CACHE TIME';
  198.   szMAXQUERYTIME     = 'MAX QUERY TIME';
  199.   szMAXROWS          = 'MAX ROWS';
  200.   szLISTSYNONYMS     = 'LIST SYNONYMS';
  201.   szSYNNONE          = 'NONE';
  202.   szSYNALL           = 'ALL';
  203.   szSYNPRIVATE       = 'PRIVATE';
  204.   szBATCHCOUNT       = 'BATCH COUNT';
  205.   szBLOBCOUNT        = 'BLOBS TO CACHE'; 
  206.   szBLOBSIZE         = 'BLOB SIZE';
  207.   szOBJECTMODE       = 'OBJECT MODE';
  208.   szENABLESCHEMACACHE= 'ENABLE SCHEMA CACHE';
  209.   szSCHEMACACHEDIR   = 'SCHEMA CACHE DIR';
  210.   szSYBLHOST         = 'HOST NAME';
  211.   szSYBLAPP          = 'APPLICATION NAME';
  212.   szSYBLNATLANG      = 'NATIONAL LANG NAME';
  213.   szTDSPACKETSIZE    = 'TDS PACKET SIZE';
  214.   szORAINTEGER       = 'ENABLE INTEGERS';
  215.   szDBNLS            = 'DBNLS';
  216.   szCOLLCHAR         = 'COLLCHAR';
  217.   szROWSETSIZE       = 'ROWSET SIZE';
  218.   szCFG30            = '5.0';
  219.   szCFGSERVER        = 'SERVER';
  220.   szCFGIDODBC01      = 'IDODBC01.DLL';
  221.   szCFGIDODBC32      = 'IDODBC32.DLL';
  222.   szCFGODBCDRIVER    = 'ODBC DRIVER';
  223.   szCFGNULL          = '';
  224.   szCFGZERO          = '0';
  225.   szCFG20            = '20';
  226.   szCFG64            = '64';
  227.   szCFG32            = '32';
  228.   szCFGODBCDSN       = 'ODBC DSN';
  229.   szCFGTWOHUNDRED    = '200';
  230.   szCFGNEGONE        = '-1';
  231.   szCFGEIGHT         = '8';
  232.   szCLSID            = 'CLSID';
  233.   szCFGSYSTEMDB      = 'SYSTEM DATABASE';
  234.   szCFGOLEDBPROVIDER = 'OLE DB PROVIDER';
  235.   szCFGPERSISTFILE   = 'DATA SOURCE FILE';
  236.   szCFGOBJECTMODE    = 'OBJECT MODE';
  238. {----------------------------------------------------------------------------}
  239. { Repository fields                                                          }
  240. {----------------------------------------------------------------------------}
  242.   szCFGDRDBNAME      = 'DATABASE NAME';
  243.   szCFGDRTBLNAME     = 'TABLE NAME';
  244.   szCFGDRLANGDRIVER  = 'LANGUAGE DRIVER';
  245.   szCFGDRDESC        = 'DESCRIPTION';
  247. {----------------------------------------------------------------------------}
  248. { SYSTEM DATE/TIME/NUMBER FORMATS                                            }
  249. { SYSTEM nodes:                                                              }
  250. {----------------------------------------------------------------------------}
  252.   szCFGFORMAT        = 'FORMATS';
  254. {----------------------------------------------------------------------------}
  255. { Format nodes:                                                              }
  256. {----------------------------------------------------------------------------}
  258.   szCFGDATE          = 'DATE';
  259.   szCFGTIME          = 'TIME';
  260.   szCFGNUMBER        = 'NUMBER';
  262. {----------------------------------------------------------------------------}
  263. { DATE and/or TIME fields:                                                   }
  264. {----------------------------------------------------------------------------}
  266.   szCFGSEPARATOR     = 'SEPARATOR';
  267.   szCFGMODE          = 'MODE';
  268.   szCFGFOURDIGITYEAR = 'FOURDIGITYEAR';
  269.   szCFGYEARBIASED    = 'YEARBIASED';
  270.   szCFGLEADINGZEROM  = 'LEADINGZEROM';
  271.   szCFGLEADINGZEROD  = 'LEADINGZEROD';
  272.   szCFGTWELVEHOUR    = 'TWELVEHOUR';
  273.   szCFGAMSTRING      = 'AMSTRING';
  274.   szCFGPMSTRING      = 'PMSTRING';
  275.   szCFGSECONDS       = 'SECONDS';
  276.   szCFGMILSECONDS    = 'MILSECONDS';
  278. {----------------------------------------------------------------------------}
  279. { Number fields:                                                             }
  280. {----------------------------------------------------------------------------}
  282.   szCFGDECIMALSEPARATOR = 'DECIMALSEPARATOR';
  283.   szCFGTHOUSANDSEPARATOR = 'THOUSANDSEPARATOR';
  284.   szCFGDECIMALDIGITS = 'DECIMALDIGITS';
  285.   szCFGLEADINGZERON  = 'LEADINGZERON';
  287. { String resoure id's for each string listed above }
  289.   DBICFG_BASE        = $3A00;
  291. {----------------------------------------------------------------------------}
  292. { Categories                                                                 }
  293. {----------------------------------------------------------------------------}
  295.   iCFGSYSTEM         = (DBICFG_BASE + 1);
  296.   iCFGDRIVER         = (DBICFG_BASE + 2);
  297.   iCFGDATABASE       = (DBICFG_BASE + 3);
  298.   iCFGREPOSITORY     = (DBICFG_BASE + 210);
  300. {----------------------------------------------------------------------------}
  301. { System Fields                                                              }
  302. {----------------------------------------------------------------------------}
  304.   iCFGSYSVERSION     = (DBICFG_BASE + 5);
  305.   iCFGSYSNETTYPE     = (DBICFG_BASE + 6);
  306.   iCFGSYSNETDIR      = (DBICFG_BASE + 7);
  307.   iCFGSYSLOCALSHARE  = (DBICFG_BASE + 8);
  308.   iCFGSYSLANGDRV     = (DBICFG_BASE + 9);
  309.   iCFGSYSLANGDRVDIR  = (DBICFG_BASE + 10);
  310.   iCFGSYSMINBUF      = (DBICFG_BASE + 11);
  311.   iCFGSYSMAXBUF      = (DBICFG_BASE + 12);
  312.   iCFGSYSLOCKRETRY   = (DBICFG_BASE + 13);
  313.   iCFGSYSFLAGS       = (DBICFG_BASE + 14);
  314.   iCFGMAXFILEHANDLES = (DBICFG_BASE + 15);
  315.   iCFGSQLQRYMODE     = (DBICFG_BASE + 16);
  316.   iCFGLOWMEMLIMIT    = (DBICFG_BASE + 17);
  317.   iCFGSYSODBCCFGIMPORT = (DBICFG_BASE + 18);
  318.   iCFGSYSLOCALREPOSITORY = (DBICFG_BASE + 211);
  319.   iCFGSYSSHAREDMEMSIZE = (DBICFG_BASE + 250);
  320.   iCFGSYSSHAREDMEMLOCATION = (DBICFG_BASE + 251);
  321.   iCFGSYSMEMSIZE     = DBICFG_BASE + 125;
  324. {----------------------------------------------------------------------------}
  325. { Driver Fields                                                              }
  326. {----------------------------------------------------------------------------}
  328.   iCFGDRVVERSION     = (DBICFG_BASE + 20);
  329.   iCFGDRVTYPE        = (DBICFG_BASE + 21);
  330.   iCFGDRVLANGDRIVER  = (DBICFG_BASE + 22);
  331.   iCFGDRVFILLFACTOR  = (DBICFG_BASE + 23);
  332.   iCFGDRVBLOCKSIZE   = (DBICFG_BASE + 24);
  333.   iCFGDRVLOCKPROTOCOL = (DBICFG_BASE + 25);
  334.   iCFGDRVLEVEL       = (DBICFG_BASE + 26);
  335.   iCFGDRVFLAGS       = (DBICFG_BASE + 27);
  336.   iCFGDRVTRACEMODE   = (DBICFG_BASE + 28);
  337.   iCFGDRVDLL32       = (DBICFG_BASE + 29);
  339. {----------------------------------------------------------------------------}
  340. { Dbase Driver fields                                                        }
  341. {----------------------------------------------------------------------------}
  343.   iCFGDRVMEMOBLOCKSIZE = (DBICFG_BASE + 30 );
  344.   iCFGDRVMDXBLOCKSIZE = (DBICFG_BASE + 31 );
  346. {----------------------------------------------------------------------------}
  347. { Driver Nodes                                                               }
  348. {----------------------------------------------------------------------------}
  350.   iCFGDRVINIT        = (DBICFG_BASE + 40 );
  351.   iCFGDBCREATE       = (DBICFG_BASE + 41 );
  352.   iCFGDBOPEN         = (DBICFG_BASE + 42 );
  353.   iCFGTBLCREATE      = (DBICFG_BASE + 43 );
  354.   iCFGTBLOPEN        = (DBICFG_BASE + 44 );
  356. {----------------------------------------------------------------------------}
  357. { Database Nodes                                                             }
  358. {----------------------------------------------------------------------------}
  360.   iCFGDBINFO         = (DBICFG_BASE + 50 );
  362. {----------------------------------------------------------------------------}
  363. { Database fields                                                            }
  364. {----------------------------------------------------------------------------}
  366.   iCFGDBTYPE         = (DBICFG_BASE + 60);
  367.   iCFGDBPATH         = (DBICFG_BASE + 61);
  368.   iCFGDBDEFAULTDRIVER = (DBICFG_BASE + 62);
  369.   iCFGDBENABLEBCD    = (DBICFG_BASE + 63);
  371. {----------------------------------------------------------------------------}
  372. { Others                                                                     }
  373. {----------------------------------------------------------------------------}
  375.   iCFGINIT           = (DBICFG_BASE + 70);
  376.   iTYPE              = (DBICFG_BASE + 71);
  377.   iCFGDBSTANDARD     = (DBICFG_BASE + 72);
  378.   iCFGTRUE           = (DBICFG_BASE + 73);
  379.   iCFGFALSE          = (DBICFG_BASE + 74);
  380.   iOPENMODE          = (DBICFG_BASE + 75);
  381.   iREADWRITE         = (DBICFG_BASE + 76);
  382.   iREADONLY          = (DBICFG_BASE + 77);
  383.   iSHAREMODE         = (DBICFG_BASE + 78);
  384.   iEXCLUSIVE         = (DBICFG_BASE + 79);
  385.   iSHARED            = (DBICFG_BASE + 80);
  386.   iUSERNAME          = (DBICFG_BASE + 81);
  387.   iSERVERNAME        = (DBICFG_BASE + 82);
  388.   iDATABASENAME      = (DBICFG_BASE + 83);
  389.   iSCHEMASIZE        = (DBICFG_BASE + 84);
  390.   iCFGSTRICTINTEGRITY = (DBICFG_BASE + 85);
  391.   iTDSPACKETSIZE     = (DBICFG_BASE + 86);
  392.   iORAINTEGER        = (DBICFG_BASE + 87);
  393.   iDBNLS             = (DBICFG_BASE + 88);
  394.   iCOLLCHAR          = (DBICFG_BASE + 89);
  395.   { numbers 90-122 used in dbiext.h }
  396.   iROWSETSIZE        = (DBICFG_BASE + 134);
  397.   iCFGOBJECTMODE     = DBICFG_BASE + 135; 
  399. {----------------------------------------------------------------------------}
  400. { Repository Nodes                                                           }
  401. {----------------------------------------------------------------------------}
  403.   iCFGDRDBNAME       = (DBICFG_BASE + 213);
  404.   iCFGDRTBLNAME      = (DBICFG_BASE + 214);
  405.   iCFGDRDESC         = (DBICFG_BASE + 215);
  406.   iCFGDRLANGDRIVER   = (DBICFG_BASE + 212);
  408. {----------------------------------------------------------------------------}
  409. { System node:                                                               }
  410. {----------------------------------------------------------------------------}
  412.   iCFGFORMAT         = (DBICFG_BASE + 130);
  414. {----------------------------------------------------------------------------}
  415. { Format nodes:                                                              }
  416. {----------------------------------------------------------------------------}
  418.   iCFGDATE           = (DBICFG_BASE + 131);
  419.   iCFGTIME           = (DBICFG_BASE + 132);
  420.   iCFGNUMBER         = (DBICFG_BASE + 133);
  422. {----------------------------------------------------------------------------}
  423. { DATE and/or TIME fields:                                                   }
  424. {----------------------------------------------------------------------------}
  426.   iCFGSEPARATOR      = (DBICFG_BASE + 140);
  427.   iCFGMODE           = (DBICFG_BASE + 141);
  428.   iCFGFOURDIGITYEAR  = (DBICFG_BASE + 142);
  429.   iCFGYEARBIASED     = (DBICFG_BASE + 143);
  430.   iCFGLEADINGZEROM   = (DBICFG_BASE + 144);
  431.   iCFGLEADINGZEROD   = (DBICFG_BASE + 145);
  432.   iCFGTWELVEHOUR     = (DBICFG_BASE + 146);
  433.   iCFGAMSTRING       = (DBICFG_BASE + 147);
  434.   iCFGPMSTRING       = (DBICFG_BASE + 148);
  435.   iCFGSECONDS        = (DBICFG_BASE + 149);
  436.   iCFGMILSECONDS     = (DBICFG_BASE + 150);
  438. {----------------------------------------------------------------------------}
  439. { Number fields:                                                             }
  440. {----------------------------------------------------------------------------}
  442.   iCFGDECIMALSEPARATOR  = (DBICFG_BASE + 160);
  443.   iCFGTHOUSANDSEPARATOR = (DBICFG_BASE + 161);
  444.   iCFGDECIMALDIGITS     = (DBICFG_BASE + 162);
  445.   iCFGLEADINGZERON      = (DBICFG_BASE + 163);
  447.   iCFGDEFLANGDRV        = (DBICFG_BASE + 165);
  448.   iCFGDBASEDEFLANGDRV   = (DBICFG_BASE + 166);
  450. {----------------------------------------------------------------------------}
  451. { Formats                                                                    }
  452. {----------------------------------------------------------------------------}
  454.   iCFGDEFSEPARATOR          = (DBICFG_BASE + 170);
  455.   iCFGDEFMODE               = (DBICFG_BASE + 171);
  456.   iCFGDEFFOURDIGITYEAR      = (DBICFG_BASE + 172);
  457.   iCFGDEFYEARBIASED         = (DBICFG_BASE + 173);
  458.   iCFGDEFLEADINGZEROM       = (DBICFG_BASE + 174);
  459.   iCFGDEFLEADINGZEROD       = (DBICFG_BASE + 175);
  460.   iCFGDEFTWELVEHOUR         = (DBICFG_BASE + 176);
  461.   iCFGDEFAMSTRING           = (DBICFG_BASE + 177);
  462.   iCFGDEFPMSTRING           = (DBICFG_BASE + 178);
  463.   iCFGDEFSECONDS            = (DBICFG_BASE + 179);
  464.   iCFGDEFMILSECONDS         = (DBICFG_BASE + 180);
  465.   iCFGDEFDECIMALSEPARATOR   = (DBICFG_BASE + 181);
  466.   iCFGDEFTHOUSANDSEPARATOR  = (DBICFG_BASE + 182);
  467.   iCFGDEFLEADINGZERO        = (DBICFG_BASE + 183);
  469.   iCFGDEFVERSION            = (DBICFG_BASE + 184);
  470.   iCFGDEFLOCALSHARE         = (DBICFG_BASE + 185);
  471.   iCFGDEFMINBUFSIZE         = (DBICFG_BASE + 186);
  472.   iCFGDEFMAXBUFSIZE         = (DBICFG_BASE + 187);
  473.   iCFGDEFMAXFILEHANDLES     = (DBICFG_BASE + 188);
  474.   iCFGDEFSYSFLAGS           = (DBICFG_BASE + 189);
  475.   iCFGDEFLOWMEM             = (DBICFG_BASE + 190);
  476.   iCFGDEFAUTOODBC           = (DBICFG_BASE + 191);
  477.   iCFGDEFDEFDRV             = (DBICFG_BASE + 192);
  479.   iCFGDEFDECIMALDIGITS      = (DBICFG_BASE + 193);
  480.   iCFGDEFLEADINGZERON       = (DBICFG_BASE + 194);
  482.   iCFGDEFPDXTYPE            = (DBICFG_BASE + 195);
  483.   iCFGDEFPDXNETDIR          = (DBICFG_BASE + 196);
  484.   iCFGDEFPDXLANGDRV         = (DBICFG_BASE + 197);
  485.   iCFGDEFPDXLEVEL           = (DBICFG_BASE + 198);
  486.   iCFGDEFPDXBLOCKSIZE       = (DBICFG_BASE + 199);
  487.   iCFGDEFPDXFILLFACTOR      = (DBICFG_BASE + 200);
  488.   iCFGDEFPDXSTRICTINTEGRTY  = (DBICFG_BASE + 201);
  490.   iCFGDEFDBASETYPE          = (DBICFG_BASE + 202);
  491.   iCFGDEFDBASELANGDRV       = (DBICFG_BASE + 203);
  492.   iCFGDEFDBASELEVEL         = (DBICFG_BASE + 204);
  493.   iCFGDEFDBASEMDXBLOCKSIZE  = (DBICFG_BASE + 205);
  494.   iCFGDEFDBASEMEMOBLOCKSIZE = (DBICFG_BASE + 206);
  496.   iCFGAUTOODBC              = (DBICFG_BASE + 207);
  497.   iCFGDEFDRV                = (DBICFG_BASE + 208);
  498.   iCFGENABLEBCD             = (DBICFG_BASE + 209);
  499.   iCFGDEFSHAREDMEMSIZE      = (DBICFG_BASE + 252);
  500.   iCFGDEFSHAREDMEMLOCATION  = (DBICFG_BASE + 253);
  501.   iCFGDEFREPOSITORY         = (DBICFG_BASE + 254);
  502.   iCFGDEFSQLQRYMODE         = (DBICFG_BASE + 255);
  503.   iCFGDEFMEMSIZE            = (DBICFG_BASE + 126); 
  505. { MSACCESS default driver field values }
  506.   iCFGDEFMSACCESSVER        = (DBICFG_BASE + 220);
  507.   iCFGDEFMSACCESSTYPE       = (DBICFG_BASE + 221);
  508.   iCFGDEFMSACCESSDLL32      = (DBICFG_BASE + 222);
  509.   iCFGDEFMSACCESSLANGDRV    = (DBICFG_BASE + 223);
  510.   iCFGDEFDATABASENAME       = (DBICFG_BASE + 224);
  511.   iCFGDEFUSERNAME           = (DBICFG_BASE + 225);
  512.   iCFGDEFTRACEMODE          = (DBICFG_BASE + 226);
  513.   iCFGDEFDRVFLAGS           = (DBICFG_BASE + 227);
  514.   iCFGCFGSYSTEMDB           = (DBICFG_BASE + 231);
  516. { FOXPRO default driver field values }
  517.   iCFGDEFFOXPROTYPE         = (DBICFG_BASE + 228);
  518.   iCFGDEFFOXPROLANGDRV      = (DBICFG_BASE + 229);
  519.   iCFGDEFFOXPROLEVEL        = (DBICFG_BASE + 230);
  523.   CFGHLP_BASE               = $3B00;
  525.   iCFGHLP_SYSNODE           = (CFGHLP_BASE +1);
  526.   iCFGHLP_SYSINITNODE       = (CFGHLP_BASE +2);
  527.   iCFGHLP_SYSVERSION        = (CFGHLP_BASE +3);
  528.   iCFGHLP_SYSLOCALSHARE     = (CFGHLP_BASE +4);
  529.   iCFGHLP_SYSMINBUFSIZE     = (CFGHLP_BASE +5);
  530.   iCFGHLP_SYSMAXBUFSIZE     = (CFGHLP_BASE +6);
  531.   iCFGHLP_SYSLANGDRIVER     = (CFGHLP_BASE +7);
  532.   iCFGHLP_SYSNETTYPE        = (CFGHLP_BASE +8);
  533.   iCFGHLP_SYSFLAGS          = (CFGHLP_BASE +9);
  534.   iCFGHLP_SYSMAXFILE        = (CFGHLP_BASE +10);
  535.   iCFGHLP_SYSLOWMEM         = (CFGHLP_BASE +11);
  536.   iCFGHLP_SYSAUTOODBC       = (CFGHLP_BASE +12);
  537.   iCFGHLP_SYSDEFDRV         = (CFGHLP_BASE +13);
  538.   iCFGHLP_SYSSQLQRYMODE     = (CFGHLP_BASE +14);
  539.   iCFGHLP_SYSSQLPASSTHRU    = (CFGHLP_BASE +15);
  540.   iCFGHLP_SYSFORMATNODE     = (CFGHLP_BASE +16);
  541.   iCFGHLP_DATENODE          = (CFGHLP_BASE +17);
  542.   iCFGHLP_DATESEPARATOR     = (CFGHLP_BASE +18);
  543.   iCFGHLP_DATEMODE          = (CFGHLP_BASE +19);
  544.   iCFGHLP_DATEFOURDIGIT     = (CFGHLP_BASE +20);
  545.   iCFGHLP_DATEYEARBIASED    = (CFGHLP_BASE +21);
  546.   iCFGHLP_DATEZEROM         = (CFGHLP_BASE +22);
  547.   iCFGHLP_DATEZEROD         = (CFGHLP_BASE +23);
  548.   iCFGHLP_TIMENODE          = (CFGHLP_BASE +24);
  549.   iCFGHLP_TIMETWELVEHOUR    = (CFGHLP_BASE +25);
  550.   iCFGHLP_TIMEAMSTRING      = (CFGHLP_BASE +26);
  551.   iCFGHLP_TIMEPMSTRING      = (CFGHLP_BASE +27);
  552.   iCFGHLP_TIMESECONDS       = (CFGHLP_BASE +28);
  553.   iCFGHLP_TIMEMILSEC        = (CFGHLP_BASE +29);
  554.   iCFGHLP_NUMNODE           = (CFGHLP_BASE +30);
  555.   iCFGHLP_NUMDECIMALSEPARATOR = (CFGHLP_BASE +31);
  556.   iCFGHLP_NUMTHOUSANDSEPARATOR = (CFGHLP_BASE +32);
  557.   iCFGHLP_NUMDECIMALDIGITS  = (CFGHLP_BASE +33);
  558.   iCFGHLP_NUMZERON          = (CFGHLP_BASE +34);
  559.   iCFGHLP_DRVNODE           = (CFGHLP_BASE +35);
  560.   iCFGHLP_PDXNODE           = (CFGHLP_BASE +36);
  561.   iCFGHLP_PDXINITNODE       = (CFGHLP_BASE +37);
  562.   iCFGHLP_DRVTYPE           = (CFGHLP_BASE +38);
  563.   iCFGHLP_PDXNETDIR         = (CFGHLP_BASE +39);
  564.   iCFGHLP_PDXTBLNODE        = (CFGHLP_BASE +40);
  565.   iCFGHLP_PDXLEVEL          = (CFGHLP_BASE +41);
  566.   iCFGHLP_PDXBLOCKSIZE      = (CFGHLP_BASE +42);
  567.   iCFGHLP_PDXFILLFACTOR     = (CFGHLP_BASE +43);
  568.   iCFGHLP_PDXSTRICT         = (CFGHLP_BASE +44);
  569.   iCFGHLP_DBNODE            = (CFGHLP_BASE +45);
  570.   iCFGHLP_DBINITNODE        = (CFGHLP_BASE +46);
  571.   iCFGHLP_DBVERSION         = (CFGHLP_BASE +47);
  572.   iCFGHLP_DBTBLNODE         = (CFGHLP_BASE +48);
  573.   iCFGHLP_DBLEVEL           = (CFGHLP_BASE +49);
  574.   iCFGHLP_DBMDXBLOCKSIZE    = (CFGHLP_BASE +50);
  575.   iCFGHLP_DBMEMOFILEBLOCKSIZE = (CFGHLP_BASE +51);
  576.   iCFGHLP_INTNODE           = (CFGHLP_BASE +52);
  577.   iCFGHLP_INTINITNODE       = (CFGHLP_BASE +53);
  578.   iCFGHLP_INTVERSION        = (CFGHLP_BASE +54);
  579.   iCFGHLP_SQLDLL            = (CFGHLP_BASE +55);
  580.   iCFGHLP_SQLDLL32          = (CFGHLP_BASE +56);
  581.   iCFGHLP_SQLDRIVERFLAGS    = (CFGHLP_BASE +57);
  582.   iCFGHLP_INTDBNODE         = (CFGHLP_BASE +58);
  583.   iCFGHLP_SQLSERVER         = (CFGHLP_BASE +59);
  584.   iCFGHLP_SQLUSER           = (CFGHLP_BASE +60);
  585.   iCFGHLP_SQLOPENMODE       = (CFGHLP_BASE +61);
  586.   iCFGHLP_SQLSCHEMASIZE     = (CFGHLP_BASE +62);
  587.   iCFGHLP_SQLSCHEMATIME     = (CFGHLP_BASE +63);
  588.   iCFGHLP_SYBNODE           = (CFGHLP_BASE +64);
  589.   iCFGHLP_SYBINITNODE       = (CFGHLP_BASE +65);
  590.   iCFGHLP_SYBVERSION        = (CFGHLP_BASE +66);
  591.   iCFGHLP_SQLCONNECT        = (CFGHLP_BASE +67);
  592.   iCFGHLP_SQLTIMEOUT        = (CFGHLP_BASE +68);
  593.   iCFGHLP_SYBDBNODE         = (CFGHLP_BASE +69);
  594.   iCFGHLP_SQLDATABASE       = (CFGHLP_BASE +70);
  595.   iCFGHLP_SQLBLOBEDIT       = (CFGHLP_BASE +71);
  596.   iCFGHLP_SQLMAXQUERY       = (CFGHLP_BASE +72);
  597.   iCFGHLP_ORANODE           = (CFGHLP_BASE +73);
  598.   iCFGHLP_ORAINITNODE       = (CFGHLP_BASE +74);
  599.   iCFGHLP_ORAVERSION        = (CFGHLP_BASE +75);
  600.   iCFGHLP_SQLVENDOR         = (CFGHLP_BASE +76);
  601.   iCFGHLP_ORADBNODE         = (CFGHLP_BASE +77);
  602.   iCFGHLP_SQLNETPROTOCOL    = (CFGHLP_BASE +78);
  603.   iCFGHLP_MSSNODE           = (CFGHLP_BASE +79);
  604.   iCFGHLP_MSSINITNODE       = (CFGHLP_BASE +80);
  605.   iCFGHLP_MSSVERSION        = (CFGHLP_BASE +81);
  606.   iCFGHLP_MSSDBNODE         = (CFGHLP_BASE +82);
  607.   iCFGHLP_INFNODE           = (CFGHLP_BASE +83);
  608.   iCFGHLP_INFINITNODE       = (CFGHLP_BASE +84);
  609.   iCFGHLP_INFVERSION        = (CFGHLP_BASE +85);
  610.   iCFGHLP_INFDBNODE         = (CFGHLP_BASE +86);
  611.   iCFGHLP_SQLLOCKMODE       = (CFGHLP_BASE +87);
  612.   iCFGHLP_SQLTRACEMODE      = (CFGHLP_BASE +88);
  613.   iCFGHLP_SQLMAXROWS        = (CFGHLP_BASE +89);
  614.   iCFGHLP_SQLBATCHCOUNT     = (CFGHLP_BASE +90);
  615.   iCFGHLP_SYSSHAREDMEMSIZ   = (CFGHLP_BASE +91);
  616.   iCFGHLP_SYSSHAREDMEMLOC   = (CFGHLP_BASE +92);
  617.   iCFGHLP_SYSDATAREP        = (CFGHLP_BASE +93);
  618.   iCFGHLP_ALIASTYPE         = (CFGHLP_BASE +94);
  619.   iCFGHLP_ALIASPATH         = (CFGHLP_BASE +95);
  620.   iCFGHLP_ALIASDEFDRV       = (CFGHLP_BASE +96);
  621.   iCFGHLP_ENABLESCHEMACACHE = (CFGHLP_BASE +97);
  622.   iCFGHLP_SCHEMACACHEDIR    = (CFGHLP_BASE +98);
  623.   iCFGHLP_HOSTNAME          = (CFGHLP_BASE +99);
  624.   iCFGHLP_APPLICATIONNAME   = (CFGHLP_BASE +100);
  625.   iCFGHLP_NATIONALLANGNAME  = (CFGHLP_BASE +101);
  626.   iCFGHLP_ALIASENABLEBCD    = (CFGHLP_BASE +102);
  627.   iCFGHLP_TDSPACKETSIZE     = (CFGHLP_BASE +103);
  628.   iCFGHLP_ORAINTEGER        = (CFGHLP_BASE +104);
  629.   iCFGHLP_ORALISTSYNONYMS   = (CFGHLP_BASE +105);
  630.   iCFGHLP_ROWSETSIZE        = (CFGHLP_BASE +106);
  631.   iCFGHLP_DB2DRIVER         = (CFGHLP_BASE +107);
  632.   iCFGHLP_DB2DSN            = (CFGHLP_BASE +108);
  633.   iCFGHLP_DB2NODE           = (CFGHLP_BASE +109);
  634.   iCFGHLP_DB2INITNODE       = (CFGHLP_BASE +110);
  635.   iCFGHLP_DB2VERSION        = (CFGHLP_BASE +111);
  636.   iCFGHLP_DB2DBNODE         = (CFGHLP_BASE +112);
  637.   iCFGHLP_COLLCHAR          = (CFGHLP_BASE +113);
  638.   iCFGHLP_DBNLS             = (CFGHLP_BASE +114);
  639.   iCFGHLP_MSACCNODE         = (CFGHLP_BASE +115);
  640.   iCFGHLP_MSACCINITNODE     = (CFGHLP_BASE +116);
  641.   iCFGHLP_MSACCVERSION      = (CFGHLP_BASE +117);
  642.   iCFGHLP_MSACCDBNODE       = (CFGHLP_BASE +118);
  643.   iCFGHLP_ODBCDRIVER        = (CFGHLP_BASE +119);
  644.   iCFGHLP_ODBCVERSION       = (CFGHLP_BASE +120);
  645.   iCFGHLP_ODBCDSN           = (CFGHLP_BASE +121);
  646.   iCFGHLP_OLEVERSION        = (CFGHLP_BASE +122);
  647.   iCFGHLP_OLECLSID          = (CFGHLP_BASE +123);
  648.   iCFGHLP_BLOBSTOCACHE      = (CFGHLP_BASE +124);
  649.   iCFGHLP_BLOBSIZE          = (CFGHLP_BASE +125);
  650.   iCFGHLP_SYSMEMSIZE        = (CFGHLP_BASE +126);
  651.   iCFGHLP_MAXDBPROCS        = (CFGHLP_BASE +127);
  652.   iCFGHLP_FPNODE            = (CFGHLP_BASE +128);
  653.   iCFGHLP_FPINITNODE        = (CFGHLP_BASE +129);
  654.   iCFGHLP_FPVERSION         = (CFGHLP_BASE +130);
  655.   iCFGHLP_FPTBLNODE         = (CFGHLP_BASE +131);
  656.   iCFGHLP_FPLEVEL           = (CFGHLP_BASE +132);
  657.   iCFGHLP_FPMEMOFILEBLOCKSIZE= (CFGHLP_BASE +133);
  658.   iCFGHLP_CFGSYSTEMDB       = (CFGHLP_BASE +134);
  659.   iCFGHLP_OBJECTMODE        = (CFGHLP_BASE +135); 
  661. {============================================================================}
  662. {                            Error Categories                                }
  663. {============================================================================}
  665. function ErrCat(rslt: Word): Word;
  666. function ErrCode(rslt: Word): Word;
  668. const
  669.   ERRCAT_NONE                   = 0;      {  0   No error }
  670.   ERRCAT_SYSTEM                 = $21;    {  33  System related (Fatal Error) }
  671.   ERRCAT_NOTFOUND               = $22;    {  34  Object of interest Not Found }
  672.   ERRCAT_DATACORRUPT            = $23;    {  35  Physical Data Corruption }
  673.   ERRCAT_IO                     = $24;    {  36  I/O related error }
  674.   ERRCAT_LIMIT                  = $25;    {  37  Resource or Limit error }
  675.   ERRCAT_INTEGRITY              = $26;    {  38  Integrity Violation }
  676.   ERRCAT_INVALIDREQ             = $27;    {  39  Invalid Request }
  677.   ERRCAT_LOCKCONFLICT           = $28;    {  40  Locking/Contention related }
  678.   ERRCAT_SECURITY               = $29;    {  41  Access Violation - Security related }
  679.   ERRCAT_INVALIDCONTEXT         = $2A;    {  42  Invalid context }
  680.   ERRCAT_OS                     = $2B;    {  43  Os Error not handled by Idapi }
  681.   ERRCAT_NETWORK                = $2C;    {  44  Network related }
  682.   ERRCAT_OPTPARAM               = $2D;    {  45  Optional parameter related }
  683.   ERRCAT_QUERY                  = $2E;    {  46  Query related }
  684.   ERRCAT_VERSION                = $2F;    {  47  Version Mismatch Category }
  685.   ERRCAT_CAPABILITY             = $30;    {  48  Capability not supported }
  686.   ERRCAT_CONFIG                 = $31;    {  49  System configuration error }
  687.   ERRCAT_WARNING                = $32;    {  50 }
  688.   ERRCAT_OTHER                  = $33;    {  51  Miscellaneous }
  689.   ERRCAT_COMPATIBILITY          = $34;    {  52  Compatibility related }
  690.   ERRCAT_REPOSITORY             = $35;    {  53  Data Repository related }
  692.   ERRCAT_DRIVER                 = $3E;    {  62  Driver related }
  693.   ERRCAT_RC                     = $3F;    {  63  Internal }
  696.   ERRBASE_NONE                  = 0;      { No error }
  697.   ERRBASE_SYSTEM                = $2100;  { System related (Fatal Error) }
  698.   ERRBASE_NOTFOUND              = $2200;  { Object of interest Not Found }
  699.   ERRBASE_DATACORRUPT           = $2300;  { Physical Data Corruption }
  700.   ERRBASE_IO                    = $2400;  { I/O related error }
  701.   ERRBASE_LIMIT                 = $2500;  { Resource or Limit error }
  702.   ERRBASE_INTEGRITY             = $2600;  { Integrity Violation }
  703.   ERRBASE_INVALIDREQ            = $2700;  { Invalid Request }
  704.   ERRBASE_LOCKCONFLICT          = $2800;  { Locking/Contention related }
  705.   ERRBASE_SEC                   = $2900;  { Access Violation - Security related }
  706.   ERRBASE_IC                    = $2A00;  { Invalid context }
  707.   ERRBASE_OS                    = $2B00;  { Os Error not handled by Idapi }
  708.   ERRBASE_NETWORK               = $2C00;  { Network related }
  709.   ERRBASE_OPTPARAM              = $2D00;  { Optional Parameter related }
  710.   ERRBASE_QUERY                 = $2E00;  { Query related }
  711.   ERRBASE_VERSION               = $2F00;  { Version Mismatch Category }
  712.   ERRBASE_CAPABILITY            = $3000;  { Capability not supported }
  713.   ERRBASE_CONFIG                = $3100;  { System configuration error }
  714.   ERRBASE_WARNING               = $3200;
  715.   ERRBASE_OTHER                 = $3300;  { Miscellaneous }
  716.   ERRBASE_COMPATIBILITY         = $3400;  { Compatibility related }
  717.   ERRBASE_REPOSITORY            = $3500;  { Data Repository related }
  719.   ERRBASE_DRIVER                = $3E00;  { Driver related }
  720.   ERRBASE_RC                    = $3F00;  { Internal }
  723. {=============================================================================}
  724. {                           Error Codes By Category                           }
  725. {=============================================================================}
  727. { ERRCAT_NONE                  (0) }
  728. { ===========                      }
  730.   ERRCODE_NONE                  = 0;
  732.   DBIERR_NONE                   = (ERRBASE_NONE + ERRCODE_NONE);
  734. {  ERRCAT_SYSTEM }
  735. {  ============= }
  737.   ERRCODE_SYSFILEOPEN           = 1;      { Cannot open a system file }
  738.   ERRCODE_SYSFILEIO             = 2;      { I/O error on a system file }
  739.   ERRCODE_SYSCORRUPT            = 3;      { Data structure corruption }
  740.   ERRCODE_NOCONFIGFILE          = 4;      { Cannot find config file }
  741.   ERRCODE_CFGCANNOTWRITE        = 5;      { Cannot write config file (READONLY) }
  742.   ERRCODE_CFGMULTIFILE          = 6;      { Initializing with different ini file }
  743.   ERRCODE_REENTERED             = 7;      { System has been illegally re-entered }
  744.   ERRCODE_CANTFINDIDAPI         = 8;      { Cannot locate IDAPIxx.DLL }
  745.   ERRCODE_CANTLOADIDAPI         = 9;      { Cannot load IDAPIxx.DLL }
  746.   ERRCODE_CANTLOADLIBRARY       = 10;     { Cannot load a service DLL }
  747.   ERRCODE_TEMPFILEERR           = 11;     { Cannot create or open temporary file }
  748.   ERRCODE_MULTIPLEIDAPI         = 12;     { Trying to load multiple IDAPIxx.DLL }
  749.   ERRCODE_SHAREDMEMCONFLICT     = 13;     { Shared memory conflict. }
  751.   DBIERR_SYSFILEOPEN            = (ERRBASE_SYSTEM + ERRCODE_SYSFILEOPEN);
  752.   DBIERR_SYSFILEIO              = (ERRBASE_SYSTEM + ERRCODE_SYSFILEIO);
  753.   DBIERR_SYSCORRUPT             = (ERRBASE_SYSTEM + ERRCODE_SYSCORRUPT);
  754.   DBIERR_NOCONFIGFILE           = (ERRBASE_SYSTEM + ERRCODE_NOCONFIGFILE);
  755.   DBIERR_CFGCANNOTWRITE         = (ERRBASE_SYSTEM + ERRCODE_CFGCANNOTWRITE);
  756.   DBIERR_CFGMULTIFILE           = (ERRBASE_SYSTEM + ERRCODE_CFGMULTIFILE);
  757.   DBIERR_REENTERED              = (ERRBASE_SYSTEM + ERRCODE_REENTERED);
  758.   DBIERR_CANTFINDIDAPI          = (ERRBASE_SYSTEM + ERRCODE_CANTFINDIDAPI);
  759.   DBIERR_CANTLOADIDAPI          = (ERRBASE_SYSTEM + ERRCODE_CANTLOADIDAPI);
  760.   DBIERR_CANTLOADLIBRARY        = (ERRBASE_SYSTEM + ERRCODE_CANTLOADLIBRARY);
  761.   DBIERR_TEMPFILEERR            = (ERRBASE_SYSTEM + ERRCODE_TEMPFILEERR);
  762.   DBIERR_MULTIPLEIDAPI          = (ERRBASE_SYSTEM + ERRCODE_MULTIPLEIDAPI);
  763.   DBIERR_SHAREDMEMCONFLICT      = (ERRBASE_SYSTEM + ERRCODE_SHAREDMEMCONFLICT);
  765.   DBIERR_CANTFINDODAPI = DBIERR_CANTFINDIDAPI;
  766.   DBIERR_CANTLOADODAPI = DBIERR_CANTLOADIDAPI;
  768. {  ERRCAT_NOTFOUND }
  769. {  =============== }
  771.   ERRCODE_BOF                   = 1;      { Beginning of Virtual table }
  772.   ERRCODE_EOF                   = 2;      { End of Virtual table }
  773.   ERRCODE_RECMOVED              = 3;      { Fly-away }
  774.   ERRCODE_KEYORRECDELETED       = 4;      { Record Deleted/Key Modified }
  775.   ERRCODE_NOCURRREC             = 5;      { No current record }
  776.   ERRCODE_RECNOTFOUND           = 6;      { Record was not found }
  777.   ERRCODE_ENDOFBLOB             = 7;      { End of Blob reached }
  778.   ERRCODE_OBJNOTFOUND           = 8;      { Generic Not found }
  779.   ERRCODE_FMLMEMBERNOTFOUND     = 9;      { Family member not found }
  780.   ERRCODE_BLOBFILEMISSING       = 10;     { 0x0a Blob file for table is missing }
  781.   ERRCODE_LDNOTFOUND            = 11;     { 0x0b Language driver not found }
  783.   DBIERR_BOF                    = (ERRBASE_NOTFOUND + ERRCODE_BOF);
  784.   DBIERR_EOF                    = (ERRBASE_NOTFOUND + ERRCODE_EOF);
  785.   DBIERR_RECMOVED               = (ERRBASE_NOTFOUND + ERRCODE_RECMOVED);
  786.   DBIERR_RECDELETED             = (ERRBASE_NOTFOUND + ERRCODE_KEYORRECDELETED);
  787.   DBIERR_KEYORRECDELETED        = (ERRBASE_NOTFOUND + ERRCODE_KEYORRECDELETED);
  788.   DBIERR_NOCURRREC              = (ERRBASE_NOTFOUND + ERRCODE_NOCURRREC);
  789.   DBIERR_RECNOTFOUND            = (ERRBASE_NOTFOUND + ERRCODE_RECNOTFOUND);
  790.   DBIERR_ENDOFBLOB              = (ERRBASE_NOTFOUND + ERRCODE_ENDOFBLOB);
  791.   DBIERR_OBJNOTFOUND            = (ERRBASE_NOTFOUND + ERRCODE_OBJNOTFOUND);
  792.   DBIERR_FMLMEMBERNOTFOUND      = (ERRBASE_NOTFOUND + ERRCODE_FMLMEMBERNOTFOUND);
  793.   DBIERR_BLOBFILEMISSING        = (ERRBASE_NOTFOUND + ERRCODE_BLOBFILEMISSING);
  794.   DBIERR_LDNOTFOUND             = (ERRBASE_NOTFOUND + ERRCODE_LDNOTFOUND);
  796. { ERRCAT_DATACORRUPT }
  797. { ================== }
  799.   ERRCODE_HEADERCORRUPT         = 1;      { Corrupt Header }
  800.   ERRCODE_FILECORRUPT           = 2;      { File corrupt - other than header }
  801.   ERRCODE_MEMOCORRUPT           = 3;      { Memo file corrupted }
  802.   ERRCODE_BMPCORRUPT            = 4;      { BitMap is corrupt (Internal error) }
  803.   ERRCODE_INDEXCORRUPT          = 5;      { Index is corrupt }
  804.   ERRCODE_CORRUPTLOCKFILE       = 6;      { Corrupt lock file }
  805.   ERRCODE_FAMFILEINVALID        = 7;      { Corrupt family file }
  806.   ERRCODE_VALFILECORRUPT        = 8;      { Val file is missing or corrupt }
  807.   ERRCODE_FOREIGNINDEX          = 9;      { Index is in a foreign format - import first }
  810.   DBIERR_HEADERCORRUPT          = (ERRBASE_DATACORRUPT + ERRCODE_HEADERCORRUPT);
  811.   DBIERR_FILECORRUPT            = (ERRBASE_DATACORRUPT + ERRCODE_FILECORRUPT);
  812.   DBIERR_MEMOCORRUPT            = (ERRBASE_DATACORRUPT + ERRCODE_MEMOCORRUPT);
  813.   DBIERR_BMPCORRUPT             = (ERRBASE_DATACORRUPT + ERRCODE_BMPCORRUPT);
  814.   DBIERR_INDEXCORRUPT           = (ERRBASE_DATACORRUPT + ERRCODE_INDEXCORRUPT);
  815.   DBIERR_CORRUPTLOCKFILE        = (ERRBASE_DATACORRUPT + ERRCODE_CORRUPTLOCKFILE);
  816.   DBIERR_FAMFILEINVALID         = (ERRBASE_DATACORRUPT + ERRCODE_FAMFILEINVALID);
  817.   DBIERR_VALFILECORRUPT         = (ERRBASE_DATACORRUPT + ERRCODE_VALFILECORRUPT);
  818.   DBIERR_FOREIGNINDEX           = (ERRBASE_DATACORRUPT + ERRCODE_FOREIGNINDEX);
  821. { ERRCAT_IO }
  822. { ========= }
  824.   ERRCODE_READERR               = 1;      { Read failure (not expected) }
  825.   ERRCODE_WRITEERR              = 2;      { Write failure (not expected) }
  826.   ERRCODE_DIRNOACCESS           = 3;      { No access to dir }
  827.   ERRCODE_FILEDELETEFAIL        = 4;      { File delete failed }
  828.   ERRCODE_FILENOACCESS          = 5;      { No access to file }
  829.   ERRCODE_ACCESSDISABLED        = 6;      { Access to table disabled (previous error) }
  831.   DBIERR_READERR                = (ERRBASE_IO + ERRCODE_READERR);
  832.   DBIERR_WRITEERR               = (ERRBASE_IO + ERRCODE_WRITEERR);
  833.   DBIERR_DIRNOACCESS            = (ERRBASE_IO + ERRCODE_DIRNOACCESS);
  834.   DBIERR_FILEDELETEFAIL         = (ERRBASE_IO + ERRCODE_FILEDELETEFAIL);
  835.   DBIERR_FILENOACCESS           = (ERRBASE_IO + ERRCODE_FILENOACCESS);
  836.   DBIERR_ACCESSDISABLED         = (ERRBASE_IO + ERRCODE_ACCESSDISABLED);
  838. { ERRCAT_LIMIT }
  839. { ============ }
  841.   ERRCODE_NOMEMORY              = 1;      { Not enough Memory for this op }
  842.   ERRCODE_NOFILEHANDLES         = 2;      { Not enough File handles }
  843.   ERRCODE_NODISKSPACE           = 3;      { Not enough Disk space }
  844.   ERRCODE_NOTEMPTBLSPACE        = 4;      { Temporary Table resource limit }
  845.   ERRCODE_RECTOOBIG             = 5;      { Too big a record size for table }
  846.   ERRCODE_CURSORLIMIT           = 6;      { Too many open cursors }
  847.   ERRCODE_TABLEFULL             = 7;      { Table is full }
  848.   ERRCODE_WSSESLIMIT            = 8;      { Too many sessions from this WS }
  849.   ERRCODE_SERNUMLIMIT           = 9;      { Serial number limit (paradox) }
  850.   ERRCODE_INTERNALLIMIT         = 10;     { 0x0a Some internal limit (see context) }
  851.   ERRCODE_OPENTBLLIMIT          = 11;     { 0x0b Too many open tables }
  852.   ERRCODE_TBLCURSORLIMIT        = 12;     { 0x0c Too many cursors per table }
  853.   ERRCODE_RECLOCKLIMIT          = 13;     { 0x0d Too many record locks on table }
  854.   ERRCODE_CLIENTSLIMIT          = 14;     { 0x0e Too many clients }
  855.   ERRCODE_INDEXLIMIT            = 15;     { 0x0f Too many indexes (also in Table Create) }
  856.   ERRCODE_SESSIONSLIMIT         = 16;     { 0x10 Too many sessions }
  857.   ERRCODE_DBLIMIT               = 17;     { 0x11 Too many databases }
  858.   ERRCODE_PASSWORDLIMIT         = 18;     { 0x12 Too many passwords }
  859.   ERRCODE_DRIVERLIMIT           = 19;     { 0x13 Too many active drivers }
  860.   ERRCODE_FLDLIMIT              = 20;     { 0x14 Too many Fields in Table Create }
  861.   ERRCODE_TBLLOCKLIMIT          = 21;     { 0x15 Too many table locks }
  862.   ERRCODE_OPENBLOBLIMIT         = 22;     { 0x16 Too many open blobs }
  863.   ERRCODE_LOCKFILELIMIT         = 23;     { 0x17 Lock file has grown too big }
  864.   ERRCODE_OPENQRYLIMIT          = 24;     { 0x18 Too many open queries }
  865.   ERRCODE_THREADLIMIT           = 25;     { 0x19 Too many threads for client }
  866.   ERRCODE_BLOBLIMIT             = 26;     { 0x1a Too many blobs }
  867.   ERRCODE_PDX50NAMELIMIT        = 27;     { 0x1b Pathname is too long for a Paradox 5.0 or less table }
  868.   ERRCODE_ROWFETCHLIMIT         = 28;     { 0x1c Row fetch limit }
  869.   ERRCODE_LONGNAMENOTALLOWED    = 29;     { 0x1d Long name is not allowed for this tableversion }
  870.   ERRCODE_NOSHAREDMEMORY        = 30;     { 0x1e Not enough shared Memory for this operation }
  872.   DBIERR_NOMEMORY               = (ERRBASE_LIMIT + ERRCODE_NOMEMORY);
  873.   DBIERR_NOFILEHANDLES          = (ERRBASE_LIMIT + ERRCODE_NOFILEHANDLES);
  874.   DBIERR_NODISKSPACE            = (ERRBASE_LIMIT + ERRCODE_NODISKSPACE);
  875.   DBIERR_NOTEMPTBLSPACE         = (ERRBASE_LIMIT + ERRCODE_NOTEMPTBLSPACE);
  876.   DBIERR_RECTOOBIG              = (ERRBASE_LIMIT + ERRCODE_RECTOOBIG);
  877.   DBIERR_CURSORLIMIT            = (ERRBASE_LIMIT + ERRCODE_CURSORLIMIT);
  878.   DBIERR_TABLEFULL              = (ERRBASE_LIMIT + ERRCODE_TABLEFULL);
  879.   DBIERR_WSSESLIMIT             = (ERRBASE_LIMIT + ERRCODE_WSSESLIMIT);
  880.   DBIERR_SERNUMLIMIT            = (ERRBASE_LIMIT + ERRCODE_SERNUMLIMIT);
  881.   DBIERR_INTERNALLIMIT          = (ERRBASE_LIMIT + ERRCODE_INTERNALLIMIT);
  882.   DBIERR_OPENTBLLIMIT           = (ERRBASE_LIMIT + ERRCODE_OPENTBLLIMIT);
  883.   DBIERR_TBLCURSORLIMIT         = (ERRBASE_LIMIT + ERRCODE_TBLCURSORLIMIT);
  884.   DBIERR_RECLOCKLIMIT           = (ERRBASE_LIMIT + ERRCODE_RECLOCKLIMIT);
  885.   DBIERR_CLIENTSLIMIT           = (ERRBASE_LIMIT + ERRCODE_CLIENTSLIMIT);
  886.   DBIERR_INDEXLIMIT             = (ERRBASE_LIMIT + ERRCODE_INDEXLIMIT);
  887.   DBIERR_SESSIONSLIMIT          = (ERRBASE_LIMIT + ERRCODE_SESSIONSLIMIT);
  888.   DBIERR_DBLIMIT                = (ERRBASE_LIMIT + ERRCODE_DBLIMIT);
  889.   DBIERR_PASSWORDLIMIT          = (ERRBASE_LIMIT + ERRCODE_PASSWORDLIMIT);
  890.   DBIERR_DRIVERLIMIT            = (ERRBASE_LIMIT + ERRCODE_DRIVERLIMIT);
  891.   DBIERR_FLDLIMIT               = (ERRBASE_LIMIT + ERRCODE_FLDLIMIT);
  892.   DBIERR_TBLLOCKLIMIT           = (ERRBASE_LIMIT + ERRCODE_TBLLOCKLIMIT);
  893.   DBIERR_OPENBLOBLIMIT          = (ERRBASE_LIMIT + ERRCODE_OPENBLOBLIMIT);
  894.   DBIERR_LOCKFILELIMIT          = (ERRBASE_LIMIT + ERRCODE_LOCKFILELIMIT);
  895.   DBIERR_OPENQRYLIMIT           = (ERRBASE_LIMIT + ERRCODE_OPENQRYLIMIT);
  896.   DBIERR_THREADLIMIT            = (ERRBASE_LIMIT + ERRCODE_THREADLIMIT);
  897.   DBIERR_BLOBLIMIT              = (ERRBASE_LIMIT + ERRCODE_BLOBLIMIT);
  898.   DBIERR_PDX50NAMELIMIT         = (ERRBASE_LIMIT + ERRCODE_PDX50NAMELIMIT);
  899.   DBIERR_ROWFETCHLIMIT          = (ERRBASE_LIMIT + ERRCODE_ROWFETCHLIMIT);
  900.   DBIERR_LONGNAMENOTALLOWED     = (ERRBASE_LIMIT + ERRCODE_LONGNAMENOTALLOWED);
  901.   DBIERR_NOSHAREDMEMORY         = (ERRBASE_LIMIT + ERRCODE_NOSHAREDMEMORY);
  904. { ERRCAT_INTEGRITY }
  905. { ================ }
  907.   ERRCODE_KEYVIOL               = 1;      { Key violation }
  908.   ERRCODE_MINVALERR             = 2;      { Min val check failed }
  909.   ERRCODE_MAXVALERR             = 3;      { Max val check failed }
  910.   ERRCODE_REQDERR               = 4;      { Field value required }
  911.   ERRCODE_FORIEGNKEYERR         = 5;      { Master record missing }
  912.   ERRCODE_DETAILRECORDSEXIST    = 6;      { Cannot MODIFY or DELETE this Master record }
  913.   ERRCODE_MASTERTBLLEVEL        = 7;      { Master Table Level is incorrect }
  914.   ERRCODE_LOOKUPTABLEERR        = 8;      { Field value out of lookup tbl range }
  915.   ERRCODE_LOOKUPTBLOPENERR      = 9;      { Lookup Table Open failed }
  916.   ERRCODE_DETAILTBLOPENERR      = 10;     { 0x0a Detail Table Open failed }
  917.   ERRCODE_MASTERTBLOPENERR      = 11;     { 0x0b Master Table Open failed }
  918.   ERRCODE_FIELDISBLANK          = 12;     { 0x0c Field is blank }
  920.   ERRCODE_MASTEREXISTS          = 13;     { 0x0d Master Table exists }
  921.   ERRCODE_MASTERTBLOPEN         = 14;     { 0x0e Master Table is open }
  923.   ERRCODE_DETAILTABLESEXIST     = 15;     { 0x0f Detail Tables exist ( cannot delete, rename ... ) }
  924.   ERRCODE_DETAILRECEXISTEMPTY   = 16;     { 0x10 Cannot empty because details exist }
  925.   ERRCODE_MASTERREFERENCEERR    = 17;     { 0x11 Cannot modify while adding self referencing Referential Integrity }
  926.   ERRCODE_DETAILTBLOPEN         = 18;     { 0x12 Detail Table is opened }
  927.   ERRCODE_DEPENDENTSMUSTBEEMPTY = 19;     { 0x13 Cannot make a master a detail of another table if its details are not empty. }
  928.   ERRCODE_RINTREQINDEX          = 20;     { 0x14 Ref. integrity fields must be indexed }
  929.   ERRCODE_LINKEDTBLPROTECTED    = 21;     { 0x15 Master Table is protected ( requires password to open) }
  930.   ERRCODE_FIELDMULTILINKED      = 22;     { 0x16 Field has more than one master }
  931.   ERRCODE_EXPRVALERR            = 23;     { 0x17 Expr val check failed }
  933.   DBIERR_KEYVIOL                = (ERRBASE_INTEGRITY + ERRCODE_KEYVIOL);
  934.   DBIERR_MINVALERR              = (ERRBASE_INTEGRITY + ERRCODE_MINVALERR);
  935.   DBIERR_MAXVALERR              = (ERRBASE_INTEGRITY + ERRCODE_MAXVALERR);
  936.   DBIERR_REQDERR                = (ERRBASE_INTEGRITY + ERRCODE_REQDERR);
  937.   DBIERR_FORIEGNKEYERR          = (ERRBASE_INTEGRITY + ERRCODE_FORIEGNKEYERR);
  938.   DBIERR_DETAILRECORDSEXIST     = (ERRBASE_INTEGRITY + ERRCODE_DETAILRECORDSEXIST);
  939.   DBIERR_MASTERTBLLEVEL         = (ERRBASE_INTEGRITY + ERRCODE_MASTERTBLLEVEL);
  940.   DBIERR_LOOKUPTABLEERR         = (ERRBASE_INTEGRITY + ERRCODE_LOOKUPTABLEERR);
  941.   DBIERR_LOOKUPTBLOPENERR       = (ERRBASE_INTEGRITY + ERRCODE_LOOKUPTBLOPENERR);
  942.   DBIERR_DETAILTBLOPENERR       = (ERRBASE_INTEGRITY + ERRCODE_DETAILTBLOPENERR);
  943.   DBIERR_MASTERTBLOPENERR       = (ERRBASE_INTEGRITY + ERRCODE_MASTERTBLOPENERR);
  944.   DBIERR_FIELDISBLANK           = (ERRBASE_INTEGRITY + ERRCODE_FIELDISBLANK);
  945.   DBIERR_MASTEREXISTS           = (ERRBASE_INTEGRITY + ERRCODE_MASTEREXISTS);
  946.   DBIERR_MASTERTBLOPEN          = (ERRBASE_INTEGRITY + ERRCODE_MASTERTBLOPEN);
  947.   DBIERR_DETAILTABLESEXIST      = (ERRBASE_INTEGRITY + ERRCODE_DETAILTABLESEXIST);
  948.   DBIERR_DETAILRECEXISTEMPTY    = (ERRBASE_INTEGRITY + ERRCODE_DETAILRECEXISTEMPTY);
  949.   DBIERR_MASTERREFERENCEERR     = (ERRBASE_INTEGRITY + ERRCODE_MASTERREFERENCEERR);
  950.   DBIERR_DETAILTBLOPEN          = (ERRBASE_INTEGRITY + ERRCODE_DETAILTBLOPEN);
  951.   DBIERR_DEPENDENTSMUSTBEEMPTY  = (ERRBASE_INTEGRITY + ERRCODE_DEPENDENTSMUSTBEEMPTY);
  952.   DBIERR_RINTREQINDEX           = (ERRBASE_INTEGRITY + ERRCODE_RINTREQINDEX);
  953.   DBIERR_LINKEDTBLPROTECTED     = (ERRBASE_INTEGRITY + ERRCODE_LINKEDTBLPROTECTED);
  954.   DBIERR_FIELDMULTILINKED       = (ERRBASE_INTEGRITY + ERRCODE_FIELDMULTILINKED);
  955.   DBIERR_EXPRVALERR             = (ERRBASE_INTEGRITY + ERRCODE_EXPRVALERR);
  958. { ERRCAT_INVALIDREQ }
  959. { ================= }
  961.   ERRCODE_OUTOFRANGE            = 1;      { Number out of range (e.g field no) }
  962.   ERRCODE_INVALIDPARAM          = 2;      { Generic invalid parameter }
  963.   ERRCODE_INVALIDFILENAME       = 3;      { Invalid file name }
  964.   ERRCODE_NOSUCHFILE            = 4;      { No such file }
  965.   ERRCODE_INVALIDOPTION         = 5;      { Invalid option for a parameter }
  966.   ERRCODE_INVALIDHNDL           = 6;      { Invalid handle to the function }
  967.   ERRCODE_UNKNOWNTBLTYPE        = 7;      { Table type given not known }
  968.   ERRCODE_UNKNOWNFILE           = 8;      { Dont know how to open file }
  969.   ERRCODE_PRIMARYKEYREDEFINE    = 9;      { Cannot redefine primary key }
  970.   ERRCODE_INVALIDRINTDESCNUM    = 10;     { 0x0a Cannot change this RINTDesc }
  971.   ERRCODE_KEYFLDTYPEMISMATCH    = 11;     { 0x0b Foreign & Primary Key Mismatch }
  972.   ERRCODE_INVALIDMODIFYREQUEST  = 12;     { 0x0c Invalid modify request }
  973.   ERRCODE_NOSUCHINDEX           = 13;     { 0x0d Index does not exist }
  974.   ERRCODE_INVALIDBLOBOFFSET     = 14;     { 0x0e Invalid Offset into the Blob }
  975.   ERRCODE_INVALIDDESCNUM        = 15;     { 0x0f Invalid descriptor number }
  976.   ERRCODE_INVALIDFLDTYPE        = 16;     { 0x10 Invalid field type }
  977.   ERRCODE_INVALIDFLDDESC        = 17;     { 0x11 Invalid field descriptor }
  978.   ERRCODE_INVALIDFLDXFORM       = 18;     { 0x12 Invalid field transform }
  979.   ERRCODE_INVALIDRECSTRUCT      = 19;     { 0x13 Invalid record structure }
  980.   ERRCODE_INVALIDDESC           = 20;     { 0x14 Generic: invalid descriptor }
  981.   ERRCODE_INVALIDINDEXSTRUCT    = 21;     { 0x15 Invalid array of indexes descriptors }
  982.   ERRCODE_INVALIDVCHKSTRUCT     = 22;     { 0x16 Invalid array of  val. check descriptors }
  983.   ERRCODE_INVALIDRINTSTRUCT     = 23;     { 0x17 Invalid array of ref. integrity descriptors }
  984.   ERRCODE_INVALIDRESTRTBLORDER  = 24;     { 0x18 Invalid ordering of tables during restructure }
  985.   ERRCODE_NAMENOTUNIQUE         = 25;     { 0x19 Name not unique in this context }
  986.   ERRCODE_INDEXNAMEREQUIRED     = 26;     { 0x1a Index name required }
  987.   ERRCODE_INVALIDSESHANDLE      = 27;     { 0x1b Invalid ses handle }
  988.   ERRCODE_INVALIDRESTROP        = 28;     { 0x1c Invalid restructure operation }
  989.   ERRCODE_UNKNOWNDRIVER         = 29;     { 0x1d Driver not known to system }
  990.   ERRCODE_UNKNOWNDB             = 30;     { 0x1e Unknown db }
  991.   ERRCODE_INVALIDPASSWORD       = 31;     { 0x1f Invalid password given }
  992.   ERRCODE_NOCALLBACK            = 32;     { 0x20 No callback function }
  993.   ERRCODE_INVALIDCALLBACKBUFLEN = 33;     { 0x21 Invalid callback buffer length }
  994.   ERRCODE_INVALIDDIR            = 34;     { 0x22 Invalid directory }
  995.   ERRCODE_INVALIDXLATION        = 35;     { 0x23 Translate Error - Translate DID NOT happen }
  996.   ERRCODE_DIFFERENTTABLES       = 36;     { 0x24 Cannot Set Cursor of one Table to another }
  997.   ERRCODE_INVALIDBOOKMARK       = 37;     { 0x25 Bookmarks does not match table, etc. }
  998.   ERRCODE_INVALIDINDEXNAME      = 38;     { 0x26 Index/Tag Name is invalid }
  999.   ERRCODE_INVALIDIDXDESC        = 39;     { 0x27 Invalid index descriptor }
  1000.   ERRCODE_NOSUCHTABLE           = 40;     { 0x28 No such table }
  1001.   ERRCODE_USECOUNT              = 41;     { 0x29 Table has too many users }
  1002.   ERRCODE_INVALIDKEY            = 42;     { 0x2a Key does not pass filter condition }
  1003.   ERRCODE_INDEXEXISTS           = 43;     { 0x2b Index already exists }
  1004.   ERRCODE_INDEXOPEN             = 44;     { 0x2c Index is open }
  1005.   ERRCODE_INVALIDBLOBLEN        = 45;     { 0x2d Invalid Blob Length }
  1006.   ERRCODE_INVALIDBLOBHANDLE     = 46;     { 0x2e Invalid Blob handle (in record buffer) }
  1007.   ERRCODE_TABLEOPEN             = 47;     { 0x2f Table is open }
  1008.   ERRCODE_NEEDRESTRUCTURE       = 48;     { 0x30 Need to do (hard) restructure }
  1009.   ERRCODE_INVALIDMODE           = 49;     { 0x31 Invalid mode }
  1010.   ERRCODE_CANNOTCLOSE           = 50;     { 0x32 Cannot close index }
  1011.   ERRCODE_ACTIVEINDEX           = 51;     { 0x33 Index is being used to order tbl }
  1012.   ERRCODE_INVALIDUSRPASS        = 52;     { 0x34 Bad user name or password }
  1013.   ERRCODE_MULTILEVELCASCADE     = 53;     { 0x35 Multi level Cascade not supported }
  1014.   ERRCODE_INVALIDFIELDNAME      = 54;     { 0x36 Invalid field name }
  1015.   ERRCODE_INVALIDTABLENAME      = 55;     { 0x37 Invalid table name }
  1016.   ERRCODE_INVALIDLINKEXPR       = 56;     { 0x38 Invalid linked cursor expression }
  1017.   ERRCODE_NAMERESERVED          = 57;     { 0x39 Name is reserved }
  1018.   ERRCODE_INVALIDFILEEXTN       = 58;     { 0x3a Invalid file extention }
  1019.   ERRCODE_INVALIDLANGDRV        = 59;     { 0x3b Invalid language driver }
  1020.   ERRCODE_ALIASNOTOPEN          = 60;     { 0x3c Requested alias in not open }
  1021.   ERRCODE_INCOMPATRECSTRUCTS    = 61;     { 0x3d Incompatible record structures }
  1022.   ERRCODE_RESERVEDDOSNAME       = 62;     { 0x3e Reserved dos name }
  1023.   ERRCODE_DESTMUSTBEINDEXED     = 63;     { 0x3f Destination must be indexed }
  1024.   ERRCODE_INVALIDINDEXTYPE      = 64;     { 0x40 Invalid index type }
  1025.   ERRCODE_LANGDRVMISMATCH       = 65;     { 0x41 Language driver of table and index do not match }
  1026.   ERRCODE_NOSUCHFILTER          = 66;     { 0x42 Filter handle is invalid }
  1027.   ERRCODE_INVALIDFILTER         = 67;     { 0x43 Invalid filter }
  1029.   ERRCODE_INVALIDTABLECREATE    = 68;     { 0x44 Bad table create request (exact prob unknown) }
  1030.   ERRCODE_INVALIDTABLEDELETE    = 69;     { 0x45 Bad table delete request (exact prob unknown) }
  1031.   ERRCODE_INVALIDINDEXCREATE    = 70;     { 0x46 Bad index create request (exact prob unknown) }
  1032.   ERRCODE_INVALIDINDEXDELETE    = 71;     { 0x47 Bad index delete request (exact prob unknown) }
  1033.   ERRCODE_INVALIDTABLE          = 72;     { 0x48 Invalid table name specified }
  1034.   ERRCODE_MULTIRESULTS          = 73;     { 0X49 Multi results }
  1035.   ERRCODE_INVALIDTIME           = 74;     { 0X4A Multi results }
  1036.   ERRCODE_INVALIDDATE           = 75;     { 0X4B Multi results }
  1037.   ERRCODE_INVALIDTIMESTAMP      = 76;     { 0X4C Multi results }
  1038.   ERRCODE_DIFFERENTPATH         = 77;     { 0X4d Tables in different paths }
  1039.   ERRCODE_MISMATCHARGS          = 78;     { 0x4e MisMatch in the # of arguments }
  1040.   ERRCODE_FUNCTIONNOTFOUND      = 79;     { 0x4f Loaderlib cant find a func in the DLL (bad version?) }
  1041.   ERRCODE_MUSTUSEBASEORDER      = 80;     { 0x50 Must use baseorder for this operation }
  1042.   ERRCODE_INVALIDPROCEDURENAME  = 81;     { 0x51 Invalid procedure name }
  1043.   ERRCODE_INVALIDFLDMAP         = 82;     { 0x52 invalid field map }
  1046.   DBIERR_OUTOFRANGE             = (ERRBASE_INVALIDREQ + ERRCODE_OUTOFRANGE);
  1047.   DBIERR_INVALIDPARAM           = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDPARAM);
  1048.   DBIERR_INVALIDFILENAME        = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDFILENAME);
  1049.   DBIERR_NOSUCHFILE             = (ERRBASE_INVALIDREQ + ERRCODE_NOSUCHFILE);
  1050.   DBIERR_INVALIDOPTION          = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDOPTION);
  1051.   DBIERR_INVALIDHNDL            = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDHNDL);
  1052.   DBIERR_UNKNOWNTBLTYPE         = (ERRBASE_INVALIDREQ + ERRCODE_UNKNOWNTBLTYPE);
  1053.   DBIERR_UNKNOWNFILE            = (ERRBASE_INVALIDREQ + ERRCODE_UNKNOWNFILE);
  1054.   DBIERR_PRIMARYKEYREDEFINE     = (ERRBASE_INVALIDREQ + ERRCODE_PRIMARYKEYREDEFINE);
  1055.   DBIERR_INVALIDRINTDESCNUM     = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDRINTDESCNUM);
  1056.   DBIERR_KEYFLDTYPEMISMATCH     = (ERRBASE_INVALIDREQ + ERRCODE_KEYFLDTYPEMISMATCH);
  1057.   DBIERR_INVALIDMODIFYREQUEST   = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDMODIFYREQUEST);
  1058.   DBIERR_NOSUCHINDEX            = (ERRBASE_INVALIDREQ + ERRCODE_NOSUCHINDEX);
  1059.   DBIERR_INVALIDBLOBOFFSET      = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDBLOBOFFSET);
  1060.   DBIERR_INVALIDDESCNUM         = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDDESCNUM);
  1061.   DBIERR_INVALIDFLDTYPE         = (ERRBASE_INVALIDREQ +  ERRCODE_INVALIDFLDTYPE);
  1062.   DBIERR_INVALIDFLDDESC         = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDFLDDESC);
  1063.   DBIERR_INVALIDFLDXFORM        = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDFLDXFORM);
  1064.   DBIERR_INVALIDRECSTRUCT       = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDRECSTRUCT);
  1065.   DBIERR_INVALIDDESC            = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDDESC);
  1066.   DBIERR_INVALIDINDEXSTRUCT     = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDINDEXSTRUCT);
  1067.   DBIERR_INVALIDVCHKSTRUCT      = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDVCHKSTRUCT);
  1068.   DBIERR_INVALIDRINTSTRUCT      = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDRINTSTRUCT);
  1069.   DBIERR_INVALIDRESTRTBLORDER   = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDRESTRTBLORDER);
  1070.   DBIERR_NAMENOTUNIQUE          = (ERRBASE_INVALIDREQ + ERRCODE_NAMENOTUNIQUE);
  1071.   DBIERR_INDEXNAMEREQUIRED      = (ERRBASE_INVALIDREQ + ERRCODE_INDEXNAMEREQUIRED);
  1072.   DBIERR_INVALIDSESHANDLE       = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDSESHANDLE);
  1073.   DBIERR_INVALIDRESTROP         = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDRESTROP);
  1074.   DBIERR_UNKNOWNDRIVER          = (ERRBASE_INVALIDREQ + ERRCODE_UNKNOWNDRIVER);
  1075.   DBIERR_UNKNOWNDB              = (ERRBASE_INVALIDREQ + ERRCODE_UNKNOWNDB);
  1076.   DBIERR_INVALIDPASSWORD        = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDPASSWORD);
  1077.   DBIERR_NOCALLBACK             = (ERRBASE_INVALIDREQ + ERRCODE_NOCALLBACK);
  1078.   DBIERR_INVALIDCALLBACKBUFLEN  = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDCALLBACKBUFLEN );
  1079.   DBIERR_INVALIDDIR             = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDDIR);
  1080.   DBIERR_INVALIDXLATION         = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDXLATION);
  1081.   DBIERR_DIFFERENTTABLES        = (ERRBASE_INVALIDREQ + ERRCODE_DIFFERENTTABLES);
  1082.   DBIERR_INVALIDBOOKMARK        = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDBOOKMARK);
  1083.   DBIERR_INVALIDINDEXNAME       = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDINDEXNAME);
  1084.   DBIERR_INVALIDIDXDESC         = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDIDXDESC);
  1085.   DBIERR_NOSUCHTABLE            = (ERRBASE_INVALIDREQ + ERRCODE_NOSUCHTABLE);
  1086.   DBIERR_USECOUNT               = (ERRBASE_INVALIDREQ + ERRCODE_USECOUNT);
  1087.   DBIERR_INVALIDKEY             = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDKEY);
  1088.   DBIERR_INDEXEXISTS            = (ERRBASE_INVALIDREQ + ERRCODE_INDEXEXISTS);
  1089.   DBIERR_INDEXOPEN              = (ERRBASE_INVALIDREQ + ERRCODE_INDEXOPEN);
  1090.   DBIERR_INVALIDBLOBLEN         = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDBLOBLEN);
  1091.   DBIERR_INVALIDBLOBHANDLE      = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDBLOBHANDLE);
  1092.   DBIERR_TABLEOPEN              = (ERRBASE_INVALIDREQ + ERRCODE_TABLEOPEN);
  1093.   DBIERR_NEEDRESTRUCTURE        = (ERRBASE_INVALIDREQ + ERRCODE_NEEDRESTRUCTURE);
  1094.   DBIERR_INVALIDMODE            = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDMODE);
  1095.   DBIERR_CANNOTCLOSE            = (ERRBASE_INVALIDREQ + ERRCODE_CANNOTCLOSE);
  1096.   DBIERR_ACTIVEINDEX            = (ERRBASE_INVALIDREQ + ERRCODE_ACTIVEINDEX);
  1097.   DBIERR_INVALIDUSRPASS         = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDUSRPASS);
  1098.   DBIERR_MULTILEVELCASCADE      = (ERRBASE_INVALIDREQ + ERRCODE_MULTILEVELCASCADE);
  1099.   DBIERR_INVALIDFIELDNAME       = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDFIELDNAME);
  1100.   DBIERR_INVALIDTABLENAME       = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDTABLENAME);
  1101.   DBIERR_INVALIDLINKEXPR        = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDLINKEXPR);
  1102.   DBIERR_NAMERESERVED           = (ERRBASE_INVALIDREQ + ERRCODE_NAMERESERVED);
  1103.   DBIERR_INVALIDFILEEXTN        = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDFILEEXTN);
  1104.   DBIERR_INVALIDLANGDRV         = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDLANGDRV);
  1105.   DBIERR_ALIASNOTOPEN           = (ERRBASE_INVALIDREQ + ERRCODE_ALIASNOTOPEN);
  1106.   DBIERR_INCOMPATRECSTRUCTS     = (ERRBASE_INVALIDREQ + ERRCODE_INCOMPATRECSTRUCTS);
  1107.   DBIERR_RESERVEDOSNAME         = (ERRBASE_INVALIDREQ + ERRCODE_RESERVEDDOSNAME);
  1108.   DBIERR_DESTMUSTBEINDEXED      = (ERRBASE_INVALIDREQ + ERRCODE_DESTMUSTBEINDEXED);
  1109.   DBIERR_INVALIDINDEXTYPE       = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDINDEXTYPE);
  1110.   DBIERR_LANGDRVMISMATCH        = (ERRBASE_INVALIDREQ + ERRCODE_LANGDRVMISMATCH);
  1111.   DBIERR_NOSUCHFILTER           = (ERRBASE_INVALIDREQ + ERRCODE_NOSUCHFILTER);
  1112.   DBIERR_INVALIDFILTER          = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDFILTER);
  1113.   DBIERR_INVALIDTABLECREATE     = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDTABLECREATE);
  1114.   DBIERR_INVALIDTABLEDELETE     = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDTABLEDELETE);
  1115.   DBIERR_INVALIDINDEXCREATE     = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDINDEXCREATE);
  1116.   DBIERR_INVALIDINDEXDELETE     = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDINDEXDELETE);
  1117.   DBIERR_INVALIDTABLE           = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDTABLE);
  1118.   DBIERR_MULTIRESULTS           = (ERRBASE_INVALIDREQ + ERRCODE_MULTIRESULTS);
  1119.   DBIERR_INVALIDTIME            = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDTIME);
  1120.   DBIERR_INVALIDDATE            = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDDATE);
  1121.   DBIERR_INVALIDTIMESTAMP       = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDTIMESTAMP);
  1122.   DBIERR_DIFFERENTPATH          = (ERRBASE_INVALIDREQ + ERRCODE_DIFFERENTPATH);
  1123.   DBIERR_MISMATCHARGS           = (ERRBASE_INVALIDREQ + ERRCODE_MISMATCHARGS);
  1124.   DBIERR_FUNCTIONNOTFOUND       = (ERRBASE_INVALIDREQ + ERRCODE_FUNCTIONNOTFOUND);
  1125.   DBIERR_MUSTUSEBASEORDER       = (ERRBASE_INVALIDREQ + ERRCODE_MUSTUSEBASEORDER);
  1126.   DBIERR_INVALIDPROCEDURENAME   = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDPROCEDURENAME);
  1127.   DBIERR_INVALIDFLDMAP          = (ERRBASE_INVALIDREQ + ERRCODE_INVALIDFLDMAP);
  1129. { ERRCAT_LOCKCONFLICT }
  1130. { =================== }
  1132.   ERRCODE_LOCKED                = 1;
  1133.   ERRCODE_UNLOCKFAILED          = 2;
  1134.   ERRCODE_FILEBUSY              = 3;
  1135.   ERRCODE_DIRBUSY               = 4;
  1136.   ERRCODE_FILELOCKED            = 5;
  1137.   ERRCODE_DIRLOCKED             = 6;
  1138.   ERRCODE_ALREADYLOCKED         = 7;
  1139.   ERRCODE_NOTLOCKED             = 8;
  1140.   ERRCODE_LOCKTIMEOUT           = 9;
  1141.   ERRCODE_GROUPLOCKED           = 10;     { 0x0a }
  1142.   ERRCODE_LOSTTBLLOCK           = 11;     { 0x0b }
  1143.   ERRCODE_LOSTEXCLACCESS        = 12;     { 0x0c }
  1144.   ERRCODE_NEEDEXCLACCESS        = 13;     { 0x0d }
  1145.   ERRCODE_RECGROUPCONFLICT      = 14;     { 0x0e }
  1146.   ERRCODE_DEADLOCK              = 15;
  1147.   ERRCODE_ACTIVETRAN            = 16;
  1148.   ERRCODE_NOACTIVETRAN          = 17;
  1149.   ERRCODE_RECLOCKFAILED         = 18;
  1150.   ERRCODE_OPTRECLOCKFAILED      = 19;
  1151.   ERRCODE_OPTRECLOCKRECDEL      = 20;
  1152.   ERRCODE_LOCKEDRECS            = 21;
  1153.   ERRCODE_NEEDWRITELOCK         = 22;
  1154.   ERRCODE_ENLISTFAILED          = 23; 
  1156.   DBIERR_LOCKED                 = (ERRBASE_LOCKCONFLICT + ERRCODE_LOCKED);
  1157.   DBIERR_UNLOCKFAILED           = (ERRBASE_LOCKCONFLICT + ERRCODE_UNLOCKFAILED);
  1158.   DBIERR_FILEBUSY               = (ERRBASE_LOCKCONFLICT + ERRCODE_FILEBUSY);
  1159.   DBIERR_DIRBUSY                = (ERRBASE_LOCKCONFLICT + ERRCODE_DIRBUSY);
  1160.   DBIERR_FILELOCKED             = (ERRBASE_LOCKCONFLICT + ERRCODE_FILELOCKED);
  1161.   DBIERR_DIRLOCKED              = (ERRBASE_LOCKCONFLICT + ERRCODE_DIRLOCKED);
  1162.   DBIERR_ALREADYLOCKED          = (ERRBASE_LOCKCONFLICT + ERRCODE_ALREADYLOCKED);
  1163.   DBIERR_NOTLOCKED              = (ERRBASE_LOCKCONFLICT + ERRCODE_NOTLOCKED);
  1164.   DBIERR_LOCKTIMEOUT            = (ERRBASE_LOCKCONFLICT + ERRCODE_LOCKTIMEOUT);
  1165.   DBIERR_GROUPLOCKED            = (ERRBASE_LOCKCONFLICT + ERRCODE_GROUPLOCKED);
  1166.   DBIERR_LOSTTBLLOCK            = (ERRBASE_LOCKCONFLICT + ERRCODE_LOSTTBLLOCK);
  1167.   DBIERR_LOSTEXCLACCESS         = (ERRBASE_LOCKCONFLICT + ERRCODE_LOSTEXCLACCESS);
  1168.   DBIERR_NEEDEXCLACCESS         = (ERRBASE_LOCKCONFLICT  + ERRCODE_NEEDEXCLACCESS);
  1169.   DBIERR_RECGROUPCONFLICT       = (ERRBASE_LOCKCONFLICT + ERRCODE_RECGROUPCONFLICT);
  1170.   DBIERR_DEADLOCK               = (ERRBASE_LOCKCONFLICT + ERRCODE_DEADLOCK);
  1171.   DBIERR_ACTIVETRAN             = (ERRBASE_LOCKCONFLICT + ERRCODE_ACTIVETRAN);
  1172.   DBIERR_NOACTIVETRAN           = (ERRBASE_LOCKCONFLICT + ERRCODE_NOACTIVETRAN);
  1173.   DBIERR_RECLOCKFAILED          = (ERRBASE_LOCKCONFLICT + ERRCODE_RECLOCKFAILED);
  1174.   DBIERR_OPTRECLOCKFAILED       = (ERRBASE_LOCKCONFLICT + ERRCODE_OPTRECLOCKFAILED);
  1175.   DBIERR_OPTRECLOCKRECDEL       = (ERRBASE_LOCKCONFLICT + ERRCODE_OPTRECLOCKRECDEL);
  1176.   DBIERR_ENLISTFAILED           = (ERRBASE_LOCKCONFLICT + ERRCODE_ENLISTFAILED); 
  1178. { ERRCAT_SECURITY }
  1179. { =============== }
  1181.   ERRCODE_NOTSUFFFIELDRIGHTS    = 1;      { Not sufficient field  rights for operation }
  1182.   ERRCODE_NOTSUFFTABLERIGHTS    = 2;      { Not sufficient table  rights for operation }
  1183.   ERRCODE_NOTSUFFFAMILYRIGHTS   = 3;      { Not sufficient family rights for operation }
  1184.   ERRCODE_READONLYDIR           = 4;      { Is a read-only directory }
  1185.   ERRCODE_READONLYDB            = 5;      { Database is read-only }
  1186.   ERRCODE_READONLYFLD           = 6;      { Trying to modify read-only field }
  1187.   ERRCODE_TBLENCRYPTED          = 7;      { Table is encrypted (dBASE only) }
  1188.   ERRCODE_NOTSUFFSQLRIGHTS      = 8;      { Not sufficient sql rights for operation }
  1191.   DBIERR_NOTSUFFFIELDRIGHTS     = (ERRBASE_SEC + ERRCODE_NOTSUFFFIELDRIGHTS);
  1192.   DBIERR_NOTSUFFTABLERIGHTS     = (ERRBASE_SEC + ERRCODE_NOTSUFFTABLERIGHTS);
  1193.   DBIERR_NOTSUFFFAMILYRIGHTS    = (ERRBASE_SEC + ERRCODE_NOTSUFFFAMILYRIGHTS);
  1194.   DBIERR_READONLYDIR            = (ERRBASE_SEC + ERRCODE_READONLYDIR);
  1195.   DBIERR_READONLYDB             = (ERRBASE_SEC + ERRCODE_READONLYDB);
  1196.   DBIERR_READONLYFLD            = (ERRBASE_SEC + ERRCODE_READONLYFLD);
  1197.   DBIERR_TBLENCRYPTED           = (ERRBASE_SEC + ERRCODE_TBLENCRYPTED);
  1198.   DBIERR_NOTSUFFSQLRIGHTS       = (ERRBASE_SEC + ERRCODE_NOTSUFFSQLRIGHTS);
  1201. { ERRCAT_INVALIDCONTEXT }
  1202. { ===================== }
  1204.   ERRCODE_NOTABLOB              = 1;      { Field is not a blob }
  1205.   ERRCODE_BLOBOPENED            = 2;      { Blob already opened }
  1206.   ERRCODE_BLOBNOTOPENED         = 3;      { Blob not opened }
  1207.   ERRCODE_NA                    = 4;      { Operation not applicable }
  1208.   ERRCODE_NOTINDEXED            = 5;      { Table is not indexed }
  1209.   ERRCODE_NOTINITIALIZED        = 6;      { Engine not initialized }
  1210.   ERRCODE_MULTIPLEINIT          = 7;      { Attempt to re-initialize engine }
  1211.   ERRCODE_NOTSAMESESSION        = 8;      { Attempt to mix objs from diff ses }
  1212.   ERRCODE_PDXDRIVERNOTACTIVE    = 9;      { Paradox driver not active }
  1213.   ERRCODE_DRIVERNOTLOADED       = 10;     { 0x0a Driver not loaded }
  1214.   ERRCODE_TABLEREADONLY         = 11;     { 0x0b Table is read only }
  1215.   ERRCODE_NOASSOCINDEX          = 12;     { 0x0c No index associated with the cursor }
  1216.   ERRCODE_HASOPENCURSORS        = 13;     { 0x0d Has open cursors }
  1217.   ERRCODE_NOTABLESUPPORT        = 14;     { 0x0e Op cannot be done on this table }
  1218.   ERRCODE_INDEXREADONLY         = 15;     { 0x0f Index is read only }
  1219.   ERRCODE_NOUNIQUERECS          = 16;     { 0x10 Records are not unique }
  1220.   ERRCODE_NOTCURSESSION         = 17;     { 0x11 Not the current/active session }
  1221.   ERRCODE_INVALIDKEYWORD        = 18;     { 0x12 Invalid use of keyword. }
  1222.   ERRCODE_CONNECTINUSE          = 19;     { 0x13 Connection in use }
  1223.   ERRCODE_CONNECTNOTSHARED      = 20;     { 0x14 Passthru SQL connection not share }
  1226.   DBIERR_NOTABLOB               = (ERRBASE_IC + ERRCODE_NOTABLOB);
  1227.   DBIERR_BLOBOPENED             = (ERRBASE_IC + ERRCODE_BLOBOPENED);
  1228.   DBIERR_BLOBNOTOPENED          = (ERRBASE_IC + ERRCODE_BLOBNOTOPENED);
  1229.   DBIERR_NA                     = (ERRBASE_IC + ERRCODE_NA);
  1230.   DBIERR_NOTINDEXED             = (ERRBASE_IC + ERRCODE_NOTINDEXED);
  1231.   DBIERR_NOTINITIALIZED         = (ERRBASE_IC + ERRCODE_NOTINITIALIZED);
  1232.   DBIERR_MULTIPLEINIT           = (ERRBASE_IC + ERRCODE_MULTIPLEINIT);
  1233.   DBIERR_NOTSAMESESSION         = (ERRBASE_IC + ERRCODE_NOTSAMESESSION);
  1234.   DBIERR_PDXDRIVERNOTACTIVE     = (ERRBASE_IC + ERRCODE_PDXDRIVERNOTACTIVE);
  1235.   DBIERR_DRIVERNOTLOADED        = (ERRBASE_IC + ERRCODE_DRIVERNOTLOADED);
  1236.   DBIERR_TABLEREADONLY          = (ERRBASE_IC + ERRCODE_TABLEREADONLY);
  1237.   DBIERR_NOASSOCINDEX           = (ERRBASE_IC + ERRCODE_NOASSOCINDEX);
  1238.   DBIERR_HASOPENCURSORS         = (ERRBASE_IC + ERRCODE_HASOPENCURSORS);
  1239.   DBIERR_NOTABLESUPPORT         = (ERRBASE_IC + ERRCODE_NOTABLESUPPORT);
  1240.   DBIERR_INDEXREADONLY          = (ERRBASE_IC + ERRCODE_INDEXREADONLY);
  1241.   DBIERR_NOUNIQUERECS           = (ERRBASE_IC + ERRCODE_NOUNIQUERECS);
  1242.   DBIERR_NOTCURSESSION          = (ERRBASE_IC + ERRCODE_NOTCURSESSION);
  1243.   DBIERR_INVALIDKEYWORD         = (ERRBASE_IC + ERRCODE_INVALIDKEYWORD);
  1244.   DBIERR_CONNECTINUSE           = (ERRBASE_IC + ERRCODE_CONNECTINUSE);
  1245.   DBIERR_CONNECTNOTSHARED       = (ERRBASE_IC + ERRCODE_CONNECTNOTSHARED);
  1248. { ERRCAT_OS }
  1249. { ========= }
  1250. { DOS extended errors: }
  1252.   ERRCODE_OSEINVFNC             = 1;      { Invalid function number }
  1253.   ERRCODE_OSENOENT              = 2;      { No such file or directory }
  1254.   ERRCODE_OSENOPATH             = 3;      { Path not found }
  1255.   ERRCODE_OSEMFILE              = 4;      { Too many open files }
  1256.   ERRCODE_OSEACCES              = 5;      { Permission denied }
  1257.   ERRCODE_OSEBADF               = 6;      { Bad file number }
  1258.   ERRCODE_OSECONTR              = 7;      { Memory blocks destroyed }
  1259.   ERRCODE_OSENOMEM              = 8;      { Not enough core }
  1260.   ERRCODE_OSEINVMEM             = 9;      { Invalid memory block address }
  1261.   ERRCODE_OSEINVENV             = 10;     { 0x0a Invalid environment }
  1262.   ERRCODE_OSEINVFMT             = 11;     { 0x0b Invalid format }
  1263.   ERRCODE_OSEINVACC             = 12;     { 0x0c Invalid access code }
  1264.   ERRCODE_OSEINVDAT             = 13;     { 0x0d Invalid data }
  1265.   ERRCODE_OSENODEV              = 15;     { 0x0f No such device }
  1266.   ERRCODE_OSECURDIR             = 16;     { 0x10 Attempt to remove curdir }
  1267.   ERRCODE_OSENOTSAM             = 17;     { 0x11 Not same device }
  1268.   ERRCODE_OSENMFILE             = 18;     { 0x12 No more files }
  1269.   ERRCODE_OSEINVAL              = 19;     { 0x13 Invalid argument }
  1270.   ERRCODE_OSE2BIG               = 20;     { 0x14 Arg list too long }
  1271.   ERRCODE_OSENOEXEC             = 21;     { 0x15 Exec format error }
  1272.   ERRCODE_OSEXDEV               = 22;     { 0x16 Cross-device link }
  1273.   ERRCODE_OSEDOM                = 33;     { 0x21 Math argument }
  1274.   ERRCODE_OSERANGE              = 34;     { 0x22 Result to large }
  1275.   ERRCODE_OSEEXIST              = 35;     { 0x23 File already exists }
  1276.   ERRCODE_OSUNKNOWN             = 39;     { 0x27 Unkown | illegal error from rtl }
  1278.   ERRCODE_OSSHAREVIOL           = 50;     { 0x32 Share viol, ext. err 0x20 }
  1279.   ERRCODE_OSLOCKVIOL            = 51;     { 0x33 Lock viol, ext. err 0x21 }
  1280.   ERRCODE_OSINT24FAIL           = 52;     { 0x34 INT24 called }
  1281.   ERRCODE_OSDRIVENOTREADY       = 53;     { 0x35 Drive not ready }
  1285. { OTHER Os errors: }
  1286. { 1. idapi errors  }
  1287. { 2. errors from non-dos systems ( i.e. NOVELL ) }
  1289.   ERRCODE_NOTEXACT              = 100;    { 0x64 Not exact read/write }
  1290.   ERRCODE_OSNETERR              = 101;    { 0x65 Generic network error }
  1291.   ERRCODE_OSUNKNOWNSRVERR       = 102;    { 0x66 Error from file server }
  1292.   ERRCODE_SERVERNOMEMORY        = 103;    { 0x67 Server out of memory }
  1293.   ERRCODE_OSALREADYLOCKED       = 104;    { 0x68 Record already locked (by you) }
  1294.   ERRCODE_OSNOTLOCKED           = 105;    { 0x69 Record not locked }
  1295.   ERRCODE_NOSERVERSW            = 106;    { 0x6a Server software not running the workstation/server }
  1298.   DBIERR_OSEINVFNC              = ( ERRBASE_OS + ERRCODE_OSEINVFNC );
  1299.   DBIERR_OSENOENT               = ( ERRBASE_OS + ERRCODE_OSENOENT );
  1300.   DBIERR_OSENOPATH              = ( ERRBASE_OS + ERRCODE_OSENOPATH );
  1301.   DBIERR_OSEMFILE               = ( ERRBASE_OS + ERRCODE_OSEMFILE );
  1302.   DBIERR_OSEACCES               = ( ERRBASE_OS + ERRCODE_OSEACCES );
  1303.   DBIERR_OSEBADF                = ( ERRBASE_OS + ERRCODE_OSEBADF );
  1304.   DBIERR_OSECONTR               = ( ERRBASE_OS + ERRCODE_OSECONTR );
  1305.   DBIERR_OSENOMEM               = ( ERRBASE_OS + ERRCODE_OSENOMEM );
  1306.   DBIERR_OSEINVMEM              = ( ERRBASE_OS + ERRCODE_OSEINVMEM );
  1307.   DBIERR_OSEINVENV              = ( ERRBASE_OS + ERRCODE_OSEINVENV );
  1308.   DBIERR_OSEINVFMT              = ( ERRBASE_OS + ERRCODE_OSEINVFMT );
  1309.   DBIERR_OSEINVACC              = ( ERRBASE_OS + ERRCODE_OSEINVACC );
  1310.   DBIERR_OSEINVDAT              = ( ERRBASE_OS + ERRCODE_OSEINVDAT );
  1311.   DBIERR_OSENODEV               = ( ERRBASE_OS + ERRCODE_OSENODEV );
  1312.   DBIERR_OSECURDIR              = ( ERRBASE_OS + ERRCODE_OSECURDIR );
  1313.   DBIERR_OSENOTSAM              = ( ERRBASE_OS + ERRCODE_OSENOTSAM );
  1314.   DBIERR_OSENMFILE              = ( ERRBASE_OS + ERRCODE_OSENMFILE );
  1315.   DBIERR_OSEINVAL               = ( ERRBASE_OS + ERRCODE_OSEINVAL );
  1316.   DBIERR_OSE2BIG                = ( ERRBASE_OS + ERRCODE_OSE2BIG );
  1317.   DBIERR_OSENOEXEC              = ( ERRBASE_OS + ERRCODE_OSENOEXEC );
  1318.   DBIERR_OSEXDEV                = ( ERRBASE_OS + ERRCODE_OSEXDEV );
  1319.   DBIERR_OSEDOM                 = ( ERRBASE_OS + ERRCODE_OSEDOM );
  1320.   DBIERR_OSERANGE               = ( ERRBASE_OS + ERRCODE_OSERANGE );
  1321.   DBIERR_OSEEXIST               = ( ERRBASE_OS + ERRCODE_OSEEXIST );
  1322.   DBIERR_OSUNKNOWN              = ( ERRBASE_OS + ERRCODE_OSUNKNOWN );
  1323.   DBIERR_OSSHAREVIOL            = ( ERRBASE_OS + ERRCODE_OSSHAREVIOL );
  1324.   DBIERR_OSLOCKVIOL             = ( ERRBASE_OS + ERRCODE_OSLOCKVIOL );
  1325.   DBIERR_OSNETERR               = ( ERRBASE_OS + ERRCODE_OSNETERR );
  1326.   DBIERR_OSINT24FAIL            = ( ERRBASE_OS + ERRCODE_OSINT24FAIL );
  1327.   DBIERR_OSDRIVENOTREADY        = ( ERRBASE_OS + ERRCODE_OSDRIVENOTREADY );
  1330.   DBIERR_NOTEXACT               = ( ERRBASE_OS + ERRCODE_NOTEXACT );
  1331.   DBIERR_OSUNKNOWNSRVERR        = ( ERRBASE_OS + ERRCODE_OSUNKNOWNSRVERR );
  1332.   DBIERR_SERVERNOMEMORY         = ( ERRBASE_OS + ERRCODE_SERVERNOMEMORY );
  1333.   DBIERR_OSALREADYLOCKED        = ( ERRBASE_OS + ERRCODE_OSALREADYLOCKED );
  1334.   DBIERR_OSNOTLOCKED            = ( ERRBASE_OS + ERRCODE_OSNOTLOCKED );
  1335.   DBIERR_NOSERVERSW             = ( ERRBASE_OS + ERRCODE_NOSERVERSW);
  1337. { ERRCAT_NETWORK }
  1338. { ============== }
  1340.   ERRCODE_NETINITERR            = 1;      { Net init failed }
  1341.   ERRCODE_NETUSERLIMIT          = 2;      { Net user limit exceeded }
  1342.   ERRCODE_NETFILEVERSION        = 3;      { Wrong net file version }
  1343.   ERRCODE_NETFILELOCKED         = 4;      { Not able to lock net file }
  1344.   ERRCODE_DIRNOTPRIVATE         = 5;
  1345.   ERRCODE_NETMULTIPLE           = 6;      { Multiple net files in use }
  1346.   ERRCODE_NETUNKNOWN            = 7;      { Unknown net error }
  1347.   ERRCODE_SHAREDFILE            = 8;      { Cannot access a shared file }
  1348.   ERRCODE_SHARENOTLOADED        = 9;      { Share not loaded }
  1349.   ERRCODE_NOTONANETWORK         = 10;     { 0x0a Not an Network }
  1350.   ERRCODE_SQLCOMMLOST           = 11;     { 0x0b Lost Communication with SQL server }
  1351.   ERRCODE_SERVERCOMMLOST        = 12;     { 0x0c Lost Communication with IDAPI server }
  1352.   ERRCODE_SQLSERVERNOTFOUND     = 13;     { 0x0d SQL Server not found }
  1353.   ERRCODE_SERVERNOTFOUND        = 14;     { 0x0e SQL Server not found }
  1355.   DBIERR_NETINITERR             = (ERRBASE_NETWORK + ERRCODE_NETINITERR);
  1356.   DBIERR_NETUSERLIMIT           = (ERRBASE_NETWORK + ERRCODE_NETUSERLIMIT);
  1357.   DBIERR_NETFILEVERSION         = (ERRBASE_NETWORK + ERRCODE_NETFILEVERSION);
  1358.   DBIERR_NETFILELOCKED          = (ERRBASE_NETWORK + ERRCODE_NETFILELOCKED);
  1359.   DBIERR_DIRNOTPRIVATE          = (ERRBASE_NETWORK + ERRCODE_DIRNOTPRIVATE);
  1360.   DBIERR_NETMULTIPLE            = (ERRBASE_NETWORK + ERRCODE_NETMULTIPLE);
  1361.   DBIERR_NETUNKNOWN             = (ERRBASE_NETWORK + ERRCODE_NETUNKNOWN);
  1362.   DBIERR_SHAREDFILE             = (ERRBASE_NETWORK + ERRCODE_SHAREDFILE);
  1363.   DBIERR_SHARENOTLOADED         = (ERRBASE_NETWORK + ERRCODE_SHARENOTLOADED);
  1364.   DBIERR_NOTONANETWORK          = (ERRBASE_NETWORK + ERRCODE_NOTONANETWORK);
  1365.   DBIERR_SQLCOMMLOST            = (ERRBASE_NETWORK + ERRCODE_SQLCOMMLOST);
  1366.   DBIERR_SERVERCOMMLOST         = (ERRBASE_NETWORK + ERRCODE_SERVERCOMMLOST);
  1367.   DBIERR_SQLSERVERNOTFOUND      = (ERRBASE_NETWORK + ERRCODE_SQLSERVERNOTFOUND);
  1368.   DBIERR_SERVERNOTFOUND         = (ERRBASE_NETWORK + ERRCODE_SERVERNOTFOUND);
  1370. { ERRCAT_DRIVER }
  1371. { ============= }
  1373.   ERRCODE_WRONGDRVNAME          = 1;      { Wrong driver name }
  1374.   ERRCODE_WRONGSYSVER           = 2;      { Wrong system version }
  1375.   ERRCODE_WRONGDRVVER           = 3;      { Wrong driver version }
  1376.   ERRCODE_WRONGDRVTYPE          = 4;      { Wrong driver type }
  1377.   ERRCODE_CANNOTLOADDRV         = 5;      { Can not load driver }
  1378.   ERRCODE_CANNOTLOADLDDRV       = 6;      { Can not load language driver }
  1379.   ERRCODE_VENDINITFAIL          = 7;      { Vendor init failure }
  1380.   ERRCODE_DRIVERRESTRICTED      = 8;      { Client not enabled for this driver }
  1383.   DBIERR_WRONGDRVNAME           = (ERRBASE_DRIVER + ERRCODE_WRONGDRVNAME);
  1384.   DBIERR_WRONGSYSVER            = (ERRBASE_DRIVER + ERRCODE_WRONGSYSVER);
  1385.   DBIERR_WRONGDRVVER            = (ERRBASE_DRIVER + ERRCODE_WRONGDRVVER);
  1386.   DBIERR_WRONGDRVTYPE           = (ERRBASE_DRIVER + ERRCODE_WRONGDRVTYPE);
  1387.   DBIERR_CANNOTLOADDRV          = (ERRBASE_DRIVER + ERRCODE_CANNOTLOADDRV);
  1388.   DBIERR_CANNOTLOADLDDRV        = (ERRBASE_DRIVER + ERRCODE_CANNOTLOADLDDRV);
  1389.   DBIERR_VENDINITFAIL           = (ERRBASE_DRIVER + ERRCODE_VENDINITFAIL);
  1390.   DBIERR_DRIVERRESTRICTED       = (ERRBASE_DRIVER + ERRCODE_DRIVERRESTRICTED);
  1393. { ERRCAT_QUERY }
  1394. { ============ }
  1398.   DBICODE_AMBJOASY              = 1;      { obsolete }
  1399.   DBICODE_AMBJOSYM              = 2;      { obsolete }
  1400.   DBICODE_AMBOUTEX              = 3;
  1401.   DBICODE_AMBOUTPR              = 4;      { obsolete }
  1402.   DBICODE_AMBSYMAS              = 5;      { obsolete }
  1403.   DBICODE_ASETOPER              = 6;
  1404.   DBICODE_AVENUMDA              = 7;
  1405.   DBICODE_BADEXPR1              = 8;
  1406.   DBICODE_BADFLDOR              = 9;
  1407.   DBICODE_BADVNAME              = 10;     { 0x0a }
  1408.   DBICODE_BITMAPER              = 11;     { 0x0b }
  1409.   DBICODE_CALCBADR              = 12;     { 0x0c }
  1410.   DBICODE_CALCTYPE              = 13;     { 0x0d }
  1411.   DBICODE_CHGTO1TI              = 14;     { 0x0e }
  1412.   DBICODE_CHGTOCHG              = 15;     { 0x0f }
  1413.   DBICODE_CHGTOEXP              = 16;     { 0x10 }
  1414.   DBICODE_CHGTOINS              = 17;     { 0x11 }
  1415.   DBICODE_CHGTONEW              = 18;     { 0x12 }
  1416.   DBICODE_CHGTOVAL              = 19;     { 0x13 }
  1417.   DBICODE_CHKMRKFI              = 20;     { 0x14 }
  1418.   DBICODE_CHNAMBIG              = 21;     { 0x15 }
  1419.   DBICODE_CHUNKERR              = 22;     { 0x16 }
  1420.   DBICODE_COLUM255              = 23;     { 0x17 }
  1421.   DBICODE_CONAFTAS              = 24;     { 0x18 }
  1422.   DBICODE_DEL1TIME              = 25;     { 0x19 }
  1423.   DBICODE_DELAMBIG              = 26;     { 0x1a }
  1424.   DBICODE_DELFRDEL              = 27;     { 0x1b }
  1425.   DBICODE_EGFLDTYP              = 28;     { 0x1c }
  1426.   DBICODE_EXAMINOR              = 29;     { 0x1d }
  1427.   DBICODE_EXPRTYPS              = 30;     { 0x1e }
  1428.   DBICODE_EXTRACOM              = 31;     { 0x1f }
  1429.   DBICODE_EXTRAORO              = 32;     { 0x20 }
  1430.   DBICODE_EXTRAQRO              = 33;     { 0x21 }
  1431.   DBICODE_FIND1ATT              = 34;     { 0x22 }
  1432.   DBICODE_FINDANST              = 35;     { 0x23 }
  1433.   DBICODE_GRPNOSET              = 36;     { 0x24 }
  1434.   DBICODE_GRPSTROW              = 37;     { 0x25 }
  1435.   DBICODE_IDFINLCO              = 38;     { 0x26 }
  1436.   DBICODE_IDFPERLI              = 39;     { 0x27 }
  1437.   DBICODE_INANEXPR              = 40;     { 0x28 }
  1438.   DBICODE_INS1TIME              = 41;     { 0x29 }
  1439.   DBICODE_INSAMBIG              = 42;     { 0x2a }
  1440.   DBICODE_INSDELCH              = 43;     { 0x2b }
  1441.   DBICODE_INSEXPRR              = 44;     { 0x2c }
  1442.   DBICODE_INSTOINS              = 45;     { 0x2d }
  1443.   DBICODE_ISARRAY               = 46;     { 0x2e }
  1444.   DBICODE_LABELERR              = 47;     { 0x2f }
  1445.   DBICODE_LINKCALC              = 48;     { 0x30 }
  1446.   DBICODE_LNGVNAME              = 49;     { 0x31 }
  1447.   DBICODE_LONGQURY              = 50;     { 0x32 }
  1448.   DBICODE_MEMVPROC              = 51;     { 0x33 }
  1449.   DBICODE_MISNGCOM              = 52;     { 0x34 }
  1450.   DBICODE_MISNGRPA              = 53;     { 0x35 }
  1451.   DBICODE_MISSRTQU              = 54;     { 0x36 }
  1452.   DBICODE_NAMTWICE              = 55;     { 0x37 }
  1453.   DBICODE_NOCHKMAR              = 56;     { 0x38 }
  1454.   DBICODE_NODEFOCC              = 57;     { 0x39 }
  1455.   DBICODE_NOGROUPS              = 58;     { 0x3a }
  1456.   DBICODE_NONSENSE              = 59;     { 0x3b }
  1457.   DBICODE_NOPATTER              = 60;     { 0x3c }
  1458.   DBICODE_NOSUCHDA              = 61;     { 0x3d }
  1459.   DBICODE_NOVALUE               = 62;     { 0x3e }
  1460.   DBICODE_ONLYCONS              = 63;     { 0x3f }
  1461.   DBICODE_ONLYSETR              = 64;     { 0x40 }
  1462.   DBICODE_OUTSENS1              = 65;     { 0x41 }
  1463.   DBICODE_OUTTWIC1              = 66;     { 0x42 }
  1464.   DBICODE_PAROWCNT              = 67;     { 0x43 }
  1465.   DBICODE_PERSEPAR              = 68;     { 0x44 }
  1466.   DBICODE_PROCPLSW              = 69;     { 0x45 }
  1467.   DBICODE_PWINSRTS              = 70;     { 0x46 }
  1468.   DBICODE_PWMODRTS              = 71;     { 0x47 }
  1469.   DBICODE_QBEFLDFOUND           = 72;     { 0x48 }
  1470.   DBICODE_QBENOFENCE            = 73;     { 0x49 }
  1471.   DBICODE_QBENOFENCET           = 74;     { 0x4a }
  1472.   DBICODE_QBENOHEADERT          = 75;     { 0x4b }
  1473.   DBICODE_QBENOTAB              = 76;     { 0x4c }
  1474.   DBICODE_QBENUMCOLS            = 77;     { 0x4d }
  1475.   DBICODE_QBEOPENTAB            = 78;     { 0x4e }
  1476.   DBICODE_QBETWICE              = 79;     { 0x4f }
  1477.   DBICODE_QRYNOANSWER           = 80;     { 0x50 }
  1478.   DBICODE_QRYNOTPREP            = 81;     { 0x51 }
  1479.   DBICODE_QUAINDEL              = 82;     { 0x52 }
  1480.   DBICODE_QUAININS              = 83;     { 0x53 }
  1481.   DBICODE_RAGININS              = 84;     { 0x54 }
  1482.   DBICODE_RAGINSET              = 85;     { 0x55 }
  1483.   DBICODE_ROWUSERR              = 86;     { 0x56 }
  1484.   DBICODE_SETEXPEC              = 87;     { 0x57 }
  1485.   DBICODE_SETVAMB1              = 88;     { 0x58 }
  1486.   DBICODE_SETVBAD1              = 89;     { 0x59 }
  1487.   DBICODE_SETVDEF1              = 90;     { 0x5a }
  1488.   DBICODE_SUMNUMBE              = 91;     { 0x5b }
  1489.   DBICODE_TBLISWP3              = 92;     { 0x5c }
  1490.   DBICODE_TOKENNOT              = 93;     { 0x5d }
  1491.   DBICODE_TWOOUTR1              = 94;     { 0x5e }
  1492.   DBICODE_TYPEMISM              = 95;     { 0x5f }
  1493.   DBICODE_UNRELQ1               = 96;     { 0x60 }
  1494.   DBICODE_UNUSEDST              = 97;     { 0x61 }
  1495.   DBICODE_USEINSDE              = 98;     { 0x62 }
  1496.   DBICODE_USEOFCHG              = 99;     { 0x63 }
  1497.   DBICODE_VARMUSTF              = 100;    { 0x64 }
  1498.   DBICODE_REGISTER              = 101;    { 0x65 }
  1499.   DBICODE_LONGEXPR              = 102;    { 0x66 }
  1500.   DBICODE_REFRESH               = 103;    { 0x67 }
  1501.   DBICODE_CANCEXCEPT            = 104;    { 0x68 }
  1502.   DBICODE_DBEXCEPT              = 105;    { 0x69 }
  1503.   DBICODE_MEMEXCEPT             = 106;    { 0x6a }
  1504.   DBICODE_FATALEXCEPT           = 107;    { 0x6b }
  1505.   DBICODE_QRYNIY                = 108;    { 0x6c }
  1506.   DBICODE_BADFORMAT             = 109;    { 0x6d }
  1507.   DBICODE_QRYEMPTY              = 110;    { 0x6e }
  1508.   DBICODE_NOQRYTOPREP           = 111;    { 0x6f }
  1509.   DBICODE_BUFFTOOSMALL          = 112;    { 0x70 }
  1510.   DBICODE_QRYNOTPARSE           = 113;    { 0x71 }
  1511.   DBICODE_NOTHANDLE             = 114;    { 0x72 }
  1512.   DBICODE_QRYSYNTERR            = 115;    { 0x73 }
  1513.   DBICODE_QXFLDCOUNT            = 116;    { 0x74 }
  1514.   DBICODE_QXFLDSYMNOTFOUND      = 117;    { 0x75 }
  1515.   DBICODE_QXTBLSYMNOTFOUND      = 118;    { 0x76 }
  1516.   DBICODE_BLOBTERM              = 119;    { 0x77 }
  1517.   DBICODE_BLOBERR               = 120;    { 0x78 }
  1518.   DBICODE_RESTARTQRY            = 121;    { 0x79 }
  1519.   DBICODE_UNKNOWNANSTYPE        = 122;    { 0x7a }
  1521. { Internal QBE use Only. }
  1522.   DBICODE_SQLG_MDIST            = 123;    { 0x7b }
  1523.   DBICODE_SQLG_NOARI            = 124;    { 0x7c }
  1524.   DBICODE_SQLG_LIKEN            = 125;    { 0x7d }
  1525.   DBICODE_SQLG_ALPHO            = 126;    { 0x7e }
  1526.   DBICODE_SQLG_DATEO            = 127;    { 0x7f }
  1527.   DBICODE_SQLG_RELOP            = 128;    { 0x80 }
  1528.   DBICODE_SQLG_ONLYC            = 129;    { 0x81 }
  1529.   DBICODE_SQLG_CNTLN            = 130;    { 0x82 }
  1530.   DBICODE_SQLG_CHINI            = 131;    { 0x83 }
  1531.   DBICODE_SQLG_UNION            = 132;    { 0x84 }
  1532.   DBICODE_SQLG_SLFIN            = 133;    { 0x85 }
  1533.   DBICODE_SQLG_OTJVR            = 134;    { 0x86 }
  1534.   DBICODE_SQLG_STROW            = 135;    { 0x87 }
  1535.   DBICODE_SQLG_QUANT            = 136;    { 0x88 }
  1536.   DBICODE_SQLG_REGSO            = 137;    { 0x89 }
  1537.   DBICODE_SQLG_COUNT            = 138;    { 0x8a }
  1538.   DBICODE_SQLG_AVERA            = 139;    { 0x8b }
  1539.   DBICODE_SQLG_DATEA            = 140;    { 0x8c }
  1540.   DBICODE_SQLG_BADPT            = 141;    { 0x8d }
  1541.   DBICODE_SQLG_RELPA            = 142;    { 0x8e }
  1542.   DBICODE_SQLG_PATRN            = 143;    { 0x8f }
  1543.   DBICODE_SQLG_FNDSU            = 144;    { 0x90 }
  1544.   DBICODE_SQLG_IFDCS            = 145;    { 0x91 }
  1545.   DBICODE_SQLG_IDCCO            = 146;    { 0x92 }
  1546.   DBICODE_SQLG_ONLYI            = 147;    { 0x93 }
  1547.   DBICODE_SQLG_SQLDIALECT       = 148;    { 0x94 }
  1548.   DBICODE_SQLG_NOQUERY          = 149;    { 0x95 }
  1549. { End of Internal.       }
  1551.   DBICODE_BLOBGROUP             = 150;    { 0x96 }
  1552.   DBICODE_QRYNOPROP             = 151;    { 0x97 }
  1553.   DBICODE_ANSTYPNOTSUP          = 152;    { 0x98 }
  1554.   DBICODE_ANSALIASNOTSUP        = 153;    { 0x99 }
  1555.   DBICODE_INSBLOBREQ            = 154;    { 0x9a }
  1556.   DBICODE_CHGUNIQUENDXREQ       = 155;    { 0x9b }
  1557.   DBICODE_DELUNIQUENDXREQ       = 156;    { 0x9c }
  1558.   DBICODE_SQLNOFULLUPDATE       = 157;    { 0x9d }
  1559.   DBICODE_CANTEXECREMOTE        = 158;    { 0x9e }
  1560.   DBICODE_UNEXPECTEDEOC         = 159;    { 0x9f }
  1561.   DBICODE_SQLPARAMNOTSET        = 160;    { 0xA0 }
  1562.   DBICODE_QUERYTOOLONG          = 161;    { 0xA1 }
  1564. { Errors added for localsql }
  1565.   DBICODE_NOSUCHRELORALIAS      = 170;
  1566.   DBICODE_TYPEAMBIGUITY         = 171;
  1567.   DBICODE_ORDERBYNOTAPROJ       = 172;
  1568.   DBICODE_SQLPARSE              = 173;
  1569.   DBICODE_CONSTRAINTFAILED      = 174;
  1570.   DBICODE_NOTGROUPINGFIELD      = 175;
  1571.   DBICODE_UDFNOTDEFINED         = 176;
  1572.   DBICODE_UDFERROR              = 177;
  1573.   DBICODE_SINGLEROWERROR        = 178;
  1574.   DBICODE_GROUPEXPR             = 179;
  1575.   DBICODE_QUERYTEXT             = 180;
  1576.   DBICODE_ANSIJOINSUP           = 181;
  1577.   DBICODE_DISTUNION             = 182;
  1578.   DBICODE_GROUPBYREQ            = 183;
  1579.   DBICODE_INSUPDAUTOIC          = 184;
  1580.   DBICODE_UPDREFINTSINGLE       = 185;
  1581.   DBICODE_NOMSACCESS            = 186;
  1582.   DBICODE_FIELDCONSTPREP        = 187;
  1583.   DBICODE_FIELDDEFPREP          = 188;
  1584.   DBICODE_RECCONSTPREP          = 189;
  1586.   DBICODE_TOOFEWSUBEXPR         = 190;    { 0xBE }
  1587.   DBICODE_TOOMANYSUBEXPR        = 191;    { 0xBF }
  1588.   DBICODE_INVALIDNODETYPE       = 192;    { 0xC0 }
  1589.   DBICODE_BOOLEXPR              = 193;    { 0xC1 }
  1590.   DBICODE_NONBOOLEXPR           = 194;    { 0xC2 }
  1591.   DBICODE_NOOUTERJOIN           = 195;    { 0xC3 }
  1592.   DBICODE_USERCONSTRERR         = 196;    { 0xC4 }
  1595.   DBIERR_AMBJOASY               = (ERRBASE_QUERY+DBICODE_AMBJOASY);
  1596.   DBIERR_AMBJOSYM               = (ERRBASE_QUERY+DBICODE_AMBJOSYM);
  1597.   DBIERR_AMBOUTEX               = (ERRBASE_QUERY+DBICODE_AMBOUTEX);
  1598.   DBIERR_AMBOUTPR               = (ERRBASE_QUERY+DBICODE_AMBOUTPR);
  1599.   DBIERR_AMBSYMAS               = (ERRBASE_QUERY+DBICODE_AMBSYMAS);
  1600.   DBIERR_ASETOPER               = (ERRBASE_QUERY+DBICODE_ASETOPER);
  1601.   DBIERR_AVENUMDA               = (ERRBASE_QUERY+DBICODE_AVENUMDA);
  1602.   DBIERR_BADEXPR1               = (ERRBASE_QUERY+DBICODE_BADEXPR1);
  1603.   DBIERR_BADFLDOR               = (ERRBASE_QUERY+DBICODE_BADFLDOR);
  1604.   DBIERR_BADVNAME               = (ERRBASE_QUERY+DBICODE_BADVNAME);
  1605.   DBIERR_BITMAPER               = (ERRBASE_QUERY+DBICODE_BITMAPER);
  1606.   DBIERR_CALCBADR               = (ERRBASE_QUERY+DBICODE_CALCBADR);
  1607.   DBIERR_CALCTYPE               = (ERRBASE_QUERY+DBICODE_CALCTYPE);
  1608.   DBIERR_CHGTO1TI               = (ERRBASE_QUERY+DBICODE_CHGTO1TI);
  1609.   DBIERR_CHGTOCHG               = (ERRBASE_QUERY+DBICODE_CHGTOCHG);
  1610.   DBIERR_CHGTOEXP               = (ERRBASE_QUERY+DBICODE_CHGTOEXP);
  1611.   DBIERR_CHGTOINS               = (ERRBASE_QUERY+DBICODE_CHGTOINS);
  1612.   DBIERR_CHGTONEW               = (ERRBASE_QUERY+DBICODE_CHGTONEW);
  1613.   DBIERR_CHGTOVAL               = (ERRBASE_QUERY+DBICODE_CHGTOVAL);
  1614.   DBIERR_CHKMRKFI               = (ERRBASE_QUERY+DBICODE_CHKMRKFI);
  1615.   DBIERR_CHNAMBIG               = (ERRBASE_QUERY+DBICODE_CHNAMBIG);
  1616.   DBIERR_CHUNKERR               = (ERRBASE_QUERY+DBICODE_CHUNKERR);
  1617.   DBIERR_COLUM255               = (ERRBASE_QUERY+DBICODE_COLUM255);
  1618.   DBIERR_CONAFTAS               = (ERRBASE_QUERY+DBICODE_CONAFTAS);
  1619.   DBIERR_DEL1TIME               = (ERRBASE_QUERY+DBICODE_DEL1TIME);
  1620.   DBIERR_DELAMBIG               = (ERRBASE_QUERY+DBICODE_DELAMBIG);
  1621.   DBIERR_DELFRDEL               = (ERRBASE_QUERY+DBICODE_DELFRDEL);
  1622.   DBIERR_EGFLDTYP               = (ERRBASE_QUERY+DBICODE_EGFLDTYP);
  1623.   DBIERR_EXAMINOR               = (ERRBASE_QUERY+DBICODE_EXAMINOR);
  1624.   DBIERR_EXPRTYPS               = (ERRBASE_QUERY+DBICODE_EXPRTYPS);
  1625.   DBIERR_EXTRACOM               = (ERRBASE_QUERY+DBICODE_EXTRACOM);
  1626.   DBIERR_EXTRAORO               = (ERRBASE_QUERY+DBICODE_EXTRAORO);
  1627.   DBIERR_EXTRAQRO               = (ERRBASE_QUERY+DBICODE_EXTRAQRO);
  1628.   DBIERR_FIND1ATT               = (ERRBASE_QUERY+DBICODE_FIND1ATT);
  1629.   DBIERR_FINDANST               = (ERRBASE_QUERY+DBICODE_FINDANST);
  1630.   DBIERR_GRPNOSET               = (ERRBASE_QUERY+DBICODE_GRPNOSET);
  1631.   DBIERR_GRPSTROW               = (ERRBASE_QUERY+DBICODE_GRPSTROW);
  1632.   DBIERR_IDFINLCO               = (ERRBASE_QUERY+DBICODE_IDFINLCO);
  1633.   DBIERR_IDFPERLI               = (ERRBASE_QUERY+DBICODE_IDFPERLI);
  1634.   DBIERR_INANEXPR               = (ERRBASE_QUERY+DBICODE_INANEXPR);
  1635.   DBIERR_INS1TIME               = (ERRBASE_QUERY+DBICODE_INS1TIME);
  1636.   DBIERR_INSAMBIG               = (ERRBASE_QUERY+DBICODE_INSAMBIG);
  1637.   DBIERR_INSDELCH               = (ERRBASE_QUERY+DBICODE_INSDELCH);
  1638.   DBIERR_INSEXPRR               = (ERRBASE_QUERY+DBICODE_INSEXPRR);
  1639.   DBIERR_INSTOINS               = (ERRBASE_QUERY+DBICODE_INSTOINS);
  1640.   DBIERR_ISARRAY                = (ERRBASE_QUERY+DBICODE_ISARRAY);
  1641.   DBIERR_LABELERR               = (ERRBASE_QUERY+DBICODE_LABELERR);
  1642.   DBIERR_LINKCALC               = (ERRBASE_QUERY+DBICODE_LINKCALC);
  1643.   DBIERR_LNGVNAME               = (ERRBASE_QUERY+DBICODE_LNGVNAME);
  1644.   DBIERR_LONGQURY               = (ERRBASE_QUERY+DBICODE_LONGQURY);
  1645.   DBIERR_MEMVPROC               = (ERRBASE_QUERY+DBICODE_MEMVPROC);
  1646.   DBIERR_MISNGCOM               = (ERRBASE_QUERY+DBICODE_MISNGCOM);
  1647.   DBIERR_MISNGRPA               = (ERRBASE_QUERY+DBICODE_MISNGRPA);
  1648.   DBIERR_MISSRTQU               = (ERRBASE_QUERY+DBICODE_MISSRTQU);
  1649.   DBIERR_NAMTWICE               = (ERRBASE_QUERY+DBICODE_NAMTWICE);
  1650.   DBIERR_NOCHKMAR               = (ERRBASE_QUERY+DBICODE_NOCHKMAR);
  1651.   DBIERR_NODEFOCC               = (ERRBASE_QUERY+DBICODE_NODEFOCC);
  1652.   DBIERR_NOGROUPS               = (ERRBASE_QUERY+DBICODE_NOGROUPS);
  1653.   DBIERR_NONSENSE               = (ERRBASE_QUERY+DBICODE_NONSENSE);
  1654.   DBIERR_NOPATTER               = (ERRBASE_QUERY+DBICODE_NOPATTER);
  1655.   DBIERR_NOSUCHDA               = (ERRBASE_QUERY+DBICODE_NOSUCHDA);
  1656.   DBIERR_NOVALUE                = (ERRBASE_QUERY+DBICODE_NOVALUE);
  1657.   DBIERR_ONLYCONS               = (ERRBASE_QUERY+DBICODE_ONLYCONS);
  1658.   DBIERR_ONLYSETR               = (ERRBASE_QUERY+DBICODE_ONLYSETR);
  1659.   DBIERR_OUTSENS1               = (ERRBASE_QUERY+DBICODE_OUTSENS1);
  1660.   DBIERR_OUTTWIC1               = (ERRBASE_QUERY+DBICODE_OUTTWIC1);
  1661.   DBIERR_PAROWCNT               = (ERRBASE_QUERY+DBICODE_PAROWCNT);
  1662.   DBIERR_PERSEPAR               = (ERRBASE_QUERY+DBICODE_PERSEPAR);
  1663.   DBIERR_PROCPLSW               = (ERRBASE_QUERY+DBICODE_PROCPLSW);
  1664.   DBIERR_PWINSRTS               = (ERRBASE_QUERY+DBICODE_PWINSRTS);
  1665.   DBIERR_PWMODRTS               = (ERRBASE_QUERY+DBICODE_PWMODRTS);
  1666.   DBIERR_QBEFLDFOUND            = (ERRBASE_QUERY+DBICODE_QBEFLDFOUND);
  1667.   DBIERR_QBENOFENCE             = (ERRBASE_QUERY+DBICODE_QBENOFENCE);
  1668.   DBIERR_QBENOFENCET            = (ERRBASE_QUERY+DBICODE_QBENOFENCET);
  1669.   DBIERR_QBENOHEADERT           = (ERRBASE_QUERY+DBICODE_QBENOHEADERT);
  1670.   DBIERR_QBENOTAB               = (ERRBASE_QUERY+DBICODE_QBENOTAB);
  1671.   DBIERR_QBENUMCOLS             = (ERRBASE_QUERY+DBICODE_QBENUMCOLS);
  1672.   DBIERR_QBEOPENTAB             = (ERRBASE_QUERY+DBICODE_QBEOPENTAB);
  1673.   DBIERR_QBETWICE               = (ERRBASE_QUERY+DBICODE_QBETWICE);
  1674.   DBIERR_QRYNOANSWER            = (ERRBASE_QUERY+DBICODE_QRYNOANSWER);
  1675.   DBIERR_QRYNOTPREP             = (ERRBASE_QUERY+DBICODE_QRYNOTPREP);
  1676.   DBIERR_QUAINDEL               = (ERRBASE_QUERY+DBICODE_QUAINDEL);
  1677.   DBIERR_QUAININS               = (ERRBASE_QUERY+DBICODE_QUAININS);
  1678.   DBIERR_RAGININS               = (ERRBASE_QUERY+DBICODE_RAGININS);
  1679.   DBIERR_RAGINSET               = (ERRBASE_QUERY+DBICODE_RAGINSET);
  1680.   DBIERR_ROWUSERR               = (ERRBASE_QUERY+DBICODE_ROWUSERR);
  1681.   DBIERR_SETEXPEC               = (ERRBASE_QUERY+DBICODE_SETEXPEC);
  1682.   DBIERR_SETVAMB1               = (ERRBASE_QUERY+DBICODE_SETVAMB1);
  1683.   DBIERR_SETVBAD1               = (ERRBASE_QUERY+DBICODE_SETVBAD1);
  1684.   DBIERR_SETVDEF1               = (ERRBASE_QUERY+DBICODE_SETVDEF1);
  1685.   DBIERR_SUMNUMBE               = (ERRBASE_QUERY+DBICODE_SUMNUMBE);
  1686.   DBIERR_TBLISWP3               = (ERRBASE_QUERY+DBICODE_TBLISWP3);
  1687.   DBIERR_TOKENNOT               = (ERRBASE_QUERY+DBICODE_TOKENNOT);
  1688.   DBIERR_TWOOUTR1               = (ERRBASE_QUERY+DBICODE_TWOOUTR1);
  1689.   DBIERR_TYPEMISM               = (ERRBASE_QUERY+DBICODE_TYPEMISM);
  1690.   DBIERR_UNRELQ1                = (ERRBASE_QUERY+DBICODE_UNRELQ1);
  1691.   DBIERR_UNUSEDST               = (ERRBASE_QUERY+DBICODE_UNUSEDST);
  1692.   DBIERR_USEINSDE               = (ERRBASE_QUERY+DBICODE_USEINSDE);
  1693.   DBIERR_USEOFCHG               = (ERRBASE_QUERY+DBICODE_USEOFCHG);
  1694.   DBIERR_VARMUSTF               = (ERRBASE_QUERY+DBICODE_VARMUSTF);
  1695.   DBIERR_REGISTER               = (ERRBASE_QUERY+DBICODE_REGISTER);
  1696.   DBIERR_LONGEXPR               = (ERRBASE_QUERY+DBICODE_LONGEXPR);
  1697.   DBIERR_REFRESH                = (ERRBASE_QUERY+DBICODE_REFRESH);
  1698.   DBIERR_CANCEXCEPT             = (ERRBASE_QUERY+DBICODE_CANCEXCEPT);
  1699.   DBIERR_DBEXCEPT               = (ERRBASE_QUERY+DBICODE_DBEXCEPT);
  1700.   DBIERR_MEMEXCEPT              = (ERRBASE_QUERY+DBICODE_MEMEXCEPT);
  1701.   DBIERR_FATALEXCEPT            = (ERRBASE_QUERY+DBICODE_FATALEXCEPT);
  1702.   DBIERR_QRYNIY                 = (ERRBASE_QUERY+ DBICODE_QRYNIY);
  1703.   DBIERR_BADFORMAT              = (ERRBASE_QUERY+ DBICODE_BADFORMAT);
  1704.   DBIERR_QRYEMPTY               = (ERRBASE_QUERY+ DBICODE_QRYEMPTY);
  1705.   DBIERR_NOQRYTOPREP            = (ERRBASE_QUERY+ DBICODE_NOQRYTOPREP);
  1706.   DBIERR_BUFFTOOSMALL           = (ERRBASE_QUERY+ DBICODE_BUFFTOOSMALL);
  1707.   DBIERR_QRYNOTPARSE            = (ERRBASE_QUERY+ DBICODE_QRYNOTPARSE);
  1708.   DBIERR_NOTHANDLE              = (ERRBASE_QUERY+ DBICODE_NOTHANDLE);
  1709.   DBIERR_QRYSYNTERR             = (ERRBASE_QUERY+ DBICODE_QRYSYNTERR);
  1710.   DBIERR_QXFLDCOUNT             = (ERRBASE_QUERY+ DBICODE_QXFLDCOUNT);
  1711.   DBIERR_QXFLDSYMNOTFOUND       = (ERRBASE_QUERY+ DBICODE_QXFLDSYMNOTFOUND);
  1712.   DBIERR_QXTBLSYMNOTFOUND       = (ERRBASE_QUERY+ DBICODE_QXTBLSYMNOTFOUND);
  1713.   DBIERR_BLOBTERM               = (ERRBASE_QUERY+ DBICODE_BLOBTERM);
  1714.   DBIERR_BLOBERR                = (ERRBASE_QUERY+ DBICODE_BLOBERR);
  1715.   DBIERR_RESTARTQRY             = (ERRBASE_QUERY+ DBICODE_RESTARTQRY);
  1716.   DBIERR_UNKNOWNANSTYPE         = (ERRBASE_QUERY+ DBICODE_UNKNOWNANSTYPE);
  1717.   DBIERR_SQLG_MDIST             = (ERRBASE_QUERY+ DBICODE_SQLG_MDIST);
  1718.   DBIERR_SQLG_NOARI             = (ERRBASE_QUERY+ DBICODE_SQLG_NOARI);
  1719.   DBIERR_SQLG_LIKEN             = (ERRBASE_QUERY+ DBICODE_SQLG_LIKEN);
  1720.   DBIERR_SQLG_ALPHO             = (ERRBASE_QUERY+ DBICODE_SQLG_ALPHO);
  1721.   DBIERR_SQLG_DATEO             = (ERRBASE_QUERY+ DBICODE_SQLG_DATEO);
  1722.   DBIERR_SQLG_RELOP             = (ERRBASE_QUERY+ DBICODE_SQLG_RELOP);
  1723.   DBIERR_SQLG_ONLYC             = (ERRBASE_QUERY+ DBICODE_SQLG_ONLYC);
  1724.   DBIERR_SQLG_CNTLN             = (ERRBASE_QUERY+ DBICODE_SQLG_CNTLN);
  1725.   DBIERR_SQLG_CHINI             = (ERRBASE_QUERY+ DBICODE_SQLG_CHINI);
  1726.   DBIERR_SQLG_UNION             = (ERRBASE_QUERY+ DBICODE_SQLG_UNION);
  1727.   DBIERR_SQLG_SLFIN             = (ERRBASE_QUERY+ DBICODE_SQLG_SLFIN);
  1728.   DBIERR_SQLG_OTJVR             = (ERRBASE_QUERY+ DBICODE_SQLG_OTJVR);
  1729.   DBIERR_SQLG_STROW             = (ERRBASE_QUERY+ DBICODE_SQLG_STROW);
  1730.   DBIERR_SQLG_QUANT             = (ERRBASE_QUERY+ DBICODE_SQLG_QUANT);
  1731.   DBIERR_SQLG_REGSO             = (ERRBASE_QUERY+ DBICODE_SQLG_REGSO);
  1732.   DBIERR_SQLG_COUNT             = (ERRBASE_QUERY+ DBICODE_SQLG_COUNT);
  1733.   DBIERR_SQLG_AVERA             = (ERRBASE_QUERY+ DBICODE_SQLG_AVERA);
  1734.   DBIERR_SQLG_DATEA             = (ERRBASE_QUERY+ DBICODE_SQLG_DATEA);
  1735.   DBIERR_SQLG_BADPT             = (ERRBASE_QUERY+ DBICODE_SQLG_BADPT);
  1736.   DBIERR_SQLG_RELPA             = (ERRBASE_QUERY+ DBICODE_SQLG_RELPA);
  1737.   DBIERR_SQLG_PATRN             = (ERRBASE_QUERY+ DBICODE_SQLG_PATRN);
  1738.   DBIERR_SQLG_FNDSU             = (ERRBASE_QUERY+ DBICODE_SQLG_FNDSU);
  1739.   DBIERR_SQLG_IFDCS             = (ERRBASE_QUERY+ DBICODE_SQLG_IFDCS);
  1740.   DBIERR_SQLG_IDCCO             = (ERRBASE_QUERY+ DBICODE_SQLG_IDCCO);
  1741.   DBIERR_SQLG_ONLYI             = (ERRBASE_QUERY+ DBICODE_SQLG_ONLYI);
  1742.   DBIERR_SQLG_SQLDIALECT        = (ERRBASE_QUERY+ DBICODE_SQLG_SQLDIALECT);
  1743.   DBIERR_SQLG_NOQUERY           = (ERRBASE_QUERY+ DBICODE_SQLG_NOQUERY);
  1744.   DBIERR_BLOBGROUP              = (ERRBASE_QUERY+ DBICODE_BLOBGROUP);
  1745.   DBIERR_QRYNOPROP              = (ERRBASE_QUERY+DBICODE_QRYNOPROP);
  1746.   DBIERR_ANSTYPNOTSUP           = (ERRBASE_QUERY+DBICODE_ANSTYPNOTSUP);
  1747.   DBIERR_ANSALIASNOTSUP         = (ERRBASE_QUERY+DBICODE_ANSALIASNOTSUP);
  1748.   DBIERR_INSBLOBREQ             = (ERRBASE_QUERY+DBICODE_INSBLOBREQ     ); { 0x9a }
  1749.   DBIERR_CHGUNIQUENDXREQ        = (ERRBASE_QUERY+DBICODE_CHGUNIQUENDXREQ); { 0x9b }
  1750.   DBIERR_DELUNIQUENDXREQ        = (ERRBASE_QUERY+DBICODE_DELUNIQUENDXREQ); { 0x9c }
  1751.   DBIERR_SQLNOFULLUPDATE        = (ERRBASE_QUERY+DBICODE_SQLNOFULLUPDATE); { 0x9d }
  1752.   DBIERR_CANTEXECREMOTE         = (ERRBASE_QUERY+DBICODE_CANTEXECREMOTE); { 0x9e }
  1753.   DBIERR_UNEXPECTEDEOC          = (ERRBASE_QUERY+DBICODE_UNEXPECTEDEOC);
  1754.   DBIERR_SQLPARAMNOTSET         = (ERRBASE_QUERY+DBICODE_SQLPARAMNOTSET);
  1755.   DBIERR_QUERYTOOLONG           = (ERRBASE_QUERY+DBICODE_QUERYTOOLONG);
  1757.   DBIERR_NOSUCHRELORALIAS       = (ERRBASE_QUERY+DBICODE_NOSUCHRELORALIAS);
  1758.   DBIERR_TYPEAMBIGUITY          = (ERRBASE_QUERY+DBICODE_TYPEAMBIGUITY);
  1759.   DBIERR_ORDERBYNOTAPROJ        = (ERRBASE_QUERY+DBICODE_ORDERBYNOTAPROJ);
  1760.   DBIERR_SQLPARSE               = (ERRBASE_QUERY+DBICODE_SQLPARSE);
  1761.   DBIERR_CONSTRAINTFAILED       = (ERRBASE_QUERY+DBICODE_CONSTRAINTFAILED);
  1762.   DBIERR_NOTGROUPINGFIELD       = (ERRBASE_QUERY+DBICODE_NOTGROUPINGFIELD);
  1763.   DBIERR_UDFNOTDEFINED          = (ERRBASE_QUERY+DBICODE_UDFNOTDEFINED);
  1764.   DBIERR_UDFERROR               = (ERRBASE_QUERY+DBICODE_UDFERROR);
  1765.   DBIERR_SINGLEROWERROR         = (ERRBASE_QUERY+DBICODE_SINGLEROWERROR);
  1766.   DBIERR_GROUPEXPR              = (ERRBASE_QUERY+DBICODE_GROUPEXPR);
  1767.   DBIERR_QUERYTEXT              = (ERRBASE_QUERY+DBICODE_QUERYTEXT);
  1768.   DBIERR_ANSIJOINSUP            = (ERRBASE_QUERY+DBICODE_ANSIJOINSUP);
  1769.   DBIERR_DISTUNION              = (ERRBASE_QUERY+DBICODE_DISTUNION);
  1770.   DBIERR_GROUPBYREQ             = (ERRBASE_QUERY+DBICODE_GROUPBYREQ);
  1771.   DBIERR_INSUPDAUTOINC          = (ERRBASE_QUERY+DBICODE_INSUPDAUTOIC);
  1772.   DBIERR_UPDREFINTSINGLE        = (ERRBASE_QUERY+DBICODE_UPDREFINTSINGLE);
  1773.   DBIERR_NOMSACCESS             = (ERRBASE_QUERY+DBICODE_NOMSACCESS);
  1774.   DBIERR_FIELDCONSTPREP         = (ERRBASE_QUERY+DBICODE_FIELDCONSTPREP);
  1775.   DBIERR_FIELDDEFPREP           = (ERRBASE_QUERY+DBICODE_FIELDDEFPREP);
  1776.   DBIERR_RECCONSTPREP           = (ERRBASE_QUERY+DBICODE_RECCONSTPREP);
  1778.   DBIERR_TOOFEWSUBEXPR          = (ERRBASE_QUERY+DBICODE_TOOFEWSUBEXPR);
  1779.   DBIERR_TOOMANYSUBEXPR         = (ERRBASE_QUERY+DBICODE_TOOMANYSUBEXPR);
  1780.   DBIERR_INVALIDNODETYPE        = (ERRBASE_QUERY+DBICODE_INVALIDNODETYPE);
  1781.   DBIERR_BOOLEXPR               = (ERRBASE_QUERY+DBICODE_BOOLEXPR);
  1782.   DBIERR_NONBOOLEXPR            = (ERRBASE_QUERY+DBICODE_NONBOOLEXPR);
  1783.   DBIERR_NOOUTERJOIN            = (ERRBASE_QUERY+DBICODE_NOOUTERJOIN);
  1784.   DBIERR_USERCONSTRERR          = (ERRBASE_QUERY+DBICODE_USERCONSTRERR);
  1786. { END_OF_QUERY_MESSAGES }
  1788. { ERRCAT_VERSION }
  1789. { ============== }
  1791.   ERRCODE_INTERFACEVER          = 1;      { Interface mismatch }
  1792.   ERRCODE_INDEXOUTOFDATE        = 2;      { Index is out of date }
  1793.   ERRCODE_OLDVERSION            = 3;      { Older version (see context) }
  1794.   ERRCODE_VALFILEINVALID        = 4;      { Val. file is out of date }
  1795.   ERRCODE_BLOBVERSION           = 5;      { Old Blob file version }
  1796.   ERRCODE_ENGQRYMISMATCH        = 6;      { Query and IDAPI are mismatched }
  1797.   ERRCODE_SERVERVERSION         = 7;      { Server is incompatible version }
  1798.   ERRCODE_TABLELEVEL            = 8;      { Higher table level required }
  1800.   DBIERR_INTERFACEVER           = (ERRBASE_VERSION + ERRCODE_INTERFACEVER);
  1801.   DBIERR_INDEXOUTOFDATE         = (ERRBASE_VERSION + ERRCODE_INDEXOUTOFDATE);
  1802.   DBIERR_OLDVERSION             = (ERRBASE_VERSION + ERRCODE_OLDVERSION);
  1803.   DBIERR_VALFILEINVALID         = (ERRBASE_VERSION + ERRCODE_VALFILEINVALID);
  1804.   DBIERR_BLOBVERSION            = (ERRBASE_VERSION + ERRCODE_BLOBVERSION);
  1805.   DBIERR_ENGQRYMISMATCH         = (ERRBASE_VERSION + ERRCODE_ENGQRYMISMATCH);
  1806.   DBIERR_SERVERVERSION          = (ERRBASE_VERSION + ERRCODE_SERVERVERSION);
  1807.   DBIERR_TABLELEVEL             = (ERRBASE_VERSION + ERRCODE_TABLELEVEL);
  1809. { ERRCAT_CAPABILITY }
  1810. { ================= }
  1812.   ERRCODE_NOTSUPPORTED          = 1;      { Capability not supported }
  1813.   ERRCODE_NIY                   = 2;      { Not Implemented Yet }
  1814.   ERRCODE_TABLESQL              = 3;      { Cannot access SQL replica }
  1815.   ERRCODE_SEARCHCOLREQD         = 4;      { Searchable (Non-blob column) required }
  1816.   ERRCODE_NOMULTCONNECT         = 5;      { Multiple connections not supported }
  1817.   ERRCODE_NODBASEEXPR           = 6;      { Full dBASE Expressions not supported }
  1818.   ERRCODE_NONESTEDTRAN          = 7;      { Nested transactions not supported }
  1820.   DBIERR_NOTSUPPORTED           = (ERRBASE_CAPABILITY + ERRCODE_NOTSUPPORTED);
  1821.   DBIERR_NIY                    = (ERRBASE_CAPABILITY + ERRCODE_NIY);
  1822.   DBIERR_TABLESQL               = (ERRBASE_CAPABILITY + ERRCODE_TABLESQL);
  1823.   DBIERR_SEARCHCOLREQD          = (ERRBASE_CAPABILITY + ERRCODE_SEARCHCOLREQD);
  1824.   DBIERR_NOMULTCONNECT          = (ERRBASE_CAPABILITY + ERRCODE_NOMULTCONNECT);
  1825.   DBIERR_NODBASEEXPR            = (ERRBASE_CAPABILITY + ERRCODE_NODBASEEXPR);
  1826.   DBIERR_NONESTEDTRAN           = (ERRBASE_CAPABILITY + ERRCODE_NONESTEDTRAN);
  1828. { ERRCAT_CONFIG }
  1829. { ============= }
  1831.   ERRCODE_INVALIDDBSPEC         = 1;
  1832.   ERRCODE_UNKNOWNDBTYPE         = 2;
  1833.   ERRCODE_INVALIDSYSDATA        = 3;
  1834.   ERRCODE_UNKNOWNNETTYPE        = 4;
  1835.   ERRCODE_NOTONTHATNET          = 5;
  1836.   ERRCODE_INVALIDCFGPARAM       = 6;      { Generic invalid config param }
  1839.   DBIERR_INVALIDDBSPEC          = (ERRBASE_CONFIG + ERRCODE_INVALIDDBSPEC);
  1840.   DBIERR_UNKNOWNDBTYPE          = (ERRBASE_CONFIG + ERRCODE_UNKNOWNDBTYPE);
  1841.   DBIERR_INVALIDSYSDATA         = (ERRBASE_CONFIG + ERRCODE_INVALIDSYSDATA);
  1842.   DBIERR_UNKNOWNNETTYPE         = (ERRBASE_CONFIG + ERRCODE_UNKNOWNNETTYPE);
  1843.   DBIERR_NOTONTHATNET           = (ERRBASE_CONFIG + ERRCODE_NOTONTHATNET);
  1844.   DBIERR_INVALIDCFGPARAM        = (ERRBASE_CONFIG + ERRCODE_INVALIDCFGPARAM);
  1846. { ERRCAT_WARNING  non-fatal warnings:               }
  1847. { warn user of action, or ask for optional behavior }
  1848. { ================================================= }
  1849.   ERRCODE_OBJIMPLICITLYDROPPED  = 1;
  1850.   ERRCODE_OBJMAYBETRUNCATED     = 2;
  1851.   ERRCODE_OBJIMPLICITLYMODIFIED = 3;
  1852.   ERRCODE_VALIDATEDATA          = 4;
  1853.   ERRCODE_VALFIELDMODIFIED      = 5;
  1854.   ERRCODE_TABLELEVELCHANGED     = 6;
  1855.   ERRCODE_COPYLINKEDTABLES      = 7;
  1856.   ERRCODE_OTHERSERVERLOADED     = 8;
  1857.   ERRCODE_OBJIMPLICITLYTRUNCATED = 9;
  1858.   ERRCODE_VCHKMAYNOTBEENFORCED  = 10;
  1859.   ERRCODE_MULTIPLEUNIQRECS      = 11;
  1860.   ERRCODE_FIELDMUSTBETRIMMED    = 12;
  1862.   DBIERR_OBJIMPLICITLYDROPPED   = ( ERRBASE_WARNING + ERRCODE_OBJIMPLICITLYDROPPED);
  1863.   DBIERR_OBJMAYBETRUNCATED      = ( ERRBASE_WARNING + ERRCODE_OBJMAYBETRUNCATED);
  1864.   DBIERR_OBJIMPLICITLYMODIFIED  = ( ERRBASE_WARNING + ERRCODE_OBJIMPLICITLYMODIFIED);
  1865.   DBIERR_VALIDATEDATA           = ( ERRBASE_WARNING + ERRCODE_VALIDATEDATA);
  1866.   DBIERR_VALFIELDMODIFIED       = ( ERRBASE_WARNING + ERRCODE_VALFIELDMODIFIED);
  1867.   DBIERR_TABLELEVELCHANGED      = ( ERRBASE_WARNING + ERRCODE_TABLELEVELCHANGED);
  1868.   DBIERR_COPYLINKEDTABLES       = ( ERRBASE_WARNING + ERRCODE_COPYLINKEDTABLES);
  1869.   DBIERR_OTHERSERVERLOADED      = ( ERRBASE_WARNING + ERRCODE_OTHERSERVERLOADED);
  1870.   DBIERR_OBJIMPLICITLYTRUNCATED = ( ERRBASE_WARNING + ERRCODE_OBJIMPLICITLYTRUNCATED);
  1871.   DBIERR_VCHKMAYNOTBEENFORCED   = ( ERRBASE_WARNING + ERRCODE_VCHKMAYNOTBEENFORCED );
  1872.   DBIERR_MULTIPLEUNIQRECS       = ( ERRBASE_WARNING + ERRCODE_MULTIPLEUNIQRECS );
  1873.   DBIERR_FIELDMUSTBETRIMMED     = ( ERRBASE_WARNING + ERRCODE_FIELDMUSTBETRIMMED );
  1876. { ERRCAT_OTHER }
  1877. { ============ }
  1879.   ERRCODE_FILEEXISTS            = 1;      { File already exsits }
  1880.   ERRCODE_BLOBMODIFIED          = 2;      { Another user modified Blob }
  1881.   ERRCODE_UNKNOWNSQL            = 3;      { Unknown SQL error }
  1882.   ERRCODE_TABLEEXISTS           = 4;      { Table already exsits }
  1883.   ERRCODE_PDX10TABLE            = 5;      { Paradox 1.0 tables not supported }
  1884.   ERRCODE_UPDATEABORT           = 6;      { Update operation aborted }
  1887.   DBIERR_FILEEXISTS             = (ERRBASE_OTHER + ERRCODE_FILEEXISTS);
  1888.   DBIERR_BLOBMODIFIED           = (ERRBASE_OTHER + ERRCODE_BLOBMODIFIED);
  1889.   DBIERR_UNKNOWNSQL             = (ERRBASE_OTHER + ERRCODE_UNKNOWNSQL);
  1890.   DBIERR_TABLEEXISTS            = (ERRBASE_OTHER + ERRCODE_TABLEEXISTS);
  1891.   DBIERR_PDX10TABLE             = (ERRBASE_OTHER + ERRCODE_PDX10TABLE);
  1892.   DBIERR_UPDATEABORT            = (ERRBASE_OTHER + ERRCODE_UPDATEABORT);
  1895. { ERRCAT_COMPATIBILITY }
  1896. { ==================== }
  1898.   ERRCODE_DIFFSORTORDER         = 1;      { Sortorders not compatible }
  1899.   ERRCODE_DIRINUSEBYOLDVER      = 2;      { Directory in use by old version }
  1900.   ERRCODE_PDX35LDDRIVER         = 3;      { Needs Pdox 3.5 compatible language driver }
  1902.   DBIERR_DIFFSORTORDER          = (ERRBASE_COMPATIBILITY + ERRCODE_DIFFSORTORDER);
  1903.   DBIERR_DIRINUSEBYOLDVER       = (ERRBASE_COMPATIBILITY + ERRCODE_DIRINUSEBYOLDVER);
  1904.   DBIERR_PDX35LDDRIVER          = (ERRBASE_COMPATIBILITY + ERRCODE_PDX35LDDRIVER);
  1906. { ERRCAT_OPTPARAM }
  1907. { =============== }
  1909.   ERRCODE_REQOPTPARAM           = 1;      { Required optional parameter missing }
  1910.   ERRCODE_INVALIDOPTPARAM       = 2;      { Optional param out-of-range or bad }
  1913.   DBIERR_REQOPTPARAM            = (ERRBASE_OPTPARAM + ERRCODE_REQOPTPARAM);
  1914.   DBIERR_INVALIDOPTPARAM        = (ERRBASE_OPTPARAM + ERRCODE_INVALIDOPTPARAM);
  1916. {  ERRCAT_REPOSITORY }
  1917. {  ================= }
  1919.   ERRCODE_REPOSITORYCORRUPT     = 1;    { Data Repository is corrupt }
  1920.   ERRCODE_INFOBLOBCORRUPT       = 2;    { Info Blob corrupted }
  1921.   ERRCODE_SCHEMACORRUPT         = 3;    { DR Schema is corrupt }
  1922.   ERRCODE_ATTRTYPEEXISTS        = 4;    { Attribute Type exists }
  1923.   ERRCODE_INVALIDOBJTYPE        = 5;    { Invalid Object Type }
  1924.   ERRCODE_INVALIDRELATIONTYPE   = 6;    { Invalid Relation Type }
  1925.   ERRCODE_VIEWEXISTS            = 7;    { View already exists }
  1926.   ERRCODE_NOSUCHVIEW            = 8;    { No such View exists }
  1927.   ERRCODE_INVALIDRECCONSTRAINT  = 9;    { Invalid Record Constraint }
  1928.   ERRCODE_LDBCONNECTION         = 10;   { Object is in a Logical DB }
  1929.   ERRCODE_REPOSITORYEXISTS      = 11;   { Repository already exists }
  1930.   ERRCODE_NOSUCHREPOSITORY      = 12;   { Repository does not exist }
  1931.   ERRCODE_REPOSITORYDBMISSING   = 13;   { Repository database does not exist }
  1932.   ERRCODE_REPOSITORYOUTOFDATE   = 14;   { Repository info is out of date }
  1933.   ERRCODE_REPOSITORYVERSION     = 15;   { DR Version mismatch }
  1934.   ERRCODE_REPOSITORYNAME        = 16;   { Invalid Repository name }
  1935.   ERRCODE_DEPENDENTOBJECTS      = 17;   { Dependent Objects exist }
  1936.   ERRCODE_RELATIONLIMIT         = 18;   { Too many Relationships for this Object Type }
  1937.   ERRCODE_RELATIONSHIPSEXIST    = 19;   { Relationships to the Object exist }
  1938.   ERRCODE_EXCHANGEFILECORRUPT   = 20;   { Exchange File Corrupt }
  1939.   ERRCODE_EXCHANGEFILEVERSION   = 21;   { Exchange File Version Mismatch }
  1940.   ERRCODE_TYPEMISMATCH          = 22;   { Exchange File and Repository Types don't match }
  1941.   ERRCODE_OBJECTEXISTS          = 23;   { Object Exists in the Target Repository }
  1942.   ERRCODE_REPOSITORYACCESS      = 24;   { Access to Repository Denied }
  1943.   ERRCODE_REPOSITORYCREATE      = 25;   { Cannot Create Repository }
  1944.   ERRCODE_DATABASEOPENFAILED    = 26;   { Cannot Open a Database }
  1947.   DBIERR_REPOSITORYCORRUPT      = (ERRBASE_REPOSITORY + ERRCODE_REPOSITORYCORRUPT);
  1948.   DBIERR_INFOBLOBCORRUPT        = (ERRBASE_REPOSITORY + ERRCODE_INFOBLOBCORRUPT);
  1949.   DBIERR_SCHEMACORRUPT          = (ERRBASE_REPOSITORY + ERRCODE_SCHEMACORRUPT);
  1950.   DBIERR_ATTRTYPEEXISTS         = (ERRBASE_REPOSITORY + ERRCODE_ATTRTYPEEXISTS);
  1951.   DBIERR_INVALIDOBJTYPE         = (ERRBASE_REPOSITORY + ERRCODE_INVALIDOBJTYPE);
  1952.   DBIERR_INVALIDRELATIONTYPE    = (ERRBASE_REPOSITORY + ERRCODE_INVALIDRELATIONTYPE);
  1953.   DBIERR_VIEWEXISTS             = (ERRBASE_REPOSITORY + ERRCODE_VIEWEXISTS);
  1954.   DBIERR_NOSUCHVIEW             = (ERRBASE_REPOSITORY + ERRCODE_NOSUCHVIEW);
  1955.   DBIERR_INVALIDRECCONSTRAINT   = (ERRBASE_REPOSITORY + ERRCODE_INVALIDRECCONSTRAINT);
  1956.   DBIERR_LDBCONNECTION          = (ERRBASE_REPOSITORY + ERRCODE_LDBCONNECTION);
  1957.   DBIERR_REPOSITORYEXISTS       = (ERRBASE_REPOSITORY + ERRCODE_REPOSITORYEXISTS);
  1958.   DBIERR_NOSUCHREPOSITORY       = (ERRBASE_REPOSITORY + ERRCODE_NOSUCHREPOSITORY);
  1959.   DBIERR_REPOSITORYDBMISSING    = (ERRBASE_REPOSITORY + ERRCODE_REPOSITORYDBMISSING);
  1960.   DBIERR_REPOSITORYOUTOFDATE    = (ERRBASE_REPOSITORY + ERRCODE_REPOSITORYOUTOFDATE);
  1961.   DBIERR_REPOSITORYVERSION      = (ERRBASE_REPOSITORY + ERRCODE_REPOSITORYVERSION);
  1962.   DBIERR_REPOSITORYNAME         = (ERRBASE_REPOSITORY + ERRCODE_REPOSITORYNAME);
  1963.   DBIERR_DEPENDENTOBJECTS       = (ERRBASE_REPOSITORY + ERRCODE_DEPENDENTOBJECTS);
  1964.   DBIERR_RELATIONLIMIT          = (ERRBASE_REPOSITORY + ERRCODE_RELATIONLIMIT);
  1965.   DBIERR_RELATIONSHIPSEXIST     = (ERRBASE_REPOSITORY + ERRCODE_RELATIONSHIPSEXIST);
  1966.   DBIERR_EXCHANGEFILECORRUPT    = (ERRBASE_REPOSITORY + ERRCODE_EXCHANGEFILECORRUPT);
  1967.   DBIERR_EXCHANGEFILEVERSION    = (ERRBASE_REPOSITORY + ERRCODE_EXCHANGEFILEVERSION);
  1968.   DBIERR_TYPEMISMATCH           = (ERRBASE_REPOSITORY + ERRCODE_TYPEMISMATCH);
  1969.   DBIERR_OBJECTEXISTS           = (ERRBASE_REPOSITORY + ERRCODE_OBJECTEXISTS);
  1970.   DBIERR_REPOSITORYACCESS       = (ERRBASE_REPOSITORY + ERRCODE_REPOSITORYACCESS);
  1971.   DBIERR_REPOSITORYCREATE       = (ERRBASE_REPOSITORY + ERRCODE_REPOSITORYCREATE);
  1972.   DBIERR_DATABASEOPENFAILED     = (ERRBASE_REPOSITORY + ERRCODE_DATABASEOPENFAILED);
  1974. {============================================================================}
  1975. {                          DBI prototypes                                    }
  1976. {============================================================================}
  1977. {                          Environmental                                     }
  1978. {----------------------------------------------------------------------------}
  1980. function DbiInitFn (                    { Initialize the Engine }
  1981.       iVer          : Word;             { Interface Version }
  1982.       pEnv          : pDBIEnv           { Environment Structure/NULL }
  1983.    ): DBIResult stdcall;
  1985.  { DO NOT CALL THIS DIRECTLY. Use the 'DbiInit' define below. }
  1987.  { Initializes the engine environment. Default settings can be overwritten  }
  1988.  { by supplying the appropriate settings. Defaults are read from the system }
  1989.  { configuration file. pEnv can be NULLP to get the system defautls.        }
  1991. function DbiInit (pEnv: PDbiEnv): DBIResult stdcall;
  1993. function DbiExit: DBIResult stdcall;            { Exit engine }
  1995. function DbiDLLExit: DBIResult stdcall;         { Exit DLL }
  1997. {============================================================================}
  1998. {                         System Level Info                                  }
  1999. {============================================================================}
  2001. function DbiGetSysVersion (             { Get system version info }
  2002. var   sysVersion    : SYSVersion
  2003.    ): DBIResult stdcall;
  2005. function DbiGetSysConfig (              { System configuration }
  2006. var   sysConfig     : SYSConfig
  2007.    ): DBIResult stdcall;
  2009. function DbiGetClientInfo (             { Get Client info }
  2010. var   clientInfo    : CLIENTInfo
  2011.    ): DBIResult stdcall;
  2013. function DbiGetSysInfo (                { Get system status/info }
  2014. var   sysInfo       : SYSInfo
  2015.    ): DBIResult stdcall;
  2017. function DbiLoadDriver (                { Load a given driver }
  2018.       pszDriverType : PChar             { Driver name }
  2019.    ): DBIResult stdcall;
  2021. {============================================================================}
  2022. {                            Sessions                                        }
  2023. {============================================================================}
  2025. function DbiStartSession (              { Start a new session }
  2026.       pszName       : PChar;            { Name (Optional) }
  2027. var   hSes          : hDBISes;          { Session }
  2028.       pNetDir       : PChar             { Netfile directory for session (opt) }
  2029.    ): DBIResult stdcall;
  2031. function DbiGetCurrSession (            { Get the current session }
  2032. var   hSes          : hDBISes           { Session }
  2033.    ): DBIResult stdcall;
  2035. function DbiSetCurrSession (            { Set the current session }
  2036.       hSes          : hDBISes           { Session/NULL }
  2037.    ): DBIResult stdcall;
  2039. function DbiCloseSession (              { Close the current session }
  2040.       hSes          : hDBISes           { Session }
  2041.    ): DBIResult stdcall;
  2043. function DbiGetSesInfo (                { Get current session info }
  2044. var   sesInfo       : SESInfo
  2045.    ): DBIResult stdcall;
  2047. function DbiSetPrivateDir (             { Set Private Directory for session }
  2048.       pszDir        : PChar             { Directory name/NULL }
  2049.    ): DBIResult stdcall;
  2052. {============================================================================}
  2053. {                     Datababase, Schema and File inquiry                    }
  2054. {============================================================================}
  2056. function DbiOpenDatabase (              { Open a database }
  2057.       pszDbName     : PChar;            { Database name }
  2058.       pszDbType     : PChar;            { Database type (NULL: Universal) }
  2059.       eOpenMode     : DBIOpenMode;      { Open type }
  2060.       eShareMode    : DBIShareMode;     { Share type }
  2061.       pszPassword   : PChar;            { Password }
  2062.       iOptFlds      : Word;             { Number of optional Params }
  2063.       pOptFldDesc   : pFLDDesc;         { Optional Field Descriptors }
  2064.       pOptParams    : Pointer;          { Optional Params }
  2065. var   hDb           : hDBIDb            { Returnd database handle }
  2066.    ): DBIResult stdcall;
  2068. function DbiSetDirectory (              { Set the current directory }
  2069.       hDb           : hDBIDb;           { Universal database handle }
  2070.       pszDir        : PChar             { Directory/NULL }
  2071.    ): DBIResult stdcall;
  2073. function DbiGetDirectory (              { Get the current/default directory }
  2074.       hDb           : hDBIDb;           { Universal database handle }
  2075.       bDefault      : Bool;             { True for default }
  2076.       pszDir        : PChar             { Returned directory }
  2077.    ): DBIResult stdcall;
  2079. function DbiOpenTableList (             { Open a cursor on "Tables" }
  2080.       hDb           : hDBIDb;           { Database handle }
  2081.       bExtended     : Bool;             { True for extended info }
  2082.       bSystem       : Bool;             { True to include system tables }
  2083.       pszWild       : PChar;            { Wild card name }
  2084. var   hCur          : hDBICur           { Returned cursor }
  2085.    ): DBIResult stdcall;
  2087. function DbiOpenFileList (              { Open a cursor on "Files" }
  2088.       hDb           : hDBIDb;           { Universal database handle }
  2089.       pszWild       : PChar;            { Wild card name }
  2090. var   hCur          : hDBICur           { Returned cursor }
  2091.    ): DBIResult stdcall;
  2093. function DbiOpenIndexList (             { Return "Indexes" for a table }
  2094.       hDb           : hDBIDb;           { Database handle }
  2095.       pszTableName  : PChar;            { Table name }
  2096.       pszDriverType : PChar;            { Driver type }
  2097. var   hCur          : hDBICur           { Returned cursor on "Indexes" }
  2098.    ): DBIResult stdcall;
  2100. function DbiOpenFieldList (             { Return "Fields" for a table }
  2101.       hDb           : hDBIDb;           { Database handle }
  2102.       pszTableName  : PChar;            { Table name }
  2103.       pszDriverType : PChar;            { Driver type }
  2104.       bPhyTypes     : Bool;             { True, for physical types }
  2105. var   hCur          : hDBICur           { Returned cursor on "Fields" }
  2106.    ): DBIResult stdcall;
  2108. function DbiOpenVchkList (              { Return "Checks" for a table }
  2109.       hDb           : hDBIDb;           { Database handle }
  2110.       pszTableName  : PChar;            { Table name }
  2111.       pszDriverType : PChar;            { Driver Type }
  2112. var   hChkCur       : hDBICur           { Returned cursor on "Checks" }
  2113.    ): DBIResult stdcall;
  2115. function DbiOpenRintList (              { Return Integrity checks }
  2116.       hDb           : hDBIDb;           { Database handle }
  2117.       pszTableName  : PChar;            { Table name }
  2118.       pszDriverType : PChar;            { Driver type }
  2119. var   hChkCur       : hDBICur           { Returned cursor on "Ref Int". }
  2120.    ): DBIResult stdcall;
  2122. function DbiOpenSecurityList (          { Return security descriptions }
  2123.       hDb           : hDBIDb;           { Database handle }
  2124.       pszTableName  : PChar;            { Table name }
  2125.       pszDriverType : PChar;            { Driver type }
  2126. var   hSecCur       : hDBICur           { Returned cursor on sec list }
  2127.    ): DBIResult stdcall;
  2129. function DbiOpenFamilyList (            { Return family members }
  2130.       hDb           : hDBIDb;           { Database handle }
  2131.       pszTableName  : PChar;            { Table name }
  2132.       pszDriverType : PChar;            { Driver type }
  2133. var   hFmlCur       : hDBICur           { Returned cursor on "Family" }
  2134.    ): DBIResult stdcall;
  2136. function DbiOpenSPList (                { Open a cursor on "Stored Procedures" }
  2137.       hDb           : hDBIDb;           { Universal database handle }
  2138.       bExtended     : Bool;             { True for extended info (N/A) }
  2139.       bSystem       : Bool;             { True to include system procedures }
  2140.       pszQual       : PChar;            { Qualifier (N/A) }
  2141. var   hCur          : hDBICur           { Returned cursor }
  2142.    ): DBIResult stdcall;
  2144. function DbiOpenSPParamList (           { Return "Parameters" for a stored procedure }
  2145.       hDb           : hDBIDb;           { Database handle }
  2146.       pszSPName     : PChar;            { Stored procedure name }
  2147.       bPhyTypes     : Bool;             { True, for physical types }
  2148.       uOverload     : Word;             { Overload number }
  2149. var   hCur          : hDBICur           { Returned cursor on "Parameters" }
  2150.    ): DBIResult stdcall;
  2152. function DbiOpenFunctionList (          { Open a cursor on "Functions" }
  2153.       hDb           : hDBIDb;           { Universal database handle }
  2154.       eoptBits      : DBIFUNCOpts;      { Options for function list }
  2155.       phCur         : phDBICur          { Returned cursor on "Functions" }
  2156.                                         { Record desc is of type DBIFUNCDesc }
  2157.    ): DBIResult stdcall;
  2159. function DbiOpenFunctionArgList (       { Return "Arguments" for a function }
  2160.       hDb           : hDBIDb;           { Database handle }
  2161.       pszFuncName   : PChar;            { Function name }
  2162.       uOverload     : Word;             { Overload number }
  2163.       phCur         : phDBICur          { Returned cursor on "Arguments" }
  2164.    ): DBIResult stdcall;
  2166. function DbiCloseDatabase (             { Close a database }
  2167. var   hDb           : hDBIDb            { Pointer to database handle }
  2168.    ): DBIResult stdcall;
  2170. {============================================================================}
  2171. {                                  Capabilities                              }
  2172. {============================================================================}
  2174. function DbiOpenDriverList (            { Get a list of driver names }
  2175. var   hCur          : hDBICur           { Returned cursor }
  2176.    ): DBIResult stdcall;
  2178. function DbiGetDriverDesc (             { Get description for a given type }
  2179.       pszDriverType : PChar;            { Symbolic name for driver type }
  2180. var   drvType       : DRVType           { Driver type description }
  2181.    ): DBIResult stdcall;
  2183. function DbiOpenDatabaseList (          { Get a list of registered databases }
  2184. var   hCur          : hDBICur           { Returned cursor }
  2185.    ): DBIResult stdcall;
  2187. function DbiGetDatabaseDesc (           { Get a description of a logical db }
  2188.       pszName       : PChar;            { Name of logical database }
  2189.       pdbDesc       : pDBDesc           { Database description }
  2190.    ): DBIResult stdcall;
  2192. function DbiOpenTableTypesList (        { Get a list of table types }
  2193.       pszDriverType : PChar;            { Driver type }
  2194. var   hCur          : hDBICur           { Returned cursor }
  2195.    ): DBIResult stdcall;
  2197. function DbiGetTableTypeDesc (          { Get Table capabilities }
  2198.       pszDriverType : PChar;            { Driver type }
  2199.       pszTableType  : PChar;            { Table type }
  2200. var   tblType       : TBLType           { Table Capabilities }
  2201.    ): DBIResult stdcall;
  2204. function DbiOpenFieldTypesList (        { Get a list of field types }
  2205.       pszDriverType : PChar;            { Driver type }
  2206.       pszTblType    : PChar;            { Table type (Optional) }
  2207. var   hCur          : hDBICur           { Returned cursor }
  2208.    ): DBIResult stdcall;
  2210. function DbiGetFieldTypeDesc (          { Get list of field types }
  2211.       pszDriverType : PChar;            { Driver type }
  2212.       pszTableType  : PChar;            { Table type }
  2213.       pszFieldType  : PChar;            { Field type  (Physical only) }
  2214. var   fldType       : FLDType           { Field type description }
  2215.    ): DBIResult stdcall;
  2217. function DbiOpenIndexTypesList (        { Get list of index types }
  2218.       pszDriverType : PChar;            { Driver type }
  2219. var   hCur          : hDBICur           { Returned cursor }
  2220.    ): DBIResult stdcall;
  2222. function DbiGetIndexTypeDesc (          { Get description of given idx type }
  2223.       pszDriverType : PChar;            { Driver type }
  2224.       pszIndexType  : PChar;            { Index type }
  2225. var   idxType       : IDXType           { Index description }
  2226.    ): DBIResult stdcall;
  2228. function DbiOpenLdList (                { Get a list of Lang Drivers }
  2229. var   hCur          : hDBICur           { Returned cursor }
  2230.    ): DBIResult stdcall;
  2232. {===========================================================================}
  2233. {                      Table Open, Properties & Structure                   }
  2234. {===========================================================================}
  2236. function DbiOpenTable (                 { Open a table }
  2237.       hDb           : hDBIDb;           { Database handle }
  2238.       pszTableName  : PChar;            { Table name or file name }
  2239.       pszDriverType : PChar;            { Driver type                 /NULL }
  2240.       pszIndexName  : PChar;            { Index to be used for access /NULL }
  2241.       pszIndexTagName : PChar;          { Index tag name              /NULL }
  2242.       iIndexId      : Word;             { Index number                /0 }
  2243.       eOpenMode     : DBIOpenMode;      { Read or RW }
  2244.       eShareMode    : DBIShareMode;     { Excl or Share }
  2245.       exltMode      : XLTMode;          { Xlate mode }
  2246.       bUniDirectional : Bool;           { Uni or Bi directional }
  2247.       pOptParams    : Pointer;          { Optional params /NULL }
  2248. var   hCursor       : hDBICur           { Returns Cursor handle }
  2249.    ): DBIResult stdcall;
  2251. function DbiOpenNestedTable(            { Get nested table }
  2252.       hCursor       : hDBICur;          { Master cursor }
  2253.       iFieldNo      : Word;             { FieldID of nested table field }
  2254.       bReadOnly     : Bool;             { if TRUE, read only mode }
  2255.       bUniDirectional: Bool;            { if TRUE, unidirectional }
  2256. var   hCursorNested : hDBICur           { Returns Cursor handle for nested table }
  2257.    ): DBIResult; stdcall;
  2259. function DbiOpenRef(
  2260.       hCursor       : hDBICur;          { Master cursor }
  2261.       iFieldNo      : Word;             { FieldID }
  2262.       bReadOnly     : Bool;             { if TRUE, read only mode }
  2263.       bUniDirectional: Bool;            { If TRUE, Uni directional }
  2264. var   hRefCursor    : hDBICur           { Returns Cursor handle for REF }
  2265.    ): DBIResult; stdcall;
  2267. function DbiDatabaseFlush(
  2268.       hDb              : hDBIDb         { database handle }
  2269. ): DBIResult;
  2271. function DbiGetCursorProps (            { Get Cursor properties }
  2272.       hCursor       : hDBICur;          { Cursor handle }
  2273. var   curProps      : CURProps          { Cursor properties }
  2274.    ): DBIResult stdcall;
  2276. function DbiGetObjFromName (            { Get object from name }
  2277.       eObjType      : DBIOBJType;       { Object handle }
  2278.       pszObjName    : PChar;            { Name of object /NULL }
  2279. var   hObj          : hDBIObj           { Returned object handle }
  2280.    ): DBIResult stdcall;
  2282. function DbiGetObjFromObj (             { Get associated object }
  2283.       hObj          : hDBIObj;          { Object handle }
  2284.       eObjType      : DBIOBJType;       { Type of associated object }
  2285. var   hObjOut       : hDBIObj           { Returns object of eObjType }
  2286.    ): DBIResult stdcall;
  2288. function DbiGetProp (                   { Get property }
  2289.       hObj          : hDBIObj;          { Object handle }
  2290.       iProp         : Longint;          { Property to retrieve }
  2291.       PropValue     : Pointer;          { == NULL, validate iProp for getting }
  2292.       iMaxLen       : Word;             { Length of buffer pPropValue }
  2293. var   iLen          : Word              { Returns required length }
  2294.    ): DBIResult stdcall;
  2296. function DbiSetProp (                   { Set property }
  2297.       hObj          : hDBIObj;          { Object handle }
  2298.       iProp         : Longint;          { Property to set }
  2299.       iPropValue    : Longint           { Property value }
  2300.    ): DBIResult stdcall;
  2302. function DbiValidateProp (              { Validate a property }
  2303.       hObj          : hDBIObj;          { Object handle }
  2304.       iProp         : Longint;          { property to validate }
  2305.       bSetting      : Bool              { TRUE:setting, FALSE:getting }
  2306.    ): DBIResult stdcall;
  2308. function DbiGetFieldDescs (             { Get field descriptions }
  2309.       hCursor       : hDBICur;          { Cursor handle }
  2310.       pfldDesc      : pFLDDesc          { Array of field descriptors }
  2311.    ): DBIResult stdcall;
  2313. function DbiGetCursorForTable (         { Find cursor for a given table }
  2314.       hDb           : hDBIDb;           { Database handle }
  2315.       pszTableName  : PChar;            { Table name }
  2316.       pszDriverType : PChar;            { Driver type / NULL }
  2317. var   hCursor       : hDBICur           { Returned cursor }
  2318.    ): DBIResult stdcall;
  2320. function DbiCloneCursor (               { Return a duplicate cursor }
  2321.       hCurSrc       : hDBICur;          { Source cursor }
  2322.       bReadOnly     : Bool;             { If TRUE, read only mode }
  2323.       bUniDirectional : Bool;           { If TRUE, Uni directional }
  2324. var   hCurNew       : hDBICur           { Destination cursor address }
  2325.    ): DBIResult stdcall;
  2327. function DbiCloseCursor (               { Closes cursor }
  2328. var   hCursor       : hDBICur           { Pntr to Cursor handle }
  2329.    ): DBIResult stdcall;
  2332. {============================================================================}
  2333. {                      Index Manipulation & Usage                            }
  2334. {============================================================================}
  2336. function DbiOpenIndex (                 { Open an index }
  2337.       hCursor       : hDBICur;          { Cursor handle }
  2338.       pszIndexName  : PChar;            { Index Name }
  2339.       iIndexId      : Word              { Index number (if applicable) }
  2340.    ): DBIResult stdcall;
  2342. function DbiCloseIndex (                { Close an index }
  2343.       hCursor       : hDBICur;          { Cursor handle }
  2344.       pszIndexName  : PChar;            { Index Name }
  2345.       iIndexId      : Word              { Index number }
  2346.    ): DBIResult stdcall;
  2348. function DbiSwitchToIndex (             { Change index order of access }
  2349. var   hCursor       : hDBICur;          { Cursor handle (In/Out) }
  2350.       pszIndexName  : PChar;            { Index name }