Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 15:54

Обыкновенное уравнение (в отчёте)

Автор Ник8, 03 мар 2015, 13:48

0 Пользователей и 1 гость просматривают эту тему.

Ник8

Отчёт->макет->табличный документ насколько я понимаю...

К примеру, в ячейке r1c1 задано значение x1, в r1c2 значение x2, а в r1c3 должна получиться сумма x1 и x2. Как это правильно записать на встроенном языке?

Процедура ПолеТабличногоДокументаПриИзмененииСодержимогоОбласти(Элемент, Область)
ТабДок.Область("R1C3").Текст = Число(ТабДок.Область("R1C1").Текст) + Число(ТабДок.Область("R1C2").Текст);
КонецПроцедуры

P.S. Посоветуйте литературу по теме

cska-fanat-kz

в подавляющем большинстве:
макет - ячейка - параметр
который потом в коде заполняется каким либо значением
табдок только ПОКАЗЫВАЕТ готовый результат

посему: складывать нужно значения которые заполняют параметры
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Ник8

Вроде не робит или я что-то не так делаю...так тоже ничего...

ТабДок.Область("r1c3").Значение = ТабДок.Область("r1c1").Значение + ТабДок.Область("r1c2").Значение;

P.S. Ячейки r1c1 и r1c2 в виде текста и параметра пробовал ставить

LexaK

весь мир 1С-ников (правильный) пишет так:


...
ОбластьМакета.Параметры.Параметр1 = Переменная1;
ОбластьМакета.Параметры.Параметр2 = Переменная2;
ОбластьМакета.Параметры.Сумма = Переменная1 + Переменная2; //!!!
...


ни разу не видел, что бы так извращались, как предлагаете вы
если помогло нажмите: Спасибо!

Dethmontt

LexaK, мало значит видел еще в мире 1С =))
Добавлено: 07 мар 2015, 01:54


LexaK, как ты реализуешь на ТабДоке расчет произвольного количества формул?
Если долго всматриваться в учебник...то в голову может прийти мысль его открыть!

Ник8

&НаКлиенте
Процедура ТабДокПриИзмененииСодержимогоОбласти(Элемент, Область)

ПриИзмененииДанныхОбластиТабДока(Элемент, Область, ЭтаФорма);

КонецПроцедуры


&НаКлиенте
Функция ПриИзмененииДанныхОбластиТабДока(Элемент, Область, Контекст) Экспорт

ПозицияКолонки = Найти(Область.Имя,"C");
Строка = Сред(Область.Имя, 1, ПозицияКолонки-1);
Колонка = Сред(Область.Имя, ПозицияКолонки);

Если Колонка = "C1" или Колонка = "C2" Тогда
Попытка
Контекст[Элемент.Имя].Область(Строка+"C3").Текст = Число(Контекст[Элемент.Имя].Область(Строка+"C2").Текст) + Число(Контекст[Элемент.Имя].Область(Строка+"C1").Текст);
Исключение
КонецПопытки;
КонецЕсли;

КонецФункции


Это сложение двух чисел, а как реализовать решение системы уравнений? Хотя бы типа таких?
x-y=-5
2x+y=-7

vitasw

Вы всегда можете самостоятельно разработать "MatCad". 1С именно для этого и разрабатывалась. 

cska-fanat-kz

Цитата: Ник8 от 08 мар 2015, 16:50Это сложение двух чисел, а как реализовать решение системы уравнений? Хотя бы типа таких?
x-y=-5
2x+y=-7

ИМХО не следует превращать обычный ТабДок в Эксель - не его это предназначение...
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск