Disabled parentheses for SQLFunctionExpression when no parameters. Cl…

…oses #35.
hisystems · Mar 22, 2012 · 691500c · 691500c
1 parent abd5b34
commit 691500c
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/SQL/Expressions/SQLFunctionExpression.vb b/SQL/Expressions/SQLFunctionExpression.vb
@@ -25,6 +25,8 @@ Namespace SQL
         Private pstrFunctionName As String
         Private pobjFunctionArguments As SQLExpression()
 
+        Public IncludeParenthesesWhenArgumentsEmpty As Boolean = False
+
         Public Sub New(strFunctionName As String)
 
             If String.IsNullOrEmpty(strFunctionName) Then
@@ -78,7 +80,11 @@ Namespace SQL
                 strArguments = String.Join(", ", pobjFunctionArguments.Select(Function(argument) argument.SQL(eConnectionType)).ToArray)
             End If
 
-            Return Me.FunctionName(eConnectionType) & "(" & strArguments & ")"
+            If (IncludeParenthesesWhenArgumentsEmpty AndAlso pobjFunctionArguments Is Nothing) OrElse pobjFunctionArguments IsNot Nothing Then
+                strArguments = "(" & strArguments & ")"
+            End If
+
+            Return Me.FunctionName(eConnectionType) & strArguments
 
         End Function