Support older PostgreSQL servers in TPGConnection.FetchDbObjects. See http://www.heidisql.com/forum.php?t=16072#p16138

This commit is contained in:
Ansgar Becker
2014-08-17 10:09:06 +00:00
parent 2a4a23a19b
commit ad2b4667bd

View File

@@ -4014,8 +4014,8 @@ begin
Results := nil;
try
Results := GetResults('SELECT *,'+
' pg_table_size(CONCAT(t.TABLE_SCHEMA, ''.'', t.TABLE_NAME)) AS data_length,'+
' pg_relation_size(CONCAT(t.TABLE_SCHEMA, ''.'', t.TABLE_NAME)) AS index_length,'+
' pg_table_size(t.TABLE_SCHEMA || ''.'' || t.TABLE_NAME) AS data_length,'+
' pg_relation_size(t.TABLE_SCHEMA || ''.'' || t.TABLE_NAME) AS index_length,'+
' c.reltuples, obj_description(c.oid) AS comment'+
' FROM '+QuoteIdent('information_schema')+'.'+QuoteIdent('tables')+' AS t'+
' LEFT JOIN '+QuoteIdent('pg_class')+' c ON c.relname=t.table_name'+