Персональный сайт RAVe

Главная | Регистрация | Вход
Вторник, 30.04.2024, 15:16
Приветствую Вас Гость | RSS
Меню сайта
Категории раздела
Обработки для 1С [5]
Обработки для 1С 7.7
Поиск
Cайт поддержи!
ЯндексЯндекс. ДеньгиХочу такую же кнопку
Главная » Файлы » 1C » Обработки для 1С

Convert36To10 для 1С 7.7
[ ] 22.09.2009, 17:27
Сама функция:
 
CREATE FUNCTION Convert36To10(@Val_36 varchar(9)) Returns int
 Begin
  DECLARE @j int, @len int, @Val_10 int
  DECLARE @Arr36 char(36)
  SET @Arr36 = '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
  SET @Val_10 = 0
  SET @j = 1
  SET @Val_36 = LTrim(RTrim(@Val_36))
  SET @len = Len(@Val_36)
  while @j <= @len
  begin
  if @j <> 1
  SET @Val_10 = @Val_10 * 36
  SET @Val_10 = @Val_10 + CharIndex(Substring(@Val_36, @j ,1), @Arr36) - 1
  SET @j = @j+1
  end
  Return @Val_10
 End
 
Вот так она убивается, если существует:
 
if exists (select * from dbo.sysobjects (nolock) where id = object_id(N'[dbo].[Convert36To10]') and xtype in (N'FN', N'IF', N'TF'))
drop function [dbo].[Convert36To10]
 
Вот так получается в запросе время с ее помощью:
 
CONVERT(varchar, DATEADD(ss, dbo.Convert36To10(SUBSTRING(Жур.DATE_TIME_IDDOC,9,6))/10000, 0), 108) as ВремяДок
 
Жур - идентифиактор журнала документов, поменяйте на свой.
 
 
 
Категория: Обработки для 1С | Добавил: rave
Просмотров: 2732 | Загрузок: 0 | Рейтинг: 5.0/3 |
Всего комментариев: 0
Имя *:
Email *:
Код *:
Друзья сайта
  • Лучшая музыка (бесплатно!)
  • Все для веб-мастера
  • Программы для всех
  • Мир развлечений
  • Лучшие сайты Рунета
  • Кулинарные рецепты
  • Статистика

    Онлайн всего: 1
    Гостей: 1
    Пользователей: 0

    Copyright RAVe © 2024 |