tdbc::odbc

Hex Artifact Content
Login
Bounty program for improvements to Tcl and certain Tcl packages.
Tcl 2018 Conference, Houston/TX, US, Oct 15-19
Send your abstracts to tclconference@googlegroups.com
or submit via the online form by Aug 20.

Artifact 3677b805b868664bf0759c86e9d7b5dc30e19d9684d0c9ef683fa66788e82765:


0000: 2f 2a 0a 20 2a 20 66 61 6b 65 73 71 6c 2e 68 20  /*. * fakesql.h 
0010: 2d 2d 0a 20 2a 0a 20 2a 09 49 6e 63 6c 75 64 65  --. *. *.Include
0020: 20 66 69 6c 65 20 74 68 61 74 20 64 65 66 69 6e   file that defin
0030: 65 73 20 74 68 65 20 73 75 62 73 65 74 20 6f 66  es the subset of
0040: 20 53 51 4c 2f 43 4c 49 20 74 68 61 74 20 54 44   SQL/CLI that TD
0050: 42 43 0a 20 2a 09 75 73 65 73 2c 20 73 6f 20 74  BC. *.uses, so t
0060: 68 61 74 20 74 64 62 63 3a 3a 6f 64 62 63 20 63  hat tdbc::odbc c
0070: 61 6e 20 62 75 69 6c 64 20 77 69 74 68 6f 75 74  an build without
0080: 20 61 6e 20 65 78 70 6c 69 63 69 74 20 4f 44 42   an explicit ODB
0090: 43 0a 20 2a 09 64 65 70 65 6e 64 65 6e 63 79 2e  C. *.dependency.
00a0: 20 49 74 20 63 6f 6d 70 72 69 73 65 73 20 6f 6e   It comprises on
00b0: 6c 79 20 64 61 74 61 20 74 79 70 65 2c 20 63 6f  ly data type, co
00c0: 6e 73 74 61 6e 74 20 61 6e 64 0a 20 2a 09 66 75  nstant and. *.fu
00d0: 6e 63 74 69 6f 6e 20 64 65 63 6c 61 72 61 74 69  nction declarati
00e0: 6f 6e 73 2e 0a 20 2a 0a 20 2a 20 54 68 65 20 70  ons.. *. * The p
00f0: 72 6f 67 72 61 6d 6d 65 72 73 20 6f 66 20 74 68  rogrammers of th
0100: 69 73 20 66 69 6c 65 20 62 65 6c 69 65 76 65 20  is file believe 
0110: 74 68 61 74 20 69 74 20 63 6f 6e 74 61 69 6e 73  that it contains
0120: 20 6d 61 74 65 72 69 61 6c 20 6e 6f 74 0a 20 2a   material not. *
0130: 20 73 75 62 6a 65 63 74 20 74 6f 20 63 6f 70 79   subject to copy
0140: 72 69 67 68 74 20 75 6e 64 65 72 20 74 68 65 20  right under the 
0150: 64 6f 63 74 72 69 6e 65 73 20 6f 66 20 73 63 65  doctrines of sce
0160: 6e 65 73 20 61 20 66 61 69 72 65 20 61 6e 64 0a  nes a faire and.
0170: 20 2a 20 6f 66 20 6d 65 72 67 65 72 20 6f 66 20   * of merger of 
0180: 69 64 65 61 20 61 6e 64 20 65 78 70 72 65 73 73  idea and express
0190: 69 6f 6e 2e 20 41 63 63 6f 72 64 69 6e 67 6c 79  ion. Accordingly
01a0: 2c 20 74 68 69 73 20 66 69 6c 65 20 69 73 20 69  , this file is i
01b0: 6e 20 74 68 65 0a 20 2a 20 70 75 62 6c 69 63 20  n the. * public 
01c0: 64 6f 6d 61 69 6e 2e 0a 20 2a 0a 20 2a 2d 2d 2d  domain.. *. *---
01d0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
01e0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
01f0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0200: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0210: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 20 2a 2f 0a 0a  ----------. */..
0220: 23 69 66 6e 64 65 66 20 46 41 4b 45 53 51 4c 5f  #ifndef FAKESQL_
0230: 48 5f 49 4e 43 4c 55 44 45 44 0a 23 64 65 66 69  H_INCLUDED.#defi
0240: 6e 65 20 46 41 4b 45 53 51 4c 5f 48 5f 49 4e 43  ne FAKESQL_H_INC
0250: 4c 55 44 45 44 0a 0a 23 69 6e 63 6c 75 64 65 20  LUDED..#include 
0260: 3c 73 74 64 64 65 66 2e 68 3e 0a 0a 23 69 66 6e  <stddef.h>..#ifn
0270: 64 65 66 20 4d 4f 44 55 4c 45 5f 53 43 4f 50 45  def MODULE_SCOPE
0280: 0a 23 64 65 66 69 6e 65 20 4d 4f 44 55 4c 45 5f  .#define MODULE_
0290: 53 43 4f 50 45 20 65 78 74 65 72 6e 0a 23 65 6e  SCOPE extern.#en
02a0: 64 69 66 0a 0a 2f 2a 20 4c 69 6d 69 74 73 20 2a  dif../* Limits *
02b0: 2f 0a 0a 23 64 65 66 69 6e 65 20 53 51 4c 5f 4d  /..#define SQL_M
02c0: 41 58 5f 44 53 4e 5f 4c 45 4e 47 54 48 20 33 32  AX_DSN_LENGTH 32
02d0: 0a 23 64 65 66 69 6e 65 20 53 51 4c 5f 4d 41 58  .#define SQL_MAX
02e0: 5f 4d 45 53 53 41 47 45 5f 4c 45 4e 47 54 48 20  _MESSAGE_LENGTH 
02f0: 35 31 32 0a 0a 2f 2a 20 46 75 6e 64 61 6d 65 6e  512../* Fundamen
0300: 74 61 6c 20 64 61 74 61 20 74 79 70 65 73 20 2a  tal data types *
0310: 2f 0a 0a 23 69 66 6e 64 65 66 20 5f 57 49 4e 33  /..#ifndef _WIN3
0320: 32 0a 74 79 70 65 64 65 66 20 69 6e 74 20 42 4f  2.typedef int BO
0330: 4f 4c 3b 0a 74 79 70 65 64 65 66 20 75 6e 73 69  OL;.typedef unsi
0340: 67 6e 65 64 20 69 6e 74 20 44 57 4f 52 44 3b 0a  gned int DWORD;.
0350: 74 79 70 65 64 65 66 20 76 6f 69 64 2a 20 48 41  typedef void* HA
0360: 4e 44 4c 45 3b 0a 74 79 70 65 64 65 66 20 48 41  NDLE;.typedef HA
0370: 4e 44 4c 45 20 48 57 4e 44 3b 0a 74 79 70 65 64  NDLE HWND;.typed
0380: 65 66 20 75 6e 73 69 67 6e 65 64 20 73 68 6f 72  ef unsigned shor
0390: 74 20 57 43 48 41 52 3b 0a 74 79 70 65 64 65 66  t WCHAR;.typedef
03a0: 20 63 68 61 72 2a 20 4c 50 53 54 52 3b 0a 74 79   char* LPSTR;.ty
03b0: 70 65 64 65 66 20 57 43 48 41 52 2a 20 4c 50 57  pedef WCHAR* LPW
03c0: 53 54 52 3b 0a 74 79 70 65 64 65 66 20 63 6f 6e  STR;.typedef con
03d0: 73 74 20 63 68 61 72 2a 20 4c 50 43 53 54 52 3b  st char* LPCSTR;
03e0: 0a 74 79 70 65 64 65 66 20 63 6f 6e 73 74 20 57  .typedef const W
03f0: 43 48 41 52 2a 20 4c 50 43 57 53 54 52 3b 0a 74  CHAR* LPCWSTR;.t
0400: 79 70 65 64 65 66 20 75 6e 73 69 67 6e 65 64 20  ypedef unsigned 
0410: 73 68 6f 72 74 20 57 4f 52 44 3b 0a 23 65 6e 64  short WORD;.#end
0420: 69 66 0a 74 79 70 65 64 65 66 20 76 6f 69 64 2a  if.typedef void*
0430: 20 50 56 4f 49 44 3b 0a 74 79 70 65 64 65 66 20   PVOID;.typedef 
0440: 73 68 6f 72 74 20 52 45 54 43 4f 44 45 3b 0a 74  short RETCODE;.t
0450: 79 70 65 64 65 66 20 6c 6f 6e 67 20 53 44 57 4f  ypedef long SDWO
0460: 52 44 3b 0a 74 79 70 65 64 65 66 20 73 68 6f 72  RD;.typedef shor
0470: 74 20 53 57 4f 52 44 3b 0a 74 79 70 65 64 65 66  t SWORD;.typedef
0480: 20 75 6e 73 69 67 6e 65 64 20 73 68 6f 72 74 20   unsigned short 
0490: 55 53 48 4f 52 54 3b 0a 74 79 70 65 64 65 66 20  USHORT;.typedef 
04a0: 55 53 48 4f 52 54 20 55 57 4f 52 44 3b 0a 0a 2f  USHORT UWORD;../
04b0: 2a 20 4f 44 42 43 20 64 61 74 61 20 74 79 70 65  * ODBC data type
04c0: 73 20 2a 2f 0a 0a 74 79 70 65 64 65 66 20 54 63  s */..typedef Tc
04d0: 6c 5f 57 69 64 65 49 6e 74 20 53 51 4c 42 49 47  l_WideInt SQLBIG
04e0: 49 4e 54 3b 0a 74 79 70 65 64 65 66 20 75 6e 73  INT;.typedef uns
04f0: 69 67 6e 65 64 20 63 68 61 72 20 53 51 4c 43 48  igned char SQLCH
0500: 41 52 3b 0a 74 79 70 65 64 65 66 20 64 6f 75 62  AR;.typedef doub
0510: 6c 65 20 53 51 4c 44 4f 55 42 4c 45 3b 0a 74 79  le SQLDOUBLE;.ty
0520: 70 65 64 65 66 20 76 6f 69 64 2a 20 53 51 4c 48  pedef void* SQLH
0530: 41 4e 44 4c 45 3b 0a 74 79 70 65 64 65 66 20 53  ANDLE;.typedef S
0540: 44 57 4f 52 44 20 53 51 4c 49 4e 54 45 47 45 52  DWORD SQLINTEGER
0550: 3b 0a 74 79 70 65 64 65 66 20 50 56 4f 49 44 20  ;.typedef PVOID 
0560: 53 51 4c 50 4f 49 4e 54 45 52 3b 0a 74 79 70 65  SQLPOINTER;.type
0570: 64 65 66 20 53 57 4f 52 44 20 53 51 4c 53 4d 41  def SWORD SQLSMA
0580: 4c 4c 49 4e 54 3b 0a 74 79 70 65 64 65 66 20 54  LLINT;.typedef T
0590: 63 6c 5f 57 69 64 65 55 49 6e 74 20 53 51 4c 55  cl_WideUInt SQLU
05a0: 42 49 47 49 4e 54 3b 0a 74 79 70 65 64 65 66 20  BIGINT;.typedef 
05b0: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 53 51  unsigned char SQ
05c0: 4c 55 43 48 41 52 3b 0a 74 79 70 65 64 65 66 20  LUCHAR;.typedef 
05d0: 75 6e 73 69 67 6e 65 64 20 69 6e 74 20 53 51 4c  unsigned int SQL
05e0: 55 49 4e 54 45 47 45 52 3b 0a 74 79 70 65 64 65  UINTEGER;.typede
05f0: 66 20 55 57 4f 52 44 20 53 51 4c 55 53 4d 41 4c  f UWORD SQLUSMAL
0600: 4c 49 4e 54 3b 0a 74 79 70 65 64 65 66 20 57 43  LINT;.typedef WC
0610: 48 41 52 20 53 51 4c 57 43 48 41 52 3b 0a 0a 74  HAR SQLWCHAR;..t
0620: 79 70 65 64 65 66 20 53 51 4c 53 4d 41 4c 4c 49  ypedef SQLSMALLI
0630: 4e 54 20 53 51 4c 52 45 54 55 52 4e 3b 0a 0a 2f  NT SQLRETURN;../
0640: 2a 20 54 4f 44 4f 20 2d 20 43 68 65 63 6b 20 68  * TODO - Check h
0650: 6f 77 20 74 68 65 20 53 51 4c 4c 45 4e 20 61 6e  ow the SQLLEN an
0660: 64 20 53 51 4c 55 4c 45 4e 20 74 79 70 65 73 20  d SQLULEN types 
0670: 61 72 65 20 68 61 6e 64 6c 65 64 20 6f 6e 0a 20  are handled on. 
0680: 2a 20 20 20 20 20 20 20 20 36 34 2d 62 69 74 20  *        64-bit 
0690: 55 6e 69 78 2e 20 2a 2f 0a 0a 23 69 66 20 64 65  Unix. */..#if de
06a0: 66 69 6e 65 64 28 5f 5f 57 49 4e 36 34 29 0a 74  fined(__WIN64).t
06b0: 79 70 65 64 65 66 20 54 63 6c 5f 57 69 64 65 49  ypedef Tcl_WideI
06c0: 6e 74 20 53 51 4c 4c 45 4e 3b 0a 74 79 70 65 64  nt SQLLEN;.typed
06d0: 65 66 20 54 63 6c 5f 57 69 64 65 55 49 6e 74 20  ef Tcl_WideUInt 
06e0: 53 51 4c 55 4c 45 4e 3b 0a 23 65 6c 73 65 0a 74  SQLULEN;.#else.t
06f0: 79 70 65 64 65 66 20 53 51 4c 49 4e 54 45 47 45  ypedef SQLINTEGE
0700: 52 20 53 51 4c 4c 45 4e 3b 0a 74 79 70 65 64 65  R SQLLEN;.typede
0710: 66 20 53 51 4c 55 49 4e 54 45 47 45 52 20 53 51  f SQLUINTEGER SQ
0720: 4c 55 4c 45 4e 3b 0a 23 65 6e 64 69 66 0a 0a 2f  LULEN;.#endif../
0730: 2a 20 48 61 6e 64 6c 65 20 74 79 70 65 73 20 2a  * Handle types *
0740: 2f 0a 0a 74 79 70 65 64 65 66 20 53 51 4c 48 41  /..typedef SQLHA
0750: 4e 44 4c 45 20 53 51 4c 48 45 4e 56 3b 0a 74 79  NDLE SQLHENV;.ty
0760: 70 65 64 65 66 20 53 51 4c 48 41 4e 44 4c 45 20  pedef SQLHANDLE 
0770: 53 51 4c 48 44 42 43 3b 0a 74 79 70 65 64 65 66  SQLHDBC;.typedef
0780: 20 53 51 4c 48 41 4e 44 4c 45 20 53 51 4c 48 53   SQLHANDLE SQLHS
0790: 54 4d 54 3b 0a 74 79 70 65 64 65 66 20 48 57 4e  TMT;.typedef HWN
07a0: 44 20 53 51 4c 48 57 4e 44 3b 0a 0a 23 64 65 66  D SQLHWND;..#def
07b0: 69 6e 65 20 53 51 4c 5f 48 41 4e 44 4c 45 5f 44  ine SQL_HANDLE_D
07c0: 42 43 20 32 0a 23 64 65 66 69 6e 65 20 53 51 4c  BC 2.#define SQL
07d0: 5f 48 41 4e 44 4c 45 5f 45 4e 56 20 31 0a 23 64  _HANDLE_ENV 1.#d
07e0: 65 66 69 6e 65 20 53 51 4c 5f 48 41 4e 44 4c 45  efine SQL_HANDLE
07f0: 5f 53 54 4d 54 20 33 0a 0a 2f 2a 20 4e 75 6c 6c  _STMT 3../* Null
0800: 20 68 61 6e 64 6c 65 73 20 2a 2f 0a 0a 23 64 65   handles */..#de
0810: 66 69 6e 65 20 53 51 4c 5f 4e 55 4c 4c 5f 48 41  fine SQL_NULL_HA
0820: 4e 44 4c 45 20 28 28 53 51 4c 48 41 4e 44 4c 45  NDLE ((SQLHANDLE
0830: 29 20 30 29 0a 23 64 65 66 69 6e 65 20 53 51 4c  ) 0).#define SQL
0840: 5f 4e 55 4c 4c 5f 48 45 4e 56 20 28 28 53 51 4c  _NULL_HENV ((SQL
0850: 48 45 4e 56 29 20 30 29 0a 23 64 65 66 69 6e 65  HENV) 0).#define
0860: 20 53 51 4c 5f 4e 55 4c 4c 5f 48 44 42 43 20 28   SQL_NULL_HDBC (
0870: 28 53 51 4c 48 44 42 43 29 20 30 29 0a 23 64 65  (SQLHDBC) 0).#de
0880: 66 69 6e 65 20 53 51 4c 5f 4e 55 4c 4c 5f 48 53  fine SQL_NULL_HS
0890: 54 4d 54 20 28 28 53 51 4c 48 53 54 4d 54 29 20  TMT ((SQLHSTMT) 
08a0: 30 29 0a 0a 2f 2a 20 53 51 4c 20 64 61 74 61 20  0)../* SQL data 
08b0: 74 79 70 65 73 20 2a 2f 0a 0a 65 6e 75 6d 20 5f  types */..enum _
08c0: 53 51 4c 5f 44 41 54 41 54 59 50 45 20 7b 0a 20  SQL_DATATYPE {. 
08d0: 20 20 20 53 51 4c 5f 42 49 47 49 4e 54 20 3d 20     SQL_BIGINT = 
08e0: 2d 35 2c 0a 20 20 20 20 53 51 4c 5f 42 49 4e 41  -5,.    SQL_BINA
08f0: 52 59 20 3d 20 2d 32 2c 0a 20 20 20 20 53 51 4c  RY = -2,.    SQL
0900: 5f 42 49 54 20 3d 20 2d 37 2c 0a 20 20 20 20 53  _BIT = -7,.    S
0910: 51 4c 5f 43 48 41 52 20 3d 20 31 2c 0a 20 20 20  QL_CHAR = 1,.   
0920: 20 53 51 4c 5f 44 41 54 45 20 3d 20 39 2c 0a 20   SQL_DATE = 9,. 
0930: 20 20 20 53 51 4c 5f 44 45 43 49 4d 41 4c 20 3d     SQL_DECIMAL =
0940: 20 33 2c 0a 20 20 20 20 53 51 4c 5f 44 4f 55 42   3,.    SQL_DOUB
0950: 4c 45 20 3d 20 38 2c 0a 20 20 20 20 53 51 4c 5f  LE = 8,.    SQL_
0960: 46 4c 4f 41 54 20 3d 20 36 2c 0a 20 20 20 20 53  FLOAT = 6,.    S
0970: 51 4c 5f 49 4e 54 45 47 45 52 20 3d 20 34 2c 0a  QL_INTEGER = 4,.
0980: 20 20 20 20 53 51 4c 5f 4c 4f 4e 47 56 41 52 42      SQL_LONGVARB
0990: 49 4e 41 52 59 20 3d 20 2d 34 2c 0a 20 20 20 20  INARY = -4,.    
09a0: 53 51 4c 5f 4c 4f 4e 47 56 41 52 43 48 41 52 20  SQL_LONGVARCHAR 
09b0: 3d 20 2d 31 2c 0a 20 20 20 20 53 51 4c 5f 4e 55  = -1,.    SQL_NU
09c0: 4d 45 52 49 43 20 3d 20 32 2c 0a 20 20 20 20 53  MERIC = 2,.    S
09d0: 51 4c 5f 52 45 41 4c 20 3d 20 37 2c 0a 20 20 20  QL_REAL = 7,.   
09e0: 20 53 51 4c 5f 53 4d 41 4c 4c 49 4e 54 20 3d 20   SQL_SMALLINT = 
09f0: 35 2c 0a 20 20 20 20 53 51 4c 5f 54 49 4d 45 20  5,.    SQL_TIME 
0a00: 3d 20 31 30 2c 0a 20 20 20 20 53 51 4c 5f 54 49  = 10,.    SQL_TI
0a10: 4d 45 53 54 41 4d 50 20 3d 20 31 31 2c 0a 20 20  MESTAMP = 11,.  
0a20: 20 20 53 51 4c 5f 54 49 4e 59 49 4e 54 20 3d 20    SQL_TINYINT = 
0a30: 2d 36 2c 0a 20 20 20 20 53 51 4c 5f 56 41 52 42  -6,.    SQL_VARB
0a40: 49 4e 41 52 59 20 3d 20 2d 33 2c 0a 20 20 20 20  INARY = -3,.    
0a50: 53 51 4c 5f 56 41 52 43 48 41 52 20 3d 20 31 32  SQL_VARCHAR = 12
0a60: 2c 0a 20 20 20 20 53 51 4c 5f 57 43 48 41 52 20  ,.    SQL_WCHAR 
0a70: 3d 20 2d 38 2c 0a 20 20 20 20 53 51 4c 5f 57 56  = -8,.    SQL_WV
0a80: 41 52 43 48 41 52 20 3d 20 2d 39 2c 0a 20 20 20  ARCHAR = -9,.   
0a90: 20 53 51 4c 5f 57 4c 4f 4e 47 56 41 52 43 48 41   SQL_WLONGVARCHA
0aa0: 52 20 3d 20 2d 31 30 2c 0a 7d 3b 0a 0a 2f 2a 20  R = -10,.};../* 
0ab0: 43 20 64 61 74 61 20 74 79 70 65 73 20 2a 2f 0a  C data types */.
0ac0: 0a 23 64 65 66 69 6e 65 20 53 51 4c 5f 53 49 47  .#define SQL_SIG
0ad0: 4e 45 44 5f 4f 46 46 53 45 54 20 28 2d 32 30 29  NED_OFFSET (-20)
0ae0: 0a 0a 23 64 65 66 69 6e 65 20 53 51 4c 5f 43 5f  ..#define SQL_C_
0af0: 42 49 4e 41 52 59 20 53 51 4c 5f 42 49 4e 41 52  BINARY SQL_BINAR
0b00: 59 0a 23 64 65 66 69 6e 65 20 53 51 4c 5f 43 5f  Y.#define SQL_C_
0b10: 43 48 41 52 20 53 51 4c 5f 43 48 41 52 0a 23 64  CHAR SQL_CHAR.#d
0b20: 65 66 69 6e 65 20 53 51 4c 5f 43 5f 44 4f 55 42  efine SQL_C_DOUB
0b30: 4c 45 20 53 51 4c 5f 44 4f 55 42 4c 45 0a 23 64  LE SQL_DOUBLE.#d
0b40: 65 66 69 6e 65 20 53 51 4c 5f 43 5f 4c 4f 4e 47  efine SQL_C_LONG
0b50: 20 53 51 4c 5f 49 4e 54 45 47 45 52 0a 23 64 65   SQL_INTEGER.#de
0b60: 66 69 6e 65 20 53 51 4c 5f 43 5f 53 42 49 47 49  fine SQL_C_SBIGI
0b70: 4e 54 20 53 51 4c 5f 42 49 47 49 4e 54 20 2b 20  NT SQL_BIGINT + 
0b80: 53 51 4c 5f 53 49 47 4e 45 44 5f 4f 46 46 53 45  SQL_SIGNED_OFFSE
0b90: 54 0a 23 64 65 66 69 6e 65 20 53 51 4c 5f 43 5f  T.#define SQL_C_
0ba0: 53 4c 4f 4e 47 20 53 51 4c 5f 49 4e 54 45 47 45  SLONG SQL_INTEGE
0bb0: 52 20 2b 20 53 51 4c 5f 53 49 47 4e 45 44 5f 4f  R + SQL_SIGNED_O
0bc0: 46 46 53 45 54 0a 23 64 65 66 69 6e 65 20 53 51  FFSET.#define SQ
0bd0: 4c 5f 43 5f 57 43 48 41 52 20 53 51 4c 5f 57 43  L_C_WCHAR SQL_WC
0be0: 48 41 52 0a 0a 2f 2a 20 50 61 72 61 6d 65 74 65  HAR../* Paramete
0bf0: 72 20 74 72 61 6e 73 6d 69 73 73 69 6f 6e 20 64  r transmission d
0c00: 69 72 65 74 69 6f 6e 73 20 2a 2f 0a 0a 23 64 65  iretions */..#de
0c10: 66 69 6e 65 20 53 51 4c 5f 50 41 52 41 4d 5f 49  fine SQL_PARAM_I
0c20: 4e 50 55 54 20 31 0a 0a 2f 2a 20 53 74 61 74 75  NPUT 1../* Statu
0c30: 73 20 72 65 74 75 72 6e 73 20 2a 2f 0a 0a 23 64  s returns */..#d
0c40: 65 66 69 6e 65 20 20 20 20 53 51 4c 5f 45 52 52  efine    SQL_ERR
0c50: 4f 52 20 28 2d 31 29 0a 23 64 65 66 69 6e 65 20  OR (-1).#define 
0c60: 20 20 20 53 51 4c 5f 4e 4f 5f 44 41 54 41 20 31     SQL_NO_DATA 1
0c70: 30 30 0a 23 64 65 66 69 6e 65 09 20 20 20 53 51  00.#define.   SQ
0c80: 4c 5f 4e 4f 5f 54 4f 54 41 4c 20 28 2d 34 29 0a  L_NO_TOTAL (-4).
0c90: 23 64 65 66 69 6e 65 20 20 20 20 53 51 4c 5f 53  #define    SQL_S
0ca0: 55 43 43 45 53 53 20 30 0a 23 64 65 66 69 6e 65  UCCESS 0.#define
0cb0: 20 20 20 20 53 51 4c 5f 53 55 43 43 45 53 53 5f      SQL_SUCCESS_
0cc0: 57 49 54 48 5f 49 4e 46 4f 20 31 0a 23 64 65 66  WITH_INFO 1.#def
0cd0: 69 6e 65 20 20 20 20 53 51 4c 5f 53 55 43 43 45  ine    SQL_SUCCE
0ce0: 45 44 45 44 28 72 63 29 20 28 28 28 72 63 29 26  EDED(rc) (((rc)&
0cf0: 28 7e 31 29 29 3d 3d 30 29 0a 0a 2f 2a 20 44 69  (~1))==0)../* Di
0d00: 61 67 6e 6f 73 74 69 63 20 66 69 65 6c 64 73 20  agnostic fields 
0d10: 2a 2f 0a 0a 65 6e 75 6d 20 5f 53 51 4c 5f 44 49  */..enum _SQL_DI
0d20: 41 47 20 7b 0a 20 20 20 20 53 51 4c 5f 44 49 41  AG {.    SQL_DIA
0d30: 47 5f 53 51 4c 53 54 41 54 45 20 3d 20 34 2c 0a  G_SQLSTATE = 4,.
0d40: 7d 3b 0a 0a 2f 2a 20 54 72 61 6e 73 61 63 74 69  };../* Transacti
0d50: 6f 6e 20 69 73 6f 6c 61 74 69 6f 6e 20 6c 65 76  on isolation lev
0d60: 65 6c 73 20 2a 2f 0a 0a 23 64 65 66 69 6e 65 20  els */..#define 
0d70: 53 51 4c 5f 54 58 4e 5f 52 45 41 44 5f 43 4f 4d  SQL_TXN_READ_COM
0d80: 4d 49 54 54 45 44 20 32 0a 23 64 65 66 69 6e 65  MITTED 2.#define
0d90: 20 53 51 4c 5f 54 58 4e 5f 52 45 41 44 5f 55 4e   SQL_TXN_READ_UN
0da0: 43 4f 4d 4d 49 54 54 45 44 20 31 0a 23 64 65 66  COMMITTED 1.#def
0db0: 69 6e 65 20 53 51 4c 5f 54 58 4e 5f 52 45 50 45  ine SQL_TXN_REPE
0dc0: 41 54 41 42 4c 45 5f 52 45 41 44 20 34 0a 23 64  ATABLE_READ 4.#d
0dd0: 65 66 69 6e 65 20 53 51 4c 5f 54 58 4e 5f 53 45  efine SQL_TXN_SE
0de0: 52 49 41 4c 49 5a 41 42 4c 45 20 38 0a 0a 2f 2a  RIALIZABLE 8../*
0df0: 20 41 63 63 65 73 73 20 6d 6f 64 65 73 20 2a 2f   Access modes */
0e00: 0a 0a 23 64 65 66 69 6e 65 20 53 51 4c 5f 4d 4f  ..#define SQL_MO
0e10: 44 45 5f 52 45 41 44 5f 4f 4e 4c 59 20 31 55 4c  DE_READ_ONLY 1UL
0e20: 0a 23 64 65 66 69 6e 65 20 53 51 4c 5f 4d 4f 44  .#define SQL_MOD
0e30: 45 5f 52 45 41 44 5f 57 52 49 54 45 20 30 55 4c  E_READ_WRITE 0UL
0e40: 0a 0a 2f 2a 20 4f 44 42 43 20 70 72 6f 70 65 72  ../* ODBC proper
0e50: 74 69 65 73 20 2a 2f 0a 0a 23 64 65 66 69 6e 65  ties */..#define
0e60: 20 53 51 4c 5f 41 43 43 45 53 53 5f 4d 4f 44 45   SQL_ACCESS_MODE
0e70: 20 31 30 31 0a 23 64 65 66 69 6e 65 20 53 51 4c   101.#define SQL
0e80: 5f 41 55 54 4f 43 4f 4d 4d 49 54 20 31 30 32 0a  _AUTOCOMMIT 102.
0e90: 23 64 65 66 69 6e 65 20 53 51 4c 5f 54 58 4e 5f  #define SQL_TXN_
0ea0: 49 53 4f 4c 41 54 49 4f 4e 20 31 30 38 0a 0a 2f  ISOLATION 108../
0eb0: 2a 20 4f 44 42 43 20 61 74 74 72 69 62 75 74 65  * ODBC attribute
0ec0: 73 20 2a 2f 0a 0a 23 64 65 66 69 6e 65 20 53 51  s */..#define SQ
0ed0: 4c 5f 41 54 54 52 5f 41 43 43 45 53 53 5f 4d 4f  L_ATTR_ACCESS_MO
0ee0: 44 45 20 53 51 4c 5f 41 43 43 45 53 53 5f 4d 4f  DE SQL_ACCESS_MO
0ef0: 44 45 0a 23 64 65 66 69 6e 65 20 53 51 4c 5f 41  DE.#define SQL_A
0f00: 54 54 52 5f 43 4f 4e 4e 45 43 54 49 4f 4e 5f 54  TTR_CONNECTION_T
0f10: 49 4d 45 4f 55 54 20 31 31 33 0a 23 64 65 66 69  IMEOUT 113.#defi
0f20: 6e 65 20 53 51 4c 5f 41 54 54 52 5f 4f 44 42 43  ne SQL_ATTR_ODBC
0f30: 5f 56 45 52 53 49 4f 4e 20 32 30 30 0a 23 64 65  _VERSION 200.#de
0f40: 66 69 6e 65 20 53 51 4c 5f 41 54 54 52 5f 54 58  fine SQL_ATTR_TX
0f50: 4e 5f 49 53 4f 4c 41 54 49 4f 4e 20 53 51 4c 5f  N_ISOLATION SQL_
0f60: 54 58 4e 5f 49 53 4f 4c 41 54 49 4f 4e 0a 23 64  TXN_ISOLATION.#d
0f70: 65 66 69 6e 65 20 53 51 4c 5f 41 54 54 52 5f 41  efine SQL_ATTR_A
0f80: 55 54 4f 43 4f 4d 4d 49 54 20 53 51 4c 5f 41 55  UTOCOMMIT SQL_AU
0f90: 54 4f 43 4f 4d 4d 49 54 0a 0a 2f 2a 20 4e 75 6c  TOCOMMIT../* Nul
0fa0: 6c 61 62 6c 65 3f 20 2a 2f 0a 0a 23 64 65 66 69  lable? */..#defi
0fb0: 6e 65 20 53 51 4c 5f 4e 55 4c 4c 41 42 4c 45 5f  ne SQL_NULLABLE_
0fc0: 55 4e 4b 4e 4f 57 4e 20 32 0a 0a 2f 2a 20 50 6c  UNKNOWN 2../* Pl
0fd0: 61 63 65 68 6f 6c 64 65 72 20 66 6f 72 20 6c 65  aceholder for le
0fe0: 6e 67 74 68 20 6f 66 20 6d 69 73 73 69 6e 67 20  ngth of missing 
0ff0: 64 61 74 61 20 2a 2f 0a 0a 23 64 65 66 69 6e 65  data */..#define
1000: 20 53 51 4c 5f 4e 55 4c 4c 5f 44 41 54 41 20 28   SQL_NULL_DATA (
1010: 2d 31 29 0a 0a 2f 2a 20 4f 44 42 43 20 76 65 72  -1)../* ODBC ver
1020: 73 69 6f 6e 73 20 2a 2f 0a 0a 23 64 65 66 69 6e  sions */..#defin
1030: 65 20 53 51 4c 5f 4f 56 5f 4f 44 42 43 33 20 33  e SQL_OV_ODBC3 3
1040: 55 4c 0a 23 64 65 66 69 6e 65 20 53 51 4c 5f 4f  UL.#define SQL_O
1050: 44 42 43 5f 56 45 52 20 31 30 0a 0a 2f 2a 20 53  DBC_VER 10../* S
1060: 51 4c 44 72 69 76 65 72 43 6f 6e 6e 65 63 74 20  QLDriverConnect 
1070: 66 6c 61 67 73 20 2a 2f 0a 0a 23 64 65 66 69 6e  flags */..#defin
1080: 65 20 53 51 4c 5f 44 52 49 56 45 52 5f 43 4f 4d  e SQL_DRIVER_COM
1090: 50 4c 45 54 45 5f 52 45 51 55 49 52 45 44 20 33  PLETE_REQUIRED 3
10a0: 0a 23 64 65 66 69 6e 65 20 53 51 4c 5f 44 52 49  .#define SQL_DRI
10b0: 56 45 52 5f 4e 4f 50 52 4f 4d 50 54 20 30 0a 0a  VER_NOPROMPT 0..
10c0: 2f 2a 20 53 51 4c 47 65 74 54 79 70 65 49 6e 66  /* SQLGetTypeInf
10d0: 6f 20 66 6c 61 67 73 20 2a 2f 0a 0a 23 64 65 66  o flags */..#def
10e0: 69 6e 65 20 53 51 4c 5f 41 4c 4c 5f 54 59 50 45  ine SQL_ALL_TYPE
10f0: 53 20 30 0a 0a 2f 2a 20 54 72 61 6e 73 61 63 74  S 0../* Transact
1100: 69 6f 6e 20 61 63 74 69 6f 6e 73 20 2a 2f 0a 0a  ion actions */..
1110: 23 64 65 66 69 6e 65 20 53 51 4c 5f 43 4f 4d 4d  #define SQL_COMM
1120: 49 54 20 30 0a 23 64 65 66 69 6e 65 20 53 51 4c  IT 0.#define SQL
1130: 5f 52 4f 4c 4c 42 41 43 4b 20 31 0a 0a 2f 2a 20  _ROLLBACK 1../* 
1140: 44 61 74 61 20 73 6f 75 72 63 65 20 66 65 74 63  Data source fetc
1150: 68 20 66 6c 61 67 73 20 2a 2f 0a 0a 23 64 65 66  h flags */..#def
1160: 69 6e 65 20 53 51 4c 5f 46 45 54 43 48 5f 46 49  ine SQL_FETCH_FI
1170: 52 53 54 20 32 0a 23 64 65 66 69 6e 65 20 53 51  RST 2.#define SQ
1180: 4c 5f 46 45 54 43 48 5f 46 49 52 53 54 5f 53 59  L_FETCH_FIRST_SY
1190: 53 54 45 4d 20 33 32 0a 23 64 65 66 69 6e 65 20  STEM 32.#define 
11a0: 53 51 4c 5f 46 45 54 43 48 5f 46 49 52 53 54 5f  SQL_FETCH_FIRST_
11b0: 55 53 45 52 20 33 31 0a 23 64 65 66 69 6e 65 20  USER 31.#define 
11c0: 53 51 4c 5f 46 45 54 43 48 5f 4e 45 58 54 20 31  SQL_FETCH_NEXT 1
11d0: 0a 0a 2f 2a 20 4f 44 42 43 49 4e 53 54 20 61 63  ../* ODBCINST ac
11e0: 74 69 6f 6e 73 20 2a 2f 0a 0a 23 64 65 66 69 6e  tions */..#defin
11f0: 65 20 20 4f 44 42 43 5f 41 44 44 5f 44 53 4e 20  e  ODBC_ADD_DSN 
1200: 20 20 20 20 31 0a 23 64 65 66 69 6e 65 20 20 4f      1.#define  O
1210: 44 42 43 5f 43 4f 4e 46 49 47 5f 44 53 4e 20 20  DBC_CONFIG_DSN  
1220: 32 0a 23 64 65 66 69 6e 65 20 20 4f 44 42 43 5f  2.#define  ODBC_
1230: 52 45 4d 4f 56 45 5f 44 53 4e 20 20 33 0a 23 64  REMOVE_DSN  3.#d
1240: 65 66 69 6e 65 20 4f 44 42 43 5f 41 44 44 5f 53  efine ODBC_ADD_S
1250: 59 53 5f 44 53 4e 20 34 0a 23 64 65 66 69 6e 65  YS_DSN 4.#define
1260: 20 4f 44 42 43 5f 43 4f 4e 46 49 47 5f 53 59 53   ODBC_CONFIG_SYS
1270: 5f 44 53 4e 20 35 0a 23 64 65 66 69 6e 65 20 4f  _DSN 5.#define O
1280: 44 42 43 5f 52 45 4d 4f 56 45 5f 53 59 53 5f 44  DBC_REMOVE_SYS_D
1290: 53 4e 20 36 0a 0a 2f 2a 20 4f 44 42 43 49 4e 53  SN 6../* ODBCINS
12a0: 54 20 65 72 72 6f 72 73 20 2a 2f 0a 0a 23 64 65  T errors */..#de
12b0: 66 69 6e 65 20 4f 44 42 43 5f 45 52 52 4f 52 5f  fine ODBC_ERROR_
12c0: 47 45 4e 45 52 41 4c 5f 45 52 52 20 31 0a 23 64  GENERAL_ERR 1.#d
12d0: 65 66 69 6e 65 20 4f 44 42 43 5f 45 52 52 4f 52  efine ODBC_ERROR
12e0: 5f 49 4e 56 41 4c 49 44 5f 42 55 46 46 5f 4c 45  _INVALID_BUFF_LE
12f0: 4e 20 32 0a 23 64 65 66 69 6e 65 20 4f 44 42 43  N 2.#define ODBC
1300: 5f 45 52 52 4f 52 5f 49 4e 56 41 4c 49 44 5f 48  _ERROR_INVALID_H
1310: 57 4e 44 20 33 0a 23 64 65 66 69 6e 65 20 4f 44  WND 3.#define OD
1320: 42 43 5f 45 52 52 4f 52 5f 49 4e 56 41 4c 49 44  BC_ERROR_INVALID
1330: 5f 53 54 52 20 34 0a 23 64 65 66 69 6e 65 20 4f  _STR 4.#define O
1340: 44 42 43 5f 45 52 52 4f 52 5f 49 4e 56 41 4c 49  DBC_ERROR_INVALI
1350: 44 5f 52 45 51 55 45 53 54 5f 54 59 50 45 20 35  D_REQUEST_TYPE 5
1360: 0a 23 64 65 66 69 6e 65 20 4f 44 42 43 5f 45 52  .#define ODBC_ER
1370: 52 4f 52 5f 43 4f 4d 50 4f 4e 45 4e 54 5f 4e 4f  ROR_COMPONENT_NO
1380: 54 5f 46 4f 55 4e 44 20 36 0a 23 64 65 66 69 6e  T_FOUND 6.#defin
1390: 65 20 4f 44 42 43 5f 45 52 52 4f 52 5f 49 4e 56  e ODBC_ERROR_INV
13a0: 41 4c 49 44 5f 4e 41 4d 45 20 37 0a 23 64 65 66  ALID_NAME 7.#def
13b0: 69 6e 65 20 4f 44 42 43 5f 45 52 52 4f 52 5f 49  ine ODBC_ERROR_I
13c0: 4e 56 41 4c 49 44 5f 4b 45 59 57 4f 52 44 5f 56  NVALID_KEYWORD_V
13d0: 41 4c 55 45 20 38 0a 23 64 65 66 69 6e 65 20 4f  ALUE 8.#define O
13e0: 44 42 43 5f 45 52 52 4f 52 5f 49 4e 56 41 4c 49  DBC_ERROR_INVALI
13f0: 44 5f 44 53 4e 20 39 0a 23 64 65 66 69 6e 65 20  D_DSN 9.#define 
1400: 4f 44 42 43 5f 45 52 52 4f 52 5f 49 4e 56 41 4c  ODBC_ERROR_INVAL
1410: 49 44 5f 49 4e 46 20 31 30 0a 23 64 65 66 69 6e  ID_INF 10.#defin
1420: 65 20 4f 44 42 43 5f 45 52 52 4f 52 5f 52 45 51  e ODBC_ERROR_REQ
1430: 55 45 53 54 5f 46 41 49 4c 45 44 20 31 31 0a 23  UEST_FAILED 11.#
1440: 64 65 66 69 6e 65 20 4f 44 42 43 5f 45 52 52 4f  define ODBC_ERRO
1450: 52 5f 49 4e 56 41 4c 49 44 5f 50 41 54 48 20 31  R_INVALID_PATH 1
1460: 32 0a 23 64 65 66 69 6e 65 20 4f 44 42 43 5f 45  2.#define ODBC_E
1470: 52 52 4f 52 5f 4c 4f 41 44 5f 4c 49 42 5f 46 41  RROR_LOAD_LIB_FA
1480: 49 4c 45 44 20 31 33 0a 23 64 65 66 69 6e 65 20  ILED 13.#define 
1490: 4f 44 42 43 5f 45 52 52 4f 52 5f 49 4e 56 41 4c  ODBC_ERROR_INVAL
14a0: 49 44 5f 50 41 52 41 4d 5f 53 45 51 55 45 4e 43  ID_PARAM_SEQUENC
14b0: 45 20 31 34 0a 23 64 65 66 69 6e 65 20 4f 44 42  E 14.#define ODB
14c0: 43 5f 45 52 52 4f 52 5f 49 4e 56 41 4c 49 44 5f  C_ERROR_INVALID_
14d0: 4c 4f 47 5f 46 49 4c 45 20 31 35 0a 23 64 65 66  LOG_FILE 15.#def
14e0: 69 6e 65 20 4f 44 42 43 5f 45 52 52 4f 52 5f 55  ine ODBC_ERROR_U
14f0: 53 45 52 5f 43 41 4e 43 45 4c 45 44 20 31 36 0a  SER_CANCELED 16.
1500: 23 64 65 66 69 6e 65 20 4f 44 42 43 5f 45 52 52  #define ODBC_ERR
1510: 4f 52 5f 55 53 41 47 45 5f 55 50 44 41 54 45 5f  OR_USAGE_UPDATE_
1520: 46 41 49 4c 45 44 20 31 37 0a 23 64 65 66 69 6e  FAILED 17.#defin
1530: 65 20 4f 44 42 43 5f 45 52 52 4f 52 5f 43 52 45  e ODBC_ERROR_CRE
1540: 41 54 45 5f 44 53 4e 5f 46 41 49 4c 45 44 20 31  ATE_DSN_FAILED 1
1550: 38 0a 23 64 65 66 69 6e 65 20 4f 44 42 43 5f 45  8.#define ODBC_E
1560: 52 52 4f 52 5f 57 52 49 54 49 4e 47 5f 53 59 53  RROR_WRITING_SYS
1570: 49 4e 46 4f 5f 46 41 49 4c 45 44 20 31 39 0a 23  INFO_FAILED 19.#
1580: 64 65 66 69 6e 65 20 4f 44 42 43 5f 45 52 52 4f  define ODBC_ERRO
1590: 52 5f 52 45 4d 4f 56 45 5f 44 53 4e 5f 46 41 49  R_REMOVE_DSN_FAI
15a0: 4c 45 44 20 32 30 0a 23 64 65 66 69 6e 65 20 4f  LED 20.#define O
15b0: 44 42 43 5f 45 52 52 4f 52 5f 4f 55 54 5f 4f 46  DBC_ERROR_OUT_OF
15c0: 5f 4d 45 4d 20 32 31 0a 23 64 65 66 69 6e 65 20  _MEM 21.#define 
15d0: 4f 44 42 43 5f 45 52 52 4f 52 5f 4f 55 54 50 55  ODBC_ERROR_OUTPU
15e0: 54 5f 53 54 52 49 4e 47 5f 54 52 55 4e 43 41 54  T_STRING_TRUNCAT
15f0: 45 44 20 32 32 0a 0a 2f 2a 20 4f 44 42 43 20 63  ED 22../* ODBC c
1600: 6c 69 65 6e 74 20 6c 69 62 72 61 72 79 20 65 6e  lient library en
1610: 74 72 79 20 70 6f 69 6e 74 73 20 2a 2f 0a 0a 23  try points */..#
1620: 69 66 64 65 66 20 5f 57 49 4e 33 32 0a 23 64 65  ifdef _WIN32.#de
1630: 66 69 6e 65 20 53 51 4c 5f 41 50 49 20 5f 5f 73  fine SQL_API __s
1640: 74 64 63 61 6c 6c 0a 23 64 65 66 69 6e 65 20 49  tdcall.#define I
1650: 4e 53 54 41 50 49 20 5f 5f 73 74 64 63 61 6c 6c  NSTAPI __stdcall
1660: 0a 23 65 6c 73 65 0a 23 64 65 66 69 6e 65 20 53  .#else.#define S
1670: 51 4c 5f 41 50 49 20 2f 2a 20 6e 6f 74 68 69 6e  QL_API /* nothin
1680: 67 20 2a 2f 0a 23 64 65 66 69 6e 65 20 49 4e 53  g */.#define INS
1690: 54 41 50 49 20 2f 2a 20 6e 6f 74 68 69 6e 67 20  TAPI /* nothing 
16a0: 2a 2f 0a 23 65 6e 64 69 66 0a 0a 23 69 6e 63 6c  */.#endif..#incl
16b0: 75 64 65 20 22 6f 64 62 63 53 74 75 62 73 2e 68  ude "odbcStubs.h
16c0: 22 0a 4d 4f 44 55 4c 45 5f 53 43 4f 50 45 20 63  ".MODULE_SCOPE c
16d0: 6f 6e 73 74 20 6f 64 62 63 53 74 75 62 44 65 66  onst odbcStubDef
16e0: 73 2a 20 6f 64 62 63 53 74 75 62 73 3b 0a 0a 2f  s* odbcStubs;../
16f0: 2a 0a 20 2a 20 41 64 64 69 74 69 6f 6e 61 6c 20  *. * Additional 
1700: 65 6e 74 72 79 20 70 6f 69 6e 74 73 20 69 6e 20  entry points in 
1710: 4f 44 42 43 49 4e 53 54 20 2d 20 61 6c 6c 20 6f  ODBCINST - all o
1720: 66 20 74 68 65 73 65 20 61 72 65 20 6f 70 74 69  f these are opti
1730: 6f 6e 61 6c 0a 20 2a 20 61 6e 64 20 72 65 73 6f  onal. * and reso
1740: 6c 76 65 64 20 77 69 74 68 20 54 63 6c 5f 46 69  lved with Tcl_Fi
1750: 6e 64 53 79 6d 62 6f 6c 2c 20 6e 6f 74 20 64 69  ndSymbol, not di
1760: 72 65 63 74 6c 79 20 69 6e 20 54 63 6c 5f 4c 6f  rectly in Tcl_Lo
1770: 61 64 4c 69 62 72 61 72 79 2e 0a 20 2a 2f 0a 0a  adLibrary.. */..
1780: 4d 4f 44 55 4c 45 5f 53 43 4f 50 45 20 42 4f 4f  MODULE_SCOPE BOO
1790: 4c 20 28 49 4e 53 54 41 50 49 2a 20 53 51 4c 43  L (INSTAPI* SQLC
17a0: 6f 6e 66 69 67 44 61 74 61 53 6f 75 72 63 65 57  onfigDataSourceW
17b0: 29 28 48 57 4e 44 2c 20 57 4f 52 44 2c 20 4c 50  )(HWND, WORD, LP
17c0: 43 57 53 54 52 2c 0a 09 09 09 09 09 09 20 20 4c  CWSTR,.......  L
17d0: 50 43 57 53 54 52 29 3b 0a 4d 4f 44 55 4c 45 5f  PCWSTR);.MODULE_
17e0: 53 43 4f 50 45 20 42 4f 4f 4c 20 28 49 4e 53 54  SCOPE BOOL (INST
17f0: 41 50 49 2a 20 53 51 4c 43 6f 6e 66 69 67 44 61  API* SQLConfigDa
1800: 74 61 53 6f 75 72 63 65 29 28 48 57 4e 44 2c 20  taSource)(HWND, 
1810: 57 4f 52 44 2c 20 4c 50 43 53 54 52 2c 20 4c 50  WORD, LPCSTR, LP
1820: 43 53 54 52 29 3b 0a 4d 4f 44 55 4c 45 5f 53 43  CSTR);.MODULE_SC
1830: 4f 50 45 20 42 4f 4f 4c 20 28 49 4e 53 54 41 50  OPE BOOL (INSTAP
1840: 49 2a 20 53 51 4c 49 6e 73 74 61 6c 6c 65 72 45  I* SQLInstallerE
1850: 72 72 6f 72 57 29 28 57 4f 52 44 2c 20 44 57 4f  rrorW)(WORD, DWO
1860: 52 44 2a 2c 20 4c 50 57 53 54 52 2c 20 57 4f 52  RD*, LPWSTR, WOR
1870: 44 2c 0a 09 09 09 09 09 09 57 4f 52 44 2a 29 3b  D,.......WORD*);
1880: 0a 4d 4f 44 55 4c 45 5f 53 43 4f 50 45 20 42 4f  .MODULE_SCOPE BO
1890: 4f 4c 20 28 49 4e 53 54 41 50 49 2a 20 53 51 4c  OL (INSTAPI* SQL
18a0: 49 6e 73 74 61 6c 6c 65 72 45 72 72 6f 72 29 28  InstallerError)(
18b0: 57 4f 52 44 2c 20 44 57 4f 52 44 2a 2c 20 4c 50  WORD, DWORD*, LP
18c0: 53 54 52 2c 20 57 4f 52 44 2c 0a 09 09 09 09 09  STR, WORD,......
18d0: 20 20 20 20 20 20 20 57 4f 52 44 2a 29 3b 0a 0a         WORD*);..
18e0: 2f 2a 0a 20 2a 20 46 75 6e 63 74 69 6f 6e 20 74  /*. * Function t
18f0: 68 61 74 20 69 6e 69 74 69 61 6c 69 73 65 73 20  hat initialises 
1900: 74 68 65 20 73 74 75 62 73 0a 20 2a 2f 0a 0a 4d  the stubs. */..M
1910: 4f 44 55 4c 45 5f 53 43 4f 50 45 20 54 63 6c 5f  ODULE_SCOPE Tcl_
1920: 4c 6f 61 64 48 61 6e 64 6c 65 20 4f 64 62 63 49  LoadHandle OdbcI
1930: 6e 69 74 53 74 75 62 73 28 54 63 6c 5f 49 6e 74  nitStubs(Tcl_Int
1940: 65 72 70 2a 2c 20 54 63 6c 5f 4c 6f 61 64 48 61  erp*, Tcl_LoadHa
1950: 6e 64 6c 65 2a 29 3b 0a 0a 23 65 6e 64 69 66 0a  ndle*);..#endif.