Include SQL_TABLE_VALUED_FUNCTION's in MSSQL object browsing. See http://www.heidisql.com/forum.php?t=16493

This commit is contained in:
Ansgar Becker
2014-10-06 16:58:04 +00:00
parent e6d0eb20c3
commit ecdf49b85d

View File

@ -4027,7 +4027,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')+')');
' WHERE '+QuoteIdent('type')+' IN ('+EscapeString('P')+', '+EscapeString('U')+', '+EscapeString('V')+', '+EscapeString('TR')+', '+EscapeString('FN')+', '+EscapeString('TF')+')');
except
on E:EDatabaseError do;
end;
@ -4049,7 +4049,7 @@ begin
obj.NodeType := lntView
else if tp = 'TR' then
obj.NodeType := lntTrigger
else if tp = 'FN' then
else if (tp = 'FN') or (tp = 'TF') then
obj.NodeType := lntFunction;
Results.Next;
end;