Bitmap an Integer Value

CREATE FUNCTION dbo.f_bitmap (@f_int INT)
RETURNS CHAR (32)
/*
||======================================================================
|| Date written:  3/6/2003 (Dise)
||
|| Description:  This scalar function accepts a four-byte integer value
|| and returns a 32-char string, in '0's and '1's, representing its
|| bit pattern.
||======================================================================
*/AS
BEGIN
  /*
  ||====================================================================
  || Facts:
  ||   1.  If the integer is negative, BIT 32 (leftmost bit) is set.
  ||   2.  For each remaining bit (n = 31 to 1), if bitwise ANDing the
  ||       integer value with 2^(n - 1) is not zero, then the bit is
  ||       set.
  ||====================================================================
  */  DECLARE @bit  CHAR (1)
        , @bits VARCHAR (32)
        , @pos  INT

  SELECT @bits = ''
       , @pos  = 32

  WHILE @pos > 0
  BEGIN
    SELECT @bit  = CASE
                     WHEN (@pos = 32
                         AND @f_int                        < 0)
                       OR (@pos < 32
                         AND @f_int & POWER (2, @pos - 1) != 0)
                     THEN '1'
                     ELSE '0'
                   END
         , @bits = @bits + @bit
         , @pos  = @pos  - 1
  END

  RETURN @bits
END