From f3bf70b466bc66779b244a56fac6860fe5eb87ef Mon Sep 17 00:00:00 2001 From: Vladimir Glazounov Date: Thu, 17 Feb 2005 10:21:13 +0000 Subject: [PATCH] INTEGRATION: CWS dba23 (1.32.44); FILE MERGED 2005/01/21 06:59:37 oj 1.32.44.1: #i40648# new DataType::BOOLEAN --- wizards/source/formwizard/tools.xba | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/wizards/source/formwizard/tools.xba b/wizards/source/formwizard/tools.xba index fa190cbd02bf..174987e35971 100644 --- a/wizards/source/formwizard/tools.xba +++ b/wizards/source/formwizard/tools.xba @@ -74,6 +74,8 @@ Dim NullValue GetPeerSize() = oPeer.PreferredSize() ElseIf CurFieldType = com.sun.star.sdbc.DataType.BIT Then GetPeerSize() = oPeer.PreferredSize() + ElseIf CurFieldType = com.sun.star.sdbc.DataType.BOOLEAN Then + GetPeerSize() = oPeer.PreferredSize() ElseIf CurFieldType = com.sun.star.sdbc.DataType.DATE Then oControl.Model.Date = Date GetPeerSize() = oPeer.PreferredSize() @@ -344,4 +346,4 @@ Dim UIName as String next i GetFilterName() = UIName End Function - \ No newline at end of file +