Шаг 102 - Изучаем XBase – Пишем реквизит справочника

Мы получали наименование. Но нам ничего не стоит и реквизит записать. Просто нужно использовать его имя и создать поле.

Процедура Сформировать() 

	ДБФ = СоздатьОбъект("XBase");
	ДБФ.ДобавитьПоле("NAME", "S", 25,0);
	ДБФ.ДобавитьПоле("INN", "S", 10,0);
	ДБФ.СоздатьФайл("c:\Test.dbf");

	Спр = СоздатьОбъект("Справочник.Номенклатура");
	Спр.ВыбратьЭлементы();  

	Пока Спр.ПолучитьЭлемент()>0 Цикл
		ДБФ.Добавить();
		ДБФ.NAME=Спр.Наименование;
		ДБФ.INN=Спр.ИНН;
		ДБФ.Записать();
	КонецЦикла;

	ДБФ.ЗакрытьФайл();

КонецПроцедуры

Запустим и посмотрим:

102_1.gif (3462 b)

Записался. Только проследите, чтобы реквизит все-таки был в справочнике.


Предыдущий Шаг | Следующий Шаг | Оглавление
Автор Каев Артем - 09.08.2002