Где я делаю ошибку?
03.02.2003
15:52
#1
"Процедура Сформировать()
Спр = СоздатьОбъект("Справочник.Сотрудники");
Периодический = СоздатьОбъект("Периодический");
мдСправочник = Метаданные.Справочник("Сотрудники");
Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент()=1 Цикл
Для Сч = 1 По мдСправочник.Реквизит() Цикл
ВидемыйДокумент=0;
Реквизит = Метаданные.Справочник("Сотрудники").Реквизит(Сч);
Если Спр.ЭтоГруппа()=0 Тогда
Если Реквизит.Периодический = 1 Тогда
Периодический.ИспользоватьОбъект(Реквизит);
Периодический.ВыбратьЗначения();
Пока Периодический.ПолучитьЗначение() = 1 Цикл
Периодический.Удалить();
КонецЦикла;
КонецЕсли;
КонецЕсли;
КонецЦикла;
КонецЦикла;
КонецПроцедуры
ОШИБКА!!!
Периодический.ИспользоватьОбъект(Реквизит);
не является константой или периодическим параметром!
На самом деле Допустим Поле ОКЛАД я вляется периодическим?"
Спр = СоздатьОбъект("Справочник.Сотрудники");
Периодический = СоздатьОбъект("Периодический");
мдСправочник = Метаданные.Справочник("Сотрудники");
Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент()=1 Цикл
Для Сч = 1 По мдСправочник.Реквизит() Цикл
ВидемыйДокумент=0;
Реквизит = Метаданные.Справочник("Сотрудники").Реквизит(Сч);
Если Спр.ЭтоГруппа()=0 Тогда
Если Реквизит.Периодический = 1 Тогда
Периодический.ИспользоватьОбъект(Реквизит);
Периодический.ВыбратьЗначения();
Пока Периодический.ПолучитьЗначение() = 1 Цикл
Периодический.Удалить();
КонецЦикла;
КонецЕсли;
КонецЕсли;
КонецЦикла;
КонецЦикла;
КонецПроцедуры
ОШИБКА!!!
Периодический.ИспользоватьОбъект(Реквизит);
не является константой или периодическим параметром!
На самом деле Допустим Поле ОКЛАД я вляется периодическим?"
Читают тему
(гостей: 1)