Useful function. Well done.

I would like to point out, though, that by copying and pasting the code for your function into SSMS, I got a bunch of bogus error...