diff options
Diffstat (limited to 'wizards/source')
| -rw-r--r-- | wizards/source/access2base/Field.xba | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/wizards/source/access2base/Field.xba b/wizards/source/access2base/Field.xba index 871133f2eba6..3e2721620074 100644 --- a/wizards/source/access2base/Field.xba +++ b/wizards/source/access2base/Field.xba @@ -514,7 +514,13 @@ Dim oParent As Object If _ParentDatabase.Recordsets(_ParentName)._EditMode = dbEditNone Then Goto Trace_Error_Update With com.sun.star.sdbc.DataType If IsNull(pvValue) Then - If Column.IsNullable = com.sun.star.sdbc.ColumnValue.NULLABLE Then Column.updateNull() Else Goto Trace_Null +REM If Column.IsNullable = com.sun.star.sdbc.ColumnValue.NULLABLE Then Column.updateNull() Else Goto Trace_Null + If Column.IsNullable = com.sun.star.sdbc.ColumnValue.NULLABLE Then + Column.updateNull() + Goto Exit_Function + Else + Goto Trace_Null + End If End If Select Case Column.Type Case .BIT, .BOOLEAN |