|
Значение не является значением объектного типа (ИмяТипа) УТ-Бух | ☑ | ||
---|---|---|---|---|
0
antiteror91
31.01.15
✎
11:50
|
Здравствуйте. Перед выгрузкой документа написал следующее:
Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ | РеализацияТоваровУслуг.Ссылка, | РеализацияТоваровУслуг.Дата, | РеализацияТоваровУслуг.Номер, | РеализацияТоваровУслуг.Контрагент, | РеализацияТоваровУслуг.БанковскийСчетОрганизации, | РеализацияТоваровУслуг.ВалютаДокумента, | РеализацияТоваровУслуг.ДоговорКонтрагента, | РеализацияТоваровУслуг.Комментарий, | РеализацияТоваровУслуг.КратностьВзаиморасчетов, | РеализацияТоваровУслуг.КурсВзаиморасчетов, | РеализацияТоваровУслуг.Организация, | РеализацияТоваровУслуг.СуммаВключаетНДС, | РеализацияТоваровУслуг.УчитыватьНДС |ИЗ | Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг |ГДЕ | РеализацияТоваровУслуг.Проведен | И РеализацияТоваровУслуг.Дата МЕЖДУ &ДатаНачала И &ДатаКонца | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | РеализацияТоваровУслугШирокоформатнаяПечать.Ссылка, | РеализацияТоваровУслугШирокоформатнаяПечать.Дата, | РеализацияТоваровУслугШирокоформатнаяПечать.Номер, | РеализацияТоваровУслугШирокоформатнаяПечать.Контрагент, | РеализацияТоваровУслугШирокоформатнаяПечать.БанковскийСчетОрганизации, | РеализацияТоваровУслугШирокоформатнаяПечать.ВалютаДокумента, | РеализацияТоваровУслугШирокоформатнаяПечать.ДоговорКонтрагента, | РеализацияТоваровУслугШирокоформатнаяПечать.Комментарий, | РеализацияТоваровУслугШирокоформатнаяПечать.КратностьВзаиморасчетов, | РеализацияТоваровУслугШирокоформатнаяПечать.КурсВзаиморасчетов, | РеализацияТоваровУслугШирокоформатнаяПечать.Организация, | РеализацияТоваровУслугШирокоформатнаяПечать.СуммаВключаетНДС, | РеализацияТоваровУслугШирокоформатнаяПечать.УчитыватьНДС |ИЗ | Документ.РеализацияТоваровУслугШирокоформатнаяПечать КАК РеализацияТоваровУслугШирокоформатнаяПечать |ГДЕ | РеализацияТоваровУслугШирокоформатнаяПечать.Проведен | И РеализацияТоваровУслугШирокоформатнаяПечать.Дата МЕЖДУ &ДатаНачала И &ДатаКонца | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | СчетФактураВыданныйДокументыОснования.ДокументОснование.Ссылка, | НАЧАЛОПЕРИОДА(СчетФактураВыданныйДокументыОснования.ДокументОснование.Дата, МЕСЯЦ), | СчетФактураВыданныйДокументыОснования.ДокументОснование.Номер, | СчетФактураВыданныйДокументыОснования.ДокументОснование.Контрагент, | СчетФактураВыданныйДокументыОснования.ДокументОснование.БанковскийСчетОрганизации, | СчетФактураВыданныйДокументыОснования.ДокументОснование.ВалютаДокумента, | СчетФактураВыданныйДокументыОснования.ДокументОснование.ДоговорКонтрагента, | СчетФактураВыданныйДокументыОснования.ДокументОснование.Комментарий, | СчетФактураВыданныйДокументыОснования.ДокументОснование.КратностьВзаиморасчетов, | СчетФактураВыданныйДокументыОснования.ДокументОснование.КурсВзаиморасчетов, | СчетФактураВыданныйДокументыОснования.ДокументОснование.Организация, | СчетФактураВыданныйДокументыОснования.ДокументОснование.СуммаВключаетНДС, | СчетФактураВыданныйДокументыОснования.ДокументОснование.УчитыватьНДС |ИЗ | Документ.СчетФактураВыданный.ДокументыОснования КАК СчетФактураВыданныйДокументыОснования |ГДЕ | СчетФактураВыданныйДокументыОснования.Ссылка.Проведен | И СчетФактураВыданныйДокументыОснования.Ссылка.Дата МЕЖДУ &ДатаНачала И &ДатаКонца | И СчетФактураВыданныйДокументыОснования.ДокументОснование.Проведен | И НЕ(СчетФактураВыданныйДокументыОснования.ДокументОснование.Дата МЕЖДУ &ДатаНачала И &ДатаКонца)"; Запрос.УстановитьПараметр("ДатаНачала", НачалоДня(ДатаНачала)); Запрос.УстановитьПараметр("ДатаКонца", КонецДня(ДатаОкончания)); // ТаблицаРеализаций = Запрос.Выполнить().Выгрузить(); //ТаблицаРеализаций.Колонки.Добавить("Товары"); //ТаблицаРеализаций.Колонки.Добавить("Услуги"); ИсходящиеДанные = Новый Структура("Дата,Номер,Контрагент,БанковскийСчетОрганизации,ВалютаДокумента,ДоговорКонтрагента,Комментарий,КратностьВзаиморасчетов,КурсВзаиморасчетов,Организация,СуммаВключаетНДС,УчитыватьНДС,Товары,Услуги"); Для каждого СтрокаТаблицаРеализаций из ТаблицаРеализаций Цикл ИсходящиеДанные .Дата =СтрокаТаблицаРеализаций.Дата; ИсходящиеДанные .Номер = СтрокаТаблицаРеализаций.Номер; ИсходящиеДанные .Контрагент=СтрокаТаблицаРеализаций.Контрагент; ИсходящиеДанные .БанковскийСчетОрганизации= СтрокаТаблицаРеализаций.БанковскийСчетОрганизации; ИсходящиеДанные .ВалютаДокумента=СтрокаТаблицаРеализаций.ВалютаДокумента; ИсходящиеДанные .ДоговорКонтрагента=СтрокаТаблицаРеализаций.ДоговорКонтрагента; ИсходящиеДанные .Комментарий= СтрокаТаблицаРеализаций.Комментарий; ИсходящиеДанные .КратностьВзаиморасчетов= СтрокаТаблицаРеализаций.КратностьВзаиморасчетов; ИсходящиеДанные .КурсВзаиморасчетов= СтрокаТаблицаРеализаций.КурсВзаиморасчетов; ИсходящиеДанные .Организация=СтрокаТаблицаРеализаций.Организация; ИсходящиеДанные .СуммаВключаетНДС=СтрокаТаблицаРеализаций.СуммаВключаетНДС; ИсходящиеДанные .УчитыватьНДС= СтрокаТаблицаРеализаций.УчитыватьНДС; РеализацияТоваров = СтрокаТаблицаРеализаций.Ссылка; ТабличнаяЧастьТовары = Новый ТаблицаЗначений; ТабличнаяЧастьТовары.Колонки.Добавить("ЕдиницаИзмерения"); ТабличнаяЧастьТовары.Колонки.Добавить("Количество"); ТабличнаяЧастьТовары.Колонки.Добавить("Номенклатура"); ТабличнаяЧастьТовары.Колонки.Добавить("СтавкаНДС"); ТабличнаяЧастьТовары.Колонки.Добавить("Сумма"); ТабличнаяЧастьТовары.Колонки.Добавить("СуммаНДС"); ТабличнаяЧастьТовары.Колонки.Добавить("Цена"); ТабличнаяЧастьУслуги = Новый ТаблицаЗначений; ТабличнаяЧастьУслуги.Колонки.Добавить("Количество"); ТабличнаяЧастьУслуги.Колонки.Добавить("Номенклатура"); ТабличнаяЧастьУслуги.Колонки.Добавить("СтавкаНДС"); ТабличнаяЧастьУслуги.Колонки.Добавить("Сумма"); ТабличнаяЧастьУслуги.Колонки.Добавить("СуммаНДС"); ТабличнаяЧастьУслуги.Колонки.Добавить("Цена"); Для каждого СтрокаТаблицы из РеализацияТоваров.Товары Цикл Если НЕ СтрокаТаблицы.Номенклатура.Услуга Тогда НоваяСтрока = ТабличнаяЧастьТовары.Добавить(); ЗаполнитьЗначенияСвойств(НоваяСтрока,СтрокаТаблицы); НоваяСтрока.ЕдиницаИзмерения = СтрокаТаблицы.Номенклатура.БазоваяЕдиницаИзмерения; КонецЕсли; КонецЦикла; Для каждого СтрокаТаблицы из РеализацияТоваров.Товары Цикл Если СтрокаТаблицы.Номенклатура.Услуга Тогда НоваяСтрока = ТабличнаяЧастьУслуги.Добавить(); ЗаполнитьЗначенияСвойств(НоваяСтрока,СтрокаТаблицы); КонецЕсли; КонецЦикла; Для каждого СтрокаТаблицы из РеализацияТоваров.Услуги Цикл НоваяСтрока = ТабличнаяЧастьУслуги.Добавить(); ЗаполнитьЗначенияСвойств(НоваяСтрока,СтрокаТаблицы); КонецЦикла; СтрокаТаблицаРеализаций.Дата = НачалоДня(СтрокаТаблицаРеализаций.Дата); ИсходящиеДанные .Товары=ТабличнаяЧастьТовары; ИсходящиеДанные .Услуги =ТабличнаяЧастьУслуги; ВыгрузитьПоПравилу(, , , ИсходящиеДанные , "РеализацияТоваровУслуг"); КонецЦикла; ПВО стандартная. при выгрузке выдает следующую ошибку. подскажите в чем проблема? Спасибо |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |