"Задача: надо сравнить по док.(поступление) 2-е ИС УТ и БП<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>РезультатЗапроса = Запрос.Выполнить().Выгрузить();<br><br>ТЗ_УТ = Новый ТаблицаЗначений;<br><br>ТЗ_УТ.Колонки.Добавить("Ссылка");<br>ТЗ_УТ.Колонки.Добавить("Дата");<br>ТЗ_УТ.Колонки.Добавить("Номер");<br>ТЗ_УТ.Колонки.Добавить("СуммаДокумента");<br> <br>//Запрос В БП<br>V8 = Новый ComОбъект("V81.ComConnector");<br><br>Попытка<br> Открытие = V8.Connect("File=""""F:\InfoBase"""";Usr=""""Администратор"""";");//("File=""""c:\InfoBases\Trade"""";Usr=""""Director"""";")<br> <br>Исключение<br> Предупреждение("База данных не открыта!!!!");<br> Возврат;<br>КонецПопытки;<br> <br>Открытие.NewObject("Запрос");<br>Запрос.Текст ="<br>//БП запрос по док.ПТиУ и РТиУ<br>|ВЫБРАТЬ<br>| ПоступлениеТоваровУслуг.Ссылка,<br>| ПоступлениеТоваровУслуг.Дата,<br>| ПоступлениеТоваровУслуг.Номер,<br>| ПоступлениеТоваровУслуг.СуммаДокумента<br>| ИЗ<br>| Документ.ПоступлениеТоваровУслуг КАК ПоступлениеТоваровУслуг<br>|ГДЕ<br>| ПоступлениеТоваровУслуг.Дата МЕЖДУ &НачПериода И &КонПериода<br>| И ПоступлениеТоваровУслуг.Проведен = ИСТИНА<br>//| И ПоступлениеТоваровУслуг.Склад = &Склад<br>|<br>|УПОРЯДОЧИТЬ ПО<br>| Дата <br>|";<br><br>Запрос.УстановитьПараметр("НачПериода", НачПериода);<br>Запрос.УстановитьПараметр("КонПериода", КонПериода);<br>Запрос.УстановитьПараметр("Склад", Склад);<br><br>РезультатCOM = Запрос.Выполнить().Выгрузить();<br><br>ТЗ_БП = Новый ТаблицаЗначений;<br><br>ТЗ_БП.Колонки.Добавить("Ссылка");<br>ТЗ_БП.Колонки.Добавить("Дата");<br>ТЗ_БП.Колонки.Добавить("Номер");<br>ТЗ_БП.Колонки.Добавить("СуммаДокумента");<br> <br>//Для каждого Строка Из ТЗ_УТ Цикл<br>//Документ_УТ = Строка.Ссылка;<br>//Дата_УТ = Строка.Дата;<br>//Номер_УТ = Строка.Номер;<br>//СуммаДокумента_УТ = Строка.СуммаДокумента;<br> <br>//КонецЦикла;<br> <br>КонецПроцедуры<br>"