Перенумератор справочников и документов

06.11.11

Задачи пользователя - Перенумераторы

Мастер перенумерации документов и справочников

Скачать файл

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

Наименование По подписке [?] Купить один файл
Мастер перенумерации документов и справочников Доработанный
.epf 12,05Kb
264
264 Скачать (1 SM) Купить за 1 850 руб.

за основу была взята обработка на этом сайте. Я бухгалтер, мне очень помогла

 

Мастер перенумерации справочников и документов (Обычная форма 8.2)

//infostart.ru/public/79546/

 

Далее доработанная, чтобы можно было нумеровать документы с определенного номера. К сожалению, начальная обработка не позволяла перенумеровывать документы в кварталах, кроме первого. Т.е. если РКО в втором квартале нужно перенумеровать, это невозможно слелать, не повредив нумерацию первого, или нужно каждый квартал нумеровать с "1", что не соответствует нормативной базе.

Теперь этих проблем нет.

См. также

Перенумераторы Бухгалтер Пользователь Платформа 1С v8.3 Бухгалтерский учет 1C:Бухгалтерия 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Россия Платные (руб)

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

5500 руб.

11.02.2019    56298    434    194    

72

Перенумераторы Бухгалтер Пользователь Платформа 1С v8.3 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Россия Платные (руб)

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

6000 руб.

18.05.2022    11457    30    0    

25

Перенумераторы Бухгалтер Платформа 1С v8.3 1С:Бухгалтерия 3.0 Абонемент ($m)

Расширение даёт возможность использования трёх различных форматов нумерации для выданных счетов-фактур в пределах дня. Есть возможность заполнения пропусков в номерах, а также учёта префиксов.

3 стартмани

10.02.2025    169    4    Baszilio    0    

1

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

Подменяет типовой нумератор расходных накладных и счетов-фактур на "Префикс"-День+месяц+номер (999), нумерация происходит в течение дня до 999 номера.

2 стартмани

22.01.2025    225    5    Allonos    0    

3

Перенумераторы Бухгалтер Пользователь Платформа 1С v8.3 1С:Бухгалтерия 3.0 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Абонемент ($m)

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

1 стартмани

17.01.2025    342    7    diar01    0    

3
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
0. vxm2365 10 20.11.11 03:22 Сейчас в теме
Мастер перенумерации документов и справочников

Перейти к публикации

1. balabani 20.11.11 03:22 Сейчас в теме
Вот спасибо Очень нужна такая вещь в работе
2. girlochka 25.11.11 03:10 Сейчас в теме
3. Shade 2 25.11.11 10:32 Сейчас в теме
balabani пишет:

Вот спасибо Очень нужна такая вещь в работе



А скажите плиз:
в 8.1 есть версия или только в 8.2?
А то обратная конвертация не работает, а щас приспичило, найти не могу :((((
4. antares_of 11 02.12.11 14:45 Сейчас в теме
давно хотел найти такую обработку, но все никак не мог, очень удобная штука, так как в бухгалтерии 2.0 этого нет, а в 1.6 было, вот и приходится вручную перенумеровывать, а это не очень удобно(
5. пользователь 02.12.11 19:43
Сообщение было скрыто модератором.
...
6. пользователь 02.12.11 19:55
Сообщение было скрыто модератором.
...
7. WarLex 02.12.11 20:19 Сейчас в теме
Спасибо большое, обработка нужная и помогла сэкономить массу времени - вполне можно добавлять в свой повседневный арсенал.
8. пользователь 07.12.11 00:23
Сообщение было скрыто модератором.
...
9. Adoms 152 08.02.12 10:21 Сейчас в теме
хорошая обработка, на захлебывается иногда, например № 25 надо изменить на 5 (по порядку) а номер пять уже есть в след. дате
10. Ariko-sv 22.02.12 09:59 Сейчас в теме
Чего-то не пойму что случилось, как нажала "выполнить", так даже из программы вылетела - это что?
11. Ariko-sv 22.02.12 10:01 Сейчас в теме
Кстати это 8.2 ред 2.0, а на 8.1 все отлично перенумеровало.
12. Ariko-sv 22.02.12 10:04 Сейчас в теме
Видимо потому, что там один документ был удален. Только его убрала, так все отлично пронумеровалось. Спасибо вам большое и прошу свои извенения.
13. PanKir 70 28.05.12 10:09 Сейчас в теме
давно уже сбилась нумерация справочника контрагентов, а всё руки не доходили найти такую обработку
делал свою, но для документов, и то на уровне новичка-программиста 1С, через открытие формы :)
а тут недавно ещё и нумерация договоров сбилась, пришлось отключить автоматическое создание договора при новом контрагенте...

спасибо за обработку, буду тестировать...
14. PanKir 70 28.05.12 15:38 Сейчас в теме
(0)
протестировал, немного сыровата...
дело в том, что когда число переводится в строку, то разделитель между группами становится пробелом, что не есть красиво и хорошо...
всё-таки номер (код) элемента состоит из 9 (или 11) цифр с лидирующими нулями (и префиксом, если надо):
"000004563" но не как не "00004 563" что и выходит в этой обработке...
15. PanKir 70 28.05.12 15:43 Сейчас в теме
предлагаю вставить следующую функцию:
Функция УбратьВнутренниеПробелы(ЧислоСтрокой)
	
	ДлинаСтроки = СтрДлина(ЧислоСтрокой);
	едн = Прав(ЧислоСтрокой, 3);
	Если ДлинаСтроки > 8 Тогда 
		едн = Прав(ЧислоСтрокой, 3);
		ЧислоСтрокой = СокрЛП(Лев(ЧислоСтрокой, ДлинаСтроки-3));
		тыщ = Прав(ЧислоСтрокой, 3);
		млн = СокрЛП(Лев(ЧислоСтрокой, ДлинаСтроки-3));
		Возврат млн+тыщ+едн;
	ИначеЕсли ДлинаСтроки > 4 Тогда 
		едн = Прав(ЧислоСтрокой, 3);
		тыщ = СокрЛП(Лев(ЧислоСтрокой, ДлинаСтроки-3));
		Возврат тыщ+едн;
	Иначе 
		Возврат ЧислоСтрокой;
	КонецЕсли;
	
КонецФункции
Показать


и соответственно:
	тн = УбратьВнутренниеПробелы(тн);

между строками:
	тн = "" + нпп;
	ДлинаКоличестваЭлементов = СтрДлина(тн);

там, где таковые найдутся... (всего три вставки таких)
16. PanKir 70 28.05.12 16:11 Сейчас в теме
(15) PanKir,
маленькое замечание - работал со справочником и забыл что в документах не 9 цифр в коде, а 11, то есть чтобы эта функция хорошо работала для больших баз, где количество документов реально доходит до 11-ти значных чисел надо добавить ещё одно условие на длину кода, а именно:
   Если ДлинаСтроки > 12 Тогда
      едн = Прав(ЧислоСтрокой, 3);
      ЧислоСтрокой = СокрЛП(Лев(ЧислоСтрокой, ДлинаСтроки-3));
      тыщ = Прав(ЧислоСтрокой, 3);
      ЧислоСтрокой = СокрЛП(Лев(ЧислоСтрокой, ДлинаСтроки-7));
      млн = Прав(ЧислоСтрокой, 3);
      млр = СокрЛП(Лев(ЧислоСтрокой, ДлинаСтроки-11));
      Возврат млр+млн+тыщ+едн;
   ИначеЕсли ДлинаСтроки > 8 Тогда 
      едн = Прав(ЧислоСтрокой, 3);
      ЧислоСтрокой = СокрЛП(Лев(ЧислоСтрокой, ДлинаСтроки-3));
      тыщ = Прав(ЧислоСтрокой, 3);
      млн = СокрЛП(Лев(ЧислоСтрокой, ДлинаСтроки-7));
      Возврат млн+тыщ+едн;
   ИначеЕсли ДлинаСтроки > 4 Тогда 
      едн = Прав(ЧислоСтрокой, 3);
      тыщ = СокрЛП(Лев(ЧислоСтрокой, ДлинаСтроки-3));
      Возврат тыщ+едн;
   Иначе 
      Возврат ЧислоСтрокой;
   КонецЕсли;
Показать


вот писал этот код и нашел у себя же опечатку - вычитал все время 3 из длины строки, а нужно ведь каждый раз на 4 больше...
Оставьте свое сообщение