Перенумерация Справочников или Документов

24.10.07

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

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование		Бесплатно
ПеренумерацияДокументовиСправочников.zip .1186323662 18,34Kb 3640	3640	Скачать бесплатно

1. Обработка позволяет Перенумеровать выбранный вид документа за период
2. Обработка позволяет Перенумеровать выбранный вид справочника
(Очень полезно когда сбивается автоматическая нумерация, при ошибках пользователей)

Если понравилось не забывайте поставить плюсик.
Благодарность можно выразить также взносом на рублевый кошелек WebMoney R113239341929 или Яндекс.Деньги 41001157467930 (через платежный терминал, например...)

+164 –

См. также

Перенумерация документов для Бух 7.7

Перенумераторы Бухгалтер Пользователь Бухгалтерский учет 7.7 1С:Бухгалтерия 7.7 Бухгалтерский учет Абонемент ($m)

Данная обработка выполняет перенумерацию (присвоение новых номеров документам) в Бухгалтерии предприятия 7.7 за выбранный период.

1 стартмани

01.07.2021 4595 4 Ant10 0

Проставление номеров в уже созданных значениях свойств после добавления нумерации. 1С: ТиС 7.7

Логистика, склад и ТМЦ Перенумераторы Программист Оперативный учет 7.7 1С:Торговля и склад 7.7 Управленческий учет Абонемент ($m)

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

1 стартмани

04.07.2019 8442 0 Drfreeman 3

Перенумерация документов для 1С:Бухгалтерии 7.7

Перенумераторы Бухгалтер Платформа 1С v7.7 1С:Бухгалтерия 7.7 Бухгалтерский учет Абонемент ($m)

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

1 стартмани

07.11.2017 14763 17 Юлия69 0

Перенумерация справочников и документов для 1С: 7.7

Перенумераторы Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

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

1 стартмани

03.08.2016 25975 124 ak_register 8

Восстановление нумерации

Перенумераторы Системный администратор Программист Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

Простая обработка по восстановлению нумерации в документах и справочниках.

1 стартмани

11.04.2015 16543 12 maksa2005 1

Ренумерация любых документов и справочников с учетом префикса

Перенумераторы Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

С помощью этой обработки можно перенумеровать любой справочник или документ, входящий в состав программ 1С: Предприятие 7.7

1 стартмани

24.04.2014 4242 11 tatyana1604 1

Универсальная обработка для перенумерации справочников

Перенумераторы Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

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

1 стартмани

06.04.2013 4243 64 sweeper7 6

Изменение нумерации с начала года

Перенумераторы Программист Бухгалтер Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

Обработка позволяет исправить нумерацию документов с периодичностью в течении года.

1 стартмани

24.01.2013 4276 37 sp1406 1

Комментарии

Подписаться на ответы Инфостарт бот

Свернуть все

1. CheBurator 2712 06.08.07 00:59 Сейчас в теме

Чем лучше штатной обработки, размещаемой на дисках ИТС?

2. snarkelun 252 07.08.07 10:01 Сейчас в теме

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

4. CheBurator 2712 07.09.07 12:37 Сейчас в теме

(2)
1. ну и что? преимущество сомнительное...
2. а если мешающий номер будет лежать вне заданного периода - что будет в случае "нарушения уникальности"?
3. это надо проверить..
4. это да, может пригодится... но тоже сомнительно...

14. snarkelun 252 22.10.07 06:07 Сейчас в теме

(4)
Если мешающий номер будет лежать вне заданного периода: две возможности 1) расширить период, 2) номер будет пропущен

3. easy_dee 17.08.07 11:21 Сейчас в теме

спасибо, за обработку....)))

5. CheBurator 2712 07.09.07 12:39 Сейчас в теме

ТипНомера = СокрЛП(Метаданные.Справочник(ВидСправочника).ТипНомера);
{C:\ПЕРЕНУМЕРАЦИЯДОКУМЕНТОВИСПРАВОЧНИКОВ\ПЕРЕНУМЕРАЦИЯСПРАВОЧНИКОВ000000.ERT(37)}: Поле агрегатного объекта не обнаружено (ТипНомера)

6. Esperance 20.10.07 15:48 Сейчас в теме

Ответ Сhe Burashke: в модуле вместо указанной строчки написала ТипНомера= "Текстовый"; и все работает, автору спасибо большое!

8. poppy 21.10.07 01:07 Сейчас в теме

(6)
Esperance, на справочнике с числовым кодом и выбраным префиксом проверяла?

У O-Planet'а в похожей ситуации аналогичная обработка вообще подвисает.

7. CheBurator 2712 20.10.07 23:24 Сейчас в теме

смотрим сюда. на всякий случай...
http://www.infostart.ru/articles/242/

9. Abadonna 3968 21.10.07 04:38 Сейчас в теме

>ТипНомера = СокрЛП(Метаданные.Справочник(ВидСправочника).ТипНомера);
Вредный ты, Чебур ;) Описка у автора, полагаю...
Надо
ТипНомера = СокрЛП(Метаданные.Справочник(ВидСправочника).ТипКода);
>в модуле вместо указанной строчки написала ТипНомера= "Текстовый"; и все работает, автору спасибо большое!
Да уж... А в следующий раз ТипНомера= "Числовой" писать будешь?

10. Abadonna 3968 21.10.07 05:00 Сейчас в теме

Код
Процедура ПриСменеВидаСправочника() //............................ ТипНомера = СокрЛП(Метаданные.Справочник(ВидСправочника).ТипКода); Если ТипНомера="Числовой" Тогда Форма.ПрефиксШаблона.Доступность(0); ПрефиксШаблона=""; КонецЕсли; //............................... КонецПроцедуры Показать полностью

Код

Процедура ПриСменеВидаСправочника()
   //............................
       ТипНомера = СокрЛП(Метаданные.Справочник(ВидСправочника).ТипКода); 
   Если  ТипНомера="Числовой" Тогда
      Форма.ПрефиксШаблона.Доступность(0);
      ПрефиксШаблона="";
   КонецЕсли;
       //...............................
КонецПроцедуры

Показать полностью

Вот так надо, во избежание...

11. Abadonna 3968 21.10.07 05:08 Сейчас в теме

(10) Сам чуток лопухнулся.. :)

Код
Если ТипНомера="Числовой" Тогда Форма.ПрефиксШаблона.Доступность(0); ПрефиксШаблона=""; Иначе Форма.ПрефиксШаблона.Доступность(1); КонецЕсли; Показать полностью

Код

Если  ТипНомера="Числовой" Тогда
      Форма.ПрефиксШаблона.Доступность(0);
      ПрефиксШаблона="";    
   Иначе
      Форма.ПрефиксШаблона.Доступность(1);
КонецЕсли;

Показать полностью

И на фига мне последовательность справочников, как они в конфе идут? Неудобно!
Надо добавить: ВидыСпр.Сортировать();

12. CheBurator 2712 21.10.07 14:52 Сейчас в теме

я не вредный, я - дотошный.. это значит до тошноты вредный...

16. poppy 23.10.07 22:52 Сейчас в теме

(12)
> я не вредный, я - дотошный.. это значит до тошноты вредный...

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

Извини, навеяло... ;)

13. snarkelun 252 22.10.07 05:29 Сейчас в теме

Исправлены ошибки, учтены пожелания.
Особые благодарности Abadonna +1, Сhe Burashka (я тоже ДоТошный).

15. poppy 23.10.07 08:43 Сейчас в теме

Хороший алгоритм перенумерации. Однако, при определенных исходных данных можно получит ошибку:
ДокуменДляПеренумерации.Записать();
{С:\ПЕРЕНУМЕРАЦИЯДОКУМЕНТОВ.ERT(234)}: Номер не уникальный!

Например. В выбранном периоде имеется 7 документов. Исходные номера - с префиксами. Задаем префикс = "1", длина шаблона = 1.

17. snarkelun 252 24.10.07 06:55 Сейчас в теме

Добавлена проверка на правильность шаблона.
Плюс некоторые внешние усовершенствования.

22. poppy 25.10.07 19:19 Сейчас в теме

(17)
> Добавлена проверка на правильность шаблона.

Бяка. Стало хуже. ИМХО неоправданные ограничения для получения сомнительного результата.

18. Shaman100M 1151 24.10.07 09:07 Сейчас в теме

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

Функция ПроверкаВЗаблокированныхДокументах() поиск номера осуществлен перебором списка. Имхо, лучше обрезать пробелы в значениях в списке сразу и использовать НайтиЗначение(). Еще метода, - на порядок быстрее будет искать в строке, сделав предварительно ВСтрокуСРазделителями().

19. magus 24.10.07 14:32 Сейчас в теме

На поле ввода ПрефиксШаблона логичнее повесить процеудру ПроверкаПравильностиШаблона(), но не ПриВводеДлинаШаблона()

Кнопки Закрыть() не хватает.

20. magus 24.10.07 14:36 Сейчас в теме

Еще предложение. Вместо кода

Код
Синоним = СокрЛП(Метаданные.Документ(Индекс).Синоним); Идентиф = СокрЛП(Метаданные.Документ(Индекс).Идентификатор); Если Синоним="" Тогда Синоним = Идентиф; КонецЕсли; Показать полностью

Код

   Синоним = СокрЛП(Метаданные.Документ(Индекс).Синоним);
   Идентиф = СокрЛП(Метаданные.Документ(Индекс).Идентификатор);
   Если Синоним="" Тогда
      Синоним = Идентиф;
   КонецЕсли;

Показать полностью

Можно написать:

Код
Синоним = СокрЛП(Метаданные.Документ(Индекс).Представление()); Идентиф = СокрЛП(Метаданные.Документ(Индекс).Идентификатор); Показать полностью

Код

   Синоним = СокрЛП(Метаданные.Документ(Индекс).Представление());
   Идентиф = СокрЛП(Метаданные.Документ(Индекс).Идентификатор);

Показать полностью

21. magus 24.10.07 14:46 Сейчас в теме

По какому признаку были выбраны недопустимые симовлы?

Проверка шаблона нужна только для предупреждения пользователя или для его ограничения?

Если перед шаблоном поставить пробелы, то проверка незаметит запрещенные символы. Например шаблон "~" проверку не пройдет, но " ~" пройдет успешно.

23. anton905 08.01.08 22:03 Сейчас в теме

Спасибо! помогло - времени нет и эта обработка очень кстати!!

24. shard 281 15.02.08 12:12 Сейчас в теме

а в чем отличие по функционалу от стандартного комплекса обработок UChoice?

26. rabanik 2 25.03.08 00:35 Сейчас в теме

Спасибо ОГРОМНОЕ очень помогла!!!!!

27. karbofos 29.04.08 18:56 Сейчас в теме

Пришлась оченьно к стати. Самому было лениво писать. А юэеры такого понаписали за то время пока я в отпуске был.
В общем Спасибо.

28. GSoft 2237 07.08.08 16:00 Сейчас в теме

спасибо за лелеяние моей лени )))))

29. cheri 26.11.08 12:39 Сейчас в теме

Спасибо огромное!!! Прекратились мои мучения по перенумерации вручную.

30. Мартовский_котя 24.02.09 18:32 Сейчас в теме

надо добавить фирму.... в перенумерцию по документам у многих на разные фирмы разные префиксы и разные номера а он зараза их под одну греьенку

31. NaidaM 25.04.09 11:07 Сейчас в теме

Очень удобная обработка...
афтару +1

32. Automatik 959 24.09.10 10:01 Сейчас в теме

Отсортируйте список видов, добавьте описание. Плюсую.

33. vilkomaudit 21.11.10 01:24 Сейчас в теме

Извините, а я могу такую обработку по перенумерации рко и пко получить, очень нужно... :)

34. po.l.i 20.01.11 15:36 Сейчас в теме

почему-то при перенумерации в документе количество символов в номере 7
у себя я поправил так:
// Для КолвоЗнаков = 1 По ДлинаШаблона-СтрДлина(СокрЛП(ПрефиксШаблона))-СтрДлина(Строка(МаксНомер)) Цикл
Для КолвоЗнаков = 1 По ДлинаШаблона-СтрДлина(Строка(МаксНомер)) Цикл

35. Сашулик 10.03.11 18:06 Сейчас в теме

В свете Украинских изменений в налоговом законодательстве-хорошая обработка плюсую однозначно!

36. Tristania 21.09.11 09:40 Сейчас в теме

Спасибо большое!

37. NewYork 03.10.11 00:34 Сейчас в теме

мнее подошло за что автору спасибо) конечно давняя обработка но сработала)

38. Markin 06.10.11 12:49 Сейчас в теме

Спасибо большое!

39. revril 20.10.11 11:29 Сейчас в теме

спасибо))очень пригодилась))

40. TrinitronOTV 16 27.10.11 15:03 Сейчас в теме

dgamelya пишет:

спасибо))очень пригодилась))

я тоже присоединяюсь....

41. tgnike 08.11.11 12:32 Сейчас в теме

То что надо!!

42. mkobzancev 1 12.12.11 19:12 Сейчас в теме

Респект автору

43. m-xolding 26.01.12 12:06 Сейчас в теме

Спасибо автору! Очень удобно, если документы вводятся не по порядку по датам, можно в любой момент, в пределах отчета, перенумеровать. За исключением уже выписанных документов для клиентов.

44. MoonAriman 12 27.01.12 16:46 Сейчас в теме

Что-то я не понимаю... Максимальная длина кода справочника - 8, а он дает с учетом префикса сделать максимум 7. Разряд теряет, что меня совсем не устраивает. Но за скорость работы - плюс.