[wmatik]

1С Предприятие 7.7(сетевая версия) - 7.70.027
Конфигурация: Производство-Услуги-Бухгалтерия для Украины(7.70.010)
Подскажите пожалуйста. В отчете выдается ошибка "Значение не представляет агрегатный объект ПредметЗакупки".

ПечКод = БуфКод+".00.00.00";
    Спр = СоздатьОбъект("Справочник.КодыПоКлассификатору");
    Спр.ВыбратьЭлементы();
    Пока Спр.ПолучитьЭлемент() = 1 Цикл  
        Если СокрЛП(Спр.Код) = СокрЛП(ПечКод) Тогда
            ПечНазв = СокрЛП(Спр.ПредметЗакупки);
        КонецЕсли;
    КонецЦикла;

[-=VJ=-]

1С Предприятие 7.7(сетевая версия) - 7.70.027
Конфигурация: Производство-Услуги-Бухгалтерия для Украины(7.70.010)
Подскажите пожалуйста. В отчете выдается ошибка "Значение не представляет агрегатный объект ПредметЗакупки".

Может получаете первым делом группу элементов, а у неё нет такого реквизита.

Сообщение отредактировал -=VJ=- - 08.06.11, 10:43

[wmatik]

Дело в том, что этот отчет привязан к документу, в котором есть код, который находится в сравочнике "КодыПоКлассификатору", но я получаю этот код с реквизитом ПредметЗакупки через другой справочник ТМЦ. Вот я не знаю как показать этот пеерскок через справочник

[-=VJ=-]

Дело в том, что этот отчет привязан к документу, в котором есть код, который находится в сравочнике "КодыПоКлассификатору", но я получаю этот код с реквизитом ПредметЗакупки через другой справочник ТМЦ.

А зачем так-то тогда? Почему не просто НайтиПоКоду()?

А если уж так - тогда включите фильтрацию по ЭтоГруппа()

[wmatik]

подскажите, как например?

[-=VJ=-]

подскажите, как например?

К примеру так:

Пока Спр.ПолучитьЭлемент() = 1 Цикл  
    Если Спр.ЭтоГруппа()=1 Тогда
        Продолжить;
    КонецЕсли;
    Если СокрЛП(Спр.Код) = СокрЛП(ПечКод) Тогда
        ПечНазв = СокрЛП(Спр.ПредметЗакупки);
    КонецЕсли;
КонецЦикла;

Сообщение отредактировал -=VJ=- - 08.06.11, 11:03

[wmatik]

ПечКод = БуфКод+".00.00.00";
    Спр = СоздатьОбъект("Справочник.КодыПоКлассификатору");
    Спр.ВыбратьЭлементы();
    Пока Спр.ПолучитьЭлемент() = 1 Цикл  
        Если Спр.ЭтоГруппа()=1 Тогда
             Если СокрЛП(Спр.Код) = СокрЛП(ПечКод) Тогда
                 ПечНазв = СокрЛП(Спр.ПредметЗакупки);
             КонецЕсли;
       КонецЕсли;
    КонецЦикла;

Так?

не помогло

может надо указать здесь справочник ТМЦ?

[pablo]

ПечКод = БуфКод+".00.00.00";
    Спр = СоздатьОбъект("Справочник.КодыПоКлассификатору");
    Спр.ВыбратьЭлементы();
    Пока Спр.ПолучитьЭлемент() = 1 Цикл  
        Если Спр.ЭтоГруппа()<>1 Тогда
             Если СокрЛП(Спр.Код) = СокрЛП(ПечКод) Тогда
                 ПечНазв = СокрЛП(Спр.ПредметЗакупки);
             КонецЕсли;
       КонецЕсли;
    КонецЦикла;

[wmatik]

все одно, ошибка

[-=VJ=-]

Если Спр.ЭтоГруппа()=1 Тогда
Так?

С точностью до наоборот. Вы же теперь только группы и перебираете.

Всё же не понимаю, почему нельзя просто

Спр.НайтиПоКоду(ПечКод)

[wmatik]

ПечКод = БуфКод+".00.00.00";
    Спр = СоздатьОбъект("Справочник.КодыПоКлассификатору");
    Спр.НайтиПоКоду(ПечКод);
    Пока Спр.ПолучитьЭлемент() = 1 Цикл  
        Если СокрЛП(Спр.Код) = СокрЛП(ПечКод) Тогда
            ПечКод = СокрЛП(Спр.ПредметЗакупки);
        КонецЕсли;
    КонецЦикла;

Так?

[-=VJ=-]

Так

ПечКод = БуфКод+".00.00.00";
Спр = СоздатьОбъект("Справочник.КодыПоКлассификатору");
Если Спр.НайтиПоКоду(ПечКод)=1 Тогда
    ПечНазв = СокрЛП(Спр.ПредметЗакупки);
Иначе
    Сообщить("Элемент по коду "+ПечКод+" не найден!");
КонецЕсли;

Сообщение отредактировал -=VJ=- - 08.06.11, 12:07

[wmatik]

пишет элемент по коду не найден

[-=VJ=-]

пишет элемент по коду не найден

А элемент с таким кодом есть?

[wmatik]

да, до того как я изменила на то что вы написали, выводило значения, код и сумму, а вот ПредметЗакупки не выводил. А теперь вообще ничего не выводит

[-=VJ=-]

да,

Попробуйте так

Спр.НайтиПоКоду(СокрЛП(ПечКод),0)

вот ПредметЗакупки не выводил

А такой реквизит у справочника действительно есть?

Сообщение отредактировал -=VJ=- - 08.06.11, 12:20

[wmatik]

у справочника КодПоКлассификатору есть реквизит ПредметЗакупки, но я уже писала что я с документа вытягивала этот реквизит через справочник ТМЦ. Может надо что-то именить в документе?

все равно элемент по коду не найден

[-=VJ=-]

у справочника КодПоКлассификатору есть реквизит ПредметЗакупки, но я уже писала что я с документа вытягивала этот реквизит через справочник ТМЦ.

Проворонил.
Если этот реквизит - справочник, то конечно печатать не будет.

ПечКод = БуфКод+".00.00.00";
    Спр = СоздатьОбъект("Справочник.КодыПоКлассификатору");
    Спр.ВыбратьЭлементы();
    Пока Спр.ПолучитьЭлемент() = 1 Цикл  
        Если Спр.ЭтоГруппа()<>1 Тогда
             Если СокрЛП(Спр.Код) = СокрЛП(ПечКод) Тогда
                 ПечНазв = СокрЛП(Спр.ПредметЗакупки.Наименование);
             КонецЕсли;
       КонецЕсли;
    КонецЦикла;

А вот почему по коду не находит - это я уже не знаю.

[wmatik]

Реквизита Наименование нет в справочнике КодыПоКлассификатору

[-=VJ=-]

Реквизита Наименование нет в справочнике КодыПоКлассификатору

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