0
Буковка
18.07.23
✎
09:20
|
Добрый день! Нужно передать параметры в гет-запрос (код ниже), но возвращает данные без отбора по этим параметрам.
Подскажите, пожалуйста, в чем может быть ошибка?
ДанныеПодключения = Новый Структура("Сервер, Токен, ЗащищенноеСоединение");
НастройкиОбмена = РегистрыСведений.уникаНастройкиОбменаВнешниеСистемы.Выбрать(Новый Структура("ВнешняяСистема", Перечисления.уникаВнешниеСистемы.webApp));
Если НастройкиОбмена.Следующий() Тогда
ДанныеПодключения.Сервер = НастройкиОбмена.Сервер;
ДанныеПодключения.Токен = НастройкиОбмена.Токен;
Если НастройкиОбмена.ЗащищенноеСоединение Тогда
ДанныеПодключения.ЗащищенноеСоединение = Новый ЗащищенноеСоединениеOpenSSL();
КонецЕсли;
НастройкиОбмена = Неопределено;
Иначе
ТекстОшибки = "Не найдены настройки системы web App";
Сообщить(ТекстОшибки);
возврат Ложь;
КонецЕсли;
Соединение = Новый HTTPСоединение(ДанныеПодключения.Сервер,443,,, ,, ДанныеПодключения.ЗащищенноеСоединение);
ЗаголовокЗапросаHTTP = Новый Соответствие();
ЗаголовокЗапросаHTTP.Вставить("Authorization", "Bearer " +ДанныеПодключения.Токен);
АдресРесурсаДляGET = СтрШаблон("/api/worklog/?worklog_date_after=%1&worklog_date_before=%2", Формат(ПараметрДатаНачала, "ДФ='yyyy-MM-dd'"), Формат(ПараметрДатаОкончания, "ДФ='yyyy-MM-dd'"));
Запрос = Новый HTTPЗапрос(АдресРесурсаДляGET,ЗаголовокЗапросаHTTP);
HTTPОтвет = Соединение.Получить(Запрос);
ЧтениеJSON = Новый ЧтениеJSON;
ЧтениеJSON.УстановитьСтроку(HTTPОтвет.ПолучитьТелоКакСтроку());
Структура = ПрочитатьJSON(ЧтениеJSON);
ЧтениеJSON.Закрыть();
|
|