Имя: Пароль:
1C
1С v8
Выгружать документы за период в dbf
0 Chuchi
 
10.07.11
13:54
Ознакомилась с результатами поиска на форуме но подобной темы не нашла(
Не будет ли у кого нибудь примера как это сделать
Или возможно выгружать и в дальнейшем загружать лучше через xml
1 Конфигуратор1с
 
10.07.11
14:00
Конвертация данных чем не подходит?
2 Chuchi
 
10.07.11
14:10
Мне надо чтобы поставщики могли выгрузить счета а покупатель их загрызть, по пойму конвертацией здесь не воспользоваться
3 Конфигуратор1с
 
10.07.11
14:13
(2) почему же? настраиваете правила обмена. и с помощью обработки универсальный обмен данных через хмль обмениваетесь.
4 Chuchi
 
10.07.11
22:52
я ни разу еще не писала правил*(
5 pectopatop
 
10.07.11
23:10
А там и не надо писать - жмакай кнопочки только в форме производства 1С
6 Chuchi
 
10.07.11
23:42
А у меня почему то требует

Необходимо перезагрузить правила обмена для выгрузки данных.

Не указано имя файла с правилами обмена (Имя файла правил)
7 Chuchi
 
11.07.11
00:06
) Есть ли кто еще на сайте в столь поздний час
я нашла вот такой код

Процедура ВыгрузкаНажатие(Элемент)
   //Процедура Выгрузка(Кнопка)
      ЗаписьXML=Новый ЗаписьXML;
   ЗаписьXML.ОткрытьФайл("c:\document.xml");
   ЗаписьXML.ЗаписатьНачалоЭлемента("Главный");
   
   Выборка = Документы.СчетНаОплатуПокупателю.Выбрать (ДатаС, ДатаПо);
   Пока Выборка.Следующий () Цикл
       ЗаписьXML.ЗаписатьНачалоЭлемента("Документ");
       ЗаписатьXML(ЗаписьXML, Выборка.ПолучитьОбъект());
       ЗаписьXML.ЗаписатьКонецЭлемента();
   КонецЦикла;
   
   
   
   
   Выборка = Справочники.Номенклатура.Выбрать();
   Пока Выборка.Следующий () Цикл
       ОбработкаПрерыванияПользователя();
       
       ЗаписьXML.ЗаписатьНачалоЭлемента("ГруппаОбъектов");
       
       ЗаписьXML.ЗаписатьНачалоЭлемента("Справочник");
       ЗаписатьXML(ЗаписьXML, Выборка.ПолучитьОбъект());
       ЗаписьXML.ЗаписатьКонецЭлемента();

       
       ЗаписьXML.ЗаписатьКонецЭлемента();
   КонецЦикла;    
   
   ЗаписьXML.ЗаписатьКонецЭлемента();
   ЗаписьXML.Закрыть();
   Сообщить("Выгружено");    

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

Мне бы теперь надо номенклатуру и контрагентов догружать только тех которые используются в документе,
правильно ли понимаю что эти дополнительные данные надо как то вот здесь приписывать
Выборка = Документы.СчетНаОплатуПокупателю.Выбрать (ДатаС, ДатаПо);
   Пока Выборка.Следующий () Цикл
       ЗаписьXML.ЗаписатьНачалоЭлемента("Документ");
       ЗаписатьXML(ЗаписьXML, Выборка.ПолучитьОбъект());
       ЗаписьXML.ЗаписатьКонецЭлемента();
   КонецЦикла;
8 aleks-id
 
11.07.11
00:40
номенклатуру выбирайте запросом. если документы за период, тогда тоже запросом.
9 Chuchi
 
20.07.11
11:20
как то я не правильно привела код для xml а в теме dbf
Так вот возвращаясь к DBF
как мне в один файл загрузить все документы (счета) за период с номенклатурами и контрагентами?
у меня есть вот такой кусок кода но он касается только номенклатуры (т.е. проверяю номенклатуру в счете и ее выгружаю)
База = Новый XBase;
   База.Кодировка = КодировкаXBase.OEM;
   База.Поля.Добавить("KOD","S",11);
   База.Поля.Добавить("NOM","S",100) ;
   База.Поля.Добавить("YnId","S",100) ;
   Путь = "C:\Tovari.DBF";
   База.СоздатьФайл(Путь);
   
   Запрос = Новый Запрос();
   Запрос.Текст =
   "ВЫБРАТЬ различные
   | номенклатура из Документ.СчетНаОплатуПокупателю.Товары где Ссылка.Дата между &ДатаС и &ДатаПО  ";
   Запрос.УстановитьПараметр("ДатаС", НачалоДня(ДатаС));
   Запрос.УстановитьПараметр("ДатаПо", КонецДня(ДатаПо));
   
   Выборка = Запрос.Выполнить().Выбрать();
   Пока Выборка.Следующий () Цикл
       ОбработкаПрерыванияПользователя();
       База.Добавить();
       База.KOD =    Выборка.Номенклатура.Код;
       База.NOM =    Выборка.Номенклатура.Наименование;
       База.YnId= Сред(ЗначениеВСтрокуВнутр(Выборка.Номенклатура),46,32);
       //База.KOL =    Выборка.Номенклатура.Количество;
       База.Записать();
   КонецЦикла;    
   База.Записать();
   База.ЗакрытьФайл();


надо бы в этот кусок кода вставить строки и про сами документы.счетНаОплатуПокупателем со всеми полями..
есть ли у кого нибудь аналогичный пример?
Ошибка? Это не ошибка, это системная функция.