Синхронизация из БП в КА

1. juliacopper 16 22.07.20 10:41 Сейчас в теме
Добрый день. Платформа (1С:Предприятие 8.3 (8.3.16.1148))
Написала правила обмена, проверила через Универсальный обмен все отлично ошибок нет. Вставляю эти правила в синхронизацию, не работает.
Конкретно:
Ошибка:
Ошибка в обработчике события ПередВыгрузкойОбъекта
ПКО = АвансовыйОтчет (Документ: Авансовый отчет)
Объект = Авансовый отчет ЮПБП-000001 от 13.01.2020 15:31:30 (Документ объект: Авансовый отчет)
Обработчик = ПередВыгрузкойОбъекта
ОписаниеОшибки = Ошибка при вызове метода контекста (Выполнить): {(22, 12)}: Неверные параметры в операции сравнения. Нельзя сравнивать поля
неограниченной длины и поля несовместимых типов.
ВТ.Объект <<?>>= &Ссылка
ПозицияМодуля = (36)
КСообщенияОбОшибках = 41
Авансовый отчет (ПКО)

Перед Выгрузкой

ВходящиеДанные = Новый Структура;
ВходящиеДанные.Вставить("Комментарий",Источник.Комментарий + " загружено из БП документ: "+ Источник);
ВходящиеДанные.Вставить("Проект");
ВходящиеДанные.Вставить("Проведен",Источник.Проведен);
ПроектнаяЗадача = "";
ЗапросПроекты = Новый Запрос;
ЗапросПроекты.УстановитьПараметр("Ссылка",Источник);
ЗапросПроекты.УстановитьПараметр("Проекты","Проекты");
ЗапросПроекты.УстановитьПараметр("ПроектныеЗадачи","Проектные задачи");
ЗапросПроекты.Текст =
"ВЫБРАТЬ
|	ДополнительныеСведения.Значение КАК Значение,
|	ДополнительныеСведения.Свойство.Наименование КАК Свойство,
|	ДополнительныеСведения.Объект КАК Объект
|ПОМЕСТИТЬ ВТ
|ИЗ
|	РегистрСведений.ДополнительныеСведения КАК ДополнительныеСведения
|ГДЕ
|	(ДополнительныеСведения.Свойство.Наименование = &Проекты
|			ИЛИ ДополнительныеСведения.Свойство.Наименование = &ПроектныеЗадачи)
|	И ТИПЗНАЧЕНИЯ(ДополнительныеСведения.Объект) = ТИП(Документ.АвансовыйОтчет)
|;
|
|////////////////////////////////////////////////////////////­////////////////////
|ВЫБРАТЬ
|	ВТ.Значение КАК Значение,
|	ВТ.Свойство КАК Свойство,
|	ВТ.Объект КАК Документ
|ИЗ
|	ВТ КАК ВТ
|ГДЕ
|	ВТ.Объект = &Ссылка";

РезультатПроекты = ЗапросПроекты.Выполнить().Выгрузить();

Для Каждого Стр из РезультатПроекты  Цикл
	Если  Стр.Свойство = "Проекты" Тогда
		 ВходящиеДанные.Проект = Стр.Значение;
	ИначеЕсли  Стр.Свойство = "Проектные задачи" Тогда
	  ПроектнаяЗадача =  Стр.Значение;
  КонецЕсли;
КонецЦикла;

ТЗ = Новый ТаблицаЗначений;
ТЗ.Колонки.Добавить("ПроектнаяЗадача");
ТЗ.Колонки.Добавить("Валюта");
ТЗ.Колонки.Добавить("ДатаНачисления");
ТЗ.Колонки.Добавить("Сумма");
ТЗ.Колонки.Добавить("Контрагент");
ТЗ.Колонки.Добавить("Договор");
ТЗ.Колонки.Добавить("ПроектнаяЗадачаПроект");

Запрос = Новый Запрос;
Запрос.УстановитьПараметр("Ссылка",Источник);
Запрос.Текст = 
"ВЫБРАТЬ
|	АвансовыйОтчетТовары.Ссылка.ВалютаДокумента КАК Валюта,
|	АвансовыйОтчетТовары.Ссылка.Дата КАК ДатаНачисления,
|	СУММА(АвансовыйОтчетТовары.Сумма) КАК Сумма,
|	АвансовыйОтчетТовары.Ссылка.ФизЛицо КАК Контрагент,
|	"""" КАК Договор
|ПОМЕСТИТЬ ВТ
|ИЗ
|	Документ.АвансовыйОтчет.Товары КАК АвансовыйОтчетТовары
|ГДЕ
|	АвансовыйОтчетТовары.Ссылка = &Ссылка
|
|СГРУППИРОВАТЬ ПО
|	АвансовыйОтчетТовары.Ссылка.Дата,
|	АвансовыйОтчетТовары.Ссылка.ВалютаДокумента,
|	АвансовыйОтчетТовары.Ссылка.ФизЛицо
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
|	АвансовыйОтчетВозвратнаяТара.Ссылка.ВалютаДокумента,
|	АвансовыйОтчетВозвратнаяТара.Ссылка.Дата,
|	СУММА(АвансовыйОтчетВозвратнаяТара.Сумма),
|	АвансовыйОтчетВозвратнаяТара.Контрагент,
|	АвансовыйОтчетВозвратнаяТара.ДоговорКонтрагента
|ИЗ
|	Документ.АвансовыйОтчет.ВозвратнаяТара КАК АвансовыйОтчетВозвратнаяТара
|ГДЕ
|	АвансовыйОтчетВозвратнаяТара.Ссылка = &Ссылка
|
|СГРУППИРОВАТЬ ПО
|	АвансовыйОтчетВозвратнаяТара.Ссылка.ВалютаДокумента,
|	АвансовыйОтчетВозвратнаяТара.ДоговорКонтрагента,
|	АвансовыйОтчетВозвратнаяТара.Контрагент,
|	АвансовыйОтчетВозвратнаяТара.Ссылка.Дата
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
|	АвансовыйОтчетОплатаПоставщикам.Ссылка.ВалютаДокумента,
|	АвансовыйОтчетОплатаПоставщикам.Ссылка.Дата,
|	СУММА(АвансовыйОтчетОплатаПоставщикам.Сумма),
|	АвансовыйОтчетОплатаПоставщикам.Контрагент,
|	АвансовыйОтчетОплатаПоставщикам.ДоговорКонтрагента
|ИЗ
|	Документ.АвансовыйОтчет.ОплатаПоставщикам КАК АвансовыйОтчетОплатаПоставщикам
|ГДЕ
|	АвансовыйОтчетОплатаПоставщикам.Ссылка = &Ссылка
|
|СГРУППИРОВАТЬ ПО
|	АвансовыйОтчетОплатаПоставщикам.Ссылка.ВалютаДокумента,
|	АвансовыйОтчетОплатаПоставщикам.Ссылка.Дата,
|	АвансовыйОтчетОплатаПоставщикам.Контрагент,
|	АвансовыйОтчетОплатаПоставщикам.ДоговорКонтрагента
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
|	АвансовыйОтчетПрочее.Ссылка.ВалютаДокумента,
|	АвансовыйОтчетПрочее.Ссылка.Дата,
|	СУММА(АвансовыйОтчетПрочее.Сумма),
|	АвансовыйОтчетПрочее.Поставщик,
|	""""
|ИЗ
|	Документ.АвансовыйОтчет.Прочее КАК АвансовыйОтчетПрочее
|ГДЕ
|	АвансовыйОтчетПрочее.Ссылка = &Ссылка
|
|СГРУППИРОВАТЬ ПО
|	АвансовыйОтчетПрочее.Ссылка.ВалютаДокумента,
|	АвансовыйОтчетПрочее.Поставщик,
|	АвансовыйОтчетПрочее.Ссылка.Дата
|;
|
|////////////////////////////////////////////////////////////­////////////////////
|ВЫБРАТЬ
|	ВТ.Валюта КАК Валюта,
|	ВТ.ДатаНачисления КАК ДатаНачисления,
|	ВТ.Сумма КАК Сумма,
|	ВТ.Контрагент КАК Контрагент,
|	ВТ.Договор КАК Договор
|ИЗ
|	ВТ КАК ВТ";




Результат = Запрос.Выполнить().Выгрузить();


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

КонецЦикла;

ВходящиеДанные.Вставить("Расходы",ТЗ);
Показать
По теме из базы знаний
Ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. serg_art 19 22.07.20 11:10 Сейчас в теме
стандартно, при обмене смотрим, чтобы конфигурации баз были последние.
чем не устраивает стандартный обмен КА2-БУХ, зачем дополнительные правила?
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот