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

        
        Для каждого СтрокаТаблицы из РеализацияТоваров.Товары Цикл
            Если НЕ СтрокаТаблицы.Номенклатура.Услуга Тогда
                НоваяСтрока = ТабличнаяЧастьТовары.Добавить();
                ЗаполнитьЗначенияСвойств(НоваяСтрока,СтрокаТаблицы);
                НоваяСтрока.ЕдиницаИзмерения = СтрокаТаблицы.Номенклатура.БазоваяЕдиницаИзмерения;
            КонецЕсли;
        КонецЦикла;
        
        Для каждого СтрокаТаблицы из РеализацияТоваров.Товары Цикл
            Если СтрокаТаблицы.Номенклатура.Услуга Тогда
                НоваяСтрока = ТабличнаяЧастьУслуги.Добавить();
                ЗаполнитьЗначенияСвойств(НоваяСтрока,СтрокаТаблицы);
            КонецЕсли;
                        
        КонецЦикла;

        
        Для каждого СтрокаТаблицы из РеализацияТоваров.Услуги Цикл
            НоваяСтрока = ТабличнаяЧастьУслуги.Добавить();
            ЗаполнитьЗначенияСвойств(НоваяСтрока,СтрокаТаблицы);
        КонецЦикла;
        
        СтрокаТаблицаРеализаций.Дата = НачалоДня(СтрокаТаблицаРеализаций.Дата);
        ИсходящиеДанные  .Товары=ТабличнаяЧастьТовары;
        ИсходящиеДанные  .Услуги =ТабличнаяЧастьУслуги;
        ВыгрузитьПоПравилу(, , , ИсходящиеДанные , "РеализацияТоваровУслуг");
    КонецЦикла;
ПВО стандартная. при выгрузке выдает следующую ошибку. подскажите в чем проблема? Спасибо
Проблемы невозможно решaть нa том же уровне компетентности, нa котором они возникaют. Альберт Эйнштейн