Как программно активизировать нужную строку таблицы в тонком клиенте?

500р без налогов.

И почему работает в тонком клиенте следующий код
СтрокаТабличнойЧасти = Элементы["ОбъектыНедвижимости"].ТекущиеДанные?

В справке ТекущиеДанные работают только на толстом клиенте

ТабличноеПоле.ТекущиеДанные (TableBox.CurrentData)
ТабличноеПоле (TableBox)
ТекущиеДанные (CurrentData)
Использование:

Только чтение.
Описание:

Содержит данные текущей строки табличного поля.

Доступность:

Толстый клиент.
Примечание:

Тип значения данных строки табличного поля приведен в описаниях расширений табличного поля у соответствующих объектов.
Для табличных полей, отображающих иерархический список в виде дерева, свойство может принимать значение Неопределено.

(0) В (1) выгодное предложение, соглашайся

КоличествоСтрок = Объект.ОбъектыНедвижимости.Количество();
   
   Для ш = 0 По КоличествоСтрок-1 Цикл
       Элементы.ОбъектыНедвижимости.ТекущаяСтрока = ш;
       РассчитатьСуммуНДССтрокиТабличнойЧастиНаКлиенте();
       РассчитатьСуммуДоговораБезРассрочкиПоСтроке();
   КонецЦикла;

(4) Ты решила эту тему в качестве записной книжки использовать?

(5) чтобы другие 500 рублей не платили

(6) Ничего, что код нерабочий?

(7) это почему нерабочий?

+(8) только что оттестировала, работает

&НаКлиенте
Процедура ЦенаВключаетНДСПриИзменении(Элемент)
   
   КоличествоСтрок = Объект.ОбъектыНедвижимости.Количество();
   
   Для ш = 0 По КоличествоСтрок-1 Цикл
       Элементы.ОбъектыНедвижимости.ТекущаяСтрока = ш;
       РассчитатьСуммуНДССтрокиТабличнойЧастиНаКлиенте();
       РассчитатьСуммуДоговораБезРассрочкиПоСтроке();
   КонецЦикла;
   
   //шапка
   РассчитатьСуммуДоговораБезРассрочки();
   РассчитатьСуммуУслуг();
   РассчитатьСуммуНДС();
   
   Если Объект.ГрафикПлатежей.Количество() > 0
       И (Объект.ВидОперации = ПредопределенноеЗначение("Перечисление.УПН_ВидыОперацийДоговоровПоНедвижимости.Договор")
       ИЛИ Объект.КорректироватьГрафикПлатежей) Тогда
       Если Вопрос("Пересчитать график платежей?", РежимДиалогаВопрос.ДаНет) = КодВозвратаДиалога.Да Тогда
           Объект.ГрафикПлатежей.Очистить();
           РассчитатьГрафикПлатежейНаКлиенте();
       КонецЕсли;
   КонецЕсли;
   
   РассчитатьСуммуДоговора();
   
КонецПроцедуры

опять из мисты мозги выкачиваются на ИС ((

(8) Потому что идентификатор строки <> индексу. Они МОГУТ совпадать. А могут и нет.

(11) а как тогда пересчитать на клиенте?

(12) считать не на клиенте

(9) жесть )) я так понимаю кол строк в мильон не планируется ?

(12) Сам то по скока сие чуда на ИС загонять буш? Может % с тебя взять?

не куплю

(15) сама

(11) Если таблица заполняется программно, строки пользователем не добавляются и не удаляются, то идентификатор всегда будет совпадать

(17) Это не ашот? 0_о

(18) копайте дальше... открытий чудных вам еще открыть предстоит

(19) нужен личный осмотр - как у гинеколога - по высказываниям ОНА

(18) а это не ДС
тогда все проще но не на клиенте точно

короче да, код не всегда работает

+(23) кто без выпендрежа подскажет как на клиенте получить строку и пересчитать?

(23) читай книжки по 8.2
приходи к пониманию клиент-сервер
потом продавай поделки

Ведь если у таблицы формы присуствтует ТекущаяСтрока(чтение запись), значит можно как-то её установить надежно

(25) предлагаешь продублировать клиентские процедуры серверными вызовами?

(26) я правильно понимаю что ты хочешь текущую строку передавать в расчет построчно чтобы заполнять текущиеданные?

Что-то я не понял. Тебе сабж нужен или просто всю табличную часть пересчитать?

(27) все расчеты делать не на клиенте

(29) судя по всему куйню хочет сделать

и продать)

(29) у меня все клиентскими процедурами рассчитывается

Надо пересчитать в цикле всю таблицу на форме

(33) зря

тему можно закрывать...

(33) Желание понятное. Хочется минимизировать трафик и латенси на плохом канале.
Но полный пересчет придется делать на сервере. УФ в общем случае данные как бы и не хранит, а просто выступает динамическим окошком по серверным данным.

А вот на сабжевый вопрос я бы сам хотел узнать ответ. Я в УФ тоже не настоящий сварщик...

(36) Создала дубли клиентских процедур с серверным вызовом, работает, не это не красиво.

Проще было бы конечно программно активизировать строку таблицы на форме и пересчитать её клиенской процедурой.

&НаКлиенте
Процедура ЦенаВключаетНДСПриИзменении(Элемент)
   
   ПересчетТабличнойЧастиНаСервере();
   
   //шапка
   РассчитатьСуммуДоговораБезРассрочки();
   РассчитатьСуммуУслуг();
   РассчитатьСуммуНДС();
   
   Если Объект.ГрафикПлатежей.Количество() > 0
       И (Объект.ВидОперации = ПредопределенноеЗначение("Перечисление.УПН_ВидыОперацийДоговоровПоНедвижимости.Договор")
       ИЛИ Объект.КорректироватьГрафикПлатежей) Тогда
       Если Вопрос("Пересчитать график платежей?", РежимДиалогаВопрос.ДаНет) = КодВозвратаДиалога.Да Тогда
           Объект.ГрафикПлатежей.Очистить();
           РассчитатьГрафикПлатежейНаКлиенте();
       КонецЕсли;
   КонецЕсли;
   
   РассчитатьСуммуДоговора();
   
КонецПроцедуры

&НаСервере
Процедура ПересчетТабличнойЧастиНаСервере()
   
   Для Каждого СтрокаТаблицы из Объект.ОбъектыНедвижимости Цикл
       РассчитатьСуммуНДССтрокиТабличнойЧастиНаСервере(СтрокаТаблицы);
       РассчитатьСуммуДоговораБезРассрочкиПоСтрокеНаСервере(СтрокаТаблицы);
   КонецЦикла;
   
КонецПроцедуры

(34) ты, кстати, сам не понимаешь, что Объект.ОбъектыНедвижимости присутствует как на клиенте, так и на сервере и это разные вещи

(39) чей-то? разве я не говорил делать все на сервере?

(40) иди дальше в свой толстый клиент

(38) через активацию строки - это убогое решение
и минимизация трафике не отмазка
мильон строк положит клиент надолго

(41) сними штаны\юбку и иди в то место что увидишь там

(42) представь себе договор купли продажи недвижимости с мильеном строк

(44) не куплю

(45) тебе и не по карману

(42) Минимизацией трафика тут и не пахнет.
Предлагаю всем желающим в ПриСозданииНаСервере добавить в табличную часть пару тысяч строк и на клиенте ее просто перебрать циклом.

(38) Если дубли полные, то достаточно их объявить &НаКлиентеНаСервереБезКонтекста
Тогда они и там и там скомпилируются.

(48)
Как эти дубли объединить в один?

&НаСервере
Процедура РассчитатьСуммуНДССтрокиТабличнойЧастиНаСервере(СтрокаТабличнойЧасти)
       
   ПроцентНДС = УправлениеНебольшойФирмойПовтИсп.ПолучитьЗначениеСтавкиНДС(СтрокаТабличнойЧасти.СтавкаНДС)/100;
   
   КоэффициентНДС = ?(Объект.ЦенаВключаетНДС, ПроцентНДС / (1 + ПроцентНДС), ПроцентНДС);
   
   Сумма = СтрокаТабличнойЧасти.ЦенаЗаКвМ*СтрокаТабличнойЧасти.ОбщаяПлощадь;    
   
   СтрокаТабличнойЧасти.СуммаНДС = Окр(Сумма * КоэффициентНДС, 2, РежимОкругления.Окр15как20);
   
КонецПроцедуры

&НаКлиенте
Процедура РассчитатьСуммуНДССтрокиТабличнойЧастиНаКлиенте(СтрокаТабличнойЧасти = Неопределено)
   
   Если СтрокаТабличнойЧасти = Неопределено Тогда
       СтрокаТабличнойЧасти = Элементы["ОбъектыНедвижимости"].ТекущиеДанные;
   КонецЕсли;
   
   ПроцентНДС = УправлениеНебольшойФирмойПовтИсп.ПолучитьЗначениеСтавкиНДС(СтрокаТабличнойЧасти.СтавкаНДС)/100;
   
   КоэффициентНДС = ?(Объект.ЦенаВключаетНДС, ПроцентНДС / (1 + ПроцентНДС), ПроцентНДС);
   
   Сумма = СтрокаТабличнойЧасти.ЦенаЗаКвМ*СтрокаТабличнойЧасти.ОбщаяПлощадь;    
   
   СтрокаТабличнойЧасти.СуммаНДС = Окр(Сумма * КоэффициентНДС, 2, РежимОкругления.Окр15как20);
   
КонецПроцедуры

&НаКлиентеСервереБезКонтекста
Процедура РассчитатьСуммуНДССтрокиТабличнойЧасти(СтрокаТабличнойЧасти, ЦенаВключаетНДС)
       
   ПроцентНДС = УправлениеНебольшойФирмойПовтИсп.ПолучитьЗначениеСтавкиНДС(СтрокаТабличнойЧасти.СтавкаНДС)/100;
   
   КоэффициентНДС = ?(ЦенаВключаетНДС, ПроцентНДС / (1 + ПроцентНДС), ПроцентНДС);
   
   Сумма = СтрокаТабличнойЧасти.ЦенаЗаКвМ*СтрокаТабличнойЧасти.ОбщаяПлощадь;    
   
   СтрокаТабличнойЧасти.СуммаНДС = Окр(Сумма * КоэффициентНДС, 2, РежимОкругления.Окр15как20);
   
КонецПроцедуры

(50) вчера рубняк под вечер был... сейчас почитала - реально не то.

Спасибо за помощь

(50) Процедура или функция с указанным именем не определена (РассчитатьСуммуНДССтрокиТабличнойЧасти)

Если ставить директиву &НаКлиентеСервереБезКонтекста

+(52) модуль формы её не видит с такой директивой

В (50) описка. &НаКлиентеНаСервереБезКонтекста, конечно же.