АПИ Яндекс Маркет

Доброго всем дня!

Пытаюсь получить по АПИ список товаров из определенного магазина во такой процедурой





    КлиентID = "656............................";

    Токен = "y0_..................................................";

    СтрокаИД = СтрЗаменить(IDТекущегоМагазинаЯндекс, Символы.НПП, "");

    СтрокаURL = "https://api.partner.market.yandex.ru/campaigns/" + СтрокаИД + "/offers";

    

    Заголовки = Новый Соответствие;

    Заголовки.Вставить("Authorization", "OAuth oauth_token="""+СокрЛП(Токен)+""", oauth_client_id="""+СокрЛП(КлиентID)+"""");

    

    СтруктураURI = ОбщегоНазначенияКлиентСервер.СтруктураURI(СтрокаURL);

    SSL_Соединение=Новый ЗащищенноеСоединениеOpenSSL();

    HTTPСоединение = Новый HTTPСоединение(СтруктураURI.Хост,443,,,,,SSL_Соединение);

    

    HTTPRequest = Новый HTTPЗапрос(СтруктураURI.ПутьНаСервере,Заголовки);



    ЗаписьJSON=Новый ЗаписьJSON;

    ЗаписьJSON.УстановитьСтроку();

    ЗаписьJSON.ЗаписатьНачалоОбъекта();

    ЗаписьJSON.ЗаписатьИмяСвойства("statuses");

    ЗаписьJSON.ЗаписатьЗначение("PUBLISHED");            

    ЗаписьJSON.ЗаписатьКонецОбъекта();    

    Результат=ЗаписьJSON.Закрыть();

    

    HTTPRequest.УстановитьТелоИзСтроки(Результат,КодировкаТекста.UTF8,ИспользованиеByteOrderMark.НеИспользовать);    



    HttpОтвет=HTTPСоединение.ВызватьHTTPМетод("POST",HTTPRequest);



    Если HttpОтвет.КодСостояния = 200 Тогда

        Поток=HttpОтвет.ПолучитьТелоКакПоток();

        ЧтениеJSON=Новый ЧтениеJSON;

        ЧтениеJSON.ОткрытьПоток(Поток);

        Соответствие=ПрочитатьJSON(ЧтениеJSON);

        ЧтениеJSON.Закрыть();



    Иначе    

        

    КонецЕсли;

    Поток=Неопределено;

    HTTPRequest=Неопределено;

Возвращается код состояния 400. Если вместо этого



HttpОтвет=HTTPСоединение.ВызватьHTTPМетод("POST",HTTPRequest);

Написать



HttpОтвет=HTTPСоединение.Получить(HTTPRequest);

Возвращается код ответа 200, но массив товаров пустой. Может кто-то подскажет в чем ошибка.