Новости для бухгалтера, бухучет, налогообложение, отчетность, ФСБУ, прослеживаемость и маркировка, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[Прочее]

выгрузка данных XML с отбором

K_Olga
читатель
офлайн
Дата регистрации: 05.09.2008
Сообщений: 56
Пост №1
 
01.10.2008 15:40

"Работаю в бухгалтерии 8.1.<br>В форме списка документа "Учет основных средств" имеется кнопка "Выгрузить". С помощью нее выгружаются данные документов "Учет основных средст" в XML-документ. Вод код:<br><br>Процедура ДействияФормыВыгрузить(Кнопка)<br> Запись=Новый ЗаписьXML;<br> Запись.ОткрытьФайл("c:\document.xml");<br> Запись.ЗаписатьОбъявлениеXML();<br> Запись.ЗаписатьНачалоЭлемента("Корневой");<br> Запись.ЗаписатьАтрибут("Доумент", "ПринятиеКУчтетуОС");<br> Запись.ЗаписатьКомментарий("Краткая информация о принятых к учету ОС");<br> Выборка=Документы.ПринятиеКУчетуОС.Выбрать();<br>        <br> Пока Выборка.Следующий()Цикл<br> <br> Запись.ЗаписатьНачалоЭлемента("Элемент");<br> Запись.ЗаписатьАтрибут("Номер", Строка(Выборка.Номер));<br> Запись.ЗаписатьАтрибут("Дата", Строка(Выборка.Дата));<br> Запись.ЗаписатьАтрибут("Организация", Строка(Выборка.Организация));<br> Запись.ЗаписатьАтрибут("Склад", Строка(Выборка.Склад)); <br> Запись.ЗаписатьАтрибут("ПодразделениеОрганизации", Строка(Выборка.ПодразделениеОрганизации));<br> Запись.ЗаписатьАтрибут("МОЛ", Строка(Выборка.МОЛБУ)); <br> Запись.ЗаписатьАтрибут("Оборудование", Строка(Выборка.Номенклатура)); <br> Запись.ЗаписатьАтрибут("ОбъектСтроительства", Строка(Выборка.ОбъектСтроительства));<br> Запись.ЗаписатьАтрибут("ПервоначальнаяСтоимость", Строка(Выборка.ПервоначальнаяСтоимостьНУ));<br> <br> Запись.ЗаписатьКонецЭлемента();<br>КонецЦикла;<br>Запись.ЗаписатьКонецЭлемента();<br>Запись.Закрыть();<br><br>КонецПроцедуры<br><br>Как сделать, чтоб выгружались документы в XML-документ только определенной даты. Заранее спасибо!<br> "

Эстер Коган
читатель
офлайн
Дата регистрации: 18.09.2008
Сообщений: 20
Пост №2
 
02.10.2008 14:40

"//Выборка=Документы.ПринятиеКУчетуОС.Выбрать();<br>Выборка=Документы.ПринятиеКУчетуОС.Выбрать(НачДата,КонДата);"

K_Olga
читатель
офлайн
Дата регистрации: 05.09.2008
Сообщений: 56
Пост №3
 
02.10.2008 14:50

спасибо

Показывать по 10 20 40 сообщений

Читают тему:

Быстрый переход
Для технических специалистов
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • МАРКИРОВКА
  • ЕГАИС
  • Учет, налогообложение, автоматизация