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