Nice example, and some good use of the WITH clause.

Some minor points: UNION ALL not UNION please (UNION incurs a sort). Also, I tend to use "left(Category + '0000',...