Для отображения персонализированного контента и рекламных сообщений, а также хранения личных настроек на локальном компьютере веб-сайт www.vdgb.ru используют технологию cookie и аналогичные. Продолжив использование наших веб-сайтов, Вы даете согласие на обработку персональных данных, выражаете согласие с Политикой конфиденциальности www.vdgb.ru и применением этих технологий.

ПРОДАЖА И ВНЕДРЕНИЕ 1С

по всей России

Как перевести 36-ричное число в десятичное

Проконсультироваться
со специалистом 1С

Консультироваться

Код
cre ate function base36_to_base10 (@base36 char(6))
returns char(10)
as
begin

if @base36 is null return null
if rtrim(@base36)='0' return ' 0'

declare @base10 char(10)
declare @ch char(1)
declare @int int
declare @bigint bigint
declare @len int
declare @por bigint
declare @c int

set @base36=ltrim(@base36)
set @len=len(@base36)
set @por=1
set @bigint=0
set @c=@len

while @c>0
begin
set @ch=substring(@base36,@c,1)

if (@ch<'A')
set @int=ascii(@ch)-ascii('0')
else
set @int=ascii(@ch)-ascii('A')+10

set @bigint=@bigint+@int*@por
set @c=@c-1
set @por=@por
end


set @base10=right(' '+rtrim(cast(@bigint as char(10))),10)
return (@base10)
end


Заказать обратный звонок

Позвонить
Отправлено! В самое ближайшее время наш менеджер свяжется с Вами.