|
Выгружать документы за период в 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 = Выборка.Номенклатура.Количество; База.Записать(); КонецЦикла; База.Записать(); База.ЗакрытьФайл(); надо бы в этот кусок кода вставить строки и про сами документы.счетНаОплатуПокупателем со всеми полями.. есть ли у кого нибудь аналогичный пример? |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |