Merge pull request alei1180#131 from Stivo182/fix/pr-130

Строка запроса должна исключаться alei1180#130

Author: Stivo182

src/core/Классы/ГенераторПрограммногоКода1С.os

@@ -773,9 +773,16 @@
 		КонецЕсли;
 	КонецЦикла;
 
-	ЕстьОтправляемыеТекстовыеДанные = ОписаниеЗапроса.ОтправляемыеТекстовыеДанные.Количество() > 0;
+	ЕстьТекстовоеТелоЗапроса = Ложь;
+	Для Каждого ПередаваемыйТекст Из ОписаниеЗапроса.ОтправляемыеТекстовыеДанные Цикл
+		Если ПередаваемыйТекст.Назначение = НазначенияПередаваемыхДанных.ТелоЗапроса Тогда
+			ЕстьТекстовоеТелоЗапроса = Истина;
+			Прервать;
+		КонецЕсли;
+	КонецЦикла;
+
 	Если КоличествоФайлов <= 1
-		И Не ЕстьОтправляемыеТекстовыеДанные Тогда
+		И Не ЕстьТекстовоеТелоЗапроса Тогда
 		Возврат Ложь;
 	КонецЕсли;
 

tests/ГенераторПрограммногоКода1С_test.os

@@ -841,6 +841,29 @@
 
 КонецПроцедуры
 
+&Тест
+Процедура ТестДолжен_ПроверитьПередачуПараметровЗапросаИФайла() Экспорт
+
+	КонсольнаяКоманда = "curl http://example.com \
+	|	--url-query name=val \
+	|	--data @path-to-file";
+
+	ПрограммныйКод = "Заголовки = Новый Соответствие();
+	|Заголовки.Вставить(""Content-Type"", ""application/x-www-form-urlencoded"");
+	|
+	|Соединение = Новый HTTPСоединение(""example.com"", 80);
+	|HTTPЗапрос = Новый HTTPЗапрос(""/?name=val"", Заголовки);
+	|HTTPЗапрос.УстановитьИмяФайлаТела(""path-to-file"");
+	|
+	|HTTPОтвет = Соединение.ВызватьHTTPМетод(""POST"", HTTPЗапрос);";
+
+	КонвертерКомандыCURL = Новый КонвертерКомандыCURL();
+	Результат = КонвертерКомандыCURL.Конвертировать(КонсольнаяКоманда, Новый ГенераторПрограммногоКода1С());
+
+	Ожидаем.Что(Результат).Равно(ПрограммныйКод);
+	
+КонецПроцедуры
+
 &Тест
 Процедура ТестДолжен_ПроверитьПереданноеИмяВыходногоФайла() Экспорт