怎么编写一个将十进制数(小于10)转换成二进制数(4位)函数

如何编写一个将十进制数(小于10)转换成二进制数(4位)函数
比方:
  十进制               二进制
    2                         0010
    5                         0101
    7                         0111
    9                         1001  
如何编写这样的转换函数?

------解决方案--------------------
CREATE function dtob(@num int)
returns varchar as
begin
declare @numstr varchar
set @numstr= ' '
while(@num <> 0)
begin
set @[email protected]+convert(char(1),@num%2)
set @[email protected]/2
end

return (reverse(@numstr))
end


这样可以吗?