Всем добра.
Есть база с большим количеством номенклатуры, кто то писал механизм генерации короткого 5 значного кода, но проблема в том что справочник очень большой и новый код генерируется больше 5 минут.

Текущий алгоритм формирования мягко сказать не особо производительный

    Пока 1=1 Цикл
        Если СпрНом.НайтиПоРеквизиту("НомКод",НовыйНомер,1)=1 Тогда
            Если ФлагСпецГруппы=1 Тогда
                ПредНомер         = ПредНомер+1;
                НовыйНомер         = ПредНомер + 1;
                ДлнНовыйНомер     = СтрДлина(НовыйНомер);
                НовыйНомер         = Лев("М00000000",9-ДлнНовыйНомер)+НовыйНомер;
            Иначе
                ПредНомер         = Число(ПредНомер) + 1;
                НовыйНомер         = СокрЛП(Строка(Число(ПредНомер) + 1));
                ДлнНовыйНомер     = СтрДлина(НовыйНомер);
                НовыйНомер         = Лев("00000",5-ДлнНовыйНомер)+НовыйНомер;
            КонецЕсли;
        Иначе
            Сообщить("Новый код: "+НовыйНомер);
            Прервать;
        КонецЕсли;
    КонецЦикла;

Так же в базе существует много промежутков . Например 00022 - 00025  еще 2 номера не использованы.
Были мысли создать еще справочник в котором хранить диапазоны пустых значений. При записи номенклатуры брать оттуда значения и тут же его удалять. Если справочник диапазонов пустой - брать последний номер номенклатуры + 1.
Как бы вы оптимизировали данный процесс?

(0) С помощью прямого запроса получить МаксимальныйНомер, как обычно в 8-ке делают. На промежутки забить.

я бы завел две константы.. присвоил каждой максимальный код из существующих.
новый номер брал из константы и увеличивал на один.
новый номер потом записывал в константу

посчитай прямым запросом...
способы генерации таблицы с числами "от и до" есть на инфостарте
затем правое соединение, и иснулл

(1) максимальный номер у него и так считает платформа

(4) нет.. там две последовательности кодов

(0) Примерно так:
//*******************************************
Функция ПолучитьНовыйКод(Префикс="")
    СтрДлинаКода = 9 - СтрДлина(Префикс);
    МаксКод = Число(Лев("999999999",СтрДлинаКода));
    СпрНом = СоздатьОбъект("Справочник.Номенклатура");
    СчетчикЦикла = 0;
    Для СчетчикЦикла = 1 По МаксКод Цикл
        НовыйКод = Формат(СчетчикЦикла,"Ч(0)"+СтрДлинаКода);
        Если СпрНом.НайтиПоКоду(Префикс+НовыйКод,0) = 0 Тогда
            Сообщить("Новый код: "+Префикс+НовыйКод);
        КонецЕсли;
    КонецЦикла;
КонецФункции;

извращенство какое то

(7) Есть более правильный путь один раз сделать перенумерацию существующих элементов справочника, но видимо кому то хочется растянуть "удовольствие" :)

(8) перенумерацию можно делать если код не используется для обменов и прочего..
очень смелое решение взять и сделать перенумерацию не зная подробностей)))))))

(9) Очень смелое решение использовать код для идентификации в обменах :)

забить на пропуски.
код это вообще просто ид некий (да и то нестабильный). требовать от Ида последовательности - имхо как-то излишне.
.

(11) И что делать пользователям, про прямоту их рук говорить не будем, если у них новый код выходит "9", "99", "999", "9999" и пр.?

(12) разрядность , длину низя что ле увеличить ?

(8) Там сеть магазов используют этот код для поиска.
Завопят все и в один голос если перенумеровать.

(0) выкинуть код из (0), научиться использовать префиксы и не забивать себе голову ерундой про промежутки...

(12) застрелиться ;-)
если код юзается для синхронизации - то раньше надо было думать чтобы обеспечить достаточный диапазон для значений. самое первое тривиальное действие - запретить изменение кода вручную. а так - ССЗБ.

(15) Префиксы используются в основном коде.
А это так сказать короткий

(16) Для синхронизации он не используется.

По нему просто быстро ищут товар

(13) А чем разрядность поможет? Код "999" пользователь может вбить и при 9ти-значной разрядности.

(19) Код основной идет с префиксом
И вводить их неудобно

Так давно у них

(18) уроды, ССЗБ.
текущие коды перенести в АРТИКУЛ.
перенумеровать и не трахать себе мозг.

(21) Функцию из (6) попробовал?

(17) зачем номенклатуре ДВА уникальных идентификатора? ))

(23) Нет еще. Не на месте.

(24) Не я это придумал. ХЗ зачем.
Говорю же ...подбор делают по коротким кодам

(26) так перед тем, как что-то исправлять, надо понять
- ЗАЧЕМ это сделано?
- ПОЧЕМУ это сделано именно так?

и только получив ответы на эти вопросы, мчаться с шашкой наголо

(27) Согласитесь . Легче ввести 00025 или 683222 . Чем PS0000082, KT0000121 и т.д

(27) ну так он и не хочет "исправлять", он пытается решить локальную проблему "быстрое получение свободного кода".

(29) Просто если запустить им все и перенумеровать глобально они не будут находить товар. Начнется ахтунг.
У них на ценниках эти коды распечатываются. Начнется дичайший пересорт

Меня съедят просто

(29) пф.... это непрофессиональный подход

(28)
- Петька, прибор !?!?!???
-- Двадцать!
- чо "двадцать"??
-- а чо "прибор"?
©
иногда легче знать "код в группе".
но все зависит от процессов...

(32) профессиональный подход - это устранить затык (чтоб не вставала текущая работа в текущем виде), а затем "делать правильно".

(0) Интересно сколько всего номенклатуры в справочнике, что только первый пустой номер ищется целых 5 минут

(0) Если стоит задача найти пропуски кодов и кода исключительно цифровые, то можно выбрать все кода в отсортированную коллекцию значений и искать пропуски бинарным поиском (сравнивая код "по порядку" и код "по факту").

(0) "генерации короткого кода с заполнением пропущенных кодов" - работа ради работы? Зачем это нужно?

(28) а кто с этим спорит? просто зачем тогда тебе длинный код, если его никто не использует и короткий является уникальным?

(33) это софистика... у него и сейчас все работает, по крайней мере в (0) обратного не утверждается.

лень читать.
индексировать НомКод предлагали же уже?

(38) неа.. ты первый

(34) 50 000

(40) поставь фузион из соседний ветки и забудь )))

(40) Выбираешь все 50 000 кодов в отсортированную колекцию значений и смотришь какой код у элемента под номером 25000. Если он больше 25000, значит в промежутке кодов 1-2500 есть пропуск, если меньше, то пропуск в промежутке 25001-50000. Повторять нарезку пополам, пока не найдёшь пропуск.

(42) Типа бинарный поиск?

(43) Типа его. Всяко лучше чем сыпать запросами на проверку каждого кода в справочнике.

(42) Не пойдет, у автора могут быть и какие-то ФлагСпецГруппы
(0) select min(Spr.Code) from $Справочник.Номенклатура as Spr left join $Справочник.Номенклатура as Spr1 on Spr.Code=Spr1.Code+1 where Spr1.Code Is Null

(45) Идеи крутые.
С запросом интересно. Вот только поле то строковое, а в запросе + 1 . Вероятно будет конкатенация.

(45) Флаг СпецГруппы это отдельный диапазон кодов с префиксом М и он 9 значный. Нас интересует все остальное что не входит в  спецгруппу.

(46) Х.з. с чем вы там балуетесь, если dbf и 1sqlite, то
select cast(spr.code as int) as Code into #tmp from Справочник_Номенклатура as spr; //<-- тут можно через substr отрезать лидирующие префиксы
select min(Spr.Code) from #tmp as Spr left join #tmp as Spr1 on Spr.Code=Spr1.Code+1 where Spr1.Code Is Null

Пишу прямой запрос на скуле...    
|Select                    
   |      case
   |        when
   |            LEFT(Спр.SP7835,1)='М'
   |        then
   |            CAST(SUBSTRING(Спр.SP7835,CHARINDEX('0',Спр.SP7835,0),LEN(Спр.SP7835)) as int)    
   |        else                                                                                
   |            CAST(Спр.SP7835 as int)    
   |    end as NomCode  
   |INTO #TBL
   |FROM
   |     $Справочник.Номенклатура as Спр      
   |    
   |WHERE    
   |    LEFT(Спр.SP7835,1)!='М'
   |        
   |ORDER BY    
   |    NomCode;
   |
   |Select * FROM #TBL
   |

Но проблема в том что при однократном создании, временная таблица создается, а при повторном вылазит ошибка. Что объект уже есть. Я так понимаю в tempdb и второе ... в этому же запросе второй раз SELECT к временной таблице не работает.  Нужно делать второй запрос.
ЗЫ: Проверил после создания временной таблицы и потом обратившись только к ней.

Как быть в моем случае? Гуру скулей подскажите?  Делать подзапрос?

drop table #TBL

Собираешь самый большой справочник из всех баз. делаешь сводную таблицу старый код-новый код. Делаешь обработку которая переномеровывает согласно данной таблице справочник. Запускаешь обновление кодов во всех базах.

(51) ... затем перепечатываешь все ценники, паспечатыаешь и отправляешь во все филиалы, соотвествующие базам. И заставляешь всех операторов перезапомнить коды.
делов-то....
:-)

(52) На ценники нужно печатать штрихкод, а не внутренний код.

(53) ...и каждому покупателю давать сканер штрих-кода. в подарок.

(53) Заведен внутренний код, я не собираюсь им что то переделывать. Одно время они использовали сканеры ШК. Но почему то предпочли коды. ХЗ.

Специфика организации большой ассортимент металлопроката и крупногабаритных товаров которые на кассу не доставишь. Понятно можно завести тетрадь со ШК но видимо им так удобнее.Пусть робят так

млин, ну поставлен у людей БП так, что на ценнике в торговом зале напечатан короткий код. короче, чем штатный код - чтоб было быстрее вводить. и покупатель ходящий по залу, кричит продавцу - "32345 - одын штюка, 78512 - тры штюка, сёё!"
или пишет на бумажке, и затем подходит и диктует. а некоторые ходовые позиции запомнены продавцом наизусть, чтоб не посылать покупателя повторно по залу. схема более чем частая в магазинах метизов, электрики, отделочных материалов, радиодеталей.
вполне имеет право на жизнь.
я вообще не понимаю проблем ТС - решение ему дали еще вчера...

(57)
Вы все верно сказали. Браво!!!

Занимаюсь реализацией) возникли небольшие трудности с реализацией запросов. Разбираюсь

Быстрый код-это,обычно,отдельный справочник и его элементы привязываются к номенклатуре,причем,не всегда к одной(тогда касса просит выбрать)и,со временем,привязку можно менять,если меняется товар.
непривязанные элементы можно считать свободными.
если кассовая программа не умеет быстрые коды,то они выгружаются как штрихкоды,можно ч префмксом,тогда на клавиатуре нужно кнопку макроса программировать.
в каждом магазине быстрый код свой.
первую сотню,обычно,на наиболее частый товар.
можно делать несколько групп быстрых кодов,если использовать наклейки разных цветов,получается очень удобно для разных групп товаров.

Если есть куча баз то не факт, что дырка в 1 базе является дыркой в другой и в результате занятия дырок не получиться, что при экспорте труба не превратиться в лист и т.п.

(60) База распределенная.

При создании нового элемента в параллельном потоке запускаешь поиск свободного кода. Пока пользователь заполнит данные новой карточки свободный код найдется.

(60) факт.прицентрализованном вводе факт

Всем спасибо господа.
С небольшими доработками идея реализована.
SQL рулит бесспорно.
Результат формирования кода на прямых запросах = 1 сек.

(48) Отдельное спасибо . Взята ваша идея за основу

А вот и сам текст запроса для SQL базы

    |Select  
    |    MAX(OneQuery.NomCode)   as max_number,
    |    MIN(OneQuery.NomCode-1) as result
    |FROM
    |    (Select                    
    |        CAST(Спр.SP7835 as int)    as NomCode
    |    FROM
    |         $Справочник.Номенклатура as Спр      
    |    WHERE    
    |        LEFT(Спр.SP7835,1)!='Ì' and Спр.IsFolder = 2
    |    ) as OneQuery
    |
    |LEFT JOIN
    |
    |    (Select                    
    |        CAST(Спр.SP7835 as int) as NomCode    
    |     FROM
    |         $Справочник.Номенклатура as Спр      
    |    WHERE    
    |        LEFT(Спр.SP7835,1)!='Ì' and Спр.IsFolder = 2
    |    ) as OneQuery2  
    |
    |    ON OneQuery.NomCode = OneQuery2.NomCode+1
    |WHERE        
    |    OneQuery2.NomCode Is Null  and OneQuery.NomCode!=0
    |";

(66) Маленькое замечание - если уж используешь 1С++, то можно вместо Спр.SP7835 использовать $Спр.ТвойРеквизитСКодом