From 42965fef3c137bbe1dd1d2aaa36a0b93a5880deb Mon Sep 17 00:00:00 2001
From: Andrew Kane <andrew@ankane.org>
Date: Tue, 5 Dec 2023 13:53:26 -0800
Subject: [PATCH] Fixed typecasting with ODBC

---
 NEWS.md    | 4 ++++
 R/select.R | 8 +++++++-
 2 files changed, 11 insertions(+), 1 deletion(-)

diff --git a/NEWS.md b/NEWS.md
index fa11282..0e9f98c 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -1,3 +1,7 @@
+## 0.3.1 (unreleased)
+
+- Fixed typecasting with ODBC
+
 ## 0.3.0 (2023-11-30)
 
 - Fixed issue with RMariaDB 1.3.0+
diff --git a/R/select.R b/R/select.R
index 609421a..dadac0b 100644
--- a/R/select.R
+++ b/R/select.R
@@ -159,11 +159,17 @@ fetchRecords <- function(conn, statement, params) {
       res <- DBI::dbSendQuery(conn, statement)
     })
 
+    if (!isSQLite(conn)) {
+      column_info <- DBI::dbColumnInfo(res)
+    }
+
     # always fetch at least once
     ret[[length(ret) + 1]] <- DBI::dbFetch(res)
 
     # must come after first fetch call for SQLite
-    column_info <- DBI::dbColumnInfo(res)
+    if (isSQLite(conn)) {
+      column_info <- DBI::dbColumnInfo(res)
+    }
 
     while (!DBI::dbHasCompleted(res)) {
       ret[[length(ret) + 1]] <- DBI::dbFetch(res)