REPLACE MACRO SystemFE.FallBack_All AS
(
echo 'set defaults;';
echo 'set format on;';
echo 'set width 80;';
echo 'set NULL as "-";';
echo 'set separator 2;';
echo 'set pagelength 60;';
echo 'set suppress on 1;';
echo 'set heading "&DATE||FallBack Tables In All Databases||&TIME";';
Select DBC.AllSpace.DataBaseName
(Title 'DataBase', Format 'X(15)')
, DBC.AllSpace.TableName (Title 'Table')
, Sum(CurrentPerm) (Title 'Bytes')
From DBC.AllSpace, DBC.Tables
Where DBC.Allspace.Databasename = DBC.Tables.Databasename
And DBC.Allspace.Tablename = DBC.Tables.Tablename
And DBC.Tables.ProtectionType = 'F'
And DBC.Tables.TableKind ^= 'J'
Order By 1,2
Group By 1,2;
echo 'set defaults;';
);