helpf.pro
Регистрация

v8.2 УП: Работа с макетом

TaniaK
12.11.2012 04:03Прочитано: 2287
Доброе время суток! Ребята, подскажите: Есть табличная область, на нее накладывается макет из общих макетов, в нем мне нужно после того, как польз введет данные (числа), рассчитать другие значения в данном макете и сохранить все это дело. Как????
Бьюсь два дня, никак не могу сделать...
Yandex
Возможно, вас также заинтересует
Реклама на портале
TaniaK
12.11.2012 11:55Ответ № 1
НУ хотя бы общую схему работы, пж-ста!!!
E_Migachev
12.11.2012 12:01Ответ № 2
(0) TaniaK, покажи код как делаешь. а сохранить хочешь просто в файл?
TaniaK
13.11.2012 03:18Ответ № 3
Делаю в Модуле Объекта вот так: Процедура ЗаполнитьТабличныеЧасти(Форма) Экспорт
мПериодыИтогов.Очистить();
мМесяцы = Новый СписокЗначений;
СтрокаИтоговойОбласти = Новый Массив; //ИТого
СтрокаИтога = 0; //???

Для Счетчик = 1 По 12 Цикл
Если НЕ Форма.ЭлементыФормы.ОсновнаяПанель.Страницы[Счетчик-1].Видимость Тогда
Продолжить;
Иначе
мМесяцы.Добавить(Счетчик);
мПериодыИтогов.Добавить(Дата(АнализируемыйГод, Счетчик, 1));
КонецЕсли;
КонецЦикла;
ЗаполнитьСтруктуруОбластей();
Для Счетчик = 0 По мМесяцы.Количество() - 1 Цикл
ТекущийТДокумент = Форма.ЭлементыФормы["ТД" + мМесяцы.Получить(Счетчик).Значение];

//Вывод заголовка//
ЗначениеПодразд=Форма.ЭлементыФормы.Подразделение.Значение;
Область=СтруктураОбластей.Аптека;
Раз=Справочники.Подразделения.НайтиПоКоду("000000001");
Область.Параметры.Аптека=Раз;
ТекущийТДокумент.Вывести(СтруктураОбластей.Аптека);

ТекущийТДокумент.Вывести(СтруктураОбластей.ДатаЗаголовок);
ТекущийТДокумент.Присоединить(СтруктураОбластей.Заголовок);

//*********************************************Заполняем дату*************************
ТекДата=ТекущаяДата();
ДатаН = НачалоМесяца(ТекДата);
ДатаК = КонецМесяца(ТекДАта);
СписокДат = Новый СписокЗначений;
ТекДата = ДатаН;
Пока ТекДата < ДатаК Цикл
СписокДат.Добавить(ТекДата);
ТекДата = Дата(ТекДата + 60 * 60 * 24);
КонецЦикла;
СписокДат.Добавить(ТекДата);
МассивДат = Новый Массив;
ТекДата = ДатаН;
Область=СтруктураОбластей.ДАта;
Пока ТекДата < ДатаК Цикл
МассивДат.Добавить(ТекДата);
ТекДата = КонецДня(ТекДата) + 1;
Область.Параметры.Дата=ТекДата;
ТекущийТДокумент.Вывести(СтруктураОбластей.Дата);
КонецЦикла;

Область=СтруктураОбластей.Расчитаем;
ЗначениеДней=Область.Параметры.ЗначениеДней;
ЗначениеНорма=Область.Параметры.ЗначениеНорма;
план=ЗначениеДней+ЗначениеНорма;
Область.Параметры.План=План;

ТекущийТДокумент.Вывести(структураОбластей.Расчитаем);
Область=СтруктураОбластей.Расчитаем;
ЗначениеДней=Область.Параметры.ЗначениеДней;//=ЗначениеДней;
ЗначениеНорма=Область.Параметры.ЗначениеНорма;//=ЗначениеНорма;
План=ЗначениеДней+ЗначениеНорма;
Область.Параметры.План=План;
ТекущийТДокумент.Вывести(структураОбластей.Расчитаем);

ТекущийТДокумент.Присоединить(СтруктураОбластей.Расчет);
ТекущийТДокумент.Вывести(СтруктураОбластей.Итого);
ТекущийТДокумент.Присоединить(СтруктураОбластей.ИтогоСумма);
ТекущийТДокумент.Вывести(СтруктураОбластей.Выполнение);
ТекущийТДокумент.Вывести(СтруктураОбластей.цифрачисла);
ТекущийТДокумент.Присоединить(СтруктураОбластей.Число);
ТекущийТДокумент.Вывести(СтруктураОбластей.Норма);
ТекущийТДокумент.Вывести(СтруктураОбластей.Место);
ТекущийТДокумент.Вывести(СтруктураОбластей.Медиана);
ТекущийТДокумент.Вывести(СтруктураОбластей.Выручка);
ТекущийТДокумент.Вывести(СтруктураОбластей.Доконца);
ТекущийТДокумент.Вывести(СтруктураОбластей.Выполнение2);

КонецЦикла;

КонецПроцедуры
TaniaK
13.11.2012 03:23Ответ № 4
В общем макете есть параметры: ЗначениеНорма, ЗначениеДней, План (значение Число), необходимо добиться того, что бы было как в Экселе: План=ЗначениеНорма+ЗначениеДней.

Прочитала кучу всякой инфы, везде пишут отличия от 7.7, но нигде не указано, а как конкретно обращаться к данным параметрам, по-крайней мере не нашла...
TaniaK
13.11.2012 03:32Ответ № 5
Сохранить хочу в документ, записать в регистры
E_Migachev
13.11.2012 11:57Ответ № 6
(5) TaniaK, v8.x: Как в табличном документе изменить значение определенной ячейки?
TaniaK
14.11.2012 06:51Ответ № 7
(6) E_Migachev, благодарю!!!
Подсказка: Вы можете добавить любую страничку в Избранное щелкнув по значку
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.