|
Получить номер текущего документа в обработке заполнения | ☑ | ||
|---|---|---|---|---|
|
0
prilforreal
07.08.18
✎
16:10
|
Добрый день! Пишу обработку заполнения с формированием кода изделия, частью кода будет номер документа, смотрю отладчиком, номер все время нулевой, как решить вопрос?
Функция ПолучитьКод(Код="") Экспорт Номер=ЭтотОбъект.Номер; Если НЕ ЗначениеЗаполнено(Дилер) тогда Предупреждение("Заполните Дилера.",15); возврат ""; иначе если ДляКода=9 Тогда Предупреждение("Исчерпан набор кодов для документа.",15); возврат ""; иначеесли не значениезаполнено(Код) тогда ДляКода=ДляКода+1; Код1=Строка(Число(""+Константы.ОбщийПрефикс.Получить()+Константы.ПрефиксUV.Получить())); длинаКод=СтрДлина(""+Число(Дилер.Код))+1; Для ии=длинакод По 4 Цикл Код1=Код1+"0"; КонецЦикла; код1=код1+Формат(Число(Дилер.Код),"ЧГ=0"); длинаКод=СтрДлина(Формат(Число(Номер),"ЧГ=0"))+1; код1=код1+СокрЛП(Формат(Число(Номер),"ЧГ=0"))+ДляКода; возврат код1; иначе Код1=Строка(Число(""+Константы.ОбщийПрефикс.Получить()+Константы.ПрефиксПотолка.Получить())); длинаКод=СтрДлина(""+Число(Дилер.Код))+1; Для ии=длинакод По 4 Цикл Код1=Код1+"0"; КонецЦикла; код1=код1+Формат(Число(Дилер.Код),"ЧГ=0"); длинаКод=СтрДлина(Формат(Число(Номер),"ЧГ=0"))+1; Для ии=длинакод По 5 Цикл Код1=Код1+"0"; КонецЦикла; код1=код1+СокрЛП(Формат(Число(Номер),"ЧГ=0"))+Прав(Код,1); возврат код1; конецесли; конецесли; конецфункции |
|||
|
1
Amra
07.08.18
✎
16:12
|
Документ не записан, а присваивание номера идет в момент записи. От этого и пляши
|
|||
|
2
prilforreal
07.08.18
✎
16:16
|
(1) Спасибо! Тогда возьму код документа основания =)
|
|||
|
3
Serg_1960
07.08.18
✎
16:22
|
Детский сад, штаны на лямках :)
|
|||
|
4
Serg_1960
07.08.18
✎
16:26
|
Бессмысленное занятие наделять каки-то левым смыслом номера документов и коды справочников. Тем более бессмысленно, если Вы не собираетесь далее их поддерживать в алгоритмах.
|
| Форум | Правила | Описание | Секции | Поиск |