|
v7: Ликвидация необоротных активов - обновить код
| ☑ |
0
sivsoft
19.06.14
✎
13:14
|
Доброго времени суток!
Есть документ ликвидация необоротных активов, там кроме самих активов из справочника есть поле код этого актива. Они сейчас пустые. Если в документе перевыбрать сам актив, то все нормально и код проставляется в это поле, но так муторно и очень долго.
Написал короткую обработку. Но почему-то даже
Сообщить(ЛиквидацияНАктивов.НеоборотныйАктив);
не показывает название.
Такое впечатление, что его там нет. Но он есть, если зайти в док и есть если его выбрать.
Каким способом проставить эти кода в обработке?
|
|
1
Бовка
19.06.14
✎
13:23
|
(0) код покажи
|
|
2
Pit0n_08
19.06.14
✎
13:25
|
Для начала...
ЛиквидацияНАктивов = СоздатьОбъект("Документ.ЛиквидацияНАктивов");
ЛиквидацияНАктивов.ВыбратьДокументы(НачДата,КонДата);
Пока ЛиквидацияНАктивов.ПолучитьДокумент() = 1 Цикл
Сообщить(СокрЛП((ЛиквидацияНАктивов.НеоборотныйАктив.Наименование));
КонецЦикла;
|
|
3
Pit0n_08
19.06.14
✎
13:26
|
+(2) Так работает?
|
|
4
Pit0n_08
19.06.14
✎
13:27
|
+(2)
Сообщить(СокрЛП(ЛиквидацияНАктивов.НеоборотныйАктив.Наименование));
|
|
5
Pit0n_08
19.06.14
✎
13:28
|
Это если НеоборотныйАктив - реквизит шапки.
|
|
6
sivsoft
19.06.14
✎
13:30
|
ЛиквидацияНАктивов = СоздатьОбъект("Документ.ЛиквидацияНеоборАктивов");
ЛиквидацияНАктивов.ВыбратьДокументы(ВыбДата1,ВыбДата2);
НеоботАктив = СоздатьОбъект("Справочник.НеоборотныеАктивы");
Пока ЛиквидацияНАктивов.ПолучитьДокумент() = 1 Цикл
Сообщить(ЛиквидацияНАктивов.НеоборотныйАктив);
Если НеоботАктив.НайтиПоНаименованию(ЛиквидацияНАктивов.НеоборотныйАктив,0,1) = 1 Тогда
Сообщить("Нашел!");
КонецЕсли;
ЛиквидацияНАктивов.НеоборотныйАктивКод = ЛиквидацияНАктивов.НеоборотныйАктив.Код;
Сообщить(НеоботАктив.ТекущийЭлемент().Код);
ЛиквидацияНАктивов.Провести();
КонецЦикла;
Вот мой код. В общем-то одно и тоже. Но не работает.
НеоборотныйАктив - это табличное поле.
|
|
7
Pit0n_08
19.06.14
✎
13:36
|
1. Для табличного поля нужен цикл по строкам документа.
2. Поле Код - это отдельный реквизит ТЧ? Обычно такие доп поля выводятся как текст с функцией НеоборотныйАктив.Код
|
|
8
Pit0n_08
19.06.14
✎
13:38
|
3. Если НеоботАктив.НайтиПоНаименованию(ЛиквидацияНАктивов.НеоборотныйАктив.Наименование,0,1) = 1 Тогда
|
|
9
Pit0n_08
19.06.14
✎
13:58
|
(6) Ну и ЛиквидацияНАктивов до поведения желательно ЛиквидацияНАктивов.Записать()
|
|
10
sivsoft
19.06.14
✎
13:59
|
(7) Точно ты сказал за цикл, совсем я сдурел. Спасибо.
|
|