Код

create function id36toint(@idc as char(6)) returns int as
begin
  declare @i int, @id int, @weight int
  set @i = 6
  set @id = 0
  set @weight = 1
  while @i > 0
  begin
    declare @code int
    set @code = ascii(substring(@idc, @i, 1));
    if @code = 0x20
	break
    if @code > 0x39
	set @code = @code - 0x37
    else
	set @code = @code - 0x30
    set @id = @id + @code * @weight
    if @i > 1
	set @weight = @weight * 36
    set @i = @i - 1
  end
  return @id
end
 

Код

create function inttoid36(@id as int) returns char(6) as
begin
  declare @i int, @idc varchar(6), @weight int, @Leading int
  set @idc = ''
  set @weight = 60466176
  set @Leading = 1

  if @id = 0
    set @idc = '     0'
  else
  begin
    set @i = 0
    while @i < 6
    begin
	declare @code int
	set @code = @id / @weight;
	if @code > 9
	begin
	  set @idc = @idc + char(@code + 0x37)
	  set @Leading = 0
	end
	else
	  if @code = 0 and @Leading = 1
	   set @idc = @idc + ' '
	  else
	  begin
	    set @idc = @idc + char(@code + 0x30)
	    set @Leading = 0
	  end
	set @id = @id % @weight
	set @i = @i + 1
	if @i < 6
	  set @weight = @weight / 36
    end
  end
  return @idc
end