Имя: Пароль:
1C
1С v8
Диаграмма Ганта
0 Vya4eslav
 
18.10.11
13:56
есть готовый отчет работает под 8.2
написан под 8.0
Использует Диаграмму Ганта
Но если я пытаюсь все то же самое повторить в новом отчете с управляемой формой. лезут ошибки помогите довести до ума

ссылка на саму обработку
http://narod.ru/disk/28780443001/GrPredstavlOsnovNachisl.epf.html

текст ошибки
{Обработка.ГрафическоеПредставлениеОсновныхНачислений1.Форма.Форма2.Форма(40)}: Метод объекта не обнаружен (Элементы)
       ЭлементШкалыВремени = ДиаграммаГанта.ОбластьПостроения.ШкалаВремени.Элементы(1);

текст модуля


&НаСервере
Функция ПолучитьДиаграмму()
   Возврат ДиаграммаГанта;              
КонецФункции

&НаСервере
Функция ПолучитьВыборку()
   Запрос = Новый Запрос;
   Запрос.Текст = "ВЫБРАТЬ
                  |    ОсновныеНачисленияФактическийПериодДействия.Регистратор,
                  |    ОсновныеНачисленияФактическийПериодДействия.ФизическоеЛицо,
                  |    ОсновныеНачисленияФактическийПериодДействия.ВидРасчета,
                  |    ОсновныеНачисленияФактическийПериодДействия.ПериодДействияНачало,
                  |    ОсновныеНачисленияФактическийПериодДействия.ПериодДействияКонец,
                  |    ОсновныеНачисленияФактическийПериодДействия.Результат
                  |ИЗ
                  |    РегистрРасчета.ОсновныеНачисления.ФактическийПериодДействия КАК ОсновныеНачисленияФактическийПериодДействия";
                 
   Возврат Запрос.Выполнить().Выгрузить();              
КонецФункции

&НаКлиенте
Процедура Сформировать(Команда)
   ДиаграммаГанта.Обновление = ЛОЖЬ;
   ДиаграммаГанта.Очистить();
   Выборка = ПолучитьВыборку();                  
   Для каждого Запись из Выборка Цикл
       ТекущийСотрудник = ДиаграммаГанта.УстановитьТочку(Запись.ФизическоеЛицо,Запись.ФизическоеЛицо);
       ТекущийВидРасчета = ДиаграммаГанта.УстановитьСерию(Запись.ВидРасчета,Запись.ВидРасчета);
       
       ТекущаяКоллекцияИнтервалов = ДиаграммаГанта.ПолучитьЗначение(ТекущийСотрудник,ТекущийВидРасчета);
       
       ТекущийИнтервал = ТекущаяКоллекцияИнтервалов.Добавить();
       ТекущийИнтервал.Начало = Запись.ПериодДействияНачало;
       ТекущийИнтервал.Конец = Запись.ПериодДействияКонец;
       ТекущийИнтервал.Расшифровка = Запись.Регистратор;
       ТекущийИнтервал.Текст = Запись.Результат;
       
       ЭлементШкалыВремени = ДиаграммаГанта.ОбластьПостроения.ШкалаВремени.Элементы(1);
   КонецЦикла;
   ДиаграммаГанта.Обновление = ИСТИНА;
КонецПроцедуры
1 Vya4eslav
 
18.10.11
14:12
поднять
2 Vya4eslav
 
18.10.11
14:20
Сам разобрался

перед строкой где обращаюсь к элементам не добавил следующий код


       ЭлементМеток = ДиаграммаГанта.ОбластьПостроения.ШкалаВремени.Элементы.Добавить();
       ЭлементМеток.Единица = ТипЕдиницыШкалыВремени.День;
       ЭлементМеток.ОтображатьПериодическиеМетки = Ложь;
       


Спасибо    Pashkaa
в этой теме все доступно

v8: Диаграмма Ганта

Вопрос закрыт
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс