|
v7: нумерация в документе |
☑ |
0
defre315
08.01.13
✎
17:01
|
Всем привет, ребят подскажите плиз, есть документ в котором проставляетяся номер.
начался новый год а нумерация продолжается с прошлого года, нужно что бы нумерация началась с 1-цы
это должно указываться где то в настройках? либо в прописывается в самом документе?
|
|
1
ДенисЧ
08.01.13
✎
17:02
|
в документе периодичность номера год
|
|
2
BlackSeaCat
08.01.13
✎
17:04
|
(1) У автора это явно реквизит документа, а не его номер.
|
|
3
defre315
08.01.13
✎
17:05
|
в переодичности стоит В пределах года
|
|
4
KUBIK
08.01.13
✎
17:07
|
(3) Ваяй процедуру/функцию (см (2))
|
|
5
ДенисЧ
08.01.13
✎
17:07
|
(3) значит, это не номер документа, а самодельный реквизит. Его сам нумеруй.
|
|
6
defre315
08.01.13
✎
17:09
|
Процедура НомерДоверенности()
Док=СоздатьОбъект("Документ.Доверенность");
Док.ОбратныйПорядок(1);
Док.ВыбратьДокументы(НачГода(ДатаДок),КонГода(ДатаДок));
Если Док.ПолучитьДокумент()>0 Тогда
ПредыдущийНомер = Док.Номер;
ДлинаПредыдущийНомер = СтрДлина(СокрЛП(ПредыдущийНомер));
Попытка
НовыйНомер = Строка(Число(ПредыдущийНомер)+1);
Исключение
НовыйНомер = 1;
КонецПопытки;
ДлинаНовыйНомер = СтрДлина(Строка(НовыйНомер));
Если ДлинаНовыйНомер < ДлинаПредыдущийНомер Тогда
Длина = ДлинаПредыдущийНомер;
Иначе
Длина = ДлинаНовыйНомер;
КонецЕсли;
ФорматнаяСтрока = "Ч(0)"+Строка(Длина)+".0";
Номер = Формат(НовыйНомер, ФорматнаяСтрока);
Иначе
Номер = "1";
КонецЕсли;
КонецПроцедуры
|
|
8
KUBIK
08.01.13
✎
17:15
|
+(7) реквизит текстовый? Там можно такое написать...:))))
Сделал бы числовым
|
|
9
Lionee
08.01.13
✎
17:16
|
в (0) ослеп у него номер документа НФ-000002 !
а это резквезит
|
|