|
О присвоении нового номера документа
| ☑ |
0
Wersia
23.07.14
✎
16:58
|
Добрый лень. Вот такая задача передо мной стоит: разграничить номера документов по пользователям и префиксам контрагентов. То есть: есть менеджеры, которые катают по стране и впаривают свой товар. Они едут с копией базы и у них естественно создаются документы, которые в живой базе на момент загрузки базы менеджера уже есть.
Решили озадачить и сделать пользователя Менеждер, у которого создавались бы документы с еще одним префиксом М. Получается, что у рядового сотрудника создавался бы документ: префикс ЮДК + номер ( ну что-то типа ЮДК00587, а у менеджера было бы ЮДК+ префика=с менеджера + номер: ЮДКМ0001.
Но вот беда: если сделать док с номером ЮДКМ0001, то все последующие( независимо от пользователя) пойдут с префиксом ЮДКМ, тк по префиксу ЮДК он ищет последний номер, коим является М0001 и создает следущую нумерацию. У кого есть мысли как от этого избавиться?
Процедура об_ПрисвоитьНомерДокумента(ЭтотОбъект) Экспорт
Если СокрЛП(ЭтотОбъект.Автор.Код) = "Менеджер" тогда
ДопПрефикс = "М";
Иначе
ДопПрефикс="";
КонецЕсли;
Если НЕ ЭтотОбъект.Организация.Пустая() Тогда
Ответ = Вопрос("Номер документа делать с префиксом?",РежимДиалогаВопрос.ДаНет);
Если Ответ=КодВозвратаДиалога.Да Тогда
ЭтотОбъект.УстановитьНовыйНомер(""+СокрЛП(ЭтотОбъект.Организация.Префикс)+ДопПрефикс);
Иначе
ЭтотОбъект.УстановитьНовыйНомер(""+ДопПрефикс+"0");
КонецЕсли;
Иначе
Если ТипЗнч(ЭтотОбъект.Ссылка)=Тип("ДокументСсылка.Корректировка_реализации") тогда
ЭтотОбъект.УстановитьНовыйНомер("К"+ДопПрефикс);
иначе
ЭтотОбъект.УстановитьНовыйНомер(""+ДопПрефикс+"0");
КонецЕсли;
КонецЕсли;
КонецПроцедуры
|
|
1
YFedor
23.07.14
✎
17:01
|
Для всех сделайте префикс ЮДК0
|
|
2
Alex S D
23.07.14
✎
17:04
|
а почему нельзя отсечь все буквы?
|
|
3
Лефмихалыч
23.07.14
✎
17:06
|
1. пусть ездят не с копией базы, а с периферийным узлом. Соответственно а префиксе - код узла.
2. пусть ездят с планшетами и юзают вебклиент в центральной базе. Невозбранно.
|
|
4
Alex S D
23.07.14
✎
17:08
|
да пусть вообще не ездят.. че там мелочиться
|
|
5
Wersia
24.07.14
✎
08:58
|
(2) Эти префиксы для бухов делали когда-то, поэтому если я предложу от них отказаться, то меня на флаг англицкой порвут (3) Им на поездки не дают модемов( Лишние траты)))
(4) Тоже был бы очень рад, но...
(1) Идея, спасибо, попробую развить
|
|
6
Любопытная
24.07.14
✎
09:00
|
(5) А модемы им зачем? Фигачат в своей переферийке документы, по приезду обмениваются с центром и все.
|
|
7
Wersia
24.07.14
✎
10:10
|
(6) А не получится так что когда они обменяются, то их документы ЮДКМ___ будут основанием для последующих доков в главном узле?
И еще вопрос: Создали документ с префиксом ЮДК и вроде бы должен быть новый номер Юдк00645, но он ставит юдкМ0008, хотя все документы с ЮдкМ я переделал просто на Юдк. Где хранится инфа о следующем номере создаваемого документа, как его исправить?
|
|
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший