wizards/source/access2base/Database.xba | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-)
New commits: commit 187ce4ec14cc5fe4bee31d8051b34be903a34233 Author: Jean-Pierre Ledure <j...@ledure.be> AuthorDate: Thu Dec 24 13:55:43 2020 +0100 Commit: Andras Timar <andras.ti...@collabora.com> CommitDate: Mon Dec 28 11:30:10 2020 +0100 Fix #118767 - Identify Firebird DBMS in DFunction() Change-Id: I2fb3d414e3cd537654bbfae71fcdd80cf8ae4648 Reviewed-on: https://gerrit.libreoffice.org/c/core/+/108185 Reviewed-by: Jean-Pierre Ledure <j...@ledure.be> Tested-by: Jean-Pierre Ledure <j...@ledure.be> diff --git a/wizards/source/access2base/Database.xba b/wizards/source/access2base/Database.xba index 2e361cecfc13..07b19ca0a2bd 100644 --- a/wizards/source/access2base/Database.xba +++ b/wizards/source/access2base/Database.xba @@ -1167,7 +1167,7 @@ Dim sProductName As String sTarget = UCase(psFunction) & "(" & psExpr & ")" End If sSql = "SELECT " & sTarget & " AS " & sTempField & " FROM " & psDomain & sWhere & sOrderBy & sLimit - Case "FIREBIRD" + Case "FIREBIRD", "FIREBIRD (ENGINE12)" If psFunction = "" Then sTarget = "FIRST 1 " & psExpr Else sTarget = UCase(psFunction) & "(" & psExpr & ")" sSql = "SELECT " & sTarget & " AS " & sTempField & " FROM " & psDomain & sWhere & sOrderBy Case Else ' Standard syntax - Includes HSQLDB _______________________________________________ Libreoffice-commits mailing list libreoffice-comm...@lists.freedesktop.org https://lists.freedesktop.org/mailman/listinfo/libreoffice-commits