[SQLServer]入れ子のカーソルを使って、件数が1件以上のテーブル名一覧を作る

DECLARE @table_name NVARCHAR(128);
DECLARE @rec_count int;

DECLARE CUR_TABLE CURSOR FOR
    select name from sys.tables where name like 'T\_%' ESCAPE '\'
    union all
    select name from sys.tables where name like 'D\_%' ESCAPE '\' 
    union all
    select name from sys.tables where name like 'M\_%' ESCAPE '\'
    union all
    select name from sys.tables where 
        name not like 'TMP\_%' ESCAPE '\' and
        name not like 'TT\_%' ESCAPE '\' and
        name not like 'PT\_%' ESCAPE '\' and
        name not like 'W\_%' ESCAPE '\' and
        name not like 'T\_%' ESCAPE '\' and
        name not like 'D\_%' ESCAPE '\' and
        name not like 'M\_%' ESCAPE '\' and
        name not like 'I\_%' ESCAPE '\' and
        name not like 'G\_%' ESCAPE '\' and
        name not like 'Z\_%' ESCAPE '\' ;

OPEN CUR_TABLE;

FETCH NEXT FROM CUR_TABLE INTO @table_name;

WHILE @@FETCH_STATUS = 0
BEGIN
    EXEC('DECLARE cr2 CURSOR FOR select count(*) from ' + @table_name)
    OPEN cr2
    FETCH NEXT FROM cr2 INTO @rec_count 
    CLOSE cr2
    DEALLOCATE cr2

    if @rec_count  > 0 PRINT @table_name

    FETCH NEXT FROM CUR_TABLE INTO @table_name;
END
CLOSE CUR_TABLE;
DEALLOCATE CUR_TABLE;