Support inline valued functions on MSSQL. See http://www.heidisql.com/forum.php?t=20186

This commit is contained in:
Ansgar Becker
2016-01-27 18:31:19 +00:00
parent 35059404ea
commit 0121d55694

View File

@@ -4465,7 +4465,7 @@ begin
try
Results := GetResults('SELECT *, '+SchemaSelect+' AS '+EscapeString('schema')+
' FROM '+QuoteIdent(db)+GetSQLSpecifity(spDbObjectsTable)+
' WHERE '+QuoteIdent('type')+' IN ('+EscapeString('P')+', '+EscapeString('U')+', '+EscapeString('V')+', '+EscapeString('TR')+', '+EscapeString('FN')+', '+EscapeString('TF')+')');
' WHERE '+QuoteIdent('type')+' IN ('+EscapeString('P')+', '+EscapeString('U')+', '+EscapeString('V')+', '+EscapeString('TR')+', '+EscapeString('FN')+', '+EscapeString('TF')+', '+EscapeString('IF')+')');
except
on E:EDatabaseError do;
end;
@@ -4487,7 +4487,7 @@ begin
obj.NodeType := lntView
else if tp = 'TR' then
obj.NodeType := lntTrigger
else if (tp = 'FN') or (tp = 'TF') then
else if (tp = 'FN') or (tp = 'TF') or (tp = 'IF') then
obj.NodeType := lntFunction;
Results.Next;
end;