Код

//++ Обрабатываем документы
КолДок = Метаданные.Документ();
Для Поз = 1 По КолДок Цикл
   Ид = Метаданные.Документ(Поз).Идентификатор;
   Состояние("Обработка документа: " + Ид + " (" + Строка(Цел(Поз / КолДок * 100)) + " %)");
   Если Метаданные.Документ(Поз).РеквизитТабличнойЧасти("Товар").Выбран() = 1 Тогда
     //++ Обрабатываем очередной документ
     глЗапрос.УстановитьТекстовыйПараметр("ТоварПоиска",ВыбТовар1);
     глЗапрос.УстановитьТекстовыйПараметр("ТоварЗамены",ВыбТовар2);
     глТекст = "
     |IF EXISTS (SELECT COUNT(ID) FROM $ДокументСтроки." + Ид + " WHERE $ДокументСтроки." + Ид + ".Товар = :ТоварПоиска)
     |BEGIN
     |EXEC('
     |UPDATE
     |		$ДокументСтроки." + Ид + "
     |SET
     |		$ДокументСтроки." + Ид + ".Товар = :ТоварЗамены
     |WHERE
     |		$ДокументСтроки." + Ид + ".Товар = :ТоварПоиска
     |')";

     //глЗапрос.Отладка(1);
     глЗапрос.ВыполнитьИнструкцию(глТекст);
   КонецЕсли;
КонецЦикла;
 

Код

глЗапрос.ВыполнитьИнструкцию(глТекст);
{F:\SHOPS\SHOP101\EXTFORMS\_ЗАМЕНАТОВАРА.ERT(42)}: FAILED! ICommandText::Execute(): Function name is missing ).
 

Код

MetaInfo = СоздатьОбъект("MetaInfoClasses");
ЭтоSQL = MetaInfo.ЭтоSQL_Версия();
Если ЭтоSQL = 0 Тогда
	База = СоздатьОбъект("OLEDBData");
	Соединение = "Provider = VFPOLEDB.1;Deleted = Yes;Data Source = " + КаталогИБ()+ ";Mode = ReadWrite;Extended Properties = "";User ID = "";Password = "";Mask Password = False;Collating Sequence = RUSSIAN;DSN = """;
	Рез = База.Соединение(Соединение);
	глЗапрос = База.СоздатьКоманду();
Иначе
	Предупреждение("Работа обработки возможна только в базе формата DBF!");
	СтатусВозврата(0);
	Возврат;
КонецЕсли;