Своя нумерация документа.

[Jane Smirnova]

Добрый день. УПП 1.3. Писала доработку для нумерации документа чтобы имело вид Префикс + ДДмм. номер.
Например КА2907.01,КА 2907.02. Единственное что не получается это убрать ведущий 0 после ".". Подскажите,пжл, как это сделать и где.
Должно получится КА2907.1,КА2907.2.

[ef0din]

Добрый день. УПП 1.3. Писала доработку для нумерации документа чтобы имело вид Префикс + ДДмм. номер.
Например КА2907.01,КА 2907.02. Единственное что не получается это убрать ведущий 0 после ".". Подскажите,пжл, как это сделать и где.
Должно получится КА2907.1,КА2907.2.

Если все верно понял, - почему бы не формировать префикс ,как  "КА" + ДДмм, а периодичность нумерации сделать в пределах дня. Ну и длину номера необходимую подобрать.

[Jane Smirnova]

Добрый день. УПП 1.3. Писала доработку для нумерации документа чтобы имело вид Префикс + ДДмм. номер.
Например КА2907.01,КА 2907.02. Единственное что не получается это убрать ведущий 0 после ".". Подскажите,пжл, как это сделать и где.
Должно получится КА2907.1,КА2907.2.

Если все верно понял, - почему бы не формировать префикс ,как  "КА" + ДДмм, а периодичность нумерации сделать в пределах дня. Ну и длину номера необходимую подобрать.

КА - я и ввела как префикс организации в справочнике. ДДмм добавила уже в процедуре "ДобавитьПрефиксОрганизации". потом он выводит порядковый номер.И периодичность день соблюдается. У нас больше 10 реализаций в день бывает.Соответственно количество символом уменьшила так что бы две цифры после "ДДмм." оставалось. и идет нумерация : 01,02,03....но вот приспичило чтобы незначащий 0 не выводился.А убрать его не выходит у меня.

[antoneus]

Код Выделить Развернуть

Префикс + Число(Номер)

где Номер - это "01", "02" и т.д.

[Jane Smirnova]

Код Выделить Развернуть

Префикс + Число(Номер)

где Номер - это "01", "02" и т.д.

Префикс = ПрефиксОрганизации + ПрефиксДата + "." + Число(ДокументОбъект.Номер);

Не сработало так

[antoneus]

Подробнее можно?

[Jane Smirnova]

Подробнее можно?

Код Выделить Развернуть

Процедура ДобавитьПрефиксОрганизации_1(ДокументОбъект, Префикс) Экспорт

// Если в документе нет реквизита "Организация" или для организации не задан префикс,
// то используем пустой префикс, иначе используем префикс организации.
Префикс = "0";

Если ДокументОбъект.Метаданные().Реквизиты.Найти("Организация") <> Неопределено Тогда
ПрефиксОрганизации = ПолучитьЗначениеРеквизита(ДокументОбъект.Организация, "Префикс");
Если ЗначениеЗаполнено(ПрефиксОрганизации) Тогда

ДатаГод = Формат(ДокументОбъект.Дата, "ДФ=ддММ");
        ПрефиксДата = Строка(ДатаГод);
Префикс = ПрефиксОрганизации + ПрефиксДата + ".";
// ---
Иначе
Префикс = ПрефиксОрганизации;
КонецЕсли;
КонецЕсли;

КонецПроцедуры


[antoneus]

Что это? Вижу какую-то отдельную процедуру, в которой переменной Префикс присваивается значение. А дальше что происходит?

[Jane Smirnova]

Что это? Вижу какую-то отдельную процедуру, в которой переменной Префикс присваивается значение. А дальше что происходит?

Код Выделить Развернуть

Процедура ПриУстановкеНовогоНомераДляДокументов_1(Источник, СтандартнаяОбработка, Префикс) Экспорт
ДобавитьПрефиксОрганизации_1(Источник, Префикс);
ДобавитьПрефиксУзла(Префикс);

КонецПроцедуры