Имя: Пароль:
1C
 
Выбор конкретного реквизита из ТЧ
0 TataRus
 
10.11.21
14:57
Добрый день. Имеется внешняя обработка, в которой реализован выбор Договоров Контрагента из различных мест документа. Всё работает, но не так, как нужно. А нужно, чтобы при переборке табчасти ВидыСубконто, если среди видов субконто есть ДоговорыКонтрагентов, запоминался номер строки с этим видом субконто, и, если этот номер не 0, тогда получить значение реквизита документа СубконтоКт с номером равным номеру субконто ДоговорыКонтрагентов. И ещё, как сделать проверку на пустое значение для каждой строчки табчасти? Буду рада любой помощи, сама я окончательно запуталась.
1 lubitelxml
 
10.11.21
15:00
Показывай код
2 TataRus
 
10.11.21
15:01
Если Документ.ДоговорКонтрагента <> Справочники.ДоговорыКонтрагентов.ПустаяСсылка() тогда

                                               НовСтр = Объект.ТабЧасть.Добавить();

                                               НовСтр.ДоговорыДокумента = Документ.ДоговорКонтрагента;

                                               НовСтр.Справка = "Реквизиты";

                               КонецЕсли;

                              

                               //Если НЕ ЗначениеЗаполнено(Документ.СчетУчетаРасчетовСКонтрагентом) Тогда

                               //    ДоговораДокумента = Неопределено;

                               //КонецЕсли;

              

                               Если Документ.СубконтоКт1 <> Справочники.ДоговорыКонтрагентов.ПустаяСсылка() тогда

                                               НовСтр = Объект.ТабЧасть.Добавить();

                                               НовСтр.ДоговорыДокумента = Документ.ДоговорКонтрагента;

                                               НовСтр.Справка = "Счет";      

                    КонецЕсли;

                              

                               Если Документ.СубконтоКт2 <> Справочники.ДоговорыКонтрагентов.ПустаяСсылка() тогда

                                               НовСтр = Объект.ТабЧасть.Добавить();

                                               НовСтр.ДоговорыДокумента = Документ.ДоговорКонтрагента;

                                               НовСтр.Справка = "Счет";      

                               КонецЕсли;

                              

                               Если Документ.СубконтоКт3 <> Справочники.ДоговорыКонтрагентов.ПустаяСсылка() тогда

                                               НовСтр = Объект.ТабЧасть.Добавить();

                                               НовСтр.ДоговорыДокумента = Документ.ДоговорКонтрагента;

                                               НовСтр.Справка = "Счет";      

                               КонецЕсли;

                              

                               Для каждого ТекСтр Из Документ.РасшифровкаПлатежа Цикл

             Если ТекСтр <> Справочники.ДоговорыКонтрагентов.ПустаяСсылка() Тогда

                                                   НовСтр = Объект.ТабЧасть.Добавить();

                                                   НовСтр.ДоговорыДокумента = ТекСтр.ДоговорКонтрагента;

                                                   НовСтр.Справка = "Табличная часть";

                                               КонецЕсли;    

                               КонецЦикла;
3 TataRus
 
10.11.21
15:02
Так работает, но нужно, чтобы СубконтоКт выбирались из ТЧ счета
4 lubitelxml
 
10.11.21
15:09
Что значит ТЗ Счета - они у вас в коде вообще не фигирируют
5 TataRus
 
10.11.21
15:20
Табличная часть счета Документ.СчетУчетаРасчетовСКонтрагентом. Из ТЧ этого счета тоже можно вытащить эти три СубконтоКт, собственно, это и нужно сделать, не брать их из реквизита документа, а достать из ТЧ счета
6 TataRus
 
11.11.21
06:59
(4) нет вариантов?
7 hhhh
 
11.11.21
08:08
(6) ну посмотреть как в типовой бух это сделано.
Компьютеры — прекрасное средство для решения проблем, которых до их появления не было.