0
Ololosha
01.04.12
✎
00:02
|
Всем доброй ночи)
голова совсем не работает.. подскажите что я делаю не так?
ФайлDBF = Новый XBase;
ФайлDBF.Поля.Добавить("КодТовара","S",9);
ФайлDBF.Поля.Добавить("Наименование","S",20) ;
ФайлDBF.Поля.Добавить("Количество","N",3);
ФайлDBF.Поля.Добавить("Цена","N",10,2);
ФайлDBF.Поля.Добавить("Сумма","N",10,2);
ФайлDBF.СоздатьФайл("C:\Documents and Settings\All Users\Рабочий стол\FILE.dbf");
Товары = СсылкаНаОбъект.Ссылка.Выбрать();
Пока Товары.Следующий() Цикл
ФайлDBF.Добавить();
ФайлDBF.КодТовара = СтрокаТаблицы.Номенклатура.Код;
ФайлDBF.Наименование = СтрокаТаблицы.Номенклатура.НаименованиеПолное;
ФайлDBF.Количество = СтрокаТаблицы.Количество;
ФайлDBF.Цена = ОбщегоНазначения.ФорматСумм(СтрокаТаблицы.Цена, СсылкаНаОбъект.ВалютаДокумента, "00");
ФайлDBF.Записать();
КонецЦикла;
ФайлDBF.ЗакрытьФайл();
|
|