|
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) Точно ты сказал за цикл, совсем я сдурел. Спасибо.
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |