ToBinary.sql

CREATE FUNCTION [dbo].[ToBinary]
(
	@Input int
)
RETURNS varchar(255)
AS
BEGIN

	DECLARE @Output varchar(32) = ''

	WHILE @Input > 0 BEGIN

		SET @Output = @Output + CAST((@Input % 2) AS varchar)
		SET @Input = @Input / 2

	END

	RETURN REVERSE(@Output)

END
GO
CREATE FUNCTION [dbo].[ToBinary04]
(
	@Input int
)
RETURNS varchar(255)
AS
BEGIN
	DECLARE @retval AS VARCHAR(255)
	SELECT @retval = dbo.ToBinary(@Input,4)
	RETURN @retval
END

CREATE FUNCTION [dbo].[ToBinary08]
(
	@Input int
)
RETURNS varchar(255)
AS
BEGIN
	DECLARE @retval AS VARCHAR(255)
	SELECT @retval = dbo.ToBinary(@Input,8)
	RETURN @retval
END

CREATE FUNCTION [dbo].[ToBinary12]
(
	@Input int
)
RETURNS varchar(255)
AS
BEGIN
	DECLARE @retval AS VARCHAR(255)
	SELECT @retval = dbo.ToBinary(@Input,12)
	RETURN @retval
END

CREATE FUNCTION [dbo].[ToBinary16]
(
	@Input int
)
RETURNS varchar(255)
AS
BEGIN
	DECLARE @retval AS VARCHAR(255)
	SELECT @retval = dbo.ToBinary(@Input,16)
	RETURN @retval
END
GO

CREATE FUNCTION [dbo].[ToBinary32]
(
	@Input int
)
RETURNS varchar(255)
AS
BEGIN
	DECLARE @retval AS VARCHAR(255)
	SELECT @retval = dbo.ToBinary(@Input,32)
	RETURN @retval
END
GO

CREATE FUNCTION [dbo].[ToBinary64]
(
	@Input int
)
RETURNS varchar(255)
AS
BEGIN
	DECLARE @retval AS VARCHAR(255)
	SELECT @retval = dbo.ToBinary(@Input,64)
	RETURN @retval
END
GO

CREATE FUNCTION [dbo].[ToBinary128]
(
	@Input int
)
RETURNS varchar(255)
AS
BEGIN
	DECLARE @retval AS VARCHAR(255)
	SELECT @retval = dbo.ToBinary(@Input,128)
	RETURN @retval
END
GO