Skip to content

Commit

Permalink
Support disabling "Full table status" on PostgreSQL. See https://www.…
Browse files Browse the repository at this point in the history
  • Loading branch information
ansgarbecker committed Feb 22, 2020
1 parent 88c3560 commit 483f6a1
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions source/dbconnection.pas
Expand Up @@ -5849,12 +5849,12 @@ procedure TPGConnection.FetchDbObjects(db: String; var Cache: TDBObjectList);
else
SchemaTable := EscapeString(FQuoteChar)+' || t.TABLE_SCHEMA || '+EscapeString(FQuoteChar+'.'+FQuoteChar)+' || t.TABLE_NAME || '+EscapeString(FQuoteChar);
// See http://www.heidisql.com/forum.php?t=16996
if ServerVersionInt >= 90000 then
if Parameters.FullTableStatus and (ServerVersionInt >= 90000) then
DataLenClause := 'pg_table_size('+SchemaTable+')::bigint'
else
DataLenClause := 'NULL';
// See https://www.heidisql.com/forum.php?t=34635
if ServerVersionInt >= 80100 then
if Parameters.FullTableStatus and (ServerVersionInt >= 80100) then
IndexLenClause := 'pg_relation_size('+SchemaTable+')::bigint'
else
IndexLenClause := 'relpages * '+SIZE_KB.ToString;
Expand Down

0 comments on commit 483f6a1

Please sign in to comment.